nonlocal stuff again
[carveJwlIkooP6JGAAIwe30JlM.git] / world_routes.h
index 4c198e1a429a23001ed299045790297353e96575..66a4fa5c022bfd0154fc91a7f0f3086251b7cd18 100644 (file)
+/*
+ * Copyright (C) 2021-2023 Mt.ZERO Software, Harry Godden - All Rights Reserved
+ */
+
 #ifndef ROUTES_H
 #define ROUTES_H
 
-#include "common.h"
-#include "model.h"
-#include "gate.h"
+#include <time.h>
+#include "world.h"
+#include "world_gate.h"
+#include "font.h"
 
+#if 0
 #include "shaders/vblend.h"
-#include "shaders/route.h"
+#endif
+
+#include "shaders/scene_route.h"
+#include "shaders/routeui.h"
+
 
-struct subworld_routes
+VG_STATIC 
+void world_routes_local_set_record( world_instance *world, ent_route *route,
+                                    double lap_time )
 {
-   struct route_node
-   {
-      v3f co, right, up, h;
-      u32 next[2];
+   vg_success( "  NEW LAP TIME: %f\n", lap_time );
+
+   if( route->official_track_id != 0xffffffff ){
+      double time_centiseconds = lap_time * 100.0;
+      if( time_centiseconds > (float)0xfffe )   /* skill issue */
+         return;
+
+      highscore_record temp;
+      temp.trackid  = route->official_track_id;
+      temp.datetime = time(NULL);
+      temp.playerid = 0;
+      temp.points   = 0;
+      temp.time     = time_centiseconds;
+
+#if 0
+      highscores_push_record( &temp );
+#endif
+
+      struct track_info *ti = &track_infos[ route->official_track_id ];
+      ti->push = 1;
+      
+      if( ti->achievement_id ){
+#if 0
+         steam_set_achievement( ti->achievement_id );
+         steam_store_achievements();
+#endif
+      }
+   }
+   else{
+      vg_warn( "There is no associated track for this record...\n" );
+   }
+}
 
-      u32 is_gate, gate_id, current_refs, ref_count;
-      u32 route_ids[4];    /* Gates can be linked into up to four routes */
+
+VG_STATIC void world_routes_clear( world_instance *world )
+{
+   for( u32 i=0; i<mdl_arrcount( &world->ent_route ); i++ ){
+      ent_route *route = mdl_arritm( &world->ent_route, i );
+      route->active_checkpoint = 0xffff;
    }
-   *nodes;
 
-   u32 node_count,
-       node_cap;
+   for( u32 i=0; i<mdl_arrcount( &world->ent_gate ); i++ ){
+      ent_gate *rg = mdl_arritm( &world->ent_gate, i );
+      rg->timing_version = 0;
+      rg->timing_time = 0.0;
+   }
 
-   struct route
-   {
-      const char *name;
-      v4f colour;
+   world_global.current_run_version += 4;
+   world_global.last_use = 0.0;
+}
+
+VG_STATIC void world_routes_time_lap( world_instance *world, ent_route *route )
+{
+   vg_info( "------- time lap %s -------\n", 
+            mdl_pstr(&world->meta,route->pstr_name) );
 
-      u32 start;
-      mdl_submesh sm;
+   double start_time = 0.0;
+   u32 last_version=0;
 
-      int active;
-      float factive;
+   u32 valid_count=0;
+
+   for( u32 i=0; i<route->checkpoints_count; i++ ){
+      u32 cpid  = (i+route->active_checkpoint) % route->checkpoints_count;
+          cpid += route->checkpoints_start;
+
+      ent_checkpoint *cp = mdl_arritm( &world->ent_checkpoint, cpid );
+      ent_gate *rg = mdl_arritm( &world->ent_gate, cp->gate_index );
+                rg = mdl_arritm( &world->ent_gate, rg->target );
+
+      if( i == 1 ){
+         route->timing_base = rg->timing_time;
+      }
+
+      if( i == 0 )
+         start_time = rg->timing_time;
+      else{
+         if( last_version+1 == rg->timing_version ) valid_count ++;
+         else valid_count = 0;
+      }
+
+      last_version = rg->timing_version;
+      vg_info( "%u %f\n", rg, rg->timing_version, rg->timing_time );
    }
-   *routes;
 
-   u32 route_count,
-       route_cap;
+   if( world_global.current_run_version == last_version+1 ){
+      valid_count ++;
 
-   struct route_gate
-   {
-      teleport_gate gate;
-      
-      u32 route_count,
-          node_id;
+      if( route->checkpoints_count == 1 ){
+         route->timing_base = world_global.time;
+      }
    }
-   *gates;
+   else valid_count = 0;
 
-   u32 gate_count,
-       gate_cap;
+   vg_info( "%u %f\n", world_global.current_run_version, world_global.time );
 
-   u32 active_gate;
+   if( valid_count==route->checkpoints_count ){
+      double lap_time = world_global.time - start_time;
+      world_routes_local_set_record( world, route, lap_time );
+   }
 
-   scene scene_lines;
-};
+   route->valid_checkpoints = valid_count+1;
 
-static struct subworld_routes *subworld_routes(void);
+   vg_info( "valid: %u\n", valid_count );
+   vg_info( "----------------------------\n" );
+}
 
-static void debug_sbpath( struct route_node *rna, struct route_node *rnb,
-                          u32 colour, float xoffset )
+/*
+ * When going through a gate this is called for bookkeeping purposes
+ */
+VG_STATIC void world_routes_activate_entry_gate( world_instance *world, 
+                                                 ent_gate *rg )
 {
-   v3f p0, h0, p1, h1, l, p;
-   
-   v3_copy( rna->co, p0 );
-   v3_muladds( rna->co, rna->h,  1.0f, h0 );
-   v3_copy( rnb->co, p1 );
-   v3_muladds( rnb->co, rnb->h, -1.0f, h1 );
+   world_global.last_use = world_global.time;
 
-   v3_muladds( p0, rna->right, xoffset, p0 );
-   v3_muladds( h0, rna->right, xoffset, h0 );
-   v3_muladds( p1, rnb->right, xoffset, p1 );
-   v3_muladds( h1, rnb->right, xoffset, h1 );
+   /* disable all routes and leave the world */
+   if( rg->type == k_gate_type_nonlocel ){
+      for( u32 i=0; i<mdl_arrcount(&world->ent_route); i++ ){
+         ent_route *route = mdl_arritm( &world->ent_route, i );
+         route->active_checkpoint = 0xffff;
+      }
+      return;
+   }
 
-   v3_copy( p0, l );
+   ent_gate *dest = mdl_arritm( &world->ent_gate, rg->target );
 
-   for( int i=0; i<5; i++ )
-   {
-      float t = (float)(i+1)/5.0f;
-      eval_bezier_time( p0, p1, h0, h1, t, p );
-      vg_line( p, l, colour );
-      v3_copy( p, l );
+   for( u32 i=0; i<mdl_arrcount(&world->ent_route); i++ ){
+      ent_route *route = mdl_arritm( &world->ent_route, i );
+
+      u32 active_prev = route->active_checkpoint;
+      route->active_checkpoint = 0xffff;
+
+      for( u32 j=0; j<4; j++ ){
+         if( dest->routes[j] == i ){
+            for( u32 k=0; k<route->checkpoints_count; k++ ){
+               ent_checkpoint *cp = mdl_arritm( &world->ent_checkpoint, 
+                                                 route->checkpoints_start+k );
+
+               ent_gate *gk = mdl_arritm( &world->ent_gate, cp->gate_index );
+                         gk = mdl_arritm( &world->ent_gate, gk->target );
+               if( gk == dest ){
+                  route->active_checkpoint = k;
+                  world_routes_time_lap( world, route );
+                  break;
+               }
+            }
+            break;
+         }
+      }
    }
+
+   dest->timing_version = world_global.current_run_version;
+   dest->timing_time = world_global.time;
+
+   world_global.current_run_version ++;
 }
 
-static void world_routes_activate_gate( u32 id )
+/* draw lines along the paths */
+VG_STATIC void world_routes_debug( world_instance *world )
 {
-   struct subworld_routes *r = subworld_routes();
-   struct route_gate *ig = &r->gates[id];
-   struct route_node *pnode = &r->nodes[ig->node_id],
-                     *pdest = &r->nodes[pnode->next[0]];
-   
-   r->active_gate = id;
+   for( u32 i=0; i<mdl_arrcount(&world->ent_route_node); i++ ){
+      ent_route_node *rn = mdl_arritm(&world->ent_route_node,i);
+      vg_line_pt3( rn->co, 0.25f, VG__WHITE );
+   }
 
-   for( int i=0; i<r->route_count; i++ )
-   {
-      struct route *route = &r->routes[i];
+   for( u32 i=0; i<mdl_arrcount(&world->ent_route); i++ ){
+      ent_route *route = mdl_arritm(&world->ent_route, i);
+
+      u32 colours[] = { 0xfff58142, 0xff42cbf5, 0xff42f56c, 0xfff542b3,
+                        0xff5442f5 };
+
+      u32 cc = 0xffcccccc;
+      if( route->active_checkpoint != 0xffff ){
+         cc = colours[i%vg_list_size(colours)];
+      }
+
+      for( int i=0; i<route->checkpoints_count; i++ ){
+         int i0 = route->checkpoints_start+i,
+             i1 = route->checkpoints_start+((i+1)%route->checkpoints_count);
+
+         ent_checkpoint *c0 = mdl_arritm(&world->ent_checkpoint, i0),
+                        *c1 = mdl_arritm(&world->ent_checkpoint, i1);
+
+         ent_gate *start_gate = mdl_arritm( &world->ent_gate, c0->gate_index );
+         ent_gate *end_gate = mdl_arritm( &world->ent_gate, c1->gate_index );
+
+         v3f p0, p1;
+         v3_copy( start_gate->co[1], p0 );
+
+         for( int j=0; j<c0->path_count; j ++ ){
+            ent_path_index *index = mdl_arritm( &world->ent_path_index, 
+                                                c0->path_start+j );
+
+            ent_route_node *rn = mdl_arritm( &world->ent_route_node,
+                                             index->index );
+
+            v3_copy( rn->co, p1 );
+            vg_line( p0, p1, cc );
+            v3_copy( p1, p0 );
+         }
+
+         v3_copy( end_gate->co[0], p1 );
+         vg_line( p0, p1, cc );
+      }
+   }
+}
+
+VG_STATIC void world_routes_place_curve( world_instance *world,
+                                         v4f h[3], v3f n0, v3f n2 )
+{
+   float t;
+   v3f p, pd;
+   int last_valid=0;
+
+   float total_length = 0.0f,
+         travel_length = 0.0;
+
+   v3f last;
+   v3_copy( h[0], last );
+   for( int it=0; it<128; it ++ ){
+      t = (float)(it+1) * (1.0f/128.0f);
+      eval_bezier3( h[0], h[1], h[2], t, p );
+      total_length += v3_dist( p, last );
+      v3_copy( p, last );
+   }
+
+   float patch_size = 4.0f,
+         patch_count = ceilf( total_length / patch_size );
 
-      route->active = 0;
-      for( int j=0; j<pdest->ref_count; j++ )
-      {
-         if( pdest->route_ids[j] == i )
+   t = 0.0f;
+   v3_copy( h[0], last );
+
+   for( int it=0; it<128; it ++ ){
+      float const k_sample_dist = 0.0025f,
+                  k_line_width = 1.5f;
+
+      eval_bezier3( h[0], h[1], h[2], t, p );
+      eval_bezier3( h[0], h[1], h[2], t+k_sample_dist, pd );
+
+      travel_length += v3_dist( p, last );
+
+      float mod = k_sample_dist / v3_dist( p, pd );
+
+      v3f v0,up, right;
+
+      v3_muls( n0, -(1.0f-t), up );
+      v3_muladds( up, n2, -t, up );
+      v3_normalize( up );
+
+      v3_sub( pd,p,v0 );
+      v3_cross( up, v0, right );
+      v3_normalize( right );
+
+      float cur_x = (1.0f-t)*h[0][3] + t*h[2][3];
+      
+      v3f sc, sa, sb, down;
+      v3_muladds( p, right, cur_x * k_line_width, sc );
+      v3_muladds( sc, up, 1.5f, sc );
+      v3_muladds( sc, right, k_line_width*0.95f, sa );
+      v3_muladds( sc, right, 0.0f, sb );
+      v3_muls( up, -1.0f, down );
+      
+      ray_hit ha, hb;
+      ha.dist = 8.0f;
+      hb.dist = 8.0f;
+
+      int resa = ray_world( world, sa, down, &ha ),
+          resb = ray_world( world, sb, down, &hb );
+
+      if( resa && resb ){
+         struct world_surface *surfa = ray_hit_surface( world, &ha ),
+                              *surfb = ray_hit_surface( world, &hb );
+
+         if( (surfa->info.flags & k_material_flag_skate_surface) &&
+             (surfb->info.flags & k_material_flag_skate_surface) )
          {
-            route->active = 1;
-            break;
+            scene_vert va, vb;
+
+            float gap = vg_fractf(cur_x*0.5f)*0.02f;
+            
+            v3_muladds( ha.pos, up, 0.06f+gap, va.co );
+            v3_muladds( hb.pos, up, 0.06f+gap, vb.co );
+
+            scene_vert_pack_norm( &va, up );
+            scene_vert_pack_norm( &vb, up );
+
+            float t1 = (travel_length / total_length) * patch_count;
+            va.uv[0] = t1;
+            va.uv[1] = 0.0f;
+            vb.uv[0] = t1;
+            vb.uv[1] = 1.0f;
+
+            scene_push_vert( world->scene_lines, &va );
+            scene_push_vert( world->scene_lines, &vb );
+
+            if( last_valid ){
+               /* Connect them with triangles */
+               scene_push_tri( world->scene_lines, (u32[3]){ 
+                     last_valid+0-2, last_valid+1-2, last_valid+2-2} );
+               scene_push_tri( world->scene_lines, (u32[3]){ 
+                     last_valid+1-2, last_valid+3-2, last_valid+2-2} );
+            }
+            
+            last_valid = world->scene_lines->vertex_count;
          }
+         else
+            last_valid = 0;
       }
+      else
+         last_valid = 0;
+
+      if( t == 1.0f )
+         return;
+
+      t += 1.0f*mod;
+      if( t > 1.0f )
+         t = 1.0f;
+
+      v3_copy( p, last );
    }
 }
 
-static u32 world_routes_get_path( struct route *route, u32 stack[64] )
+VG_STATIC void world_routes_create_mesh( world_instance *world, u32 route_id )
 {
-   struct subworld_routes *r = subworld_routes();
-   u32 stack_i[64];
+   ent_route *route = mdl_arritm( &world->ent_route, route_id );
+   u32 last_valid = 0;
 
-   stack[0] = route->start;
-   stack_i[0] = 0;
+   for( int i=0; i<route->checkpoints_count; i++ ){
+      int i0 = route->checkpoints_start+i,
+          i1 = route->checkpoints_start+((i+1)%route->checkpoints_count);
 
-   u32 si = 1;
-   int loop_complete = 0;
+      ent_checkpoint *c0 = mdl_arritm(&world->ent_checkpoint, i0),
+                     *c1 = mdl_arritm(&world->ent_checkpoint, i1);
 
-   while( si )
-   {
-      if( stack_i[si-1] == 2 )
-      {
-         si --;
+      ent_gate *start_gate = mdl_arritm( &world->ent_gate, c0->gate_index );
+      start_gate = mdl_arritm( &world->ent_gate, start_gate->target );
+
+      ent_gate *end_gate = mdl_arritm( &world->ent_gate, c1->gate_index ),
+               *collector = mdl_arritm( &world->ent_gate, end_gate->target );
+
+      v4f p[3];
+
+      v3_add( (v3f){0.0f,0.1f,0.0f}, start_gate->co[0], p[0] );
+      p[0][3]  = start_gate->ref_count;
+      p[0][3] -= (float)start_gate->route_count * 0.5f;
+      start_gate->ref_count ++;
+
+      if( !c0->path_count )
          continue;
+
+      /* this is so that we get nice flow through the gates */
+      v3f temp_alignments[2];
+      ent_gate *both[] = { start_gate, end_gate };
+
+      for( int j=0; j<2; j++ ){
+         int pi = c0->path_start + ((j==1)? c0->path_count-1: 0);
+
+         ent_path_index *index = mdl_arritm( &world->ent_path_index, pi );
+         ent_route_node *rn = mdl_arritm( &world->ent_route_node,
+                                          index->index );
+         v3f v0;
+         v3_sub( rn->co, both[j]->co[0], v0 );
+         float d = v3_dot( v0, both[j]->to_world[2] );
+
+         v3_muladds( both[j]->co[0], both[j]->to_world[2], d, 
+                     temp_alignments[j] );
+         v3_add( (v3f){0.0f,0.1f,0.0f}, temp_alignments[j], temp_alignments[j]);
       }
 
-      struct route_node *rn = &r->nodes[stack[si-1]];
-      u32 nextid = rn->next[stack_i[si-1]];
-      stack_i[si-1] ++;
 
-      if( nextid != 0xffffffff )
-      {
-         if( nextid == stack[0] )
-         {
-            loop_complete = 1;
-            break;
-         }
+      for( int j=0; j<c0->path_count; j ++ ){
+         ent_path_index *index = mdl_arritm( &world->ent_path_index, 
+                                             c0->path_start+j );
+         ent_route_node *rn = mdl_arritm( &world->ent_route_node,
+                                          index->index );
+         if( j==0 || j==c0->path_count-1 )
+            if( j == 0 )
+               v3_copy( temp_alignments[0], p[1] );
+            else
+               v3_copy( temp_alignments[1], p[1] );
+         else
+            v3_copy( rn->co, p[1] );
 
-         int valid = 1;
-         for( int sj=0; sj<si; sj++ )
-         {
-            if( stack[sj] == nextid )
-            {
-               valid = 0;
-               break;
-            }
+         p[1][3] = rn->ref_count;
+         p[1][3] -= (float)rn->ref_total * 0.5f;
+         rn->ref_count ++;
+
+         if( j+1 < c0->path_count ){
+            index = mdl_arritm( &world->ent_path_index, 
+                                c0->path_start+j+1 );
+            rn = mdl_arritm( &world->ent_route_node, index->index );
+
+            if( j+1 == c0->path_count-1 )
+               v3_lerp( p[1], temp_alignments[1], 0.5f, p[2] );
+            else
+               v3_lerp( p[1], rn->co, 0.5f, p[2] );
+
+            p[2][3] = rn->ref_count;
+            p[2][3] -= (float)rn->ref_total * 0.5f;
          }
+         else{
+            v3_copy( end_gate->co[0], p[2] );
+            v3_add( (v3f){0.0f,0.1f,0.0f}, p[2], p[2] );
+            p[2][3] = collector->ref_count;
 
-         if( valid )
-         {
-            stack_i[si] = 0;
-            stack[si] = nextid;
-            si ++;
-            continue;
+            if( i == route->checkpoints_count-1)
+               p[2][3] -= 1.0f;
+
+            p[2][3] -= (float)collector->route_count * 0.5f;
+            //collector->ref_count ++;
          }
+
+         /* p0,p1,p2 bezier patch is complete
+          * --------------------------------------*/
+         v3f surf0, surf2, n0, n2;
+
+         if( bh_closest_point( world->geo_bh, p[0], surf0, 5.0f ) == -1 )
+            v3_add( (v3f){0.0f,-0.1f,0.0f}, p[0], surf0 );
+
+         if( bh_closest_point( world->geo_bh, p[2], surf2, 5.0f ) == -1 )
+            v3_add( (v3f){0.0f,-0.1f,0.0f}, p[2], surf2 );
+
+         v3_sub( surf0, p[0], n0 );
+         v3_sub( surf2, p[2], n2 );
+         v3_normalize( n0 );
+         v3_normalize( n2 );
+
+         world_routes_place_curve( world, p, n0, n2 );
+
+         /* --- */
+         v4_copy( p[2], p[0] );
       }
    }
 
-   if( loop_complete )
-      return si;
-
-   return 0;
+   scene_copy_slice( world->scene_lines, &route->sm );
 }
 
-static void world_routes_debug(void)
+/* 
+ * Create the strips of colour that run through the world along course paths
+ */
+VG_STATIC void world_routes_generate( world_instance *world )
 {
-   struct subworld_routes *r = subworld_routes();
+   vg_info( "Generating route meshes\n" );
+   world->scene_lines = scene_init( world->heap, 200000, 300000 );
 
-   for( int i=0; i<r->node_count; i++ )
-   {
-      struct route_node *rn = &r->nodes[i];
-      vg_line_pt3( rn->co, 1.0f, rn->is_gate? 0xffffff00: 0xff00b2ff );
+   for( u32 i=0; i<mdl_arrcount(&world->ent_gate); i++ ){
+      ent_gate *gate = mdl_arritm( &world->ent_gate, i );
+      gate->ref_count = 0;
+      gate->route_count = 0;
    }
 
-   for( int i=0; i<r->route_count; i++ )
-   {
-      struct route *route = &r->routes[i];
+   for( u32 i=0; i<mdl_arrcount(&world->ent_route_node); i++ ){
+      ent_route_node *rn = mdl_arritm( &world->ent_route_node, i );
+      rn->ref_count = 0;
+      rn->ref_total = 0;
+   }
 
-      u32 stack[64];
-      u32 si = world_routes_get_path( route, stack );
+   for( u32 k=0; k<mdl_arrcount(&world->ent_route); k++ ){
+      ent_route *route = mdl_arritm( &world->ent_route, k );
 
-      u32 colours[] = { 0xfff58142, 0xff42cbf5, 0xff42f56c, 0xfff542b3,
-                        0xff5442f5 };
+      for( int i=0; i<route->checkpoints_count; i++ ){
+         int i0 = route->checkpoints_start+i,
+             i1 = route->checkpoints_start+((i+1)%route->checkpoints_count);
 
-      u32 cc = colours[i%vg_list_size(colours)];
+         ent_checkpoint *c0 = mdl_arritm(&world->ent_checkpoint, i0),
+                        *c1 = mdl_arritm(&world->ent_checkpoint, i1);
 
-      for( int sj=0; sj<si; sj++ )
-      {
-         int sk = (sj+1)%si;
-         debug_sbpath( &r->nodes[stack[sj]], &r->nodes[stack[sk]], cc,
-               (float)i );
+         ent_gate *start_gate = mdl_arritm( &world->ent_gate, c0->gate_index );
+         start_gate = mdl_arritm( &world->ent_gate, start_gate->target );
+         start_gate->route_count ++;
+
+         if( !c0->path_count )
+            continue;
+
+         for( int j=0; j<c0->path_count; j ++ ){
+            ent_path_index *index = mdl_arritm( &world->ent_path_index, 
+                                                c0->path_start+j );
+            ent_route_node *rn = mdl_arritm( &world->ent_route_node,
+                                             index->index );
+            rn->ref_total ++;
+         }
       }
    }
 
-   for( int i=0; i<r->node_count; i++ )
+   for( u32 i=0; i<mdl_arrcount(&world->ent_route); i++ )
+      world_routes_create_mesh( world, i );
+
+   vg_acquire_thread_sync();
    {
-      struct route_node *ri = &r->nodes[i],
-                        *rj = NULL;
-      
-      for( int j=0; j<2; j++ )
-      {
-         if( ri->next[j] != 0xffffffff )
-         {
-            rj = &r->nodes[ri->next[j]];
-            vg_line( ri->co, rj->co, 0x20ffffff );
+      scene_upload( world->scene_lines, &world->mesh_route_lines );
+   }
+   vg_release_thread_sync();
+   vg_linear_del( world->heap, world->scene_lines );
+
+   world_routes_clear( world );
+}
+
+/* load all routes from model header */
+VG_STATIC void world_routes_ent_init( world_instance *world )
+{
+   vg_info( "Initializing routes\n" );
+
+   for( u32 i=0; i<mdl_arrcount(&world->ent_gate); i++ ){
+      ent_gate *gate = mdl_arritm( &world->ent_gate, i );
+      for( u32 j=0; j<4; j++ ){
+         gate->routes[j] = 0xffff;
+      }
+   }
+
+   for( u32 i=0; i<mdl_arrcount(&world->ent_route); i++ ){
+      ent_route *route = mdl_arritm(&world->ent_route,i);
+      mdl_transform_m4x3( &route->transform, route->board_transform );
+
+      route->official_track_id = 0xffffffff;
+      for( u32 j=0; j<vg_list_size(track_infos); j ++ ){
+         if( !strcmp(track_infos[j].name, 
+                     mdl_pstr(&world->meta,route->pstr_name))){
+            route->official_track_id = j;
+         }
+      }
+
+      for( u32 j=0; j<route->checkpoints_count; j++ ){
+         u32 id = route->checkpoints_start + j;
+         ent_checkpoint *cp = mdl_arritm(&world->ent_checkpoint,id);
+         
+         ent_gate *gate = mdl_arritm( &world->ent_gate, cp->gate_index );
+
+         for( u32 k=0; k<4; k++ ){
+            if( gate->routes[k] == 0xffff ){
+               gate->routes[k] = i;
+               break;
+            }
+         }
+
+         if( gate->type == k_gate_type_teleport ){
+            gate = mdl_arritm(&world->ent_gate, gate->target );
+
+            for( u32 k=0; k<4; k++ ){
+               if( gate->routes[k] == i ){
+                  vg_error( "already assigned route to gate\n" );
+                  break;
+               }
+               if( gate->routes[k] == 0xffff ){
+                  gate->routes[k] = i;
+                  break;
+               }
+            }
          }
       }
    }
+
+   for( u32 i=0; i<mdl_arrcount(&world->ent_gate); i++ ){
+      ent_gate *gate = mdl_arritm( &world->ent_gate, i );
+   }
+
+   world_routes_clear( world );
 }
 
-static void world_routes_free(void)
+/* 
+ * -----------------------------------------------------------------------------
+ *                                    Events
+ * -----------------------------------------------------------------------------
+ */
+
+VG_STATIC void world_routes_init(void)
 {
-   struct subworld_routes *r = subworld_routes();
+   world_global.current_run_version = 200;
+   world_global.time = 300.0;
+   world_global.last_use = 0.0;
 
-   free( r->nodes );
-   free( r->routes );
-   free( r->gates );
+   shader_scene_route_register();
+   shader_routeui_register();
 }
 
-static void world_id_fixup( u32 *uid, mdl_header *mdl )
+VG_STATIC void world_routes_update( world_instance *world )
 {
-   if( *uid )
-      *uid = mdl_node_from_id( mdl, *uid )->sub_uid;
-   else
-      *uid = 0xffffffff;
+   world_global.time += vg.time_delta;
+
+   for( u32 i=0; i<mdl_arrcount(&world->ent_route); i++ ){
+      ent_route *route = mdl_arritm( &world->ent_route, i );
+      
+      int target = route->active_checkpoint == 0xffff? 0: 1;
+      route->factive = vg_lerpf( route->factive, target, 0.6f*vg.time_delta );
+   }
+
+   for( u32 i=0; i<world_global.text_particle_count; i++ ){
+      struct text_particle *particle = &world_global.text_particles[i];
+      rb_object_debug( &particle->obj, VG__RED );
+   }
 }
 
-static void world_routes_gen_meshes(void)
+VG_STATIC void world_routes_fixedupdate( world_instance *world )
 {
-   struct subworld_routes *r = subworld_routes();
-   scene_init( &r->scene_lines );
-
-   for( int i=0; i<r->route_count; i++ )
-   {
-      struct route *route = &r->routes[i];
+   rb_solver_reset();
 
-      u32 stack[64];
-      u32 si = world_routes_get_path( route, stack );
+   for( u32 i=0; i<world_global.text_particle_count; i++ ){
+      struct text_particle *particle = &world_global.text_particles[i];
 
-      u32 last_valid = 0;
+      if( rb_global_has_space() ){
+         rb_ct *buf = rb_global_buffer();
 
-      for( int sj=0; sj<si; sj++ )
-      {
-         int sk=(sj+1)%si;
+         int l = rb_sphere__scene( particle->obj.rb.to_world,
+                                   &particle->obj.inf.sphere,
+                                   NULL, &world->rb_geo.inf.scene, buf );
 
-         struct route_node *rnj = &r->nodes[ stack[sj] ],
-                           *rnk = &r->nodes[ stack[sk] ],
-                           *rnl;
-         
-         if( rnj->is_gate && rnk->is_gate )
-         {
-            last_valid = 0;
-            continue;
+         for( int j=0; j<l; j++ ){
+            buf[j].rba = &particle->obj.rb;
+            buf[j].rbb = &world->rb_geo.rb;
          }
 
-         float base_x0 = (float)rnj->ref_count*-0.5f + (float)rnj->current_refs,
-               base_x1 = (float)rnk->ref_count*-0.5f + (float)rnk->current_refs;
+         rb_contact_count += l;
+      }
+   }
 
-         if( rnk->is_gate )
-         {
-            rnl = &r->nodes[ rnk->next[0] ];
-            base_x1 = (float)rnl->ref_count*-0.5f + (float)rnl->current_refs;
-         }
+   rb_presolve_contacts( rb_contact_buffer, rb_contact_count );
 
-         if( sk == 0 )
-         {
-            base_x1 -= 1.0f;
-         }
+   for( int i=0; i<rb_contact_count; i++ ){
+      rb_contact_restitution( rb_contact_buffer+i, vg_randf() );
+   }
+
+   for( int i=0; i<6; i++ ){
+      rb_solve_contacts( rb_contact_buffer, rb_contact_count );
+   }
+
+   for( u32 i=0; i<world_global.text_particle_count; i++ ){
+      struct text_particle *particle = &world_global.text_particles[i];
+      rb_iter( &particle->obj.rb );
+   }
+
+   for( u32 i=0; i<world_global.text_particle_count; i++ ){
+      struct text_particle *particle = &world_global.text_particles[i];
+      rb_update_transform( &particle->obj.rb );
+   }
+}
 
-         v3f p0, h0, p1, h1, p, pd;
+VG_STATIC void bind_terrain_noise(void);
+VG_STATIC void world_bind_light_array( world_instance *world,
+                                       GLuint shader, GLuint location, 
+                                       int slot );
+VG_STATIC void world_bind_light_index( world_instance *world,
+                                       GLuint shader, GLuint location, 
+                                       int slot );
+
+VG_STATIC void world_routes_update_timer_texts( world_instance *world )
+{
+   world_global.timer_text_count = 0;
+
+   for( u32 i=0; i<mdl_arrcount(&world->ent_route); i++ ){
+      ent_route *route = mdl_arritm( &world->ent_route, i );
+
+      if( route->active_checkpoint != 0xffff ){
+         u32 next = route->active_checkpoint+1;
+             next = next % route->checkpoints_count;
+             next += route->checkpoints_start;
+
+         ent_checkpoint *cp = mdl_arritm( &world->ent_checkpoint, next );
+         ent_gate *gate = mdl_arritm( &world->ent_gate, cp->gate_index );
+         ent_gate *dest = mdl_arritm( &world->ent_gate, gate->target );
          
-         v3_copy( rnj->co, p0 );
-         v3_muladds( rnj->co, rnj->h,  1.0f, h0 );
-         v3_copy( rnk->co, p1 );
-         v3_muladds( rnk->co, rnk->h, -1.0f, h1 );
+         u32 j=0;
+         for( ; j<4; j++ ){
+            if( dest->routes[j] == i ){
+               break;
+            }
+         }
 
-         float t=0.0f;
-         int it = 0;
+         float h0 = 0.8f,
+               h1 = 1.2f,
+               depth = 0.4f,
+               size = 0.4f;
 
-         for( int it=0; it<256; it ++ )
-         {
-            float const k_sample_dist = 0.02f;
-            eval_bezier_time( p0,p1,h0,h1, t,p );
-            eval_bezier_time( p0,p1,h0,h1, t+k_sample_dist,pd );
+         struct timer_text *text = 
+            &world_global.timer_texts[ world_global.timer_text_count ++ ];
+
+         text->gate = gate;
+         text->route = route;
 
-            float mod = k_sample_dist / v3_dist( p, pd );
+         if( route->valid_checkpoints >= route->checkpoints_count ){
+            double lap_time = world_global.time - route->timing_base,
+                   time_centiseconds = lap_time * 100.0;
 
-            v3f v0,up, right;
-            v3_muls( rnj->up, 1.0f-t, up );
-            v3_muladds( up, rnk->up, t, up );
+            if( time_centiseconds > (float)0xfffe ) time_centiseconds = 0.0;
 
-            v3_sub( pd,p,v0 );
-            v3_cross( up, v0, right );
-            v3_normalize( right );
+            u16 centiseconds = time_centiseconds,
+                seconds      = centiseconds / 100,
+                minutes      = seconds / 60;
 
-            float cur_x = (1.0f-t)*base_x0 + t*base_x1;
+            centiseconds %= 100;
+            seconds     %= 60;
+            minutes     %= 60;
+
+            if( minutes > 9 ) minutes = 9;
             
-            v3f sc, sa, sb, down;
-            v3_muladds( p, right, cur_x, sc );
-            v3_muladds( sc, up, 1.5f, sc );
-            v3_muladds( sc, right,  0.45f, sa );
-            v3_muladds( sc, right, -0.45f, sb );
-            v3_muls( up, -1.0f, down );
+            int j=0;
+            if( minutes ){
+               highscore_intr( text->text, minutes, 1, ' ' ); j++;
+               text->text[j++] = ':';
+            }
             
-            ray_hit ha, hb;
-            ha.dist = 8.0f;
-            hb.dist = 8.0f;
-            if(ray_world( sa, down, &ha ) && 
-               ray_world( sb, down, &hb ))
-            {
-               mdl_vert va, vb;
-               
-               v3_muladds( ha.pos, up, 0.06f, va.co );
-               v3_muladds( hb.pos, up, 0.06f, vb.co );
-               v3_copy( up, va.norm );
-               v3_copy( up, vb.norm );
-               v3_zero( va.colour );
-               v3_zero( vb.colour );
-               v2_zero( va.uv );
-               v2_zero( vb.uv );
-
-               scene_push_vert( &r->scene_lines, &va );
-               scene_push_vert( &r->scene_lines, &vb );
-
-               if( last_valid )
-               {
-                  /* Connect them with triangles */
-                  scene_push_tri( &r->scene_lines, (u32[3]){ 
-                        last_valid+0-2, last_valid+1-2, last_valid+2-2} );
-                  scene_push_tri( &r->scene_lines, (u32[3]){ 
-                        last_valid+1-2, last_valid+3-2, last_valid+2-2} );
-               }
-               
-               last_valid = r->scene_lines.vertex_count;
+            if( seconds >= 10 || minutes ){
+               highscore_intr( text->text+j, seconds, 2, '0' ); j+=2;
+            }
+            else{
+               highscore_intr( text->text+j, seconds, 1, '0' ); j++;
             }
-            else
-               last_valid = 0;
 
-            t += 1.0f*mod;
+            text->text[j++] = '.';
+            highscore_intr( text->text+j, centiseconds, 1, '0' ); j++;
+            text->text[j] = '\0';
+         }
+         else{
+            highscore_intr( text->text, route->valid_checkpoints, 1, ' ' );
+            text->text[1] = '/';
+            highscore_intr( text->text+2, route->checkpoints_count+1, 1, ' ' );
+            text->text[3] = '\0';
+         }
 
-            if( t >= 1.0f )
-            {
-               /* TODO special case for end of loop, need to add triangles
-                *      between first and last rungs */
-               break;
-            }
+         float align_r  = font3d_string_width( &world_global.font, 0, 
+                                               text->text );
+               align_r *= size;
+
+         v3f positions[] = {
+            { -0.92f, h0, depth },
+            {  0.92f - align_r, h0, depth },
+            { -0.92f, h1, depth },
+            {  0.92f - align_r, h1, depth },
+         };
+
+         if( dest->route_count == 1 ){
+            positions[0][0] = -align_r*0.5f;
+            positions[0][1] = h1;
          }
 
-         rnj->current_refs ++;
-      }
+         m3x3_copy( gate->to_world, text->transform );
+         float ratio = v3_length(text->transform[0]) / 
+                        v3_length(text->transform[1]);
 
-      scene_copy_slice( &r->scene_lines, &route->sm );
+         m3x3_scale( text->transform, (v3f){ size, size*ratio, 0.1f } );
+         m4x3_mulv( gate->to_world, positions[j], text->transform[3] );
+      }
    }
-
-   scene_upload( &r->scene_lines );
-   scene_free_offline_buffers( &r->scene_lines );
 }
 
-static void bind_terrain_textures(void);
-static void render_world_routes( m4x4f projection, v3f camera )
+VG_STATIC void world_routes_fracture( world_instance *world, ent_gate *gate,
+                                      v3f imp_co, v3f imp_v )
 {
-   struct subworld_routes *r = subworld_routes();
+   world_global.text_particle_count = 0;
+   
+   for( u32 i=0; i<world_global.timer_text_count; i++ ){
+      struct timer_text *text = &world_global.timer_texts[i];
+
+      if( text->gate != gate ) continue;
+
+      m4x3f transform;
+      m4x3_mul( gate->transport, text->transform, transform );
+
+      v3f co, s;
+      v4f q;
+      m4x3_decompose( transform, co, q, s );
+
+      v3f offset;
+      v3_zero( offset );
+
+      v4f colour;
+      float brightness = 0.3f + world->ub_lighting.g_day_phase;
+      v3_muls( text->route->colour, brightness, colour );
+      colour[3] = 1.0f-text->route->factive;
+
+      for( u32 j=0;; j++ ){
+         char c = text->text[j];
+         if( !c ) break;
+
+         ent_glyph *glyph = font3d_glyph( &world_global.font, 0, c );
+         if( !glyph ) continue;
+
+         if( c >= (u32)'0' && c <= (u32)'9' && glyph->indice_count ){
+            struct text_particle *particle = 
+               &world_global.text_particles[world_global.text_particle_count++];
+
+            particle->glyph = glyph;
+            v4_copy( colour, particle->colour );
+
+            v3f origin;
+            v2_muls( glyph->size, 0.5f, origin );
+            origin[2] = -0.5f;
+
+            v3f world_co;
+
+            v3_add( offset, origin, world_co );
+            m4x3_mulv( transform, world_co, world_co );
+
+            float r = vg_maxf( s[0]*glyph->size[0], s[1]*glyph->size[1] )*0.5f;
+
+            m3x3_identity( particle->mlocal );
+            m3x3_scale( particle->mlocal, s );
+            origin[2] *= s[2];
+            v3_muls( origin, -1.0f, particle->mlocal[3] );
+
+            v3_copy( world_co, particle->obj.rb.co );
+            v3_muls( imp_v, 1.0f+vg_randf(), particle->obj.rb.v );
+            particle->obj.rb.v[1] += 2.0f;
+
+            v4_copy( q, particle->obj.rb.q );
+            particle->obj.rb.w[0] = vg_randf()*2.0f-1.0f;
+            particle->obj.rb.w[1] = vg_randf()*2.0f-1.0f;
+            particle->obj.rb.w[2] = vg_randf()*2.0f-1.0f;
+
+            particle->obj.type = k_rb_shape_sphere;
+            particle->obj.inf.sphere.radius = r*0.6f;
+
+            rb_init_object( &particle->obj );
+         }
+         offset[0] += glyph->size[0];
+      }
+   }
+}
 
+VG_STATIC void render_world_routes( world_instance *world, camera *cam, 
+                                    int layer_depth )
+{
    m4x3f identity_matrix;
    m4x3_identity( identity_matrix );
 
-   shader_route_use();
-   shader_route_uTexGarbage(0);
-   shader_link_standard_ub( _shader_route.id, 2 );
-   bind_terrain_textures();
+   shader_scene_route_use();
+   shader_scene_route_uTexGarbage(0);
+   world_link_lighting_ub( world, _shader_scene_route.id );
+   world_bind_position_texture( world, _shader_scene_route.id, 
+                        _uniform_scene_route_g_world_depth, 2 );
+   world_bind_light_array( world, _shader_scene_route.id,
+                        _uniform_scene_route_uLightsArray, 3 );
+   world_bind_light_index( world, _shader_scene_route.id,
+                                 _uniform_scene_route_uLightsIndex, 4 );
+   bind_terrain_noise();
 
-   shader_route_uPv( projection );
-   shader_route_uMdl( identity_matrix );
-   shader_route_uCamera( camera );
+   shader_scene_route_uPv( cam->mtx.pv );
+   shader_scene_route_uPvmPrev( cam->mtx_prev.pv );
+   shader_scene_route_uMdl( identity_matrix );
+   shader_scene_route_uCamera( cam->transform[3] );
 
-   scene_bind( &r->scene_lines );
+   mesh_bind( &world->mesh_route_lines );
 
-   for( int i=0; i<r->route_count; i++ )
-   {
-      struct route *route = &r->routes[i];
-      route->factive = vg_lerpf( route->factive, route->active, 0.01f );
+   for( u32 i=0; i<mdl_arrcount(&world->ent_route); i++ ){
+      ent_route *route = mdl_arritm( &world->ent_route, i );
 
       v4f colour;
       v3_lerp( (v3f){0.7f,0.7f,0.7f}, route->colour, route->factive, colour );
-      colour[3] = 1.0f;
+      colour[3] = route->factive*0.2f;
 
-      shader_route_uColour( colour );
+      shader_scene_route_uColour( colour );
       mdl_draw_submesh( &route->sm );
    }
-}
 
-static void world_routes_register(void)
-{
-   shader_route_register();
-}
+   /* timers
+    * ---------------------------------------------------- */
+   if( layer_depth == 0 ){
+      font3d_bind( &world_global.font, cam );
 
-static void world_routes_loadfrom( mdl_header *mdl )
-{
-   struct subworld_routes *r = subworld_routes();
-   r->nodes = NULL;
-   r->node_count = 0;
-   r->node_cap = 0;
-   r->routes = NULL;
-   r->route_count = 0;
-   r->route_cap = 0;
-   r->gates = NULL;
-   r->gate_count = 0;
-   r->gate_cap = 0;
-
-   for( int i=0; i<mdl->node_count; i++ )
-   {
-      mdl_node *pnode = mdl_node_from_id(mdl,i);
-      m4x3f transform;
+      for( u32 i=0; i<world_global.timer_text_count; i++ ){
+         struct timer_text *text = &world_global.timer_texts[i];
 
-      if( pnode->classtype == k_classtype_route_node ||
-          pnode->classtype == k_classtype_gate )
-      {
-         mdl_node_transform( pnode, transform );
-         pnode->sub_uid = r->node_count;
-         
-         r->nodes = buffer_reserve( r->nodes, r->node_count, &r->node_cap, 1,
-                                    sizeof( struct route_node ) );
+         v4f colour;
+         float brightness = 0.3f + world->ub_lighting.g_day_phase;
+         v3_muls( text->route->colour, brightness, colour );
+         colour[3] = 1.0f-text->route->factive;
 
-         struct route_node *rn = &r->nodes[r->node_count];
+         shader_model_font_uColour( colour );
+         font3d_simple_draw( &world_global.font, 0, text->text, 
+                             cam, text->transform );
+      }
 
-         v3_copy( transform[0], rn->right );
-         v3_normalize( rn->right );
-         v3_copy( transform[1], rn->up );
-         v3_normalize( rn->up );
-         v3_muls( transform[2], -1.0f, rn->h );
-         v3_copy( transform[3], rn->co );
-         rn->ref_count = 0;
-         rn->current_refs = 0;
+      shader_model_font_uOffset( (v3f){0.0f,0.0f,0.0f} );
 
-         if( pnode->classtype == k_classtype_gate )
-         {
-            r->gates = buffer_reserve( r->gates, r->gate_count, &r->gate_cap,
-                                       1, sizeof( struct route_gate ) );
-
-            struct classtype_gate *inf = mdl_get_entdata( mdl, pnode );
-
-            /* H is later scaled based on link distance */
-            v3_normalize( rn->h );
-            rn->next[0] = inf->target;
-            rn->next[1] = 0;
-            rn->gate_id = r->gate_count;
-            rn->is_gate = 1;
-
-            /* TODO */
-            if( inf->target )
-            {
-               mdl_node *pother = mdl_node_from_id( mdl, inf->target );
-               
-               if( pother->classtype == k_classtype_gate )
-               {
-                  struct route_gate *rg = &r->gates[r->gate_count];
-                  rg->node_id = r->node_count;
-
-                  v3_copy( pnode->co,  rg->gate.co[0] );
-                  v3_copy( pother->co, rg->gate.co[1] );
-                  v4_copy( pnode->q,   rg->gate.q[0] );
-                  v4_copy( pother->q,  rg->gate.q[1] );
-                  v2_copy( inf->dims,  rg->gate.dims );
-
-                  gate_transform_update( &rg->gate );
-
-                  r->gate_count ++;
-               }
-            }
-         }
-         else
-         {
-            struct classtype_route_node *inf = mdl_get_entdata( mdl, pnode );
-            rn->next[0] = inf->target;
-            rn->next[1] = inf->target1;
-            rn->is_gate = 0;
-         }
+      for( u32 i=0; i<world_global.text_particle_count; i++ ){
+         struct text_particle *particle = &world_global.text_particles[i];
 
-         r->node_count ++;
-      }
-      else if( pnode->classtype == k_classtype_route )
-      {
-         struct classtype_route *inf = mdl_get_entdata( mdl, pnode );
-         r->routes = buffer_reserve( r->routes, r->route_count, &r->route_cap,
-                                     1, sizeof( struct route ) );
+         m4x4f prev_mtx;
+
+         m4x3_expand( particle->mdl, prev_mtx );
+         m4x4_mul( cam->mtx_prev.pv, prev_mtx, prev_mtx );
 
-         struct route *route = &r->routes[r->route_count];
+         shader_model_font_uPvmPrev( prev_mtx );
 
-         v3_copy( inf->colour, route->colour );
-         route->colour[3] = 1.0f;
+         v4f q;
+         m4x3f model;
+         rb_extrapolate( &particle->obj.rb, model[3], q );
+         q_m3x3( q, model );
 
-         route->name = NULL;
-         route->start = inf->id_start;
-         route->active = 0;
-         route->factive = 0.0f;
+         m4x3_mul( model, particle->mlocal, particle->mdl );
+         shader_model_font_uMdl( particle->mdl );
+         shader_model_font_uColour( particle->colour );
 
-         r->route_count ++;
+         mesh_drawn( particle->glyph->indice_start, 
+                     particle->glyph->indice_count );
       }
    }
 
-   /* 
-    * Apply correct system-local ids
-    */
-   for( int i=0; i<r->node_count; i++ )
-   {
-      struct route_node *rn = &r->nodes[i];
-      
-      for( int j=0; j<2; j++ )
-         world_id_fixup( &rn->next[j], mdl );
-   }
+   /* gate markers 
+    * ---------------------------------------------------- */
 
-   for( int i=0; i<r->route_count; i++ )
-   {
-      struct route *route = &r->routes[i];
-      world_id_fixup( &route->start, mdl );
-   }
+   shader_model_gate_use();
+   shader_model_gate_uPv( cam->mtx.pv );
+   shader_model_gate_uCam( cam->pos );
+   shader_model_gate_uTime( vg.time*0.25f );
+   shader_model_gate_uInvRes( (v2f){
+         1.0f / (float)vg.window_x,
+         1.0f / (float)vg.window_y });
 
-   /*
-    * Gather references
-    */
-   for( int i=0; i<r->route_count; i++ )
-   {
-      struct route *route = &r->routes[i];
+   mesh_bind( &world_global.mesh_gate );
 
-      u32 stack[64];
-      u32 si = world_routes_get_path( route, stack );
+   /* skip writing into the motion vectors for this */
+   glDrawBuffers( 1, (GLenum[]){ GL_COLOR_ATTACHMENT0 } );
 
-      for( int sj=0; sj<si; sj++ )
-      {
-         struct route_node *rn = &r->nodes[ stack[sj] ];
-         rn->route_ids[ rn->ref_count ++ ] = i;
+   for( u32 i=0; i<mdl_arrcount(&world->ent_route); i++ ){
+      ent_route *route = mdl_arritm( &world->ent_route, i );
 
-         if( rn->ref_count > 4 )
-            vg_warn( "Too many references on route node %i\n", i );
+      if( route->active_checkpoint != 0xffff ){
+         v4f colour;
+         float brightness = 0.3f + world->ub_lighting.g_day_phase;
+         v3_muls( route->colour, brightness, colour );
+         colour[3] = 1.0f-route->factive;
+
+         shader_model_gate_uColour( colour );
+
+         u32 next = route->active_checkpoint+1+layer_depth;
+             next = next % route->checkpoints_count;
+             next += route->checkpoints_start;
+
+         ent_checkpoint *cp = mdl_arritm( &world->ent_checkpoint, next );
+         ent_gate *gate = mdl_arritm( &world->ent_gate, cp->gate_index );
+         shader_model_gate_uMdl( gate->to_world );
+
+         for( u32 j=0; j<4; j++ ){
+            if( gate->routes[j] == i ){
+               mdl_draw_submesh( &world_global.sm_gate_marker[j] );
+               break;
+            }
+         }
       }
    }
-
-   world_routes_gen_meshes();
+   glDrawBuffers( 2, (GLenum[]){ GL_COLOR_ATTACHMENT0, GL_COLOR_ATTACHMENT1 } );
 }
 
 #endif /* ROUTES_H */