chaos pt 1
[carveJwlIkooP6JGAAIwe30JlM.git] / shaders / scene_standard.h
1 #ifndef SHADER_scene_standard_H
2 #define SHADER_scene_standard_H
3 static void shader_scene_standard_link(void);
4 static void shader_scene_standard_register(void);
5 static struct vg_shader _shader_scene_standard = {
6 .name = "scene_standard",
7 .link = shader_scene_standard_link,
8 .vs =
9 {
10 .orig_file = "shaders/scene.vs",
11 .static_src =
12 "layout (location=0) in vec3 a_co;\n"
13 "layout (location=1) in vec4 a_norm;\n"
14 "layout (location=2) in vec2 a_uv;\n"
15 "\n"
16 "#line 1 1 \n"
17 "const float k_motion_lerp_amount = 0.01;\n"
18 "\n"
19 "#line 2 0 \n"
20 "\n"
21 "out vec3 aMotionVec0;\n"
22 "out vec3 aMotionVec1;\n"
23 "\n"
24 "void vs_motion_out( vec4 vproj0, vec4 vproj1 )\n"
25 "{\n"
26 " // This magically solves some artifacting errors!\n"
27 " //\n"
28 " vproj1 = vproj0*(1.0-k_motion_lerp_amount) + vproj1*k_motion_lerp_amount;\n"
29 "\n"
30 " aMotionVec0 = vec3( vproj0.xy, vproj0.w );\n"
31 " aMotionVec1 = vec3( vproj1.xy, vproj1.w );\n"
32 "}\n"
33 "\n"
34 "#line 6 0 \n"
35 "\n"
36 "uniform mat4x3 uMdl;\n"
37 "uniform mat4 uPv;\n"
38 "uniform mat4 uPvmPrev;\n"
39 "\n"
40 "out vec2 aUv;\n"
41 "out vec4 aNorm;\n"
42 "out vec3 aCo;\n"
43 "out vec3 aWorldCo;\n"
44 "\n"
45 "void main()\n"
46 "{\n"
47 " vec3 world_pos0 = uMdl * vec4( a_co, 1.0 );\n"
48 " vec4 vproj0 = uPv * vec4( world_pos0, 1.0 );\n"
49 " vec4 vproj1 = uPvmPrev * vec4( a_co, 1.0 );\n"
50 "\n"
51 " vs_motion_out( vproj0, vproj1 );\n"
52 "\n"
53 " gl_Position = vproj0;\n"
54 "\n"
55 " aUv = a_uv;\n"
56 " aNorm = vec4( mat3(uMdl) * a_norm.xyz, a_norm.w );\n"
57 " aCo = a_co;\n"
58 " aWorldCo = world_pos0;\n"
59 "}\n"
60 ""},
61 .fs =
62 {
63 .orig_file = "shaders/scene_standard.fs",
64 .static_src =
65 "uniform sampler2D uTexGarbage;\n"
66 "uniform sampler2D uTexMain;\n"
67 "uniform vec3 uCamera;\n"
68 "uniform vec4 uPlane;\n"
69 "\n"
70 "#line 1 1 \n"
71 "// :D\n"
72 "\n"
73 "in vec2 aUv;\n"
74 "in vec4 aNorm;\n"
75 "in vec3 aCo;\n"
76 "in vec3 aWorldCo;\n"
77 "\n"
78 "#line 1 1 \n"
79 "layout (location = 0) out vec4 oColour;\n"
80 "\n"
81 "// OpenGL wiki: Recommends do not use vec3 because of drivers. hence the v4s...\n"
82 "layout (std140) uniform ub_world_lighting\n"
83 "{\n"
84 " vec4 g_cube_min;\n"
85 " vec4 g_cube_inv_range;\n"
86 "\n"
87 " vec4 g_water_plane;\n"
88 " vec4 g_depth_bounds;\n"
89 "\n"
90 " vec4 g_daysky_colour;\n"
91 " vec4 g_nightsky_colour;\n"
92 " vec4 g_sunset_colour;\n"
93 " vec4 g_ambient_colour;\n"
94 " vec4 g_sunset_ambient;\n"
95 " vec4 g_sun_colour;\n"
96 " vec4 g_sun_dir;\n"
97 " vec4 g_board_0;\n"
98 " vec4 g_board_1;\n"
99 "\n"
100 " float g_water_fog;\n"
101 " float g_time;\n"
102 " float g_realtime;\n"
103 " float g_shadow_length;\n"
104 " float g_shadow_spread;\n"
105 "\n"
106 " float g_time_of_day;\n"
107 " float g_day_phase;\n"
108 " float g_sunset_phase;\n"
109 "\n"
110 " int g_light_preview;\n"
111 " int g_shadow_samples;\n"
112 "\n"
113 " int g_debug_indices;\n"
114 " int g_debug_complexity;\n"
115 "};\n"
116 "\n"
117 "uniform sampler2D g_world_depth;\n"
118 "uniform samplerBuffer uLightsArray;\n"
119 "uniform usampler3D uLightsIndex;\n"
120 "\n"
121 "#line 1 1 \n"
122 "//const vec3 DAYSKY_COLOUR = vec3( 0.37, 0.54, 0.97 );\n"
123 "//const vec3 NIGHTSKY_COLOUR = vec3( 0.03, 0.05, 0.20 );\n"
124 "//const vec3 SUNSET_COLOUR = vec3( 1.00, 0.32, 0.01 );\n"
125 "//const vec3 AMBIENT_COLOUR = vec3( 0.13, 0.17, 0.35 );\n"
126 "//const vec3 SUNSET_AMBIENT = vec3( 0.25, 0.17, 0.51 );\n"
127 "//const vec3 SUN_COLOUR = vec3( 1.10, 0.89, 0.35 );\n"
128 "\n"
129 "const float SUN_ANGLE = 0.0001;\n"
130 "const float PI = 3.14159265;\n"
131 "\n"
132 "//struct world_info\n"
133 "//{\n"
134 "// float time,\n"
135 "// time_of_day,\n"
136 "// day_phase,\n"
137 "// sunset_phase;\n"
138 "// \n"
139 "// vec3 sun_dir;\n"
140 "//};\n"
141 "\n"
142 "float luminance( vec3 v )\n"
143 "{\n"
144 " return dot( v, vec3(0.2126, 0.7152, 0.0722) );\n"
145 "}\n"
146 "\n"
147 "vec3 clearskies_ambient( vec3 dir )\n"
148 "{\n"
149 " float sun_azimuth = g_sunset_phase * (dot( dir.xz, g_sun_dir.xz )*0.4+0.6);\n"
150 " float sky_gradient = dir.y;\n"
151 " \n"
152 " /* Blend phase colours */\n"
153 " vec3 ambient = g_daysky_colour.rgb * (g_day_phase-g_sunset_phase*0.1);\n"
154 " ambient += g_sunset_colour.rgb * (1.0-dir.y*0.5)*sun_azimuth;\n"
155 " ambient += g_nightsky_colour.rgb * (1.0-g_day_phase);\n"
156 " \n"
157 " /* Add gradient */\n"
158 " ambient -= sky_gradient * luminance(ambient);\n"
159 " \n"
160 " return ambient;\n"
161 "}\n"
162 "\n"
163 "vec3 clearskies_sky( vec3 ray_dir )\n"
164 "{\n"
165 " ray_dir.y = abs( ray_dir.y );\n"
166 " vec3 sky_colour = clearskies_ambient( ray_dir );\n"
167 " \n"
168 " /* Sun */\n"
169 " float sun_theta = dot( ray_dir, g_sun_dir.xyz );\n"
170 " float sun_size = max( 0.0, sun_theta * 0.5 + 0.5 + SUN_ANGLE );\n"
171 " float sun_shape = pow( sun_size, 2000.0 );\n"
172 " sun_shape += sun_size * max(g_sun_dir.y,0.0) * 0.5;\n"
173 " \n"
174 " vec3 sun_colour = mix( vec3(1.0), g_sunset_colour.rgb, g_sunset_phase*0.5 );\n"
175 " sun_colour *= sun_shape;\n"
176 " \n"
177 " vec3 composite = sky_colour + sun_colour;\n"
178 " return composite;\n"
179 "}\n"
180 "\n"
181 "vec3 clearskies_lighting( vec3 normal, float shadow, vec3 halfview )\n"
182 "{\n"
183 " float fresnel = 1.0 - abs(dot(normal,halfview));\n"
184 "\n"
185 " vec3 reflect_colour = mix( g_daysky_colour.rgb, g_sunset_colour.rgb, \n"
186 " g_sunset_phase );\n"
187 "\n"
188 " vec3 sky_reflection = 0.5 * fresnel * reflect_colour;\n"
189 " vec3 light_sun = max(0.0,dot(normal,g_sun_dir.xyz)*0.75+0.25) \n"
190 " * g_sun_colour.rgb * g_day_phase;\n"
191 "\n"
192 " float scaled_shadow = max( shadow, 1.0 - max(g_sun_dir.y,0.0) );\n"
193 " vec3 ambient = mix( g_ambient_colour.rgb, g_sunset_ambient.rgb, \n"
194 " g_sunset_phase );\n"
195 "\n"
196 " return ambient + (light_sun + sky_reflection) * shadow;\n"
197 "}\n"
198 "\n"
199 "#line 44 0 \n"
200 "\n"
201 "float world_depth_sample( vec3 pos )\n"
202 "{\n"
203 " vec2 depth_coord = (pos.xz - g_depth_bounds.xy) * g_depth_bounds.zw; \n"
204 " return texture( g_world_depth, depth_coord ).r;\n"
205 "}\n"
206 "\n"
207 "float world_water_depth( vec3 pos )\n"
208 "{\n"
209 " float ref_depth = g_water_plane.y*g_water_plane.w;\n"
210 " return world_depth_sample( pos ) - ref_depth;\n"
211 "}\n"
212 "\n"
213 "float shadow_sample( vec3 co ){\n"
214 " float height_sample = world_depth_sample( co );\n"
215 "\n"
216 " float fdelta = height_sample - co.y;\n"
217 " return clamp( fdelta, 0.2, 0.4 )-0.2;\n"
218 "}\n"
219 "\n"
220 "float newlight_compute_sun_shadow( vec3 co, vec3 dir ){\n"
221 " if( g_shadow_samples == 0 ){\n"
222 " return 1.0;\n"
223 " }\n"
224 "\n"
225 " float fspread = g_shadow_spread;\n"
226 " float flength = g_shadow_length;\n"
227 "\n"
228 " float famt = 0.0;\n"
229 " famt += shadow_sample(co+(dir+vec3(-0.56,0.55, 0.30)*fspread)*flength*0.1);\n"
230 " famt += shadow_sample(co+(dir+vec3( 0.80,0.68, 0.34)*fspread)*flength*0.2);\n"
231 " famt += shadow_sample(co+(dir+vec3( 0.78,0.07,-0.06)*fspread)*flength*0.3);\n"
232 " famt += shadow_sample(co+(dir+vec3(-0.59,0.07,-0.42)*fspread)*flength*0.4);\n"
233 "\n"
234 " //famt+=shadow_sample(co+(dir+vec3(-0.790,-0.933,-0.875)*fspread)*flength*0.5);\n"
235 " //famt+=shadow_sample(co+(dir+vec3( 0.807,-0.690, 0.472)*fspread)*flength*0.6);\n"
236 " //famt+=shadow_sample(co+(dir+vec3( 0.522,-0.379, 0.350)*fspread)*flength*0.7);\n"
237 " //famt+=shadow_sample(co+(dir+vec3( 0.483, 0.201, 0.306)*fspread)*flength*0.8);\n"
238 "\n"
239 " return 1.0 - famt;\n"
240 "}\n"
241 "\n"
242 "float newlight_specular( vec3 wnormal, vec3 dir, vec3 halfview, float exponent )\n"
243 "{\n"
244 " vec3 specdir = reflect( -dir, wnormal );\n"
245 " return pow(max(dot( halfview, specdir ), 0.0), exponent);\n"
246 "}\n"
247 "\n"
248 "vec3 scene_apply_fog( vec3 vfrag, vec3 colour, float fdist )\n"
249 "{\n"
250 " float dist = pow(fdist*0.0010,0.78);\n"
251 " return mix( vfrag, colour, min( 1.0, dist ) );\n"
252 "}\n"
253 "\n"
254 "vec3 rand33(vec3 p3)\n"
255 "{\n"
256 " p3 = fract(p3 * vec3(.1031, .1030, .0973));\n"
257 " p3 += dot(p3, p3.yxz+33.33);\n"
258 " return fract((p3.xxy + p3.yxx)*p3.zyx);\n"
259 "}\n"
260 "\n"
261 "vec3 scene_calculate_light( int light_index, \n"
262 " vec3 halfview, vec3 co, vec3 normal )\n"
263 "{\n"
264 " vec4 light_colour = texelFetch( uLightsArray, light_index+0 );\n"
265 " vec4 light_co = texelFetch( uLightsArray, light_index+1 );\n"
266 " vec4 light_dir = texelFetch( uLightsArray, light_index+2 );\n"
267 "\n"
268 " vec3 light_delta = light_co.xyz-co;\n"
269 " float dist2 = dot(light_delta,light_delta);\n"
270 "\n"
271 " light_delta = normalize( light_delta );\n"
272 "\n"
273 " float quadratic = dist2*100.0;\n"
274 " float attenuation = 1.0/( 1.0 + quadratic );\n"
275 " attenuation *= max( dot( light_delta, normal ), 0.0 );\n"
276 "\n"
277 " float falloff = max( 0.0, 1.0-(dist2*light_co.w) );\n"
278 "\n"
279 " if( light_dir.w < 0.999999 ){\n"
280 " float spot_theta = max( 0.0, dot( light_delta, -light_dir.xyz ) );\n"
281 " falloff *= max( 0.0, (spot_theta - light_dir.w) / (1.0-light_dir.w) );\n"
282 " }\n"
283 "\n"
284 " return light_colour.rgb * attenuation * falloff \n"
285 " * step( g_day_phase, light_colour.w );\n"
286 "}\n"
287 "\n"
288 "vec3 scene_calculate_packed_light_patch( uint packed_index, \n"
289 " vec3 halfview, vec3 co, vec3 normal )\n"
290 "{\n"
291 " uint light_count = packed_index & 0x3u;\n"
292 "\n"
293 " vec3 l = vec3(0.0);\n"
294 "\n"
295 " if( light_count >= 1u ){\n"
296 " int index_0 = int( ((packed_index >> 2u) & 0x3ffu) * 3u );\n"
297 " int index_1 = int( ((packed_index >> 12u) & 0x3ffu) * 3u );\n"
298 " int index_2 = int( ((packed_index >> 22u) & 0x3ffu) * 3u );\n"
299 "\n"
300 " l += scene_calculate_light( index_0, halfview, co, normal );\n"
301 "\n"
302 " if( light_count >= 2u ){\n"
303 " l += scene_calculate_light( index_1, halfview, co, normal );\n"
304 "\n"
305 " if( light_count >= 3u ){\n"
306 " l += scene_calculate_light( index_2, halfview, co, normal );\n"
307 " }\n"
308 " }\n"
309 " }\n"
310 "\n"
311 " return l;\n"
312 "}\n"
313 "\n"
314 "vec3 world_compute_lighting( vec3 diffuse, vec3 normal, vec3 co,\n"
315 " float light_mask )\n"
316 "{\n"
317 " if( g_light_preview == 1 )\n"
318 " diffuse = vec3(0.75);\n"
319 "\n"
320 " // Lighting\n"
321 " vec3 halfview = uCamera - co;\n"
322 " float fdist = length(halfview);\n"
323 " halfview /= fdist;\n"
324 "\n"
325 " float world_shadow = newlight_compute_sun_shadow( \n"
326 " co, g_sun_dir.xyz * (1.0/(max(g_sun_dir.y,0.0)+0.2)) );\n"
327 "\n"
328 " vec3 total_light = clearskies_lighting( \n"
329 " normal, min( light_mask, world_shadow ), halfview );\n"
330 "\n"
331 " vec3 cube_coord = (co - g_cube_min.xyz) * g_cube_inv_range.xyz;\n"
332 " cube_coord = floor( cube_coord );\n"
333 "\n"
334 " if( g_debug_indices == 1 )\n"
335 " {\n"
336 " return rand33(cube_coord);\n"
337 " }\n"
338 "\n"
339 " if( g_debug_complexity == 1 )\n"
340 " {\n"
341 " ivec3 coord = ivec3( cube_coord );\n"
342 " uvec4 index_sample = texelFetch( uLightsIndex, coord, 0 );\n"
343 "\n"
344 " uint light_count = (index_sample.x & 0x3u) + (index_sample.y & 0x3u);\n"
345 " return vec3( float(light_count)*(1.0/6.0), 0.0, 0.5 );\n"
346 " }\n"
347 "\n"
348 " // FIXME: this coord should absolutely must be clamped!\n"
349 " \n"
350 " ivec3 coord = ivec3( cube_coord );\n"
351 " uvec4 index_sample = texelFetch( uLightsIndex, coord, 0 );\n"
352 "\n"
353 " total_light += \n"
354 " scene_calculate_packed_light_patch( index_sample.x,\n"
355 " halfview, co, normal ) \n"
356 " * light_mask;\n"
357 " total_light += \n"
358 " scene_calculate_packed_light_patch( index_sample.y,\n"
359 " halfview, co, normal )\n"
360 " * light_mask;\n"
361 "\n"
362 " // Take a section of the sky function to give us a matching fog colour\n"
363 "\n"
364 " vec3 fog_colour = clearskies_ambient( -halfview );\n"
365 " float sun_theta = dot( -halfview, g_sun_dir.xyz );\n"
366 " float sun_size = max( 0.0, sun_theta * 0.5 + 0.5 );\n"
367 " float sun_shape = sun_size * max(g_sun_dir.y,0.0) * 0.5;\n"
368 " \n"
369 " vec3 sun_colour = mix( vec3(1.0), g_sunset_colour.rgb, g_sunset_phase*0.5 );\n"
370 " sun_colour *= sun_shape;\n"
371 "\n"
372 " fog_colour += sun_colour;\n"
373 " return scene_apply_fog( diffuse * total_light, fog_colour, fdist );\n"
374 "}\n"
375 "\n"
376 "#line 9 0 \n"
377 "\n"
378 "float sdLine( vec3 p, vec3 a, vec3 b )\n"
379 "{\n"
380 " vec3 pa = p - a;\n"
381 " vec3 ba = b - a;\n"
382 "\n"
383 " float h = clamp( dot(pa,ba)/dot(ba,ba), 0.0, 1.0 );\n"
384 " return length( pa - ba*h );\n"
385 "}\n"
386 "\n"
387 "float compute_board_shadow()\n"
388 "{\n"
389 " // player shadow\n"
390 " float dist_to_player = max( 0.0, sdLine( aWorldCo, g_board_0.xyz,\n"
391 " g_board_1.xyz )-0.1 );\n"
392 " float player_shadow = max( 1.0-dist_to_player*2.7, 0.0 );\n"
393 " player_shadow *= player_shadow*player_shadow*player_shadow;\n"
394 "\n"
395 " return 1.0 - player_shadow*0.8;\n"
396 "}\n"
397 "\n"
398 "vec3 scene_compute_lighting( vec3 diffuse, vec3 normal, vec3 co )\n"
399 "{\n"
400 " return world_compute_lighting( diffuse, normal, co, compute_board_shadow() );\n"
401 "}\n"
402 "\n"
403 "#line 7 0 \n"
404 "#line 1 2 \n"
405 "const float k_motion_lerp_amount = 0.01;\n"
406 "\n"
407 "#line 2 0 \n"
408 "\n"
409 "layout (location = 1) out vec2 oMotionVec;\n"
410 "\n"
411 "in vec3 aMotionVec0;\n"
412 "in vec3 aMotionVec1;\n"
413 "\n"
414 "void compute_motion_vectors()\n"
415 "{\n"
416 " // Write motion vectors\n"
417 " vec2 vmotion0 = aMotionVec0.xy / aMotionVec0.z;\n"
418 " vec2 vmotion1 = aMotionVec1.xy / aMotionVec1.z;\n"
419 "\n"
420 " oMotionVec = (vmotion1-vmotion0) * (1.0/k_motion_lerp_amount);\n"
421 "}\n"
422 "\n"
423 "#line 8 0 \n"
424 "\n"
425 "void main()\n"
426 "{\n"
427 " compute_motion_vectors();\n"
428 "\n"
429 " vec3 vfrag = vec3(0.5,0.5,0.5);\n"
430 " vec4 vsamplemain = texture( uTexMain, aUv );\n"
431 " vec3 qnorm = aNorm.xyz;\n"
432 "\n"
433 " vfrag = vsamplemain.rgb;\n"
434 "\n"
435 " if( g_light_preview == 1 )\n"
436 " {\n"
437 " vfrag = vec3(0.5);\n"
438 " }\n"
439 "\n"
440 " vfrag = scene_compute_lighting( vfrag, qnorm, aWorldCo );\n"
441 " oColour = vec4( vfrag, 1.0 );\n"
442 "}\n"
443 ""},
444 };
445
446 static GLuint _uniform_scene_standard_uMdl;
447 static GLuint _uniform_scene_standard_uPv;
448 static GLuint _uniform_scene_standard_uPvmPrev;
449 static GLuint _uniform_scene_standard_uTexGarbage;
450 static GLuint _uniform_scene_standard_uTexMain;
451 static GLuint _uniform_scene_standard_uCamera;
452 static GLuint _uniform_scene_standard_uPlane;
453 static GLuint _uniform_scene_standard_g_world_depth;
454 static GLuint _uniform_scene_standard_uLightsArray;
455 static GLuint _uniform_scene_standard_uLightsIndex;
456 static void shader_scene_standard_uMdl(m4x3f m){
457 glUniformMatrix4x3fv(_uniform_scene_standard_uMdl,1,GL_FALSE,(float*)m);
458 }
459 static void shader_scene_standard_uPv(m4x4f m){
460 glUniformMatrix4fv(_uniform_scene_standard_uPv,1,GL_FALSE,(float*)m);
461 }
462 static void shader_scene_standard_uPvmPrev(m4x4f m){
463 glUniformMatrix4fv(_uniform_scene_standard_uPvmPrev,1,GL_FALSE,(float*)m);
464 }
465 static void shader_scene_standard_uTexGarbage(int i){
466 glUniform1i(_uniform_scene_standard_uTexGarbage,i);
467 }
468 static void shader_scene_standard_uTexMain(int i){
469 glUniform1i(_uniform_scene_standard_uTexMain,i);
470 }
471 static void shader_scene_standard_uCamera(v3f v){
472 glUniform3fv(_uniform_scene_standard_uCamera,1,v);
473 }
474 static void shader_scene_standard_uPlane(v4f v){
475 glUniform4fv(_uniform_scene_standard_uPlane,1,v);
476 }
477 static void shader_scene_standard_g_world_depth(int i){
478 glUniform1i(_uniform_scene_standard_g_world_depth,i);
479 }
480 static void shader_scene_standard_register(void){
481 vg_shader_register( &_shader_scene_standard );
482 }
483 static void shader_scene_standard_use(void){ glUseProgram(_shader_scene_standard.id); }
484 static void shader_scene_standard_link(void){
485 _uniform_scene_standard_uMdl = glGetUniformLocation( _shader_scene_standard.id, "uMdl" );
486 _uniform_scene_standard_uPv = glGetUniformLocation( _shader_scene_standard.id, "uPv" );
487 _uniform_scene_standard_uPvmPrev = glGetUniformLocation( _shader_scene_standard.id, "uPvmPrev" );
488 _uniform_scene_standard_uTexGarbage = glGetUniformLocation( _shader_scene_standard.id, "uTexGarbage" );
489 _uniform_scene_standard_uTexMain = glGetUniformLocation( _shader_scene_standard.id, "uTexMain" );
490 _uniform_scene_standard_uCamera = glGetUniformLocation( _shader_scene_standard.id, "uCamera" );
491 _uniform_scene_standard_uPlane = glGetUniformLocation( _shader_scene_standard.id, "uPlane" );
492 _uniform_scene_standard_g_world_depth = glGetUniformLocation( _shader_scene_standard.id, "g_world_depth" );
493 _uniform_scene_standard_uLightsArray = glGetUniformLocation( _shader_scene_standard.id, "uLightsArray" );
494 _uniform_scene_standard_uLightsIndex = glGetUniformLocation( _shader_scene_standard.id, "uLightsIndex" );
495 }
496 #endif /* SHADER_scene_standard_H */