1 // Copyright (C) 2021 Harry Godden (hgn) - All Rights Reserved
3 const char *vg_shader_gl_ver
= "#version 330 core\n";
5 #pragma GCC diagnostic push
6 #pragma GCC diagnostic ignored "-Wreturn-type"
7 static inline int static_str_index( const char *list
[], int len
, const char *str
)
9 for( int i
= 0; i
< len
; i
++ )
11 if( !strcmp(list
[i
],str
) )
16 fprintf( stderr
, "That was not a static string index!! (%s)\n", str
);
20 #pragma GCC diagnostic pop
22 #define SHADER_UNIFORM( NAME, U ) NAME##_auto_uniforms[ STR_STATIC_INDEX( NAME##_auto_names, U ) ]
23 #define SHADER_UNIFORM_NAME( NAME, UID ) NAME##_auto_names[ UID ]
24 #define STR_STATIC_INDEX( LIST, STR ) static_str_index( LIST, vg_list_size(LIST), STR )
26 #define UNIFORMS(...) __VA_ARGS__
28 #define SHADER_DEFINE( NAME, VERT, FRAG, UNIFORMS ) \
29 const char * NAME##_shader_names[] = UNIFORMS; \
30 GLint NAME##_shader_uniforms[ vg_list_size( NAME##_shader_names ) ]; \
31 struct vg_shader NAME##_static_shader = { \
32 .src_vert = VERT, .src_frag = FRAG, \
33 .sym = #NAME "_static.shader", \
34 .uniform_names = NAME##_shader_names, \
35 .uniforms = NAME##_shader_uniforms, \
36 .uniform_count = vg_list_size( NAME##_shader_names ), \
39 #define SHADER_INIT( NAME ) arrpush( vg_shaders_active, &NAME##_static_shader )
41 #define SHADER_STATUS_NONE 0x00
42 #define SHADER_STATUS_COMPILED 0x1
53 const char **uniform_names
;
58 ** vg_shaders_active
= NULL
;
60 static GLuint
vg_shader_subshader( const char *src
, GLint gliShaderType
)
62 GLint shader
= glCreateShader( gliShaderType
);
63 glShaderSource( shader
, 2, (const char *[2]){ vg_shader_gl_ver
, src
}, NULL
);
64 glCompileShader( shader
);
68 glGetShaderiv( shader
, GL_COMPILE_STATUS
, &success
);
72 glGetShaderInfoLog( shader
, 512, NULL
, infoLog
);
73 vg_error( "Error info:\n%s\n", infoLog
);
80 static int vg_shader_compile( struct vg_shader
*shader
)
82 vg_info( "Compile shader '%s'\n", shader
->sym
);
84 GLuint vert
, frag
, geo
;
86 vert
= vg_shader_subshader( shader
->src_vert
, GL_VERTEX_SHADER
);
87 frag
= vg_shader_subshader( shader
->src_frag
, GL_FRAGMENT_SHADER
);
94 geo
= vg_shader_subshader( shader
->src_geo
, GL_GEOMETRY_SHADER
);
100 shader
->program
= glCreateProgram();
101 if( shader
->src_geo
)
102 glAttachShader( shader
->program
, geo
);
104 glAttachShader( shader
->program
, vert
);
105 glAttachShader( shader
->program
, frag
);
106 glLinkProgram( shader
->program
);
108 glDeleteShader( vert
);
109 glDeleteShader( frag
);
111 if( shader
->src_geo
)
112 glDeleteShader( geo
);
114 // Check for link errors
116 int success_link
= 1;
118 glGetProgramiv( shader
->program
, GL_LINK_STATUS
, &success_link
);
121 glGetProgramInfoLog( shader
->program
, 512, NULL
, infoLog
);
122 vg_error( "Link failed: %s\n", infoLog
);
123 glDeleteProgram( shader
->program
);
129 for( int i
= 0; i
< shader
->uniform_count
; i
++ )
130 shader
->uniforms
[ i
] = glGetUniformLocation( shader
->program
, shader
->uniform_names
[i
] );
132 shader
->status
|= SHADER_STATUS_COMPILED
;
136 static void vg_shaders_free(void)
138 for( int i
= 0; i
< arrlen( vg_shaders_active
); i
++ )
140 struct vg_shader
*shader
= vg_shaders_active
[i
];
142 if( shader
->status
& SHADER_STATUS_COMPILED
)
143 glDeleteProgram( shader
->program
);
146 arrfree( vg_shaders_active
);
149 static int vg_shaders_compile(void)
151 vg_info( "Compiling shaders\n" );
153 for( int i
= 0; i
< arrlen( vg_shaders_active
); i
++ )
155 struct vg_shader
*shader
= vg_shaders_active
[i
];
156 if( !vg_shader_compile( shader
) )
163 vg_register_exit( &vg_shaders_free
, "vg_shaders_free" );