player_replay.c

   1 #ifndef PLAYER_REPLAY_C
   2 #define PLAYER_REPLAY_C
   3
   4 #include "player_replay.h"
   5 #include "input.h"
   6 #include "gui.h"
   7
   8 VG_STATIC void replay_clear( replay_buffer *replay ){
   9    replay->head = NULL;
  10    replay->tail = NULL;
  11    replay->cursor_frame = NULL;
  12    replay->statehead = NULL;
  13    replay->cursor = -99999.9;
  14 }
  15
  16 replay_gamestate *replay_frame_gamestate( replay_frame *frame ){
  17    void *baseptr = frame;
  18    return baseptr + vg_align8(sizeof(replay_frame));
  19 }
  20
  21 void *replay_gamestate_subsystem_data( replay_gamestate *gs ){
  22    void *baseptr = gs;
  23    return baseptr + vg_align8(sizeof(replay_gamestate));
  24 }
  25
  26 u32 replay_frame_gamestate_total_size( u32 subsystem_gamestate_size ){
  27    if( subsystem_gamestate_size ){
  28       return vg_align8( sizeof(replay_gamestate) ) +
  29              vg_align8( subsystem_gamestate_size );
  30    }
  31    else
  32       return 0;
  33 }
  34
  35 replay_sfx *replay_frame_sfx( replay_frame *frame, u32 index ){
  36    void *gs = replay_frame_gamestate( frame );
  37    u32 total_size =
  38       replay_frame_gamestate_total_size( frame->subsystem_gamestate_size );
  39
  40    replay_sfx *array = (gs + total_size);
  41    return &array[index];
  42 }
  43
  44 u32 _replay_frame_size( u32 subsystem_gamestate_size, u32 sfx_count ){
  45    return vg_align8( sizeof( replay_frame ) ) +
  46           replay_frame_gamestate_total_size( subsystem_gamestate_size ) +
  47           vg_align8( sfx_count * sizeof(replay_sfx) );
  48 }
  49
  50 u32 replay_frame_size( replay_frame *frame ){
  51    return _replay_frame_size( frame->subsystem_gamestate_size,
  52                               frame->sfx_count );
  53 }
  54
  55 VG_STATIC void replay_tailpop( replay_buffer *replay ){
  56    if( replay->cursor_frame == replay->tail )
  57       replay->cursor_frame = NULL;
  58    if( replay->statehead == replay->tail )
  59       replay->statehead = NULL;
  60
  61    replay->tail = replay->tail->r;
  62
  63    if( replay->tail )
  64       replay->tail->l = NULL;
  65    else
  66       replay->head = NULL;
  67 }
  68
  69 VG_STATIC replay_frame *replay_newframe( replay_buffer *replay,
  70                                          u32 subsystem_gamestate_size,
  71                                          u32 sfx_count ){
  72    replay_frame *frame = NULL;
  73    if( replay->head ){
  74       assert( replay->head );
  75
  76       u32 headsize = replay_frame_size( replay->head ),
  77           nextpos  = ((void *)replay->head - replay->data) + headsize,
  78           nextsize = _replay_frame_size( subsystem_gamestate_size, sfx_count );
  79
  80       if( nextsize > replay->size ){
  81          vg_error( "Keyframe too big\n" );
  82          return NULL;
  83       }
  84
  85       if( nextpos + nextsize > replay->size ){
  86          nextpos = 0;
  87
  88          /* maintain contiguity */
  89          while( replay->tail ){
  90             if( (void *)replay->tail - replay->data )
  91                replay_tailpop( replay );
  92             else break;
  93          }
  94       }
  95
  96 check_again:;
  97
  98       u32 tailpos = (void *)replay->tail - replay->data;
  99
 100       if( tailpos >= nextpos ){
 101          if( nextpos + nextsize > tailpos ){
 102             replay_tailpop( replay );
 103
 104             if( replay->tail )
 105                goto check_again;
 106          }
 107       }
 108
 109       frame = replay->data + nextpos;
 110
 111       if( replay->head )
 112          replay->head->r = frame;
 113    }
 114    else
 115       frame = replay->data;
 116
 117    frame->subsystem_gamestate_size = subsystem_gamestate_size;
 118    frame->sfx_count = sfx_count;
 119    frame->l = replay->head;
 120    frame->r = NULL;
 121    replay->head = frame;
 122    if( !replay->tail ) replay->tail = frame;
 123    if( subsystem_gamestate_size ) replay->statehead = frame;
 124
 125    return frame;
 126 }
 127
 128 VG_STATIC void replay_seek( replay_buffer *replay, f64 t ){
 129    if( !replay->head ) return;
 130    assert( replay->tail );
 131
 132    if( t < replay->tail->time ) t = replay->tail->time;
 133    if( t > replay->head->time ) t = replay->head->time;
 134
 135    if( !replay->cursor_frame ) {
 136       replay->cursor = replay->head->time;
 137       replay->cursor_frame = replay->head;
 138
 139       if( fabs(replay->head->time-t) > fabs(replay->tail->time-t) ){
 140          replay->cursor = replay->tail->time;
 141          replay->cursor_frame = replay->tail;
 142       }
 143    }
 144
 145    f64 dir = t - replay->cursor;
 146    if( dir == 0.0 ) return;
 147    dir = vg_signf( dir );
 148
 149    u32 i=4096;
 150    while( i --> 0 ){
 151       if( dir < 0.0 )
 152          if( t > replay->cursor_frame->time ) break;
 153
 154       replay_frame *next;
 155       if( dir > 0.0 ) next = replay->cursor_frame->r;
 156       else            next = replay->cursor_frame->l;
 157
 158       if( !next ) break;
 159
 160       if( dir > 0.0 )
 161          if( t < next->time ) break;
 162
 163       replay->cursor_frame = next;
 164       replay->cursor = next->time;
 165
 166       if( !i ) return;
 167    }
 168
 169    replay->cursor = t;
 170 }
 171
 172 VG_STATIC replay_frame *replay_find_recent_stateframe( replay_buffer *replay ){
 173    replay_frame *frame = replay->cursor_frame;
 174    u32 i=4096;
 175    while( i --> 0 ){
 176       if( !frame ) return frame;
 177       if( frame->subsystem_gamestate_size ) return frame;
 178       frame = frame->l;
 179    }
 180
 181    return NULL;
 182 }
 183
 184 VG_STATIC f32 replay_subframe_time( replay_buffer *replay ){
 185    replay_frame *frame = replay->cursor_frame;
 186    if( !frame ) return 0.0f;
 187    replay_frame *next = frame->r;
 188    if( next ){
 189       f64 l = next->time - frame->time,
 190           t = (replay->cursor - frame->time) / l;
 191       return vg_clampf( t, 0.0f, 1.0f );
 192    }
 193    else
 194       return 0.0f;
 195 }
 196
 197 VG_STATIC void replay_get_frame_camera( replay_frame *frame, camera *cam ){
 198    cam->fov = frame->cam_fov;
 199    v3_copy( frame->cam_pos, cam->pos );
 200    v3_copy( frame->cam_angles, cam->angles );
 201 }
 202
 203 VG_STATIC void replay_get_camera( replay_buffer *replay, camera *cam ){
 204    cam->nearz = 0.1f;
 205    cam->farz = 100.0f;
 206    if( replay->cursor_frame ){
 207       replay_frame *next = replay->cursor_frame->r;
 208
 209       if( next ){
 210          camera temp;
 211
 212          replay_get_frame_camera( replay->cursor_frame, cam );
 213          replay_get_frame_camera( next, &temp );
 214          camera_lerp( cam, &temp, replay_subframe_time( replay ), cam );
 215       }
 216       else {
 217          replay_get_frame_camera( replay->cursor_frame, cam );
 218       }
 219    }
 220    else {
 221       v3_zero( cam->pos );
 222       v3_zero( cam->angles );
 223       cam->fov = 90.0f;
 224    }
 225 }
 226
 227 struct replay_rb{
 228    v3f co, v, w;
 229    v4f q;
 230 };
 231
 232 VG_STATIC
 233 void skaterift_record_frame( replay_buffer *replay, int force_gamestate ){
 234    f64 delta      = 9999999.9,
 235        statedelta = 9999999.9;
 236
 237    if( replay->head )
 238       delta = vg.time - replay->head->time;
 239
 240    if( replay->statehead )
 241       statedelta = vg.time - replay->statehead->time;
 242
 243    const f64 k_replay_rate = 1.0/30.0,
 244              k_gamestate_rate = 0.5;
 245
 246    int save_frame = 0,
 247        save_state = 0;
 248
 249    if( force_gamestate ) save_state = 1;
 250    if( statedelta > k_gamestate_rate ) save_state = 1;
 251    if( delta > k_replay_rate ) save_frame = 1;
 252    if( save_state ) save_frame = 1;
 253
 254    if( !save_frame ) return;
 255
 256    u32 gamestate_size = 0;
 257
 258    if( save_state ){
 259       gamestate_size = (u32 []){
 260          [k_player_subsystem_walk ] = sizeof(struct player_walk_state),
 261          [k_player_subsystem_drive] = 0,
 262          [k_player_subsystem_skate] = sizeof(struct player_skate_state),
 263          [k_player_subsystem_dead ] = localplayer.ragdoll.part_count *
 264                                        sizeof(struct replay_rb)
 265       }[ localplayer.subsystem ];
 266    }
 267
 268    replay_frame *frame = replay_newframe( replay, gamestate_size, 0 );
 269
 270    if( save_state ){
 271       replay_gamestate *gs = replay_frame_gamestate( frame );
 272       gs->system = localplayer.subsystem;
 273
 274       /* permanent block */
 275       memcpy( &gs->rb, &localplayer.rb, sizeof(rigidbody) );
 276       memcpy( &gs->cam_control, &localplayer.cam_control,
 277                sizeof(struct player_cam_controller) );
 278       v3_copy( localplayer.angles, gs->angles );
 279
 280       void *dst = replay_gamestate_subsystem_data( gs );
 281
 282       /* subsytem/dynamic block */
 283       if( localplayer.subsystem == k_player_subsystem_walk )
 284          memcpy( dst, &localplayer._walk.state, gamestate_size );
 285       else if( localplayer.subsystem == k_player_subsystem_skate )
 286          memcpy( dst, &localplayer._skate.state, gamestate_size );
 287       else if( localplayer.subsystem == k_player_subsystem_dead ){
 288          struct replay_rb *arr = dst;
 289          for( u32 i=0; i<localplayer.ragdoll.part_count; i ++ ){
 290             rigidbody *rb = &localplayer.ragdoll.parts[i].obj.rb;
 291             v3_copy( rb->co, arr[i].co );
 292             v3_copy( rb->w, arr[i].w );
 293             v3_copy( rb->v, arr[i].v );
 294             v4_copy( rb->q, arr[i].q );
 295          }
 296       }
 297    }
 298
 299    replay->cursor = vg.time;
 300    replay->cursor_frame = frame;
 301
 302    player_animation *res = &frame->anim;
 303    v3_zero( res->root_co );
 304    q_identity( res->root_q );
 305    res->type = k_player_animation_type_absolute;
 306
 307    struct skeleton *sk = &localplayer.playeravatar->sk;
 308
 309    memcpy( &frame->board_pose, &localplayer.board_pose,
 310             sizeof(localplayer.board_pose) );
 311    frame->time = vg.time;
 312    v3_copy( localplayer.cam.pos, frame->cam_pos );
 313
 314    if( localplayer.gate_waiting ){
 315       m4x3_mulv( localplayer.gate_waiting->transport,
 316                   frame->cam_pos, frame->cam_pos );
 317
 318       for( u32 i=1; i<sk->bone_count; i++ ){
 319          struct skeleton_bone *sb = &sk->bones[i];
 320          mdl_keyframe *kf = &res->pose[i-1];
 321          m4x3f mtx;
 322          m4x3_mul( localplayer.gate_waiting->transport, sk->final_mtx[i], mtx );
 323          m4x3_decompose( mtx, kf->co, kf->q, kf->s );
 324       }
 325    }
 326    else
 327       skeleton_decompose_mtx_absolute( sk, res->pose );
 328
 329    v3_copy( localplayer.cam.angles, frame->cam_angles );
 330    frame->cam_fov = localplayer.cam.fov;
 331 }
 332
 333 VG_STATIC
 334 void skaterift_restore_frame( replay_frame *frame ){
 335    replay_gamestate *gs = replay_frame_gamestate( frame );
 336    void *src = replay_gamestate_subsystem_data( gs );
 337
 338    /* TODO: Move this to subsystem bindings now that its variable */
 339    if( gs->system == k_player_subsystem_walk ){
 340       memcpy( &localplayer._walk.state, src,
 341               frame->subsystem_gamestate_size );
 342    }
 343    else if( gs->system == k_player_subsystem_skate ){
 344       memcpy( &localplayer._skate.state, src,
 345               frame->subsystem_gamestate_size );
 346    }
 347    else if( gs->system == k_player_subsystem_dead ){
 348       player__dead_transition( &localplayer );
 349       struct replay_rb *arr = src;
 350
 351       for( u32 i=0; i<localplayer.ragdoll.part_count; i ++ ){
 352          struct ragdoll_part *part = &localplayer.ragdoll.parts[i];
 353          rigidbody *rb = &part->obj.rb;
 354
 355          v3_copy( arr[i].co, rb->co );
 356          v3_copy( arr[i].w, rb->w );
 357          v3_copy( arr[i].v, rb->v );
 358          v4_copy( arr[i].q, rb->q );
 359
 360          v3_copy( arr[i].co, part->prev_co );
 361          v4_copy( arr[i].q, part->prev_q );
 362       }
 363    }
 364
 365    localplayer.subsystem = gs->system;
 366
 367    memcpy( &localplayer.rb, &gs->rb, sizeof(rigidbody) );
 368    v3_copy( gs->angles, localplayer.angles );
 369
 370    v3_copy( frame->cam_pos, localplayer.cam.pos );
 371    v3_copy( frame->cam_angles, localplayer.cam.angles );
 372    localplayer.cam.fov = frame->cam_fov;
 373
 374    memcpy( &localplayer.cam_control, &gs->cam_control,
 375             sizeof(struct player_cam_controller) );
 376
 377    /* chop end off replay */
 378    frame->r = NULL;
 379    skaterift.replay.statehead = frame;
 380    skaterift.replay.head = frame;
 381    skaterift.replay.cursor_frame = frame;
 382    skaterift.replay.cursor = frame->time;
 383    skaterift.replay_control = k_replay_control_scrub;
 384    skaterift.activity = k_skaterift_default;
 385    vg.time = frame->time;
 386 }
 387
 388 VG_STATIC void skaterift_replay_pre_update(void){
 389    if( skaterift.activity != k_skaterift_replay ) return;
 390
 391    if( skaterift.replay_control == k_replay_control_resume ){
 392       if( skaterift.replay.cursor_frame == skaterift.resume_target ||
 393           skaterift.replay.cursor_frame == NULL ){
 394          skaterift_restore_frame( skaterift.resume_target );
 395       }
 396       else {
 397          vg_slewf( &skaterift.resume_transition, 1.0f,
 398                    vg.time_frame_delta * (1.0f/1.0f) );
 399
 400          if( skaterift.resume_transition >= 1.0f )
 401             skaterift_restore_frame( skaterift.resume_target );
 402          else {
 403             f64 target = vg_lerp( skaterift.resume_begin,
 404                               skaterift.resume_target->time,
 405                               vg_smoothstepf( skaterift.resume_transition ) );
 406             replay_seek( &skaterift.replay, target );
 407          }
 408       }
 409    }
 410    else {
 411       if( button_down( k_srbind_replay_play ) )
 412          skaterift.replay_control = k_replay_control_play;
 413
 414       f32 target_speed = axis_state( k_sraxis_replay_h ) * 5.0;
 415
 416       if( fabsf(target_speed) > 0.01f )
 417          skaterift.replay_control = k_replay_control_scrub;
 418
 419       if( skaterift.replay_control == k_replay_control_play )
 420          target_speed = 1.0;
 421
 422       vg_slewf( &skaterift.track_velocity, target_speed,
 423                 10.0f*vg.time_frame_delta );
 424
 425       if( fabsf( skaterift.track_velocity ) > 0.0001f ){
 426          f64 target = skaterift.replay.cursor;
 427          target += skaterift.track_velocity * vg.time_frame_delta;
 428
 429          replay_seek( &skaterift.replay, target );
 430       }
 431
 432       if( button_down( k_srbind_replay_resume ) ){
 433          replay_frame *prev = replay_find_recent_stateframe(&skaterift.replay);
 434
 435          if( prev ){
 436             skaterift.replay_control = k_replay_control_resume;
 437             skaterift.resume_target = prev;
 438             skaterift.resume_begin = skaterift.replay.cursor;
 439             skaterift.resume_transition = 0.0f;
 440          }
 441       }
 442       else if( button_down( k_srbind_mback ) ){
 443          if( skaterift.replay.statehead )
 444             skaterift_restore_frame( skaterift.replay.statehead );
 445          else
 446             skaterift.activity = k_skaterift_default;
 447          srinput.enabled = 0;
 448       }
 449    }
 450 }
 451
 452 VG_STATIC void skaterift_replay_debug_info(void){
 453    player__debugtext( 2, "replay info" );
 454
 455    replay_buffer *replay = &skaterift.replay;
 456
 457    u32 head = 0,
 458        tail = 0;
 459    if( replay->tail ) tail = (void *)replay->tail - replay->data;
 460    if( replay->head ) head = (void *)replay->head - replay->data;
 461
 462    player__debugtext( 1, "head @%u | tail @%u\n", head, tail );
 463
 464    if( replay->statehead ){
 465       u32 state = (void *)replay->statehead - replay->data;
 466       player__debugtext( 1, "gs @%u\n", state );
 467       player__debugtext( 1, "gamestate_size: %u\n",
 468                          replay->statehead->subsystem_gamestate_size );
 469    }
 470    else
 471       player__debugtext( 1, "gs @NULL\n" );
 472
 473    f64 start = replay->cursor,
 474        end   = replay->cursor;
 475    if( replay->tail ) start = replay->tail->time;
 476    if( replay->head ) end = replay->head->time;
 477
 478    f64 cur = replay->cursor - start,
 479        len = end - start;
 480
 481    player__debugtext( 1, "cursor: %.2fs / %.2fs\n", cur, len );
 482 }
 483
 484 VG_STATIC void skaterift_replay_imgui(void){
 485    if( skaterift.activity != k_skaterift_replay ) return;
 486
 487    replay_buffer *replay = &skaterift.replay;
 488    f64 start = replay->cursor,
 489        end   = replay->cursor;
 490    if( replay->tail ) start = replay->tail->time;
 491    if( replay->head ) end = replay->head->time;
 492    f64 len = end - start,
 493        cur = (replay->cursor - start) / len;
 494
 495    char buffer[ 128 ];
 496
 497    /* mainbar */
 498    ui_px height = 32,
 499          cwidth = 2;
 500    ui_rect bar = { 0, 0, vg.window_x, height };
 501    ui_fill( bar, ui_colour( k_ui_bg ) );
 502
 503    /* cursor frame block */
 504    if( replay->cursor_frame ){
 505       if( replay->cursor_frame->r ){
 506          f64 l = (replay->cursor_frame->r->time-replay->cursor_frame->time)/len,
 507              s = (replay->cursor_frame->time - start) / len;
 508          ui_rect box = { s*(f64)vg.window_x, 0,
 509                          VG_MAX(4,(ui_px)(l*vg.window_x)), bar[3]+2 };
 510          ui_fill( box, ui_colour( k_ui_bg+4 ) );
 511       }
 512    }
 513
 514    /* cursor */
 515    ui_rect cusor = { cur * (f64)vg.window_x - (cwidth/2), 0,
 516                      cwidth, bar[3] };
 517    ui_fill( cusor, ui_colour( k_ui_bg+7 ) );
 518
 519    /* latest state marker */
 520    if( replay->statehead ){
 521       f64 t = (replay->statehead->time - start) / len;
 522       ui_rect tag = { t*(f64)vg.window_x, 0, 2, bar[3]+8 };
 523       ui_fill( tag, ui_colour( k_ui_green+k_ui_brighter ) );
 524    }
 525
 526    /* previous state marker */
 527    replay_frame *prev = replay_find_recent_stateframe( replay );
 528    if( prev ){
 529       f64 t = (prev->time - start) / len;
 530       ui_rect tag = { t*(f64)vg.window_x, 0, 2, bar[3]+8 };
 531       ui_fill( tag, ui_colour( k_ui_yellow+k_ui_brighter ) );
 532    }
 533
 534    cusor[1] -= height;
 535    cusor[2] = 200;
 536    snprintf( buffer, 128, "-%.2fs\n", (end-replay->cursor) );
 537    ui_text( cusor, buffer, 1, k_ui_align_middle_left, 0 );
 538
 539    snprintf( buffer, 128, "-%.2fs\n", len );
 540    ui_text( bar, buffer, 1, k_ui_align_middle_left, 0 );
 541    ui_text( bar, "0s", 1, k_ui_align_middle_right, 0 );
 542
 543 #if 0
 544    char buf[256];
 545    snprintf( buf, 256, "scrub: %s\nresume: %s\nplay: %s\n",
 546                axis_display_string( k_sraxis_replay_h ),
 547                button_display_string( k_srbind_replay_resume ),
 548                button_display_string( k_srbind_replay_play ) );
 549
 550    ui_rect info = { 0, vg.window_y-bar[3]-128, 256, 128 };
 551    ui_text( info, buf, 2,0,0 );
 552 #endif
 553
 554    gui_helper_action( axis_display_string(k_sraxis_replay_h), "scrub" );
 555    gui_helper_action( button_display_string(k_srbind_replay_resume), "resume" );
 556    gui_helper_action( button_display_string(k_srbind_replay_play), "play" );
 557 }
 558
 559 #endif /* PLAYER_REPLAY_C */