1 /***********************************************************
2 * Rocks'n'Diamonds -- McDuffin Strikes Back! *
3 *----------------------------------------------------------*
4 * (c) 1995-98 Artsoft Entertainment *
8 * phone: ++49 +521 290471 *
9 * email: aeglos@valinor.owl.de *
10 *----------------------------------------------------------*
12 ***********************************************************/
25 #define MAX_LINE_LEN 1000 /* file input line length */
26 #define CHUNK_ID_LEN 4 /* IFF style chunk id length */
27 #define LEVEL_HEADER_SIZE 80 /* size of level file header */
28 #define LEVEL_HEADER_UNUSED 18 /* unused level header bytes */
29 #define TAPE_HEADER_SIZE 20 /* size of tape file header */
30 #define TAPE_HEADER_UNUSED 7 /* unused tape header bytes */
31 #define FILE_VERSION_1_0 10 /* old 1.0 file version */
32 #define FILE_VERSION_1_2 12 /* actual file version */
34 static void SaveUserLevelInfo(); /* for 'InitUserLevelDir()' */
35 static char *getSetupLine(char *, int); /* for 'SaveUserLevelInfo()' */
37 static char *getGlobalDataDir()
42 static char *getUserDataDir()
44 static char *userdata_dir = NULL;
48 char *home_dir = getHomeDir();
49 char *data_dir = USERDATA_DIRECTORY;
51 userdata_dir = checked_malloc(strlen(home_dir) + strlen(data_dir) + 2);
52 sprintf(userdata_dir, "%s/%s", home_dir, data_dir);
58 static char *getSetupDir()
60 return getUserDataDir();
63 static char *getUserLevelDir(char *level_subdir)
65 static char *userlevel_dir = NULL;
66 char *data_dir = getUserDataDir();
67 char *userlevel_subdir = LEVELS_DIRECTORY;
72 userlevel_dir = checked_malloc(strlen(data_dir) + strlen(userlevel_subdir) +
73 strlen(level_subdir) + 3);
74 sprintf(userlevel_dir, "%s/%s%s%s", data_dir, userlevel_subdir,
75 (strlen(level_subdir) > 0 ? "/" : ""), level_subdir);
80 static char *getTapeDir(char *level_subdir)
82 static char *tape_dir = NULL;
83 char *data_dir = getUserDataDir();
84 char *tape_subdir = TAPES_DIRECTORY;
89 tape_dir = checked_malloc(strlen(data_dir) + strlen(tape_subdir) +
90 strlen(level_subdir) + 3);
91 sprintf(tape_dir, "%s/%s%s%s", data_dir, tape_subdir,
92 (strlen(level_subdir) > 0 ? "/" : ""), level_subdir);
97 static char *getScoreDir(char *level_subdir)
99 static char *score_dir = NULL;
100 char *data_dir = getGlobalDataDir();
101 char *score_subdir = SCORES_DIRECTORY;
106 score_dir = checked_malloc(strlen(data_dir) + strlen(score_subdir) +
107 strlen(level_subdir) + 3);
108 sprintf(score_dir, "%s/%s%s%s", data_dir, score_subdir,
109 (strlen(level_subdir) > 0 ? "/" : ""), level_subdir);
114 static void createDirectory(char *dir, char *text)
116 if (access(dir, F_OK) != 0)
117 if (mkdir(dir, USERDATA_DIR_MODE) != 0)
118 Error(ERR_WARN, "cannot create %s directory '%s'", text, dir);
121 static void InitUserDataDirectory()
123 createDirectory(getUserDataDir(), "user data");
126 static void InitTapeDirectory(char *level_subdir)
128 createDirectory(getTapeDir(""), "main tape");
129 createDirectory(getTapeDir(level_subdir), "level tape");
132 static void InitScoreDirectory(char *level_subdir)
134 createDirectory(getScoreDir(""), "main score");
135 createDirectory(getScoreDir(level_subdir), "level score");
138 static void InitUserLevelDirectory(char *level_subdir)
140 if (access(getUserLevelDir(level_subdir), F_OK) != 0)
142 createDirectory(getUserLevelDir(""), "main user level");
143 createDirectory(getUserLevelDir(level_subdir), "user level");
149 static void setLevelInfoToDefaults()
153 lev_fieldx = level.fieldx = STD_LEV_FIELDX;
154 lev_fieldy = level.fieldy = STD_LEV_FIELDY;
156 for(x=0; x<MAX_LEV_FIELDX; x++)
157 for(y=0; y<MAX_LEV_FIELDY; y++)
158 Feld[x][y] = Ur[x][y] = EL_ERDREICH;
161 level.edelsteine = 0;
162 level.tempo_amoebe = 10;
163 level.dauer_sieb = 10;
164 level.dauer_ablenk = 10;
165 level.amoebe_inhalt = EL_DIAMANT;
167 strcpy(level.name, "Nameless Level");
169 for(i=0; i<MAX_LEVSCORE_ENTRIES; i++)
175 level.mampfer_inhalt[i][x][y] = EL_FELSBROCKEN;
177 Feld[0][0] = Ur[0][0] = EL_SPIELFIGUR;
178 Feld[STD_LEV_FIELDX-1][STD_LEV_FIELDY-1] =
179 Ur[STD_LEV_FIELDX-1][STD_LEV_FIELDY-1] = EL_AUSGANG_ZU;
182 void LoadLevel(int level_nr)
185 char filename[MAX_FILENAME_LEN];
186 char cookie[MAX_LINE_LEN];
187 char chunk[CHUNK_ID_LEN + 1];
188 int file_version = FILE_VERSION_1_2; /* last version of level files */
192 /* always start with reliable default values */
193 setLevelInfoToDefaults();
195 if (leveldir[leveldir_nr].user_defined)
196 sprintf(filename, "%s/%s/%d",
197 getUserLevelDir(""), leveldir[leveldir_nr].filename, level_nr);
199 sprintf(filename, "%s/%s/%d",
200 options.level_directory, leveldir[leveldir_nr].filename, level_nr);
202 if (!(file = fopen(filename, "r")))
204 Error(ERR_WARN, "cannot read level '%s' - creating new level", filename);
208 /* check file identifier */
209 fgets(cookie, MAX_LINE_LEN, file);
210 if (strlen(cookie) > 0 && cookie[strlen(cookie) - 1] == '\n')
211 cookie[strlen(cookie) - 1] = '\0';
213 if (strcmp(cookie, LEVEL_COOKIE_10) == 0) /* old 1.0 level format */
214 file_version = FILE_VERSION_1_0;
215 else if (strcmp(cookie, LEVEL_COOKIE) != 0) /* unknown level format */
217 Error(ERR_WARN, "wrong file identifier of level file '%s'", filename);
222 /* read chunk "HEAD" */
223 if (file_version >= FILE_VERSION_1_2)
225 /* first check header chunk identifier and chunk length */
226 fgets(chunk, CHUNK_ID_LEN + 1, file);
228 (fgetc(file)<<24) | (fgetc(file)<<16) | (fgetc(file)<<8) | fgetc(file);
229 if (strcmp(chunk, "HEAD") || chunk_length != LEVEL_HEADER_SIZE)
231 Error(ERR_WARN, "wrong 'HEAD' chunk of level file '%s'", filename);
237 lev_fieldx = level.fieldx = fgetc(file);
238 lev_fieldy = level.fieldy = fgetc(file);
240 level.time = (fgetc(file)<<8) | fgetc(file);
241 level.edelsteine = (fgetc(file)<<8) | fgetc(file);
243 for(i=0; i<MAX_LEVNAMLEN; i++)
244 level.name[i] = fgetc(file);
245 level.name[MAX_LEVNAMLEN - 1] = 0;
247 for(i=0; i<MAX_LEVSCORE_ENTRIES; i++)
248 level.score[i] = fgetc(file);
253 level.mampfer_inhalt[i][x][y] = fgetc(file);
255 level.tempo_amoebe = fgetc(file);
256 level.dauer_sieb = fgetc(file);
257 level.dauer_ablenk = fgetc(file);
258 level.amoebe_inhalt = fgetc(file);
260 for(i=0; i<LEVEL_HEADER_UNUSED; i++) /* skip unused header bytes */
263 /* read chunk "BODY" */
264 if (file_version >= FILE_VERSION_1_2)
266 /* next check body chunk identifier and chunk length */
267 fgets(chunk, CHUNK_ID_LEN + 1, file);
269 (fgetc(file)<<24) | (fgetc(file)<<16) | (fgetc(file)<<8) | fgetc(file);
270 if (strcmp(chunk, "BODY") || chunk_length != lev_fieldx * lev_fieldy)
272 Error(ERR_WARN, "wrong 'BODY' chunk of level file '%s'", filename);
278 for(y=0; y<lev_fieldy; y++)
279 for(x=0; x<lev_fieldx; x++)
280 Feld[x][y] = Ur[x][y] = fgetc(file);
284 if (level.time <= 10) /* minimum playing time of each level */
288 void SaveLevel(int level_nr)
291 char filename[MAX_FILENAME_LEN];
295 if (leveldir[leveldir_nr].user_defined)
296 sprintf(filename, "%s/%s/%d",
297 getUserLevelDir(""), leveldir[leveldir_nr].filename, level_nr);
299 sprintf(filename, "%s/%s/%d",
300 options.level_directory, leveldir[leveldir_nr].filename, level_nr);
302 if (!(file = fopen(filename, "w")))
304 Error(ERR_WARN, "cannot save level file '%s'", filename);
308 fputs(LEVEL_COOKIE, file); /* file identifier */
311 fputs("HEAD", file); /* chunk identifier for file header */
313 chunk_length = LEVEL_HEADER_SIZE;
315 fputc((chunk_length >> 24) & 0xff, file);
316 fputc((chunk_length >> 16) & 0xff, file);
317 fputc((chunk_length >> 8) & 0xff, file);
318 fputc((chunk_length >> 0) & 0xff, file);
320 fputc(level.fieldx, file);
321 fputc(level.fieldy, file);
322 fputc(level.time / 256, file);
323 fputc(level.time % 256, file);
324 fputc(level.edelsteine / 256, file);
325 fputc(level.edelsteine % 256, file);
327 for(i=0; i<MAX_LEVNAMLEN; i++)
328 fputc(level.name[i], file);
329 for(i=0; i<MAX_LEVSCORE_ENTRIES; i++)
330 fputc(level.score[i], file);
334 fputc(level.mampfer_inhalt[i][x][y], file);
335 fputc(level.tempo_amoebe, file);
336 fputc(level.dauer_sieb, file);
337 fputc(level.dauer_ablenk, file);
338 fputc(level.amoebe_inhalt, file);
340 for(i=0; i<LEVEL_HEADER_UNUSED; i++) /* set unused header bytes to zero */
343 fputs("BODY", file); /* chunk identifier for file body */
344 chunk_length = lev_fieldx * lev_fieldy;
346 fputc((chunk_length >> 24) & 0xff, file);
347 fputc((chunk_length >> 16) & 0xff, file);
348 fputc((chunk_length >> 8) & 0xff, file);
349 fputc((chunk_length >> 0) & 0xff, file);
351 for(y=0; y<lev_fieldy; y++)
352 for(x=0; x<lev_fieldx; x++)
353 fputc(Ur[x][y], file);
357 chmod(filename, LEVEL_PERMS);
360 void LoadTape(int level_nr)
363 char filename[MAX_FILENAME_LEN];
364 char cookie[MAX_LINE_LEN];
365 char chunk[CHUNK_ID_LEN + 1];
367 boolean player_participates[MAX_PLAYERS];
368 int num_participating_players;
369 int file_version = FILE_VERSION_1_2; /* last version of tape files */
372 sprintf(filename, "%s/%d.%s",
373 getTapeDir(leveldir[leveldir_nr].filename),
374 level_nr, TAPEFILE_EXTENSION);
376 if (!(file = fopen(filename, "r")))
379 /* check file identifier */
380 fgets(cookie, MAX_LINE_LEN, file);
381 if (strlen(cookie) > 0 && cookie[strlen(cookie) - 1] == '\n')
382 cookie[strlen(cookie) - 1] = '\0';
384 if (strcmp(cookie, TAPE_COOKIE_10) == 0) /* old 1.0 tape format */
385 file_version = FILE_VERSION_1_0;
386 else if (strcmp(cookie, TAPE_COOKIE) != 0) /* unknown tape format */
388 Error(ERR_WARN, "wrong file identifier of tape file '%s'", filename);
393 /* read chunk "HEAD" */
394 if (file_version >= FILE_VERSION_1_2)
396 /* first check header chunk identifier and chunk length */
397 fgets(chunk, CHUNK_ID_LEN + 1, file);
399 (fgetc(file)<<24) | (fgetc(file)<<16) | (fgetc(file)<<8) | fgetc(file);
401 if (strcmp(chunk, "HEAD") || chunk_length != TAPE_HEADER_SIZE)
403 Error(ERR_WARN, "wrong 'HEAD' chunk of tape file '%s'", filename);
410 (fgetc(file)<<24) | (fgetc(file)<<16) | (fgetc(file)<<8) | fgetc(file);
412 (fgetc(file)<<24) | (fgetc(file)<<16) | (fgetc(file)<<8) | fgetc(file);
414 (fgetc(file)<<24) | (fgetc(file)<<16) | (fgetc(file)<<8) | fgetc(file);
416 /* read header fields that are new since version 1.2 */
417 if (file_version >= FILE_VERSION_1_2)
419 byte store_participating_players = fgetc(file);
421 for(i=0; i<TAPE_HEADER_UNUSED; i++) /* skip unused header bytes */
424 /* check which players participate in this tape recording */
425 num_participating_players = 0;
426 for(i=0; i<MAX_PLAYERS; i++)
428 player_participates[i] = FALSE;
430 if (store_participating_players & (1 << i))
432 player_participates[i] = TRUE;
433 num_participating_players++;
438 tape.level_nr = level_nr;
440 tape.changed = FALSE;
442 tape.recording = FALSE;
443 tape.playing = FALSE;
444 tape.pausing = FALSE;
446 /* read chunk "BODY" */
447 if (file_version >= FILE_VERSION_1_2)
449 /* next check body chunk identifier and chunk length */
450 fgets(chunk, CHUNK_ID_LEN + 1, file);
452 (fgetc(file)<<24) | (fgetc(file)<<16) | (fgetc(file)<<8) | fgetc(file);
453 if (strcmp(chunk, "BODY") ||
454 chunk_length != (num_participating_players + 1) * tape.length)
456 Error(ERR_WARN, "wrong 'BODY' chunk of tape file '%s'", filename);
462 for(i=0; i<tape.length; i++)
464 if (i >= MAX_TAPELEN)
467 for(j=0; j<MAX_PLAYERS; j++)
469 tape.pos[i].action[j] = MV_NO_MOVING;
471 /* pre-1.2 tapes store data for only one player */
472 if (file_version == FILE_VERSION_1_0 && j > 0)
475 if (player_participates[j])
476 tape.pos[i].action[j] = fgetc(file);
479 tape.pos[i].delay = fgetc(file);
481 if (file_version == FILE_VERSION_1_0)
483 /* eliminate possible diagonal moves in old tapes */
484 /* this is only for backward compatibility */
486 byte joy_dir[4] = { JOY_LEFT, JOY_RIGHT, JOY_UP, JOY_DOWN };
487 byte action = tape.pos[i].action[0];
488 int k, num_moves = 0;
492 if (action & joy_dir[k])
494 tape.pos[i + num_moves].action[0] = joy_dir[k];
496 tape.pos[i + num_moves].delay = 0;
505 tape.length += num_moves;
515 if (i != tape.length)
516 Error(ERR_WARN, "level recording file '%s' corrupted", filename);
518 tape.length_seconds = GetTapeLength();
521 void SaveTape(int level_nr)
524 char filename[MAX_FILENAME_LEN];
526 boolean new_tape = TRUE;
527 boolean player_participates[MAX_PLAYERS];
528 byte store_participating_players;
529 int num_participating_players;
532 InitTapeDirectory(leveldir[leveldir_nr].filename);
534 sprintf(filename, "%s/%d.%s",
535 getTapeDir(leveldir[leveldir_nr].filename),
536 level_nr, TAPEFILE_EXTENSION);
538 /* if a tape still exists, ask to overwrite it */
539 if ((file = fopen(filename, "r")))
544 if (!Request("Replace old tape ?", REQ_ASK))
548 for(i=0; i<MAX_PLAYERS; i++)
549 player_participates[i] = FALSE;
551 /* check which players participate in this tape recording */
552 for(i=0; i<tape.length; i++)
553 for(j=0; j<MAX_PLAYERS; j++)
554 if (tape.pos[i].action[j] != 0)
555 player_participates[j] = TRUE;
557 /* count number of players and set corresponding bits for compact storage */
558 store_participating_players = 0;
559 num_participating_players = 0;
560 for(i=0; i<MAX_PLAYERS; i++)
562 if (player_participates[i])
564 num_participating_players++;
565 store_participating_players |= (1 << i);
569 if (!(file = fopen(filename, "w")))
571 Error(ERR_WARN, "cannot save level recording file '%s'", filename);
575 fputs(TAPE_COOKIE, file); /* file identifier */
578 fputs("HEAD", file); /* chunk identifier for file header */
580 chunk_length = TAPE_HEADER_SIZE;
582 fputc((chunk_length >> 24) & 0xff, file);
583 fputc((chunk_length >> 16) & 0xff, file);
584 fputc((chunk_length >> 8) & 0xff, file);
585 fputc((chunk_length >> 0) & 0xff, file);
587 fputc((tape.random_seed >> 24) & 0xff, file);
588 fputc((tape.random_seed >> 16) & 0xff, file);
589 fputc((tape.random_seed >> 8) & 0xff, file);
590 fputc((tape.random_seed >> 0) & 0xff, file);
592 fputc((tape.date >> 24) & 0xff, file);
593 fputc((tape.date >> 16) & 0xff, file);
594 fputc((tape.date >> 8) & 0xff, file);
595 fputc((tape.date >> 0) & 0xff, file);
597 fputc((tape.length >> 24) & 0xff, file);
598 fputc((tape.length >> 16) & 0xff, file);
599 fputc((tape.length >> 8) & 0xff, file);
600 fputc((tape.length >> 0) & 0xff, file);
602 fputc(store_participating_players, file);
604 for(i=0; i<TAPE_HEADER_UNUSED; i++) /* set unused header bytes to zero */
607 fputs("BODY", file); /* chunk identifier for file body */
608 chunk_length = (num_participating_players + 1) * tape.length;
610 fputc((chunk_length >> 24) & 0xff, file);
611 fputc((chunk_length >> 16) & 0xff, file);
612 fputc((chunk_length >> 8) & 0xff, file);
613 fputc((chunk_length >> 0) & 0xff, file);
615 for(i=0; i<tape.length; i++)
619 for(j=0; j<MAX_PLAYERS; j++)
620 if (player_participates[j])
621 fputc(tape.pos[i].action[j], file);
623 fputc(tape.pos[i].delay, file);
628 chmod(filename, LEVREC_PERMS);
630 tape.changed = FALSE;
633 Request("tape saved !", REQ_CONFIRM);
636 void LoadScore(int level_nr)
639 char filename[MAX_FILENAME_LEN];
640 char cookie[MAX_LINE_LEN];
641 char line[MAX_LINE_LEN];
645 /* start with empty score table */
646 for(i=0; i<MAX_SCORE_ENTRIES; i++)
648 strcpy(highscore[i].Name, EMPTY_ALIAS);
649 highscore[i].Score = 0;
652 sprintf(filename, "%s/%d.%s",
653 getScoreDir(leveldir[leveldir_nr].filename),
654 level_nr, SCOREFILE_EXTENSION);
656 if (!(file = fopen(filename, "r")))
659 /* check file identifier */
660 fgets(cookie, MAX_LINE_LEN, file);
662 if (strcmp(cookie, SCORE_COOKIE) != 0)
664 Error(ERR_WARN, "wrong file identifier of score file '%s'", filename);
669 for(i=0; i<MAX_SCORE_ENTRIES; i++)
671 fscanf(file, "%d", &highscore[i].Score);
672 fgets(line, MAX_LINE_LEN, file);
674 if (line[strlen(line)-1] == '\n')
675 line[strlen(line)-1] = '\0';
677 for (line_ptr = line; *line_ptr; line_ptr++)
679 if (*line_ptr != ' ' && *line_ptr != '\t' && *line_ptr != '\0')
681 strncpy(highscore[i].Name, line_ptr, MAX_NAMELEN - 1);
682 highscore[i].Name[MAX_NAMELEN - 1] = '\0';
691 void SaveScore(int level_nr)
694 char filename[MAX_FILENAME_LEN];
697 InitScoreDirectory(leveldir[leveldir_nr].filename);
699 sprintf(filename, "%s/%d.%s",
700 getScoreDir(leveldir[leveldir_nr].filename),
701 level_nr, SCOREFILE_EXTENSION);
703 if (!(file = fopen(filename, "w")))
705 Error(ERR_WARN, "cannot save score for level %d", level_nr);
709 fprintf(file, "%s\n\n", SCORE_COOKIE);
711 for(i=0; i<MAX_SCORE_ENTRIES; i++)
712 fprintf(file, "%d %s\n", highscore[i].Score, highscore[i].Name);
716 chmod(filename, SCORE_PERMS);
719 #define TOKEN_STR_FILE_IDENTIFIER "file_identifier"
720 #define TOKEN_STR_LAST_LEVEL_SERIES "last_level_series"
721 #define TOKEN_STR_PLAYER_PREFIX "player_"
723 #define TOKEN_VALUE_POSITION 30
726 #define SETUP_TOKEN_PLAYER_NAME 0
727 #define SETUP_TOKEN_SOUND 1
728 #define SETUP_TOKEN_SOUND_LOOPS 2
729 #define SETUP_TOKEN_SOUND_MUSIC 3
730 #define SETUP_TOKEN_SOUND_SIMPLE 4
731 #define SETUP_TOKEN_TOONS 5
732 #define SETUP_TOKEN_DOUBLE_BUFFERING 6
733 #define SETUP_TOKEN_SCROLL_DELAY 7
734 #define SETUP_TOKEN_SOFT_SCROLLING 8
735 #define SETUP_TOKEN_FADING 9
736 #define SETUP_TOKEN_AUTORECORD 10
737 #define SETUP_TOKEN_QUICK_DOORS 11
738 #define SETUP_TOKEN_TEAM_MODE 12
741 #define SETUP_TOKEN_USE_JOYSTICK 13
742 #define SETUP_TOKEN_JOY_DEVICE_NAME 14
743 #define SETUP_TOKEN_JOY_XLEFT 15
744 #define SETUP_TOKEN_JOY_XMIDDLE 16
745 #define SETUP_TOKEN_JOY_XRIGHT 17
746 #define SETUP_TOKEN_JOY_YUPPER 18
747 #define SETUP_TOKEN_JOY_YMIDDLE 19
748 #define SETUP_TOKEN_JOY_YLOWER 20
749 #define SETUP_TOKEN_JOY_SNAP 21
750 #define SETUP_TOKEN_JOY_BOMB 22
751 #define SETUP_TOKEN_KEY_LEFT 23
752 #define SETUP_TOKEN_KEY_RIGHT 24
753 #define SETUP_TOKEN_KEY_UP 25
754 #define SETUP_TOKEN_KEY_DOWN 26
755 #define SETUP_TOKEN_KEY_SNAP 27
756 #define SETUP_TOKEN_KEY_BOMB 28
758 /* level directory info */
759 #define LEVELINFO_TOKEN_NAME 29
760 #define LEVELINFO_TOKEN_LEVELS 30
761 #define LEVELINFO_TOKEN_SORT_PRIORITY 31
762 #define LEVELINFO_TOKEN_READONLY 32
764 #define FIRST_GLOBAL_SETUP_TOKEN SETUP_TOKEN_PLAYER_NAME
765 #define LAST_GLOBAL_SETUP_TOKEN SETUP_TOKEN_TEAM_MODE
767 #define FIRST_PLAYER_SETUP_TOKEN SETUP_TOKEN_USE_JOYSTICK
768 #define LAST_PLAYER_SETUP_TOKEN SETUP_TOKEN_KEY_BOMB
770 #define FIRST_LEVELINFO_TOKEN LEVELINFO_TOKEN_NAME
771 #define LAST_LEVELINFO_TOKEN LEVELINFO_TOKEN_READONLY
773 #define TYPE_BOOLEAN 1
774 #define TYPE_SWITCH 2
775 #define TYPE_KEYSYM 3
776 #define TYPE_INTEGER 4
777 #define TYPE_STRING 5
779 static struct SetupInfo si;
780 static struct SetupInputInfo sii;
781 static struct LevelDirInfo ldi;
790 { TYPE_STRING, &si.player_name, "player_name" },
791 { TYPE_SWITCH, &si.sound, "sound" },
792 { TYPE_SWITCH, &si.sound_loops, "repeating_sound_loops" },
793 { TYPE_SWITCH, &si.sound_music, "background_music" },
794 { TYPE_SWITCH, &si.sound_simple, "simple_sound_effects" },
795 { TYPE_SWITCH, &si.toons, "toons" },
796 { TYPE_SWITCH, &si.double_buffering, "double_buffering" },
797 { TYPE_SWITCH, &si.scroll_delay, "scroll_delay" },
798 { TYPE_SWITCH, &si.soft_scrolling, "soft_scrolling" },
799 { TYPE_SWITCH, &si.fading, "screen_fading" },
800 { TYPE_SWITCH, &si.autorecord, "automatic_tape_recording" },
801 { TYPE_SWITCH, &si.quick_doors, "quick_doors" },
802 { TYPE_SWITCH, &si.team_mode, "team_mode" },
805 { TYPE_BOOLEAN, &sii.use_joystick, ".use_joystick" },
806 { TYPE_STRING, &sii.joy.device_name, ".joy.device_name" },
807 { TYPE_INTEGER, &sii.joy.xleft, ".joy.xleft" },
808 { TYPE_INTEGER, &sii.joy.xmiddle, ".joy.xmiddle" },
809 { TYPE_INTEGER, &sii.joy.xright, ".joy.xright" },
810 { TYPE_INTEGER, &sii.joy.yupper, ".joy.yupper" },
811 { TYPE_INTEGER, &sii.joy.ymiddle, ".joy.ymiddle" },
812 { TYPE_INTEGER, &sii.joy.ylower, ".joy.ylower" },
813 { TYPE_INTEGER, &sii.joy.snap, ".joy.snap_field" },
814 { TYPE_INTEGER, &sii.joy.bomb, ".joy.place_bomb" },
815 { TYPE_KEYSYM, &sii.key.left, ".key.move_left" },
816 { TYPE_KEYSYM, &sii.key.right, ".key.move_right" },
817 { TYPE_KEYSYM, &sii.key.up, ".key.move_up" },
818 { TYPE_KEYSYM, &sii.key.down, ".key.move_down" },
819 { TYPE_KEYSYM, &sii.key.snap, ".key.snap_field" },
820 { TYPE_KEYSYM, &sii.key.bomb, ".key.place_bomb" },
822 /* level directory info */
823 { TYPE_STRING, &ldi.name, "name" },
824 { TYPE_INTEGER, &ldi.levels, "levels" },
825 { TYPE_INTEGER, &ldi.sort_priority, "sort_priority" },
826 { TYPE_BOOLEAN, &ldi.readonly, "readonly" }
829 static char *string_tolower(char *s)
831 static char s_lower[100];
834 if (strlen(s) >= 100)
839 for (i=0; i<strlen(s_lower); i++)
840 s_lower[i] = tolower(s_lower[i]);
845 static int get_string_integer_value(char *s)
847 static char *number_text[][3] =
849 { "0", "zero", "null", },
850 { "1", "one", "first" },
851 { "2", "two", "second" },
852 { "3", "three", "third" },
853 { "4", "four", "fourth" },
854 { "5", "five", "fifth" },
855 { "6", "six", "sixth" },
856 { "7", "seven", "seventh" },
857 { "8", "eight", "eighth" },
858 { "9", "nine", "ninth" },
859 { "10", "ten", "tenth" },
860 { "11", "eleven", "eleventh" },
861 { "12", "twelve", "twelfth" },
868 if (strcmp(string_tolower(s), number_text[i][j]) == 0)
874 static boolean get_string_boolean_value(char *s)
876 if (strcmp(string_tolower(s), "true") == 0 ||
877 strcmp(string_tolower(s), "yes") == 0 ||
878 strcmp(string_tolower(s), "on") == 0 ||
879 get_string_integer_value(s) == 1)
885 static char *getFormattedSetupEntry(char *token, char *value)
888 static char entry[MAX_LINE_LEN];
890 sprintf(entry, "%s:", token);
891 for (i=strlen(entry); i<TOKEN_VALUE_POSITION; i++)
895 strcat(entry, value);
900 static void freeSetupFileList(struct SetupFileList *setup_file_list)
902 if (!setup_file_list)
905 if (setup_file_list->token)
906 free(setup_file_list->token);
907 if (setup_file_list->value)
908 free(setup_file_list->value);
909 if (setup_file_list->next)
910 freeSetupFileList(setup_file_list->next);
911 free(setup_file_list);
914 static struct SetupFileList *newSetupFileList(char *token, char *value)
916 struct SetupFileList *new = checked_malloc(sizeof(struct SetupFileList));
918 new->token = checked_malloc(strlen(token) + 1);
919 strcpy(new->token, token);
921 new->value = checked_malloc(strlen(value) + 1);
922 strcpy(new->value, value);
929 static char *getTokenValue(struct SetupFileList *setup_file_list,
932 if (!setup_file_list)
935 if (strcmp(setup_file_list->token, token) == 0)
936 return setup_file_list->value;
938 return getTokenValue(setup_file_list->next, token);
941 static void setTokenValue(struct SetupFileList *setup_file_list,
942 char *token, char *value)
944 if (!setup_file_list)
947 if (strcmp(setup_file_list->token, token) == 0)
949 free(setup_file_list->value);
950 setup_file_list->value = checked_malloc(strlen(value) + 1);
951 strcpy(setup_file_list->value, value);
953 else if (setup_file_list->next == NULL)
954 setup_file_list->next = newSetupFileList(token, value);
956 setTokenValue(setup_file_list->next, token, value);
960 static void printSetupFileList(struct SetupFileList *setup_file_list)
962 if (!setup_file_list)
965 printf("token: '%s'\n", setup_file_list->token);
966 printf("value: '%s'\n", setup_file_list->value);
968 printSetupFileList(setup_file_list->next);
972 static struct SetupFileList *loadSetupFileList(char *filename)
975 char line[MAX_LINE_LEN];
976 char *token, *value, *line_ptr;
977 struct SetupFileList *setup_file_list = newSetupFileList("", "");
978 struct SetupFileList *first_valid_list_entry;
982 if (!(file = fopen(filename, "r")))
984 Error(ERR_WARN, "cannot open setup/info file '%s'", filename);
990 /* read next line of input file */
991 if (!fgets(line, MAX_LINE_LEN, file))
994 /* cut trailing comment or whitespace from input line */
995 for (line_ptr = line; *line_ptr; line_ptr++)
997 if (*line_ptr == '#' || *line_ptr == '\n')
1004 /* cut trailing whitespaces from input line */
1005 for (line_ptr = &line[strlen(line)]; line_ptr > line; line_ptr--)
1006 if ((*line_ptr == ' ' || *line_ptr == '\t') && line_ptr[1] == '\0')
1009 /* ignore empty lines */
1013 line_len = strlen(line);
1015 /* cut leading whitespaces from token */
1016 for (token = line; *token; token++)
1017 if (*token != ' ' && *token != '\t')
1020 /* find end of token */
1021 for (line_ptr = token; *line_ptr; line_ptr++)
1023 if (*line_ptr == ' ' || *line_ptr == '\t' || *line_ptr == ':')
1030 if (line_ptr < line + line_len)
1031 value = line_ptr + 1;
1035 /* cut leading whitespaces from value */
1036 for (; *value; value++)
1037 if (*value != ' ' && *value != '\t')
1040 if (*token && *value)
1041 setTokenValue(setup_file_list, token, value);
1046 first_valid_list_entry = setup_file_list->next;
1048 /* free empty list header */
1049 setup_file_list->next = NULL;
1050 freeSetupFileList(setup_file_list);
1052 if (first_valid_list_entry == NULL)
1053 Error(ERR_WARN, "setup/info file '%s' is empty", filename);
1055 return first_valid_list_entry;
1058 static void checkSetupFileListIdentifier(struct SetupFileList *setup_file_list,
1061 if (!setup_file_list)
1064 if (strcmp(setup_file_list->token, TOKEN_STR_FILE_IDENTIFIER) == 0)
1066 if (strcmp(setup_file_list->value, identifier) != 0)
1068 Error(ERR_WARN, "setup/info file has wrong version");
1075 if (setup_file_list->next)
1076 checkSetupFileListIdentifier(setup_file_list->next, identifier);
1079 Error(ERR_WARN, "setup/info file has no version information");
1084 static void setLevelDirInfoToDefaults(struct LevelDirInfo *ldi)
1086 ldi->name = getStringCopy("non-existing");
1088 ldi->sort_priority = 999; /* default: least priority */
1089 ldi->readonly = TRUE;
1092 static void setSetupInfoToDefaults(struct SetupInfo *si)
1096 si->player_name = getStringCopy(getLoginName());
1099 si->sound_loops = FALSE;
1100 si->sound_music = FALSE;
1101 si->sound_simple = FALSE;
1103 si->double_buffering = TRUE;
1104 si->direct_draw = !si->double_buffering;
1105 si->scroll_delay = FALSE;
1106 si->soft_scrolling = TRUE;
1108 si->autorecord = FALSE;
1109 si->quick_doors = FALSE;
1111 for (i=0; i<MAX_PLAYERS; i++)
1113 si->input[i].use_joystick = FALSE;
1114 si->input[i].joy.device_name = getStringCopy(joystick_device_name[i]);
1115 si->input[i].joy.xleft = JOYSTICK_XLEFT;
1116 si->input[i].joy.xmiddle = JOYSTICK_XMIDDLE;
1117 si->input[i].joy.xright = JOYSTICK_XRIGHT;
1118 si->input[i].joy.yupper = JOYSTICK_YUPPER;
1119 si->input[i].joy.ymiddle = JOYSTICK_YMIDDLE;
1120 si->input[i].joy.ylower = JOYSTICK_YLOWER;
1121 si->input[i].joy.snap = (i == 0 ? JOY_BUTTON_1 : 0);
1122 si->input[i].joy.bomb = (i == 0 ? JOY_BUTTON_2 : 0);
1123 si->input[i].key.left = (i == 0 ? DEFAULT_KEY_LEFT : KEY_UNDEFINDED);
1124 si->input[i].key.right = (i == 0 ? DEFAULT_KEY_RIGHT : KEY_UNDEFINDED);
1125 si->input[i].key.up = (i == 0 ? DEFAULT_KEY_UP : KEY_UNDEFINDED);
1126 si->input[i].key.down = (i == 0 ? DEFAULT_KEY_DOWN : KEY_UNDEFINDED);
1127 si->input[i].key.snap = (i == 0 ? DEFAULT_KEY_SNAP : KEY_UNDEFINDED);
1128 si->input[i].key.bomb = (i == 0 ? DEFAULT_KEY_BOMB : KEY_UNDEFINDED);
1132 static void setSetupInfo(int token_nr, char *token_value)
1134 int token_type = token_info[token_nr].type;
1135 void *setup_value = token_info[token_nr].value;
1137 if (token_value == NULL)
1140 /* set setup field to corresponding token value */
1145 *(boolean *)setup_value = get_string_boolean_value(token_value);
1149 *(KeySym *)setup_value = getKeySymFromX11KeyName(token_value);
1153 *(int *)setup_value = get_string_integer_value(token_value);
1157 if (*(char **)setup_value != NULL)
1158 free(*(char **)setup_value);
1159 *(char **)setup_value = getStringCopy(token_value);
1167 static void decodeSetupFileList(struct SetupFileList *setup_file_list)
1171 if (!setup_file_list)
1174 /* handle global setup values */
1176 for (i=FIRST_GLOBAL_SETUP_TOKEN; i<=LAST_GLOBAL_SETUP_TOKEN; i++)
1177 setSetupInfo(i, getTokenValue(setup_file_list, token_info[i].text));
1180 /* handle player specific setup values */
1181 for (pnr=0; pnr<MAX_PLAYERS; pnr++)
1185 sprintf(prefix, "%s%d", TOKEN_STR_PLAYER_PREFIX, pnr + 1);
1187 sii = setup.input[pnr];
1188 for (i=FIRST_PLAYER_SETUP_TOKEN; i<=LAST_PLAYER_SETUP_TOKEN; i++)
1190 char full_token[100];
1192 sprintf(full_token, "%s%s", prefix, token_info[i].text);
1193 setSetupInfo(i, getTokenValue(setup_file_list, full_token));
1195 setup.input[pnr] = sii;
1199 int getLevelSeriesNrFromLevelSeriesName(char *level_series_name)
1203 if (!level_series_name)
1206 for (i=0; i<num_leveldirs; i++)
1207 if (strcmp(level_series_name, leveldir[i].filename) == 0)
1213 int getLastPlayedLevelOfLevelSeries(char *level_series_name)
1216 int level_series_nr = getLevelSeriesNrFromLevelSeriesName(level_series_name);
1217 int last_level_nr = 0;
1219 if (!level_series_name)
1222 token_value = getTokenValue(level_setup_list, level_series_name);
1226 int highest_level_nr = leveldir[level_series_nr].levels - 1;
1228 last_level_nr = atoi(token_value);
1230 if (last_level_nr < 0)
1232 if (last_level_nr > highest_level_nr)
1233 last_level_nr = highest_level_nr;
1236 return last_level_nr;
1239 static int compareLevelDirInfoEntries(const void *object1, const void *object2)
1241 const struct LevelDirInfo *entry1 = object1;
1242 const struct LevelDirInfo *entry2 = object2;
1245 if (entry1->sort_priority != entry2->sort_priority)
1246 compare_result = entry1->sort_priority - entry2->sort_priority;
1249 char *name1 = getStringToLower(entry1->name);
1250 char *name2 = getStringToLower(entry2->name);
1252 compare_result = strcmp(name1, name2);
1258 return compare_result;
1261 static int LoadLevelInfoFromLevelDir(char *level_directory, int start_entry)
1264 struct stat file_status;
1265 char *directory = NULL;
1266 char *filename = NULL;
1267 struct SetupFileList *setup_file_list = NULL;
1268 struct dirent *dir_entry;
1269 int i, current_entry = start_entry;
1271 if ((dir = opendir(level_directory)) == NULL)
1272 Error(ERR_EXIT, "cannot read level directory '%s'", level_directory);
1274 while (current_entry < MAX_LEVDIR_ENTRIES)
1276 if ((dir_entry = readdir(dir)) == NULL) /* last directory entry */
1279 /* skip entries for current and parent directory */
1280 if (strcmp(dir_entry->d_name, ".") == 0 ||
1281 strcmp(dir_entry->d_name, "..") == 0)
1284 /* find out if directory entry is itself a directory */
1285 directory = getPath2(level_directory, dir_entry->d_name);
1286 if (stat(directory, &file_status) != 0 || /* cannot stat file */
1287 (file_status.st_mode & S_IFMT) != S_IFDIR) /* not a directory */
1293 if (strlen(dir_entry->d_name) >= MAX_LEVDIR_FILENAME)
1295 Error(ERR_WARN, "filename of level directory '%s' too long -- ignoring",
1300 filename = getPath2(directory, LEVELINFO_FILENAME);
1301 setup_file_list = loadSetupFileList(filename);
1303 if (setup_file_list)
1305 checkSetupFileListIdentifier(setup_file_list, LEVELINFO_COOKIE);
1306 setLevelDirInfoToDefaults(&leveldir[current_entry]);
1308 ldi = leveldir[current_entry];
1309 for (i=FIRST_LEVELINFO_TOKEN; i<=LAST_LEVELINFO_TOKEN; i++)
1310 setSetupInfo(i, getTokenValue(setup_file_list, token_info[i].text));
1311 leveldir[current_entry] = ldi;
1313 leveldir[current_entry].filename = getStringCopy(dir_entry->d_name);
1314 leveldir[current_entry].user_defined =
1315 (level_directory == options.level_directory ? FALSE : TRUE);
1317 freeSetupFileList(setup_file_list);
1321 Error(ERR_WARN, "ignoring level directory '%s'", directory);
1327 if (current_entry == MAX_LEVDIR_ENTRIES)
1328 Error(ERR_WARN, "using %d level directories -- ignoring the rest",
1333 if (current_entry == start_entry && start_entry != -1)
1334 Error(ERR_EXIT, "cannot find any valid level series in directory '%s'",
1337 return current_entry;
1340 void LoadLevelInfo()
1342 InitUserLevelDirectory(getLoginName());
1347 num_leveldirs = LoadLevelInfoFromLevelDir(options.level_directory,
1349 num_leveldirs = LoadLevelInfoFromLevelDir(getUserLevelDir(""),
1351 if (num_leveldirs > 1)
1352 qsort(leveldir, num_leveldirs, sizeof(struct LevelDirInfo),
1353 compareLevelDirInfoEntries);
1356 static void SaveUserLevelInfo()
1358 char filename[MAX_FILENAME_LEN];
1362 sprintf(filename, "%s/%s",
1363 getUserLevelDir(getLoginName()), LEVELINFO_FILENAME);
1365 if (!(file = fopen(filename, "w")))
1367 Error(ERR_WARN, "cannot write level info file '%s'", filename);
1371 ldi.name = getLoginName();
1373 ldi.sort_priority = 300;
1374 ldi.readonly = FALSE;
1376 fprintf(file, "%s\n\n",
1377 getFormattedSetupEntry(TOKEN_STR_FILE_IDENTIFIER, LEVELINFO_COOKIE));
1379 for (i=FIRST_LEVELINFO_TOKEN; i<=LAST_LEVELINFO_TOKEN; i++)
1380 fprintf(file, "%s\n", getSetupLine("", i));
1384 chmod(filename, SETUP_PERMS);
1389 char filename[MAX_FILENAME_LEN];
1390 struct SetupFileList *setup_file_list = NULL;
1392 /* always start with reliable default values */
1393 setSetupInfoToDefaults(&setup);
1395 sprintf(filename, "%s/%s", getSetupDir(), SETUP_FILENAME);
1397 setup_file_list = loadSetupFileList(filename);
1399 if (setup_file_list)
1401 checkSetupFileListIdentifier(setup_file_list, SETUP_COOKIE);
1402 decodeSetupFileList(setup_file_list);
1404 setup.direct_draw = !setup.double_buffering;
1406 freeSetupFileList(setup_file_list);
1408 /* needed to work around problems with fixed length strings */
1409 if (strlen(setup.player_name) >= MAX_NAMELEN)
1410 setup.player_name[MAX_NAMELEN - 1] = '\0';
1411 else if (strlen(setup.player_name) < MAX_NAMELEN - 1)
1413 char *new_name = checked_malloc(MAX_NAMELEN);
1415 strcpy(new_name, setup.player_name);
1416 free(setup.player_name);
1417 setup.player_name = new_name;
1421 Error(ERR_WARN, "using default setup values");
1424 static char *getSetupLine(char *prefix, int token_nr)
1427 static char entry[MAX_LINE_LEN];
1428 int token_type = token_info[token_nr].type;
1429 void *setup_value = token_info[token_nr].value;
1430 char *token_text = token_info[token_nr].text;
1432 /* start with the prefix, token and some spaces to format output line */
1433 sprintf(entry, "%s%s:", prefix, token_text);
1434 for (i=strlen(entry); i<TOKEN_VALUE_POSITION; i++)
1437 /* continue with the token's value (which can have different types) */
1441 strcat(entry, (*(boolean *)setup_value ? "true" : "false"));
1445 strcat(entry, (*(boolean *)setup_value ? "on" : "off"));
1450 KeySym keysym = *(KeySym *)setup_value;
1451 char *keyname = getKeyNameFromKeySym(keysym);
1453 strcat(entry, getX11KeyNameFromKeySym(keysym));
1454 for (i=strlen(entry); i<50; i++)
1457 /* add comment, if useful */
1458 if (strcmp(keyname, "(undefined)") != 0 &&
1459 strcmp(keyname, "(unknown)") != 0)
1461 strcat(entry, "# ");
1462 strcat(entry, keyname);
1469 char buffer[MAX_LINE_LEN];
1471 sprintf(buffer, "%d", *(int *)setup_value);
1472 strcat(entry, buffer);
1477 strcat(entry, *(char **)setup_value);
1490 char filename[MAX_FILENAME_LEN];
1493 InitUserDataDirectory();
1495 sprintf(filename, "%s/%s", getSetupDir(), SETUP_FILENAME);
1497 if (!(file = fopen(filename, "w")))
1499 Error(ERR_WARN, "cannot write setup file '%s'", filename);
1503 fprintf(file, "%s\n",
1504 getFormattedSetupEntry(TOKEN_STR_FILE_IDENTIFIER, SETUP_COOKIE));
1505 fprintf(file, "\n");
1507 /* handle global setup values */
1509 for (i=FIRST_GLOBAL_SETUP_TOKEN; i<=LAST_GLOBAL_SETUP_TOKEN; i++)
1511 fprintf(file, "%s\n", getSetupLine("", i));
1513 /* just to make things nicer :) */
1514 if (i == SETUP_TOKEN_PLAYER_NAME)
1515 fprintf(file, "\n");
1518 /* handle player specific setup values */
1519 for (pnr=0; pnr<MAX_PLAYERS; pnr++)
1523 sprintf(prefix, "%s%d", TOKEN_STR_PLAYER_PREFIX, pnr + 1);
1524 fprintf(file, "\n");
1526 sii = setup.input[pnr];
1527 for (i=FIRST_PLAYER_SETUP_TOKEN; i<=LAST_PLAYER_SETUP_TOKEN; i++)
1528 fprintf(file, "%s\n", getSetupLine(prefix, i));
1533 chmod(filename, SETUP_PERMS);
1536 void LoadLevelSetup()
1538 char filename[MAX_FILENAME_LEN];
1540 /* always start with reliable default values */
1544 sprintf(filename, "%s/%s", getSetupDir(), LEVELSETUP_FILENAME);
1546 if (level_setup_list)
1547 freeSetupFileList(level_setup_list);
1549 level_setup_list = loadSetupFileList(filename);
1551 if (level_setup_list)
1553 char *last_level_series =
1554 getTokenValue(level_setup_list, TOKEN_STR_LAST_LEVEL_SERIES);
1556 leveldir_nr = getLevelSeriesNrFromLevelSeriesName(last_level_series);
1557 level_nr = getLastPlayedLevelOfLevelSeries(last_level_series);
1559 checkSetupFileListIdentifier(level_setup_list, LEVELSETUP_COOKIE);
1563 level_setup_list = newSetupFileList(TOKEN_STR_FILE_IDENTIFIER,
1565 Error(ERR_WARN, "using default setup values");
1569 void SaveLevelSetup()
1571 char filename[MAX_FILENAME_LEN];
1572 struct SetupFileList *list_entry = level_setup_list;
1575 InitUserDataDirectory();
1577 setTokenValue(level_setup_list,
1578 TOKEN_STR_LAST_LEVEL_SERIES, leveldir[leveldir_nr].filename);
1580 setTokenValue(level_setup_list,
1581 leveldir[leveldir_nr].filename, int2str(level_nr, 0));
1583 sprintf(filename, "%s/%s", getSetupDir(), LEVELSETUP_FILENAME);
1585 if (!(file = fopen(filename, "w")))
1587 Error(ERR_WARN, "cannot write setup file '%s'", filename);
1591 fprintf(file, "%s\n\n", getFormattedSetupEntry(TOKEN_STR_FILE_IDENTIFIER,
1592 LEVELSETUP_COOKIE));
1595 if (strcmp(list_entry->token, TOKEN_STR_FILE_IDENTIFIER) != 0)
1596 fprintf(file, "%s\n",
1597 getFormattedSetupEntry(list_entry->token, list_entry->value));
1599 /* just to make things nicer :) */
1600 if (strcmp(list_entry->token, TOKEN_STR_LAST_LEVEL_SERIES) == 0)
1601 fprintf(file, "\n");
1603 list_entry = list_entry->next;
1608 chmod(filename, SETUP_PERMS);