X-Git-Url: https://git.artsoft.org/?p=rocksndiamonds.git;a=blobdiff_plain;f=src%2Ftape.c;h=f16e7ec9451a20ab68068add00155ed01870088a;hp=bcec56b049427e1a2a1a0d69415d5844c2509714;hb=HEAD;hpb=115ce6f2da1914d68b0fe0e5f9082973190dacdd diff --git a/src/tape.c b/src/tape.c index bcec56b0..f16e7ec9 100644 --- a/src/tape.c +++ b/src/tape.c @@ -4,7 +4,7 @@ // (c) 1995-2014 by Artsoft Entertainment // Holger Schemel // info@artsoft.org -// http://www.artsoft.org/ +// https://www.artsoft.org/ // ---------------------------------------------------------------------------- // tape.c // ============================================================================ @@ -18,10 +18,12 @@ #include "files.h" #include "network.h" #include "anim.h" +#include "api.h" + #define DEBUG_TAPE_WHEN_PLAYING FALSE -/* tape button identifiers */ +// tape button identifiers #define TAPE_CTRL_ID_EJECT 0 #define TAPE_CTRL_ID_EXTRA 1 #define TAPE_CTRL_ID_STOP 2 @@ -33,20 +35,23 @@ #define NUM_TAPE_BUTTONS 8 -/* values for tape handling */ +// values for tape handling #define TAPE_PAUSE_SECONDS_BEFORE_DEATH 5 +#define TAPE_MIN_SECONDS_FOR_UNDO_BUFFER 20 -/* forward declaration for internal use */ +// forward declaration for internal use static void HandleTapeButtons(struct GadgetInfo *); static void TapeStopWarpForward(void); static float GetTapeLengthSecondsFloat(void); +static void CopyTapeToUndoBuffer(void); static struct GadgetInfo *tape_gadget[NUM_TAPE_BUTTONS]; +static struct TapeInfo tape_undo_buffer; -/* ========================================================================= */ -/* video tape definitions */ -/* ========================================================================= */ +// ============================================================================ +// video tape definitions +// ============================================================================ #define VIDEO_INFO_OFF (VIDEO_STATE_DATE_OFF | \ VIDEO_STATE_TIME_OFF | \ @@ -98,9 +103,9 @@ static struct GadgetInfo *tape_gadget[NUM_TAPE_BUTTONS]; #define NUM_TAPE_FUNCTION_STATES 2 -/* ========================================================================= */ -/* video display functions */ -/* ========================================================================= */ +// ============================================================================ +// video display functions +// ============================================================================ static void DrawVideoDisplay_Graphics(unsigned int state, unsigned int value) { @@ -134,7 +139,7 @@ static void DrawVideoDisplay_Graphics(unsigned int state, unsigned int value) { -1, NULL }, }, { - /* (no label for displaying optional frame) */ + // (no label for displaying optional frame) { -1, NULL }, { -1, NULL }, }, @@ -160,11 +165,11 @@ static void DrawVideoDisplay_Graphics(unsigned int state, unsigned int value) }, }; - for (k = 0; k < NUM_TAPE_FUNCTION_STATES; k++) /* on or off states */ + for (k = 0; k < NUM_TAPE_FUNCTION_STATES; k++) // on or off states { - for (i = 0; i < NUM_TAPE_FUNCTIONS; i++) /* record, play, ... */ + for (i = 0; i < NUM_TAPE_FUNCTIONS; i++) // record, play, ... { - for (j = 0; j < NUM_TAPE_FUNCTION_PARTS; j++) /* label or symbol */ + for (j = 0; j < NUM_TAPE_FUNCTION_PARTS; j++) // label or symbol { int graphic = video_pos[i][j].graphic; struct XY *pos = video_pos[i][j].pos; @@ -186,20 +191,20 @@ static void DrawVideoDisplay_Graphics(unsigned int state, unsigned int value) if (value == skip_value) continue; - if (k == 1) /* on */ + if (k == 1) // on { gd_bitmap = gfx->bitmap; gd_x = gfx->src_x; gd_y = gfx->src_y; } - else /* off */ + else // off { gd_bitmap = gfx_bg->bitmap; gd_x = gfx_bg->src_x + pos->x; gd_y = gfx_bg->src_y + pos->y; } - /* some tape graphics may be undefined -- only draw if defined */ + // some tape graphics may be undefined -- only draw if defined if (gd_bitmap != NULL) BlitBitmap(gd_bitmap, drawto, gd_x, gd_y, gfx->width, gfx->height, VX + pos->x, VY + pos->y); @@ -309,7 +314,8 @@ static void DrawVideoDisplay_DateTime(unsigned int state, unsigned int value) char s[MAX_DATETIME_STRING_SIZE]; int year2 = value / 10000; int year4 = (year2 < 70 ? 2000 + year2 : 1900 + year2); - int month_index = (value / 100) % 100; + int month_index_raw = (value / 100) % 100; + int month_index = month_index_raw % 12; // prevent invalid index int month = month_index + 1; int day = value % 100; @@ -349,17 +355,17 @@ void DrawVideoDisplay(unsigned int state, unsigned int value) DrawVideoDisplay_DateTime(state, value); } -void DrawVideoDisplayLabel(unsigned int state) +static void DrawVideoDisplayLabel(unsigned int state) { DrawVideoDisplay(state, VIDEO_DISPLAY_LABEL_ONLY); } -void DrawVideoDisplaySymbol(unsigned int state) +static void DrawVideoDisplaySymbol(unsigned int state) { DrawVideoDisplay(state, VIDEO_DISPLAY_SYMBOL_ONLY); } -void DrawVideoDisplayCurrentState(void) +static void DrawVideoDisplayCurrentState(void) { int state = 0; @@ -402,11 +408,11 @@ void DrawCompleteVideoDisplay(void) { struct GraphicInfo *g_tape = &graphic_info[IMG_BACKGROUND_TAPE]; - /* draw tape background */ + // draw tape background BlitBitmap(g_tape->bitmap, drawto, g_tape->src_x, g_tape->src_y, gfx.vxsize, gfx.vysize, gfx.vx, gfx.vy); - /* draw tape buttons (forced) */ + // draw tape buttons (forced) RedrawOrRemapTapeButtons(); DrawVideoDisplay(VIDEO_ALL_OFF, 0); @@ -456,16 +462,56 @@ void TapeDeactivateDisplayOff(boolean redraw_display) if (redraw_display) { RedrawPlayfield(); + + UpdateGameDoorValues(); DrawGameDoorValues(); } } -/* ========================================================================= */ -/* tape logging functions */ -/* ========================================================================= */ +// ============================================================================ +// tape logging functions +// ============================================================================ + +struct AutoPlayInfo +{ + LevelDirTree *leveldir; + boolean all_levelsets; + int last_level_nr; + int level_nr; + int num_levels_played; + int num_levels_solved; + int num_tapes_patched; + int num_tape_missing; + boolean level_failed[MAX_TAPES_PER_SET]; + char *tape_filename; +}; + +static char tape_patch_info[MAX_OUTPUT_LINESIZE]; + +static void PrintTapeReplayHeader(struct AutoPlayInfo *autoplay) +{ + PrintLine("=", 79); + + if (global.autoplay_mode == AUTOPLAY_MODE_FIX) + Print("Automatically fixing level tapes\n"); + else if (global.autoplay_mode == AUTOPLAY_MODE_UPLOAD) + Print("Automatically uploading level tapes\n"); + else + Print("Automatically playing level tapes\n"); + + PrintLine("-", 79); + Print("Level series identifier: '%s'\n", autoplay->leveldir->identifier); + Print("Level series name: '%s'\n", autoplay->leveldir->name); + Print("Level series author: '%s'\n", autoplay->leveldir->author); + Print("Number of levels: %d\n", autoplay->leveldir->levels); + PrintLine("=", 79); + Print("\n"); + + DrawInitTextItem(autoplay->leveldir->name); +} -void PrintTapeReplayProgress(boolean replay_finished) +static void PrintTapeReplayProgress(boolean replay_finished) { static unsigned int counter_last = -1; unsigned int counter = Counter(); @@ -478,8 +524,9 @@ void PrintTapeReplayProgress(boolean replay_finished) if (counter > counter_last + counter_delay) { PrintNoLog("\r"); - PrintNoLog("Level %03d [%02d:%02d]: [%02d:%02d] - playing tape ... ", - level_nr, tape.length_seconds / 60, tape.length_seconds % 60, + PrintNoLog("Tape %03d %s[%02d:%02d]: [%02d:%02d] - playing tape ... ", + level_nr, tape_patch_info, + tape.length_seconds / 60, tape.length_seconds % 60, TapeTime / 60, TapeTime % 60); counter_last = counter; @@ -490,20 +537,97 @@ void PrintTapeReplayProgress(boolean replay_finished) float tape_length_seconds = GetTapeLengthSecondsFloat(); PrintNoLog("\r"); - Print("Level %03d [%02d:%02d]: (%02d:%02d.%03d / %.2f %%) - %s.\n", - level_nr, tape.length_seconds / 60, tape.length_seconds % 60, + Print("Tape %03d %s[%02d:%02d]: (%02d:%02d.%03d / %.2f %%) - %s.\n", + level_nr, tape_patch_info, + tape.length_seconds / 60, tape.length_seconds % 60, counter_seconds / 60, counter_seconds % 60, counter % 1000, (float)counter / tape_length_seconds / 10, - tape.auto_play_level_solved ? "solved" : "NOT SOLVED"); + tape.auto_play_level_fixed ? "solved and fixed" : + tape.auto_play_level_solved ? "solved" : + tape.auto_play_level_not_fixable ? "NOT SOLVED, NOT FIXED" : + "NOT SOLVED"); counter_last = -1; } } +static void PrintTapeReplaySummary(struct AutoPlayInfo *autoplay) +{ + char *autoplay_status = + (autoplay->num_levels_played == autoplay->num_levels_solved && + autoplay->num_levels_played > 0 ? " OK " : "WARN"); + int autoplay_percent = + (autoplay->num_levels_played ? + autoplay->num_levels_solved * 100 / autoplay->num_levels_played : 0); + int i; + + Print("\n"); + PrintLine("=", 79); + Print("Number of levels played: %d\n", autoplay->num_levels_played); + Print("Number of levels solved: %d (%d%%)\n", autoplay->num_levels_solved, + (autoplay->num_levels_played ? + autoplay->num_levels_solved * 100 / autoplay->num_levels_played : 0)); + if (global.autoplay_mode == AUTOPLAY_MODE_FIX) + Print("Number of tapes fixed: %d\n", autoplay->num_tapes_patched); + PrintLine("-", 79); + Print("Summary (for automatic parsing by scripts):\n"); + + if (autoplay->tape_filename) + { + Print("TAPEFILE [%s] '%s', %d, %d, %d", + autoplay_status, + autoplay->leveldir->identifier, + autoplay->last_level_nr, + game.score_final, + game.score_time_final); + } + else + { + Print("LEVELDIR [%s] '%s', SOLVED %d/%d (%d%%)", + autoplay_status, + autoplay->leveldir->identifier, + autoplay->num_levels_solved, + autoplay->num_levels_played, + autoplay_percent); + + if (autoplay->num_levels_played != autoplay->num_levels_solved) + { + Print(", FAILED:"); + for (i = 0; i < MAX_TAPES_PER_SET; i++) + if (autoplay->level_failed[i]) + Print(" %03d", i); + } + } + + Print("\n"); + PrintLine("=", 79); +} + +static FILE *tape_log_file; + +static void OpenTapeLogfile(void) +{ + if (!(tape_log_file = fopen(options.tape_log_filename, MODE_WRITE))) + Warn("cannot write tape logfile '%s'", options.tape_log_filename); +} + +static void WriteTapeLogfile(byte action[MAX_TAPE_ACTIONS]) +{ + int i; + + for (i = 0; i < MAX_TAPE_ACTIONS; i++) + putFile8Bit(tape_log_file, action[i]); +} + +static void CloseTapeLogfile(void) +{ + fclose(tape_log_file); +} + -/* ========================================================================= */ -/* tape control functions */ -/* ========================================================================= */ +// ============================================================================ +// tape control functions +// ============================================================================ void TapeSetDateFromEpochSeconds(time_t epoch_seconds) { @@ -521,17 +645,26 @@ void TapeErase(void) { int i; + CopyTapeToUndoBuffer(); + tape.counter = 0; tape.length = 0; tape.length_frames = 0; tape.length_seconds = 0; + tape.score_tape_basename[0] = '\0'; + if (leveldir_current) - setString(&tape.level_identifier, leveldir_current->identifier); + { + strncpy(tape.level_identifier, leveldir_current->identifier, + MAX_FILENAME_LEN); + tape.level_identifier[MAX_FILENAME_LEN] = '\0'; + } tape.level_nr = level_nr; tape.pos[tape.counter].delay = 0; tape.changed = TRUE; + tape.solved = FALSE; tape.random_seed = InitRND(level.random_seed); @@ -539,6 +672,8 @@ void TapeErase(void) tape.game_version = GAME_VERSION_ACTUAL; tape.engine_version = level.game_version; + tape.property_bits = TAPE_PROPERTY_NONE; + TapeSetDateFromNow(); for (i = 0; i < MAX_PLAYERS; i++) @@ -547,7 +682,9 @@ void TapeErase(void) tape.centered_player_nr_next = -1; tape.set_centered_player = FALSE; - tape.use_mouse = (level.game_engine_type == GAME_ENGINE_TYPE_MM); + // set flags for game actions to default values (may be overwritten later) + tape.use_key_actions = TRUE; + tape.use_mouse_actions = FALSE; } static void TapeRewind(void) @@ -562,6 +699,8 @@ static void TapeRewind(void) tape.deactivate_display = FALSE; tape.auto_play = (global.autoplay_leveldir != NULL); tape.auto_play_level_solved = FALSE; + tape.auto_play_level_fixed = FALSE; + tape.auto_play_level_not_fixable = FALSE; tape.quick_resume = FALSE; tape.single_step = FALSE; @@ -596,6 +735,10 @@ void TapeStartRecording(int random_seed) SetDrawDeactivationMask(REDRAW_NONE); audio.sound_deactivated = FALSE; + + // required here to update video display if tape door is closed + if (GetDoorState() & DOOR_CLOSE_2) + OpenDoor(GetDoorState() | DOOR_NO_DELAY | DOOR_FORCE_REDRAW); } static void TapeStartGameRecording(void) @@ -618,10 +761,13 @@ static void TapeAppendRecording(void) // start recording tape.recording = TRUE; tape.changed = TRUE; + tape.solved = FALSE; // set current delay (for last played move) tape.pos[tape.counter].delay = tape.delay_played; + tape.property_bits |= TAPE_PROPERTY_REPLAYED; + // set current date TapeSetDateFromNow(); @@ -633,7 +779,9 @@ static void TapeAppendRecording(void) void TapeHaltRecording(void) { - tape.counter++; + // only advance tape counter if any input events have been recorded + if (tape.pos[tape.counter].delay > 0) + tape.counter++; // initialize delay for next tape entry (to be able to continue recording) if (tape.counter < MAX_TAPE_LEN) @@ -656,15 +804,15 @@ void TapeStopRecording(void) MapTapeEjectButton(); } -boolean TapeAddAction(byte action[MAX_PLAYERS]) +boolean TapeAddAction(byte action[MAX_TAPE_ACTIONS]) { int i; - if (tape.pos[tape.counter].delay > 0) /* already stored action */ + if (tape.pos[tape.counter].delay > 0) // already stored action { boolean changed_events = FALSE; - for (i = 0; i < MAX_PLAYERS; i++) + for (i = 0; i < MAX_TAPE_ACTIONS; i++) if (tape.pos[tape.counter].action[i] != action[i]) changed_events = TRUE; @@ -680,29 +828,31 @@ boolean TapeAddAction(byte action[MAX_PLAYERS]) tape.pos[tape.counter].delay++; } - if (tape.pos[tape.counter].delay == 0) /* store new action */ + if (tape.pos[tape.counter].delay == 0) // store new action { - for (i = 0; i < MAX_PLAYERS; i++) + for (i = 0; i < MAX_TAPE_ACTIONS; i++) tape.pos[tape.counter].action[i] = action[i]; tape.pos[tape.counter].delay++; } + tape.changed = TRUE; + return TRUE; } -void TapeRecordAction(byte action_raw[MAX_PLAYERS]) +void TapeRecordAction(byte action_raw[MAX_TAPE_ACTIONS]) { - byte action[MAX_PLAYERS]; + byte action[MAX_TAPE_ACTIONS]; int i; - if (!tape.recording) /* (record action even when tape is paused) */ + if (!tape.recording) // (record action even when tape is paused) return; - for (i = 0; i < MAX_PLAYERS; i++) + for (i = 0; i < MAX_TAPE_ACTIONS; i++) action[i] = action_raw[i]; - if (!tape.use_mouse && tape.set_centered_player) + if (tape.use_key_actions && tape.set_centered_player) { for (i = 0; i < MAX_PLAYERS; i++) if (tape.centered_player_nr_next == i || @@ -712,6 +862,12 @@ void TapeRecordAction(byte action_raw[MAX_PLAYERS]) tape.set_centered_player = FALSE; } + if (GameFrameDelay != GAME_FRAME_DELAY) + tape.property_bits |= TAPE_PROPERTY_GAME_SPEED; + + if (setup.small_game_graphics || SCR_FIELDX >= 2 * SCR_FIELDX_DEFAULT) + tape.property_bits |= TAPE_PROPERTY_SMALL_GRAPHICS; + if (!TapeAddAction(action)) TapeStopRecording(); } @@ -733,6 +889,12 @@ void TapeTogglePause(boolean toggle_mode) if (tape.single_step && (toggle_mode & TAPE_TOGGLE_MANUAL)) tape.single_step = FALSE; + if (tape.single_step) + tape.property_bits |= TAPE_PROPERTY_SINGLE_STEP; + + if (tape.pausing) + tape.property_bits |= TAPE_PROPERTY_PAUSE_MODE; + DrawVideoDisplayCurrentState(); if (tape.deactivate_display) @@ -760,15 +922,24 @@ void TapeTogglePause(boolean toggle_mode) return; } - if (setup.show_snapshot_buttons && - game_status == GAME_MODE_PLAYING && - CheckEngineSnapshotList()) + if (game_status == GAME_MODE_PLAYING) { - if (tape.pausing) - MapUndoRedoButtons(); - else if (!tape.single_step) - UnmapUndoRedoButtons(); + if (setup.show_load_save_buttons && + setup.show_undo_redo_buttons && + CheckEngineSnapshotList()) + { + if (tape.pausing) + MapUndoRedoButtons(); + else if (!tape.single_step) + MapLoadSaveButtons(); + } + + ModifyPauseButtons(); } + + // stop tape when leaving auto-pause after completely replaying tape + if (tape.playing && !tape.pausing && tape.counter >= tape.length) + TapeStop(); } void TapeStartPlaying(void) @@ -818,7 +989,7 @@ byte *TapePlayAction(void) int update_delay = FRAMES_PER_SECOND / 2; boolean update_video_display = (FrameCounter % update_delay == 0); boolean update_draw_label_on = ((FrameCounter / update_delay) % 2 == 1); - static byte action[MAX_PLAYERS]; + static byte action[MAX_TAPE_ACTIONS]; int i; if (!tape.playing || tape.pausing) @@ -826,21 +997,27 @@ byte *TapePlayAction(void) if (tape.pause_before_end) // stop some seconds before end of tape { - if (TapeTime > tape.length_seconds - TAPE_PAUSE_SECONDS_BEFORE_DEATH) + if (TapeTime > (int)tape.length_seconds - TAPE_PAUSE_SECONDS_BEFORE_DEATH) { TapeStopWarpForward(); TapeTogglePause(TAPE_TOGGLE_MANUAL); + if (setup.autorecord_after_replay) + TapeAppendRecording(); + return NULL; } } - if (tape.counter >= tape.length) /* end of tape reached */ + if (tape.counter >= tape.length) // end of tape reached { - if (tape.warp_forward && !tape.auto_play) + if (!tape.auto_play) { TapeStopWarpForward(); TapeTogglePause(TAPE_TOGGLE_MANUAL); + + if (setup.autorecord_after_replay) + TapeAppendRecording(); } else { @@ -867,20 +1044,20 @@ byte *TapePlayAction(void) DrawVideoDisplaySymbol(state); } - for (i = 0; i < MAX_PLAYERS; i++) + for (i = 0; i < MAX_TAPE_ACTIONS; i++) action[i] = tape.pos[tape.counter].action[i]; #if DEBUG_TAPE_WHEN_PLAYING - printf("%05d", FrameCounter); - for (i = 0; i < MAX_PLAYERS; i++) - printf(" %08x", action[i]); - printf("\n"); + DebugContinued("", "%05d", FrameCounter); + for (i = 0; i < MAX_TAPE_ACTIONS; i++) + DebugContinued("", " %08x", action[i]); + DebugContinued("tape:play", "\n"); #endif tape.set_centered_player = FALSE; tape.centered_player_nr_next = -999; - if (!tape.use_mouse) + if (tape.use_key_actions) { for (i = 0; i < MAX_PLAYERS; i++) { @@ -905,6 +1082,9 @@ byte *TapePlayAction(void) if (tape.auto_play) PrintTapeReplayProgress(FALSE); + if (options.tape_log_filename != NULL) + WriteTapeLogfile(action); + return action; } @@ -926,13 +1106,34 @@ void TapeStop(void) } } +static void TapeStopGameOrTape(boolean stop_game) +{ + if (score_info_tape_play || (!tape.playing && stop_game)) + RequestQuitGame(FALSE); + else + TapeStop(); +} + +void TapeStopGame(void) +{ + if (game_status == GAME_MODE_MAIN) + return; + + TapeStopGameOrTape(TRUE); +} + +void TapeStopTape(void) +{ + TapeStopGameOrTape(FALSE); +} + unsigned int GetTapeLengthFrames(void) { unsigned int tape_length_frames = 0; int i; if (TAPE_IS_EMPTY(tape)) - return(0); + return 0; for (i = 0; i < tape.length; i++) tape_length_frames += tape.pos[i].delay; @@ -992,26 +1193,31 @@ static void TapeSingleStep(void) void TapeQuickSave(void) { - if (game_status == GAME_MODE_MAIN) + if (game_status != GAME_MODE_PLAYING) { - Request("No game that can be saved!", REQ_CONFIRM); + Request("No game that could be saved!", REQ_CONFIRM); return; } - if (game_status != GAME_MODE_PLAYING) + if (!tape.recording) + { + Request("No recording that could be saved!", REQ_CONFIRM); + return; + } - if (tape.recording) - TapeHaltRecording(); /* prepare tape for saving on-the-fly */ + TapeHaltRecording(); // prepare tape for saving on-the-fly if (TAPE_IS_EMPTY(tape)) { - Request("No tape that can be saved!", REQ_CONFIRM); + Request("No tape that could be saved!", REQ_CONFIRM); return; } + tape.property_bits |= TAPE_PROPERTY_SNAPSHOT; + if (SaveTapeChecked(tape.level_nr)) SaveEngineSnapshotSingle(); } @@ -1070,8 +1276,9 @@ void TapeQuickLoad(void) TapeStartWarpForward(AUTOPLAY_MODE_WARP_NO_DISPLAY); tape.quick_resume = TRUE; + tape.property_bits |= TAPE_PROPERTY_SNAPSHOT; } - else /* this should not happen (basically checked above) */ + else // this should not happen (basically checked above) { int reopen_door = (game_status == GAME_MODE_PLAYING ? REQ_REOPEN : 0); @@ -1079,6 +1286,69 @@ void TapeQuickLoad(void) } } +static boolean checkRestartGame(char *message) +{ + if (game_status == GAME_MODE_MAIN) + return TRUE; + + if (!hasStartedNetworkGame()) + return FALSE; + + if (level_editor_test_game) + return TRUE; + + if (game.all_players_gone) + return TRUE; + + if (!setup.ask_on_quit_game) + return TRUE; + + if (Request(message, REQ_ASK | REQ_STAY_CLOSED)) + return TRUE; + + OpenDoor(DOOR_OPEN_1 | DOOR_COPY_BACK); + + return FALSE; +} + +void TapeRestartGame(void) +{ + if (score_info_tape_play) + { + TapeStartGamePlaying(); + + return; + } + + if (!checkRestartGame("Restart game?")) + return; + + StartGameActions(network.enabled, setup.autorecord, level.random_seed); +} + +void TapeReplayAndPauseBeforeEnd(void) +{ + if (score_info_tape_play) + return; + + if (TAPE_IS_EMPTY(tape) && !tape.recording) + { + Request("No tape for this level!", REQ_CONFIRM); + + return; + } + + if (!checkRestartGame("Replay game and pause before end?")) + return; + + TapeStop(); + TapeStartGamePlaying(); + TapeStartWarpForward(AUTOPLAY_MODE_WARP_NO_DISPLAY); + + tape.pause_before_end = TRUE; + tape.quick_resume = TRUE; +} + boolean hasSolutionTape(void) { boolean tape_file_exists = fileExists(getSolutionTapeFilename(level_nr)); @@ -1127,162 +1397,959 @@ boolean PlaySolutionTape(void) return TRUE; } - -/* ------------------------------------------------------------------------- * - * tape autoplay functions - * ------------------------------------------------------------------------- */ - -void AutoPlayTape(void) +static boolean PlayScoreTape_WaitForDownload(void) { - static LevelDirTree *autoplay_leveldir = NULL; - static boolean autoplay_initialized = FALSE; - static int autoplay_level_nr = -1; - static int num_levels_played = 0; - static int num_levels_solved = 0; - static int num_tape_missing = 0; - static boolean level_failed[MAX_TAPES_PER_SET]; - int i; + DelayCounter download_delay = { 10000 }; + + ResetDelayCounter(&download_delay); - if (autoplay_initialized) + // wait for score tape to be successfully downloaded (and fail on timeout) + while (!server_scores.tape_downloaded) { - /* just finished auto-playing tape */ - PrintTapeReplayProgress(TRUE); + if (DelayReached(&download_delay)) + return FALSE; - num_levels_played++; + UPDATE_BUSY_STATE_NOT_LOADING(); - if (tape.auto_play_level_solved) - num_levels_solved++; - else if (level_nr >= 0 && level_nr < MAX_TAPES_PER_SET) - level_failed[level_nr] = TRUE; + Delay(20); } - else + + return TRUE; +} + +boolean PlayScoreTape(int entry_nr) +{ + struct ScoreEntry *entry = &scores.entry[entry_nr]; + char *tape_filename = + (entry->id == -1 ? + getScoreTapeFilename(entry->tape_basename, level_nr) : + getScoreCacheTapeFilename(entry->tape_basename, level_nr)); + boolean download_tape = (!fileExists(tape_filename)); + + if (download_tape && entry->id == -1) { - DrawCompleteVideoDisplay(); + FadeSkipNextFadeIn(); - audio.sound_enabled = FALSE; - setup.engine_snapshot_mode = getStringCopy(STR_SNAPSHOT_MODE_OFF); + Request("Cannot find score tape!", REQ_CONFIRM); - autoplay_leveldir = getTreeInfoFromIdentifier(leveldir_first, - global.autoplay_leveldir); + return FALSE; + } - if (autoplay_leveldir == NULL) - Error(ERR_EXIT, "no such level identifier: '%s'", - global.autoplay_leveldir); + server_scores.tape_downloaded = FALSE; - leveldir_current = autoplay_leveldir; + if (download_tape) + ApiGetScoreTapeAsThread(level_nr, entry->id, entry->tape_basename); - if (autoplay_leveldir->first_level < 0) - autoplay_leveldir->first_level = 0; - if (autoplay_leveldir->last_level >= MAX_TAPES_PER_SET) - autoplay_leveldir->last_level = MAX_TAPES_PER_SET - 1; + SetGameStatus(GAME_MODE_PLAYING); - autoplay_level_nr = autoplay_leveldir->first_level; + FadeOut(REDRAW_FIELD); - PrintLine("=", 79); - Print("Automatically playing level tapes\n"); - PrintLine("-", 79); - Print("Level series identifier: '%s'\n", autoplay_leveldir->identifier); - Print("Level series name: '%s'\n", autoplay_leveldir->name); - Print("Level series author: '%s'\n", autoplay_leveldir->author); - Print("Number of levels: %d\n", autoplay_leveldir->levels); - PrintLine("=", 79); - Print("\n"); + if (download_tape && !PlayScoreTape_WaitForDownload()) + { + SetGameStatus(GAME_MODE_SCOREINFO); + ClearField(); - for (i = 0; i < MAX_TAPES_PER_SET; i++) - level_failed[i] = FALSE; + Request("Cannot download score tape from score server!", REQ_CONFIRM); - autoplay_initialized = TRUE; + return FALSE; } - while (autoplay_level_nr <= autoplay_leveldir->last_level) - { - level_nr = autoplay_level_nr++; - - if (!global.autoplay_all && !global.autoplay_level[level_nr]) - continue; + if (!TAPE_IS_STOPPED(tape)) + TapeStop(); - TapeErase(); + // if tape recorder already contains a tape, remove it without asking + TapeErase(); - LoadLevel(level_nr); + if (entry->id == -1) + LoadScoreTape(entry->tape_basename, level_nr); + else + LoadScoreCacheTape(entry->tape_basename, level_nr); - if (level.no_level_file || level.no_valid_file) - { - Print("Level %03d: (no level)\n", level_nr); + if (TAPE_IS_EMPTY(tape)) + { + SetGameStatus(GAME_MODE_SCOREINFO); + ClearField(); - continue; - } + Request("Cannot load score tape for this level!", REQ_CONFIRM); -#if 0 - /* ACTIVATE THIS FOR LOADING/TESTING OF LEVELS ONLY */ - Print("Level %03d: (only testing level)\n", level_nr); - continue; -#endif + return FALSE; + } - if (options.mytapes) - LoadTape(level_nr); - else - LoadSolutionTape(level_nr); + FadeSkipNextFadeOut(); - if (tape.no_valid_file) - { - num_tape_missing++; + TapeStartGamePlaying(); - Print("Level %03d: (no tape)\n", level_nr); + score_info_tape_play = TRUE; - continue; - } + return TRUE; +} - InitCounter(); +static boolean checkTapesFromSameLevel(struct TapeInfo *t1, struct TapeInfo *t2) +{ + return (strEqual(t1->level_identifier, t2->level_identifier) && + t1->level_nr == t2->level_nr); +} - TapeStartGamePlaying(); - TapeStartWarpForward(global.autoplay_mode); +static void CopyTape(struct TapeInfo *tape_from, struct TapeInfo *tape_to) +{ + *tape_to = *tape_from; +} - return; - } +static void SwapTapes(struct TapeInfo *t1, struct TapeInfo *t2) +{ + struct TapeInfo tmp = *t1; - Print("\n"); - PrintLine("=", 79); - Print("Number of levels played: %d\n", num_levels_played); - Print("Number of levels solved: %d (%d%%)\n", num_levels_solved, - (num_levels_played ? num_levels_solved * 100 / num_levels_played :0)); - PrintLine("-", 79); - Print("Summary (for automatic parsing by scripts):\n"); - Print("LEVELDIR '%s', SOLVED %d/%d (%d%%)", - autoplay_leveldir->identifier, num_levels_solved, num_levels_played, - (num_levels_played ? num_levels_solved * 100 / num_levels_played :0)); + *t1 = *t2; + *t2 = tmp; +} - if (num_levels_played != num_levels_solved) +static void CopyTapeToUndoBuffer(void) +{ + // copy tapes to undo buffer if large enough (or larger than last undo tape) + // or if the last undo tape is from a different level set or level number + if (tape.length_seconds >= TAPE_MIN_SECONDS_FOR_UNDO_BUFFER || + tape.length_seconds >= tape_undo_buffer.length_seconds || + !checkTapesFromSameLevel(&tape, &tape_undo_buffer)) { - Print(", FAILED:"); - for (i = 0; i < MAX_TAPES_PER_SET; i++) - if (level_failed[i]) - Print(" %03d", i); + CopyTape(&tape, &tape_undo_buffer); } +} - Print("\n"); - PrintLine("=", 79); +void UndoTape(void) +{ + // only undo tapes from same level set and with same level number + if (!checkTapesFromSameLevel(&tape, &tape_undo_buffer)) + return; - CloseAllAndExit(0); + if (!TAPE_IS_STOPPED(tape)) + TapeStop(); + + // swap last recorded tape with undo buffer, so undo can be reversed + SwapTapes(&tape, &tape_undo_buffer); + + DrawCompleteVideoDisplay(); } +void FixTape_ForceSinglePlayer(void) +{ + int i; -/* ---------- new tape button stuff ---------------------------------------- */ + /* fix single-player tapes that contain player input for more than one + player (due to a bug in 3.3.1.2 and earlier versions), which results + in playing levels with more than one player in multi-player mode, + even though the tape was originally recorded in single-player mode */ -static struct + // remove player input actions for all players but the first one + for (i = 1; i < MAX_PLAYERS; i++) + tape.player_participates[i] = FALSE; + + tape.changed = TRUE; +} + + +// ---------------------------------------------------------------------------- +// tape autoplay functions +// ---------------------------------------------------------------------------- + +static TreeInfo *getNextValidAutoPlayEntry(TreeInfo *node) { - int graphic; - struct XY *pos; - int gadget_id; - char *infotext; -} tapebutton_info[NUM_TAPE_BUTTONS] = + node = getNextValidTreeInfoEntry(node); + + while (node && node->is_copy) + node = getNextValidTreeInfoEntry(node); + + return node; +} + +static TreeInfo *getFirstValidAutoPlayEntry(TreeInfo *node) { - { - IMG_GFX_TAPE_BUTTON_EJECT, &tape.button.eject, - TAPE_CTRL_ID_EJECT, "eject tape" - }, - { - /* (same position as "eject" button) */ - IMG_GFX_TAPE_BUTTON_EXTRA, &tape.button.eject, + node = getFirstValidTreeInfoEntry(node); + + if (node && node->is_copy) + return getNextValidAutoPlayEntry(node); + + return node; +} + +static void AutoPlayTapes_SetScoreEntry(int score, int time) +{ + char *name = (options.mytapes ? setup.player_name : options.player_name); + + // set unique basename for score tape (for uploading to score server) + strcpy(tape.score_tape_basename, getScoreTapeBasename(name)); + + // store score in first score entry + scores.last_added = 0; + + struct ScoreEntry *entry = &scores.entry[scores.last_added]; + + strncpy(entry->tape_basename, tape.score_tape_basename, MAX_FILENAME_LEN); + strncpy(entry->name, setup.player_name, MAX_PLAYER_NAME_LEN); + + entry->score = score; + entry->time = time; + + PrintNoLog("- uploading score tape to score server ... "); + + server_scores.uploaded = FALSE; +} + +static boolean AutoPlayTapes_WaitForUpload(void) +{ + DelayCounter upload_delay = { 10000 }; + + ResetDelayCounter(&upload_delay); + + // wait for score tape to be successfully uploaded (and fail on timeout) + while (!server_scores.uploaded) + { + if (DelayReached(&upload_delay)) + { + PrintNoLog("\r"); + Print("- uploading score tape to score server - TIMEOUT.\n"); + + if (program.headless) + Fail("cannot upload score tape to score server"); + + return FALSE; + } + + UPDATE_BUSY_STATE(); + + Delay(20); + } + + PrintNoLog("\r"); + Print("- uploading score tape to score server - uploaded.\n"); + + return TRUE; +} + +static int AutoPlayTapesExt(boolean initialize) +{ + static struct AutoPlayInfo autoplay; + static int num_tapes = 0; + static int patch_nr = 0; + static char *patch_name[] = + { + "original tape", + "em_random_bug", + "screen_34x34", + + NULL + }; + static int patch_version_first[] = + { + VERSION_IDENT(0,0,0,0), + VERSION_IDENT(3,3,1,0), + VERSION_IDENT(0,0,0,0), + + -1 + }; + static int patch_version_last[] = + { + VERSION_IDENT(9,9,9,9), + VERSION_IDENT(4,0,1,1), + VERSION_IDENT(4,2,2,0), + + -1 + }; + static byte patch_property_bit[] = + { + TAPE_PROPERTY_NONE, + TAPE_PROPERTY_EM_RANDOM_BUG, + TAPE_PROPERTY_NONE, + + -1 + }; + LevelDirTree *leveldir_current_last = leveldir_current; + boolean init_level_set = FALSE; + int level_nr_last = level_nr; + int i; + + if (!initialize) + { + if (global.autoplay_mode == AUTOPLAY_MODE_FIX) + { + if (tape.auto_play_level_solved) + { + if (patch_nr > 0) + { + // level solved by patched tape -- save fixed tape + char *filename = getTapeFilename(level_nr); + char *filename_orig = getStringCat2(filename, ".orig"); + + // create backup from old tape, if not yet existing + if (!fileExists(filename_orig)) + rename(filename, filename_orig); + + SaveTapeToFilename(filename); + + tape.auto_play_level_fixed = TRUE; + autoplay.num_tapes_patched++; + } + + // continue with next tape + patch_nr = 0; + } + else if (patch_name[patch_nr + 1] != NULL) + { + // level not solved by patched tape -- continue with next patch + patch_nr++; + } + else + { + // level not solved by any patched tape -- continue with next tape + tape.auto_play_level_not_fixable = TRUE; + patch_nr = 0; + } + } + + // just finished auto-playing tape + PrintTapeReplayProgress(TRUE); + + if (options.tape_log_filename != NULL) + CloseTapeLogfile(); + + if (global.autoplay_mode == AUTOPLAY_MODE_SAVE && + tape.auto_play_level_solved) + { + AutoPlayTapes_SetScoreEntry(game.score_final, game.score_time_final); + + if (leveldir_current) + { + // the tape's level set identifier may differ from current level set + strncpy(tape.level_identifier, leveldir_current->identifier, + MAX_FILENAME_LEN); + tape.level_identifier[MAX_FILENAME_LEN] = '\0'; + + // the tape's level number may differ from current level number + tape.level_nr = level_nr; + } + + // save score tape to upload to server; may be required for some reasons: + // * level set identifier in solution tapes may differ from level set + // * level set identifier is missing (old-style tape without INFO chunk) + // * solution tape may have native format (like Supaplex solution files) + + SaveScoreTape(level_nr); + SaveServerScore(level_nr, TRUE); + + AutoPlayTapes_WaitForUpload(); + } + + if (patch_nr == 0) + autoplay.num_levels_played++; + + if (tape.auto_play_level_solved) + autoplay.num_levels_solved++; + + if (level_nr >= 0 && level_nr < MAX_TAPES_PER_SET) + autoplay.level_failed[level_nr] = !tape.auto_play_level_solved; + } + else + { + if (strEqual(global.autoplay_leveldir, "ALL")) + { + autoplay.all_levelsets = TRUE; + + // tape mass-uploading only allowed for private tapes + if (global.autoplay_mode == AUTOPLAY_MODE_UPLOAD) + options.mytapes = TRUE; + } + + if ((global.autoplay_mode == AUTOPLAY_MODE_SAVE || + global.autoplay_mode == AUTOPLAY_MODE_UPLOAD) && + !options.mytapes && + options.player_name == NULL) + { + Fail("specify player name when uploading solution tapes"); + } + + if (global.autoplay_mode != AUTOPLAY_MODE_UPLOAD) + DrawCompleteVideoDisplay(); + + if (program.headless) + { + audio.sound_enabled = FALSE; + setup.engine_snapshot_mode = getStringCopy(STR_SNAPSHOT_MODE_OFF); + } + + if (strSuffix(global.autoplay_leveldir, ".tape")) + { + autoplay.tape_filename = global.autoplay_leveldir; + + if (!fileExists(autoplay.tape_filename)) + Fail("tape file '%s' does not exist", autoplay.tape_filename); + + LoadTapeFromFilename(autoplay.tape_filename); + + if (tape.no_valid_file) + Fail("cannot load tape file '%s'", autoplay.tape_filename); + + if (tape.no_info_chunk && !options.identifier) + Fail("cannot get levelset from tape file '%s'", autoplay.tape_filename); + + if (tape.no_info_chunk && !options.level_nr) + Fail("cannot get level nr from tape file '%s'", autoplay.tape_filename); + + global.autoplay_leveldir = tape.level_identifier; + + if (options.identifier != NULL) + global.autoplay_leveldir = options.identifier; + + if (options.level_nr != NULL) + tape.level_nr = atoi(options.level_nr); + + if (tape.level_nr >= 0 && tape.level_nr < MAX_TAPES_PER_SET) + global.autoplay_level[tape.level_nr] = TRUE; + + global.autoplay_all = FALSE; + options.mytapes = FALSE; + } + + if (autoplay.all_levelsets) + { + // start auto-playing first level set + autoplay.leveldir = getFirstValidAutoPlayEntry(leveldir_first); + } + else + { + // auto-play selected level set + autoplay.leveldir = getTreeInfoFromIdentifier(leveldir_first, + global.autoplay_leveldir); + } + + if (autoplay.leveldir == NULL) + Fail("no such level identifier: '%s'", global.autoplay_leveldir); + + // only private tapes may be modified + if (global.autoplay_mode == AUTOPLAY_MODE_FIX) + options.mytapes = TRUE; + + // set timestamp for batch tape upload + global.autoplay_time = time(NULL); + + num_tapes = 0; + + init_level_set = TRUE; + } + + while (1) + { + if (init_level_set) + { + leveldir_current = autoplay.leveldir; + + if (autoplay.leveldir->first_level < 0) + autoplay.leveldir->first_level = 0; + if (autoplay.leveldir->last_level >= MAX_TAPES_PER_SET) + autoplay.leveldir->last_level = MAX_TAPES_PER_SET - 1; + + autoplay.level_nr = autoplay.leveldir->first_level; + + autoplay.num_levels_played = 0; + autoplay.num_levels_solved = 0; + autoplay.num_tapes_patched = 0; + autoplay.num_tape_missing = 0; + + for (i = 0; i < MAX_TAPES_PER_SET; i++) + autoplay.level_failed[i] = FALSE; + + PrintTapeReplayHeader(&autoplay); + + init_level_set = FALSE; + } + + if (autoplay.all_levelsets && global.autoplay_mode == AUTOPLAY_MODE_UPLOAD) + { + boolean skip_levelset = FALSE; + + if (!directoryExists(getTapeDir(autoplay.leveldir->subdir))) + { + Print("No tape directory for this level set found -- skipping.\n"); + + skip_levelset = TRUE; + } + + if (CheckTapeDirectoryUploadsComplete(autoplay.leveldir->subdir)) + { + Print("All tapes for this level set already uploaded -- skipping.\n"); + + skip_levelset = TRUE; + } + + if (skip_levelset) + { + PrintTapeReplaySummary(&autoplay); + + // continue with next level set + autoplay.leveldir = getNextValidAutoPlayEntry(autoplay.leveldir); + + // all level sets processed + if (autoplay.leveldir == NULL) + break; + + init_level_set = TRUE; + + continue; + } + } + + if (global.autoplay_mode != AUTOPLAY_MODE_FIX || patch_nr == 0) + level_nr = autoplay.level_nr++; + + UPDATE_BUSY_STATE(); + + // check if all tapes for this level set have been processed + if (level_nr > autoplay.leveldir->last_level) + { + PrintTapeReplaySummary(&autoplay); + + if (!autoplay.all_levelsets) + break; + + if (global.autoplay_mode == AUTOPLAY_MODE_UPLOAD) + MarkTapeDirectoryUploadsAsComplete(autoplay.leveldir->subdir); + + // continue with next level set + autoplay.leveldir = getNextValidAutoPlayEntry(autoplay.leveldir); + + // all level sets processed + if (autoplay.leveldir == NULL) + break; + + init_level_set = TRUE; + + continue; + } + + // set patch info (required for progress output) + strcpy(tape_patch_info, ""); + if (global.autoplay_mode == AUTOPLAY_MODE_FIX) + snprintf(tape_patch_info, MAX_OUTPUT_LINESIZE, "[%-13s] ", + patch_name[patch_nr]); + + if (!global.autoplay_all && !global.autoplay_level[level_nr]) + continue; + + // speed things up in case of missing private tapes (skip loading level) + if (options.mytapes && !fileExists(getTapeFilename(level_nr))) + { + autoplay.num_tape_missing++; + + Print("Tape %03d: (no tape found)\n", level_nr); + + continue; + } + + TapeErase(); + TapeRewind(); // needed to reset "tape.auto_play_level_solved" + + LoadLevel(level_nr); + + if (level.no_level_file || level.no_valid_file) + { + Print("Tape %03d: (no level found)\n", level_nr); + + continue; + } + +#if 0 + // ACTIVATE THIS FOR LOADING/TESTING OF LEVELS ONLY + Print("Tape %03d: (only testing level)\n", level_nr); + continue; +#endif + + if (autoplay.tape_filename) + LoadTapeFromFilename(autoplay.tape_filename); + else if (options.mytapes) + LoadTape(level_nr); + else + LoadSolutionTape(level_nr); + + if (tape.no_valid_file) + { + autoplay.num_tape_missing++; + + Print("Tape %03d: (no tape found)\n", level_nr); + + continue; + } + + if (global.autoplay_mode == AUTOPLAY_MODE_FIX) + { + boolean skip_patch = FALSE; + + if (tape.engine_version < patch_version_first[patch_nr] || + tape.engine_version > patch_version_last[patch_nr]) + { + Print("Tape %03d %s[%02d:%02d]: (%s %d.%d.%d.%d) - skipped.\n", + level_nr, tape_patch_info, + tape.length_seconds / 60, tape.length_seconds % 60, + "not suitable for version", + (tape.engine_version / 1000000) % 100, + (tape.engine_version / 10000 ) % 100, + (tape.engine_version / 100 ) % 100, + (tape.engine_version ) % 100); + + skip_patch = TRUE; + } + + if (strEqual(patch_name[patch_nr], "screen_34x34") && + tape.num_participating_players == 1) + { + Print("Tape %03d %s[%02d:%02d]: (%s) - skipped.\n", + level_nr, tape_patch_info, + tape.length_seconds / 60, tape.length_seconds % 60, + "not suitable for single player tapes"); + + skip_patch = TRUE; + } + + if (skip_patch) + { + if (patch_name[patch_nr + 1] != NULL) + { + // continue with next patch + patch_nr++; + } + else + { + // continue with next tape + patch_nr = 0; + } + + continue; + } + + if (strEqual(patch_name[patch_nr], "screen_34x34")) + { + tape.scr_fieldx = SCR_FIELDX_DEFAULT * 2; + tape.scr_fieldy = SCR_FIELDY_DEFAULT * 2; + } + else + { + tape.property_bits |= patch_property_bit[patch_nr]; + } + } + + num_tapes++; + + if (global.autoplay_mode == AUTOPLAY_MODE_UPLOAD) + { + boolean use_temporary_tape_file = FALSE; + + Print("Tape %03d:\n", level_nr); + + AutoPlayTapes_SetScoreEntry(0, 0); + + if (autoplay.tape_filename == NULL) + { + autoplay.tape_filename = (options.mytapes ? getTapeFilename(level_nr) : + getDefaultSolutionTapeFilename(level_nr)); + + if (!fileExists(autoplay.tape_filename)) + { + // non-standard or incorrect solution tape -- save to temporary file + autoplay.tape_filename = getTemporaryTapeFilename(); + + SaveTapeToFilename(autoplay.tape_filename); + + use_temporary_tape_file = TRUE; + } + } + + SaveServerScoreFromFile(level_nr, TRUE, autoplay.tape_filename); + + boolean success = AutoPlayTapes_WaitForUpload(); + + if (use_temporary_tape_file) + unlink(autoplay.tape_filename); + + // required for uploading multiple tapes + autoplay.tape_filename = NULL; + + if (!success) + { + num_tapes = -num_tapes; + + break; + } + + continue; + } + + InitCounter(); + + if (options.tape_log_filename != NULL) + OpenTapeLogfile(); + + TapeStartGamePlaying(); + TapeStartWarpForward(global.autoplay_mode); + + autoplay.last_level_nr = level_nr; + + return num_tapes; + } + + if (global.autoplay_mode == AUTOPLAY_MODE_UPLOAD) + { + Print("\n"); + PrintLine("=", 79); + + if (num_tapes >= 0) + Print("SUMMARY: %d tapes uploaded.\n", num_tapes); + else + Print("SUMMARY: Uploading tapes failed.\n"); + + PrintLine("=", 79); + } + + // clear timestamp for batch tape upload (required after interactive upload) + global.autoplay_time = 0; + + // exit if running headless or if visually auto-playing tapes + if (program.headless || global.autoplay_mode != AUTOPLAY_MODE_UPLOAD) + CloseAllAndExit(0); + + // when running interactively, restore last selected level set and number + leveldir_current = leveldir_current_last; + level_nr = level_nr_last; + + return num_tapes; +} + +int AutoPlayTapes(void) +{ + return AutoPlayTapesExt(TRUE); +} + +int AutoPlayTapesContinue(void) +{ + return AutoPlayTapesExt(FALSE); +} + + +// ---------------------------------------------------------------------------- +// tape patch functions +// ---------------------------------------------------------------------------- + +static boolean PatchTape(struct TapeInfo *tape, char *mode) +{ + Print("[%d.%d.%d.%d]: ", + (tape->engine_version / 1000000) % 100, + (tape->engine_version / 10000 ) % 100, + (tape->engine_version / 100 ) % 100, + (tape->engine_version ) % 100); + + if (strEqual(mode, "info")) + { + Print("property bits == 0x%02x\n", tape->property_bits); + + return FALSE; + } + + boolean unpatch_tape = FALSE; + boolean use_property_bit = FALSE; + byte property_bitmask = 0; + + if (strSuffix(mode, ":0") || + strSuffix(mode, ":off") || + strSuffix(mode, ":clear")) + unpatch_tape = TRUE; + + if (strEqual(mode, "em_random_bug") || strPrefix(mode, "em_random_bug:")) + { + // this bug was introduced in version 3.3.1.0 and fixed in version 4.0.1.2 + if (tape->engine_version < VERSION_IDENT(3,3,1,0) || + tape->engine_version >= VERSION_IDENT(4,0,1,2)) + { + Print("This tape version cannot be patched against EM random bug!\n"); + + return FALSE; + } + + property_bitmask = TAPE_PROPERTY_EM_RANDOM_BUG; + + use_property_bit = TRUE; + } + else if (strEqual(mode, "screen_34x34") || strPrefix(mode, "screen_34x34:")) + { + // this bug only affects team mode tapes + if (tape->num_participating_players == 1) + { + Print("Only team mode tapes can be patched against screen size bug!\n"); + + return FALSE; + } + + // this bug (that always existed before) was fixed in version 4.2.2.1 + if (tape->engine_version >= VERSION_IDENT(4,2,2,1)) + { + Print("This tape version cannot be patched against screen size bug!\n"); + + return FALSE; + } + + int factor = (unpatch_tape ? 1 : 2); + int scr_fieldx_new = SCR_FIELDX_DEFAULT * factor; + int scr_fieldy_new = SCR_FIELDY_DEFAULT * factor; + + if (scr_fieldx_new == tape->scr_fieldx && + scr_fieldy_new == tape->scr_fieldy) + { + Print("Tape already patched for '%s'!\n", mode); + + return FALSE; + } + + tape->scr_fieldx = scr_fieldx_new; + tape->scr_fieldy = scr_fieldy_new; + } + else + { + Print("Unknown patch mode '%s'!\n", mode); + + return FALSE; + } + + // patching tapes using property bits may be used for several patch modes + if (use_property_bit) + { + byte property_bits = tape->property_bits; + boolean set_property_bit = (unpatch_tape ? FALSE : TRUE); + + if (set_property_bit) + property_bits |= property_bitmask; + else + property_bits &= ~property_bitmask; + + if (property_bits == tape->property_bits) + { + Print("Tape already patched for '%s'!\n", mode); + + return FALSE; + } + + tape->property_bits = property_bits; + } + + Print("Patching for '%s' ... ", mode); + + return TRUE; +} + +void PatchTapes(void) +{ + static LevelDirTree *patchtapes_leveldir = NULL; + static int num_tapes_found = 0; + static int num_tapes_patched = 0; + char *mode = global.patchtapes_mode; + int i; + + if (strEqual(mode, "help")) + { + PrintLine("=", 79); + Print("Supported patch modes:\n"); + Print("- \"em_random_bug\" - use 64-bit random value bug for EM engine\n"); + Print("- \"screen_34x34\" - force visible playfield size of 34 x 34\n"); + PrintLine("-", 79); + Print("Supported modifiers:\n"); + Print("- add \":0\", \":off\" or \":clear\" to patch mode to un-patch tape file\n"); + PrintLine("=", 79); + + CloseAllAndExit(0); + } + + patchtapes_leveldir = getTreeInfoFromIdentifier(leveldir_first, + global.patchtapes_leveldir); + + if (patchtapes_leveldir == NULL) + Fail("no such level identifier: '%s'", global.patchtapes_leveldir); + + leveldir_current = patchtapes_leveldir; + + if (patchtapes_leveldir->first_level < 0) + patchtapes_leveldir->first_level = 0; + if (patchtapes_leveldir->last_level >= MAX_TAPES_PER_SET) + patchtapes_leveldir->last_level = MAX_TAPES_PER_SET - 1; + + PrintLine("=", 79); + Print("Patching level tapes for patch mode '%s'\n", mode); + PrintLine("-", 79); + Print("Level series identifier: '%s'\n", patchtapes_leveldir->identifier); + Print("Level series name: '%s'\n", patchtapes_leveldir->name); + Print("Level series author: '%s'\n", patchtapes_leveldir->author); + Print("Number of levels: %d\n", patchtapes_leveldir->levels); + PrintLine("=", 79); + Print("\n"); + + int first_level = patchtapes_leveldir->first_level; + int last_level = patchtapes_leveldir->last_level; + + for (i = first_level; i <= last_level; i++) + { + if (!global.patchtapes_all && !global.patchtapes_level[i]) + continue; + + Print("Tape %03d: ", i); + + TapeErase(); + LoadTape(i); + + if (tape.no_valid_file) + { + Print("(no tape found)\n"); + + continue; + } + + num_tapes_found++; + + if (PatchTape(&tape, mode)) + { + char *filename = getTapeFilename(i); + char *filename_orig = getStringCat2(filename, ".orig"); + + if (!fileExists(filename_orig)) + rename(filename, filename_orig); + + SaveTapeToFilename(filename); + + Print("patched tape saved.\n"); + + num_tapes_patched++; + } + } + + Print("\n"); + PrintLine("=", 79); + Print("Number of tapes found: %d\n", num_tapes_found); + Print("Number of tapes patched: %d\n", num_tapes_patched); + PrintLine("=", 79); + + CloseAllAndExit(0); +} + + +// ---------- new tape button stuff ------------------------------------------- + +static struct +{ + int graphic; + struct XY *pos; + int gadget_id; + char *infotext; +} tapebutton_info[NUM_TAPE_BUTTONS] = +{ + { + IMG_GFX_TAPE_BUTTON_EJECT, &tape.button.eject, + TAPE_CTRL_ID_EJECT, "eject tape" + }, + { + // (same position as "eject" button) + IMG_GFX_TAPE_BUTTON_EXTRA, &tape.button.eject, TAPE_CTRL_ID_EXTRA, "extra functions" }, { @@ -1344,7 +2411,7 @@ void CreateTapeButtons(void) GDI_END); if (gi == NULL) - Error(ERR_EXIT, "cannot create gadget"); + Fail("cannot create gadget"); tape_gadget[id] = gi; } @@ -1405,9 +2472,6 @@ void RedrawTapeButtons(void) if (tape.show_game_buttons) RedrawGameButtonsOnTape(); - - // RedrawGadget() may have set REDRAW_ALL if buttons are defined off-area - redraw_mask &= ~REDRAW_ALL; } void RedrawOrRemapTapeButtons(void) @@ -1467,7 +2531,7 @@ static void HandleTapeButtonsExt(int id) break; case TAPE_CTRL_ID_STOP: - TapeStop(); + TapeStopTape(); break; @@ -1483,7 +2547,7 @@ static void HandleTapeButtonsExt(int id) } else if (tape.pausing) { - if (tape.playing) /* PLAY -> PAUSE -> RECORD */ + if (tape.playing) // PLAY -> PAUSE -> RECORD TapeAppendRecording(); else TapeTogglePause(TAPE_TOGGLE_MANUAL); @@ -1492,7 +2556,7 @@ static void HandleTapeButtonsExt(int id) break; case TAPE_CTRL_ID_PLAY: - if (tape.recording && tape.pausing) /* PAUSE -> RECORD */ + if (tape.recording && tape.pausing) // PAUSE -> RECORD { // ("TAPE_IS_EMPTY(tape)" is TRUE here -- probably fix this) @@ -1508,25 +2572,25 @@ static void HandleTapeButtonsExt(int id) } else if (tape.playing) { - if (tape.pausing) /* PAUSE -> PLAY */ + if (tape.pausing) // PAUSE -> PLAY { TapeTogglePause(TAPE_TOGGLE_MANUAL | TAPE_TOGGLE_PLAY_PAUSE); } - else if (!tape.fast_forward) /* PLAY -> FFWD */ + else if (!tape.fast_forward) // PLAY -> FFWD { tape.fast_forward = TRUE; } - else if (!tape.warp_forward) /* FFWD -> WARP */ + else if (!tape.warp_forward) // FFWD -> WARP { tape.warp_forward = TRUE; } - else if (!tape.deactivate_display) /* WARP -> WARP BLIND */ + else if (!tape.deactivate_display) // WARP -> WARP BLIND { tape.deactivate_display = TRUE; TapeDeactivateDisplayOn(); } - else /* WARP BLIND -> PLAY */ + else // WARP BLIND -> PLAY { tape.fast_forward = FALSE; tape.warp_forward = FALSE;