+/*
+ * BVH implementation
+ * ----------------------------------------------------------------------------
+ */
+
+static void
+entity_bh_expand_bound( void *user, boxf bound, u32 item_index ){
+ world_instance *world = user;
+
+ u32 id = world->entity_list[ item_index ],
+ type = mdl_entity_id_type( id ),
+ index = mdl_entity_id_id( id );
+
+ if( type == k_ent_gate ){
+ ent_gate *gate = mdl_arritm( &world->ent_gate, index );
+ boxf box = {{ -gate->dimensions[0], -gate->dimensions[1], -0.1f },
+ { gate->dimensions[0], gate->dimensions[1], 0.1f }};
+
+ m4x3_expand_aabb_aabb( gate->to_world, bound, box );
+ }
+ else if( type == k_ent_objective ){
+ ent_objective *objective = mdl_arritm( &world->ent_objective, index );
+
+ /* TODO: This might be more work than necessary. could maybe just get
+ * away with representing them as points */
+
+ boxf box;
+ box_init_inf( box );
+
+ for( u32 i=0; i<objective->submesh_count; i++ ){
+ mdl_submesh *sm = mdl_arritm( &world->meta.submeshs,
+ objective->submesh_start+i );
+ box_concat( box, sm->bbx );
+ }
+
+ m4x3f transform;
+ mdl_transform_m4x3( &objective->transform, transform );
+ m4x3_expand_aabb_aabb( transform, bound, box );
+ }
+ else if( type == k_ent_volume ){
+ ent_volume *volume = mdl_arritm( &world->ent_volume, index );
+ m4x3_expand_aabb_aabb( volume->to_world, bound,
+ (boxf){{-1.0f,-1.0f,-1.0f},{ 1.0f, 1.0f, 1.0f}} );
+ }
+ else if( type == k_ent_challenge ){
+ ent_challenge *challenge = mdl_arritm( &world->ent_challenge, index );
+
+ boxf box = {{-1.2f*0.5f,-0.72f*0.5f,-0.01f*0.5f},
+ { 1.2f*0.5f, 0.72f*0.5f, 0.01f*0.5f}};
+ m4x3f transform;
+ mdl_transform_m4x3( &challenge->transform, transform );
+ m4x3_expand_aabb_aabb( transform, bound, box );
+ }
+ else{
+ vg_fatal_error( "Programming error\n" );
+ }
+}
+
+static float entity_bh_centroid( void *user, u32 item_index, int axis ){
+ world_instance *world = user;
+
+ u32 id = world->entity_list[ item_index ],
+ type = mdl_entity_id_type( id ),
+ index = mdl_entity_id_id( id );
+
+ if( type == k_ent_gate ){
+ ent_gate *gate = mdl_arritm( &world->ent_gate, index );
+ return gate->to_world[3][axis];
+ }
+ else if( type == k_ent_objective ){
+ ent_objective *objective = mdl_arritm( &world->ent_objective, index );
+ return objective->transform.co[axis];
+ }
+ else if( type == k_ent_volume ){
+ ent_volume *volume = mdl_arritm( &world->ent_volume, index );
+ return volume->transform.co[axis];
+ }
+ else if( type == k_ent_challenge ){
+ ent_challenge *challenge = mdl_arritm( &world->ent_challenge, index );
+ return challenge->transform.co[axis];
+ }
+ else {
+ vg_fatal_error( "Programming error\n" );
+ return INFINITY;
+ }
+}
+
+static void entity_bh_swap( void *user, u32 ia, u32 ib ){
+ world_instance *world = user;
+
+ u32 a = world->entity_list[ ia ],
+ b = world->entity_list[ ib ];
+
+ world->entity_list[ ia ] = b;
+ world->entity_list[ ib ] = a;
+}
+
+static void entity_bh_debug( void *user, u32 item_index ){
+ world_instance *world = user;
+
+ u32 id = world->entity_list[ item_index ],
+ type = mdl_entity_id_type( id ),
+ index = mdl_entity_id_id( id );
+
+ if( type == k_ent_gate ){
+ ent_gate *gate = mdl_arritm( &world->ent_gate, index );
+ boxf box = {{ -gate->dimensions[0], -gate->dimensions[1], -0.1f },
+ { gate->dimensions[0], gate->dimensions[1], 0.1f }};
+ vg_line_boxf_transformed( gate->to_world, box, 0xf000ff00 );
+ }
+ else if( type == k_ent_objective ){
+ ent_objective *objective = mdl_arritm( &world->ent_objective, index );
+ boxf box;
+ box_init_inf( box );
+
+ for( u32 i=0; i<objective->submesh_count; i++ ){
+ mdl_submesh *sm = mdl_arritm( &world->meta.submeshs,
+ objective->submesh_start+i );
+ box_concat( box, sm->bbx );
+ }
+
+ m4x3f transform;
+ mdl_transform_m4x3( &objective->transform, transform );
+ vg_line_boxf_transformed( transform, box, 0xf000ff00 );
+ }
+ else if( type == k_ent_volume ){
+ ent_volume *volume = mdl_arritm( &world->ent_volume, index );
+ vg_line_boxf_transformed( volume->to_world,
+ (boxf){{-1.0f,-1.0f,-1.0f},{ 1.0f, 1.0f, 1.0f}},
+ 0xf000ff00 );
+ }
+ else if( type == k_ent_challenge ){
+ ent_challenge *challenge = mdl_arritm( &world->ent_challenge, index );
+
+ boxf box = {{-1.2f*0.5f,-0.72f*0.5f,-0.01f*0.5f},
+ { 1.2f*0.5f, 0.72f*0.5f, 0.01f*0.5f}};
+ m4x3f transform;
+ mdl_transform_m4x3( &challenge->transform, transform );
+ vg_line_boxf_transformed( transform, box, 0xf0ff0000 );
+ }
+ else{
+ vg_fatal_error( "Programming error\n" );
+ }
+}
+
+static void entity_bh_closest( void *user, u32 item_index, v3f point,
+ v3f closest ){
+ world_instance *world = user;
+
+ u32 id = world->entity_list[ item_index ],
+ type = mdl_entity_id_type( id ),
+ index = mdl_entity_id_id( id );
+
+ if( type == k_ent_gate ){
+ ent_gate *gate = mdl_arritm( &world->ent_gate, index );
+ v3_copy( gate->to_world[3], closest );
+ }
+ else if( type == k_ent_objective ){
+ ent_objective *challenge = mdl_arritm( &world->ent_objective, index );
+ v3_copy( challenge->transform.co, closest );
+ }
+ else if( type == k_ent_volume ){
+ ent_volume *volume = mdl_arritm( &world->ent_volume, index );
+ v3_copy( volume->to_world[3], closest );
+ }
+ else if( type == k_ent_challenge ){
+ ent_challenge *challenge = mdl_arritm( &world->ent_challenge, index );
+ v3_copy( challenge->transform.co, closest );
+ }
+ else{
+ vg_fatal_error( "Programming error\n" );
+ }
+}
+
+static void world_entity_start( world_instance *world, vg_msg *sav ){
+ vg_info( "Start instance %p\n", world );
+
+ world->probabilities[ k_probability_curve_constant ] = 1.0f;
+ for( u32 i=0; i<mdl_arrcount(&world->ent_audio); i++ ){
+ ent_audio *audio = mdl_arritm(&world->ent_audio,i);
+ if( audio->flags & AUDIO_FLAG_AUTO_START ){
+ ent_call call;
+ call.data = NULL;
+ call.function = k_ent_function_trigger;
+ call.id = mdl_entity_id( k_ent_audio, i );
+ entity_call( world, &call );
+ }
+ }
+
+ /* read savedata
+ * ----------------------------------------------------------------------- */
+
+ for( u32 i=0; i<mdl_arrcount(&world->ent_challenge); i++ ){
+ ent_challenge *challenge = mdl_arritm( &world->ent_challenge, i );
+ const char *alias = mdl_pstr( &world->meta, challenge->pstr_alias );
+
+ if( vg_msg_getkvu32( sav, alias, 0 ) ){
+ ent_call call;
+ call.data = NULL;
+ call.function = 0;
+ call.id = mdl_entity_id( k_ent_challenge, i );
+ entity_call( world, &call );
+ }
+ }
+
+ vg_msg routes_block = *sav;
+ if( vg_msg_seekframe( &routes_block, "routes" ) ){
+ for( u32 i=0; i<mdl_arrcount(&world->ent_route); i++ ){
+ ent_route *route = mdl_arritm( &world->ent_route, i );
+
+ vg_msg route_info = routes_block;
+ if( vg_msg_seekframe( &route_info,
+ mdl_pstr(&world->meta,route->pstr_name) ) ){
+ route->flags |= vg_msg_getkvu32( &route_info, "flags", 0 );
+ route->best_laptime =
+ vg_msg_getkvf64( &route_info, "best_laptime", 0.0 );
+
+ f32 sections[ route->checkpoints_count ];
+ vg_msg_cmd cmd;
+ if( vg_msg_getkvcmd( &route_info, "sections", &cmd ) ){
+ vg_msg_cast( cmd.value, cmd.code, sections,
+ k_vg_msg_f32 |
+ vg_msg_count_bits(route->checkpoints_count) );
+ }
+ else{
+ for( u32 j=0; j<route->checkpoints_count; j ++ )
+ sections[j] = 0.0f;
+ }
+
+ for( u32 j=0; j<route->checkpoints_count; j ++ ){
+ ent_checkpoint *cp = mdl_arritm( &world->ent_checkpoint,
+ route->checkpoints_start + j );
+
+ cp->best_time = sections[j];
+ }
+ }
+ }
+ }
+
+ ent_region_re_eval( world );
+}
+
+static void world_entity_serialize( world_instance *world, vg_msg *sav ){
+ for( u32 i=0; i<mdl_arrcount(&world->ent_challenge); i++ ){
+ ent_challenge *challenge = mdl_arritm(&world->ent_challenge,i);
+
+ const char *alias = mdl_pstr(&world->meta,challenge->pstr_alias);
+ vg_msg_wkvu32( sav, alias, challenge->status );
+ }
+
+ if( mdl_arrcount(&world->ent_route) ){
+ vg_msg_frame( sav, "routes" );
+ for( u32 i=0; i<mdl_arrcount(&world->ent_route); i++ ){
+ ent_route *route = mdl_arritm( &world->ent_route, i );
+
+ vg_msg_frame( sav, mdl_pstr( &world->meta, route->pstr_name ) );
+ {
+ vg_msg_wkvu32( sav, "flags", route->flags );
+ vg_msg_wkvf64( sav, "best_laptime", route->best_laptime );
+
+ f32 sections[ route->checkpoints_count ];
+
+ for( u32 j=0; j<route->checkpoints_count; j ++ ){
+ ent_checkpoint *cp = mdl_arritm( &world->ent_checkpoint,
+ route->checkpoints_start + j );
+
+ sections[j] = cp->best_time;
+ }
+
+ vg_msg_wkvnum( sav, "sections", k_vg_msg_f32,
+ route->checkpoints_count, sections );
+ }
+ vg_msg_end_frame( sav );
+ }
+ vg_msg_end_frame( sav );
+ }
+}
+