- /* water rendering */
- struct{
- struct framebuffer fbreflect, fbdepth;
- }
- water;
-
- /* split flap display */
- struct{
- glmesh mesh_base, mesh_display;
- mdl_submesh sm_base;
- u32 active_route_board;
- scene_context scene;
-
- u32 w, h;
- float *buffer;
- }
- sfd;
-
- v3f render_gate_pos;
- int in_volume;
-
- world_instance worlds[4];
- u32 active_world;
-
- /* text particles */
- font3d font;
-
- struct timer_text{
- char text[8];
- m4x3f transform;
- ent_gate *gate;
- ent_route *route;
- }
- timer_texts[4];
- u32 timer_text_count;
-
- struct text_particle{
- rb_object obj;
- m4x3f mlocal;
- ent_glyph *glyph;
- v4f colour;
-
- m4x3f mdl;
- }
- text_particles[6*4];
- u32 text_particle_count;
-}
-static world_global;
-VG_STATIC void entity_call( world_instance *world, ent_call *call );
-
-VG_STATIC world_instance *get_active_world( void )
-{
- return &world_global.worlds[ world_global.active_world ];
-}
-
-/*
- * API
- */
-
-VG_STATIC
-int ray_hit_is_ramp( world_instance *world, ray_hit *hit );
-
-VG_STATIC
-struct world_surface *ray_hit_surface( world_instance *world, ray_hit *hit );
-
-VG_STATIC
-void ray_world_get_tri( world_instance *world, ray_hit *hit, v3f tri[3] );
-
-VG_STATIC
-int ray_world( world_instance *world, v3f pos, v3f dir, ray_hit *hit );
-
-VG_STATIC
-ent_spawn *world_find_closest_spawn( world_instance *world, v3f position )
-{
- ent_spawn *rp = NULL, *r;
- float min_dist = INFINITY;
-
- for( u32 i=0; i<mdl_arrcount(&world->ent_spawn); i++ ){
- r = mdl_arritm( &world->ent_spawn, i );
- float d = v3_dist2( r->transform.co, position );
-
- if( d < min_dist ){
- min_dist = d;
- rp = r;
- }
- }
-
- if( !rp ){
- if( mdl_arrcount(&world->ent_spawn) ){
- vg_warn( "Invalid distances to spawns.. defaulting to first one.\n" );
- return mdl_arritm( &world->ent_spawn, 0 );
- }
- else{
- vg_error( "There are no spawns in the level!\n" );
- }
- }
-
- return rp;
-}
-
-VG_STATIC
-ent_spawn *world_find_spawn_by_name( world_instance *world, const char *name )
-{
- ent_spawn *rp = NULL, *r;
- for( u32 i=0; i<mdl_arrcount(&world->ent_spawn); i++ ){
- r = mdl_arritm( &world->ent_spawn, i );
- if( !strcmp( mdl_pstr(&world->meta, r->pstr_name), name ) ){
- rp = r;
- break;
- }
- }
-
- if( !rp )
- vg_warn( "No spawn named '%s'\n", name );
-
- return rp;
-}
-
-/*
- * Submodules
- */
-
-VG_STATIC float
- k_day_length = 30.0f; /* minutes */
-
-VG_STATIC int k_debug_light_indices = 0,
- k_debug_light_complexity = 0,
- k_light_preview = 0;
-
-#include "world_routes.h"
-#include "world_sfd.h"
-#include "world_render.h"
-#include "world_water.h"
-#include "world_volumes.h"
-#include "world_gen.h"
-#include "world_gate.h"
-
-/*
- * -----------------------------------------------------------------------------
- * Events
- * -----------------------------------------------------------------------------
- */
-
-VG_STATIC int world_stop_sound( int argc, const char *argv[] )
-{
- world_instance *world = get_active_world();
- return 0;
-}
-
-VG_STATIC void world_init(void)
-{
- VG_VAR_F32( k_day_length );
- VG_VAR_I32( k_debug_light_indices );
- VG_VAR_I32( k_debug_light_complexity );
- VG_VAR_I32( k_light_preview );
-
- world_global.sky_rate = 1.0;
- world_global.sky_target_rate = 1.0;
-
- shader_scene_standard_register();
- shader_scene_standard_alphatest_register();
- shader_scene_vertex_blend_register();
- shader_scene_terrain_register();
- shader_scene_depth_register();
- shader_scene_position_register();
-
- shader_model_sky_register();
-
- vg_info( "Loading world resources\n" );
-
- vg_linear_clear( vg_mem.scratch );
-
- mdl_context msky;
- mdl_open( &msky, "models/rs_skydome.mdl", vg_mem.scratch );
- mdl_load_metadata_block( &msky, vg_mem.scratch );
- mdl_async_load_glmesh( &msky, &world_global.skydome );
- mdl_close( &msky );
-
- /* Other systems */
- vg_info( "Loading other world systems\n" );
-
- vg_loader_step( world_render_init, NULL );
- vg_loader_step( world_sfd_init, NULL );
- vg_loader_step( world_water_init, NULL );
- vg_loader_step( world_gates_init, NULL );
- vg_loader_step( world_routes_init, NULL );
-
- /* Allocate dynamic world memory arena */
- u32 max_size = 76*1024*1024;
- world_global.heap = vg_create_linear_allocator( vg_mem.rtmemory, max_size,
- VG_MEMORY_SYSTEM );
-}
-
-VG_STATIC void ent_volume_call( world_instance *world, ent_call *call )
-{
- u32 index = mdl_entity_id_id( call->id );
- ent_volume *volume = mdl_arritm( &world->ent_volume, index );
- if( !volume->target ) return;
-
- if( call->function == k_ent_function_trigger ){
- call->id = volume->target;
-
- if( volume->type == k_volume_subtype_particle ){
- float *co = alloca( sizeof(float)*3 );
- co[0] = vg_randf64()*2.0f-1.0f;
- co[1] = vg_randf64()*2.0f-1.0f;
- co[2] = vg_randf64()*2.0f-1.0f;
- m4x3_mulv( volume->to_world, co, co );
-
- call->function = k_ent_function_particle_spawn;
- call->data = co;
- entity_call( world, call );
- }
- else{
- entity_call( world, call );
- }
- }
-}
-
-VG_STATIC void ent_audio_call( world_instance *world, ent_call *call )
-{
- if( world->status == k_world_status_unloading ){
- vg_warn( "cannot modify audio while unloading world\n" );
- return;
- }
-
- u8 world_id = (world - world_global.worlds) + 1;
- u32 index = mdl_entity_id_id( call->id );
- ent_audio *audio = mdl_arritm( &world->ent_audio, index );
-
- v3f sound_co;
-
- if( call->function == k_ent_function_particle_spawn ){
- v3_copy( call->data, sound_co );
- }
- else if( call->function == k_ent_function_trigger ){
- v3_copy( audio->transform.co, sound_co );
- }
- else
- vg_fatal_error( "ent_audio_call (invalid function id)" );
-
- float chance = vg_randf64()*100.0f,
- bar = 0.0f;
-
- for( u32 i=0; i<audio->clip_count; i++ ){
- ent_audio_clip *clip = mdl_arritm( &world->ent_audio_clip,
- audio->clip_start+i );
-
- float mod = world->probabilities[ audio->probability_curve ],
- p = clip->probability * mod;
-
- bar += p;
-
- if( chance < bar ){
- audio_lock();
-
- if( audio->behaviour == k_channel_behaviour_unlimited ){
- audio_oneshot_3d( &clip->clip, sound_co,
- audio->transform.s[0],
- audio->volume );
- }
- else if( audio->behaviour == k_channel_behaviour_discard_if_full ){
- audio_channel *ch =
- audio_get_group_idle_channel( audio->group,
- audio->max_channels );
-
- if( ch ){
- audio_channel_init( ch, &clip->clip, audio->flags );
- audio_channel_group( ch, audio->group );
- audio_channel_world( ch, world_id );
- audio_channel_set_spacial( ch, sound_co, audio->transform.s[0] );
- audio_channel_edit_volume( ch, audio->volume, 1 );
- ch = audio_relinquish_channel( ch );
- }
- }
- else if( audio->behaviour == k_channel_behaviour_crossfade_if_full){
- audio_channel *ch =
- audio_get_group_idle_channel( audio->group,
- audio->max_channels );
-
- /* group is full */
- if( !ch ){
- audio_channel *existing =
- audio_get_group_first_active_channel( audio->group );
-
- if( existing ){
- if( existing->source == &clip->clip ){
- audio_unlock();
- return;
- }
-
- existing->group = 0;
- existing = audio_channel_fadeout(existing, audio->crossfade);
- }
-
- ch = audio_get_first_idle_channel();
- }
-
- if( ch ){
- audio_channel_init( ch, &clip->clip, audio->flags );
- audio_channel_group( ch, audio->group );
- audio_channel_world( ch, world_id );
- audio_channel_fadein( ch, audio->crossfade );
- ch = audio_relinquish_channel( ch );
- }
- }
-
- audio_unlock();
- return;
- }
- }
-}
-
-/* finds any active playing in world and fades them out, we can only do this
- * while unloading */
-VG_STATIC void world_fadeout_audio( world_instance *world )
-{
- if( world->status != k_world_status_unloading ){
- vg_fatal_error( "World status must be set to 'unloading', to fadeout"
- " audio.\n" );
- }
-
- u8 world_id = (world - world_global.worlds) + 1;
-
- audio_lock();
- for( u32 i=0; i<AUDIO_CHANNELS; i++ ){
- audio_channel *ch = &vg_audio.channels[i];
-
- if( ch->allocated && (ch->world_id == world_id) ){
- ch = audio_channel_fadeout( ch, 1.0f );
- }
- }
- audio_unlock();
-}
-
-VG_STATIC void world_update( world_instance *world, v3f pos )
-{
- world_global.sky_time += world_global.sky_rate * vg.time_delta;
- world_global.sky_rate = vg_lerp( world_global.sky_rate,
- world_global.sky_target_rate,
- vg.time_delta * 5.0 );
-
- world_routes_update_timer_texts( world );
- world_routes_update( world );
- //world_routes_debug( world );
-
- /* ---- traffic -------- */
-
- for( u32 i=0; i<mdl_arrcount( &world->ent_traffic ); i++ ){
- ent_traffic *traffic = mdl_arritm( &world->ent_traffic, i );
-
- u32 i1 = traffic->index,
- i0,
- i2 = i1+1;
-
- if( i1 == 0 ) i0 = traffic->node_count-1;
- else i0 = i1-1;
-
- if( i2 >= traffic->node_count ) i2 = 0;
-
- i0 += traffic->start_node;
- i1 += traffic->start_node;
- i2 += traffic->start_node;
-
- v3f h[3];
-
- ent_route_node *rn0 = mdl_arritm( &world->ent_route_node, i0 ),
- *rn1 = mdl_arritm( &world->ent_route_node, i1 ),
- *rn2 = mdl_arritm( &world->ent_route_node, i2 );
-
- v3_copy( rn1->co, h[1] );
- v3_lerp( rn0->co, rn1->co, 0.5f, h[0] );
- v3_lerp( rn1->co, rn2->co, 0.5f, h[2] );
-
- float const k_sample_dist = 0.0025f;
- v3f pc, pd;
- eval_bezier3( h[0], h[1], h[2], traffic->t, pc );
- eval_bezier3( h[0], h[1], h[2], traffic->t+k_sample_dist, pd );
-
- v3f v0;
- v3_sub( pd, pc, v0 );
- float length = vg_maxf( 0.0001f, v3_length( v0 ) );
- v3_muls( v0, 1.0f/length, v0 );
-
- float mod = k_sample_dist / length;
-
- traffic->t += traffic->speed * vg.time_delta * mod;
-
- if( traffic->t > 1.0f ){
- traffic->t -= 1.0f;
-
- if( traffic->t > 1.0f ) traffic->t = 0.0f;
-
- traffic->index ++;
-
- if( traffic->index >= traffic->node_count )
- traffic->index = 0;
- }
-
- v3_copy( pc, traffic->transform.co );
-
- float a = atan2f( -v0[0], v0[2] );
- q_axis_angle( traffic->transform.q, (v3f){0.0f,1.0f,0.0f}, -a );
-
- vg_line_pt3( traffic->transform.co, 0.3f, VG__BLUE );
- }
-
- /* ---- SFD ------------ */
-
- if( mdl_arrcount( &world->ent_route ) ){
- u32 closest = 0;
- float min_dist = INFINITY;
-
- for( u32 i=0; i<mdl_arrcount( &world->ent_route ); i++ ){
- ent_route *route = mdl_arritm( &world->ent_route, i );
- float dist = v3_dist2( route->board_transform[3], pos );
-
- if( dist < min_dist ){
- min_dist = dist;
- closest = i;
- }
- }
-
- if( (world_global.sfd.active_route_board != closest)
- || network_scores_updated )
- {
- network_scores_updated = 0;
- world_global.sfd.active_route_board = closest;
-
- ent_route *route = mdl_arritm( &world->ent_route, closest );
- u32 id = route->official_track_id;
-
- if( id != 0xffffffff ){
- struct netmsg_board *local_board =
- &scoreboard_client_data.boards[id];
-
- for( int i=0; i<13; i++ ){
- sfd_encode( i, &local_board->data[27*i] );
- }
- }else{
- sfd_encode( 0, mdl_pstr( &world->meta, route->pstr_name ) );
- sfd_encode( 1, "No data" );
- }
- }
- }
- sfd_update();
-
- static float random_accum = 0.0f;
- random_accum += vg.time_delta;