int tree_main()
#endif
{ start_time(); ; assert((layer)); if (tree_factor<0) tree_factor = -tree_factor; /*;void)
int tree_main();*/ if (tree_factor>1.0) { gs_ide2017 = (int)(10.0/tree_factor); gs_ide2016 = 10; /*;ime();
;;*/ } else { gs_ide2016 = (int)(tree_factor*10.0); gs_ide2017 = 10; } if ((gs_ide2016 ==0)||(gs_ide2017 ==0)) { /*;gs_ide2016 = 10;
};*/ tree_factor = 0.5; gs_ide2016 = 1; gs_ide2017 = 2; } gs_wait_message('T'); /*;}
_ide2016 ==0)||(gs_ide2017 ==0)) {;*/ if (!gs_ide2009 ()) { stop_time("tree_main"); return(0); } gs_wait_message('T'); /*;}
_message('T');;*/ gs_ide2000 (); gs_ide2004 (); calc_all_node_sizes(); alloc_levelshift(); /*;return(0);
};*/ gs_ide2014 = (GNODE *)tpred_connection1; gs_ide2018 (); gs_ide2015 (); /*;
gs_ide2004 ();;*/ gs_wait_message('T'); gs_ide2013 (); calc_all_ports(1); nr_crossings = 0; /*;)tpred_connection1;
gs_ide2018 ();;*/ stop_time("tree_main"); return(TREE_LAYOUT); }
void draw_main()
#endif
{
debugmessage("draw_main","");
start_time();
draw_nodes();
stop_time("draw_main draw_nodes");
start_time();
draw_edges();
stop_time("draw_main draw_edges");
}
void save_screen_shot(int automap_flag)
{
static int savenum=0;
char savename[13+sizeof(SCRNS_DIR)];
unsigned char *buf;
if (!GameArg.DbgGlReadPixelsOk){
if (!automap_flag)
HUD_init_message_literal(HM_DEFAULT, "glReadPixels not supported on your configuration");
return;
}
stop_time();
if (!PHYSFSX_exists(SCRNS_DIR,0))
PHYSFS_mkdir(SCRNS_DIR); //try making directory
do
{
sprintf(savename, "%sscrn%04d.tga",SCRNS_DIR, savenum++);
} while (PHYSFSX_exists(savename,0));
if (!automap_flag)
HUD_init_message(HM_DEFAULT, "%s 'scrn%04d.tga'", TXT_DUMPING_SCREEN, savenum-1 );
#ifndef OGLES
glReadBuffer(GL_FRONT);
#endif
buf = d_malloc(grd_curscreen->sc_w*grd_curscreen->sc_h*3);
write_bmp(savename,grd_curscreen->sc_w,grd_curscreen->sc_h,buf);
d_free(buf);
start_time();
}
int GotoGameScreen()
{
stop_time();
//@@ init_player_stats();
//@@
//@@ Player_init.pos = Player->pos;
//@@ Player_init.orient = Player->orient;
//@@ Player_init.segnum = Player->segnum;
// -- must always save gamesave.sav because the restore-objects code relies on it
// -- that code could be made smarter and use the original file, if appropriate.
// if (mine_changed)
if (gamestate_not_restored == 0) {
gamestate_not_restored = 1;
save_level("GAMESAVE.LVL");
editor_status("Gamestate saved.\n");
}
ai_reset_all_paths();
start_time();
ModeFlag = 3;
return 1;
}
void redbook_first_song_func()
{
stop_time();
Song_playing = -1; // Playing Redbook tracks will not modify Song_playing. To repeat we must reset this so songs_play_level_song does not think we want to re-play the same song again.
songs_play_level_song(1, 0);
start_time();
}
int state_save_all(int between_levels)
{
char filename[128], desc[DESC_LENGTH+1];
if ( Game_mode & GM_MULTI ) {
#ifdef MULTI_SAVE
if ( FindArg( "-multisave" ) )
multi_initiate_save_game();
else
#endif
HUD_init_message( "Can't save in a multiplayer game!" );
return 0;
}
mprintf(( 0, "CL=%d, NL=%d\n", Current_level_num, Next_level_num ));
stop_time();
if (!state_get_save_file(filename,desc,0)) {
start_time();
return 0;
}
return state_save_all_sub(filename, desc, between_levels);
}
void joy_delay()
{
stop_time();
// timer_delay(.25);
delay(250); // changed by allender because 1) more portable
// 2) was totally broken on PC
joy_flush();
start_time();
}
double
Stop_time(void)
{
double clockus;
if ( (clockus = stop_time()) == 0.0)
err_sys("stop_time error");
return(clockus);
}
const device_addr_t& xport_benchmarker::benchmark_throughput_chdr(
zero_copy_if::sptr tx_transport,
zero_copy_if::sptr rx_transport,
uint32_t sid,
bool big_endian,
uint32_t duration_ms)
{
vrt::if_packet_info_t pkt_info;
_initialize_chdr(tx_transport, rx_transport, sid, pkt_info);
_reset_counters();
boost::posix_time::ptime start_time(boost::posix_time::microsec_clock::local_time());
_tx_thread.reset(new boost::thread(boost::bind(&xport_benchmarker::_stream_tx,
this,
tx_transport.get(),
&pkt_info,
big_endian)));
_rx_thread.reset(new boost::thread(boost::bind(&xport_benchmarker::_stream_rx,
this,
rx_transport.get(),
&pkt_info,
big_endian)));
std::this_thread::sleep_for(std::chrono::milliseconds(duration_ms));
_tx_thread->interrupt();
_rx_thread->interrupt();
_tx_thread->join();
_rx_thread->join();
boost::posix_time::ptime stop_time(boost::posix_time::microsec_clock::local_time());
double duration_s = ((double)(stop_time - start_time).total_microseconds()) / 1e6;
uint64_t tx_bytes = pkt_info.num_payload_words32 * sizeof(uint32_t) * _num_tx_packets;
uint64_t rx_bytes = pkt_info.num_payload_words32 * sizeof(uint32_t) * _num_rx_packets;
double tx_rate = (((double)tx_bytes) / duration_s);
double rx_rate = (((double)rx_bytes) / duration_s);
_results["TX-Bytes"] = (boost::format("%.2fMB") % (tx_bytes / (1024 * 1024))).str();
_results["RX-Bytes"] = (boost::format("%.2fMB") % (rx_bytes / (1024 * 1024))).str();
_results["TX-Throughput"] =
(boost::format("%.2fMB/s") % (tx_rate / (1024 * 1024))).str();
_results["RX-Throughput"] =
(boost::format("%.2fMB/s") % (rx_rate / (1024 * 1024))).str();
_results["TX-Timeouts"] = std::to_string(_num_tx_timeouts);
_results["RX-Timeouts"] = std::to_string(_num_rx_timeouts);
_results["Data-Errors"] = std::to_string(_num_data_errors);
return _results;
}
void
sig_term(int signo)
{
double st; // stop time
if ((st = stop_time()) == 0.0) {
perror("stop_time error");
exit(1);
}
printf("latency: %.3f usec\n", st / nloop);
if (kill(childpid, SIGTERM) == -1) {
perror("kill error");
exit(1);
}
exit(0);
}
// Returns 1 if OK to trash current mine.
int SafetyCheck()
{
int x;
if (mine_changed) {
stop_time();
x = nm_messagebox( "Warning!", 2, "Cancel", "OK", "You are about to lose work." );
if (x<1) {
start_time();
return 0;
}
start_time();
}
return 1;
}
void save_screen_shot(int automap_flag)
{
// fix t1;
char message[100];
static int savenum=0;
char savename[13];
unsigned char *buf;
if (!ogl_readpixels_ok) {
if (!automap_flag)
hud_message(MSGC_GAME_FEEDBACK,"glReadPixels not supported on your configuration");
return;
}
stop_time();
//added/changed on 10/31/98 by Victor Rachels to fix overwrite each new game
if ( savenum == 9999 ) savenum = 0;
sprintf(savename,"scrn%04d.tga",savenum++);
while(!access(savename,0))
{
if ( savenum == 9999 ) savenum = 0;
sprintf(savename,"scrn%04d.tga",savenum++);
}
sprintf( message, "%s '%s'", TXT_DUMPING_SCREEN, savename );
//end this section addition/change - Victor Rachels
if (automap_flag) {
// save_font = grd_curcanv->cv_font;
// gr_set_curfont(GAME_FONT);
// gr_set_fontcolor(gr_find_closest_color_current(0,31,0),-1);
// gr_get_string_size(message,&w,&h,&aw);
// modex_print_message(32, 2, message);
} else {
hud_message(MSGC_GAME_FEEDBACK,message);
}
buf = malloc(grd_curscreen->sc_w*grd_curscreen->sc_h*3);
glReadBuffer(GL_FRONT);
glReadPixels(0,0,grd_curscreen->sc_w,grd_curscreen->sc_h,GL_RGB,GL_UNSIGNED_BYTE,buf);
write_bmp(savename,grd_curscreen->sc_w,grd_curscreen->sc_h,buf);
free(buf);
key_flush();
start_time();
}
//this should be called regularly to check for redbook restart
//ideally, this would be handled by a hook
void songs_check_redbook_repeat()
{
static fix last_check_time;
fix current_time;
if (!Redbook_playing || GameCfg.MusicVolume==0) return;
current_time = timer_get_fixed_seconds();
if (current_time < last_check_time || (current_time - last_check_time) >= F2_0) {
if (!RBAPeekPlayStatus() && (Redbook_playing != REDBOOK_ENDLEVEL_TRACK)) {
stop_time();
play_redbook_track(Redbook_playing, 0);
start_time();
}
last_check_time = current_time;
}
}
void roundrobin(){
while(!isEmpty(readyq)){
struct mythread_t *to_run = dequeue(readyq);
current = to_run;
struct mythread_t *prev = to_run;
start_time();
swapcontext(&(maint->uc), &(to_run->uc));
stop_time();
printf("completed a run of roundrobin \n");
if(!current->completed){
enqueue(readyq,current);
}
}
}
// -----------------------------------------------------------------------------
void say_totals_all(void)
{
int i;
FILE *my_file;
my_file = fopen( "levels.all", "wt" );
// -- mprintf((1, "Fileno = %i\n", fileno(my_file)));
if (!my_file) {
char ErrorMessage[200];
sprintf( ErrorMessage, "ERROR: Unable to open levels.all\nErrno=%i", errno );
stop_time();
gr_palette_load(gr_palette);
nm_messagebox( NULL, 1, "Ok", ErrorMessage );
start_time();
return;
}
for (i=First_dump_level; i<=Last_dump_level; i++) {
mprintf((0, "Level %i\n", i+1));
load_level(Adam_level_names[i]);
say_totals(my_file, Adam_level_names[i]);
}
//--05/17/95-- for (i=0; i<NUM_SHAREWARE_LEVELS; i++) {
//--05/17/95-- mprintf((0, "Level %i\n", i+1));
//--05/17/95-- load_level(Shareware_level_names[i]);
//--05/17/95-- say_totals(my_file, Shareware_level_names[i]);
//--05/17/95-- }
//--05/17/95--
//--05/17/95-- for (i=0; i<NUM_REGISTERED_LEVELS; i++) {
//--05/17/95-- mprintf((0, "Level %i\n", i+1+NUM_SHAREWARE_LEVELS));
//--05/17/95-- load_level(Registered_level_names[i]);
//--05/17/95-- say_totals(my_file, Registered_level_names[i]);
//--05/17/95-- }
fclose(my_file);
}
bool RunData::decodeMessage(const uint8_t *buf) {
auto runData = GetRunInfo(buf);
if (runData->info_type_type() == InfoTypes_RunStart) {
auto runStartData = static_cast<const RunStart *>(runData->info_type());
setStartTimeInNanoseconds(runStartData->start_time());
setInstrumentName(runStartData->instrument_name()->str());
setRunNumber(runStartData->run_number());
setNumberOfPeriods(runStartData->n_periods());
return true;
}
if (runData->info_type_type() == InfoTypes_RunStop) {
auto runStopData = static_cast<const RunStop *>(runData->info_type());
setStopTime(runStopData->stop_time());
return true;
}
return false; // this is not a RunData message
}
void bench_child(state_t *state)
{
int i,j,flag=0;//flag=0 : one way ;1:two way
for(j=state->min_bytes;j<=state->max_bytes;j+=state->step_size){
start_time();
bench_send();
for(i=0;i<state->repetitions-1;++i){
bench_send();
}
}
sleep(10);
flag=1;
for(j=state->min_bytes;j<=state->max_bytes;j+=state->step_size){
start_time();
for(i=0;i<state->repetitions;++i){
bench_send(flag);
}
stop_time();
bench_out();
}
}
int state_restore_all(int in_game)
{
char filename[128];
if ( Game_mode & GM_MULTI ) {
#ifdef MULTI_SAVE
if ( FindArg( "-multisave" ) )
multi_initiate_restore_game();
else
#endif
HUD_init_message( "Can't restore in a multiplayer game!" );
return 0;
}
if ( Newdemo_state == ND_STATE_RECORDING )
newdemo_stop_recording();
if ( Newdemo_state != ND_STATE_NORMAL )
return 0;
stop_time();
if (!state_get_restore_file(filename,0)) {
start_time();
return 0;
}
if ( in_game ) {
int choice;
choice = nm_messagebox( NULL, 2, "Yes", "No", "Restore Game?" );
if ( choice != 0 ) {
start_time();
return 0;
}
}
start_time();
return state_restore_all_sub(filename, 0);
}
void piggy_bitmap_page_in( bitmap_index bitmap )
{
grs_bitmap * bmp;
int i,org_i;
org_i = 0;
i = bitmap.index;
Assert( i >= 0 );
Assert( i < MAX_BITMAP_FILES );
Assert( i < Num_bitmap_files );
Assert( Piggy_bitmap_cache_size > 0 );
if ( i < 1 ) return;
if ( i >= MAX_BITMAP_FILES ) return;
if ( i >= Num_bitmap_files ) return;
if ( GameBitmapOffset[i] == 0 ) return; // A read-from-disk bitmap!!!
if ( GameArg.SysLowMem ) {
org_i = i;
i = GameBitmapXlat[i]; // Xlat for low-memory settings!
}
bmp = &GameBitmaps[i];
if ( bmp->bm_flags & BM_FLAG_PAGED_OUT ) {
stop_time();
ReDoIt:
descent_critical_error = 0;
PHYSFSX_fseek( Piggy_fp, GameBitmapOffset[i], SEEK_SET );
if ( descent_critical_error ) {
piggy_critical_error();
goto ReDoIt;
}
gr_set_bitmap_flags (bmp, GameBitmapFlags[i]);
gr_set_bitmap_data (bmp, &Piggy_bitmap_cache_data [Piggy_bitmap_cache_next]);
if ( bmp->bm_flags & BM_FLAG_RLE ) {
int zsize = 0;
descent_critical_error = 0;
zsize = PHYSFSX_readInt(Piggy_fp);
if ( descent_critical_error ) {
piggy_critical_error();
goto ReDoIt;
}
// GET JOHN NOW IF YOU GET THIS ASSERT!!!
Assert( Piggy_bitmap_cache_next+zsize < Piggy_bitmap_cache_size );
if ( Piggy_bitmap_cache_next+zsize >= Piggy_bitmap_cache_size ) {
piggy_bitmap_page_out_all();
goto ReDoIt;
}
memcpy( &Piggy_bitmap_cache_data[Piggy_bitmap_cache_next], &zsize, sizeof(int) );
Piggy_bitmap_cache_next += sizeof(int);
descent_critical_error = 0;
PHYSFS_read( Piggy_fp, &Piggy_bitmap_cache_data[Piggy_bitmap_cache_next], 1, zsize-4 );
if ( descent_critical_error ) {
piggy_critical_error();
goto ReDoIt;
}
if (MacPig)
{
rle_swap_0_255(bmp);
memcpy(&zsize, bmp->bm_data, 4);
}
Piggy_bitmap_cache_next += zsize-4;
} else {
// GET JOHN NOW IF YOU GET THIS ASSERT!!!
Assert( Piggy_bitmap_cache_next+(bmp->bm_h*bmp->bm_w) < Piggy_bitmap_cache_size );
if ( Piggy_bitmap_cache_next+(bmp->bm_h*bmp->bm_w) >= Piggy_bitmap_cache_size ) {
piggy_bitmap_page_out_all();
goto ReDoIt;
}
descent_critical_error = 0;
PHYSFS_read( Piggy_fp, &Piggy_bitmap_cache_data[Piggy_bitmap_cache_next], 1, bmp->bm_h*bmp->bm_w );
if ( descent_critical_error ) {
piggy_critical_error();
goto ReDoIt;
}
if (MacPig)
swap_0_255(bmp);
Piggy_bitmap_cache_next+=bmp->bm_h*bmp->bm_w;
}
#ifdef BITMAP_SELECTOR
if ( bmp->bm_selector ) {
if (!dpmi_modify_selector_base( bmp->bm_selector, bmp->bm_data ))
Error( "Error modifying selector base in piggy.c\n" );
}
#endif
compute_average_rgb(bmp, bmp->avg_color_rgb);
start_time();
}
if ( GameArg.SysLowMem ) {
if ( org_i != i )
GameBitmaps[org_i] = GameBitmaps[i];
}
}
void piggy_bitmap_page_in( bitmap_index bitmap )
{
grs_bitmap * bmp;
int i,org_i,temp;
i = bitmap.index;
Assert( i >= 0 );
Assert( i < MAX_BITMAP_FILES );
Assert( i < Num_bitmap_files );
Assert( Piggy_bitmap_cache_size > 0 );
if ( i < 1 ) return;
if ( i >= MAX_BITMAP_FILES ) return;
if ( i >= Num_bitmap_files ) return;
if ( GameBitmapOffset[i] == 0 ) return; // A read-from-disk bitmap!!!
if ( piggy_low_memory ) {
org_i = i;
i = GameBitmapXlat[i]; // Xlat for low-memory settings!
}
bmp = &GameBitmaps[i];
if ( bmp->bm_flags & BM_FLAG_PAGED_OUT ) {
stop_time();
ReDoIt:
descent_critical_error = 0;
cfseek(Piggy_fp, GameBitmapOffset[i], SEEK_SET);
if ( descent_critical_error ) {
piggy_critical_error();
goto ReDoIt;
}
bmp->bm_data = &Piggy_bitmap_cache_data[Piggy_bitmap_cache_next];
bmp->bm_flags = GameBitmapFlags[i];
if ( bmp->bm_flags & BM_FLAG_RLE ) {
int zsize = 0;
descent_critical_error = 0;
// This fails consistently the first time it's called...
// Would be nice to not have to redo every time
temp = cfread( &zsize, 1, sizeof(int), Piggy_fp );
if (temp == EOF)
goto ReDoIt;
if ( descent_critical_error ) {
piggy_critical_error();
goto ReDoIt;
}
// GET JOHN NOW IF YOU GET THIS ASSERT!!!
Assert( Piggy_bitmap_cache_next+zsize < Piggy_bitmap_cache_size );
if ( Piggy_bitmap_cache_next+zsize >= Piggy_bitmap_cache_size ) {
piggy_bitmap_page_out_all();
goto ReDoIt;
}
memcpy( &Piggy_bitmap_cache_data[Piggy_bitmap_cache_next], &zsize, sizeof(int) );
Piggy_bitmap_cache_next += sizeof(int);
descent_critical_error = 0;
temp = cfread( &Piggy_bitmap_cache_data[Piggy_bitmap_cache_next], 1, zsize-4, Piggy_fp );
if ( descent_critical_error ) {
piggy_critical_error();
goto ReDoIt;
}
Piggy_bitmap_cache_next += zsize-4;
} else {
// GET JOHN NOW IF YOU GET THIS ASSERT!!!
Assert( Piggy_bitmap_cache_next+(bmp->bm_h*bmp->bm_w) < Piggy_bitmap_cache_size );
if ( Piggy_bitmap_cache_next+(bmp->bm_h*bmp->bm_w) >= Piggy_bitmap_cache_size ) {
piggy_bitmap_page_out_all();
goto ReDoIt;
}
descent_critical_error = 0;
temp = cfread( &Piggy_bitmap_cache_data[Piggy_bitmap_cache_next], 1, bmp->bm_h*bmp->bm_w, Piggy_fp );
if ( descent_critical_error ) {
piggy_critical_error();
goto ReDoIt;
}
Piggy_bitmap_cache_next+=bmp->bm_h*bmp->bm_w;
}
if ( bmp->bm_selector ) {
if (!dpmi_modify_selector_base( bmp->bm_selector, bmp->bm_data ))
Error( "Error modifying selector base in piggy.c\n" );
}
start_time();
}
if ( piggy_low_memory ) {
if ( org_i != i )
GameBitmaps[org_i] = GameBitmaps[i];
}
}
void redbook_repeat_func()
{
stop_time();
RBAPlayTracks(Redbook_playing, 0, redbook_repeat_func);
start_time();
}
int
main(int argc, char **argv)
{
int i, nprocs;
pid_t childpid[MAXNPROC];
double st; // stop time
if (argc != 3) {
fprintf(stderr, "usage: incr_pxsem7 <#loops> <#processes>\n");
exit(1);
}
nloop = atoi(argv[1]);
nprocs = min(atoi(argv[2]), MAXNPROC);
/* 4get shared memory for parent and children */
if ((shared = my_shm(sizeof(struct shared))) == MAP_FAILED) {
perror("my_shm error");
exit(1);
}
/* 4initialize named semaphore to 0 */
sem_unlink(NAME); /* error OK */
if ((pmutex = sem_open(NAME, O_CREAT | O_EXCL, FILE_MODE, 0)) == SEM_FAILED) {
fprintf(stderr, "sem_open error for %s: %s\n", NAME, strerror(errno));
exit(1);
}
/* 4create all the children */
for (i = 0; i < nprocs; i++) {
if ( (childpid[i] = fork()) == -1) {
perror("fork error");
exit(1);
} else if (childpid[i] == 0) {
if (sem_close(pmutex) == -1) { /* the one kept open by fork() */
perror("sem_close error");
exit(1);
}
if ((cmutex = sem_open(NAME, 0)) == SEM_FAILED) {
fprintf(stderr, "sem_open error for %s: %s\n", NAME, strerror(errno));
exit(1);
}
incr(NULL);
exit(0);
}
}
/* 4parent: start the timer and release the semaphore */
if (start_time() == -1) {
perror("start_time error");
exit(1);
}
if (sem_post(pmutex) == -1) {
perror("sem_post error");
exit(1);
}
/* 4wait for all the children */
for (i = 0; i < nprocs; i++) {
if (waitpid(childpid[i], NULL, 0) == -1) {
perror("waitpid error");
exit(1);
}
}
if ((st = stop_time()) == 0.0) {
perror("stop_time error");
exit(1);
}
printf("microseconds: %.0f usec\n", st);
if (shared->counter != nloop * nprocs)
printf("error: counter = %ld\n", shared->counter);
if (sem_unlink(NAME) == -1) {
perror("sem_unlink error");
exit(1);
}
exit(0);
}
int
main(int argc, char **argv)
{
int i, nprocs;
pid_t childpid[MAXNPROC];
double st; // stop time
if (argc != 3) {
fprintf(stderr, "usage: incr_pxsem9 <#loops> <#processes>\n");
exit(1);
}
nloop = atoi(argv[1]);
nprocs = min(atoi(argv[2]), MAXNPROC);
/* 4get shared memory for parent and children */
if ((shared = my_shm(sizeof(struct shared))) == MAP_FAILED) {
perror("my_shm error");
exit(1);
}
/* 4initialize memory-based semaphore to 0 */
if (sem_init(&mutex, 1, 0) == -1) {
perror("sem_init error");
exit(1);
}
/* 4create all the children */
for (i = 0; i < nprocs; i++) {
if ( (childpid[i] = fork()) == -1) {
perror("fork error");
exit(1);
} else if (childpid[i] == 0) {
incr(NULL);
exit(0);
}
}
/* 4parent: start the timer and release the semaphore */
if (start_time() == -1) {
perror("start_time error");
exit(1);
}
if (sem_post(&mutex) == -1) {
perror("sem_post error");
exit(1);
}
/* 4wait for all the children */
for (i = 0; i < nprocs; i++) {
if (waitpid(childpid[i], NULL, 0) == -1) {
perror("waitpid error");
exit(1);
}
}
if ((st = stop_time()) == 0.0) {
perror("stop_time error");
exit(1);
}
printf("microseconds: %.0f usec\n", st);
if (shared->counter != nloop * nprocs)
printf("error: counter = %ld\n", shared->counter);
exit(0);
}
// -----------------------------------------------------------------------------------
// blind_save means don't prompt user for any info.
int state_save_all(int between_levels, int secret_save, char *filename_override, int blind_save)
{
int rval, filenum = -1;
char filename[128], desc[DESC_LENGTH+1];
Assert(between_levels == 0); //between levels save ripped out
#ifdef NETWORK
if ( Game_mode & GM_MULTI ) {
multi_initiate_save_game();
return 0;
}
#endif
if ((Current_level_num < 0) && (secret_save == 0)) {
HUD_init_message( "Can't save in secret level!" );
return 0;
}
if (Final_boss_is_dead) //don't allow save while final boss is dying
return 0;
mprintf(( 0, "CL=%d, NL=%d\n", Current_level_num, Next_level_num ));
// If this is a secret save and the control center has been destroyed, don't allow
// return to the base level.
if (secret_save && (Control_center_destroyed)) {
mprintf((0, "Deleting secret.sgb so player can't return to base level.\n"));
PHYSFS_delete(PLAYER_DIR "secret.sgb");
return 0;
}
stop_time();
if (secret_save == 1) {
filename_override = filename;
sprintf(filename_override, PLAYER_DIR "secret.sgb");
} else if (secret_save == 2) {
filename_override = filename;
sprintf(filename_override, PLAYER_DIR "secret.sgc");
} else {
if (filename_override) {
strcpy( filename, filename_override);
sprintf(desc, "[autosave backup]");
}
else if (!(filenum = state_get_save_file(filename, desc, 0, blind_save)))
{
start_time();
return 0;
}
}
// MK, 1/1/96
// If not in multiplayer, do special secret level stuff.
// If secret.sgc exists, then copy it to Nsecret.sgc (where N = filenum).
// If it doesn't exist, then delete Nsecret.sgc
if (!secret_save && !(Game_mode & GM_MULTI)) {
int rval;
char temp_fname[32], fc;
if (filenum != -1) {
if (filenum >= 10)
fc = (filenum-10) + 'a';
else
fc = '0' + filenum;
sprintf(temp_fname, PLAYER_DIR "%csecret.sgc", fc);
mprintf((0, "Trying to copy secret.sgc to %s.\n", temp_fname));
if (PHYSFS_exists(temp_fname))
{
mprintf((0, "Deleting file %s\n", temp_fname));
if (!PHYSFS_delete(temp_fname))
Error("Cannot delete file <%s>: %s", temp_fname, PHYSFS_getLastError());
}
if (PHYSFS_exists(PLAYER_DIR "secret.sgc"))
{
mprintf((0, "Copying secret.sgc to %s.\n", temp_fname));
rval = copy_file(PLAYER_DIR "secret.sgc", temp_fname);
Assert(rval == 0); // Oops, error copying secret.sgc to temp_fname!
}
}
}
// Save file we're going to save over in last slot and call "[autosave backup]"
if (!filename_override) {
PHYSFS_file *tfp;
tfp = PHYSFSX_openWriteBuffered(filename);
if ( tfp ) {
char newname[128];
sprintf( newname, PLAYER_DIR "%s.sg%x", Players[Player_num].callsign, NUM_SAVES );
PHYSFS_seek(tfp, DESC_OFFSET);
PHYSFS_write(tfp, "[autosave backup]", sizeof(char) * DESC_LENGTH, 1);
PHYSFS_close(tfp);
PHYSFS_delete(newname);
PHYSFSX_rename(filename, newname);
}
}
rval = state_save_all_sub(filename, desc, between_levels);
if (rval && !secret_save)
HUD_init_message("Game saved.");
return rval;
}
void do_automap( int key_code ) {
int done=0;
vms_matrix tempm;
vms_angvec tangles;
int leave_mode=0;
int first_time=1;
int pcx_error;
int i;
int c;
char filename[] = "MAP.PCX";
fix entry_time;
int pause_game=1; // Set to 1 if everything is paused during automap...No pause during net.
fix t1, t2;
control_info saved_control_info;
int Max_segments_away = 0;
int SegmentLimit = 1;
key_code = key_code; // disable warning...
if ((Game_mode & GM_MULTI) && (Function_mode == FMODE_GAME) && (!Endlevel_sequence))
pause_game = 0;
if (pause_game)
stop_time();
create_name_canv();
Max_edges = min(MAX_EDGES_FROM_VERTS(Num_vertices),MAX_EDGES); //make maybe smaller than max
//Edges = malloc( sizeof(Edge_info)*Max_edges);
//if ( Edges == NULL ) {
// mprintf((0, "Couldn't get %dK for automap!", sizeof(Edge_info)*Max_edges/1024));
// return;
//}
//DrawingListBright = malloc( sizeof(short)*Max_edges);
//if ( DrawingListBright == NULL ) {
// mprintf((0, "Couldn't get %dK for automap!", sizeof(short)*Max_edges/1024));
// return;
//}
mprintf( (0, "Num_vertices=%d, Max_edges=%d, (MAX:%d)\n", Num_vertices, Max_edges, MAX_EDGES ));
mprintf( (0, "Allocated %d K for automap edge list\n", (sizeof(Edge_info)+sizeof(short))*Max_edges/1024 ));
gr_palette_clear();
gr_init_sub_canvas(&Page,&VR_render_buffer[0],0, 0, 640, 480);
gr_init_sub_canvas(&DrawingPage,&Page,38,77,564,381);
#if 0
gr_init_sub_canvas(&Pages[0],grd_curcanv,0,0,320,400);
gr_init_sub_canvas(&Pages[1],grd_curcanv,0,401,320,400);
gr_init_sub_canvas(&DrawingPages[0],&Pages[0],16,69,288,272);
gr_init_sub_canvas(&DrawingPages[1],&Pages[1],16,69,288,272);
#endif
gr_set_current_canvas(&Page);
pcx_error = pcx_read_bitmap(filename,&(grd_curcanv->cv_bitmap),BM_LINEAR,NULL);
if ( pcx_error != PCX_ERROR_NONE ) {
printf("File %s - PCX error: %s",filename,pcx_errormsg(pcx_error));
Error("File %s - PCX error: %s",filename,pcx_errormsg(pcx_error));
return;
}
gr_set_curfont(Gamefonts[GFONT_BIG_1]);
gr_set_fontcolor(BM_XRGB(20, 20, 20), -1);
gr_printf( 80, 36,TXT_AUTOMAP,GFONT_BIG_1);
gr_set_curfont(Gamefonts[GFONT_SMALL]);
gr_set_fontcolor(BM_XRGB(20, 20, 20), -1);
gr_printf( 265, 27,TXT_TURN_SHIP);
gr_printf( 265, 44,TXT_SLIDE_UPDOWN);
gr_printf( 265, 61,TXT_VIEWING_DISTANCE);
gr_set_current_canvas(&DrawingPage);
automap_build_edge_list();
if ( ViewDist==0 )
ViewDist = ZOOM_DEFAULT;
ViewMatrix = Objects[Players[Player_num].objnum].orient;
tangles.p = PITCH_DEFAULT;
tangles.h = 0;
tangles.b = 0;
done = 0;
view_target = Objects[Players[Player_num].objnum].pos;
t1 = entry_time = timer_get_fixed_seconds();
t2 = t1;
//Fill in Automap_visited from Objects[Players[Player_num].objnum].segnum
Max_segments_away = set_segment_depths(Objects[Players[Player_num].objnum].segnum, Automap_visited);
SegmentLimit = Max_segments_away;
adjust_segment_limit(SegmentLimit);
while(!done) {
#ifndef MAC_SHAREWARE
redbook_restart_track();
#endif
if ( leave_mode==0 && Controls.automap_state && (timer_get_fixed_seconds()-entry_time)>LEAVE_TIME)
leave_mode = 1;
if ( !Controls.automap_state && (leave_mode==1) )
done=1;
if (!pause_game) {
ushort old_wiggle;
saved_control_info = Controls; // Save controls so we can zero them
memset(&Controls,0,sizeof(control_info)); // Clear everything...
old_wiggle = ConsoleObject->mtype.phys_info.flags & PF_WIGGLE; // Save old wiggle
ConsoleObject->mtype.phys_info.flags &= ~PF_WIGGLE; // Turn off wiggle
#ifdef NETWORK
if (multi_menu_poll())
done = 1;
#endif
// GameLoop( 0, 0 ); // Do game loop with no rendering and no reading controls.
ConsoleObject->mtype.phys_info.flags |= old_wiggle; // Restore wiggle
Controls = saved_control_info;
}
controls_read_all();
if ( Controls.automap_down_count ) {
if (leave_mode==0)
done = 1;
c = 0;
}
while( (c=key_inkey()) ) {
switch( c ) {
#ifndef NDEBUG
case KEY_BACKSP: Int3(); break;
#endif
case KEY_PRINT_SCREEN: save_screen_shot(1); break;
case KEY_ESC:
if (leave_mode==0)
done = 1;
break;
case KEY_ALTED+KEY_F: // Alt+F shows full map, if cheats enabled
if (Cheats_enabled)
{
uint t;
t = Players[Player_num].flags;
Players[Player_num].flags |= PLAYER_FLAGS_MAP_ALL_CHEAT;
automap_build_edge_list();
Players[Player_num].flags=t;
}
break;
#ifndef NDEBUG
case KEY_DEBUGGED+KEY_F: {
for (i=0; i<=Highest_segment_index; i++ )
Automap_visited[i] = 1;
automap_build_edge_list();
Max_segments_away = set_segment_depths(Objects[Players[Player_num].objnum].segnum, Automap_visited);
SegmentLimit = Max_segments_away;
adjust_segment_limit(SegmentLimit);
}
break;
#endif
case KEY_MINUS:
if (SegmentLimit > 1) {
SegmentLimit--;
adjust_segment_limit(SegmentLimit);
}
break;
case KEY_EQUAL:
if (SegmentLimit < Max_segments_away) {
SegmentLimit++;
adjust_segment_limit(SegmentLimit);
}
break;
}
}
if ( Controls.fire_primary_down_count ) {
// Reset orientation
ViewDist = ZOOM_DEFAULT;
tangles.p = PITCH_DEFAULT;
tangles.h = 0;
tangles.b = 0;
view_target = Objects[Players[Player_num].objnum].pos;
}
ViewDist -= Controls.forward_thrust_time*ZOOM_SPEED_FACTOR;
tangles.p += fixdiv( Controls.pitch_time, ROT_SPEED_DIVISOR );
tangles.h += fixdiv( Controls.heading_time, ROT_SPEED_DIVISOR );
tangles.b += fixdiv( Controls.bank_time, ROT_SPEED_DIVISOR*2 );
if ( Controls.vertical_thrust_time || Controls.sideways_thrust_time ) {
vms_angvec tangles1;
vms_vector old_vt;
old_vt = view_target;
tangles1 = tangles;
vm_angles_2_matrix(&tempm,&tangles1);
vm_matrix_x_matrix(&ViewMatrix,&Objects[Players[Player_num].objnum].orient,&tempm);
vm_vec_scale_add2( &view_target, &ViewMatrix.uvec, Controls.vertical_thrust_time*SLIDE_SPEED );
vm_vec_scale_add2( &view_target, &ViewMatrix.rvec, Controls.sideways_thrust_time*SLIDE_SPEED );
if ( vm_vec_dist_quick( &view_target, &Objects[Players[Player_num].objnum].pos) > i2f(1000) ) {
view_target = old_vt;
}
}
vm_angles_2_matrix(&tempm,&tangles);
vm_matrix_x_matrix(&ViewMatrix,&Objects[Players[Player_num].objnum].orient,&tempm);
if ( ViewDist < ZOOM_MIN_VALUE ) ViewDist = ZOOM_MIN_VALUE;
if ( ViewDist > ZOOM_MAX_VALUE ) ViewDist = ZOOM_MAX_VALUE;
draw_automap();
if ( first_time ) {
first_time = 0;
gr_palette_load( gr_palette );
}
t2 = timer_get_fixed_seconds();
if (pause_game)
FrameTime=t2-t1;
t1 = t2;
}
//free(Edges);
//free(DrawingListBright);
gr_free_canvas(name_canv); name_canv=NULL;
mprintf( (0, "Automap memory freed\n" ));
game_flush_inputs();
if (pause_game)
start_time();
}
//loads a level (.LVL) file from disk
//returns 0 if success, else error code
int load_level(const char * filename_passed)
{
#ifdef EDITOR
int use_compiled_level=1;
#endif
PHYSFS_file * LoadFile;
char filename[PATH_MAX];
int sig, minedata_offset, gamedata_offset, hostagetext_offset;
int mine_err, game_err;
#ifdef NETWORK
int i;
#endif
#ifdef NETWORK
if (Game_mode & GM_NETWORK)
{
for (i=0;i<MAX_POWERUP_TYPES;i++)
{
MaxPowerupsAllowed[i]=0;
PowerupsInMine[i]=0;
}
}
#endif
#ifdef COMPACT_SEGS
ncache_flush();
#endif
#ifndef RELEASE
Level_being_loaded = filename_passed;
#endif
strcpy(filename,filename_passed);
#ifdef EDITOR
//if we have the editor, try the LVL first, no matter what was passed.
//if we don't have an LVL, try what was passed or SDL/RDL
//if we don't have the editor, we just use what was passed
change_filename_extension(filename,filename_passed,".lvl");
use_compiled_level = 0;
if (!PHYSFSX_exists(filename,1))
{
char *p = strrchr(filename_passed, '.');
if (d_stricmp(p, ".lvl"))
strcpy(filename, filename_passed); // set to what was passed
else
change_filename_extension(filename, filename, ".rdl");
use_compiled_level = 1;
}
#endif
if (!PHYSFSX_exists(filename,1))
sprintf(filename,"%s%s",MISSION_DIR,filename_passed);
LoadFile = PHYSFSX_openReadBuffered( filename );
if (!LoadFile) {
#ifdef EDITOR
return 1;
#else
Error("Can't open file <%s>\n",filename);
#endif
}
strcpy( Gamesave_current_filename, filename );
sig = PHYSFSX_readInt(LoadFile);
Gamesave_current_version = PHYSFSX_readInt(LoadFile);
minedata_offset = PHYSFSX_readInt(LoadFile);
gamedata_offset = PHYSFSX_readInt(LoadFile);
Assert(sig == MAKE_SIG('P','L','V','L'));
(void)sig;
if (Gamesave_current_version < 5)
hostagetext_offset = PHYSFSX_readInt(LoadFile);
PHYSFSX_fseek(LoadFile,minedata_offset,SEEK_SET);
#ifdef EDITOR
if (!use_compiled_level)
mine_err = load_mine_data(LoadFile);
else
#endif
//NOTE LINK TO ABOVE!!
mine_err = load_mine_data_compiled(LoadFile);
/* !!!HACK!!!
* Descent 1 - Level 19: OBERON MINE has some ugly overlapping rooms (segment 484).
* HACK to make this issue less visible by moving one vertex a little.
*/
if (Current_mission && !d_stricmp("Descent: First Strike",Current_mission_longname) && !d_stricmp("level19.rdl",filename) && PHYSFS_fileLength(LoadFile) == 136706)
Vertices[1905].z =-385*F1_0;
if (mine_err == -1) { //error!!
PHYSFS_close(LoadFile);
return 2;
}
PHYSFSX_fseek(LoadFile,gamedata_offset,SEEK_SET);
game_err = load_game_data(LoadFile);
if (game_err == -1) { //error!!
PHYSFS_close(LoadFile);
return 3;
}
(void)hostagetext_offset;
//======================== CLOSE FILE =============================
PHYSFS_close( LoadFile );
#if 0 //def EDITOR
#ifndef RELEASE
write_game_text_file(filename);
if (Errors_in_mine) {
if (is_real_level(filename)) {
char ErrorMessage[200];
sprintf( ErrorMessage, "Warning: %i errors in %s!\n", Errors_in_mine, Level_being_loaded );
stop_time();
gr_palette_load(gr_palette);
nm_messagebox( NULL, 1, "Continue", ErrorMessage );
start_time();
}
}
#endif
#endif
#ifdef EDITOR
//If an old version, ask the use if he wants to save as new version
if (((LEVEL_FILE_VERSION>1) && Gamesave_current_version<LEVEL_FILE_VERSION) || mine_err==1 || game_err==1) {
char ErrorMessage[200];
sprintf( ErrorMessage, "You just loaded a old version level. Would\n"
"you like to save it as a current version level?");
gr_palette_load(gr_palette);
if (nm_messagebox( NULL, 2, "Don't Save", "Save", ErrorMessage )==1)
save_level(filename);
}
#endif
#ifdef EDITOR
if (EditorWindow)
editor_status_fmt("Loaded NEW mine %s, \"%s\"",filename,Current_level_name);
#endif
#if !defined(NDEBUG) && !defined(COMPACT_SEGS)
if (check_segment_connections())
nm_messagebox( "ERROR", 1, "Ok",
"Connectivity errors detected in\n"
"mine. See monochrome screen for\n"
"details, and contact Matt or Mike." );
#endif
return 0;
}
int HandleTestKey(int key)
{
switch (key)
{
#ifdef SHOW_EXIT_PATH
case KEY_DEBUGGED+KEY_1: create_special_path(); break;
#endif
case KEY_DEBUGGED+KEY_Y:
do_controlcen_destroyed_stuff(NULL);
break;
case KEY_BACKSP:
case KEY_CTRLED+KEY_BACKSP:
case KEY_ALTED+KEY_BACKSP:
case KEY_SHIFTED+KEY_BACKSP:
case KEY_SHIFTED+KEY_ALTED+KEY_BACKSP:
case KEY_CTRLED+KEY_ALTED+KEY_BACKSP:
case KEY_SHIFTED+KEY_CTRLED+KEY_BACKSP:
case KEY_SHIFTED+KEY_CTRLED+KEY_ALTED+KEY_BACKSP:
Int3(); break;
case KEY_DEBUGGED+KEY_S: digi_reset(); break;
case KEY_DEBUGGED+KEY_P:
if (Game_suspended & SUSP_ROBOTS)
Game_suspended &= ~SUSP_ROBOTS; //robots move
else
Game_suspended |= SUSP_ROBOTS; //robots don't move
break;
case KEY_DEBUGGED+KEY_K: Players[Player_num].shields = 1; break; // a virtual kill
case KEY_DEBUGGED+KEY_SHIFTED + KEY_K: Players[Player_num].shields = -1; break; // an actual kill
case KEY_DEBUGGED+KEY_X: Players[Player_num].lives++; break; // Extra life cheat key.
case KEY_DEBUGGED+KEY_H:
if (Player_is_dead)
return 0;
Players[Player_num].flags ^= PLAYER_FLAGS_CLOAKED;
if (Players[Player_num].flags & PLAYER_FLAGS_CLOAKED) {
#ifdef NETWORK
if (Game_mode & GM_MULTI)
multi_send_cloak();
#endif
ai_do_cloak_stuff();
Players[Player_num].cloak_time = GameTime64;
}
break;
case KEY_DEBUGGED+KEY_R:
cheats.robotfiringsuspended = !cheats.robotfiringsuspended;
break;
#ifdef EDITOR //editor-specific functions
case KEY_E + KEY_DEBUGGED:
window_set_visible(Game_wind, 0); // don't let the game do anything while we set the editor up
init_editor();
window_close(Game_wind);
break;
case KEY_C + KEY_SHIFTED + KEY_DEBUGGED:
if (!Player_is_dead && !( Game_mode & GM_MULTI ))
move_player_2_segment(Cursegp,Curside);
break; //move eye to curseg
case KEY_DEBUGGED+KEY_W: draw_world_from_game(); break;
#endif //#ifdef EDITOR
case KEY_DEBUGGED+KEY_LAPOSTRO: Show_view_text_timer = 0x30000; object_goto_next_viewer(); break;
case KEY_DEBUGGED+KEY_SHIFTED+KEY_LAPOSTRO: Viewer=ConsoleObject; break;
case KEY_DEBUGGED+KEY_O: toggle_outline_mode(); break;
case KEY_DEBUGGED+KEY_T:
*Toggle_var = !*Toggle_var;
break;
case KEY_DEBUGGED + KEY_L:
if (++Lighting_on >= 2) Lighting_on = 0; break;
case KEY_DEBUGGED + KEY_SHIFTED + KEY_L:
Beam_brightness=0x38000-Beam_brightness; break;
case KEY_PAD5: slew_stop(); break;
#ifndef NDEBUG
case KEY_DEBUGGED + KEY_F11: play_test_sound(); break;
case KEY_DEBUGGED + KEY_SHIFTED+KEY_F11: advance_sound(); play_test_sound(); break;
#endif
case KEY_DEBUGGED + KEY_M:
Debug_spew = !Debug_spew;
if (Debug_spew) {
HUD_init_message_literal(HM_DEFAULT, "Debug Spew: ON" );
} else {
HUD_init_message_literal(HM_DEFAULT, "Debug Spew: OFF" );
}
break;
case KEY_DEBUGGED + KEY_C:
do_cheat_menu();
break;
case KEY_DEBUGGED + KEY_SHIFTED + KEY_A:
do_megawow_powerup(10);
break;
case KEY_DEBUGGED + KEY_A: {
do_megawow_powerup(200);
break;
}
case KEY_DEBUGGED+KEY_SPACEBAR: //KEY_F7: // Toggle physics flying
slew_stop();
game_flush_inputs();
if ( ConsoleObject->control_type != CT_FLYING ) {
fly_init(ConsoleObject);
Game_suspended &= ~SUSP_ROBOTS; //robots move
} else {
slew_init(ConsoleObject); //start player slewing
Game_suspended |= SUSP_ROBOTS; //robots don't move
}
break;
case KEY_DEBUGGED+KEY_COMMA: Render_zoom = fixmul(Render_zoom,62259); break;
case KEY_DEBUGGED+KEY_PERIOD: Render_zoom = fixmul(Render_zoom,68985); break;
#ifndef NDEBUG
case KEY_DEBUGGED+KEY_D:
if ((GameArg.DbgUseDoubleBuffer = !GameArg.DbgUseDoubleBuffer)!=0)
init_cockpit();
break;
#endif
#ifdef EDITOR
case KEY_DEBUGGED+KEY_Q:
stop_time();
dump_used_textures_all();
start_time();
break;
#endif
case KEY_DEBUGGED+KEY_B: {
newmenu_item m;
char text[FILENAME_LEN]="";
int item;
m.type=NM_TYPE_INPUT; m.text_len = FILENAME_LEN; m.text = text;
item = newmenu_do( NULL, "Briefing to play?", 1, &m, NULL, NULL );
if (item != -1) {
do_briefing_screens(text,1);
}
break;
}
case KEY_DEBUGGED+KEY_SHIFTED+KEY_B:
if (Player_is_dead)
return 0;
kill_and_so_forth();
break;
case KEY_DEBUGGED+KEY_G:
GameTime64 = (0x7fffffffffffffffLL) - (F1_0*10);
HUD_init_message(HM_DEFAULT, "GameTime %li - Reset in 10 seconds!", GameTime64);
break;
default:
return 0;
break;
}
return 1;
}
void modex_print_message(int x, int y, char *str)
{
#ifndef AUTOMAP_DIRECT_RENDER
#ifndef AUTOMAP_NO_PAGING
int i;
for (i=0; i<2; i++ ) {
gr_set_current_canvas(&Pages[i]);
#else
{
gr_set_current_canvas(OffscreenPage);
#endif
#endif
modex_printf(x, y, str, GFONT_MEDIUM_1);
#ifndef AUTOMAP_DIRECT_RENDER
}
gr_set_current_canvas(&DrawingPages[current_page]);
#endif
}
extern void GameLoop(int, int );
extern int set_segment_depths(int start_seg, ubyte *segbuf);
u_int32_t automap_mode = SM(640,480);
int automap_width = 640;
int automap_height = 480;
int automap_use_game_res=0;
int nice_automap=0;
void do_automap( int key_code ) {
int done=0;
vms_matrix tempm;
vms_angvec tangles;
int leave_mode=0;
int first_time=1;
// int pcx_error;
int c;
// char filename[] = "MAP.PCX";
fix entry_time;
int pause_game=1; // Set to 1 if everything is paused during automap...No pause during net.
fix t1, t2;
control_info saved_control_info;
grs_bitmap Automap_background;
int Max_segments_away = 0;
int SegmentLimit = 1;
//added on 10/28/98 by adb to fix compile versions
#if !defined (NDEBUG) || (!defined(AUTOMAP_NO_PAGING) && !defined(AUTOMAP_DIRECT_RENDER))
int i;
#endif
key_code = key_code; // disable warning...
if ((Game_mode & GM_MULTI) && (Function_mode == FMODE_GAME) && (!Endlevel_sequence))
pause_game = 0;
if (pause_game)
stop_time();
create_name_canv();
Max_edges = min(MAX_EDGES_FROM_VERTS(Num_vertices),MAX_EDGES); //make maybe smaller than max
//Edges = malloc( sizeof(Edge_info)*Max_edges);
//if ( Edges == NULL ) {
// mprintf((0, "Couldn't get %dK for automap!", sizeof(Edge_info)*Max_edges/1024));
// return;
//}
//DrawingListBright = malloc( sizeof(short)*Max_edges);
//if ( DrawingListBright == NULL ) {
// mprintf((0, "Couldn't get %dK for automap!", sizeof(short)*Max_edges/1024));
// return;
//}
mprintf( (0, "Num_vertices=%d, Max_edges=%d, (MAX:%d)\n", Num_vertices, Max_edges, MAX_EDGES ));
mprintf( (0, "Allocated %d K for automap edge list\n", (sizeof(Edge_info)+sizeof(short))*Max_edges/1024 ));
//edit 4/23/99 Matt Mueller - don't switch res unless we need to
if (grd_curscreen->sc_mode != AUTOMAP_MODE)
gr_set_mode( AUTOMAP_MODE );
else
gr_set_current_canvas(NULL);
//end edit -MM
automap_width=grd_curscreen->sc_canvas.cv_bitmap.bm_w;
automap_height=grd_curscreen->sc_canvas.cv_bitmap.bm_h;
gr_palette_clear();
#ifndef AUTOMAP_DIRECT_RENDER
gr_init_sub_canvas(&Pages[0],grd_curcanv,0,0,automap_width,automap_height);
#ifndef AUTOMAP_NO_PAGING
// NOTICE: should be 0,401! FIXME!
gr_init_sub_canvas(&Pages[1],grd_curcanv,0,0,automap_width,automap_height);
gr_init_sub_canvas(&DrawingPages[0],&Pages[0],0,0,automap_width,automap_height);
gr_init_sub_canvas(&DrawingPages[1],&Pages[1],0,0,automap_width,automap_height);
#else
OffscreenPage = gr_create_canvas( automap_width,automap_height );
if (!OffscreenPage) {
nm_messagebox("No memory for automap", 1, "Ok");
return;
}
gr_init_sub_canvas(&DrawingPages[0],OffscreenPage,0,0,automap_width,automap_height);
#endif
#endif
gr_init_bitmap_data (&Automap_background);
// pcx_error = pcx_read_bitmap(filename,&Automap_background,BM_LINEAR,NULL);
// if ( pcx_error != PCX_ERROR_NONE ) {
// printf("File %s - PCX error: %s",filename,pcx_errormsg(pcx_error));
// Error("File %s - PCX error: %s",filename,pcx_errormsg(pcx_error));
// return;
// }
#ifndef AUTOMAP_DIRECT_RENDER
#ifndef AUTOMAP_NO_PAGING
for (i=0; i<2; i++ ) {
gr_set_current_canvas(&Pages[i]);
#else
{
gr_set_current_canvas(OffscreenPage);
#endif
// gr_bitmap( 0, 0, &Automap_background );
// modex_printf( 40, 22,TXT_AUTOMAP,GFONT_BIG_1);
// modex_printf( 70,353,TXT_TURN_SHIP,GFONT_SMALL);
// modex_printf( 70,369,TXT_SLIDE_UPDOWN,GFONT_SMALL);
// modex_printf( 70,385,TXT_VIEWING_DISTANCE,GFONT_SMALL);
}
#ifdef AUTOMAP_NO_PAGING
//killed 05/17/99 Matt Mueller - this seems to merely copy undefined bytes around.. not needed
//--killed-- gr_bm_ubitblt(automap_width,automap_height, 0, 0, 0, 0, &OffscreenPage->cv_bitmap,&Pages[0].cv_bitmap);
//end kill -MM
#endif
gr_free_bitmap_data (&Automap_background);
gr_set_current_canvas(&DrawingPages[current_page]);
#endif
automap_build_edge_list();
if ( ViewDist==0 )
ViewDist = ZOOM_DEFAULT;
ViewMatrix = Objects[Players[Player_num].objnum].orient;
tangles.p = PITCH_DEFAULT;
tangles.h = 0;
tangles.b = 0;
done = 0;
view_target = Objects[Players[Player_num].objnum].pos;
t1 = entry_time = timer_get_fixed_seconds();
t2 = t1;
//Fill in Automap_visited from Objects[Players[Player_num].objnum].segnum
Max_segments_away = set_segment_depths(Objects[Players[Player_num].objnum].segnum, Automap_visited);
SegmentLimit = Max_segments_away;
adjust_segment_limit(SegmentLimit);
while(!done) {
if ( leave_mode==0 && Controls.automap_state && (timer_get_fixed_seconds()-entry_time)>LEAVE_TIME)
leave_mode = 1;
if ( !Controls.automap_state && (leave_mode==1) )
done=1;
if (!pause_game) {
ushort old_wiggle;
saved_control_info = Controls; // Save controls so we can zero them
memset(&Controls,0,sizeof(control_info)); // Clear everything...
old_wiggle = ConsoleObject->mtype.phys_info.flags & PF_WIGGLE; // Save old wiggle
ConsoleObject->mtype.phys_info.flags &= ~PF_WIGGLE; // Turn off wiggle
#ifdef NETWORK
if (multi_menu_poll())
done = 1;
#endif
// GameLoop( 0, 0 ); // Do game loop with no rendering and no reading controls.
ConsoleObject->mtype.phys_info.flags |= old_wiggle; // Restore wiggle
Controls = saved_control_info;
}
controls_read_all();
if ( Controls.automap_down_count ) {
if (leave_mode==0)
done = 1;
c = 0;
}
while( (c=key_inkey()) ) {
switch( c ) {
#ifndef NDEBUG
case KEY_BACKSP: Int3(); break;
#endif
case KEY_PRINT_SCREEN: save_screen_shot(1); break;
case KEY_ESC:
if (leave_mode==0)
done = 1;
break;
case KEY_ALTED+KEY_F: // Alt+F shows full map, if cheats enabled
if (Cheats_enabled)
{
uint t;
t = Players[Player_num].flags;
Players[Player_num].flags |= PLAYER_FLAGS_MAP_ALL_CHEAT;
automap_build_edge_list();
Players[Player_num].flags=t;
}
break;
#ifndef NDEBUG
case KEY_DEBUGGED+KEY_F: {
for (i=0; i<=Highest_segment_index; i++ )
Automap_visited[i] = 1;
automap_build_edge_list();
Max_segments_away = set_segment_depths(Objects[Players[Player_num].objnum].segnum, Automap_visited);
SegmentLimit = Max_segments_away;
adjust_segment_limit(SegmentLimit);
}
break;
#endif
case KEY_MINUS:
if (SegmentLimit > 1) {
SegmentLimit--;
adjust_segment_limit(SegmentLimit);
}
break;
case KEY_EQUAL:
if (SegmentLimit < Max_segments_away) {
SegmentLimit++;
adjust_segment_limit(SegmentLimit);
}
break;
}
}
if ( Controls.fire_primary_down_count ) {
// Reset orientation
ViewDist = ZOOM_DEFAULT;
tangles.p = PITCH_DEFAULT;
tangles.h = 0;
tangles.b = 0;
view_target = Objects[Players[Player_num].objnum].pos;
}
ViewDist -= Controls.forward_thrust_time*ZOOM_SPEED_FACTOR;
tangles.p += fixdiv( Controls.pitch_time, ROT_SPEED_DIVISOR );
tangles.h += fixdiv( Controls.heading_time, ROT_SPEED_DIVISOR );
tangles.b += fixdiv( Controls.bank_time, ROT_SPEED_DIVISOR*2 );
if ( Controls.vertical_thrust_time || Controls.sideways_thrust_time ) {
vms_angvec tangles1;
vms_vector old_vt;
old_vt = view_target;
tangles1 = tangles;
vm_angles_2_matrix(&tempm,&tangles1);
vm_matrix_x_matrix(&ViewMatrix,&Objects[Players[Player_num].objnum].orient,&tempm);
vm_vec_scale_add2( &view_target, &ViewMatrix.uvec, Controls.vertical_thrust_time*SLIDE_SPEED );
vm_vec_scale_add2( &view_target, &ViewMatrix.rvec, Controls.sideways_thrust_time*SLIDE_SPEED );
if ( vm_vec_dist_quick( &view_target, &Objects[Players[Player_num].objnum].pos) > i2f(1000) ) {
view_target = old_vt;
}
}
vm_angles_2_matrix(&tempm,&tangles);
vm_matrix_x_matrix(&ViewMatrix,&Objects[Players[Player_num].objnum].orient,&tempm);
if ( ViewDist < ZOOM_MIN_VALUE ) ViewDist = ZOOM_MIN_VALUE;
if ( ViewDist > ZOOM_MAX_VALUE ) ViewDist = ZOOM_MAX_VALUE;
draw_automap();
if ( first_time ) {
first_time = 0;
gr_palette_load( gr_palette );
}
t2 = timer_get_fixed_seconds();
while (t2-t1<F1_0/100){//ogl is fast enough that the automap can read the input too fast and you start to turn really slow. So delay a bit (and free up some cpu :)
if (nice_automap)
d_delay(1);
t2 = timer_get_fixed_seconds();
}
if (pause_game)
FrameTime=t2-t1;
t1 = t2;
}
//free(Edges);
//free(DrawingListBright);
gr_free_canvas(name_canv); name_canv=NULL;
#ifdef AUTOMAP_NO_PAGING
gr_free_canvas(OffscreenPage);
OffscreenPage = NULL;
#endif
mprintf( (0, "Automap memory freed\n" ));
game_flush_inputs();
if (pause_game)
start_time();
}
void adjust_segment_limit(int SegmentLimit)
{
int i,e1;
Edge_info * e;
mprintf(( 0, "Seglimit: %d\n", SegmentLimit ));
for (i=0; i<=Highest_edge_index; i++ ) {
e = &Edges[i];
e->flags |= EF_TOO_FAR;
for (e1=0; e1<e->num_faces; e1++ ) {
if ( Automap_visited[e->segnum[e1]] <= SegmentLimit ) {
e->flags &= (~EF_TOO_FAR);
break;
}
}
}
}
void piggy_bitmap_page_in( bitmap_index bitmap )
{
grs_bitmap * bmp;
int i,org_i,temp;
char buf[256];
ubyte *src;
i = bitmap.index;
Assert( i >= 0 );
Assert( i < MAX_BITMAP_FILES );
Assert( i < Num_bitmap_files );
Assert( Piggy_bitmap_cache_size > 0 );
if ( GameBitmapOffset[i] == 0 ) return; // A read-from-disk bitmap!!!
if ( piggy_low_memory ) {
org_i = i;
i = GameBitmapXlat[i]; // Xlat for low-memory settings!
}
bmp = &GameBitmaps[i];
if ( bmp->bm_flags & BM_FLAG_PAGED_OUT ) {
stop_time();
ReDoIt:
descent_critical_error = 0;
cfseek( Piggy_fp, GameBitmapOffset[i], SEEK_SET );
if ( descent_critical_error ) {
piggy_critical_error();
goto ReDoIt;
}
bmp->bm_data = &Piggy_bitmap_cache_data[Piggy_bitmap_cache_next];
bmp->bm_flags = GameBitmapFlags[i];
if ( bmp->bm_flags & BM_FLAG_RLE ) {
int zsize = 0;
descent_critical_error = 0;
zsize = read_int_swap(Piggy_fp);
if ( descent_critical_error ) {
piggy_critical_error();
goto ReDoIt;
}
// GET JOHN NOW IF YOU GET THIS ASSERT!!!
Assert( Piggy_bitmap_cache_next+zsize < Piggy_bitmap_cache_size );
if ( Piggy_bitmap_cache_next+zsize >= Piggy_bitmap_cache_size ) {
piggy_bitmap_page_out_all();
goto ReDoIt;
}
memcpy( &Piggy_bitmap_cache_data[Piggy_bitmap_cache_next], &zsize, sizeof(int) );
Piggy_bitmap_cache_next += sizeof(int);
descent_critical_error = 0;
temp = cfread( &Piggy_bitmap_cache_data[Piggy_bitmap_cache_next], 1, zsize-4, Piggy_fp );
if ( descent_critical_error ) {
piggy_critical_error();
goto ReDoIt;
}
Piggy_bitmap_cache_next += zsize-4;
} else {
// GET JOHN NOW IF YOU GET THIS ASSERT!!!
Assert( Piggy_bitmap_cache_next+(bmp->bm_h*bmp->bm_w) < Piggy_bitmap_cache_size );
if ( Piggy_bitmap_cache_next+(bmp->bm_h*bmp->bm_w) >= Piggy_bitmap_cache_size ) {
piggy_bitmap_page_out_all();
goto ReDoIt;
}
descent_critical_error = 0;
temp = cfread( &Piggy_bitmap_cache_data[Piggy_bitmap_cache_next], 1, bmp->bm_h*bmp->bm_w, Piggy_fp );
if ( descent_critical_error ) {
piggy_critical_error();
goto ReDoIt;
}
Piggy_bitmap_cache_next+=bmp->bm_h*bmp->bm_w;
#if 0
temp = bmp->bm_h*bmp->bm_w;
src = (ubyte *)bmp->bm_data;
for (i = 0; i < temp; i++) {
if (*src == 0)
*src = 255;
else if (*src == 255)
*src = 0;
src++;
}
#endif
}
start_time();
}
if ( piggy_low_memory ) {
if ( org_i != i )
GameBitmaps[org_i] = GameBitmaps[i];
}
}
// -----------------------------------------------------------------------------------
int state_restore_all(int in_game, int secret_restore, char *filename_override)
{
char filename[128];
int filenum = -1;
#ifdef NETWORK
if ( Game_mode & GM_MULTI ) {
#ifdef MULTI_SAVE
multi_initiate_restore_game();
#endif
return 0;
}
#endif
if (in_game && (Current_level_num < 0) && (secret_restore == 0)) {
HUD_init_message( "Can't restore in secret level!" );
return 0;
}
if ( Newdemo_state == ND_STATE_RECORDING )
newdemo_stop_recording();
if ( Newdemo_state != ND_STATE_NORMAL )
return 0;
stop_time();
if (filename_override) {
strcpy(filename, filename_override);
filenum = NUM_SAVES+1; // So we don't trigger autosave
} else if (!(filenum = state_get_restore_file(filename, 0))) {
start_time();
return 0;
}
// MK, 1/1/96
// If not in multiplayer, do special secret level stuff.
// If Nsecret.sgc (where N = filenum) exists, then copy it to secret.sgc.
// If it doesn't exist, then delete secret.sgc
if (!secret_restore && !(Game_mode & GM_MULTI)) {
int rval;
char temp_fname[32], fc;
if (filenum != -1) {
if (filenum >= 10)
fc = (filenum-10) + 'a';
else
fc = '0' + filenum;
sprintf(temp_fname, PLAYER_DIR "%csecret.sgc", fc);
mprintf((0, "Trying to copy %s to secret.sgc.\n", temp_fname));
if (PHYSFS_exists(temp_fname))
{
mprintf((0, "Copying %s to secret.sgc\n", temp_fname));
rval = copy_file(temp_fname, PLAYER_DIR "secret.sgc");
Assert(rval == 0); // Oops, error copying temp_fname to secret.sgc!
} else
PHYSFS_delete(PLAYER_DIR "secret.sgc");
}
}
// Changed, 11/15/95, MK, don't to autosave if restoring from main menu.
if ((filenum != (NUM_SAVES+1)) && in_game) {
char temp_filename[128];
mprintf((0, "Doing autosave, filenum = %i, != %i!\n", filenum, NUM_SAVES+1));
sprintf( temp_filename, PLAYER_DIR "%s.sg%x", Players[Player_num].callsign, NUM_SAVES );
state_save_all(!in_game, secret_restore, temp_filename, 0);
}
if ( !secret_restore && in_game ) {
int choice;
choice = nm_messagebox( NULL, 2, "Yes", "No", "Restore Game?" );
if ( choice != 0 ) {
start_time();
return 0;
}
}
start_time();
return state_restore_all_sub(filename, 0, secret_restore);
}
