small refactor of model loading
[carveJwlIkooP6JGAAIwe30JlM.git] / world_load.c
1 #ifndef WORLD_LOAD_C
2 #define WORLD_LOAD_C
3
4 #include "world_load.h"
5 #include "world_routes.h"
6 #include "world_gate.h"
7 #include "ent_skateshop.h"
8 #include "addon.h"
9 #include "save.h"
10 #include "vg/vg_msg.h"
11 #include "network.h"
12 #include "player_remote.h"
13 #include "vg/vg_loader.h"
14
15 /*
16 * load the .mdl file located in path as a world instance
17 */
18 static void world_instance_load_mdl( u32 instance_id, const char *path ){
19 world_instance *world = &world_static.instances[ instance_id ];
20 world_init_blank( world );
21 world->status = k_world_status_loading;
22
23 vg_info( "Loading instance[%u]: %s\n", instance_id, path );
24
25 void *allocator = NULL;
26 if( instance_id == 0 ) allocator = world_static.heap;
27 else allocator = world_static.instances[instance_id-1].heap;
28
29 u32 heap_availible = vg_linear_remaining( allocator );
30 u32 min_overhead = sizeof(vg_linear_allocator);
31
32 if( heap_availible < (min_overhead+1024) ){
33 vg_fatal_error( "out of memory" );
34 }
35
36 u32 size = heap_availible - min_overhead;
37 void *heap = vg_create_linear_allocator( allocator, size, VG_MEMORY_SYSTEM );
38
39 world->heap = heap;
40 mdl_context *meta = &world->meta;
41
42 mdl_open( meta, path, world->heap );
43 mdl_load_metadata_block( meta, world->heap );
44 mdl_load_animation_block( meta, world->heap );
45 mdl_load_mesh_block( meta, world->heap );
46
47 vg_info( "%u\n", sizeof(ent_cubemap) );
48
49 MDL_LOAD_ARRAY( meta, &world->ent_gate, ent_gate, heap );
50 MDL_LOAD_ARRAY( meta, &world->ent_camera, ent_camera, heap );
51 MDL_LOAD_ARRAY( meta, &world->ent_spawn, ent_spawn, heap );
52 MDL_LOAD_ARRAY( meta, &world->ent_light, ent_light, heap );
53 MDL_LOAD_ARRAY( meta, &world->ent_route_node,ent_route_node, heap );
54 MDL_LOAD_ARRAY( meta, &world->ent_path_index,ent_path_index, heap );
55 MDL_LOAD_ARRAY( meta, &world->ent_checkpoint,ent_checkpoint, heap );
56 MDL_LOAD_ARRAY( meta, &world->ent_route, ent_route, heap );
57 MDL_LOAD_ARRAY( meta, &world->ent_water, ent_water, heap );
58 MDL_LOAD_ARRAY( meta, &world->ent_audio_clip,ent_audio_clip, heap );
59 MDL_LOAD_ARRAY( meta, &world->ent_audio, ent_audio, heap );
60 MDL_LOAD_ARRAY( meta, &world->ent_volume, ent_volume, heap );
61 MDL_LOAD_ARRAY( meta, &world->ent_traffic, ent_traffic, heap );
62 MDL_LOAD_ARRAY( meta, &world->ent_marker, ent_marker, heap );
63 MDL_LOAD_ARRAY( meta, &world->ent_skateshop, ent_skateshop, heap );
64 MDL_LOAD_ARRAY( meta, &world->ent_swspreview,ent_swspreview, heap );
65 MDL_LOAD_ARRAY( meta, &world->ent_ccmd, ent_ccmd, heap );
66 MDL_LOAD_ARRAY( meta, &world->ent_objective, ent_objective, heap );
67 MDL_LOAD_ARRAY( meta, &world->ent_challenge, ent_challenge, heap );
68 MDL_LOAD_ARRAY( meta, &world->ent_relay, ent_relay, heap );
69 MDL_LOAD_ARRAY( meta, &world->ent_cubemap, ent_cubemap, heap );
70 MDL_LOAD_ARRAY( meta, &world->ent_miniworld, ent_miniworld, heap );
71 MDL_LOAD_ARRAY( meta, &world->ent_prop, ent_prop, heap );
72 MDL_LOAD_ARRAY( meta, &world->ent_region, ent_region, heap );
73 MDL_LOAD_ARRAY( meta, &world->ent_glider, ent_glider, heap );
74 MDL_LOAD_ARRAY( meta, &world->ent_npc, ent_npc, heap );
75
76 mdl_array_ptr infos;
77 MDL_LOAD_ARRAY( meta, &infos, ent_worldinfo, vg_mem.scratch );
78
79 world->skybox = k_skybox_default;
80 if( mdl_arrcount(&infos) )
81 {
82 world->info = *((ent_worldinfo *)mdl_arritm(&infos,0));
83
84 if( world->meta.info.version >= 104 )
85 {
86 if( MDL_CONST_PSTREQ( &world->meta, world->info.pstr_skybox,"space"))
87 {
88 world->skybox = k_skybox_space;
89 }
90 }
91 }
92 else
93 {
94 world->info.pstr_author = 0;
95 world->info.pstr_desc = 0;
96 world->info.pstr_name = 0;
97 world->info.timezone = 0.0f;
98 world->info.flags = 0;
99 }
100
101 time_t seconds = time(NULL) % ((u32)vg_maxf(1.0f,k_day_length)*60);
102 world->time = ((f64)(seconds)/(k_day_length*60.0));
103 world->time += (world->info.timezone/24.0);
104
105 /* process resources from pack */
106 u64 t4 = SDL_GetPerformanceCounter();
107 world_gen_load_surfaces( world );
108 u64 t5 = SDL_GetPerformanceCounter();
109 world_gen_routes_ent_init( world );
110 world_gen_entities_init( world );
111 u64 t6 = SDL_GetPerformanceCounter();
112
113 /* main bulk */
114 u64 t0 = SDL_GetPerformanceCounter();
115 world_gen_generate_meshes( world );
116 u64 t1 = SDL_GetPerformanceCounter();
117 world_gen_routes_generate( instance_id );
118 u64 t2 = SDL_GetPerformanceCounter();
119 world_gen_compute_light_indices( world );
120 u64 t3 = SDL_GetPerformanceCounter();
121 mdl_close( meta );
122
123 u64 utime_mesh = t1-t0,
124 utime_route = t2-t1,
125 utime_indices = t3-t2,
126 utime_tex = t5-t4,
127 utime_ent = t6-t5,
128 ufreq = SDL_GetPerformanceFrequency();
129
130 f64 ftime_mesh = ((f64)utime_mesh / (f64)ufreq)*1000.0,
131 ftime_route = ((f64)utime_route / (f64)ufreq)*1000.0,
132 ftime_ind = ((f64)utime_route / (f64)ufreq)*1000.0,
133 ftime_tex = ((f64)utime_tex / (f64)ufreq)*1000.0,
134 ftime_ent = ((f64)utime_ent / (f64)ufreq)*1000.0;
135
136 vg_info( "wtime:mesh %.2fms route %.2fms ind %.2fms tex %.2fms ent %.2fms\n",
137 ftime_mesh, ftime_route, ftime_ind, ftime_tex, ftime_ent );
138
139 /* init player position.
140 * - this is overriden by the save state when(if) it loads */
141 world_default_spawn_pos( world, world->player_co );
142
143 /* allocate leaderboard buffers */
144 u32 bs = mdl_arrcount(&world->ent_route)*sizeof(struct leaderboard_cache);
145 world->leaderboard_cache = vg_linear_alloc( heap, bs );
146
147 for( u32 i=0; i<mdl_arrcount( &world->ent_route ); i ++ )
148 {
149 struct leaderboard_cache *board = &world->leaderboard_cache[i];
150 board->data = vg_linear_alloc( heap, NETWORK_REQUEST_MAX );
151 board->status = k_request_status_client_error;
152 board->cache_time = 0.0;
153 board->data_len = 0;
154 }
155
156 world->routes_ui = vg_linear_alloc( heap,
157 sizeof(struct route_ui)*mdl_arrcount(&world->ent_route) );
158
159 vg_async_call( async_world_postprocess, world, 0 );
160 vg_async_stall();
161 }
162
163 struct world_load_complete_data{
164 savedata_file save;
165 enum world_purpose purpose;
166 };
167
168 static void skaterift_world_load_done( void *payload, u32 size )
169 {
170 struct world_load_complete_data *data = payload;
171 world_instance *world = &world_static.instances[ data->purpose ];
172
173 vg_msg sav;
174 vg_msg_init( &sav, data->save.buf, data->save.len );
175
176 if( data->purpose != k_world_purpose_hub )
177 {
178 vg_msg player_frame = sav;
179 if( vg_msg_seekframe( &player_frame, "player" ) )
180 {
181 vg_msg_getkvvecf( &player_frame, "position", k_vg_msg_v3f,
182 world->player_co, NULL );
183 }
184 }
185
186 world_entity_start( world, &sav );
187 world->status = k_world_status_loaded;
188 world_static.load_state = k_world_loader_none;
189
190 if( world_static.clear_async_op_when_done )
191 {
192 skaterift.op = k_async_op_none;
193 world_static.clear_async_op_when_done = 0;
194 }
195 }
196
197 /*
198 * Does a complete world switch using the remaining free slots
199 */
200 void skaterift_world_load_thread( void *_args )
201 {
202 struct world_load_args args = *((struct world_load_args *)_args);
203
204 addon_reg *reg = args.reg;
205 world_static.instance_addons[ args.purpose ] = reg;
206
207 char uid[ADDON_UID_MAX];
208 addon_alias_uid( &reg->alias, uid );
209 vg_info( "LOAD WORLD %s @%d\n", uid, args.purpose );
210
211 char path_buf[4096];
212 vg_str path;
213 vg_strnull( &path, path_buf, 4096 );
214
215 addon_get_content_folder( reg, &path, 1 );
216
217 vg_str folder = path;
218 if( !vg_strgood( &folder ) ) {
219 vg_error( "Load target too long\n" );
220 return;
221 }
222
223 char worlds[k_world_max-1][4096];
224 u32 i=0;
225
226 vg_dir dir;
227 if( !vg_dir_open(&dir, folder.buffer) ){
228 vg_error( "opendir('%s') failed\n", folder.buffer );
229 return;
230 }
231
232 while( vg_dir_next_entry(&dir) ){
233 if( vg_dir_entry_type(&dir) == k_vg_entry_type_file ){
234 const char *d_name = vg_dir_entry_name(&dir);
235 if( d_name[0] == '.' ) continue;
236
237 vg_str file = folder;
238 vg_strcat( &file, "/" );
239 vg_strcat( &file, d_name );
240 if( !vg_strgood( &file ) ) continue;
241
242 char *ext = vg_strch( &file, '.' );
243 if( !ext ) continue;
244 if( strcmp(ext,".mdl") ) continue;
245
246 if( i == k_world_max-1 ){
247 vg_warn( "There are too many .mdl files in the map folder!(3)\n" );
248 break;
249 }
250
251 strcpy( worlds[i++], file.buffer );
252 }
253 }
254 vg_dir_close(&dir);
255
256 if( i == 0 ){
257 vg_warn( "There are no .mdl files in the map folder.\n" );
258 }
259
260 u32 first_index = 0;
261 for( u32 j=0; j<i; j++ ){
262 vg_str name = { .buffer = worlds[j], .i=strlen(worlds[j]),
263 sizeof(worlds[j]) };
264 char *fname = vg_strch( &name, '/' );
265 if( fname ){
266 if( !strcmp( fname+1, "main.mdl" ) ){
267 first_index = j;
268 }
269 }
270 }
271
272 world_instance_load_mdl( args.purpose, worlds[first_index] );
273
274 vg_async_item *final_call =
275 vg_async_alloc( sizeof(struct world_load_complete_data) );
276
277 struct world_load_complete_data *data = final_call->payload;
278 data->purpose = args.purpose;
279
280 skaterift_world_get_save_path( args.purpose, data->save.path );
281 savedata_file_read( &data->save );
282
283 vg_async_dispatch( final_call, skaterift_world_load_done );
284 vg_async_stall();
285 }
286
287 void skaterift_change_client_world_preupdate(void)
288 {
289 if( world_static.load_state != k_world_loader_preload )
290 return;
291
292 /* holding pattern before we can start loading the new world, since we might
293 * be waiting for audio to stop */
294 for( u32 i=1; i<k_world_max; i++ )
295 {
296 world_instance *inst = &world_static.instances[i];
297
298 if( inst->status == k_world_status_unloading )
299 {
300 if( world_freeable( inst ) )
301 {
302 world_free( inst );
303 }
304 return;
305 }
306 }
307
308 if( vg_loader_availible() )
309 {
310 vg_info( "worlds cleared, begining load\n" );
311 world_static.load_state = k_world_loader_load;
312
313 vg_linear_clear( vg_async.buffer );
314 struct world_load_args *args =
315 vg_linear_alloc( vg_async.buffer, sizeof(struct world_load_args) );
316 args->purpose = k_world_purpose_client;
317 args->reg = world_static.instance_addons[ k_world_purpose_client ];
318
319 /* this is replaces the already correct reg but we have to set it again
320 * TOO BAD */
321
322 /* finally can start the loader */
323 vg_loader_start( skaterift_world_load_thread, args );
324 }
325 }
326
327 /*
328 * places all loaded worlds into unloading state, pass NULL to reload the world
329 */
330 void skaterift_change_world_start( addon_reg *reg )
331 {
332 if( world_static.instance_addons[ k_world_purpose_client ] == reg )
333 {
334 vg_warn( "World is already loaded\n" );
335 return;
336 }
337
338 if( !reg )
339 {
340 if( world_static.instance_addons[ k_world_purpose_client ] )
341 {
342 reg = world_static.instance_addons[ k_world_purpose_client ];
343 world_static.clear_async_op_when_done = 1;
344 }
345 else
346 {
347 vg_warn( "No client world loaded\n" );
348 return;
349 }
350 }
351
352 world_static.load_state = k_world_loader_preload;
353
354 if( world_static.active_instance != 0 )
355 skaterift.op = k_async_op_clientloading;
356
357 char buf[76];
358 addon_alias_uid( &reg->alias, buf );
359 vg_info( "switching to: %s\n", buf );
360 skaterift_autosave(1);
361
362 vg_linear_clear( vg_mem.scratch ); /* ?? */
363 vg_info( "unloading old worlds\n" );
364
365 world_instance *client_world =
366 &world_static.instances[ k_world_purpose_client ];
367
368 if( client_world->status == k_world_status_loaded )
369 {
370 client_world->status = k_world_status_unloading;
371 world_fadeout_audio( client_world );
372 }
373
374 world_static.instance_addons[ k_world_purpose_client ] = reg;
375 network_send_item( k_netmsg_playeritem_world1 );
376 relink_all_remote_player_worlds();
377 world_unlink_nonlocal( &world_static.instances[k_world_purpose_hub] );
378 }
379
380 /* console command for the above function */
381 int skaterift_load_world_command( int argc, const char *argv[] )
382 {
383 if( !vg_loader_availible() )
384 {
385 vg_error( "Loading thread is currently unavailible\n" );
386 return 0;
387 }
388
389 if( argc == 1 )
390 {
391 if( !strcmp( argv[0], "reload" ) )
392 {
393 skaterift_change_world_start( NULL );
394 return 0;
395 }
396
397 addon_alias q;
398 addon_uid_to_alias( argv[0], &q );
399
400 u32 reg_id = addon_match( &q );
401 if( reg_id != 0xffffffff )
402 {
403 addon_reg *reg = get_addon_from_index( k_addon_type_world, reg_id, 0 );
404 skaterift_change_world_start( reg );
405 }
406 else
407 {
408 vg_error( "Addon '%s' is not installed or not found.\n", argv[0] );
409 }
410 }
411 else
412 {
413 vg_info( "worlds availible to load:\n" );
414
415 for( int i=0; i<addon_count(k_addon_type_world,0); i ++ )
416 {
417 addon_reg *w = get_addon_from_index( k_addon_type_world, i, 0);
418
419 char buf[ADDON_UID_MAX];
420 addon_alias_uid( &w->alias, buf );
421
422 if( w->flags & ADDON_REG_HIDDEN )
423 vg_info( " %s [hidden]\n", buf );
424 else
425 vg_info( " %s\n", buf );
426 }
427 }
428
429 return 0;
430 }
431
432 /*
433 * checks:
434 * 1. to see if all audios owned by the world have been stopped
435 * 2. that this is the least significant world
436 */
437 int world_freeable( world_instance *world )
438 {
439 if( world->status != k_world_status_unloading ) return 0;
440 u8 world_id = (world - world_static.instances) + 1;
441
442 for( u32 i=world_id; i<vg_list_size(world_static.instances); i++ ){
443 if( world_static.instances[i].status != k_world_status_unloaded ){
444 return 0;
445 }
446 }
447
448 int freeable = 1;
449 audio_lock();
450 for( u32 i=0; i<AUDIO_CHANNELS; i++ ){
451 audio_channel *ch = &vg_audio.channels[i];
452
453 if( ch->allocated && (ch->world_id == world_id)){
454 if( !audio_channel_finished( ch ) ){
455 freeable = 0;
456 break;
457 }
458 }
459 }
460 audio_unlock();
461 return freeable;
462 }
463
464 /*
465 * Free all resources for world instance
466 */
467 void world_free( world_instance *world )
468 {
469 vg_info( "Free world @%p\n", world );
470
471 /* free meshes */
472 mesh_free( &world->mesh_route_lines );
473 mesh_free( &world->mesh_geo );
474 mesh_free( &world->mesh_no_collide );
475 mesh_free( &world->mesh_water );
476
477 /* glDeleteBuffers silently ignores 0's and names that do not correspond to
478 * existing buffer objects.
479 * */
480 glDeleteBuffers( 1, &world->tbo_light_entities );
481 glDeleteTextures( 1, &world->tex_light_entities );
482 glDeleteTextures( 1, &world->tex_light_cubes );
483
484 /* delete textures and meshes */
485 glDeleteTextures( world->texture_count-1, world->textures+1 );
486
487 u32 world_index = world - world_static.instances;
488 if( world_index ){
489 vg_linear_del( world_static.instances[world_index-1].heap,
490 vg_linear_header(world->heap) );
491 }
492
493 for( u32 i=0; i<mdl_arrcount(&world->ent_cubemap); i++ ){
494 ent_cubemap *cm = mdl_arritm(&world->ent_cubemap,i);
495 glDeleteTextures( 1, &cm->texture_id );
496 glDeleteFramebuffers( 1, &cm->framebuffer_id );
497 glDeleteRenderbuffers( 1, &cm->renderbuffer_id );
498 }
499
500 world->status = k_world_status_unloaded;
501 }
502
503 /*
504 * reset the world structure without deallocating persistent buffers
505 * TODO: Make this a memset(0), and have persistent items live in a static loc
506 */
507 void world_init_blank( world_instance *world )
508 {
509 memset( &world->meta, 0, sizeof(mdl_context) );
510
511 world->textures = NULL;
512 world->texture_count = 0;
513 world->surfaces = NULL;
514 world->surface_count = 0;
515
516 world->geo_bh = NULL;
517 world->entity_bh = NULL;
518 world->entity_list = NULL;
519 world->rendering_gate = NULL;
520
521 world->water.enabled = 0;
522 world->time = 0.0;
523
524 /* default lighting conditions
525 * -------------------------------------------------------------*/
526 struct ub_world_lighting *state = &world->ub_lighting;
527
528 state->g_light_preview = 0;
529 state->g_shadow_samples = 8;
530 state->g_water_fog = 0.04f;
531
532 v4_zero( state->g_water_plane );
533 v4_zero( state->g_depth_bounds );
534
535 state->g_shadow_length = 9.50f;
536 state->g_shadow_spread = 0.65f;
537
538 #if 0
539 /* 2023 style */
540 v3_copy( (v3f){0.37f, 0.54f, 0.97f}, state->g_daysky_colour );
541 v3_copy( (v3f){0.03f, 0.05f, 0.20f}, state->g_nightsky_colour );
542 v3_copy( (v3f){1.00f, 0.32f, 0.01f}, state->g_sunset_colour );
543 v3_copy( (v3f){0.13f, 0.17f, 0.35f}, state->g_ambient_colour );
544 v3_copy( (v3f){0.25f, 0.17f, 0.51f}, state->g_sunset_ambient );
545 v3_copy( (v3f){1.10f, 0.89f, 0.35f}, state->g_sun_colour );
546 #else
547 /* 2024 style */
548 v3_copy( (v3f){0.308f, 0.543f, 0.904f}, state->g_daysky_colour );
549 v3_copy( (v3f){0.030f, 0.050f, 0.200f}, state->g_nightsky_colour );
550 v3_copy( (v3f){1.000f, 0.320f, 0.010f}, state->g_sunset_colour );
551 v3_copy( (v3f){0.130f, 0.170f, 0.350f}, state->g_ambient_colour );
552 v3_copy( (v3f){0.25f, 0.17f, 0.51f}, state->g_sunset_ambient );
553 v3_copy( (v3f){1.000f, 0.809f, 0.318f}, state->g_sun_colour );
554 #endif
555 }
556
557 #endif /* WORLD_LOAD_C */