1 // ============================================================================
2 // Rocks'n'Diamonds - McDuffin Strikes Back!
3 // ----------------------------------------------------------------------------
4 // (c) 1995-2014 by Artsoft Entertainment
7 // http://www.artsoft.org/
8 // ----------------------------------------------------------------------------
10 // ============================================================================
17 #include "libgame/libgame.h"
26 #define ENABLE_UNUSED_CODE 0 /* currently unused functions */
27 #define ENABLE_HISTORIC_CHUNKS 0 /* only for historic reference */
28 #define ENABLE_RESERVED_CODE 0 /* reserved for later use */
30 #define CHUNK_ID_LEN 4 /* IFF style chunk id length */
31 #define CHUNK_SIZE_UNDEFINED 0 /* undefined chunk size == 0 */
32 #define CHUNK_SIZE_NONE -1 /* do not write chunk size */
34 #define LEVEL_CHUNK_NAME_SIZE MAX_LEVEL_NAME_LEN
35 #define LEVEL_CHUNK_AUTH_SIZE MAX_LEVEL_AUTHOR_LEN
37 #define LEVEL_CHUNK_VERS_SIZE 8 /* size of file version chunk */
38 #define LEVEL_CHUNK_DATE_SIZE 4 /* size of file date chunk */
39 #define LEVEL_CHUNK_HEAD_SIZE 80 /* size of level file header */
40 #define LEVEL_CHUNK_HEAD_UNUSED 0 /* unused level header bytes */
41 #define LEVEL_CHUNK_CNT2_SIZE 160 /* size of level CNT2 chunk */
42 #define LEVEL_CHUNK_CNT2_UNUSED 11 /* unused CNT2 chunk bytes */
43 #define LEVEL_CHUNK_CNT3_HEADER 16 /* size of level CNT3 header */
44 #define LEVEL_CHUNK_CNT3_UNUSED 10 /* unused CNT3 chunk bytes */
45 #define LEVEL_CPART_CUS3_SIZE 134 /* size of CUS3 chunk part */
46 #define LEVEL_CPART_CUS3_UNUSED 15 /* unused CUS3 bytes / part */
47 #define LEVEL_CHUNK_GRP1_SIZE 74 /* size of level GRP1 chunk */
49 /* (element number, number of change pages, change page number) */
50 #define LEVEL_CHUNK_CUSX_UNCHANGED (2 + (1 + 1) + (1 + 1))
52 /* (element number only) */
53 #define LEVEL_CHUNK_GRPX_UNCHANGED 2
54 #define LEVEL_CHUNK_NOTE_UNCHANGED 2
56 /* (nothing at all if unchanged) */
57 #define LEVEL_CHUNK_ELEM_UNCHANGED 0
59 #define TAPE_CHUNK_VERS_SIZE 8 /* size of file version chunk */
60 #define TAPE_CHUNK_HEAD_SIZE 20 /* size of tape file header */
61 #define TAPE_CHUNK_HEAD_UNUSED 2 /* unused tape header bytes */
63 #define LEVEL_CHUNK_CNT3_SIZE(x) (LEVEL_CHUNK_CNT3_HEADER + (x))
64 #define LEVEL_CHUNK_CUS3_SIZE(x) (2 + (x) * LEVEL_CPART_CUS3_SIZE)
65 #define LEVEL_CHUNK_CUS4_SIZE(x) (96 + (x) * 48)
67 /* file identifier strings */
68 #define LEVEL_COOKIE_TMPL "ROCKSNDIAMONDS_LEVEL_FILE_VERSION_x.x"
69 #define TAPE_COOKIE_TMPL "ROCKSNDIAMONDS_TAPE_FILE_VERSION_x.x"
70 #define SCORE_COOKIE "ROCKSNDIAMONDS_SCORE_FILE_VERSION_1.2"
72 /* values for deciding when (not) to save configuration data */
73 #define SAVE_CONF_NEVER 0
74 #define SAVE_CONF_ALWAYS 1
75 #define SAVE_CONF_WHEN_CHANGED -1
77 /* values for chunks using micro chunks */
78 #define CONF_MASK_1_BYTE 0x00
79 #define CONF_MASK_2_BYTE 0x40
80 #define CONF_MASK_4_BYTE 0x80
81 #define CONF_MASK_MULTI_BYTES 0xc0
83 #define CONF_MASK_BYTES 0xc0
84 #define CONF_MASK_TOKEN 0x3f
86 #define CONF_VALUE_1_BYTE(x) (CONF_MASK_1_BYTE | (x))
87 #define CONF_VALUE_2_BYTE(x) (CONF_MASK_2_BYTE | (x))
88 #define CONF_VALUE_4_BYTE(x) (CONF_MASK_4_BYTE | (x))
89 #define CONF_VALUE_MULTI_BYTES(x) (CONF_MASK_MULTI_BYTES | (x))
91 /* these definitions are just for convenience of use and readability */
92 #define CONF_VALUE_8_BIT(x) CONF_VALUE_1_BYTE(x)
93 #define CONF_VALUE_16_BIT(x) CONF_VALUE_2_BYTE(x)
94 #define CONF_VALUE_32_BIT(x) CONF_VALUE_4_BYTE(x)
95 #define CONF_VALUE_BYTES(x) CONF_VALUE_MULTI_BYTES(x)
97 #define CONF_VALUE_NUM_BYTES(x) ((x) == CONF_MASK_1_BYTE ? 1 : \
98 (x) == CONF_MASK_2_BYTE ? 2 : \
99 (x) == CONF_MASK_4_BYTE ? 4 : 0)
101 #define CONF_CONTENT_NUM_ELEMENTS (3 * 3)
102 #define CONF_CONTENT_NUM_BYTES (CONF_CONTENT_NUM_ELEMENTS * 2)
103 #define CONF_ELEMENT_NUM_BYTES (2)
105 #define CONF_ENTITY_NUM_BYTES(t) ((t) == TYPE_ELEMENT || \
106 (t) == TYPE_ELEMENT_LIST ? \
107 CONF_ELEMENT_NUM_BYTES : \
108 (t) == TYPE_CONTENT || \
109 (t) == TYPE_CONTENT_LIST ? \
110 CONF_CONTENT_NUM_BYTES : 1)
112 #define CONF_ELEMENT_BYTE_POS(i) ((i) * CONF_ELEMENT_NUM_BYTES)
113 #define CONF_ELEMENTS_ELEMENT(b,i) ((b[CONF_ELEMENT_BYTE_POS(i)] << 8) | \
114 (b[CONF_ELEMENT_BYTE_POS(i) + 1]))
116 #define CONF_CONTENT_ELEMENT_POS(c,x,y) ((c) * CONF_CONTENT_NUM_ELEMENTS + \
118 #define CONF_CONTENT_BYTE_POS(c,x,y) (CONF_CONTENT_ELEMENT_POS(c,x,y) * \
119 CONF_ELEMENT_NUM_BYTES)
120 #define CONF_CONTENTS_ELEMENT(b,c,x,y) ((b[CONF_CONTENT_BYTE_POS(c,x,y)]<< 8)|\
121 (b[CONF_CONTENT_BYTE_POS(c,x,y) + 1]))
123 /* temporary variables used to store pointers to structure members */
124 static struct LevelInfo li;
125 static struct ElementInfo xx_ei, yy_ei;
126 static struct ElementChangeInfo xx_change;
127 static struct ElementGroupInfo xx_group;
128 static struct EnvelopeInfo xx_envelope;
129 static unsigned int xx_event_bits[NUM_CE_BITFIELDS];
130 static char xx_default_description[MAX_ELEMENT_NAME_LEN + 1];
131 static int xx_num_contents;
132 static int xx_current_change_page;
133 static char xx_default_string_empty[1] = "";
134 static int xx_string_length_unused;
136 struct LevelFileConfigInfo
138 int element; /* element for which data is to be stored */
139 int save_type; /* save data always, never or when changed */
140 int data_type; /* data type (used internally, not stored) */
141 int conf_type; /* micro chunk identifier (stored in file) */
144 void *value; /* variable that holds the data to be stored */
145 int default_value; /* initial default value for this variable */
148 void *value_copy; /* variable that holds the data to be copied */
149 void *num_entities; /* number of entities for multi-byte data */
150 int default_num_entities; /* default number of entities for this data */
151 int max_num_entities; /* maximal number of entities for this data */
152 char *default_string; /* optional default string for string data */
155 static struct LevelFileConfigInfo chunk_config_INFO[] =
157 /* ---------- values not related to single elements ----------------------- */
160 -1, SAVE_CONF_ALWAYS,
161 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
162 &li.game_engine_type, GAME_ENGINE_TYPE_RND
166 -1, SAVE_CONF_ALWAYS,
167 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
168 &li.fieldx, STD_LEV_FIELDX
171 -1, SAVE_CONF_ALWAYS,
172 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
173 &li.fieldy, STD_LEV_FIELDY
177 -1, SAVE_CONF_ALWAYS,
178 TYPE_INTEGER, CONF_VALUE_16_BIT(3),
183 -1, SAVE_CONF_ALWAYS,
184 TYPE_INTEGER, CONF_VALUE_16_BIT(4),
190 TYPE_INTEGER, CONF_VALUE_32_BIT(2),
196 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
197 &li.use_step_counter, FALSE
202 TYPE_BITFIELD, CONF_VALUE_8_BIT(4),
203 &li.wind_direction_initial, MV_NONE
208 TYPE_BOOLEAN, CONF_VALUE_8_BIT(5),
209 &li.em_slippery_gems, FALSE
214 TYPE_BOOLEAN, CONF_VALUE_8_BIT(6),
215 &li.use_custom_template, FALSE
220 TYPE_BITFIELD, CONF_VALUE_32_BIT(1),
221 &li.can_move_into_acid_bits, ~0 /* default: everything can */
226 TYPE_BITFIELD, CONF_VALUE_8_BIT(7),
227 &li.dont_collide_with_bits, ~0 /* default: always deadly */
232 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
233 &li.em_explodes_by_fire, FALSE
238 TYPE_INTEGER, CONF_VALUE_16_BIT(5),
239 &li.score[SC_TIME_BONUS], 1
244 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
245 &li.auto_exit_sokoban, FALSE
250 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
251 &li.auto_count_gems, FALSE
261 static struct LevelFileConfigInfo chunk_config_ELEM[] =
263 /* (these values are the same for each player) */
266 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
267 &li.block_last_field, FALSE /* default case for EM levels */
271 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
272 &li.sp_block_last_field, TRUE /* default case for SP levels */
276 TYPE_BOOLEAN, CONF_VALUE_8_BIT(3),
277 &li.instant_relocation, FALSE
281 TYPE_BOOLEAN, CONF_VALUE_8_BIT(4),
282 &li.can_pass_to_walkable, FALSE
286 TYPE_BOOLEAN, CONF_VALUE_8_BIT(5),
287 &li.block_snap_field, TRUE
291 TYPE_BOOLEAN, CONF_VALUE_8_BIT(6),
292 &li.continuous_snapping, TRUE
296 TYPE_BOOLEAN, CONF_VALUE_8_BIT(12),
297 &li.shifted_relocation, FALSE
301 TYPE_BOOLEAN, CONF_VALUE_8_BIT(15),
302 &li.lazy_relocation, FALSE
305 /* (these values are different for each player) */
308 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
309 &li.initial_player_stepsize[0], STEPSIZE_NORMAL
313 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
314 &li.initial_player_gravity[0], FALSE
318 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
319 &li.use_start_element[0], FALSE
323 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
324 &li.start_element[0], EL_PLAYER_1
328 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
329 &li.use_artwork_element[0], FALSE
333 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
334 &li.artwork_element[0], EL_PLAYER_1
338 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
339 &li.use_explosion_element[0], FALSE
343 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
344 &li.explosion_element[0], EL_PLAYER_1
348 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
349 &li.use_initial_inventory[0], FALSE
353 TYPE_BOOLEAN, CONF_VALUE_8_BIT(14),
354 &li.initial_inventory_size[0], 1
358 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
359 &li.initial_inventory_content[0][0],EL_EMPTY, NULL,
360 &li.initial_inventory_size[0], 1, MAX_INITIAL_INVENTORY_SIZE
365 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
366 &li.initial_player_stepsize[1], STEPSIZE_NORMAL
370 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
371 &li.initial_player_gravity[1], FALSE
375 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
376 &li.use_start_element[1], FALSE
380 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
381 &li.start_element[1], EL_PLAYER_2
385 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
386 &li.use_artwork_element[1], FALSE
390 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
391 &li.artwork_element[1], EL_PLAYER_2
395 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
396 &li.use_explosion_element[1], FALSE
400 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
401 &li.explosion_element[1], EL_PLAYER_2
405 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
406 &li.use_initial_inventory[1], FALSE
410 TYPE_BOOLEAN, CONF_VALUE_8_BIT(14),
411 &li.initial_inventory_size[1], 1
415 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
416 &li.initial_inventory_content[1][0],EL_EMPTY, NULL,
417 &li.initial_inventory_size[1], 1, MAX_INITIAL_INVENTORY_SIZE
422 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
423 &li.initial_player_stepsize[2], STEPSIZE_NORMAL
427 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
428 &li.initial_player_gravity[2], FALSE
432 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
433 &li.use_start_element[2], FALSE
437 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
438 &li.start_element[2], EL_PLAYER_3
442 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
443 &li.use_artwork_element[2], FALSE
447 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
448 &li.artwork_element[2], EL_PLAYER_3
452 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
453 &li.use_explosion_element[2], FALSE
457 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
458 &li.explosion_element[2], EL_PLAYER_3
462 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
463 &li.use_initial_inventory[2], FALSE
467 TYPE_BOOLEAN, CONF_VALUE_8_BIT(14),
468 &li.initial_inventory_size[2], 1
472 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
473 &li.initial_inventory_content[2][0],EL_EMPTY, NULL,
474 &li.initial_inventory_size[2], 1, MAX_INITIAL_INVENTORY_SIZE
479 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
480 &li.initial_player_stepsize[3], STEPSIZE_NORMAL
484 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
485 &li.initial_player_gravity[3], FALSE
489 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
490 &li.use_start_element[3], FALSE
494 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
495 &li.start_element[3], EL_PLAYER_4
499 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
500 &li.use_artwork_element[3], FALSE
504 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
505 &li.artwork_element[3], EL_PLAYER_4
509 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
510 &li.use_explosion_element[3], FALSE
514 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
515 &li.explosion_element[3], EL_PLAYER_4
519 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
520 &li.use_initial_inventory[3], FALSE
524 TYPE_BOOLEAN, CONF_VALUE_8_BIT(14),
525 &li.initial_inventory_size[3], 1
529 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
530 &li.initial_inventory_content[3][0],EL_EMPTY, NULL,
531 &li.initial_inventory_size[3], 1, MAX_INITIAL_INVENTORY_SIZE
536 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
537 &li.score[SC_EMERALD], 10
542 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
543 &li.score[SC_DIAMOND], 10
548 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
549 &li.score[SC_BUG], 10
554 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
555 &li.score[SC_SPACESHIP], 10
560 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
561 &li.score[SC_PACMAN], 10
566 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
567 &li.score[SC_NUT], 10
572 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
573 &li.score[SC_DYNAMITE], 10
578 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
579 &li.score[SC_KEY], 10
584 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
585 &li.score[SC_PEARL], 10
590 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
591 &li.score[SC_CRYSTAL], 10
596 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
597 &li.amoeba_content, EL_DIAMOND
601 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
606 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
607 &li.grow_into_diggable, TRUE
612 TYPE_CONTENT_LIST, CONF_VALUE_BYTES(1),
613 &li.yamyam_content, EL_ROCK, NULL,
614 &li.num_yamyam_contents, 4, MAX_ELEMENT_CONTENTS
618 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
619 &li.score[SC_YAMYAM], 10
624 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
625 &li.score[SC_ROBOT], 10
629 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
635 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
641 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
642 &li.time_magic_wall, 10
647 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
648 &li.game_of_life[0], 2
652 TYPE_INTEGER, CONF_VALUE_8_BIT(2),
653 &li.game_of_life[1], 3
657 TYPE_INTEGER, CONF_VALUE_8_BIT(3),
658 &li.game_of_life[2], 3
662 TYPE_INTEGER, CONF_VALUE_8_BIT(4),
663 &li.game_of_life[3], 3
668 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
673 TYPE_INTEGER, CONF_VALUE_8_BIT(2),
678 TYPE_INTEGER, CONF_VALUE_8_BIT(3),
683 TYPE_INTEGER, CONF_VALUE_8_BIT(4),
688 EL_TIMEGATE_SWITCH, -1,
689 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
690 &li.time_timegate, 10
694 EL_LIGHT_SWITCH_ACTIVE, -1,
695 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
700 EL_SHIELD_NORMAL, -1,
701 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
702 &li.shield_normal_time, 10
705 EL_SHIELD_NORMAL, -1,
706 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
707 &li.score[SC_SHIELD], 10
711 EL_SHIELD_DEADLY, -1,
712 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
713 &li.shield_deadly_time, 10
716 EL_SHIELD_DEADLY, -1,
717 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
718 &li.score[SC_SHIELD], 10
723 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
728 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
729 &li.extra_time_score, 10
733 EL_TIME_ORB_FULL, -1,
734 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
735 &li.time_orb_time, 10
738 EL_TIME_ORB_FULL, -1,
739 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
740 &li.use_time_orb_bug, FALSE
745 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
746 &li.use_spring_bug, FALSE
751 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
752 &li.android_move_time, 10
756 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
757 &li.android_clone_time, 10
761 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
762 &li.android_clone_element[0], EL_EMPTY, NULL,
763 &li.num_android_clone_elements, 1, MAX_ANDROID_ELEMENTS
768 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
773 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
778 EL_EMC_MAGNIFIER, -1,
779 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
780 &li.magnify_score, 10
783 EL_EMC_MAGNIFIER, -1,
784 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
789 EL_EMC_MAGIC_BALL, -1,
790 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
794 EL_EMC_MAGIC_BALL, -1,
795 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
796 &li.ball_random, FALSE
799 EL_EMC_MAGIC_BALL, -1,
800 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
801 &li.ball_state_initial, FALSE
804 EL_EMC_MAGIC_BALL, -1,
805 TYPE_CONTENT_LIST, CONF_VALUE_BYTES(1),
806 &li.ball_content, EL_EMPTY, NULL,
807 &li.num_ball_contents, 4, MAX_ELEMENT_CONTENTS
812 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
813 &li.mm_laser_red, FALSE
817 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
818 &li.mm_laser_green, FALSE
822 TYPE_BOOLEAN, CONF_VALUE_8_BIT(3),
823 &li.mm_laser_blue, TRUE
828 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
829 &li.df_laser_red, TRUE
833 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
834 &li.df_laser_green, TRUE
838 TYPE_BOOLEAN, CONF_VALUE_8_BIT(3),
839 &li.df_laser_blue, FALSE
843 EL_MM_FUSE_ACTIVE, -1,
844 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
849 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
854 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
858 EL_MM_STEEL_BLOCK, -1,
859 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
860 &li.mm_time_block, 75
864 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
865 &li.score[SC_ELEM_BONUS], 10
868 /* ---------- unused values ----------------------------------------------- */
871 EL_UNKNOWN, SAVE_CONF_NEVER,
872 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
873 &li.score[SC_UNKNOWN_15], 10
883 static struct LevelFileConfigInfo chunk_config_NOTE[] =
887 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
888 &xx_envelope.xsize, MAX_ENVELOPE_XSIZE,
892 TYPE_INTEGER, CONF_VALUE_8_BIT(2),
893 &xx_envelope.ysize, MAX_ENVELOPE_YSIZE,
898 TYPE_BOOLEAN, CONF_VALUE_8_BIT(3),
899 &xx_envelope.autowrap, FALSE
903 TYPE_BOOLEAN, CONF_VALUE_8_BIT(4),
904 &xx_envelope.centered, FALSE
909 TYPE_STRING, CONF_VALUE_BYTES(1),
910 &xx_envelope.text, -1, NULL,
911 &xx_string_length_unused, -1, MAX_ENVELOPE_TEXT_LEN,
912 &xx_default_string_empty[0]
922 static struct LevelFileConfigInfo chunk_config_CUSX_base[] =
926 TYPE_STRING, CONF_VALUE_BYTES(1),
927 &xx_ei.description[0], -1,
928 &yy_ei.description[0],
929 &xx_string_length_unused, -1, MAX_ELEMENT_NAME_LEN,
930 &xx_default_description[0]
935 TYPE_BITFIELD, CONF_VALUE_32_BIT(1),
936 &xx_ei.properties[EP_BITFIELD_BASE_NR], EP_BITMASK_BASE_DEFAULT,
937 &yy_ei.properties[EP_BITFIELD_BASE_NR]
939 #if ENABLE_RESERVED_CODE
940 /* (reserved for later use) */
943 TYPE_BITFIELD, CONF_VALUE_32_BIT(2),
944 &xx_ei.properties[EP_BITFIELD_BASE_NR + 1], EP_BITMASK_DEFAULT,
945 &yy_ei.properties[EP_BITFIELD_BASE_NR + 1]
951 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
952 &xx_ei.use_gfx_element, FALSE,
953 &yy_ei.use_gfx_element
957 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
958 &xx_ei.gfx_element_initial, EL_EMPTY_SPACE,
959 &yy_ei.gfx_element_initial
964 TYPE_BITFIELD, CONF_VALUE_8_BIT(2),
965 &xx_ei.access_direction, MV_ALL_DIRECTIONS,
966 &yy_ei.access_direction
971 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
972 &xx_ei.collect_score_initial, 10,
973 &yy_ei.collect_score_initial
977 TYPE_INTEGER, CONF_VALUE_16_BIT(3),
978 &xx_ei.collect_count_initial, 1,
979 &yy_ei.collect_count_initial
984 TYPE_INTEGER, CONF_VALUE_16_BIT(4),
985 &xx_ei.ce_value_fixed_initial, 0,
986 &yy_ei.ce_value_fixed_initial
990 TYPE_INTEGER, CONF_VALUE_16_BIT(5),
991 &xx_ei.ce_value_random_initial, 0,
992 &yy_ei.ce_value_random_initial
996 TYPE_BOOLEAN, CONF_VALUE_8_BIT(3),
997 &xx_ei.use_last_ce_value, FALSE,
998 &yy_ei.use_last_ce_value
1003 TYPE_INTEGER, CONF_VALUE_16_BIT(6),
1004 &xx_ei.push_delay_fixed, 8,
1005 &yy_ei.push_delay_fixed
1009 TYPE_INTEGER, CONF_VALUE_16_BIT(7),
1010 &xx_ei.push_delay_random, 8,
1011 &yy_ei.push_delay_random
1015 TYPE_INTEGER, CONF_VALUE_16_BIT(8),
1016 &xx_ei.drop_delay_fixed, 0,
1017 &yy_ei.drop_delay_fixed
1021 TYPE_INTEGER, CONF_VALUE_16_BIT(9),
1022 &xx_ei.drop_delay_random, 0,
1023 &yy_ei.drop_delay_random
1027 TYPE_INTEGER, CONF_VALUE_16_BIT(10),
1028 &xx_ei.move_delay_fixed, 0,
1029 &yy_ei.move_delay_fixed
1033 TYPE_INTEGER, CONF_VALUE_16_BIT(11),
1034 &xx_ei.move_delay_random, 0,
1035 &yy_ei.move_delay_random
1040 TYPE_BITFIELD, CONF_VALUE_32_BIT(3),
1041 &xx_ei.move_pattern, MV_ALL_DIRECTIONS,
1046 TYPE_BITFIELD, CONF_VALUE_8_BIT(4),
1047 &xx_ei.move_direction_initial, MV_START_AUTOMATIC,
1048 &yy_ei.move_direction_initial
1052 TYPE_INTEGER, CONF_VALUE_8_BIT(5),
1053 &xx_ei.move_stepsize, TILEX / 8,
1054 &yy_ei.move_stepsize
1059 TYPE_ELEMENT, CONF_VALUE_16_BIT(12),
1060 &xx_ei.move_enter_element, EL_EMPTY_SPACE,
1061 &yy_ei.move_enter_element
1065 TYPE_ELEMENT, CONF_VALUE_16_BIT(13),
1066 &xx_ei.move_leave_element, EL_EMPTY_SPACE,
1067 &yy_ei.move_leave_element
1071 TYPE_INTEGER, CONF_VALUE_8_BIT(6),
1072 &xx_ei.move_leave_type, LEAVE_TYPE_UNLIMITED,
1073 &yy_ei.move_leave_type
1078 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
1079 &xx_ei.slippery_type, SLIPPERY_ANY_RANDOM,
1080 &yy_ei.slippery_type
1085 TYPE_INTEGER, CONF_VALUE_8_BIT(8),
1086 &xx_ei.explosion_type, EXPLODES_3X3,
1087 &yy_ei.explosion_type
1091 TYPE_INTEGER, CONF_VALUE_16_BIT(14),
1092 &xx_ei.explosion_delay, 16,
1093 &yy_ei.explosion_delay
1097 TYPE_INTEGER, CONF_VALUE_16_BIT(15),
1098 &xx_ei.ignition_delay, 8,
1099 &yy_ei.ignition_delay
1104 TYPE_CONTENT_LIST, CONF_VALUE_BYTES(2),
1105 &xx_ei.content, EL_EMPTY_SPACE,
1107 &xx_num_contents, 1, 1
1110 /* ---------- "num_change_pages" must be the last entry ------------------- */
1113 -1, SAVE_CONF_ALWAYS,
1114 TYPE_INTEGER, CONF_VALUE_8_BIT(9),
1115 &xx_ei.num_change_pages, 1,
1116 &yy_ei.num_change_pages
1127 static struct LevelFileConfigInfo chunk_config_CUSX_change[] =
1129 /* ---------- "current_change_page" must be the first entry --------------- */
1132 -1, SAVE_CONF_ALWAYS,
1133 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
1134 &xx_current_change_page, -1
1137 /* ---------- (the remaining entries can be in any order) ----------------- */
1141 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
1142 &xx_change.can_change, FALSE
1147 TYPE_BITFIELD, CONF_VALUE_32_BIT(1),
1148 &xx_event_bits[0], 0
1152 TYPE_BITFIELD, CONF_VALUE_32_BIT(2),
1153 &xx_event_bits[1], 0
1158 TYPE_BITFIELD, CONF_VALUE_8_BIT(3),
1159 &xx_change.trigger_player, CH_PLAYER_ANY
1163 TYPE_BITFIELD, CONF_VALUE_8_BIT(4),
1164 &xx_change.trigger_side, CH_SIDE_ANY
1168 TYPE_BITFIELD, CONF_VALUE_32_BIT(3),
1169 &xx_change.trigger_page, CH_PAGE_ANY
1174 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
1175 &xx_change.target_element, EL_EMPTY_SPACE
1180 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
1181 &xx_change.delay_fixed, 0
1185 TYPE_INTEGER, CONF_VALUE_16_BIT(3),
1186 &xx_change.delay_random, 0
1190 TYPE_INTEGER, CONF_VALUE_16_BIT(4),
1191 &xx_change.delay_frames, FRAMES_PER_SECOND
1196 TYPE_ELEMENT, CONF_VALUE_16_BIT(5),
1197 &xx_change.initial_trigger_element, EL_EMPTY_SPACE
1202 TYPE_BOOLEAN, CONF_VALUE_8_BIT(6),
1203 &xx_change.explode, FALSE
1207 TYPE_BOOLEAN, CONF_VALUE_8_BIT(7),
1208 &xx_change.use_target_content, FALSE
1212 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
1213 &xx_change.only_if_complete, FALSE
1217 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
1218 &xx_change.use_random_replace, FALSE
1222 TYPE_INTEGER, CONF_VALUE_8_BIT(10),
1223 &xx_change.random_percentage, 100
1227 TYPE_INTEGER, CONF_VALUE_8_BIT(11),
1228 &xx_change.replace_when, CP_WHEN_EMPTY
1233 TYPE_BOOLEAN, CONF_VALUE_8_BIT(12),
1234 &xx_change.has_action, FALSE
1238 TYPE_INTEGER, CONF_VALUE_8_BIT(13),
1239 &xx_change.action_type, CA_NO_ACTION
1243 TYPE_INTEGER, CONF_VALUE_8_BIT(14),
1244 &xx_change.action_mode, CA_MODE_UNDEFINED
1248 TYPE_INTEGER, CONF_VALUE_16_BIT(6),
1249 &xx_change.action_arg, CA_ARG_UNDEFINED
1254 TYPE_ELEMENT, CONF_VALUE_16_BIT(7),
1255 &xx_change.action_element, EL_EMPTY_SPACE
1260 TYPE_CONTENT_LIST, CONF_VALUE_BYTES(1),
1261 &xx_change.target_content, EL_EMPTY_SPACE, NULL,
1262 &xx_num_contents, 1, 1
1272 static struct LevelFileConfigInfo chunk_config_GRPX[] =
1276 TYPE_STRING, CONF_VALUE_BYTES(1),
1277 &xx_ei.description[0], -1, NULL,
1278 &xx_string_length_unused, -1, MAX_ELEMENT_NAME_LEN,
1279 &xx_default_description[0]
1284 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
1285 &xx_ei.use_gfx_element, FALSE
1289 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
1290 &xx_ei.gfx_element_initial, EL_EMPTY_SPACE
1295 TYPE_INTEGER, CONF_VALUE_8_BIT(2),
1296 &xx_group.choice_mode, ANIM_RANDOM
1301 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(2),
1302 &xx_group.element[0], EL_EMPTY_SPACE, NULL,
1303 &xx_group.num_elements, 1, MAX_ELEMENTS_IN_GROUP
1313 static struct LevelFileConfigInfo chunk_config_CONF[] = /* (OBSOLETE) */
1317 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
1318 &li.block_snap_field, TRUE
1322 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
1323 &li.continuous_snapping, TRUE
1327 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
1328 &li.initial_player_stepsize[0], STEPSIZE_NORMAL
1332 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
1333 &li.use_start_element[0], FALSE
1337 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
1338 &li.start_element[0], EL_PLAYER_1
1342 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
1343 &li.use_artwork_element[0], FALSE
1347 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
1348 &li.artwork_element[0], EL_PLAYER_1
1352 TYPE_BOOLEAN, CONF_VALUE_8_BIT(12),
1353 &li.use_explosion_element[0], FALSE
1357 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
1358 &li.explosion_element[0], EL_PLAYER_1
1373 filetype_id_list[] =
1375 { LEVEL_FILE_TYPE_RND, "RND" },
1376 { LEVEL_FILE_TYPE_BD, "BD" },
1377 { LEVEL_FILE_TYPE_EM, "EM" },
1378 { LEVEL_FILE_TYPE_SP, "SP" },
1379 { LEVEL_FILE_TYPE_DX, "DX" },
1380 { LEVEL_FILE_TYPE_SB, "SB" },
1381 { LEVEL_FILE_TYPE_DC, "DC" },
1382 { LEVEL_FILE_TYPE_MM, "MM" },
1383 { LEVEL_FILE_TYPE_MM, "DF" },
1388 /* ========================================================================= */
1389 /* level file functions */
1390 /* ========================================================================= */
1392 static boolean check_special_flags(char *flag)
1394 if (strEqual(options.special_flags, flag) ||
1395 strEqual(leveldir_current->special_flags, flag))
1401 static struct DateInfo getCurrentDate()
1403 time_t epoch_seconds = time(NULL);
1404 struct tm *now = localtime(&epoch_seconds);
1405 struct DateInfo date;
1407 date.year = now->tm_year + 1900;
1408 date.month = now->tm_mon + 1;
1409 date.day = now->tm_mday;
1411 date.src = DATE_SRC_CLOCK;
1416 static void resetEventFlags(struct ElementChangeInfo *change)
1420 for (i = 0; i < NUM_CHANGE_EVENTS; i++)
1421 change->has_event[i] = FALSE;
1424 static void resetEventBits()
1428 for (i = 0; i < NUM_CE_BITFIELDS; i++)
1429 xx_event_bits[i] = 0;
1432 static void setEventFlagsFromEventBits(struct ElementChangeInfo *change)
1436 /* important: only change event flag if corresponding event bit is set
1437 (this is because all xx_event_bits[] values are loaded separately,
1438 and all xx_event_bits[] values are set back to zero before loading
1439 another value xx_event_bits[x] (each value representing 32 flags)) */
1441 for (i = 0; i < NUM_CHANGE_EVENTS; i++)
1442 if (xx_event_bits[CH_EVENT_BITFIELD_NR(i)] & CH_EVENT_BIT(i))
1443 change->has_event[i] = TRUE;
1446 static void setEventBitsFromEventFlags(struct ElementChangeInfo *change)
1450 /* in contrast to the above function setEventFlagsFromEventBits(), it
1451 would also be possible to set all bits in xx_event_bits[] to 0 or 1
1452 depending on the corresponding change->has_event[i] values here, as
1453 all xx_event_bits[] values are reset in resetEventBits() before */
1455 for (i = 0; i < NUM_CHANGE_EVENTS; i++)
1456 if (change->has_event[i])
1457 xx_event_bits[CH_EVENT_BITFIELD_NR(i)] |= CH_EVENT_BIT(i);
1460 static char *getDefaultElementDescription(struct ElementInfo *ei)
1462 static char description[MAX_ELEMENT_NAME_LEN + 1];
1463 char *default_description = (ei->custom_description != NULL ?
1464 ei->custom_description :
1465 ei->editor_description);
1468 /* always start with reliable default values */
1469 for (i = 0; i < MAX_ELEMENT_NAME_LEN + 1; i++)
1470 description[i] = '\0';
1472 /* truncate element description to MAX_ELEMENT_NAME_LEN bytes */
1473 strncpy(description, default_description, MAX_ELEMENT_NAME_LEN);
1475 return &description[0];
1478 static void setElementDescriptionToDefault(struct ElementInfo *ei)
1480 char *default_description = getDefaultElementDescription(ei);
1483 for (i = 0; i < MAX_ELEMENT_NAME_LEN + 1; i++)
1484 ei->description[i] = default_description[i];
1487 static void setConfigToDefaultsFromConfigList(struct LevelFileConfigInfo *conf)
1491 for (i = 0; conf[i].data_type != -1; i++)
1493 int default_value = conf[i].default_value;
1494 int data_type = conf[i].data_type;
1495 int conf_type = conf[i].conf_type;
1496 int byte_mask = conf_type & CONF_MASK_BYTES;
1498 if (byte_mask == CONF_MASK_MULTI_BYTES)
1500 int default_num_entities = conf[i].default_num_entities;
1501 int max_num_entities = conf[i].max_num_entities;
1503 *(int *)(conf[i].num_entities) = default_num_entities;
1505 if (data_type == TYPE_STRING)
1507 char *default_string = conf[i].default_string;
1508 char *string = (char *)(conf[i].value);
1510 strncpy(string, default_string, max_num_entities);
1512 else if (data_type == TYPE_ELEMENT_LIST)
1514 int *element_array = (int *)(conf[i].value);
1517 for (j = 0; j < max_num_entities; j++)
1518 element_array[j] = default_value;
1520 else if (data_type == TYPE_CONTENT_LIST)
1522 struct Content *content = (struct Content *)(conf[i].value);
1525 for (c = 0; c < max_num_entities; c++)
1526 for (y = 0; y < 3; y++)
1527 for (x = 0; x < 3; x++)
1528 content[c].e[x][y] = default_value;
1531 else /* constant size configuration data (1, 2 or 4 bytes) */
1533 if (data_type == TYPE_BOOLEAN)
1534 *(boolean *)(conf[i].value) = default_value;
1536 *(int *) (conf[i].value) = default_value;
1541 static void copyConfigFromConfigList(struct LevelFileConfigInfo *conf)
1545 for (i = 0; conf[i].data_type != -1; i++)
1547 int data_type = conf[i].data_type;
1548 int conf_type = conf[i].conf_type;
1549 int byte_mask = conf_type & CONF_MASK_BYTES;
1551 if (byte_mask == CONF_MASK_MULTI_BYTES)
1553 int max_num_entities = conf[i].max_num_entities;
1555 if (data_type == TYPE_STRING)
1557 char *string = (char *)(conf[i].value);
1558 char *string_copy = (char *)(conf[i].value_copy);
1560 strncpy(string_copy, string, max_num_entities);
1562 else if (data_type == TYPE_ELEMENT_LIST)
1564 int *element_array = (int *)(conf[i].value);
1565 int *element_array_copy = (int *)(conf[i].value_copy);
1568 for (j = 0; j < max_num_entities; j++)
1569 element_array_copy[j] = element_array[j];
1571 else if (data_type == TYPE_CONTENT_LIST)
1573 struct Content *content = (struct Content *)(conf[i].value);
1574 struct Content *content_copy = (struct Content *)(conf[i].value_copy);
1577 for (c = 0; c < max_num_entities; c++)
1578 for (y = 0; y < 3; y++)
1579 for (x = 0; x < 3; x++)
1580 content_copy[c].e[x][y] = content[c].e[x][y];
1583 else /* constant size configuration data (1, 2 or 4 bytes) */
1585 if (data_type == TYPE_BOOLEAN)
1586 *(boolean *)(conf[i].value_copy) = *(boolean *)(conf[i].value);
1588 *(int *) (conf[i].value_copy) = *(int *) (conf[i].value);
1593 void copyElementInfo(struct ElementInfo *ei_from, struct ElementInfo *ei_to)
1597 xx_ei = *ei_from; /* copy element data into temporary buffer */
1598 yy_ei = *ei_to; /* copy element data into temporary buffer */
1600 copyConfigFromConfigList(chunk_config_CUSX_base);
1605 /* ---------- reinitialize and copy change pages ---------- */
1607 ei_to->num_change_pages = ei_from->num_change_pages;
1608 ei_to->current_change_page = ei_from->current_change_page;
1610 setElementChangePages(ei_to, ei_to->num_change_pages);
1612 for (i = 0; i < ei_to->num_change_pages; i++)
1613 ei_to->change_page[i] = ei_from->change_page[i];
1615 /* ---------- copy group element info ---------- */
1616 if (ei_from->group != NULL && ei_to->group != NULL) /* group or internal */
1617 *ei_to->group = *ei_from->group;
1619 /* mark this custom element as modified */
1620 ei_to->modified_settings = TRUE;
1623 void setElementChangePages(struct ElementInfo *ei, int change_pages)
1625 int change_page_size = sizeof(struct ElementChangeInfo);
1627 ei->num_change_pages = MAX(1, change_pages);
1630 checked_realloc(ei->change_page, ei->num_change_pages * change_page_size);
1632 if (ei->current_change_page >= ei->num_change_pages)
1633 ei->current_change_page = ei->num_change_pages - 1;
1635 ei->change = &ei->change_page[ei->current_change_page];
1638 void setElementChangeInfoToDefaults(struct ElementChangeInfo *change)
1640 xx_change = *change; /* copy change data into temporary buffer */
1642 setConfigToDefaultsFromConfigList(chunk_config_CUSX_change);
1644 *change = xx_change;
1646 resetEventFlags(change);
1648 change->direct_action = 0;
1649 change->other_action = 0;
1651 change->pre_change_function = NULL;
1652 change->change_function = NULL;
1653 change->post_change_function = NULL;
1656 static void setLevelInfoToDefaults_Level(struct LevelInfo *level)
1660 li = *level; /* copy level data into temporary buffer */
1661 setConfigToDefaultsFromConfigList(chunk_config_INFO);
1662 *level = li; /* copy temporary buffer back to level data */
1664 setLevelInfoToDefaults_EM();
1665 setLevelInfoToDefaults_SP();
1666 setLevelInfoToDefaults_MM();
1668 level->native_em_level = &native_em_level;
1669 level->native_sp_level = &native_sp_level;
1670 level->native_mm_level = &native_mm_level;
1672 level->file_version = FILE_VERSION_ACTUAL;
1673 level->game_version = GAME_VERSION_ACTUAL;
1675 level->creation_date = getCurrentDate();
1677 level->encoding_16bit_field = TRUE;
1678 level->encoding_16bit_yamyam = TRUE;
1679 level->encoding_16bit_amoeba = TRUE;
1681 /* clear level name and level author string buffers */
1682 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
1683 level->name[i] = '\0';
1684 for (i = 0; i < MAX_LEVEL_AUTHOR_LEN; i++)
1685 level->author[i] = '\0';
1687 /* set level name and level author to default values */
1688 strcpy(level->name, NAMELESS_LEVEL_NAME);
1689 strcpy(level->author, ANONYMOUS_NAME);
1691 /* set level playfield to playable default level with player and exit */
1692 for (x = 0; x < MAX_LEV_FIELDX; x++)
1693 for (y = 0; y < MAX_LEV_FIELDY; y++)
1694 level->field[x][y] = EL_SAND;
1696 level->field[0][0] = EL_PLAYER_1;
1697 level->field[STD_LEV_FIELDX - 1][STD_LEV_FIELDY - 1] = EL_EXIT_CLOSED;
1699 BorderElement = EL_STEELWALL;
1701 /* detect custom elements when loading them */
1702 level->file_has_custom_elements = FALSE;
1704 /* set all bug compatibility flags to "false" => do not emulate this bug */
1705 level->use_action_after_change_bug = FALSE;
1707 if (leveldir_current)
1709 /* try to determine better author name than 'anonymous' */
1710 if (!strEqual(leveldir_current->author, ANONYMOUS_NAME))
1712 strncpy(level->author, leveldir_current->author, MAX_LEVEL_AUTHOR_LEN);
1713 level->author[MAX_LEVEL_AUTHOR_LEN] = '\0';
1717 switch (LEVELCLASS(leveldir_current))
1719 case LEVELCLASS_TUTORIAL:
1720 strcpy(level->author, PROGRAM_AUTHOR_STRING);
1723 case LEVELCLASS_CONTRIB:
1724 strncpy(level->author, leveldir_current->name, MAX_LEVEL_AUTHOR_LEN);
1725 level->author[MAX_LEVEL_AUTHOR_LEN] = '\0';
1728 case LEVELCLASS_PRIVATE:
1729 strncpy(level->author, getRealName(), MAX_LEVEL_AUTHOR_LEN);
1730 level->author[MAX_LEVEL_AUTHOR_LEN] = '\0';
1734 /* keep default value */
1741 static void setLevelInfoToDefaults_Elements(struct LevelInfo *level)
1743 static boolean clipboard_elements_initialized = FALSE;
1746 InitElementPropertiesStatic();
1748 li = *level; /* copy level data into temporary buffer */
1749 setConfigToDefaultsFromConfigList(chunk_config_ELEM);
1750 *level = li; /* copy temporary buffer back to level data */
1752 for (i = 0; i < MAX_NUM_ELEMENTS; i++)
1755 struct ElementInfo *ei = &element_info[element];
1757 /* never initialize clipboard elements after the very first time */
1758 /* (to be able to use clipboard elements between several levels) */
1759 if (IS_CLIPBOARD_ELEMENT(element) && clipboard_elements_initialized)
1762 if (IS_ENVELOPE(element))
1764 int envelope_nr = element - EL_ENVELOPE_1;
1766 setConfigToDefaultsFromConfigList(chunk_config_NOTE);
1768 level->envelope[envelope_nr] = xx_envelope;
1771 if (IS_CUSTOM_ELEMENT(element) ||
1772 IS_GROUP_ELEMENT(element) ||
1773 IS_INTERNAL_ELEMENT(element))
1775 xx_ei = *ei; /* copy element data into temporary buffer */
1777 setConfigToDefaultsFromConfigList(chunk_config_CUSX_base);
1782 setElementChangePages(ei, 1);
1783 setElementChangeInfoToDefaults(ei->change);
1785 if (IS_CUSTOM_ELEMENT(element) ||
1786 IS_GROUP_ELEMENT(element) ||
1787 IS_INTERNAL_ELEMENT(element))
1789 setElementDescriptionToDefault(ei);
1791 ei->modified_settings = FALSE;
1794 if (IS_CUSTOM_ELEMENT(element) ||
1795 IS_INTERNAL_ELEMENT(element))
1797 /* internal values used in level editor */
1799 ei->access_type = 0;
1800 ei->access_layer = 0;
1801 ei->access_protected = 0;
1802 ei->walk_to_action = 0;
1803 ei->smash_targets = 0;
1806 ei->can_explode_by_fire = FALSE;
1807 ei->can_explode_smashed = FALSE;
1808 ei->can_explode_impact = FALSE;
1810 ei->current_change_page = 0;
1813 if (IS_GROUP_ELEMENT(element) ||
1814 IS_INTERNAL_ELEMENT(element))
1816 struct ElementGroupInfo *group;
1818 /* initialize memory for list of elements in group */
1819 if (ei->group == NULL)
1820 ei->group = checked_malloc(sizeof(struct ElementGroupInfo));
1824 xx_group = *group; /* copy group data into temporary buffer */
1826 setConfigToDefaultsFromConfigList(chunk_config_GRPX);
1832 clipboard_elements_initialized = TRUE;
1835 static void setLevelInfoToDefaults(struct LevelInfo *level,
1836 boolean level_info_only,
1837 boolean reset_file_status)
1839 setLevelInfoToDefaults_Level(level);
1841 if (!level_info_only)
1842 setLevelInfoToDefaults_Elements(level);
1844 if (reset_file_status)
1846 level->no_valid_file = FALSE;
1847 level->no_level_file = FALSE;
1850 level->changed = FALSE;
1853 static void setFileInfoToDefaults(struct LevelFileInfo *level_file_info)
1855 level_file_info->nr = 0;
1856 level_file_info->type = LEVEL_FILE_TYPE_UNKNOWN;
1857 level_file_info->packed = FALSE;
1859 setString(&level_file_info->basename, NULL);
1860 setString(&level_file_info->filename, NULL);
1863 int getMappedElement_SB(int, boolean);
1865 static void ActivateLevelTemplate()
1869 if (check_special_flags("load_xsb_to_ces"))
1871 /* fill smaller playfields with padding "beyond border wall" elements */
1872 if (level.fieldx < level_template.fieldx ||
1873 level.fieldy < level_template.fieldy)
1875 short field[level.fieldx][level.fieldy];
1876 int new_fieldx = MAX(level.fieldx, level_template.fieldx);
1877 int new_fieldy = MAX(level.fieldy, level_template.fieldy);
1878 int pos_fieldx = (new_fieldx - level.fieldx) / 2;
1879 int pos_fieldy = (new_fieldy - level.fieldy) / 2;
1881 /* copy old playfield (which is smaller than the visible area) */
1882 for (y = 0; y < level.fieldy; y++) for (x = 0; x < level.fieldx; x++)
1883 field[x][y] = level.field[x][y];
1885 /* fill new, larger playfield with "beyond border wall" elements */
1886 for (y = 0; y < new_fieldy; y++) for (x = 0; x < new_fieldx; x++)
1887 level.field[x][y] = getMappedElement_SB('_', TRUE);
1889 /* copy the old playfield to the middle of the new playfield */
1890 for (y = 0; y < level.fieldy; y++) for (x = 0; x < level.fieldx; x++)
1891 level.field[pos_fieldx + x][pos_fieldy + y] = field[x][y];
1893 level.fieldx = new_fieldx;
1894 level.fieldy = new_fieldy;
1898 /* Currently there is no special action needed to activate the template
1899 data, because 'element_info' property settings overwrite the original
1900 level data, while all other variables do not change. */
1902 /* Exception: 'from_level_template' elements in the original level playfield
1903 are overwritten with the corresponding elements at the same position in
1904 playfield from the level template. */
1906 for (x = 0; x < level.fieldx; x++)
1907 for (y = 0; y < level.fieldy; y++)
1908 if (level.field[x][y] == EL_FROM_LEVEL_TEMPLATE)
1909 level.field[x][y] = level_template.field[x][y];
1911 if (check_special_flags("load_xsb_to_ces"))
1913 struct LevelInfo level_backup = level;
1915 /* overwrite all individual level settings from template level settings */
1916 level = level_template;
1918 /* restore level file info */
1919 level.file_info = level_backup.file_info;
1921 /* restore playfield size */
1922 level.fieldx = level_backup.fieldx;
1923 level.fieldy = level_backup.fieldy;
1925 /* restore playfield content */
1926 for (x = 0; x < level.fieldx; x++)
1927 for (y = 0; y < level.fieldy; y++)
1928 level.field[x][y] = level_backup.field[x][y];
1930 /* restore name and author from individual level */
1931 strcpy(level.name, level_backup.name);
1932 strcpy(level.author, level_backup.author);
1934 /* restore flag "use_custom_template" */
1935 level.use_custom_template = level_backup.use_custom_template;
1939 static char *getLevelFilenameFromBasename(char *basename)
1941 static char *filename = NULL;
1943 checked_free(filename);
1945 filename = getPath2(getCurrentLevelDir(), basename);
1950 static int getFileTypeFromBasename(char *basename)
1952 /* !!! ALSO SEE COMMENT IN checkForPackageFromBasename() !!! */
1954 static char *filename = NULL;
1955 struct stat file_status;
1957 /* ---------- try to determine file type from filename ---------- */
1959 /* check for typical filename of a Supaplex level package file */
1960 if (strlen(basename) == 10 && strPrefixLower(basename, "levels.d"))
1961 return LEVEL_FILE_TYPE_SP;
1963 /* check for typical filename of a Diamond Caves II level package file */
1964 if (strSuffixLower(basename, ".dc") ||
1965 strSuffixLower(basename, ".dc2"))
1966 return LEVEL_FILE_TYPE_DC;
1968 /* check for typical filename of a Sokoban level package file */
1969 if (strSuffixLower(basename, ".xsb") &&
1970 strchr(basename, '%') == NULL)
1971 return LEVEL_FILE_TYPE_SB;
1973 /* ---------- try to determine file type from filesize ---------- */
1975 checked_free(filename);
1976 filename = getPath2(getCurrentLevelDir(), basename);
1978 if (stat(filename, &file_status) == 0)
1980 /* check for typical filesize of a Supaplex level package file */
1981 if (file_status.st_size == 170496)
1982 return LEVEL_FILE_TYPE_SP;
1985 return LEVEL_FILE_TYPE_UNKNOWN;
1988 static int getFileTypeFromMagicBytes(char *filename, int type)
1992 if ((file = openFile(filename, MODE_READ)))
1994 char chunk_name[CHUNK_ID_LEN + 1];
1996 getFileChunkBE(file, chunk_name, NULL);
1998 if (strEqual(chunk_name, "MMII") ||
1999 strEqual(chunk_name, "MIRR"))
2000 type = LEVEL_FILE_TYPE_MM;
2008 static boolean checkForPackageFromBasename(char *basename)
2010 /* !!! WON'T WORK ANYMORE IF getFileTypeFromBasename() ALSO DETECTS !!!
2011 !!! SINGLE LEVELS (CURRENTLY ONLY DETECTS LEVEL PACKAGES !!! */
2013 return (getFileTypeFromBasename(basename) != LEVEL_FILE_TYPE_UNKNOWN);
2016 static char *getSingleLevelBasenameExt(int nr, char *extension)
2018 static char basename[MAX_FILENAME_LEN];
2021 sprintf(basename, "%s", LEVELTEMPLATE_FILENAME);
2023 sprintf(basename, "%03d.%s", nr, extension);
2028 static char *getSingleLevelBasename(int nr)
2030 return getSingleLevelBasenameExt(nr, LEVELFILE_EXTENSION);
2033 static char *getPackedLevelBasename(int type)
2035 static char basename[MAX_FILENAME_LEN];
2036 char *directory = getCurrentLevelDir();
2038 DirectoryEntry *dir_entry;
2040 strcpy(basename, UNDEFINED_FILENAME); /* default: undefined file */
2042 if ((dir = openDirectory(directory)) == NULL)
2044 Error(ERR_WARN, "cannot read current level directory '%s'", directory);
2049 while ((dir_entry = readDirectory(dir)) != NULL) /* loop all entries */
2051 char *entry_basename = dir_entry->basename;
2052 int entry_type = getFileTypeFromBasename(entry_basename);
2054 if (entry_type != LEVEL_FILE_TYPE_UNKNOWN) /* found valid level package */
2056 if (type == LEVEL_FILE_TYPE_UNKNOWN ||
2059 strcpy(basename, entry_basename);
2066 closeDirectory(dir);
2071 static char *getSingleLevelFilename(int nr)
2073 return getLevelFilenameFromBasename(getSingleLevelBasename(nr));
2076 #if ENABLE_UNUSED_CODE
2077 static char *getPackedLevelFilename(int type)
2079 return getLevelFilenameFromBasename(getPackedLevelBasename(type));
2083 char *getDefaultLevelFilename(int nr)
2085 return getSingleLevelFilename(nr);
2088 #if ENABLE_UNUSED_CODE
2089 static void setLevelFileInfo_SingleLevelFilename(struct LevelFileInfo *lfi,
2093 lfi->packed = FALSE;
2095 setString(&lfi->basename, getSingleLevelBasename(lfi->nr, lfi->type));
2096 setString(&lfi->filename, getLevelFilenameFromBasename(lfi->basename));
2100 static void setLevelFileInfo_FormatLevelFilename(struct LevelFileInfo *lfi,
2101 int type, char *format, ...)
2103 static char basename[MAX_FILENAME_LEN];
2106 va_start(ap, format);
2107 vsprintf(basename, format, ap);
2111 lfi->packed = FALSE;
2113 setString(&lfi->basename, basename);
2114 setString(&lfi->filename, getLevelFilenameFromBasename(lfi->basename));
2117 static void setLevelFileInfo_PackedLevelFilename(struct LevelFileInfo *lfi,
2123 setString(&lfi->basename, getPackedLevelBasename(lfi->type));
2124 setString(&lfi->filename, getLevelFilenameFromBasename(lfi->basename));
2127 static int getFiletypeFromID(char *filetype_id)
2129 char *filetype_id_lower;
2130 int filetype = LEVEL_FILE_TYPE_UNKNOWN;
2133 if (filetype_id == NULL)
2134 return LEVEL_FILE_TYPE_UNKNOWN;
2136 filetype_id_lower = getStringToLower(filetype_id);
2138 for (i = 0; filetype_id_list[i].id != NULL; i++)
2140 char *id_lower = getStringToLower(filetype_id_list[i].id);
2142 if (strEqual(filetype_id_lower, id_lower))
2143 filetype = filetype_id_list[i].filetype;
2147 if (filetype != LEVEL_FILE_TYPE_UNKNOWN)
2151 free(filetype_id_lower);
2156 char *getLocalLevelTemplateFilename()
2158 return getDefaultLevelFilename(-1);
2161 char *getGlobalLevelTemplateFilename()
2163 /* global variable "leveldir_current" must be modified in the loop below */
2164 LevelDirTree *leveldir_current_last = leveldir_current;
2165 char *filename = NULL;
2167 /* check for template level in path from current to topmost tree node */
2169 while (leveldir_current != NULL)
2171 filename = getDefaultLevelFilename(-1);
2173 if (fileExists(filename))
2176 leveldir_current = leveldir_current->node_parent;
2179 /* restore global variable "leveldir_current" modified in above loop */
2180 leveldir_current = leveldir_current_last;
2185 static void determineLevelFileInfo_Filename(struct LevelFileInfo *lfi)
2189 /* special case: level number is negative => check for level template file */
2192 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_RND,
2193 getSingleLevelBasename(-1));
2195 /* replace local level template filename with global template filename */
2196 setString(&lfi->filename, getGlobalLevelTemplateFilename());
2198 /* no fallback if template file not existing */
2202 /* special case: check for file name/pattern specified in "levelinfo.conf" */
2203 if (leveldir_current->level_filename != NULL)
2205 int filetype = getFiletypeFromID(leveldir_current->level_filetype);
2207 setLevelFileInfo_FormatLevelFilename(lfi, filetype,
2208 leveldir_current->level_filename, nr);
2210 lfi->packed = checkForPackageFromBasename(leveldir_current->level_filename);
2212 if (fileExists(lfi->filename))
2215 else if (leveldir_current->level_filetype != NULL)
2217 int filetype = getFiletypeFromID(leveldir_current->level_filetype);
2219 /* check for specified native level file with standard file name */
2220 setLevelFileInfo_FormatLevelFilename(lfi, filetype,
2221 "%03d.%s", nr, LEVELFILE_EXTENSION);
2222 if (fileExists(lfi->filename))
2226 /* check for native Rocks'n'Diamonds level file */
2227 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_RND,
2228 "%03d.%s", nr, LEVELFILE_EXTENSION);
2229 if (fileExists(lfi->filename))
2232 /* check for Emerald Mine level file (V1) */
2233 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "a%c%c",
2234 'a' + (nr / 10) % 26, '0' + nr % 10);
2235 if (fileExists(lfi->filename))
2237 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "A%c%c",
2238 'A' + (nr / 10) % 26, '0' + nr % 10);
2239 if (fileExists(lfi->filename))
2242 /* check for Emerald Mine level file (V2 to V5) */
2243 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%d", nr);
2244 if (fileExists(lfi->filename))
2247 /* check for Emerald Mine level file (V6 / single mode) */
2248 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02ds", nr);
2249 if (fileExists(lfi->filename))
2251 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02dS", nr);
2252 if (fileExists(lfi->filename))
2255 /* check for Emerald Mine level file (V6 / teamwork mode) */
2256 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02dt", nr);
2257 if (fileExists(lfi->filename))
2259 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02dT", nr);
2260 if (fileExists(lfi->filename))
2263 /* check for various packed level file formats */
2264 setLevelFileInfo_PackedLevelFilename(lfi, LEVEL_FILE_TYPE_UNKNOWN);
2265 if (fileExists(lfi->filename))
2268 /* no known level file found -- use default values (and fail later) */
2269 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_RND,
2270 "%03d.%s", nr, LEVELFILE_EXTENSION);
2273 static void determineLevelFileInfo_Filetype(struct LevelFileInfo *lfi)
2275 if (lfi->type == LEVEL_FILE_TYPE_UNKNOWN)
2276 lfi->type = getFileTypeFromBasename(lfi->basename);
2278 if (lfi->type == LEVEL_FILE_TYPE_RND)
2279 lfi->type = getFileTypeFromMagicBytes(lfi->filename, lfi->type);
2282 static void setLevelFileInfo(struct LevelFileInfo *level_file_info, int nr)
2284 /* always start with reliable default values */
2285 setFileInfoToDefaults(level_file_info);
2287 level_file_info->nr = nr; /* set requested level number */
2289 determineLevelFileInfo_Filename(level_file_info);
2290 determineLevelFileInfo_Filetype(level_file_info);
2293 static void copyLevelFileInfo(struct LevelFileInfo *lfi_from,
2294 struct LevelFileInfo *lfi_to)
2296 lfi_to->nr = lfi_from->nr;
2297 lfi_to->type = lfi_from->type;
2298 lfi_to->packed = lfi_from->packed;
2300 setString(&lfi_to->basename, lfi_from->basename);
2301 setString(&lfi_to->filename, lfi_from->filename);
2304 /* ------------------------------------------------------------------------- */
2305 /* functions for loading R'n'D level */
2306 /* ------------------------------------------------------------------------- */
2308 int getMappedElement(int element)
2310 /* remap some (historic, now obsolete) elements */
2314 case EL_PLAYER_OBSOLETE:
2315 element = EL_PLAYER_1;
2318 case EL_KEY_OBSOLETE:
2322 case EL_EM_KEY_1_FILE_OBSOLETE:
2323 element = EL_EM_KEY_1;
2326 case EL_EM_KEY_2_FILE_OBSOLETE:
2327 element = EL_EM_KEY_2;
2330 case EL_EM_KEY_3_FILE_OBSOLETE:
2331 element = EL_EM_KEY_3;
2334 case EL_EM_KEY_4_FILE_OBSOLETE:
2335 element = EL_EM_KEY_4;
2338 case EL_ENVELOPE_OBSOLETE:
2339 element = EL_ENVELOPE_1;
2347 if (element >= NUM_FILE_ELEMENTS)
2349 Error(ERR_WARN, "invalid level element %d", element);
2351 element = EL_UNKNOWN;
2359 int getMappedElementByVersion(int element, int game_version)
2361 /* remap some elements due to certain game version */
2363 if (game_version <= VERSION_IDENT(2,2,0,0))
2365 /* map game font elements */
2366 element = (element == EL_CHAR('[') ? EL_CHAR_AUMLAUT :
2367 element == EL_CHAR('\\') ? EL_CHAR_OUMLAUT :
2368 element == EL_CHAR(']') ? EL_CHAR_UUMLAUT :
2369 element == EL_CHAR('^') ? EL_CHAR_COPYRIGHT : element);
2372 if (game_version < VERSION_IDENT(3,0,0,0))
2374 /* map Supaplex gravity tube elements */
2375 element = (element == EL_SP_GRAVITY_PORT_LEFT ? EL_SP_PORT_LEFT :
2376 element == EL_SP_GRAVITY_PORT_RIGHT ? EL_SP_PORT_RIGHT :
2377 element == EL_SP_GRAVITY_PORT_UP ? EL_SP_PORT_UP :
2378 element == EL_SP_GRAVITY_PORT_DOWN ? EL_SP_PORT_DOWN :
2385 static int LoadLevel_VERS(File *file, int chunk_size, struct LevelInfo *level)
2387 level->file_version = getFileVersion(file);
2388 level->game_version = getFileVersion(file);
2393 static int LoadLevel_DATE(File *file, int chunk_size, struct LevelInfo *level)
2395 level->creation_date.year = getFile16BitBE(file);
2396 level->creation_date.month = getFile8Bit(file);
2397 level->creation_date.day = getFile8Bit(file);
2399 level->creation_date.src = DATE_SRC_LEVELFILE;
2404 static int LoadLevel_HEAD(File *file, int chunk_size, struct LevelInfo *level)
2406 int initial_player_stepsize;
2407 int initial_player_gravity;
2410 level->fieldx = getFile8Bit(file);
2411 level->fieldy = getFile8Bit(file);
2413 level->time = getFile16BitBE(file);
2414 level->gems_needed = getFile16BitBE(file);
2416 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
2417 level->name[i] = getFile8Bit(file);
2418 level->name[MAX_LEVEL_NAME_LEN] = 0;
2420 for (i = 0; i < LEVEL_SCORE_ELEMENTS; i++)
2421 level->score[i] = getFile8Bit(file);
2423 level->num_yamyam_contents = STD_ELEMENT_CONTENTS;
2424 for (i = 0; i < STD_ELEMENT_CONTENTS; i++)
2425 for (y = 0; y < 3; y++)
2426 for (x = 0; x < 3; x++)
2427 level->yamyam_content[i].e[x][y] = getMappedElement(getFile8Bit(file));
2429 level->amoeba_speed = getFile8Bit(file);
2430 level->time_magic_wall = getFile8Bit(file);
2431 level->time_wheel = getFile8Bit(file);
2432 level->amoeba_content = getMappedElement(getFile8Bit(file));
2434 initial_player_stepsize = (getFile8Bit(file) == 1 ? STEPSIZE_FAST :
2437 for (i = 0; i < MAX_PLAYERS; i++)
2438 level->initial_player_stepsize[i] = initial_player_stepsize;
2440 initial_player_gravity = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2442 for (i = 0; i < MAX_PLAYERS; i++)
2443 level->initial_player_gravity[i] = initial_player_gravity;
2445 level->encoding_16bit_field = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2446 level->em_slippery_gems = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2448 level->use_custom_template = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2450 level->block_last_field = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2451 level->sp_block_last_field = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2452 level->can_move_into_acid_bits = getFile32BitBE(file);
2453 level->dont_collide_with_bits = getFile8Bit(file);
2455 level->use_spring_bug = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2456 level->use_step_counter = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2458 level->instant_relocation = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2459 level->can_pass_to_walkable = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2460 level->grow_into_diggable = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2462 level->game_engine_type = getFile8Bit(file);
2464 ReadUnusedBytesFromFile(file, LEVEL_CHUNK_HEAD_UNUSED);
2469 static int LoadLevel_NAME(File *file, int chunk_size, struct LevelInfo *level)
2473 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
2474 level->name[i] = getFile8Bit(file);
2475 level->name[MAX_LEVEL_NAME_LEN] = 0;
2480 static int LoadLevel_AUTH(File *file, int chunk_size, struct LevelInfo *level)
2484 for (i = 0; i < MAX_LEVEL_AUTHOR_LEN; i++)
2485 level->author[i] = getFile8Bit(file);
2486 level->author[MAX_LEVEL_AUTHOR_LEN] = 0;
2491 static int LoadLevel_BODY(File *file, int chunk_size, struct LevelInfo *level)
2494 int chunk_size_expected = level->fieldx * level->fieldy;
2496 /* Note: "chunk_size" was wrong before version 2.0 when elements are
2497 stored with 16-bit encoding (and should be twice as big then).
2498 Even worse, playfield data was stored 16-bit when only yamyam content
2499 contained 16-bit elements and vice versa. */
2501 if (level->encoding_16bit_field && level->file_version >= FILE_VERSION_2_0)
2502 chunk_size_expected *= 2;
2504 if (chunk_size_expected != chunk_size)
2506 ReadUnusedBytesFromFile(file, chunk_size);
2507 return chunk_size_expected;
2510 for (y = 0; y < level->fieldy; y++)
2511 for (x = 0; x < level->fieldx; x++)
2512 level->field[x][y] =
2513 getMappedElement(level->encoding_16bit_field ? getFile16BitBE(file) :
2518 static int LoadLevel_CONT(File *file, int chunk_size, struct LevelInfo *level)
2521 int header_size = 4;
2522 int content_size = MAX_ELEMENT_CONTENTS * 3 * 3;
2523 int chunk_size_expected = header_size + content_size;
2525 /* Note: "chunk_size" was wrong before version 2.0 when elements are
2526 stored with 16-bit encoding (and should be twice as big then).
2527 Even worse, playfield data was stored 16-bit when only yamyam content
2528 contained 16-bit elements and vice versa. */
2530 if (level->encoding_16bit_field && level->file_version >= FILE_VERSION_2_0)
2531 chunk_size_expected += content_size;
2533 if (chunk_size_expected != chunk_size)
2535 ReadUnusedBytesFromFile(file, chunk_size);
2536 return chunk_size_expected;
2540 level->num_yamyam_contents = getFile8Bit(file);
2544 /* correct invalid number of content fields -- should never happen */
2545 if (level->num_yamyam_contents < 1 ||
2546 level->num_yamyam_contents > MAX_ELEMENT_CONTENTS)
2547 level->num_yamyam_contents = STD_ELEMENT_CONTENTS;
2549 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
2550 for (y = 0; y < 3; y++)
2551 for (x = 0; x < 3; x++)
2552 level->yamyam_content[i].e[x][y] =
2553 getMappedElement(level->encoding_16bit_field ?
2554 getFile16BitBE(file) : getFile8Bit(file));
2558 static int LoadLevel_CNT2(File *file, int chunk_size, struct LevelInfo *level)
2563 int content_array[MAX_ELEMENT_CONTENTS][3][3];
2565 element = getMappedElement(getFile16BitBE(file));
2566 num_contents = getFile8Bit(file);
2568 getFile8Bit(file); /* content x size (unused) */
2569 getFile8Bit(file); /* content y size (unused) */
2571 ReadUnusedBytesFromFile(file, LEVEL_CHUNK_CNT2_UNUSED);
2573 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
2574 for (y = 0; y < 3; y++)
2575 for (x = 0; x < 3; x++)
2576 content_array[i][x][y] = getMappedElement(getFile16BitBE(file));
2578 /* correct invalid number of content fields -- should never happen */
2579 if (num_contents < 1 || num_contents > MAX_ELEMENT_CONTENTS)
2580 num_contents = STD_ELEMENT_CONTENTS;
2582 if (element == EL_YAMYAM)
2584 level->num_yamyam_contents = num_contents;
2586 for (i = 0; i < num_contents; i++)
2587 for (y = 0; y < 3; y++)
2588 for (x = 0; x < 3; x++)
2589 level->yamyam_content[i].e[x][y] = content_array[i][x][y];
2591 else if (element == EL_BD_AMOEBA)
2593 level->amoeba_content = content_array[0][0][0];
2597 Error(ERR_WARN, "cannot load content for element '%d'", element);
2603 static int LoadLevel_CNT3(File *file, int chunk_size, struct LevelInfo *level)
2609 int chunk_size_expected;
2611 element = getMappedElement(getFile16BitBE(file));
2612 if (!IS_ENVELOPE(element))
2613 element = EL_ENVELOPE_1;
2615 envelope_nr = element - EL_ENVELOPE_1;
2617 envelope_len = getFile16BitBE(file);
2619 level->envelope[envelope_nr].xsize = getFile8Bit(file);
2620 level->envelope[envelope_nr].ysize = getFile8Bit(file);
2622 ReadUnusedBytesFromFile(file, LEVEL_CHUNK_CNT3_UNUSED);
2624 chunk_size_expected = LEVEL_CHUNK_CNT3_SIZE(envelope_len);
2625 if (chunk_size_expected != chunk_size)
2627 ReadUnusedBytesFromFile(file, chunk_size - LEVEL_CHUNK_CNT3_HEADER);
2628 return chunk_size_expected;
2631 for (i = 0; i < envelope_len; i++)
2632 level->envelope[envelope_nr].text[i] = getFile8Bit(file);
2637 static int LoadLevel_CUS1(File *file, int chunk_size, struct LevelInfo *level)
2639 int num_changed_custom_elements = getFile16BitBE(file);
2640 int chunk_size_expected = 2 + num_changed_custom_elements * 6;
2643 if (chunk_size_expected != chunk_size)
2645 ReadUnusedBytesFromFile(file, chunk_size - 2);
2646 return chunk_size_expected;
2649 for (i = 0; i < num_changed_custom_elements; i++)
2651 int element = getMappedElement(getFile16BitBE(file));
2652 int properties = getFile32BitBE(file);
2654 if (IS_CUSTOM_ELEMENT(element))
2655 element_info[element].properties[EP_BITFIELD_BASE_NR] = properties;
2657 Error(ERR_WARN, "invalid custom element number %d", element);
2659 /* older game versions that wrote level files with CUS1 chunks used
2660 different default push delay values (not yet stored in level file) */
2661 element_info[element].push_delay_fixed = 2;
2662 element_info[element].push_delay_random = 8;
2665 level->file_has_custom_elements = TRUE;
2670 static int LoadLevel_CUS2(File *file, int chunk_size, struct LevelInfo *level)
2672 int num_changed_custom_elements = getFile16BitBE(file);
2673 int chunk_size_expected = 2 + num_changed_custom_elements * 4;
2676 if (chunk_size_expected != chunk_size)
2678 ReadUnusedBytesFromFile(file, chunk_size - 2);
2679 return chunk_size_expected;
2682 for (i = 0; i < num_changed_custom_elements; i++)
2684 int element = getMappedElement(getFile16BitBE(file));
2685 int custom_target_element = getMappedElement(getFile16BitBE(file));
2687 if (IS_CUSTOM_ELEMENT(element))
2688 element_info[element].change->target_element = custom_target_element;
2690 Error(ERR_WARN, "invalid custom element number %d", element);
2693 level->file_has_custom_elements = TRUE;
2698 static int LoadLevel_CUS3(File *file, int chunk_size, struct LevelInfo *level)
2700 int num_changed_custom_elements = getFile16BitBE(file);
2701 int chunk_size_expected = LEVEL_CHUNK_CUS3_SIZE(num_changed_custom_elements);
2704 if (chunk_size_expected != chunk_size)
2706 ReadUnusedBytesFromFile(file, chunk_size - 2);
2707 return chunk_size_expected;
2710 for (i = 0; i < num_changed_custom_elements; i++)
2712 int element = getMappedElement(getFile16BitBE(file));
2713 struct ElementInfo *ei = &element_info[element];
2714 unsigned int event_bits;
2716 if (!IS_CUSTOM_ELEMENT(element))
2718 Error(ERR_WARN, "invalid custom element number %d", element);
2720 element = EL_INTERNAL_DUMMY;
2723 for (j = 0; j < MAX_ELEMENT_NAME_LEN; j++)
2724 ei->description[j] = getFile8Bit(file);
2725 ei->description[MAX_ELEMENT_NAME_LEN] = 0;
2727 ei->properties[EP_BITFIELD_BASE_NR] = getFile32BitBE(file);
2729 /* some free bytes for future properties and padding */
2730 ReadUnusedBytesFromFile(file, 7);
2732 ei->use_gfx_element = getFile8Bit(file);
2733 ei->gfx_element_initial = getMappedElement(getFile16BitBE(file));
2735 ei->collect_score_initial = getFile8Bit(file);
2736 ei->collect_count_initial = getFile8Bit(file);
2738 ei->push_delay_fixed = getFile16BitBE(file);
2739 ei->push_delay_random = getFile16BitBE(file);
2740 ei->move_delay_fixed = getFile16BitBE(file);
2741 ei->move_delay_random = getFile16BitBE(file);
2743 ei->move_pattern = getFile16BitBE(file);
2744 ei->move_direction_initial = getFile8Bit(file);
2745 ei->move_stepsize = getFile8Bit(file);
2747 for (y = 0; y < 3; y++)
2748 for (x = 0; x < 3; x++)
2749 ei->content.e[x][y] = getMappedElement(getFile16BitBE(file));
2751 event_bits = getFile32BitBE(file);
2752 for (j = 0; j < NUM_CHANGE_EVENTS; j++)
2753 if (event_bits & (1 << j))
2754 ei->change->has_event[j] = TRUE;
2756 ei->change->target_element = getMappedElement(getFile16BitBE(file));
2758 ei->change->delay_fixed = getFile16BitBE(file);
2759 ei->change->delay_random = getFile16BitBE(file);
2760 ei->change->delay_frames = getFile16BitBE(file);
2762 ei->change->initial_trigger_element= getMappedElement(getFile16BitBE(file));
2764 ei->change->explode = getFile8Bit(file);
2765 ei->change->use_target_content = getFile8Bit(file);
2766 ei->change->only_if_complete = getFile8Bit(file);
2767 ei->change->use_random_replace = getFile8Bit(file);
2769 ei->change->random_percentage = getFile8Bit(file);
2770 ei->change->replace_when = getFile8Bit(file);
2772 for (y = 0; y < 3; y++)
2773 for (x = 0; x < 3; x++)
2774 ei->change->target_content.e[x][y] =
2775 getMappedElement(getFile16BitBE(file));
2777 ei->slippery_type = getFile8Bit(file);
2779 /* some free bytes for future properties and padding */
2780 ReadUnusedBytesFromFile(file, LEVEL_CPART_CUS3_UNUSED);
2782 /* mark that this custom element has been modified */
2783 ei->modified_settings = TRUE;
2786 level->file_has_custom_elements = TRUE;
2791 static int LoadLevel_CUS4(File *file, int chunk_size, struct LevelInfo *level)
2793 struct ElementInfo *ei;
2794 int chunk_size_expected;
2798 /* ---------- custom element base property values (96 bytes) ------------- */
2800 element = getMappedElement(getFile16BitBE(file));
2802 if (!IS_CUSTOM_ELEMENT(element))
2804 Error(ERR_WARN, "invalid custom element number %d", element);
2806 ReadUnusedBytesFromFile(file, chunk_size - 2);
2810 ei = &element_info[element];
2812 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
2813 ei->description[i] = getFile8Bit(file);
2814 ei->description[MAX_ELEMENT_NAME_LEN] = 0;
2816 ei->properties[EP_BITFIELD_BASE_NR] = getFile32BitBE(file);
2818 ReadUnusedBytesFromFile(file, 4); /* reserved for more base properties */
2820 ei->num_change_pages = getFile8Bit(file);
2822 chunk_size_expected = LEVEL_CHUNK_CUS4_SIZE(ei->num_change_pages);
2823 if (chunk_size_expected != chunk_size)
2825 ReadUnusedBytesFromFile(file, chunk_size - 43);
2826 return chunk_size_expected;
2829 ei->ce_value_fixed_initial = getFile16BitBE(file);
2830 ei->ce_value_random_initial = getFile16BitBE(file);
2831 ei->use_last_ce_value = getFile8Bit(file);
2833 ei->use_gfx_element = getFile8Bit(file);
2834 ei->gfx_element_initial = getMappedElement(getFile16BitBE(file));
2836 ei->collect_score_initial = getFile8Bit(file);
2837 ei->collect_count_initial = getFile8Bit(file);
2839 ei->drop_delay_fixed = getFile8Bit(file);
2840 ei->push_delay_fixed = getFile8Bit(file);
2841 ei->drop_delay_random = getFile8Bit(file);
2842 ei->push_delay_random = getFile8Bit(file);
2843 ei->move_delay_fixed = getFile16BitBE(file);
2844 ei->move_delay_random = getFile16BitBE(file);
2846 /* bits 0 - 15 of "move_pattern" ... */
2847 ei->move_pattern = getFile16BitBE(file);
2848 ei->move_direction_initial = getFile8Bit(file);
2849 ei->move_stepsize = getFile8Bit(file);
2851 ei->slippery_type = getFile8Bit(file);
2853 for (y = 0; y < 3; y++)
2854 for (x = 0; x < 3; x++)
2855 ei->content.e[x][y] = getMappedElement(getFile16BitBE(file));
2857 ei->move_enter_element = getMappedElement(getFile16BitBE(file));
2858 ei->move_leave_element = getMappedElement(getFile16BitBE(file));
2859 ei->move_leave_type = getFile8Bit(file);
2861 /* ... bits 16 - 31 of "move_pattern" (not nice, but downward compatible) */
2862 ei->move_pattern |= (getFile16BitBE(file) << 16);
2864 ei->access_direction = getFile8Bit(file);
2866 ei->explosion_delay = getFile8Bit(file);
2867 ei->ignition_delay = getFile8Bit(file);
2868 ei->explosion_type = getFile8Bit(file);
2870 /* some free bytes for future custom property values and padding */
2871 ReadUnusedBytesFromFile(file, 1);
2873 /* ---------- change page property values (48 bytes) --------------------- */
2875 setElementChangePages(ei, ei->num_change_pages);
2877 for (i = 0; i < ei->num_change_pages; i++)
2879 struct ElementChangeInfo *change = &ei->change_page[i];
2880 unsigned int event_bits;
2882 /* always start with reliable default values */
2883 setElementChangeInfoToDefaults(change);
2885 /* bits 0 - 31 of "has_event[]" ... */
2886 event_bits = getFile32BitBE(file);
2887 for (j = 0; j < MIN(NUM_CHANGE_EVENTS, 32); j++)
2888 if (event_bits & (1 << j))
2889 change->has_event[j] = TRUE;
2891 change->target_element = getMappedElement(getFile16BitBE(file));
2893 change->delay_fixed = getFile16BitBE(file);
2894 change->delay_random = getFile16BitBE(file);
2895 change->delay_frames = getFile16BitBE(file);
2897 change->initial_trigger_element = getMappedElement(getFile16BitBE(file));
2899 change->explode = getFile8Bit(file);
2900 change->use_target_content = getFile8Bit(file);
2901 change->only_if_complete = getFile8Bit(file);
2902 change->use_random_replace = getFile8Bit(file);
2904 change->random_percentage = getFile8Bit(file);
2905 change->replace_when = getFile8Bit(file);
2907 for (y = 0; y < 3; y++)
2908 for (x = 0; x < 3; x++)
2909 change->target_content.e[x][y]= getMappedElement(getFile16BitBE(file));
2911 change->can_change = getFile8Bit(file);
2913 change->trigger_side = getFile8Bit(file);
2915 change->trigger_player = getFile8Bit(file);
2916 change->trigger_page = getFile8Bit(file);
2918 change->trigger_page = (change->trigger_page == CH_PAGE_ANY_FILE ?
2919 CH_PAGE_ANY : (1 << change->trigger_page));
2921 change->has_action = getFile8Bit(file);
2922 change->action_type = getFile8Bit(file);
2923 change->action_mode = getFile8Bit(file);
2924 change->action_arg = getFile16BitBE(file);
2926 /* ... bits 32 - 39 of "has_event[]" (not nice, but downward compatible) */
2927 event_bits = getFile8Bit(file);
2928 for (j = 32; j < NUM_CHANGE_EVENTS; j++)
2929 if (event_bits & (1 << (j - 32)))
2930 change->has_event[j] = TRUE;
2933 /* mark this custom element as modified */
2934 ei->modified_settings = TRUE;
2936 level->file_has_custom_elements = TRUE;
2941 static int LoadLevel_GRP1(File *file, int chunk_size, struct LevelInfo *level)
2943 struct ElementInfo *ei;
2944 struct ElementGroupInfo *group;
2948 element = getMappedElement(getFile16BitBE(file));
2950 if (!IS_GROUP_ELEMENT(element))
2952 Error(ERR_WARN, "invalid group element number %d", element);
2954 ReadUnusedBytesFromFile(file, chunk_size - 2);
2958 ei = &element_info[element];
2960 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
2961 ei->description[i] = getFile8Bit(file);
2962 ei->description[MAX_ELEMENT_NAME_LEN] = 0;
2964 group = element_info[element].group;
2966 group->num_elements = getFile8Bit(file);
2968 ei->use_gfx_element = getFile8Bit(file);
2969 ei->gfx_element_initial = getMappedElement(getFile16BitBE(file));
2971 group->choice_mode = getFile8Bit(file);
2973 /* some free bytes for future values and padding */
2974 ReadUnusedBytesFromFile(file, 3);
2976 for (i = 0; i < MAX_ELEMENTS_IN_GROUP; i++)
2977 group->element[i] = getMappedElement(getFile16BitBE(file));
2979 /* mark this group element as modified */
2980 element_info[element].modified_settings = TRUE;
2982 level->file_has_custom_elements = TRUE;
2987 static int LoadLevel_MicroChunk(File *file, struct LevelFileConfigInfo *conf,
2988 int element, int real_element)
2990 int micro_chunk_size = 0;
2991 int conf_type = getFile8Bit(file);
2992 int byte_mask = conf_type & CONF_MASK_BYTES;
2993 boolean element_found = FALSE;
2996 micro_chunk_size += 1;
2998 if (byte_mask == CONF_MASK_MULTI_BYTES)
3000 int num_bytes = getFile16BitBE(file);
3001 byte *buffer = checked_malloc(num_bytes);
3003 ReadBytesFromFile(file, buffer, num_bytes);
3005 for (i = 0; conf[i].data_type != -1; i++)
3007 if (conf[i].element == element &&
3008 conf[i].conf_type == conf_type)
3010 int data_type = conf[i].data_type;
3011 int num_entities = num_bytes / CONF_ENTITY_NUM_BYTES(data_type);
3012 int max_num_entities = conf[i].max_num_entities;
3014 if (num_entities > max_num_entities)
3017 "truncating number of entities for element %d from %d to %d",
3018 element, num_entities, max_num_entities);
3020 num_entities = max_num_entities;
3023 if (num_entities == 0 && (data_type == TYPE_ELEMENT_LIST ||
3024 data_type == TYPE_CONTENT_LIST))
3026 /* for element and content lists, zero entities are not allowed */
3027 Error(ERR_WARN, "found empty list of entities for element %d",
3030 /* do not set "num_entities" here to prevent reading behind buffer */
3032 *(int *)(conf[i].num_entities) = 1; /* at least one is required */
3036 *(int *)(conf[i].num_entities) = num_entities;
3039 element_found = TRUE;
3041 if (data_type == TYPE_STRING)
3043 char *string = (char *)(conf[i].value);
3046 for (j = 0; j < max_num_entities; j++)
3047 string[j] = (j < num_entities ? buffer[j] : '\0');
3049 else if (data_type == TYPE_ELEMENT_LIST)
3051 int *element_array = (int *)(conf[i].value);
3054 for (j = 0; j < num_entities; j++)
3056 getMappedElement(CONF_ELEMENTS_ELEMENT(buffer, j));
3058 else if (data_type == TYPE_CONTENT_LIST)
3060 struct Content *content= (struct Content *)(conf[i].value);
3063 for (c = 0; c < num_entities; c++)
3064 for (y = 0; y < 3; y++)
3065 for (x = 0; x < 3; x++)
3066 content[c].e[x][y] =
3067 getMappedElement(CONF_CONTENTS_ELEMENT(buffer, c, x, y));
3070 element_found = FALSE;
3076 checked_free(buffer);
3078 micro_chunk_size += 2 + num_bytes;
3080 else /* constant size configuration data (1, 2 or 4 bytes) */
3082 int value = (byte_mask == CONF_MASK_1_BYTE ? getFile8Bit (file) :
3083 byte_mask == CONF_MASK_2_BYTE ? getFile16BitBE(file) :
3084 byte_mask == CONF_MASK_4_BYTE ? getFile32BitBE(file) : 0);
3086 for (i = 0; conf[i].data_type != -1; i++)
3088 if (conf[i].element == element &&
3089 conf[i].conf_type == conf_type)
3091 int data_type = conf[i].data_type;
3093 if (data_type == TYPE_ELEMENT)
3094 value = getMappedElement(value);
3096 if (data_type == TYPE_BOOLEAN)
3097 *(boolean *)(conf[i].value) = value;
3099 *(int *) (conf[i].value) = value;
3101 element_found = TRUE;
3107 micro_chunk_size += CONF_VALUE_NUM_BYTES(byte_mask);
3112 char *error_conf_chunk_bytes =
3113 (byte_mask == CONF_MASK_1_BYTE ? "CONF_VALUE_8_BIT" :
3114 byte_mask == CONF_MASK_2_BYTE ? "CONF_VALUE_16_BIT" :
3115 byte_mask == CONF_MASK_4_BYTE ? "CONF_VALUE_32_BIT" :"CONF_VALUE_BYTES");
3116 int error_conf_chunk_token = conf_type & CONF_MASK_TOKEN;
3117 int error_element = real_element;
3119 Error(ERR_WARN, "cannot load micro chunk '%s(%d)' value for element %d ['%s']",
3120 error_conf_chunk_bytes, error_conf_chunk_token,
3121 error_element, EL_NAME(error_element));
3124 return micro_chunk_size;
3127 static int LoadLevel_INFO(File *file, int chunk_size, struct LevelInfo *level)
3129 int real_chunk_size = 0;
3131 li = *level; /* copy level data into temporary buffer */
3133 while (!checkEndOfFile(file))
3135 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_INFO, -1, -1);
3137 if (real_chunk_size >= chunk_size)
3141 *level = li; /* copy temporary buffer back to level data */
3143 return real_chunk_size;
3146 static int LoadLevel_CONF(File *file, int chunk_size, struct LevelInfo *level)
3148 int real_chunk_size = 0;
3150 li = *level; /* copy level data into temporary buffer */
3152 while (!checkEndOfFile(file))
3154 int element = getMappedElement(getFile16BitBE(file));
3156 real_chunk_size += 2;
3157 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_CONF,
3159 if (real_chunk_size >= chunk_size)
3163 *level = li; /* copy temporary buffer back to level data */
3165 return real_chunk_size;
3168 static int LoadLevel_ELEM(File *file, int chunk_size, struct LevelInfo *level)
3170 int real_chunk_size = 0;
3172 li = *level; /* copy level data into temporary buffer */
3174 while (!checkEndOfFile(file))
3176 int element = getMappedElement(getFile16BitBE(file));
3178 real_chunk_size += 2;
3179 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_ELEM,
3181 if (real_chunk_size >= chunk_size)
3185 *level = li; /* copy temporary buffer back to level data */
3187 return real_chunk_size;
3190 static int LoadLevel_NOTE(File *file, int chunk_size, struct LevelInfo *level)
3192 int element = getMappedElement(getFile16BitBE(file));
3193 int envelope_nr = element - EL_ENVELOPE_1;
3194 int real_chunk_size = 2;
3196 xx_envelope = level->envelope[envelope_nr]; /* copy into temporary buffer */
3198 while (!checkEndOfFile(file))
3200 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_NOTE,
3203 if (real_chunk_size >= chunk_size)
3207 level->envelope[envelope_nr] = xx_envelope; /* copy from temporary buffer */
3209 return real_chunk_size;
3212 static int LoadLevel_CUSX(File *file, int chunk_size, struct LevelInfo *level)
3214 int element = getMappedElement(getFile16BitBE(file));
3215 int real_chunk_size = 2;
3216 struct ElementInfo *ei = &element_info[element];
3219 xx_ei = *ei; /* copy element data into temporary buffer */
3221 xx_ei.num_change_pages = -1;
3223 while (!checkEndOfFile(file))
3225 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_CUSX_base,
3227 if (xx_ei.num_change_pages != -1)
3230 if (real_chunk_size >= chunk_size)
3236 if (ei->num_change_pages == -1)
3238 Error(ERR_WARN, "LoadLevel_CUSX(): missing 'num_change_pages' for '%s'",
3241 ei->num_change_pages = 1;
3243 setElementChangePages(ei, 1);
3244 setElementChangeInfoToDefaults(ei->change);
3246 return real_chunk_size;
3249 /* initialize number of change pages stored for this custom element */
3250 setElementChangePages(ei, ei->num_change_pages);
3251 for (i = 0; i < ei->num_change_pages; i++)
3252 setElementChangeInfoToDefaults(&ei->change_page[i]);
3254 /* start with reading properties for the first change page */
3255 xx_current_change_page = 0;
3257 while (!checkEndOfFile(file))
3259 struct ElementChangeInfo *change = &ei->change_page[xx_current_change_page];
3261 xx_change = *change; /* copy change data into temporary buffer */
3263 resetEventBits(); /* reset bits; change page might have changed */
3265 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_CUSX_change,
3268 *change = xx_change;
3270 setEventFlagsFromEventBits(change);
3272 if (real_chunk_size >= chunk_size)
3276 level->file_has_custom_elements = TRUE;
3278 return real_chunk_size;
3281 static int LoadLevel_GRPX(File *file, int chunk_size, struct LevelInfo *level)
3283 int element = getMappedElement(getFile16BitBE(file));
3284 int real_chunk_size = 2;
3285 struct ElementInfo *ei = &element_info[element];
3286 struct ElementGroupInfo *group = ei->group;
3288 xx_ei = *ei; /* copy element data into temporary buffer */
3289 xx_group = *group; /* copy group data into temporary buffer */
3291 while (!checkEndOfFile(file))
3293 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_GRPX,
3296 if (real_chunk_size >= chunk_size)
3303 level->file_has_custom_elements = TRUE;
3305 return real_chunk_size;
3308 static void LoadLevelFromFileInfo_RND(struct LevelInfo *level,
3309 struct LevelFileInfo *level_file_info,
3310 boolean level_info_only)
3312 char *filename = level_file_info->filename;
3313 char cookie[MAX_LINE_LEN];
3314 char chunk_name[CHUNK_ID_LEN + 1];
3318 if (!(file = openFile(filename, MODE_READ)))
3320 level->no_valid_file = TRUE;
3321 level->no_level_file = TRUE;
3323 if (level_info_only)
3326 Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
3328 if (!setup.editor.use_template_for_new_levels)
3331 /* if level file not found, try to initialize level data from template */
3332 filename = getGlobalLevelTemplateFilename();
3334 if (!(file = openFile(filename, MODE_READ)))
3337 /* default: for empty levels, use level template for custom elements */
3338 level->use_custom_template = TRUE;
3340 level->no_valid_file = FALSE;
3343 getFileChunkBE(file, chunk_name, NULL);
3344 if (strEqual(chunk_name, "RND1"))
3346 getFile32BitBE(file); /* not used */
3348 getFileChunkBE(file, chunk_name, NULL);
3349 if (!strEqual(chunk_name, "CAVE"))
3351 level->no_valid_file = TRUE;
3353 Error(ERR_WARN, "unknown format of level file '%s'", filename);
3360 else /* check for pre-2.0 file format with cookie string */
3362 strcpy(cookie, chunk_name);
3363 if (getStringFromFile(file, &cookie[4], MAX_LINE_LEN - 4) == NULL)
3365 if (strlen(cookie) > 0 && cookie[strlen(cookie) - 1] == '\n')
3366 cookie[strlen(cookie) - 1] = '\0';
3368 if (!checkCookieString(cookie, LEVEL_COOKIE_TMPL))
3370 level->no_valid_file = TRUE;
3372 Error(ERR_WARN, "unknown format of level file '%s'", filename);
3379 if ((level->file_version = getFileVersionFromCookieString(cookie)) == -1)
3381 level->no_valid_file = TRUE;
3383 Error(ERR_WARN, "unsupported version of level file '%s'", filename);
3390 /* pre-2.0 level files have no game version, so use file version here */
3391 level->game_version = level->file_version;
3394 if (level->file_version < FILE_VERSION_1_2)
3396 /* level files from versions before 1.2.0 without chunk structure */
3397 LoadLevel_HEAD(file, LEVEL_CHUNK_HEAD_SIZE, level);
3398 LoadLevel_BODY(file, level->fieldx * level->fieldy, level);
3406 int (*loader)(File *, int, struct LevelInfo *);
3410 { "VERS", LEVEL_CHUNK_VERS_SIZE, LoadLevel_VERS },
3411 { "DATE", LEVEL_CHUNK_DATE_SIZE, LoadLevel_DATE },
3412 { "HEAD", LEVEL_CHUNK_HEAD_SIZE, LoadLevel_HEAD },
3413 { "NAME", LEVEL_CHUNK_NAME_SIZE, LoadLevel_NAME },
3414 { "AUTH", LEVEL_CHUNK_AUTH_SIZE, LoadLevel_AUTH },
3415 { "INFO", -1, LoadLevel_INFO },
3416 { "BODY", -1, LoadLevel_BODY },
3417 { "CONT", -1, LoadLevel_CONT },
3418 { "CNT2", LEVEL_CHUNK_CNT2_SIZE, LoadLevel_CNT2 },
3419 { "CNT3", -1, LoadLevel_CNT3 },
3420 { "CUS1", -1, LoadLevel_CUS1 },
3421 { "CUS2", -1, LoadLevel_CUS2 },
3422 { "CUS3", -1, LoadLevel_CUS3 },
3423 { "CUS4", -1, LoadLevel_CUS4 },
3424 { "GRP1", -1, LoadLevel_GRP1 },
3425 { "CONF", -1, LoadLevel_CONF },
3426 { "ELEM", -1, LoadLevel_ELEM },
3427 { "NOTE", -1, LoadLevel_NOTE },
3428 { "CUSX", -1, LoadLevel_CUSX },
3429 { "GRPX", -1, LoadLevel_GRPX },
3434 while (getFileChunkBE(file, chunk_name, &chunk_size))
3438 while (chunk_info[i].name != NULL &&
3439 !strEqual(chunk_name, chunk_info[i].name))
3442 if (chunk_info[i].name == NULL)
3444 Error(ERR_WARN, "unknown chunk '%s' in level file '%s'",
3445 chunk_name, filename);
3446 ReadUnusedBytesFromFile(file, chunk_size);
3448 else if (chunk_info[i].size != -1 &&
3449 chunk_info[i].size != chunk_size)
3451 Error(ERR_WARN, "wrong size (%d) of chunk '%s' in level file '%s'",
3452 chunk_size, chunk_name, filename);
3453 ReadUnusedBytesFromFile(file, chunk_size);
3457 /* call function to load this level chunk */
3458 int chunk_size_expected =
3459 (chunk_info[i].loader)(file, chunk_size, level);
3461 /* the size of some chunks cannot be checked before reading other
3462 chunks first (like "HEAD" and "BODY") that contain some header
3463 information, so check them here */
3464 if (chunk_size_expected != chunk_size)
3466 Error(ERR_WARN, "wrong size (%d) of chunk '%s' in level file '%s'",
3467 chunk_size, chunk_name, filename);
3477 /* ------------------------------------------------------------------------- */
3478 /* functions for loading EM level */
3479 /* ------------------------------------------------------------------------- */
3481 void CopyNativeLevel_RND_to_EM(struct LevelInfo *level)
3483 static int ball_xy[8][2] =
3494 struct LevelInfo_EM *level_em = level->native_em_level;
3495 struct LEVEL *lev = level_em->lev;
3496 struct PLAYER **ply = level_em->ply;
3499 lev->width = MIN(level->fieldx, EM_MAX_CAVE_WIDTH);
3500 lev->height = MIN(level->fieldy, EM_MAX_CAVE_HEIGHT);
3502 lev->time_seconds = level->time;
3503 lev->required_initial = level->gems_needed;
3505 lev->emerald_score = level->score[SC_EMERALD];
3506 lev->diamond_score = level->score[SC_DIAMOND];
3507 lev->alien_score = level->score[SC_ROBOT];
3508 lev->tank_score = level->score[SC_SPACESHIP];
3509 lev->bug_score = level->score[SC_BUG];
3510 lev->eater_score = level->score[SC_YAMYAM];
3511 lev->nut_score = level->score[SC_NUT];
3512 lev->dynamite_score = level->score[SC_DYNAMITE];
3513 lev->key_score = level->score[SC_KEY];
3514 lev->exit_score = level->score[SC_TIME_BONUS];
3516 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
3517 for (y = 0; y < 3; y++)
3518 for (x = 0; x < 3; x++)
3519 lev->eater_array[i][y * 3 + x] =
3520 map_element_RND_to_EM(level->yamyam_content[i].e[x][y]);
3522 lev->amoeba_time = level->amoeba_speed;
3523 lev->wonderwall_time_initial = level->time_magic_wall;
3524 lev->wheel_time = level->time_wheel;
3526 lev->android_move_time = level->android_move_time;
3527 lev->android_clone_time = level->android_clone_time;
3528 lev->ball_random = level->ball_random;
3529 lev->ball_state_initial = level->ball_state_initial;
3530 lev->ball_time = level->ball_time;
3531 lev->num_ball_arrays = level->num_ball_contents;
3533 lev->lenses_score = level->lenses_score;
3534 lev->magnify_score = level->magnify_score;
3535 lev->slurp_score = level->slurp_score;
3537 lev->lenses_time = level->lenses_time;
3538 lev->magnify_time = level->magnify_time;
3540 lev->wind_direction_initial =
3541 map_direction_RND_to_EM(level->wind_direction_initial);
3542 lev->wind_cnt_initial = (level->wind_direction_initial != MV_NONE ?
3543 lev->wind_time : 0);
3545 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
3546 for (j = 0; j < 8; j++)
3547 lev->ball_array[i][j] =
3548 map_element_RND_to_EM(level->
3549 ball_content[i].e[ball_xy[j][0]][ball_xy[j][1]]);
3551 map_android_clone_elements_RND_to_EM(level);
3553 /* first fill the complete playfield with the default border element */
3554 for (y = 0; y < EM_MAX_CAVE_HEIGHT; y++)
3555 for (x = 0; x < EM_MAX_CAVE_WIDTH; x++)
3556 level_em->cave[x][y] = ZBORDER;
3558 if (BorderElement == EL_STEELWALL)
3560 for (y = 0; y < lev->height + 2; y++)
3561 for (x = 0; x < lev->width + 2; x++)
3562 level_em->cave[x + 1][y + 1] = map_element_RND_to_EM(EL_STEELWALL);
3565 /* then copy the real level contents from level file into the playfield */
3566 for (y = 0; y < lev->height; y++) for (x = 0; x < lev->width; x++)
3568 int new_element = map_element_RND_to_EM(level->field[x][y]);
3569 int offset = (BorderElement == EL_STEELWALL ? 1 : 0);
3570 int xx = x + 1 + offset;
3571 int yy = y + 1 + offset;
3573 if (level->field[x][y] == EL_AMOEBA_DEAD)
3574 new_element = map_element_RND_to_EM(EL_AMOEBA_WET);
3576 level_em->cave[xx][yy] = new_element;
3579 for (i = 0; i < MAX_PLAYERS; i++)
3581 ply[i]->x_initial = 0;
3582 ply[i]->y_initial = 0;
3585 /* initialize player positions and delete players from the playfield */
3586 for (y = 0; y < lev->height; y++) for (x = 0; x < lev->width; x++)
3588 if (ELEM_IS_PLAYER(level->field[x][y]))
3590 int player_nr = GET_PLAYER_NR(level->field[x][y]);
3591 int offset = (BorderElement == EL_STEELWALL ? 1 : 0);
3592 int xx = x + 1 + offset;
3593 int yy = y + 1 + offset;
3595 ply[player_nr]->x_initial = xx;
3596 ply[player_nr]->y_initial = yy;
3598 level_em->cave[xx][yy] = map_element_RND_to_EM(EL_EMPTY);
3602 if (BorderElement == EL_STEELWALL)
3609 void CopyNativeLevel_EM_to_RND(struct LevelInfo *level)
3611 static int ball_xy[8][2] =
3622 struct LevelInfo_EM *level_em = level->native_em_level;
3623 struct LEVEL *lev = level_em->lev;
3624 struct PLAYER **ply = level_em->ply;
3627 level->fieldx = MIN(lev->width, MAX_LEV_FIELDX);
3628 level->fieldy = MIN(lev->height, MAX_LEV_FIELDY);
3630 level->time = lev->time_seconds;
3631 level->gems_needed = lev->required_initial;
3633 sprintf(level->name, "Level %d", level->file_info.nr);
3635 level->score[SC_EMERALD] = lev->emerald_score;
3636 level->score[SC_DIAMOND] = lev->diamond_score;
3637 level->score[SC_ROBOT] = lev->alien_score;
3638 level->score[SC_SPACESHIP] = lev->tank_score;
3639 level->score[SC_BUG] = lev->bug_score;
3640 level->score[SC_YAMYAM] = lev->eater_score;
3641 level->score[SC_NUT] = lev->nut_score;
3642 level->score[SC_DYNAMITE] = lev->dynamite_score;
3643 level->score[SC_KEY] = lev->key_score;
3644 level->score[SC_TIME_BONUS] = lev->exit_score;
3646 level->num_yamyam_contents = MAX_ELEMENT_CONTENTS;
3648 for (i = 0; i < level->num_yamyam_contents; i++)
3649 for (y = 0; y < 3; y++)
3650 for (x = 0; x < 3; x++)
3651 level->yamyam_content[i].e[x][y] =
3652 map_element_EM_to_RND(lev->eater_array[i][y * 3 + x]);
3654 level->amoeba_speed = lev->amoeba_time;
3655 level->time_magic_wall = lev->wonderwall_time_initial;
3656 level->time_wheel = lev->wheel_time;
3658 level->android_move_time = lev->android_move_time;
3659 level->android_clone_time = lev->android_clone_time;
3660 level->ball_random = lev->ball_random;
3661 level->ball_state_initial = lev->ball_state_initial;
3662 level->ball_time = lev->ball_time;
3663 level->num_ball_contents = lev->num_ball_arrays;
3665 level->lenses_score = lev->lenses_score;
3666 level->magnify_score = lev->magnify_score;
3667 level->slurp_score = lev->slurp_score;
3669 level->lenses_time = lev->lenses_time;
3670 level->magnify_time = lev->magnify_time;
3672 level->wind_direction_initial =
3673 map_direction_EM_to_RND(lev->wind_direction_initial);
3675 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
3676 for (j = 0; j < 8; j++)
3677 level->ball_content[i].e[ball_xy[j][0]][ball_xy[j][1]] =
3678 map_element_EM_to_RND(lev->ball_array[i][j]);
3680 map_android_clone_elements_EM_to_RND(level);
3682 /* convert the playfield (some elements need special treatment) */
3683 for (y = 0; y < level->fieldy; y++) for (x = 0; x < level->fieldx; x++)
3685 int new_element = map_element_EM_to_RND(level_em->cave[x + 1][y + 1]);
3687 if (new_element == EL_AMOEBA_WET && level->amoeba_speed == 0)
3688 new_element = EL_AMOEBA_DEAD;
3690 level->field[x][y] = new_element;
3693 for (i = 0; i < MAX_PLAYERS; i++)
3695 /* in case of all players set to the same field, use the first player */
3696 int nr = MAX_PLAYERS - i - 1;
3697 int jx = ply[nr]->x_initial - 1;
3698 int jy = ply[nr]->y_initial - 1;
3700 if (jx != -1 && jy != -1)
3701 level->field[jx][jy] = EL_PLAYER_1 + nr;
3706 /* ------------------------------------------------------------------------- */
3707 /* functions for loading SP level */
3708 /* ------------------------------------------------------------------------- */
3710 void CopyNativeLevel_RND_to_SP(struct LevelInfo *level)
3712 struct LevelInfo_SP *level_sp = level->native_sp_level;
3713 LevelInfoType *header = &level_sp->header;
3716 level_sp->width = level->fieldx;
3717 level_sp->height = level->fieldy;
3719 for (x = 0; x < level->fieldx; x++)
3720 for (y = 0; y < level->fieldy; y++)
3721 level_sp->playfield[x][y] = map_element_RND_to_SP(level->field[x][y]);
3723 header->InitialGravity = (level->initial_player_gravity[0] ? 1 : 0);
3725 for (i = 0; i < SP_LEVEL_NAME_LEN; i++)
3726 header->LevelTitle[i] = level->name[i];
3727 /* !!! NO STRING TERMINATION IN SUPAPLEX VB CODE YET -- FIX THIS !!! */
3729 header->InfotronsNeeded = level->gems_needed;
3731 header->SpecialPortCount = 0;
3733 for (x = 0; x < level->fieldx; x++) for (y = 0; y < level->fieldy; y++)
3735 boolean gravity_port_found = FALSE;
3736 boolean gravity_port_valid = FALSE;
3737 int gravity_port_flag;
3738 int gravity_port_base_element;
3739 int element = level->field[x][y];
3741 if (element >= EL_SP_GRAVITY_ON_PORT_RIGHT &&
3742 element <= EL_SP_GRAVITY_ON_PORT_UP)
3744 gravity_port_found = TRUE;
3745 gravity_port_valid = TRUE;
3746 gravity_port_flag = 1;
3747 gravity_port_base_element = EL_SP_GRAVITY_ON_PORT_RIGHT;
3749 else if (element >= EL_SP_GRAVITY_OFF_PORT_RIGHT &&
3750 element <= EL_SP_GRAVITY_OFF_PORT_UP)
3752 gravity_port_found = TRUE;
3753 gravity_port_valid = TRUE;
3754 gravity_port_flag = 0;
3755 gravity_port_base_element = EL_SP_GRAVITY_OFF_PORT_RIGHT;
3757 else if (element >= EL_SP_GRAVITY_PORT_RIGHT &&
3758 element <= EL_SP_GRAVITY_PORT_UP)
3760 /* change R'n'D style gravity inverting special port to normal port
3761 (there are no gravity inverting ports in native Supaplex engine) */
3763 gravity_port_found = TRUE;
3764 gravity_port_valid = FALSE;
3765 gravity_port_base_element = EL_SP_GRAVITY_PORT_RIGHT;
3768 if (gravity_port_found)
3770 if (gravity_port_valid &&
3771 header->SpecialPortCount < SP_MAX_SPECIAL_PORTS)
3773 SpecialPortType *port = &header->SpecialPort[header->SpecialPortCount];
3775 port->PortLocation = (y * level->fieldx + x) * 2;
3776 port->Gravity = gravity_port_flag;
3778 element += EL_SP_GRAVITY_PORT_RIGHT - gravity_port_base_element;
3780 header->SpecialPortCount++;
3784 /* change special gravity port to normal port */
3786 element += EL_SP_PORT_RIGHT - gravity_port_base_element;
3789 level_sp->playfield[x][y] = element - EL_SP_START;
3794 void CopyNativeLevel_SP_to_RND(struct LevelInfo *level)
3796 struct LevelInfo_SP *level_sp = level->native_sp_level;
3797 LevelInfoType *header = &level_sp->header;
3798 boolean num_invalid_elements = 0;
3801 level->fieldx = level_sp->width;
3802 level->fieldy = level_sp->height;
3804 for (x = 0; x < level->fieldx; x++)
3806 for (y = 0; y < level->fieldy; y++)
3808 int element_old = level_sp->playfield[x][y];
3809 int element_new = getMappedElement(map_element_SP_to_RND(element_old));
3811 if (element_new == EL_UNKNOWN)
3813 num_invalid_elements++;
3815 Error(ERR_DEBUG, "invalid element %d at position %d, %d",
3819 level->field[x][y] = element_new;
3823 if (num_invalid_elements > 0)
3824 Error(ERR_WARN, "found %d invalid elements%s", num_invalid_elements,
3825 (!options.debug ? " (use '--debug' for more details)" : ""));
3827 for (i = 0; i < MAX_PLAYERS; i++)
3828 level->initial_player_gravity[i] =
3829 (header->InitialGravity == 1 ? TRUE : FALSE);
3831 /* skip leading spaces */
3832 for (i = 0; i < SP_LEVEL_NAME_LEN; i++)
3833 if (header->LevelTitle[i] != ' ')
3836 /* copy level title */
3837 for (j = 0; i < SP_LEVEL_NAME_LEN; i++, j++)
3838 level->name[j] = header->LevelTitle[i];
3839 level->name[j] = '\0';
3841 /* cut trailing spaces */
3843 if (level->name[j - 1] == ' ' && level->name[j] == '\0')
3844 level->name[j - 1] = '\0';
3846 level->gems_needed = header->InfotronsNeeded;
3848 for (i = 0; i < header->SpecialPortCount; i++)
3850 SpecialPortType *port = &header->SpecialPort[i];
3851 int port_location = port->PortLocation;
3852 int gravity = port->Gravity;
3853 int port_x, port_y, port_element;
3855 port_x = (port_location / 2) % level->fieldx;
3856 port_y = (port_location / 2) / level->fieldx;
3858 if (port_x < 0 || port_x >= level->fieldx ||
3859 port_y < 0 || port_y >= level->fieldy)
3861 Error(ERR_WARN, "special port position (%d, %d) out of bounds",
3867 port_element = level->field[port_x][port_y];
3869 if (port_element < EL_SP_GRAVITY_PORT_RIGHT ||
3870 port_element > EL_SP_GRAVITY_PORT_UP)
3872 Error(ERR_WARN, "no special port at position (%d, %d)", port_x, port_y);
3877 /* change previous (wrong) gravity inverting special port to either
3878 gravity enabling special port or gravity disabling special port */
3879 level->field[port_x][port_y] +=
3880 (gravity == 1 ? EL_SP_GRAVITY_ON_PORT_RIGHT :
3881 EL_SP_GRAVITY_OFF_PORT_RIGHT) - EL_SP_GRAVITY_PORT_RIGHT;
3884 /* change special gravity ports without database entries to normal ports */
3885 for (x = 0; x < level->fieldx; x++)
3886 for (y = 0; y < level->fieldy; y++)
3887 if (level->field[x][y] >= EL_SP_GRAVITY_PORT_RIGHT &&
3888 level->field[x][y] <= EL_SP_GRAVITY_PORT_UP)
3889 level->field[x][y] += EL_SP_PORT_RIGHT - EL_SP_GRAVITY_PORT_RIGHT;
3891 level->time = 0; /* no time limit */
3892 level->amoeba_speed = 0;
3893 level->time_magic_wall = 0;
3894 level->time_wheel = 0;
3895 level->amoeba_content = EL_EMPTY;
3898 /* original Supaplex does not use score values -- use default values */
3900 for (i = 0; i < LEVEL_SCORE_ELEMENTS; i++)
3901 level->score[i] = 0;
3904 /* there are no yamyams in supaplex levels */
3905 for (i = 0; i < level->num_yamyam_contents; i++)
3906 for (x = 0; x < 3; x++)
3907 for (y = 0; y < 3; y++)
3908 level->yamyam_content[i].e[x][y] = EL_EMPTY;
3911 static void CopyNativeTape_RND_to_SP(struct LevelInfo *level)
3913 struct LevelInfo_SP *level_sp = level->native_sp_level;
3914 struct DemoInfo_SP *demo = &level_sp->demo;
3917 /* always start with reliable default values */
3918 demo->is_available = FALSE;
3921 if (TAPE_IS_EMPTY(tape))
3924 demo->level_nr = tape.level_nr; /* (currently not used) */
3926 level_sp->header.DemoRandomSeed = tape.random_seed;
3930 for (i = 0; i < tape.length; i++)
3932 int demo_action = map_key_RND_to_SP(tape.pos[i].action[0]);
3933 int demo_repeat = tape.pos[i].delay;
3934 int demo_entries = (demo_repeat + 15) / 16;
3936 if (demo->length + demo_entries >= SP_MAX_TAPE_LEN)
3938 Error(ERR_WARN, "tape truncated: size exceeds maximum SP demo size %d",
3944 for (j = 0; j < demo_repeat / 16; j++)
3945 demo->data[demo->length++] = 0xf0 | demo_action;
3947 if (demo_repeat % 16)
3948 demo->data[demo->length++] = ((demo_repeat % 16 - 1) << 4) | demo_action;
3951 demo->is_available = TRUE;
3954 static void setTapeInfoToDefaults();
3956 static void CopyNativeTape_SP_to_RND(struct LevelInfo *level)
3958 struct LevelInfo_SP *level_sp = level->native_sp_level;
3959 struct DemoInfo_SP *demo = &level_sp->demo;
3960 char *filename = level->file_info.filename;
3963 /* always start with reliable default values */
3964 setTapeInfoToDefaults();
3966 if (!demo->is_available)
3969 tape.level_nr = demo->level_nr; /* (currently not used) */
3970 tape.random_seed = level_sp->header.DemoRandomSeed;
3972 TapeSetDateFromEpochSeconds(getFileTimestampEpochSeconds(filename));
3975 tape.pos[tape.counter].delay = 0;
3977 for (i = 0; i < demo->length; i++)
3979 int demo_action = demo->data[i] & 0x0f;
3980 int demo_repeat = (demo->data[i] & 0xf0) >> 4;
3981 int tape_action = map_key_SP_to_RND(demo_action);
3982 int tape_repeat = demo_repeat + 1;
3983 byte action[MAX_PLAYERS] = { tape_action, 0, 0, 0 };
3984 boolean success = 0;
3987 for (j = 0; j < tape_repeat; j++)
3988 success = TapeAddAction(action);
3992 Error(ERR_WARN, "SP demo truncated: size exceeds maximum tape size %d",
3999 TapeHaltRecording();
4003 /* ------------------------------------------------------------------------- */
4004 /* functions for loading MM level */
4005 /* ------------------------------------------------------------------------- */
4007 void CopyNativeLevel_RND_to_MM(struct LevelInfo *level)
4009 struct LevelInfo_MM *level_mm = level->native_mm_level;
4012 level_mm->fieldx = MIN(level->fieldx, MM_MAX_PLAYFIELD_WIDTH);
4013 level_mm->fieldy = MIN(level->fieldy, MM_MAX_PLAYFIELD_HEIGHT);
4015 level_mm->time = level->time;
4016 level_mm->kettles_needed = level->gems_needed;
4017 level_mm->auto_count_kettles = level->auto_count_gems;
4019 level_mm->laser_red = level->mm_laser_red;
4020 level_mm->laser_green = level->mm_laser_green;
4021 level_mm->laser_blue = level->mm_laser_blue;
4023 strcpy(level_mm->name, level->name);
4024 strcpy(level_mm->author, level->author);
4026 level_mm->score[SC_EMERALD] = level->score[SC_EMERALD];
4027 level_mm->score[SC_PACMAN] = level->score[SC_PACMAN];
4028 level_mm->score[SC_KEY] = level->score[SC_KEY];
4029 level_mm->score[SC_TIME_BONUS] = level->score[SC_TIME_BONUS];
4030 level_mm->score[SC_ELEM_BONUS] = level->score[SC_ELEM_BONUS];
4032 level_mm->amoeba_speed = level->amoeba_speed;
4033 level_mm->time_fuse = level->mm_time_fuse;
4034 level_mm->time_bomb = level->mm_time_bomb;
4035 level_mm->time_ball = level->mm_time_ball;
4036 level_mm->time_block = level->mm_time_block;
4038 for (x = 0; x < level->fieldx; x++)
4039 for (y = 0; y < level->fieldy; y++)
4041 level_mm->field[x][y] = map_element_RND_to_MM(level->field[x][y]);
4044 void CopyNativeLevel_MM_to_RND(struct LevelInfo *level)
4046 struct LevelInfo_MM *level_mm = level->native_mm_level;
4049 level->fieldx = MIN(level_mm->fieldx, MAX_LEV_FIELDX);
4050 level->fieldy = MIN(level_mm->fieldy, MAX_LEV_FIELDY);
4052 level->time = level_mm->time;
4053 level->gems_needed = level_mm->kettles_needed;
4054 level->auto_count_gems = level_mm->auto_count_kettles;
4056 level->mm_laser_red = level_mm->laser_red;
4057 level->mm_laser_green = level_mm->laser_green;
4058 level->mm_laser_blue = level_mm->laser_blue;
4060 strcpy(level->name, level_mm->name);
4062 /* only overwrite author from 'levelinfo.conf' if author defined in level */
4063 if (!strEqual(level_mm->author, ANONYMOUS_NAME))
4064 strcpy(level->author, level_mm->author);
4066 level->score[SC_EMERALD] = level_mm->score[SC_EMERALD];
4067 level->score[SC_PACMAN] = level_mm->score[SC_PACMAN];
4068 level->score[SC_KEY] = level_mm->score[SC_KEY];
4069 level->score[SC_TIME_BONUS] = level_mm->score[SC_TIME_BONUS];
4070 level->score[SC_ELEM_BONUS] = level_mm->score[SC_ELEM_BONUS];
4072 level->amoeba_speed = level_mm->amoeba_speed;
4073 level->mm_time_fuse = level_mm->time_fuse;
4074 level->mm_time_bomb = level_mm->time_bomb;
4075 level->mm_time_ball = level_mm->time_ball;
4076 level->mm_time_block = level_mm->time_block;
4078 for (x = 0; x < level->fieldx; x++)
4079 for (y = 0; y < level->fieldy; y++)
4080 level->field[x][y] = map_element_MM_to_RND(level_mm->field[x][y]);
4084 /* ------------------------------------------------------------------------- */
4085 /* functions for loading DC level */
4086 /* ------------------------------------------------------------------------- */
4088 #define DC_LEVEL_HEADER_SIZE 344
4090 unsigned short getDecodedWord_DC(unsigned short data_encoded, boolean init)
4092 static int last_data_encoded;
4096 int diff_hi, diff_lo;
4097 int data_hi, data_lo;
4098 unsigned short data_decoded;
4102 last_data_encoded = 0;
4109 diff = data_encoded - last_data_encoded;
4110 diff_hi = diff & ~0xff;
4111 diff_lo = diff & 0xff;
4115 data_hi = diff_hi - (offset1 << 8) + (offset2 & 0xff00);
4116 data_lo = (diff_lo + (data_hi >> 16)) & 0x00ff;
4117 data_hi = data_hi & 0xff00;
4119 data_decoded = data_hi | data_lo;
4121 last_data_encoded = data_encoded;
4123 offset1 = (offset1 + 1) % 31;
4124 offset2 = offset2 & 0xff;
4126 return data_decoded;
4129 int getMappedElement_DC(int element)
4137 /* 0x0117 - 0x036e: (?) */
4140 /* 0x042d - 0x0684: (?) */
4156 element = EL_CRYSTAL;
4159 case 0x0e77: /* quicksand (boulder) */
4160 element = EL_QUICKSAND_FAST_FULL;
4163 case 0x0e99: /* slow quicksand (boulder) */
4164 element = EL_QUICKSAND_FULL;
4168 element = EL_EM_EXIT_OPEN;
4172 element = EL_EM_EXIT_CLOSED;
4176 element = EL_EM_STEEL_EXIT_OPEN;
4180 element = EL_EM_STEEL_EXIT_CLOSED;
4183 case 0x0f4f: /* dynamite (lit 1) */
4184 element = EL_EM_DYNAMITE_ACTIVE;
4187 case 0x0f57: /* dynamite (lit 2) */
4188 element = EL_EM_DYNAMITE_ACTIVE;
4191 case 0x0f5f: /* dynamite (lit 3) */
4192 element = EL_EM_DYNAMITE_ACTIVE;
4195 case 0x0f67: /* dynamite (lit 4) */
4196 element = EL_EM_DYNAMITE_ACTIVE;
4203 element = EL_AMOEBA_WET;
4207 element = EL_AMOEBA_DROP;
4211 element = EL_DC_MAGIC_WALL;
4215 element = EL_SPACESHIP_UP;
4219 element = EL_SPACESHIP_DOWN;
4223 element = EL_SPACESHIP_LEFT;
4227 element = EL_SPACESHIP_RIGHT;
4231 element = EL_BUG_UP;
4235 element = EL_BUG_DOWN;
4239 element = EL_BUG_LEFT;
4243 element = EL_BUG_RIGHT;
4247 element = EL_MOLE_UP;
4251 element = EL_MOLE_DOWN;
4255 element = EL_MOLE_LEFT;
4259 element = EL_MOLE_RIGHT;
4267 element = EL_YAMYAM;
4271 element = EL_SWITCHGATE_OPEN;
4275 element = EL_SWITCHGATE_CLOSED;
4279 element = EL_DC_SWITCHGATE_SWITCH_UP;
4283 element = EL_TIMEGATE_CLOSED;
4286 case 0x144c: /* conveyor belt switch (green) */
4287 element = EL_CONVEYOR_BELT_3_SWITCH_MIDDLE;
4290 case 0x144f: /* conveyor belt switch (red) */
4291 element = EL_CONVEYOR_BELT_1_SWITCH_MIDDLE;
4294 case 0x1452: /* conveyor belt switch (blue) */
4295 element = EL_CONVEYOR_BELT_4_SWITCH_MIDDLE;
4299 element = EL_CONVEYOR_BELT_3_MIDDLE;
4303 element = EL_CONVEYOR_BELT_3_LEFT;
4307 element = EL_CONVEYOR_BELT_3_RIGHT;
4311 element = EL_CONVEYOR_BELT_1_MIDDLE;
4315 element = EL_CONVEYOR_BELT_1_LEFT;
4319 element = EL_CONVEYOR_BELT_1_RIGHT;
4323 element = EL_CONVEYOR_BELT_4_MIDDLE;
4327 element = EL_CONVEYOR_BELT_4_LEFT;
4331 element = EL_CONVEYOR_BELT_4_RIGHT;
4335 element = EL_EXPANDABLE_WALL_HORIZONTAL;
4339 element = EL_EXPANDABLE_WALL_VERTICAL;
4343 element = EL_EXPANDABLE_WALL_ANY;
4346 case 0x14ce: /* growing steel wall (left/right) */
4347 element = EL_EXPANDABLE_STEELWALL_HORIZONTAL;
4350 case 0x14df: /* growing steel wall (up/down) */
4351 element = EL_EXPANDABLE_STEELWALL_VERTICAL;
4354 case 0x14e8: /* growing steel wall (up/down/left/right) */
4355 element = EL_EXPANDABLE_STEELWALL_ANY;
4359 element = EL_SHIELD_DEADLY;
4363 element = EL_EXTRA_TIME;
4371 element = EL_EMPTY_SPACE;
4374 case 0x1578: /* quicksand (empty) */
4375 element = EL_QUICKSAND_FAST_EMPTY;
4378 case 0x1579: /* slow quicksand (empty) */
4379 element = EL_QUICKSAND_EMPTY;
4382 /* 0x157c - 0x158b: */
4385 /* 0x1590 - 0x159f: */
4386 /* EL_DC_LANDMINE */
4389 element = EL_EM_DYNAMITE;
4392 case 0x15a1: /* key (red) */
4393 element = EL_EM_KEY_1;
4396 case 0x15a2: /* key (yellow) */
4397 element = EL_EM_KEY_2;
4400 case 0x15a3: /* key (blue) */
4401 element = EL_EM_KEY_4;
4404 case 0x15a4: /* key (green) */
4405 element = EL_EM_KEY_3;
4408 case 0x15a5: /* key (white) */
4409 element = EL_DC_KEY_WHITE;
4413 element = EL_WALL_SLIPPERY;
4420 case 0x15a8: /* wall (not round) */
4424 case 0x15a9: /* (blue) */
4425 element = EL_CHAR_A;
4428 case 0x15aa: /* (blue) */
4429 element = EL_CHAR_B;
4432 case 0x15ab: /* (blue) */
4433 element = EL_CHAR_C;
4436 case 0x15ac: /* (blue) */
4437 element = EL_CHAR_D;
4440 case 0x15ad: /* (blue) */
4441 element = EL_CHAR_E;
4444 case 0x15ae: /* (blue) */
4445 element = EL_CHAR_F;
4448 case 0x15af: /* (blue) */
4449 element = EL_CHAR_G;
4452 case 0x15b0: /* (blue) */
4453 element = EL_CHAR_H;
4456 case 0x15b1: /* (blue) */
4457 element = EL_CHAR_I;
4460 case 0x15b2: /* (blue) */
4461 element = EL_CHAR_J;
4464 case 0x15b3: /* (blue) */
4465 element = EL_CHAR_K;
4468 case 0x15b4: /* (blue) */
4469 element = EL_CHAR_L;
4472 case 0x15b5: /* (blue) */
4473 element = EL_CHAR_M;
4476 case 0x15b6: /* (blue) */
4477 element = EL_CHAR_N;
4480 case 0x15b7: /* (blue) */
4481 element = EL_CHAR_O;
4484 case 0x15b8: /* (blue) */
4485 element = EL_CHAR_P;
4488 case 0x15b9: /* (blue) */
4489 element = EL_CHAR_Q;
4492 case 0x15ba: /* (blue) */
4493 element = EL_CHAR_R;
4496 case 0x15bb: /* (blue) */
4497 element = EL_CHAR_S;
4500 case 0x15bc: /* (blue) */
4501 element = EL_CHAR_T;
4504 case 0x15bd: /* (blue) */
4505 element = EL_CHAR_U;
4508 case 0x15be: /* (blue) */
4509 element = EL_CHAR_V;
4512 case 0x15bf: /* (blue) */
4513 element = EL_CHAR_W;
4516 case 0x15c0: /* (blue) */
4517 element = EL_CHAR_X;
4520 case 0x15c1: /* (blue) */
4521 element = EL_CHAR_Y;
4524 case 0x15c2: /* (blue) */
4525 element = EL_CHAR_Z;
4528 case 0x15c3: /* (blue) */
4529 element = EL_CHAR_AUMLAUT;
4532 case 0x15c4: /* (blue) */
4533 element = EL_CHAR_OUMLAUT;
4536 case 0x15c5: /* (blue) */
4537 element = EL_CHAR_UUMLAUT;
4540 case 0x15c6: /* (blue) */
4541 element = EL_CHAR_0;
4544 case 0x15c7: /* (blue) */
4545 element = EL_CHAR_1;
4548 case 0x15c8: /* (blue) */
4549 element = EL_CHAR_2;
4552 case 0x15c9: /* (blue) */
4553 element = EL_CHAR_3;
4556 case 0x15ca: /* (blue) */
4557 element = EL_CHAR_4;
4560 case 0x15cb: /* (blue) */
4561 element = EL_CHAR_5;
4564 case 0x15cc: /* (blue) */
4565 element = EL_CHAR_6;
4568 case 0x15cd: /* (blue) */
4569 element = EL_CHAR_7;
4572 case 0x15ce: /* (blue) */
4573 element = EL_CHAR_8;
4576 case 0x15cf: /* (blue) */
4577 element = EL_CHAR_9;
4580 case 0x15d0: /* (blue) */
4581 element = EL_CHAR_PERIOD;
4584 case 0x15d1: /* (blue) */
4585 element = EL_CHAR_EXCLAM;
4588 case 0x15d2: /* (blue) */
4589 element = EL_CHAR_COLON;
4592 case 0x15d3: /* (blue) */
4593 element = EL_CHAR_LESS;
4596 case 0x15d4: /* (blue) */
4597 element = EL_CHAR_GREATER;
4600 case 0x15d5: /* (blue) */
4601 element = EL_CHAR_QUESTION;
4604 case 0x15d6: /* (blue) */
4605 element = EL_CHAR_COPYRIGHT;
4608 case 0x15d7: /* (blue) */
4609 element = EL_CHAR_UP;
4612 case 0x15d8: /* (blue) */
4613 element = EL_CHAR_DOWN;
4616 case 0x15d9: /* (blue) */
4617 element = EL_CHAR_BUTTON;
4620 case 0x15da: /* (blue) */
4621 element = EL_CHAR_PLUS;
4624 case 0x15db: /* (blue) */
4625 element = EL_CHAR_MINUS;
4628 case 0x15dc: /* (blue) */
4629 element = EL_CHAR_APOSTROPHE;
4632 case 0x15dd: /* (blue) */
4633 element = EL_CHAR_PARENLEFT;
4636 case 0x15de: /* (blue) */
4637 element = EL_CHAR_PARENRIGHT;
4640 case 0x15df: /* (green) */
4641 element = EL_CHAR_A;
4644 case 0x15e0: /* (green) */
4645 element = EL_CHAR_B;
4648 case 0x15e1: /* (green) */
4649 element = EL_CHAR_C;
4652 case 0x15e2: /* (green) */
4653 element = EL_CHAR_D;
4656 case 0x15e3: /* (green) */
4657 element = EL_CHAR_E;
4660 case 0x15e4: /* (green) */
4661 element = EL_CHAR_F;
4664 case 0x15e5: /* (green) */
4665 element = EL_CHAR_G;
4668 case 0x15e6: /* (green) */
4669 element = EL_CHAR_H;
4672 case 0x15e7: /* (green) */
4673 element = EL_CHAR_I;
4676 case 0x15e8: /* (green) */
4677 element = EL_CHAR_J;
4680 case 0x15e9: /* (green) */
4681 element = EL_CHAR_K;
4684 case 0x15ea: /* (green) */
4685 element = EL_CHAR_L;
4688 case 0x15eb: /* (green) */
4689 element = EL_CHAR_M;
4692 case 0x15ec: /* (green) */
4693 element = EL_CHAR_N;
4696 case 0x15ed: /* (green) */
4697 element = EL_CHAR_O;
4700 case 0x15ee: /* (green) */
4701 element = EL_CHAR_P;
4704 case 0x15ef: /* (green) */
4705 element = EL_CHAR_Q;
4708 case 0x15f0: /* (green) */
4709 element = EL_CHAR_R;
4712 case 0x15f1: /* (green) */
4713 element = EL_CHAR_S;
4716 case 0x15f2: /* (green) */
4717 element = EL_CHAR_T;
4720 case 0x15f3: /* (green) */
4721 element = EL_CHAR_U;
4724 case 0x15f4: /* (green) */
4725 element = EL_CHAR_V;
4728 case 0x15f5: /* (green) */
4729 element = EL_CHAR_W;
4732 case 0x15f6: /* (green) */
4733 element = EL_CHAR_X;
4736 case 0x15f7: /* (green) */
4737 element = EL_CHAR_Y;
4740 case 0x15f8: /* (green) */
4741 element = EL_CHAR_Z;
4744 case 0x15f9: /* (green) */
4745 element = EL_CHAR_AUMLAUT;
4748 case 0x15fa: /* (green) */
4749 element = EL_CHAR_OUMLAUT;
4752 case 0x15fb: /* (green) */
4753 element = EL_CHAR_UUMLAUT;
4756 case 0x15fc: /* (green) */
4757 element = EL_CHAR_0;
4760 case 0x15fd: /* (green) */
4761 element = EL_CHAR_1;
4764 case 0x15fe: /* (green) */
4765 element = EL_CHAR_2;
4768 case 0x15ff: /* (green) */
4769 element = EL_CHAR_3;
4772 case 0x1600: /* (green) */
4773 element = EL_CHAR_4;
4776 case 0x1601: /* (green) */
4777 element = EL_CHAR_5;
4780 case 0x1602: /* (green) */
4781 element = EL_CHAR_6;
4784 case 0x1603: /* (green) */
4785 element = EL_CHAR_7;
4788 case 0x1604: /* (green) */
4789 element = EL_CHAR_8;
4792 case 0x1605: /* (green) */
4793 element = EL_CHAR_9;
4796 case 0x1606: /* (green) */
4797 element = EL_CHAR_PERIOD;
4800 case 0x1607: /* (green) */
4801 element = EL_CHAR_EXCLAM;
4804 case 0x1608: /* (green) */
4805 element = EL_CHAR_COLON;
4808 case 0x1609: /* (green) */
4809 element = EL_CHAR_LESS;
4812 case 0x160a: /* (green) */
4813 element = EL_CHAR_GREATER;
4816 case 0x160b: /* (green) */
4817 element = EL_CHAR_QUESTION;
4820 case 0x160c: /* (green) */
4821 element = EL_CHAR_COPYRIGHT;
4824 case 0x160d: /* (green) */
4825 element = EL_CHAR_UP;
4828 case 0x160e: /* (green) */
4829 element = EL_CHAR_DOWN;
4832 case 0x160f: /* (green) */
4833 element = EL_CHAR_BUTTON;
4836 case 0x1610: /* (green) */
4837 element = EL_CHAR_PLUS;
4840 case 0x1611: /* (green) */
4841 element = EL_CHAR_MINUS;
4844 case 0x1612: /* (green) */
4845 element = EL_CHAR_APOSTROPHE;
4848 case 0x1613: /* (green) */
4849 element = EL_CHAR_PARENLEFT;
4852 case 0x1614: /* (green) */
4853 element = EL_CHAR_PARENRIGHT;
4856 case 0x1615: /* (blue steel) */
4857 element = EL_STEEL_CHAR_A;
4860 case 0x1616: /* (blue steel) */
4861 element = EL_STEEL_CHAR_B;
4864 case 0x1617: /* (blue steel) */
4865 element = EL_STEEL_CHAR_C;
4868 case 0x1618: /* (blue steel) */
4869 element = EL_STEEL_CHAR_D;
4872 case 0x1619: /* (blue steel) */
4873 element = EL_STEEL_CHAR_E;
4876 case 0x161a: /* (blue steel) */
4877 element = EL_STEEL_CHAR_F;
4880 case 0x161b: /* (blue steel) */
4881 element = EL_STEEL_CHAR_G;
4884 case 0x161c: /* (blue steel) */
4885 element = EL_STEEL_CHAR_H;
4888 case 0x161d: /* (blue steel) */
4889 element = EL_STEEL_CHAR_I;
4892 case 0x161e: /* (blue steel) */
4893 element = EL_STEEL_CHAR_J;
4896 case 0x161f: /* (blue steel) */
4897 element = EL_STEEL_CHAR_K;
4900 case 0x1620: /* (blue steel) */
4901 element = EL_STEEL_CHAR_L;
4904 case 0x1621: /* (blue steel) */
4905 element = EL_STEEL_CHAR_M;
4908 case 0x1622: /* (blue steel) */
4909 element = EL_STEEL_CHAR_N;
4912 case 0x1623: /* (blue steel) */
4913 element = EL_STEEL_CHAR_O;
4916 case 0x1624: /* (blue steel) */
4917 element = EL_STEEL_CHAR_P;
4920 case 0x1625: /* (blue steel) */
4921 element = EL_STEEL_CHAR_Q;
4924 case 0x1626: /* (blue steel) */
4925 element = EL_STEEL_CHAR_R;
4928 case 0x1627: /* (blue steel) */
4929 element = EL_STEEL_CHAR_S;
4932 case 0x1628: /* (blue steel) */
4933 element = EL_STEEL_CHAR_T;
4936 case 0x1629: /* (blue steel) */
4937 element = EL_STEEL_CHAR_U;
4940 case 0x162a: /* (blue steel) */
4941 element = EL_STEEL_CHAR_V;
4944 case 0x162b: /* (blue steel) */
4945 element = EL_STEEL_CHAR_W;
4948 case 0x162c: /* (blue steel) */
4949 element = EL_STEEL_CHAR_X;
4952 case 0x162d: /* (blue steel) */
4953 element = EL_STEEL_CHAR_Y;
4956 case 0x162e: /* (blue steel) */
4957 element = EL_STEEL_CHAR_Z;
4960 case 0x162f: /* (blue steel) */
4961 element = EL_STEEL_CHAR_AUMLAUT;
4964 case 0x1630: /* (blue steel) */
4965 element = EL_STEEL_CHAR_OUMLAUT;
4968 case 0x1631: /* (blue steel) */
4969 element = EL_STEEL_CHAR_UUMLAUT;
4972 case 0x1632: /* (blue steel) */
4973 element = EL_STEEL_CHAR_0;
4976 case 0x1633: /* (blue steel) */
4977 element = EL_STEEL_CHAR_1;
4980 case 0x1634: /* (blue steel) */
4981 element = EL_STEEL_CHAR_2;
4984 case 0x1635: /* (blue steel) */
4985 element = EL_STEEL_CHAR_3;
4988 case 0x1636: /* (blue steel) */
4989 element = EL_STEEL_CHAR_4;
4992 case 0x1637: /* (blue steel) */
4993 element = EL_STEEL_CHAR_5;
4996 case 0x1638: /* (blue steel) */
4997 element = EL_STEEL_CHAR_6;
5000 case 0x1639: /* (blue steel) */
5001 element = EL_STEEL_CHAR_7;
5004 case 0x163a: /* (blue steel) */
5005 element = EL_STEEL_CHAR_8;
5008 case 0x163b: /* (blue steel) */
5009 element = EL_STEEL_CHAR_9;
5012 case 0x163c: /* (blue steel) */
5013 element = EL_STEEL_CHAR_PERIOD;
5016 case 0x163d: /* (blue steel) */
5017 element = EL_STEEL_CHAR_EXCLAM;
5020 case 0x163e: /* (blue steel) */
5021 element = EL_STEEL_CHAR_COLON;
5024 case 0x163f: /* (blue steel) */
5025 element = EL_STEEL_CHAR_LESS;
5028 case 0x1640: /* (blue steel) */
5029 element = EL_STEEL_CHAR_GREATER;
5032 case 0x1641: /* (blue steel) */
5033 element = EL_STEEL_CHAR_QUESTION;
5036 case 0x1642: /* (blue steel) */
5037 element = EL_STEEL_CHAR_COPYRIGHT;
5040 case 0x1643: /* (blue steel) */
5041 element = EL_STEEL_CHAR_UP;
5044 case 0x1644: /* (blue steel) */
5045 element = EL_STEEL_CHAR_DOWN;
5048 case 0x1645: /* (blue steel) */
5049 element = EL_STEEL_CHAR_BUTTON;
5052 case 0x1646: /* (blue steel) */
5053 element = EL_STEEL_CHAR_PLUS;
5056 case 0x1647: /* (blue steel) */
5057 element = EL_STEEL_CHAR_MINUS;
5060 case 0x1648: /* (blue steel) */
5061 element = EL_STEEL_CHAR_APOSTROPHE;
5064 case 0x1649: /* (blue steel) */
5065 element = EL_STEEL_CHAR_PARENLEFT;
5068 case 0x164a: /* (blue steel) */
5069 element = EL_STEEL_CHAR_PARENRIGHT;
5072 case 0x164b: /* (green steel) */
5073 element = EL_STEEL_CHAR_A;
5076 case 0x164c: /* (green steel) */
5077 element = EL_STEEL_CHAR_B;
5080 case 0x164d: /* (green steel) */
5081 element = EL_STEEL_CHAR_C;
5084 case 0x164e: /* (green steel) */
5085 element = EL_STEEL_CHAR_D;
5088 case 0x164f: /* (green steel) */
5089 element = EL_STEEL_CHAR_E;
5092 case 0x1650: /* (green steel) */
5093 element = EL_STEEL_CHAR_F;
5096 case 0x1651: /* (green steel) */
5097 element = EL_STEEL_CHAR_G;
5100 case 0x1652: /* (green steel) */
5101 element = EL_STEEL_CHAR_H;
5104 case 0x1653: /* (green steel) */
5105 element = EL_STEEL_CHAR_I;
5108 case 0x1654: /* (green steel) */
5109 element = EL_STEEL_CHAR_J;
5112 case 0x1655: /* (green steel) */
5113 element = EL_STEEL_CHAR_K;
5116 case 0x1656: /* (green steel) */
5117 element = EL_STEEL_CHAR_L;
5120 case 0x1657: /* (green steel) */
5121 element = EL_STEEL_CHAR_M;
5124 case 0x1658: /* (green steel) */
5125 element = EL_STEEL_CHAR_N;
5128 case 0x1659: /* (green steel) */
5129 element = EL_STEEL_CHAR_O;
5132 case 0x165a: /* (green steel) */
5133 element = EL_STEEL_CHAR_P;
5136 case 0x165b: /* (green steel) */
5137 element = EL_STEEL_CHAR_Q;
5140 case 0x165c: /* (green steel) */
5141 element = EL_STEEL_CHAR_R;
5144 case 0x165d: /* (green steel) */
5145 element = EL_STEEL_CHAR_S;
5148 case 0x165e: /* (green steel) */
5149 element = EL_STEEL_CHAR_T;
5152 case 0x165f: /* (green steel) */
5153 element = EL_STEEL_CHAR_U;
5156 case 0x1660: /* (green steel) */
5157 element = EL_STEEL_CHAR_V;
5160 case 0x1661: /* (green steel) */
5161 element = EL_STEEL_CHAR_W;
5164 case 0x1662: /* (green steel) */
5165 element = EL_STEEL_CHAR_X;
5168 case 0x1663: /* (green steel) */
5169 element = EL_STEEL_CHAR_Y;
5172 case 0x1664: /* (green steel) */
5173 element = EL_STEEL_CHAR_Z;
5176 case 0x1665: /* (green steel) */
5177 element = EL_STEEL_CHAR_AUMLAUT;
5180 case 0x1666: /* (green steel) */
5181 element = EL_STEEL_CHAR_OUMLAUT;
5184 case 0x1667: /* (green steel) */
5185 element = EL_STEEL_CHAR_UUMLAUT;
5188 case 0x1668: /* (green steel) */
5189 element = EL_STEEL_CHAR_0;
5192 case 0x1669: /* (green steel) */
5193 element = EL_STEEL_CHAR_1;
5196 case 0x166a: /* (green steel) */
5197 element = EL_STEEL_CHAR_2;
5200 case 0x166b: /* (green steel) */
5201 element = EL_STEEL_CHAR_3;
5204 case 0x166c: /* (green steel) */
5205 element = EL_STEEL_CHAR_4;
5208 case 0x166d: /* (green steel) */
5209 element = EL_STEEL_CHAR_5;
5212 case 0x166e: /* (green steel) */
5213 element = EL_STEEL_CHAR_6;
5216 case 0x166f: /* (green steel) */
5217 element = EL_STEEL_CHAR_7;
5220 case 0x1670: /* (green steel) */
5221 element = EL_STEEL_CHAR_8;
5224 case 0x1671: /* (green steel) */
5225 element = EL_STEEL_CHAR_9;
5228 case 0x1672: /* (green steel) */
5229 element = EL_STEEL_CHAR_PERIOD;
5232 case 0x1673: /* (green steel) */
5233 element = EL_STEEL_CHAR_EXCLAM;
5236 case 0x1674: /* (green steel) */
5237 element = EL_STEEL_CHAR_COLON;
5240 case 0x1675: /* (green steel) */
5241 element = EL_STEEL_CHAR_LESS;
5244 case 0x1676: /* (green steel) */
5245 element = EL_STEEL_CHAR_GREATER;
5248 case 0x1677: /* (green steel) */
5249 element = EL_STEEL_CHAR_QUESTION;
5252 case 0x1678: /* (green steel) */
5253 element = EL_STEEL_CHAR_COPYRIGHT;
5256 case 0x1679: /* (green steel) */
5257 element = EL_STEEL_CHAR_UP;
5260 case 0x167a: /* (green steel) */
5261 element = EL_STEEL_CHAR_DOWN;
5264 case 0x167b: /* (green steel) */
5265 element = EL_STEEL_CHAR_BUTTON;
5268 case 0x167c: /* (green steel) */
5269 element = EL_STEEL_CHAR_PLUS;
5272 case 0x167d: /* (green steel) */
5273 element = EL_STEEL_CHAR_MINUS;
5276 case 0x167e: /* (green steel) */
5277 element = EL_STEEL_CHAR_APOSTROPHE;
5280 case 0x167f: /* (green steel) */
5281 element = EL_STEEL_CHAR_PARENLEFT;
5284 case 0x1680: /* (green steel) */
5285 element = EL_STEEL_CHAR_PARENRIGHT;
5288 case 0x1681: /* gate (red) */
5289 element = EL_EM_GATE_1;
5292 case 0x1682: /* secret gate (red) */
5293 element = EL_GATE_1_GRAY;
5296 case 0x1683: /* gate (yellow) */
5297 element = EL_EM_GATE_2;
5300 case 0x1684: /* secret gate (yellow) */
5301 element = EL_GATE_2_GRAY;
5304 case 0x1685: /* gate (blue) */
5305 element = EL_EM_GATE_4;
5308 case 0x1686: /* secret gate (blue) */
5309 element = EL_GATE_4_GRAY;
5312 case 0x1687: /* gate (green) */
5313 element = EL_EM_GATE_3;
5316 case 0x1688: /* secret gate (green) */
5317 element = EL_GATE_3_GRAY;
5320 case 0x1689: /* gate (white) */
5321 element = EL_DC_GATE_WHITE;
5324 case 0x168a: /* secret gate (white) */
5325 element = EL_DC_GATE_WHITE_GRAY;
5328 case 0x168b: /* secret gate (no key) */
5329 element = EL_DC_GATE_FAKE_GRAY;
5333 element = EL_ROBOT_WHEEL;
5337 element = EL_DC_TIMEGATE_SWITCH;
5341 element = EL_ACID_POOL_BOTTOM;
5345 element = EL_ACID_POOL_TOPLEFT;
5349 element = EL_ACID_POOL_TOPRIGHT;
5353 element = EL_ACID_POOL_BOTTOMLEFT;
5357 element = EL_ACID_POOL_BOTTOMRIGHT;
5361 element = EL_STEELWALL;
5365 element = EL_STEELWALL_SLIPPERY;
5368 case 0x1695: /* steel wall (not round) */
5369 element = EL_STEELWALL;
5372 case 0x1696: /* steel wall (left) */
5373 element = EL_DC_STEELWALL_1_LEFT;
5376 case 0x1697: /* steel wall (bottom) */
5377 element = EL_DC_STEELWALL_1_BOTTOM;
5380 case 0x1698: /* steel wall (right) */
5381 element = EL_DC_STEELWALL_1_RIGHT;
5384 case 0x1699: /* steel wall (top) */
5385 element = EL_DC_STEELWALL_1_TOP;
5388 case 0x169a: /* steel wall (left/bottom) */
5389 element = EL_DC_STEELWALL_1_BOTTOMLEFT;
5392 case 0x169b: /* steel wall (right/bottom) */
5393 element = EL_DC_STEELWALL_1_BOTTOMRIGHT;
5396 case 0x169c: /* steel wall (right/top) */
5397 element = EL_DC_STEELWALL_1_TOPRIGHT;
5400 case 0x169d: /* steel wall (left/top) */
5401 element = EL_DC_STEELWALL_1_TOPLEFT;
5404 case 0x169e: /* steel wall (right/bottom small) */
5405 element = EL_DC_STEELWALL_1_BOTTOMRIGHT_2;
5408 case 0x169f: /* steel wall (left/bottom small) */
5409 element = EL_DC_STEELWALL_1_BOTTOMLEFT_2;
5412 case 0x16a0: /* steel wall (right/top small) */
5413 element = EL_DC_STEELWALL_1_TOPRIGHT_2;
5416 case 0x16a1: /* steel wall (left/top small) */
5417 element = EL_DC_STEELWALL_1_TOPLEFT_2;
5420 case 0x16a2: /* steel wall (left/right) */
5421 element = EL_DC_STEELWALL_1_VERTICAL;
5424 case 0x16a3: /* steel wall (top/bottom) */
5425 element = EL_DC_STEELWALL_1_HORIZONTAL;
5428 case 0x16a4: /* steel wall 2 (left end) */
5429 element = EL_DC_STEELWALL_2_LEFT;
5432 case 0x16a5: /* steel wall 2 (right end) */
5433 element = EL_DC_STEELWALL_2_RIGHT;
5436 case 0x16a6: /* steel wall 2 (top end) */
5437 element = EL_DC_STEELWALL_2_TOP;
5440 case 0x16a7: /* steel wall 2 (bottom end) */
5441 element = EL_DC_STEELWALL_2_BOTTOM;
5444 case 0x16a8: /* steel wall 2 (left/right) */
5445 element = EL_DC_STEELWALL_2_HORIZONTAL;
5448 case 0x16a9: /* steel wall 2 (up/down) */
5449 element = EL_DC_STEELWALL_2_VERTICAL;
5452 case 0x16aa: /* steel wall 2 (mid) */
5453 element = EL_DC_STEELWALL_2_MIDDLE;
5457 element = EL_SIGN_EXCLAMATION;
5461 element = EL_SIGN_RADIOACTIVITY;
5465 element = EL_SIGN_STOP;
5469 element = EL_SIGN_WHEELCHAIR;
5473 element = EL_SIGN_PARKING;
5477 element = EL_SIGN_NO_ENTRY;
5481 element = EL_SIGN_HEART;
5485 element = EL_SIGN_GIVE_WAY;
5489 element = EL_SIGN_ENTRY_FORBIDDEN;
5493 element = EL_SIGN_EMERGENCY_EXIT;
5497 element = EL_SIGN_YIN_YANG;
5501 element = EL_WALL_EMERALD;
5505 element = EL_WALL_DIAMOND;
5509 element = EL_WALL_PEARL;
5513 element = EL_WALL_CRYSTAL;
5517 element = EL_INVISIBLE_WALL;
5521 element = EL_INVISIBLE_STEELWALL;
5524 /* 0x16bc - 0x16cb: */
5525 /* EL_INVISIBLE_SAND */
5528 element = EL_LIGHT_SWITCH;
5532 element = EL_ENVELOPE_1;
5536 if (element >= 0x0117 && element <= 0x036e) /* (?) */
5537 element = EL_DIAMOND;
5538 else if (element >= 0x042d && element <= 0x0684) /* (?) */
5539 element = EL_EMERALD;
5540 else if (element >= 0x157c && element <= 0x158b)
5542 else if (element >= 0x1590 && element <= 0x159f)
5543 element = EL_DC_LANDMINE;
5544 else if (element >= 0x16bc && element <= 0x16cb)
5545 element = EL_INVISIBLE_SAND;
5548 Error(ERR_WARN, "unknown Diamond Caves element 0x%04x", element);
5549 element = EL_UNKNOWN;
5554 return getMappedElement(element);
5557 static void LoadLevelFromFileStream_DC(File *file, struct LevelInfo *level,
5560 byte header[DC_LEVEL_HEADER_SIZE];
5562 int envelope_header_pos = 62;
5563 int envelope_content_pos = 94;
5564 int level_name_pos = 251;
5565 int level_author_pos = 292;
5566 int envelope_header_len;
5567 int envelope_content_len;
5569 int level_author_len;
5571 int num_yamyam_contents;
5574 getDecodedWord_DC(0, TRUE); /* initialize DC2 decoding engine */
5576 for (i = 0; i < DC_LEVEL_HEADER_SIZE / 2; i++)
5578 unsigned short header_word = getDecodedWord_DC(getFile16BitBE(file), FALSE);
5580 header[i * 2 + 0] = header_word >> 8;
5581 header[i * 2 + 1] = header_word & 0xff;
5584 /* read some values from level header to check level decoding integrity */
5585 fieldx = header[6] | (header[7] << 8);
5586 fieldy = header[8] | (header[9] << 8);
5587 num_yamyam_contents = header[60] | (header[61] << 8);
5589 /* do some simple sanity checks to ensure that level was correctly decoded */
5590 if (fieldx < 1 || fieldx > 256 ||
5591 fieldy < 1 || fieldy > 256 ||
5592 num_yamyam_contents < 1 || num_yamyam_contents > 8)
5594 level->no_valid_file = TRUE;
5596 Error(ERR_WARN, "cannot decode level from stream -- using empty level");
5601 /* maximum envelope header size is 31 bytes */
5602 envelope_header_len = header[envelope_header_pos];
5603 /* maximum envelope content size is 110 (156?) bytes */
5604 envelope_content_len = header[envelope_content_pos];
5606 /* maximum level title size is 40 bytes */
5607 level_name_len = MIN(header[level_name_pos], MAX_LEVEL_NAME_LEN);
5608 /* maximum level author size is 30 (51?) bytes */
5609 level_author_len = MIN(header[level_author_pos], MAX_LEVEL_AUTHOR_LEN);
5613 for (i = 0; i < envelope_header_len; i++)
5614 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5615 level->envelope[0].text[envelope_size++] =
5616 header[envelope_header_pos + 1 + i];
5618 if (envelope_header_len > 0 && envelope_content_len > 0)
5620 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5621 level->envelope[0].text[envelope_size++] = '\n';
5622 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5623 level->envelope[0].text[envelope_size++] = '\n';
5626 for (i = 0; i < envelope_content_len; i++)
5627 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5628 level->envelope[0].text[envelope_size++] =
5629 header[envelope_content_pos + 1 + i];
5631 level->envelope[0].text[envelope_size] = '\0';
5633 level->envelope[0].xsize = MAX_ENVELOPE_XSIZE;
5634 level->envelope[0].ysize = 10;
5635 level->envelope[0].autowrap = TRUE;
5636 level->envelope[0].centered = TRUE;
5638 for (i = 0; i < level_name_len; i++)
5639 level->name[i] = header[level_name_pos + 1 + i];
5640 level->name[level_name_len] = '\0';
5642 for (i = 0; i < level_author_len; i++)
5643 level->author[i] = header[level_author_pos + 1 + i];
5644 level->author[level_author_len] = '\0';
5646 num_yamyam_contents = header[60] | (header[61] << 8);
5647 level->num_yamyam_contents =
5648 MIN(MAX(MIN_ELEMENT_CONTENTS, num_yamyam_contents), MAX_ELEMENT_CONTENTS);
5650 for (i = 0; i < num_yamyam_contents; i++)
5652 for (y = 0; y < 3; y++) for (x = 0; x < 3; x++)
5654 unsigned short word = getDecodedWord_DC(getFile16BitBE(file), FALSE);
5655 int element_dc = ((word & 0xff) << 8) | ((word >> 8) & 0xff);
5657 if (i < MAX_ELEMENT_CONTENTS)
5658 level->yamyam_content[i].e[x][y] = getMappedElement_DC(element_dc);
5662 fieldx = header[6] | (header[7] << 8);
5663 fieldy = header[8] | (header[9] << 8);
5664 level->fieldx = MIN(MAX(MIN_LEV_FIELDX, fieldx), MAX_LEV_FIELDX);
5665 level->fieldy = MIN(MAX(MIN_LEV_FIELDY, fieldy), MAX_LEV_FIELDY);
5667 for (y = 0; y < fieldy; y++) for (x = 0; x < fieldx; x++)
5669 unsigned short word = getDecodedWord_DC(getFile16BitBE(file), FALSE);
5670 int element_dc = ((word & 0xff) << 8) | ((word >> 8) & 0xff);
5672 if (x < MAX_LEV_FIELDX && y < MAX_LEV_FIELDY)
5673 level->field[x][y] = getMappedElement_DC(element_dc);
5676 x = MIN(MAX(0, (header[10] | (header[11] << 8)) - 1), MAX_LEV_FIELDX - 1);
5677 y = MIN(MAX(0, (header[12] | (header[13] << 8)) - 1), MAX_LEV_FIELDY - 1);
5678 level->field[x][y] = EL_PLAYER_1;
5680 x = MIN(MAX(0, (header[14] | (header[15] << 8)) - 1), MAX_LEV_FIELDX - 1);
5681 y = MIN(MAX(0, (header[16] | (header[17] << 8)) - 1), MAX_LEV_FIELDY - 1);
5682 level->field[x][y] = EL_PLAYER_2;
5684 level->gems_needed = header[18] | (header[19] << 8);
5686 level->score[SC_EMERALD] = header[20] | (header[21] << 8);
5687 level->score[SC_DIAMOND] = header[22] | (header[23] << 8);
5688 level->score[SC_PEARL] = header[24] | (header[25] << 8);
5689 level->score[SC_CRYSTAL] = header[26] | (header[27] << 8);
5690 level->score[SC_NUT] = header[28] | (header[29] << 8);
5691 level->score[SC_ROBOT] = header[30] | (header[31] << 8);
5692 level->score[SC_SPACESHIP] = header[32] | (header[33] << 8);
5693 level->score[SC_BUG] = header[34] | (header[35] << 8);
5694 level->score[SC_YAMYAM] = header[36] | (header[37] << 8);
5695 level->score[SC_DYNAMITE] = header[38] | (header[39] << 8);
5696 level->score[SC_KEY] = header[40] | (header[41] << 8);
5697 level->score[SC_TIME_BONUS] = header[42] | (header[43] << 8);
5699 level->time = header[44] | (header[45] << 8);
5701 level->amoeba_speed = header[46] | (header[47] << 8);
5702 level->time_light = header[48] | (header[49] << 8);
5703 level->time_timegate = header[50] | (header[51] << 8);
5704 level->time_wheel = header[52] | (header[53] << 8);
5705 level->time_magic_wall = header[54] | (header[55] << 8);
5706 level->extra_time = header[56] | (header[57] << 8);
5707 level->shield_normal_time = header[58] | (header[59] << 8);
5709 /* Diamond Caves has the same (strange) behaviour as Emerald Mine that gems
5710 can slip down from flat walls, like normal walls and steel walls */
5711 level->em_slippery_gems = TRUE;
5714 static void LoadLevelFromFileInfo_DC(struct LevelInfo *level,
5715 struct LevelFileInfo *level_file_info,
5716 boolean level_info_only)
5718 char *filename = level_file_info->filename;
5720 int num_magic_bytes = 8;
5721 char magic_bytes[num_magic_bytes + 1];
5722 int num_levels_to_skip = level_file_info->nr - leveldir_current->first_level;
5724 if (!(file = openFile(filename, MODE_READ)))
5726 level->no_valid_file = TRUE;
5728 if (!level_info_only)
5729 Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
5734 // fseek(file, 0x0000, SEEK_SET);
5736 if (level_file_info->packed)
5738 /* read "magic bytes" from start of file */
5739 if (getStringFromFile(file, magic_bytes, num_magic_bytes + 1) == NULL)
5740 magic_bytes[0] = '\0';
5742 /* check "magic bytes" for correct file format */
5743 if (!strPrefix(magic_bytes, "DC2"))
5745 level->no_valid_file = TRUE;
5747 Error(ERR_WARN, "unknown DC level file '%s' -- using empty level",
5753 if (strPrefix(magic_bytes, "DC2Win95") ||
5754 strPrefix(magic_bytes, "DC2Win98"))
5756 int position_first_level = 0x00fa;
5757 int extra_bytes = 4;
5760 /* advance file stream to first level inside the level package */
5761 skip_bytes = position_first_level - num_magic_bytes - extra_bytes;
5763 /* each block of level data is followed by block of non-level data */
5764 num_levels_to_skip *= 2;
5766 /* at least skip header bytes, therefore use ">= 0" instead of "> 0" */
5767 while (num_levels_to_skip >= 0)
5769 /* advance file stream to next level inside the level package */
5770 if (seekFile(file, skip_bytes, SEEK_CUR) != 0)
5772 level->no_valid_file = TRUE;
5774 Error(ERR_WARN, "cannot fseek in file '%s' -- using empty level",
5780 /* skip apparently unused extra bytes following each level */
5781 ReadUnusedBytesFromFile(file, extra_bytes);
5783 /* read size of next level in level package */
5784 skip_bytes = getFile32BitLE(file);
5786 num_levels_to_skip--;
5791 level->no_valid_file = TRUE;
5793 Error(ERR_WARN, "unknown DC2 level file '%s' -- using empty level",
5800 LoadLevelFromFileStream_DC(file, level, level_file_info->nr);
5806 /* ------------------------------------------------------------------------- */
5807 /* functions for loading SB level */
5808 /* ------------------------------------------------------------------------- */
5810 int getMappedElement_SB(int element_ascii, boolean use_ces)
5818 sb_element_mapping[] =
5820 { ' ', EL_EMPTY, EL_CUSTOM_1 }, /* floor (space) */
5821 { '#', EL_STEELWALL, EL_CUSTOM_2 }, /* wall */
5822 { '@', EL_PLAYER_1, EL_CUSTOM_3 }, /* player */
5823 { '$', EL_SOKOBAN_OBJECT, EL_CUSTOM_4 }, /* box */
5824 { '.', EL_SOKOBAN_FIELD_EMPTY, EL_CUSTOM_5 }, /* goal square */
5825 { '*', EL_SOKOBAN_FIELD_FULL, EL_CUSTOM_6 }, /* box on goal square */
5826 { '+', EL_SOKOBAN_FIELD_PLAYER, EL_CUSTOM_7 }, /* player on goal square */
5827 { '_', EL_INVISIBLE_STEELWALL, EL_FROM_LEVEL_TEMPLATE }, /* floor beyond border */
5834 for (i = 0; sb_element_mapping[i].ascii != 0; i++)
5835 if (element_ascii == sb_element_mapping[i].ascii)
5836 return (use_ces ? sb_element_mapping[i].ce : sb_element_mapping[i].sb);
5838 return EL_UNDEFINED;
5841 static void LoadLevelFromFileInfo_SB(struct LevelInfo *level,
5842 struct LevelFileInfo *level_file_info,
5843 boolean level_info_only)
5845 char *filename = level_file_info->filename;
5846 char line[MAX_LINE_LEN], line_raw[MAX_LINE_LEN], previous_line[MAX_LINE_LEN];
5847 char last_comment[MAX_LINE_LEN];
5848 char level_name[MAX_LINE_LEN];
5851 int num_levels_to_skip = level_file_info->nr - leveldir_current->first_level;
5852 boolean read_continued_line = FALSE;
5853 boolean reading_playfield = FALSE;
5854 boolean got_valid_playfield_line = FALSE;
5855 boolean invalid_playfield_char = FALSE;
5856 boolean load_xsb_to_ces = check_special_flags("load_xsb_to_ces");
5857 int file_level_nr = 0;
5859 int x = 0, y = 0; /* initialized to make compilers happy */
5861 last_comment[0] = '\0';
5862 level_name[0] = '\0';
5864 if (!(file = openFile(filename, MODE_READ)))
5866 level->no_valid_file = TRUE;
5868 if (!level_info_only)
5869 Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
5874 while (!checkEndOfFile(file))
5876 /* level successfully read, but next level may follow here */
5877 if (!got_valid_playfield_line && reading_playfield)
5879 /* read playfield from single level file -- skip remaining file */
5880 if (!level_file_info->packed)
5883 if (file_level_nr >= num_levels_to_skip)
5888 last_comment[0] = '\0';
5889 level_name[0] = '\0';
5891 reading_playfield = FALSE;
5894 got_valid_playfield_line = FALSE;
5896 /* read next line of input file */
5897 if (!getStringFromFile(file, line, MAX_LINE_LEN))
5900 /* check if line was completely read and is terminated by line break */
5901 if (strlen(line) > 0 && line[strlen(line) - 1] == '\n')
5904 /* cut trailing line break (this can be newline and/or carriage return) */
5905 for (line_ptr = &line[strlen(line)]; line_ptr >= line; line_ptr--)
5906 if ((*line_ptr == '\n' || *line_ptr == '\r') && *(line_ptr + 1) == '\0')
5909 /* copy raw input line for later use (mainly debugging output) */
5910 strcpy(line_raw, line);
5912 if (read_continued_line)
5914 /* append new line to existing line, if there is enough space */
5915 if (strlen(previous_line) + strlen(line_ptr) < MAX_LINE_LEN)
5916 strcat(previous_line, line_ptr);
5918 strcpy(line, previous_line); /* copy storage buffer to line */
5920 read_continued_line = FALSE;
5923 /* if the last character is '\', continue at next line */
5924 if (strlen(line) > 0 && line[strlen(line) - 1] == '\\')
5926 line[strlen(line) - 1] = '\0'; /* cut off trailing backslash */
5927 strcpy(previous_line, line); /* copy line to storage buffer */
5929 read_continued_line = TRUE;
5934 /* skip empty lines */
5935 if (line[0] == '\0')
5938 /* extract comment text from comment line */
5941 for (line_ptr = line; *line_ptr; line_ptr++)
5942 if (*line_ptr != ' ' && *line_ptr != '\t' && *line_ptr != ';')
5945 strcpy(last_comment, line_ptr);
5950 /* extract level title text from line containing level title */
5951 if (line[0] == '\'')
5953 strcpy(level_name, &line[1]);
5955 if (strlen(level_name) > 0 && level_name[strlen(level_name) - 1] == '\'')
5956 level_name[strlen(level_name) - 1] = '\0';
5961 /* skip lines containing only spaces (or empty lines) */
5962 for (line_ptr = line; *line_ptr; line_ptr++)
5963 if (*line_ptr != ' ')
5965 if (*line_ptr == '\0')
5968 /* at this point, we have found a line containing part of a playfield */
5970 got_valid_playfield_line = TRUE;
5972 if (!reading_playfield)
5974 reading_playfield = TRUE;
5975 invalid_playfield_char = FALSE;
5977 for (x = 0; x < MAX_LEV_FIELDX; x++)
5978 for (y = 0; y < MAX_LEV_FIELDY; y++)
5979 level->field[x][y] = getMappedElement_SB(' ', load_xsb_to_ces);
5984 /* start with topmost tile row */
5988 /* skip playfield line if larger row than allowed */
5989 if (y >= MAX_LEV_FIELDY)
5992 /* start with leftmost tile column */
5995 /* read playfield elements from line */
5996 for (line_ptr = line; *line_ptr; line_ptr++)
5998 int mapped_sb_element = getMappedElement_SB(*line_ptr, load_xsb_to_ces);
6000 /* stop parsing playfield line if larger column than allowed */
6001 if (x >= MAX_LEV_FIELDX)
6004 if (mapped_sb_element == EL_UNDEFINED)
6006 invalid_playfield_char = TRUE;
6011 level->field[x][y] = mapped_sb_element;
6013 /* continue with next tile column */
6016 level->fieldx = MAX(x, level->fieldx);
6019 if (invalid_playfield_char)
6021 /* if first playfield line, treat invalid lines as comment lines */
6023 reading_playfield = FALSE;
6028 /* continue with next tile row */
6036 level->fieldx = MIN(MAX(MIN_LEV_FIELDX, level->fieldx), MAX_LEV_FIELDX);
6037 level->fieldy = MIN(MAX(MIN_LEV_FIELDY, level->fieldy), MAX_LEV_FIELDY);
6039 if (!reading_playfield)
6041 level->no_valid_file = TRUE;
6043 Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
6048 if (*level_name != '\0')
6050 strncpy(level->name, level_name, MAX_LEVEL_NAME_LEN);
6051 level->name[MAX_LEVEL_NAME_LEN] = '\0';
6053 else if (*last_comment != '\0')
6055 strncpy(level->name, last_comment, MAX_LEVEL_NAME_LEN);
6056 level->name[MAX_LEVEL_NAME_LEN] = '\0';
6060 sprintf(level->name, "--> Level %d <--", level_file_info->nr);
6063 /* set all empty fields beyond the border walls to invisible steel wall */
6064 for (y = 0; y < level->fieldy; y++) for (x = 0; x < level->fieldx; x++)
6066 if ((x == 0 || x == level->fieldx - 1 ||
6067 y == 0 || y == level->fieldy - 1) &&
6068 level->field[x][y] == getMappedElement_SB(' ', load_xsb_to_ces))
6069 FloodFillLevel(x, y, getMappedElement_SB('_', load_xsb_to_ces),
6070 level->field, level->fieldx, level->fieldy);
6073 /* set special level settings for Sokoban levels */
6076 level->use_step_counter = TRUE;
6078 if (load_xsb_to_ces)
6080 /* special global settings can now be set in level template */
6082 level->use_custom_template = TRUE;
6087 /* ------------------------------------------------------------------------- */
6088 /* functions for handling native levels */
6089 /* ------------------------------------------------------------------------- */
6091 static void LoadLevelFromFileInfo_EM(struct LevelInfo *level,
6092 struct LevelFileInfo *level_file_info,
6093 boolean level_info_only)
6095 if (!LoadNativeLevel_EM(level_file_info->filename, level_info_only))
6096 level->no_valid_file = TRUE;
6099 static void LoadLevelFromFileInfo_SP(struct LevelInfo *level,
6100 struct LevelFileInfo *level_file_info,
6101 boolean level_info_only)
6105 /* determine position of requested level inside level package */
6106 if (level_file_info->packed)
6107 pos = level_file_info->nr - leveldir_current->first_level;
6109 if (!LoadNativeLevel_SP(level_file_info->filename, pos, level_info_only))
6110 level->no_valid_file = TRUE;
6113 static void LoadLevelFromFileInfo_MM(struct LevelInfo *level,
6114 struct LevelFileInfo *level_file_info,
6115 boolean level_info_only)
6117 if (!LoadNativeLevel_MM(level_file_info->filename, level_info_only))
6118 level->no_valid_file = TRUE;
6121 void CopyNativeLevel_RND_to_Native(struct LevelInfo *level)
6123 if (level->game_engine_type == GAME_ENGINE_TYPE_EM)
6124 CopyNativeLevel_RND_to_EM(level);
6125 else if (level->game_engine_type == GAME_ENGINE_TYPE_SP)
6126 CopyNativeLevel_RND_to_SP(level);
6127 else if (level->game_engine_type == GAME_ENGINE_TYPE_MM)
6128 CopyNativeLevel_RND_to_MM(level);
6131 void CopyNativeLevel_Native_to_RND(struct LevelInfo *level)
6133 if (level->game_engine_type == GAME_ENGINE_TYPE_EM)
6134 CopyNativeLevel_EM_to_RND(level);
6135 else if (level->game_engine_type == GAME_ENGINE_TYPE_SP)
6136 CopyNativeLevel_SP_to_RND(level);
6137 else if (level->game_engine_type == GAME_ENGINE_TYPE_MM)
6138 CopyNativeLevel_MM_to_RND(level);
6141 void SaveNativeLevel(struct LevelInfo *level)
6143 if (level->game_engine_type == GAME_ENGINE_TYPE_SP)
6145 char *basename = getSingleLevelBasenameExt(level->file_info.nr, "sp");
6146 char *filename = getLevelFilenameFromBasename(basename);
6148 CopyNativeLevel_RND_to_SP(level);
6149 CopyNativeTape_RND_to_SP(level);
6151 SaveNativeLevel_SP(filename);
6156 /* ------------------------------------------------------------------------- */
6157 /* functions for loading generic level */
6158 /* ------------------------------------------------------------------------- */
6160 static void LoadLevelFromFileInfo(struct LevelInfo *level,
6161 struct LevelFileInfo *level_file_info,
6162 boolean level_info_only)
6164 /* always start with reliable default values */
6165 setLevelInfoToDefaults(level, level_info_only, TRUE);
6167 switch (level_file_info->type)
6169 case LEVEL_FILE_TYPE_RND:
6170 LoadLevelFromFileInfo_RND(level, level_file_info, level_info_only);
6173 case LEVEL_FILE_TYPE_EM:
6174 LoadLevelFromFileInfo_EM(level, level_file_info, level_info_only);
6175 level->game_engine_type = GAME_ENGINE_TYPE_EM;
6178 case LEVEL_FILE_TYPE_SP:
6179 LoadLevelFromFileInfo_SP(level, level_file_info, level_info_only);
6180 level->game_engine_type = GAME_ENGINE_TYPE_SP;
6183 case LEVEL_FILE_TYPE_MM:
6184 LoadLevelFromFileInfo_MM(level, level_file_info, level_info_only);
6185 level->game_engine_type = GAME_ENGINE_TYPE_MM;
6188 case LEVEL_FILE_TYPE_DC:
6189 LoadLevelFromFileInfo_DC(level, level_file_info, level_info_only);
6192 case LEVEL_FILE_TYPE_SB:
6193 LoadLevelFromFileInfo_SB(level, level_file_info, level_info_only);
6197 LoadLevelFromFileInfo_RND(level, level_file_info, level_info_only);
6201 /* if level file is invalid, restore level structure to default values */
6202 if (level->no_valid_file)
6203 setLevelInfoToDefaults(level, level_info_only, FALSE);
6205 if (level->game_engine_type == GAME_ENGINE_TYPE_UNKNOWN)
6206 level->game_engine_type = GAME_ENGINE_TYPE_RND;
6208 if (level_file_info->type != LEVEL_FILE_TYPE_RND)
6209 CopyNativeLevel_Native_to_RND(level);
6212 void LoadLevelFromFilename(struct LevelInfo *level, char *filename)
6214 static struct LevelFileInfo level_file_info;
6216 /* always start with reliable default values */
6217 setFileInfoToDefaults(&level_file_info);
6219 level_file_info.nr = 0; /* unknown level number */
6220 level_file_info.type = LEVEL_FILE_TYPE_RND; /* no others supported yet */
6222 setString(&level_file_info.filename, filename);
6224 LoadLevelFromFileInfo(level, &level_file_info, FALSE);
6227 static void LoadLevel_InitVersion(struct LevelInfo *level)
6231 if (leveldir_current == NULL) /* only when dumping level */
6234 /* all engine modifications also valid for levels which use latest engine */
6235 if (level->game_version < VERSION_IDENT(3,2,0,5))
6237 /* time bonus score was given for 10 s instead of 1 s before 3.2.0-5 */
6238 level->score[SC_TIME_BONUS] /= 10;
6241 if (leveldir_current->latest_engine)
6243 /* ---------- use latest game engine ----------------------------------- */
6245 /* For all levels which are forced to use the latest game engine version
6246 (normally all but user contributed, private and undefined levels), set
6247 the game engine version to the actual version; this allows for actual
6248 corrections in the game engine to take effect for existing, converted
6249 levels (from "classic" or other existing games) to make the emulation
6250 of the corresponding game more accurate, while (hopefully) not breaking
6251 existing levels created from other players. */
6253 level->game_version = GAME_VERSION_ACTUAL;
6255 /* Set special EM style gems behaviour: EM style gems slip down from
6256 normal, steel and growing wall. As this is a more fundamental change,
6257 it seems better to set the default behaviour to "off" (as it is more
6258 natural) and make it configurable in the level editor (as a property
6259 of gem style elements). Already existing converted levels (neither
6260 private nor contributed levels) are changed to the new behaviour. */
6262 if (level->file_version < FILE_VERSION_2_0)
6263 level->em_slippery_gems = TRUE;
6268 /* ---------- use game engine the level was created with ----------------- */
6270 /* For all levels which are not forced to use the latest game engine
6271 version (normally user contributed, private and undefined levels),
6272 use the version of the game engine the levels were created for.
6274 Since 2.0.1, the game engine version is now directly stored
6275 in the level file (chunk "VERS"), so there is no need anymore
6276 to set the game version from the file version (except for old,
6277 pre-2.0 levels, where the game version is still taken from the
6278 file format version used to store the level -- see above). */
6280 /* player was faster than enemies in 1.0.0 and before */
6281 if (level->file_version == FILE_VERSION_1_0)
6282 for (i = 0; i < MAX_PLAYERS; i++)
6283 level->initial_player_stepsize[i] = STEPSIZE_FAST;
6285 /* default behaviour for EM style gems was "slippery" only in 2.0.1 */
6286 if (level->game_version == VERSION_IDENT(2,0,1,0))
6287 level->em_slippery_gems = TRUE;
6289 /* springs could be pushed over pits before (pre-release version) 2.2.0 */
6290 if (level->game_version < VERSION_IDENT(2,2,0,0))
6291 level->use_spring_bug = TRUE;
6293 if (level->game_version < VERSION_IDENT(3,2,0,5))
6295 /* time orb caused limited time in endless time levels before 3.2.0-5 */
6296 level->use_time_orb_bug = TRUE;
6298 /* default behaviour for snapping was "no snap delay" before 3.2.0-5 */
6299 level->block_snap_field = FALSE;
6301 /* extra time score was same value as time left score before 3.2.0-5 */
6302 level->extra_time_score = level->score[SC_TIME_BONUS];
6305 if (level->game_version < VERSION_IDENT(3,2,0,7))
6307 /* default behaviour for snapping was "not continuous" before 3.2.0-7 */
6308 level->continuous_snapping = FALSE;
6311 /* only few elements were able to actively move into acid before 3.1.0 */
6312 /* trigger settings did not exist before 3.1.0; set to default "any" */
6313 if (level->game_version < VERSION_IDENT(3,1,0,0))
6315 /* correct "can move into acid" settings (all zero in old levels) */
6317 level->can_move_into_acid_bits = 0; /* nothing can move into acid */
6318 level->dont_collide_with_bits = 0; /* nothing is deadly when colliding */
6320 setMoveIntoAcidProperty(level, EL_ROBOT, TRUE);
6321 setMoveIntoAcidProperty(level, EL_SATELLITE, TRUE);
6322 setMoveIntoAcidProperty(level, EL_PENGUIN, TRUE);
6323 setMoveIntoAcidProperty(level, EL_BALLOON, TRUE);
6325 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6326 SET_PROPERTY(EL_CUSTOM_START + i, EP_CAN_MOVE_INTO_ACID, TRUE);
6328 /* correct trigger settings (stored as zero == "none" in old levels) */
6330 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6332 int element = EL_CUSTOM_START + i;
6333 struct ElementInfo *ei = &element_info[element];
6335 for (j = 0; j < ei->num_change_pages; j++)
6337 struct ElementChangeInfo *change = &ei->change_page[j];
6339 change->trigger_player = CH_PLAYER_ANY;
6340 change->trigger_page = CH_PAGE_ANY;
6345 /* try to detect and fix "Snake Bite" levels, which are broken with 3.2.0 */
6347 int element = EL_CUSTOM_256;
6348 struct ElementInfo *ei = &element_info[element];
6349 struct ElementChangeInfo *change = &ei->change_page[0];
6351 /* This is needed to fix a problem that was caused by a bugfix in function
6352 game.c/CreateFieldExt() introduced with 3.2.0 that corrects the behaviour
6353 when a custom element changes to EL_SOKOBAN_FIELD_PLAYER (before, it did
6354 not replace walkable elements, but instead just placed the player on it,
6355 without placing the Sokoban field under the player). Unfortunately, this
6356 breaks "Snake Bite" style levels when the snake is halfway through a door
6357 that just closes (the snake head is still alive and can be moved in this
6358 case). This can be fixed by replacing the EL_SOKOBAN_FIELD_PLAYER by the
6359 player (without Sokoban element) which then gets killed as designed). */
6361 if ((strncmp(leveldir_current->identifier, "snake_bite", 10) == 0 ||
6362 strncmp(ei->description, "pause b4 death", 14) == 0) &&
6363 change->target_element == EL_SOKOBAN_FIELD_PLAYER)
6364 change->target_element = EL_PLAYER_1;
6367 /* try to detect and fix "Zelda" style levels, which are broken with 3.2.5 */
6368 if (level->game_version < VERSION_IDENT(3,2,5,0))
6370 /* This is needed to fix a problem that was caused by a bugfix in function
6371 game.c/CheckTriggeredElementChangeExt() introduced with 3.2.5 that
6372 corrects the behaviour when a custom element changes to another custom
6373 element with a higher element number that has change actions defined.
6374 Normally, only one change per frame is allowed for custom elements.
6375 Therefore, it is checked if a custom element already changed in the
6376 current frame; if it did, subsequent changes are suppressed.
6377 Unfortunately, this is only checked for element changes, but not for
6378 change actions, which are still executed. As the function above loops
6379 through all custom elements from lower to higher, an element change
6380 resulting in a lower CE number won't be checked again, while a target
6381 element with a higher number will also be checked, and potential change
6382 actions will get executed for this CE, too (which is wrong), while
6383 further changes are ignored (which is correct). As this bugfix breaks
6384 Zelda II (and introduces graphical bugs to Zelda I, and also breaks a
6385 few other levels like Alan Bond's "FMV"), allow the previous, incorrect
6386 behaviour for existing levels and tapes that make use of this bug */
6388 level->use_action_after_change_bug = TRUE;
6391 /* not centering level after relocating player was default only in 3.2.3 */
6392 if (level->game_version == VERSION_IDENT(3,2,3,0)) /* (no pre-releases) */
6393 level->shifted_relocation = TRUE;
6395 /* EM style elements always chain-exploded in R'n'D engine before 3.2.6 */
6396 if (level->game_version < VERSION_IDENT(3,2,6,0))
6397 level->em_explodes_by_fire = TRUE;
6400 static void LoadLevel_InitStandardElements(struct LevelInfo *level)
6404 /* map elements that have changed in newer versions */
6405 level->amoeba_content = getMappedElementByVersion(level->amoeba_content,
6406 level->game_version);
6407 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6408 for (x = 0; x < 3; x++)
6409 for (y = 0; y < 3; y++)
6410 level->yamyam_content[i].e[x][y] =
6411 getMappedElementByVersion(level->yamyam_content[i].e[x][y],
6412 level->game_version);
6416 static void LoadLevel_InitCustomElements(struct LevelInfo *level)
6420 /* map custom element change events that have changed in newer versions
6421 (these following values were accidentally changed in version 3.0.1)
6422 (this seems to be needed only for 'ab_levelset3' and 'ab_levelset4') */
6423 if (level->game_version <= VERSION_IDENT(3,0,0,0))
6425 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6427 int element = EL_CUSTOM_START + i;
6429 /* order of checking and copying events to be mapped is important */
6430 /* (do not change the start and end value -- they are constant) */
6431 for (j = CE_BY_OTHER_ACTION; j >= CE_VALUE_GETS_ZERO; j--)
6433 if (HAS_CHANGE_EVENT(element, j - 2))
6435 SET_CHANGE_EVENT(element, j - 2, FALSE);
6436 SET_CHANGE_EVENT(element, j, TRUE);
6440 /* order of checking and copying events to be mapped is important */
6441 /* (do not change the start and end value -- they are constant) */
6442 for (j = CE_PLAYER_COLLECTS_X; j >= CE_HITTING_SOMETHING; j--)
6444 if (HAS_CHANGE_EVENT(element, j - 1))
6446 SET_CHANGE_EVENT(element, j - 1, FALSE);
6447 SET_CHANGE_EVENT(element, j, TRUE);
6453 /* initialize "can_change" field for old levels with only one change page */
6454 if (level->game_version <= VERSION_IDENT(3,0,2,0))
6456 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6458 int element = EL_CUSTOM_START + i;
6460 if (CAN_CHANGE(element))
6461 element_info[element].change->can_change = TRUE;
6465 /* correct custom element values (for old levels without these options) */
6466 if (level->game_version < VERSION_IDENT(3,1,1,0))
6468 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6470 int element = EL_CUSTOM_START + i;
6471 struct ElementInfo *ei = &element_info[element];
6473 if (ei->access_direction == MV_NO_DIRECTION)
6474 ei->access_direction = MV_ALL_DIRECTIONS;
6478 /* correct custom element values (fix invalid values for all versions) */
6481 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6483 int element = EL_CUSTOM_START + i;
6484 struct ElementInfo *ei = &element_info[element];
6486 for (j = 0; j < ei->num_change_pages; j++)
6488 struct ElementChangeInfo *change = &ei->change_page[j];
6490 if (change->trigger_player == CH_PLAYER_NONE)
6491 change->trigger_player = CH_PLAYER_ANY;
6493 if (change->trigger_side == CH_SIDE_NONE)
6494 change->trigger_side = CH_SIDE_ANY;
6499 /* initialize "can_explode" field for old levels which did not store this */
6500 /* !!! CHECK THIS -- "<= 3,1,0,0" IS PROBABLY WRONG !!! */
6501 if (level->game_version <= VERSION_IDENT(3,1,0,0))
6503 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6505 int element = EL_CUSTOM_START + i;
6507 if (EXPLODES_1X1_OLD(element))
6508 element_info[element].explosion_type = EXPLODES_1X1;
6510 SET_PROPERTY(element, EP_CAN_EXPLODE, (EXPLODES_BY_FIRE(element) ||
6511 EXPLODES_SMASHED(element) ||
6512 EXPLODES_IMPACT(element)));
6516 /* correct previously hard-coded move delay values for maze runner style */
6517 if (level->game_version < VERSION_IDENT(3,1,1,0))
6519 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6521 int element = EL_CUSTOM_START + i;
6523 if (element_info[element].move_pattern & MV_MAZE_RUNNER_STYLE)
6525 /* previously hard-coded and therefore ignored */
6526 element_info[element].move_delay_fixed = 9;
6527 element_info[element].move_delay_random = 0;
6532 /* set some other uninitialized values of custom elements in older levels */
6533 if (level->game_version < VERSION_IDENT(3,1,0,0))
6535 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6537 int element = EL_CUSTOM_START + i;
6539 element_info[element].access_direction = MV_ALL_DIRECTIONS;
6541 element_info[element].explosion_delay = 17;
6542 element_info[element].ignition_delay = 8;
6547 static void LoadLevel_InitElements(struct LevelInfo *level)
6549 LoadLevel_InitStandardElements(level);
6551 if (level->file_has_custom_elements)
6552 LoadLevel_InitCustomElements(level);
6554 /* initialize element properties for level editor etc. */
6555 InitElementPropertiesEngine(level->game_version);
6556 InitElementPropertiesGfxElement();
6559 static void LoadLevel_InitPlayfield(struct LevelInfo *level)
6563 /* map elements that have changed in newer versions */
6564 for (y = 0; y < level->fieldy; y++)
6565 for (x = 0; x < level->fieldx; x++)
6566 level->field[x][y] = getMappedElementByVersion(level->field[x][y],
6567 level->game_version);
6569 /* clear unused playfield data (nicer if level gets resized in editor) */
6570 for (x = 0; x < MAX_LEV_FIELDX; x++)
6571 for (y = 0; y < MAX_LEV_FIELDY; y++)
6572 if (x >= level->fieldx || y >= level->fieldy)
6573 level->field[x][y] = EL_EMPTY;
6575 /* copy elements to runtime playfield array */
6576 for (x = 0; x < MAX_LEV_FIELDX; x++)
6577 for (y = 0; y < MAX_LEV_FIELDY; y++)
6578 Feld[x][y] = level->field[x][y];
6580 /* initialize level size variables for faster access */
6581 lev_fieldx = level->fieldx;
6582 lev_fieldy = level->fieldy;
6584 /* determine border element for this level */
6585 if (level->file_info.type == LEVEL_FILE_TYPE_DC)
6586 BorderElement = EL_EMPTY; /* (in editor, SetBorderElement() is used) */
6591 static void LoadLevel_InitNativeEngines(struct LevelInfo *level)
6593 struct LevelFileInfo *level_file_info = &level->file_info;
6595 if (level_file_info->type == LEVEL_FILE_TYPE_RND)
6596 CopyNativeLevel_RND_to_Native(level);
6599 static void LoadLevelTemplate_LoadAndInit()
6601 LoadLevelFromFileInfo(&level_template, &level_template.file_info, FALSE);
6603 LoadLevel_InitVersion(&level_template);
6604 LoadLevel_InitElements(&level_template);
6606 ActivateLevelTemplate();
6609 void LoadLevelTemplate(int nr)
6611 if (!fileExists(getGlobalLevelTemplateFilename()))
6613 Error(ERR_WARN, "no level template found for this level");
6618 setLevelFileInfo(&level_template.file_info, nr);
6620 LoadLevelTemplate_LoadAndInit();
6623 static void LoadLevelTemplateFromNetwork(struct LevelFileInfo *lfi_network_template)
6625 copyLevelFileInfo(lfi_network_template, &level_template.file_info);
6627 LoadLevelTemplate_LoadAndInit();
6630 static void LoadLevel_LoadAndInit(struct LevelFileInfo *lfi_network_template)
6632 LoadLevelFromFileInfo(&level, &level.file_info, FALSE);
6634 if (level.use_custom_template)
6636 if (lfi_network_template != NULL)
6637 LoadLevelTemplateFromNetwork(lfi_network_template);
6639 LoadLevelTemplate(-1);
6642 LoadLevel_InitVersion(&level);
6643 LoadLevel_InitElements(&level);
6644 LoadLevel_InitPlayfield(&level);
6646 LoadLevel_InitNativeEngines(&level);
6649 void LoadLevel(int nr)
6651 SetLevelSetInfo(leveldir_current->identifier, nr);
6653 setLevelFileInfo(&level.file_info, nr);
6655 LoadLevel_LoadAndInit(NULL);
6658 void LoadLevelInfoOnly(int nr)
6660 setLevelFileInfo(&level.file_info, nr);
6662 LoadLevelFromFileInfo(&level, &level.file_info, TRUE);
6665 void LoadLevelFromNetwork(struct LevelFileInfo *lfi_network_level,
6666 struct LevelFileInfo *lfi_network_template)
6668 copyLevelFileInfo(lfi_network_level, &level.file_info);
6670 LoadLevel_LoadAndInit(lfi_network_template);
6673 static int SaveLevel_VERS(FILE *file, struct LevelInfo *level)
6677 chunk_size += putFileVersion(file, level->file_version);
6678 chunk_size += putFileVersion(file, level->game_version);
6683 static int SaveLevel_DATE(FILE *file, struct LevelInfo *level)
6687 chunk_size += putFile16BitBE(file, level->creation_date.year);
6688 chunk_size += putFile8Bit(file, level->creation_date.month);
6689 chunk_size += putFile8Bit(file, level->creation_date.day);
6694 #if ENABLE_HISTORIC_CHUNKS
6695 static void SaveLevel_HEAD(FILE *file, struct LevelInfo *level)
6699 putFile8Bit(file, level->fieldx);
6700 putFile8Bit(file, level->fieldy);
6702 putFile16BitBE(file, level->time);
6703 putFile16BitBE(file, level->gems_needed);
6705 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
6706 putFile8Bit(file, level->name[i]);
6708 for (i = 0; i < LEVEL_SCORE_ELEMENTS; i++)
6709 putFile8Bit(file, level->score[i]);
6711 for (i = 0; i < STD_ELEMENT_CONTENTS; i++)
6712 for (y = 0; y < 3; y++)
6713 for (x = 0; x < 3; x++)
6714 putFile8Bit(file, (level->encoding_16bit_yamyam ? EL_EMPTY :
6715 level->yamyam_content[i].e[x][y]));
6716 putFile8Bit(file, level->amoeba_speed);
6717 putFile8Bit(file, level->time_magic_wall);
6718 putFile8Bit(file, level->time_wheel);
6719 putFile8Bit(file, (level->encoding_16bit_amoeba ? EL_EMPTY :
6720 level->amoeba_content));
6721 putFile8Bit(file, (level->initial_player_stepsize == STEPSIZE_FAST ? 1 : 0));
6722 putFile8Bit(file, (level->initial_gravity ? 1 : 0));
6723 putFile8Bit(file, (level->encoding_16bit_field ? 1 : 0));
6724 putFile8Bit(file, (level->em_slippery_gems ? 1 : 0));
6726 putFile8Bit(file, (level->use_custom_template ? 1 : 0));
6728 putFile8Bit(file, (level->block_last_field ? 1 : 0));
6729 putFile8Bit(file, (level->sp_block_last_field ? 1 : 0));
6730 putFile32BitBE(file, level->can_move_into_acid_bits);
6731 putFile8Bit(file, level->dont_collide_with_bits);
6733 putFile8Bit(file, (level->use_spring_bug ? 1 : 0));
6734 putFile8Bit(file, (level->use_step_counter ? 1 : 0));
6736 putFile8Bit(file, (level->instant_relocation ? 1 : 0));
6737 putFile8Bit(file, (level->can_pass_to_walkable ? 1 : 0));
6738 putFile8Bit(file, (level->grow_into_diggable ? 1 : 0));
6740 putFile8Bit(file, level->game_engine_type);
6742 WriteUnusedBytesToFile(file, LEVEL_CHUNK_HEAD_UNUSED);
6746 static int SaveLevel_NAME(FILE *file, struct LevelInfo *level)
6751 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
6752 chunk_size += putFile8Bit(file, level->name[i]);
6757 static int SaveLevel_AUTH(FILE *file, struct LevelInfo *level)
6762 for (i = 0; i < MAX_LEVEL_AUTHOR_LEN; i++)
6763 chunk_size += putFile8Bit(file, level->author[i]);
6768 #if ENABLE_HISTORIC_CHUNKS
6769 static int SaveLevel_BODY(FILE *file, struct LevelInfo *level)
6774 for (y = 0; y < level->fieldy; y++)
6775 for (x = 0; x < level->fieldx; x++)
6776 if (level->encoding_16bit_field)
6777 chunk_size += putFile16BitBE(file, level->field[x][y]);
6779 chunk_size += putFile8Bit(file, level->field[x][y]);
6785 static int SaveLevel_BODY(FILE *file, struct LevelInfo *level)
6790 for (y = 0; y < level->fieldy; y++)
6791 for (x = 0; x < level->fieldx; x++)
6792 chunk_size += putFile16BitBE(file, level->field[x][y]);
6797 #if ENABLE_HISTORIC_CHUNKS
6798 static void SaveLevel_CONT(FILE *file, struct LevelInfo *level)
6802 putFile8Bit(file, EL_YAMYAM);
6803 putFile8Bit(file, level->num_yamyam_contents);
6804 putFile8Bit(file, 0);
6805 putFile8Bit(file, 0);
6807 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6808 for (y = 0; y < 3; y++)
6809 for (x = 0; x < 3; x++)
6810 if (level->encoding_16bit_field)
6811 putFile16BitBE(file, level->yamyam_content[i].e[x][y]);
6813 putFile8Bit(file, level->yamyam_content[i].e[x][y]);
6817 #if ENABLE_HISTORIC_CHUNKS
6818 static void SaveLevel_CNT2(FILE *file, struct LevelInfo *level, int element)
6821 int num_contents, content_xsize, content_ysize;
6822 int content_array[MAX_ELEMENT_CONTENTS][3][3];
6824 if (element == EL_YAMYAM)
6826 num_contents = level->num_yamyam_contents;
6830 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6831 for (y = 0; y < 3; y++)
6832 for (x = 0; x < 3; x++)
6833 content_array[i][x][y] = level->yamyam_content[i].e[x][y];
6835 else if (element == EL_BD_AMOEBA)
6841 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6842 for (y = 0; y < 3; y++)
6843 for (x = 0; x < 3; x++)
6844 content_array[i][x][y] = EL_EMPTY;
6845 content_array[0][0][0] = level->amoeba_content;
6849 /* chunk header already written -- write empty chunk data */
6850 WriteUnusedBytesToFile(file, LEVEL_CHUNK_CNT2_SIZE);
6852 Error(ERR_WARN, "cannot save content for element '%d'", element);
6856 putFile16BitBE(file, element);
6857 putFile8Bit(file, num_contents);
6858 putFile8Bit(file, content_xsize);
6859 putFile8Bit(file, content_ysize);
6861 WriteUnusedBytesToFile(file, LEVEL_CHUNK_CNT2_UNUSED);
6863 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6864 for (y = 0; y < 3; y++)
6865 for (x = 0; x < 3; x++)
6866 putFile16BitBE(file, content_array[i][x][y]);
6870 #if ENABLE_HISTORIC_CHUNKS
6871 static int SaveLevel_CNT3(FILE *file, struct LevelInfo *level, int element)
6873 int envelope_nr = element - EL_ENVELOPE_1;
6874 int envelope_len = strlen(level->envelope_text[envelope_nr]) + 1;
6878 chunk_size += putFile16BitBE(file, element);
6879 chunk_size += putFile16BitBE(file, envelope_len);
6880 chunk_size += putFile8Bit(file, level->envelope_xsize[envelope_nr]);
6881 chunk_size += putFile8Bit(file, level->envelope_ysize[envelope_nr]);
6883 WriteUnusedBytesToFile(file, LEVEL_CHUNK_CNT3_UNUSED);
6884 chunk_size += LEVEL_CHUNK_CNT3_UNUSED;
6886 for (i = 0; i < envelope_len; i++)
6887 chunk_size += putFile8Bit(file, level->envelope_text[envelope_nr][i]);
6893 #if ENABLE_HISTORIC_CHUNKS
6894 static void SaveLevel_CUS1(FILE *file, struct LevelInfo *level,
6895 int num_changed_custom_elements)
6899 putFile16BitBE(file, num_changed_custom_elements);
6901 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6903 int element = EL_CUSTOM_START + i;
6905 struct ElementInfo *ei = &element_info[element];
6907 if (ei->properties[EP_BITFIELD_BASE_NR] != EP_BITMASK_DEFAULT)
6909 if (check < num_changed_custom_elements)
6911 putFile16BitBE(file, element);
6912 putFile32BitBE(file, ei->properties[EP_BITFIELD_BASE_NR]);
6919 if (check != num_changed_custom_elements) /* should not happen */
6920 Error(ERR_WARN, "inconsistent number of custom element properties");
6924 #if ENABLE_HISTORIC_CHUNKS
6925 static void SaveLevel_CUS2(FILE *file, struct LevelInfo *level,
6926 int num_changed_custom_elements)
6930 putFile16BitBE(file, num_changed_custom_elements);
6932 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6934 int element = EL_CUSTOM_START + i;
6936 if (element_info[element].change->target_element != EL_EMPTY_SPACE)
6938 if (check < num_changed_custom_elements)
6940 putFile16BitBE(file, element);
6941 putFile16BitBE(file, element_info[element].change->target_element);
6948 if (check != num_changed_custom_elements) /* should not happen */
6949 Error(ERR_WARN, "inconsistent number of custom target elements");
6953 #if ENABLE_HISTORIC_CHUNKS
6954 static void SaveLevel_CUS3(FILE *file, struct LevelInfo *level,
6955 int num_changed_custom_elements)
6957 int i, j, x, y, check = 0;
6959 putFile16BitBE(file, num_changed_custom_elements);
6961 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6963 int element = EL_CUSTOM_START + i;
6964 struct ElementInfo *ei = &element_info[element];
6966 if (ei->modified_settings)
6968 if (check < num_changed_custom_elements)
6970 putFile16BitBE(file, element);
6972 for (j = 0; j < MAX_ELEMENT_NAME_LEN; j++)
6973 putFile8Bit(file, ei->description[j]);
6975 putFile32BitBE(file, ei->properties[EP_BITFIELD_BASE_NR]);
6977 /* some free bytes for future properties and padding */
6978 WriteUnusedBytesToFile(file, 7);
6980 putFile8Bit(file, ei->use_gfx_element);
6981 putFile16BitBE(file, ei->gfx_element_initial);
6983 putFile8Bit(file, ei->collect_score_initial);
6984 putFile8Bit(file, ei->collect_count_initial);
6986 putFile16BitBE(file, ei->push_delay_fixed);
6987 putFile16BitBE(file, ei->push_delay_random);
6988 putFile16BitBE(file, ei->move_delay_fixed);
6989 putFile16BitBE(file, ei->move_delay_random);
6991 putFile16BitBE(file, ei->move_pattern);
6992 putFile8Bit(file, ei->move_direction_initial);
6993 putFile8Bit(file, ei->move_stepsize);
6995 for (y = 0; y < 3; y++)
6996 for (x = 0; x < 3; x++)
6997 putFile16BitBE(file, ei->content.e[x][y]);
6999 putFile32BitBE(file, ei->change->events);
7001 putFile16BitBE(file, ei->change->target_element);
7003 putFile16BitBE(file, ei->change->delay_fixed);
7004 putFile16BitBE(file, ei->change->delay_random);
7005 putFile16BitBE(file, ei->change->delay_frames);
7007 putFile16BitBE(file, ei->change->initial_trigger_element);
7009 putFile8Bit(file, ei->change->explode);
7010 putFile8Bit(file, ei->change->use_target_content);
7011 putFile8Bit(file, ei->change->only_if_complete);
7012 putFile8Bit(file, ei->change->use_random_replace);
7014 putFile8Bit(file, ei->change->random_percentage);
7015 putFile8Bit(file, ei->change->replace_when);
7017 for (y = 0; y < 3; y++)
7018 for (x = 0; x < 3; x++)
7019 putFile16BitBE(file, ei->change->content.e[x][y]);
7021 putFile8Bit(file, ei->slippery_type);
7023 /* some free bytes for future properties and padding */
7024 WriteUnusedBytesToFile(file, LEVEL_CPART_CUS3_UNUSED);
7031 if (check != num_changed_custom_elements) /* should not happen */
7032 Error(ERR_WARN, "inconsistent number of custom element properties");
7036 #if ENABLE_HISTORIC_CHUNKS
7037 static void SaveLevel_CUS4(FILE *file, struct LevelInfo *level, int element)
7039 struct ElementInfo *ei = &element_info[element];
7042 /* ---------- custom element base property values (96 bytes) ------------- */
7044 putFile16BitBE(file, element);
7046 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
7047 putFile8Bit(file, ei->description[i]);
7049 putFile32BitBE(file, ei->properties[EP_BITFIELD_BASE_NR]);
7051 WriteUnusedBytesToFile(file, 4); /* reserved for more base properties */
7053 putFile8Bit(file, ei->num_change_pages);
7055 putFile16BitBE(file, ei->ce_value_fixed_initial);
7056 putFile16BitBE(file, ei->ce_value_random_initial);
7057 putFile8Bit(file, ei->use_last_ce_value);
7059 putFile8Bit(file, ei->use_gfx_element);
7060 putFile16BitBE(file, ei->gfx_element_initial);
7062 putFile8Bit(file, ei->collect_score_initial);
7063 putFile8Bit(file, ei->collect_count_initial);
7065 putFile8Bit(file, ei->drop_delay_fixed);
7066 putFile8Bit(file, ei->push_delay_fixed);
7067 putFile8Bit(file, ei->drop_delay_random);
7068 putFile8Bit(file, ei->push_delay_random);
7069 putFile16BitBE(file, ei->move_delay_fixed);
7070 putFile16BitBE(file, ei->move_delay_random);
7072 /* bits 0 - 15 of "move_pattern" ... */
7073 putFile16BitBE(file, ei->move_pattern & 0xffff);
7074 putFile8Bit(file, ei->move_direction_initial);
7075 putFile8Bit(file, ei->move_stepsize);
7077 putFile8Bit(file, ei->slippery_type);
7079 for (y = 0; y < 3; y++)
7080 for (x = 0; x < 3; x++)
7081 putFile16BitBE(file, ei->content.e[x][y]);
7083 putFile16BitBE(file, ei->move_enter_element);
7084 putFile16BitBE(file, ei->move_leave_element);
7085 putFile8Bit(file, ei->move_leave_type);
7087 /* ... bits 16 - 31 of "move_pattern" (not nice, but downward compatible) */
7088 putFile16BitBE(file, (ei->move_pattern >> 16) & 0xffff);
7090 putFile8Bit(file, ei->access_direction);
7092 putFile8Bit(file, ei->explosion_delay);
7093 putFile8Bit(file, ei->ignition_delay);
7094 putFile8Bit(file, ei->explosion_type);
7096 /* some free bytes for future custom property values and padding */
7097 WriteUnusedBytesToFile(file, 1);
7099 /* ---------- change page property values (48 bytes) --------------------- */
7101 for (i = 0; i < ei->num_change_pages; i++)
7103 struct ElementChangeInfo *change = &ei->change_page[i];
7104 unsigned int event_bits;
7106 /* bits 0 - 31 of "has_event[]" ... */
7108 for (j = 0; j < MIN(NUM_CHANGE_EVENTS, 32); j++)
7109 if (change->has_event[j])
7110 event_bits |= (1 << j);
7111 putFile32BitBE(file, event_bits);
7113 putFile16BitBE(file, change->target_element);
7115 putFile16BitBE(file, change->delay_fixed);
7116 putFile16BitBE(file, change->delay_random);
7117 putFile16BitBE(file, change->delay_frames);
7119 putFile16BitBE(file, change->initial_trigger_element);
7121 putFile8Bit(file, change->explode);
7122 putFile8Bit(file, change->use_target_content);
7123 putFile8Bit(file, change->only_if_complete);
7124 putFile8Bit(file, change->use_random_replace);
7126 putFile8Bit(file, change->random_percentage);
7127 putFile8Bit(file, change->replace_when);
7129 for (y = 0; y < 3; y++)
7130 for (x = 0; x < 3; x++)
7131 putFile16BitBE(file, change->target_content.e[x][y]);
7133 putFile8Bit(file, change->can_change);
7135 putFile8Bit(file, change->trigger_side);
7137 putFile8Bit(file, change->trigger_player);
7138 putFile8Bit(file, (change->trigger_page == CH_PAGE_ANY ? CH_PAGE_ANY_FILE :
7139 log_2(change->trigger_page)));
7141 putFile8Bit(file, change->has_action);
7142 putFile8Bit(file, change->action_type);
7143 putFile8Bit(file, change->action_mode);
7144 putFile16BitBE(file, change->action_arg);
7146 /* ... bits 32 - 39 of "has_event[]" (not nice, but downward compatible) */
7148 for (j = 32; j < NUM_CHANGE_EVENTS; j++)
7149 if (change->has_event[j])
7150 event_bits |= (1 << (j - 32));
7151 putFile8Bit(file, event_bits);
7156 #if ENABLE_HISTORIC_CHUNKS
7157 static void SaveLevel_GRP1(FILE *file, struct LevelInfo *level, int element)
7159 struct ElementInfo *ei = &element_info[element];
7160 struct ElementGroupInfo *group = ei->group;
7163 putFile16BitBE(file, element);
7165 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
7166 putFile8Bit(file, ei->description[i]);
7168 putFile8Bit(file, group->num_elements);
7170 putFile8Bit(file, ei->use_gfx_element);
7171 putFile16BitBE(file, ei->gfx_element_initial);
7173 putFile8Bit(file, group->choice_mode);
7175 /* some free bytes for future values and padding */
7176 WriteUnusedBytesToFile(file, 3);
7178 for (i = 0; i < MAX_ELEMENTS_IN_GROUP; i++)
7179 putFile16BitBE(file, group->element[i]);
7183 static int SaveLevel_MicroChunk(FILE *file, struct LevelFileConfigInfo *entry,
7184 boolean write_element)
7186 int save_type = entry->save_type;
7187 int data_type = entry->data_type;
7188 int conf_type = entry->conf_type;
7189 int byte_mask = conf_type & CONF_MASK_BYTES;
7190 int element = entry->element;
7191 int default_value = entry->default_value;
7193 boolean modified = FALSE;
7195 if (byte_mask != CONF_MASK_MULTI_BYTES)
7197 void *value_ptr = entry->value;
7198 int value = (data_type == TYPE_BOOLEAN ? *(boolean *)value_ptr :
7201 /* check if any settings have been modified before saving them */
7202 if (value != default_value)
7205 /* do not save if explicitly told or if unmodified default settings */
7206 if ((save_type == SAVE_CONF_NEVER) ||
7207 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
7211 num_bytes += putFile16BitBE(file, element);
7213 num_bytes += putFile8Bit(file, conf_type);
7214 num_bytes += (byte_mask == CONF_MASK_1_BYTE ? putFile8Bit (file, value) :
7215 byte_mask == CONF_MASK_2_BYTE ? putFile16BitBE(file, value) :
7216 byte_mask == CONF_MASK_4_BYTE ? putFile32BitBE(file, value) :
7219 else if (data_type == TYPE_STRING)
7221 char *default_string = entry->default_string;
7222 char *string = (char *)(entry->value);
7223 int string_length = strlen(string);
7226 /* check if any settings have been modified before saving them */
7227 if (!strEqual(string, default_string))
7230 /* do not save if explicitly told or if unmodified default settings */
7231 if ((save_type == SAVE_CONF_NEVER) ||
7232 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
7236 num_bytes += putFile16BitBE(file, element);
7238 num_bytes += putFile8Bit(file, conf_type);
7239 num_bytes += putFile16BitBE(file, string_length);
7241 for (i = 0; i < string_length; i++)
7242 num_bytes += putFile8Bit(file, string[i]);
7244 else if (data_type == TYPE_ELEMENT_LIST)
7246 int *element_array = (int *)(entry->value);
7247 int num_elements = *(int *)(entry->num_entities);
7250 /* check if any settings have been modified before saving them */
7251 for (i = 0; i < num_elements; i++)
7252 if (element_array[i] != default_value)
7255 /* do not save if explicitly told or if unmodified default settings */
7256 if ((save_type == SAVE_CONF_NEVER) ||
7257 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
7261 num_bytes += putFile16BitBE(file, element);
7263 num_bytes += putFile8Bit(file, conf_type);
7264 num_bytes += putFile16BitBE(file, num_elements * CONF_ELEMENT_NUM_BYTES);
7266 for (i = 0; i < num_elements; i++)
7267 num_bytes += putFile16BitBE(file, element_array[i]);
7269 else if (data_type == TYPE_CONTENT_LIST)
7271 struct Content *content = (struct Content *)(entry->value);
7272 int num_contents = *(int *)(entry->num_entities);
7275 /* check if any settings have been modified before saving them */
7276 for (i = 0; i < num_contents; i++)
7277 for (y = 0; y < 3; y++)
7278 for (x = 0; x < 3; x++)
7279 if (content[i].e[x][y] != default_value)
7282 /* do not save if explicitly told or if unmodified default settings */
7283 if ((save_type == SAVE_CONF_NEVER) ||
7284 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
7288 num_bytes += putFile16BitBE(file, element);
7290 num_bytes += putFile8Bit(file, conf_type);
7291 num_bytes += putFile16BitBE(file, num_contents * CONF_CONTENT_NUM_BYTES);
7293 for (i = 0; i < num_contents; i++)
7294 for (y = 0; y < 3; y++)
7295 for (x = 0; x < 3; x++)
7296 num_bytes += putFile16BitBE(file, content[i].e[x][y]);
7302 static int SaveLevel_INFO(FILE *file, struct LevelInfo *level)
7307 li = *level; /* copy level data into temporary buffer */
7309 for (i = 0; chunk_config_INFO[i].data_type != -1; i++)
7310 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_INFO[i], FALSE);
7315 static int SaveLevel_ELEM(FILE *file, struct LevelInfo *level)
7320 li = *level; /* copy level data into temporary buffer */
7322 for (i = 0; chunk_config_ELEM[i].data_type != -1; i++)
7323 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_ELEM[i], TRUE);
7328 static int SaveLevel_NOTE(FILE *file, struct LevelInfo *level, int element)
7330 int envelope_nr = element - EL_ENVELOPE_1;
7334 chunk_size += putFile16BitBE(file, element);
7336 /* copy envelope data into temporary buffer */
7337 xx_envelope = level->envelope[envelope_nr];
7339 for (i = 0; chunk_config_NOTE[i].data_type != -1; i++)
7340 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_NOTE[i], FALSE);
7345 static int SaveLevel_CUSX(FILE *file, struct LevelInfo *level, int element)
7347 struct ElementInfo *ei = &element_info[element];
7351 chunk_size += putFile16BitBE(file, element);
7353 xx_ei = *ei; /* copy element data into temporary buffer */
7355 /* set default description string for this specific element */
7356 strcpy(xx_default_description, getDefaultElementDescription(ei));
7358 for (i = 0; chunk_config_CUSX_base[i].data_type != -1; i++)
7359 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_CUSX_base[i], FALSE);
7361 for (i = 0; i < ei->num_change_pages; i++)
7363 struct ElementChangeInfo *change = &ei->change_page[i];
7365 xx_current_change_page = i;
7367 xx_change = *change; /* copy change data into temporary buffer */
7370 setEventBitsFromEventFlags(change);
7372 for (j = 0; chunk_config_CUSX_change[j].data_type != -1; j++)
7373 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_CUSX_change[j],
7380 static int SaveLevel_GRPX(FILE *file, struct LevelInfo *level, int element)
7382 struct ElementInfo *ei = &element_info[element];
7383 struct ElementGroupInfo *group = ei->group;
7387 chunk_size += putFile16BitBE(file, element);
7389 xx_ei = *ei; /* copy element data into temporary buffer */
7390 xx_group = *group; /* copy group data into temporary buffer */
7392 /* set default description string for this specific element */
7393 strcpy(xx_default_description, getDefaultElementDescription(ei));
7395 for (i = 0; chunk_config_GRPX[i].data_type != -1; i++)
7396 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_GRPX[i], FALSE);
7401 static void SaveLevelFromFilename(struct LevelInfo *level, char *filename,
7402 boolean save_as_template)
7408 if (!(file = fopen(filename, MODE_WRITE)))
7410 Error(ERR_WARN, "cannot save level file '%s'", filename);
7414 level->file_version = FILE_VERSION_ACTUAL;
7415 level->game_version = GAME_VERSION_ACTUAL;
7417 level->creation_date = getCurrentDate();
7419 putFileChunkBE(file, "RND1", CHUNK_SIZE_UNDEFINED);
7420 putFileChunkBE(file, "CAVE", CHUNK_SIZE_NONE);
7422 chunk_size = SaveLevel_VERS(NULL, level);
7423 putFileChunkBE(file, "VERS", chunk_size);
7424 SaveLevel_VERS(file, level);
7426 chunk_size = SaveLevel_DATE(NULL, level);
7427 putFileChunkBE(file, "DATE", chunk_size);
7428 SaveLevel_DATE(file, level);
7430 chunk_size = SaveLevel_NAME(NULL, level);
7431 putFileChunkBE(file, "NAME", chunk_size);
7432 SaveLevel_NAME(file, level);
7434 chunk_size = SaveLevel_AUTH(NULL, level);
7435 putFileChunkBE(file, "AUTH", chunk_size);
7436 SaveLevel_AUTH(file, level);
7438 chunk_size = SaveLevel_INFO(NULL, level);
7439 putFileChunkBE(file, "INFO", chunk_size);
7440 SaveLevel_INFO(file, level);
7442 chunk_size = SaveLevel_BODY(NULL, level);
7443 putFileChunkBE(file, "BODY", chunk_size);
7444 SaveLevel_BODY(file, level);
7446 chunk_size = SaveLevel_ELEM(NULL, level);
7447 if (chunk_size > LEVEL_CHUNK_ELEM_UNCHANGED) /* save if changed */
7449 putFileChunkBE(file, "ELEM", chunk_size);
7450 SaveLevel_ELEM(file, level);
7453 for (i = 0; i < NUM_ENVELOPES; i++)
7455 int element = EL_ENVELOPE_1 + i;
7457 chunk_size = SaveLevel_NOTE(NULL, level, element);
7458 if (chunk_size > LEVEL_CHUNK_NOTE_UNCHANGED) /* save if changed */
7460 putFileChunkBE(file, "NOTE", chunk_size);
7461 SaveLevel_NOTE(file, level, element);
7465 /* if not using template level, check for non-default custom/group elements */
7466 if (!level->use_custom_template || save_as_template)
7468 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
7470 int element = EL_CUSTOM_START + i;
7472 chunk_size = SaveLevel_CUSX(NULL, level, element);
7473 if (chunk_size > LEVEL_CHUNK_CUSX_UNCHANGED) /* save if changed */
7475 putFileChunkBE(file, "CUSX", chunk_size);
7476 SaveLevel_CUSX(file, level, element);
7480 for (i = 0; i < NUM_GROUP_ELEMENTS; i++)
7482 int element = EL_GROUP_START + i;
7484 chunk_size = SaveLevel_GRPX(NULL, level, element);
7485 if (chunk_size > LEVEL_CHUNK_GRPX_UNCHANGED) /* save if changed */
7487 putFileChunkBE(file, "GRPX", chunk_size);
7488 SaveLevel_GRPX(file, level, element);
7495 SetFilePermissions(filename, PERMS_PRIVATE);
7498 void SaveLevel(int nr)
7500 char *filename = getDefaultLevelFilename(nr);
7502 SaveLevelFromFilename(&level, filename, FALSE);
7505 void SaveLevelTemplate()
7507 char *filename = getLocalLevelTemplateFilename();
7509 SaveLevelFromFilename(&level, filename, TRUE);
7512 boolean SaveLevelChecked(int nr)
7514 char *filename = getDefaultLevelFilename(nr);
7515 boolean new_level = !fileExists(filename);
7516 boolean level_saved = FALSE;
7518 if (new_level || Request("Save this level and kill the old?", REQ_ASK))
7523 Request("Level saved!", REQ_CONFIRM);
7531 void DumpLevel(struct LevelInfo *level)
7533 if (level->no_level_file || level->no_valid_file)
7535 Error(ERR_WARN, "cannot dump -- no valid level file found");
7541 Print("Level xxx (file version %08d, game version %08d)\n",
7542 level->file_version, level->game_version);
7545 Print("Level author: '%s'\n", level->author);
7546 Print("Level title: '%s'\n", level->name);
7548 Print("Playfield size: %d x %d\n", level->fieldx, level->fieldy);
7550 Print("Level time: %d seconds\n", level->time);
7551 Print("Gems needed: %d\n", level->gems_needed);
7553 Print("Time for magic wall: %d seconds\n", level->time_magic_wall);
7554 Print("Time for wheel: %d seconds\n", level->time_wheel);
7555 Print("Time for light: %d seconds\n", level->time_light);
7556 Print("Time for timegate: %d seconds\n", level->time_timegate);
7558 Print("Amoeba speed: %d\n", level->amoeba_speed);
7561 Print("EM style slippery gems: %s\n", (level->em_slippery_gems ? "yes" : "no"));
7562 Print("Player blocks last field: %s\n", (level->block_last_field ? "yes" : "no"));
7563 Print("SP player blocks last field: %s\n", (level->sp_block_last_field ? "yes" : "no"));
7564 Print("use spring bug: %s\n", (level->use_spring_bug ? "yes" : "no"));
7565 Print("use step counter: %s\n", (level->use_step_counter ? "yes" : "no"));
7571 /* ========================================================================= */
7572 /* tape file functions */
7573 /* ========================================================================= */
7575 static void setTapeInfoToDefaults()
7579 /* always start with reliable default values (empty tape) */
7582 /* default values (also for pre-1.2 tapes) with only the first player */
7583 tape.player_participates[0] = TRUE;
7584 for (i = 1; i < MAX_PLAYERS; i++)
7585 tape.player_participates[i] = FALSE;
7587 /* at least one (default: the first) player participates in every tape */
7588 tape.num_participating_players = 1;
7590 tape.level_nr = level_nr;
7592 tape.changed = FALSE;
7594 tape.recording = FALSE;
7595 tape.playing = FALSE;
7596 tape.pausing = FALSE;
7598 tape.no_valid_file = FALSE;
7601 static int LoadTape_VERS(File *file, int chunk_size, struct TapeInfo *tape)
7603 tape->file_version = getFileVersion(file);
7604 tape->game_version = getFileVersion(file);
7609 static int LoadTape_HEAD(File *file, int chunk_size, struct TapeInfo *tape)
7613 tape->random_seed = getFile32BitBE(file);
7614 tape->date = getFile32BitBE(file);
7615 tape->length = getFile32BitBE(file);
7617 /* read header fields that are new since version 1.2 */
7618 if (tape->file_version >= FILE_VERSION_1_2)
7620 byte store_participating_players = getFile8Bit(file);
7623 /* since version 1.2, tapes store which players participate in the tape */
7624 tape->num_participating_players = 0;
7625 for (i = 0; i < MAX_PLAYERS; i++)
7627 tape->player_participates[i] = FALSE;
7629 if (store_participating_players & (1 << i))
7631 tape->player_participates[i] = TRUE;
7632 tape->num_participating_players++;
7636 tape->use_mouse = (getFile8Bit(file) == 1 ? TRUE : FALSE);
7638 ReadUnusedBytesFromFile(file, TAPE_CHUNK_HEAD_UNUSED);
7640 engine_version = getFileVersion(file);
7641 if (engine_version > 0)
7642 tape->engine_version = engine_version;
7644 tape->engine_version = tape->game_version;
7650 static int LoadTape_INFO(File *file, int chunk_size, struct TapeInfo *tape)
7652 int level_identifier_size;
7655 level_identifier_size = getFile16BitBE(file);
7657 tape->level_identifier =
7658 checked_realloc(tape->level_identifier, level_identifier_size);
7660 for (i = 0; i < level_identifier_size; i++)
7661 tape->level_identifier[i] = getFile8Bit(file);
7663 tape->level_nr = getFile16BitBE(file);
7665 chunk_size = 2 + level_identifier_size + 2;
7670 static int LoadTape_BODY(File *file, int chunk_size, struct TapeInfo *tape)
7674 (tape->use_mouse ? 3 : tape->num_participating_players) + 1;
7675 int chunk_size_expected = tape_pos_size * tape->length;
7677 if (chunk_size_expected != chunk_size)
7679 ReadUnusedBytesFromFile(file, chunk_size);
7680 return chunk_size_expected;
7683 for (i = 0; i < tape->length; i++)
7685 if (i >= MAX_TAPE_LEN)
7687 Error(ERR_WARN, "tape truncated -- size exceeds maximum tape size %d",
7690 // tape too large; read and ignore remaining tape data from this chunk
7691 for (;i < tape->length; i++)
7692 ReadUnusedBytesFromFile(file, tape->num_participating_players + 1);
7697 if (tape->use_mouse)
7699 tape->pos[i].action[TAPE_ACTION_LX] = getFile8Bit(file);
7700 tape->pos[i].action[TAPE_ACTION_LY] = getFile8Bit(file);
7701 tape->pos[i].action[TAPE_ACTION_BUTTON] = getFile8Bit(file);
7703 tape->pos[i].action[TAPE_ACTION_UNUSED] = 0;
7707 for (j = 0; j < MAX_PLAYERS; j++)
7709 tape->pos[i].action[j] = MV_NONE;
7711 if (tape->player_participates[j])
7712 tape->pos[i].action[j] = getFile8Bit(file);
7716 tape->pos[i].delay = getFile8Bit(file);
7718 if (tape->file_version == FILE_VERSION_1_0)
7720 /* eliminate possible diagonal moves in old tapes */
7721 /* this is only for backward compatibility */
7723 byte joy_dir[4] = { JOY_LEFT, JOY_RIGHT, JOY_UP, JOY_DOWN };
7724 byte action = tape->pos[i].action[0];
7725 int k, num_moves = 0;
7727 for (k = 0; k<4; k++)
7729 if (action & joy_dir[k])
7731 tape->pos[i + num_moves].action[0] = joy_dir[k];
7733 tape->pos[i + num_moves].delay = 0;
7742 tape->length += num_moves;
7745 else if (tape->file_version < FILE_VERSION_2_0)
7747 /* convert pre-2.0 tapes to new tape format */
7749 if (tape->pos[i].delay > 1)
7752 tape->pos[i + 1] = tape->pos[i];
7753 tape->pos[i + 1].delay = 1;
7756 for (j = 0; j < MAX_PLAYERS; j++)
7757 tape->pos[i].action[j] = MV_NONE;
7758 tape->pos[i].delay--;
7765 if (checkEndOfFile(file))
7769 if (i != tape->length)
7770 chunk_size = tape_pos_size * i;
7775 void LoadTape_SokobanSolution(char *filename)
7778 int move_delay = TILESIZE / level.initial_player_stepsize[0];
7780 if (!(file = openFile(filename, MODE_READ)))
7782 tape.no_valid_file = TRUE;
7787 while (!checkEndOfFile(file))
7789 unsigned char c = getByteFromFile(file);
7791 if (checkEndOfFile(file))
7798 tape.pos[tape.length].action[0] = MV_UP;
7799 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
7805 tape.pos[tape.length].action[0] = MV_DOWN;
7806 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
7812 tape.pos[tape.length].action[0] = MV_LEFT;
7813 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
7819 tape.pos[tape.length].action[0] = MV_RIGHT;
7820 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
7828 /* ignore white-space characters */
7832 tape.no_valid_file = TRUE;
7834 Error(ERR_WARN, "unsupported Sokoban solution file '%s' ['%d']", filename, c);
7842 if (tape.no_valid_file)
7845 tape.length_frames = GetTapeLengthFrames();
7846 tape.length_seconds = GetTapeLengthSeconds();
7849 void LoadTapeFromFilename(char *filename)
7851 char cookie[MAX_LINE_LEN];
7852 char chunk_name[CHUNK_ID_LEN + 1];
7856 /* always start with reliable default values */
7857 setTapeInfoToDefaults();
7859 if (strSuffix(filename, ".sln"))
7861 LoadTape_SokobanSolution(filename);
7866 if (!(file = openFile(filename, MODE_READ)))
7868 tape.no_valid_file = TRUE;
7873 getFileChunkBE(file, chunk_name, NULL);
7874 if (strEqual(chunk_name, "RND1"))
7876 getFile32BitBE(file); /* not used */
7878 getFileChunkBE(file, chunk_name, NULL);
7879 if (!strEqual(chunk_name, "TAPE"))
7881 tape.no_valid_file = TRUE;
7883 Error(ERR_WARN, "unknown format of tape file '%s'", filename);
7890 else /* check for pre-2.0 file format with cookie string */
7892 strcpy(cookie, chunk_name);
7893 if (getStringFromFile(file, &cookie[4], MAX_LINE_LEN - 4) == NULL)
7895 if (strlen(cookie) > 0 && cookie[strlen(cookie) - 1] == '\n')
7896 cookie[strlen(cookie) - 1] = '\0';
7898 if (!checkCookieString(cookie, TAPE_COOKIE_TMPL))
7900 tape.no_valid_file = TRUE;
7902 Error(ERR_WARN, "unknown format of tape file '%s'", filename);
7909 if ((tape.file_version = getFileVersionFromCookieString(cookie)) == -1)
7911 tape.no_valid_file = TRUE;
7913 Error(ERR_WARN, "unsupported version of tape file '%s'", filename);
7920 /* pre-2.0 tape files have no game version, so use file version here */
7921 tape.game_version = tape.file_version;
7924 if (tape.file_version < FILE_VERSION_1_2)
7926 /* tape files from versions before 1.2.0 without chunk structure */
7927 LoadTape_HEAD(file, TAPE_CHUNK_HEAD_SIZE, &tape);
7928 LoadTape_BODY(file, 2 * tape.length, &tape);
7936 int (*loader)(File *, int, struct TapeInfo *);
7940 { "VERS", TAPE_CHUNK_VERS_SIZE, LoadTape_VERS },
7941 { "HEAD", TAPE_CHUNK_HEAD_SIZE, LoadTape_HEAD },
7942 { "INFO", -1, LoadTape_INFO },
7943 { "BODY", -1, LoadTape_BODY },
7947 while (getFileChunkBE(file, chunk_name, &chunk_size))
7951 while (chunk_info[i].name != NULL &&
7952 !strEqual(chunk_name, chunk_info[i].name))
7955 if (chunk_info[i].name == NULL)
7957 Error(ERR_WARN, "unknown chunk '%s' in tape file '%s'",
7958 chunk_name, filename);
7959 ReadUnusedBytesFromFile(file, chunk_size);
7961 else if (chunk_info[i].size != -1 &&
7962 chunk_info[i].size != chunk_size)
7964 Error(ERR_WARN, "wrong size (%d) of chunk '%s' in tape file '%s'",
7965 chunk_size, chunk_name, filename);
7966 ReadUnusedBytesFromFile(file, chunk_size);
7970 /* call function to load this tape chunk */
7971 int chunk_size_expected =
7972 (chunk_info[i].loader)(file, chunk_size, &tape);
7974 /* the size of some chunks cannot be checked before reading other
7975 chunks first (like "HEAD" and "BODY") that contain some header
7976 information, so check them here */
7977 if (chunk_size_expected != chunk_size)
7979 Error(ERR_WARN, "wrong size (%d) of chunk '%s' in tape file '%s'",
7980 chunk_size, chunk_name, filename);
7988 tape.length_frames = GetTapeLengthFrames();
7989 tape.length_seconds = GetTapeLengthSeconds();
7992 printf("::: tape file version: %d\n", tape.file_version);
7993 printf("::: tape game version: %d\n", tape.game_version);
7994 printf("::: tape engine version: %d\n", tape.engine_version);
7998 void LoadTape(int nr)
8000 char *filename = getTapeFilename(nr);
8002 LoadTapeFromFilename(filename);
8005 void LoadSolutionTape(int nr)
8007 char *filename = getSolutionTapeFilename(nr);
8009 LoadTapeFromFilename(filename);
8011 if (TAPE_IS_EMPTY(tape) &&
8012 level.game_engine_type == GAME_ENGINE_TYPE_SP &&
8013 level.native_sp_level->demo.is_available)
8014 CopyNativeTape_SP_to_RND(&level);
8017 static void SaveTape_VERS(FILE *file, struct TapeInfo *tape)
8019 putFileVersion(file, tape->file_version);
8020 putFileVersion(file, tape->game_version);
8023 static void SaveTape_HEAD(FILE *file, struct TapeInfo *tape)
8026 byte store_participating_players = 0;
8028 /* set bits for participating players for compact storage */
8029 for (i = 0; i < MAX_PLAYERS; i++)
8030 if (tape->player_participates[i])
8031 store_participating_players |= (1 << i);
8033 putFile32BitBE(file, tape->random_seed);
8034 putFile32BitBE(file, tape->date);
8035 putFile32BitBE(file, tape->length);
8037 putFile8Bit(file, store_participating_players);
8039 putFile8Bit(file, (tape->use_mouse ? 1 : 0));
8041 /* unused bytes not at the end here for 4-byte alignment of engine_version */
8042 WriteUnusedBytesToFile(file, TAPE_CHUNK_HEAD_UNUSED);
8044 putFileVersion(file, tape->engine_version);
8047 static void SaveTape_INFO(FILE *file, struct TapeInfo *tape)
8049 int level_identifier_size = strlen(tape->level_identifier) + 1;
8052 putFile16BitBE(file, level_identifier_size);
8054 for (i = 0; i < level_identifier_size; i++)
8055 putFile8Bit(file, tape->level_identifier[i]);
8057 putFile16BitBE(file, tape->level_nr);
8060 static void SaveTape_BODY(FILE *file, struct TapeInfo *tape)
8064 for (i = 0; i < tape->length; i++)
8066 if (tape->use_mouse)
8068 putFile8Bit(file, tape->pos[i].action[TAPE_ACTION_LX]);
8069 putFile8Bit(file, tape->pos[i].action[TAPE_ACTION_LY]);
8070 putFile8Bit(file, tape->pos[i].action[TAPE_ACTION_BUTTON]);
8074 for (j = 0; j < MAX_PLAYERS; j++)
8075 if (tape->player_participates[j])
8076 putFile8Bit(file, tape->pos[i].action[j]);
8079 putFile8Bit(file, tape->pos[i].delay);
8083 void SaveTape(int nr)
8085 char *filename = getTapeFilename(nr);
8087 int num_participating_players = 0;
8089 int info_chunk_size;
8090 int body_chunk_size;
8093 InitTapeDirectory(leveldir_current->subdir);
8095 if (!(file = fopen(filename, MODE_WRITE)))
8097 Error(ERR_WARN, "cannot save level recording file '%s'", filename);
8101 tape.file_version = FILE_VERSION_ACTUAL;
8102 tape.game_version = GAME_VERSION_ACTUAL;
8104 /* count number of participating players */
8105 for (i = 0; i < MAX_PLAYERS; i++)
8106 if (tape.player_participates[i])
8107 num_participating_players++;
8109 tape_pos_size = (tape.use_mouse ? 3 : num_participating_players) + 1;
8111 info_chunk_size = 2 + (strlen(tape.level_identifier) + 1) + 2;
8112 body_chunk_size = tape_pos_size * tape.length;
8114 putFileChunkBE(file, "RND1", CHUNK_SIZE_UNDEFINED);
8115 putFileChunkBE(file, "TAPE", CHUNK_SIZE_NONE);
8117 putFileChunkBE(file, "VERS", TAPE_CHUNK_VERS_SIZE);
8118 SaveTape_VERS(file, &tape);
8120 putFileChunkBE(file, "HEAD", TAPE_CHUNK_HEAD_SIZE);
8121 SaveTape_HEAD(file, &tape);
8123 putFileChunkBE(file, "INFO", info_chunk_size);
8124 SaveTape_INFO(file, &tape);
8126 putFileChunkBE(file, "BODY", body_chunk_size);
8127 SaveTape_BODY(file, &tape);
8131 SetFilePermissions(filename, PERMS_PRIVATE);
8133 tape.changed = FALSE;
8136 static boolean SaveTapeCheckedExt(int nr, char *msg_replace, char *msg_saved)
8138 char *filename = getTapeFilename(nr);
8139 boolean new_tape = !fileExists(filename);
8140 boolean tape_saved = FALSE;
8142 if (new_tape || Request(msg_replace, REQ_ASK))
8147 Request(msg_saved, REQ_CONFIRM);
8155 boolean SaveTapeChecked(int nr)
8157 return SaveTapeCheckedExt(nr, "Replace old tape?", "Tape saved!");
8160 boolean SaveTapeChecked_LevelSolved(int nr)
8162 return SaveTapeCheckedExt(nr, "Level solved! Replace old tape?",
8163 "Level solved! Tape saved!");
8166 void DumpTape(struct TapeInfo *tape)
8168 int tape_frame_counter;
8171 if (tape->no_valid_file)
8173 Error(ERR_WARN, "cannot dump -- no valid tape file found");
8179 Print("Tape of Level %03d (file version %08d, game version %08d)\n",
8180 tape->level_nr, tape->file_version, tape->game_version);
8181 Print(" (effective engine version %08d)\n",
8182 tape->engine_version);
8183 Print("Level series identifier: '%s'\n", tape->level_identifier);
8186 tape_frame_counter = 0;
8188 for (i = 0; i < tape->length; i++)
8190 if (i >= MAX_TAPE_LEN)
8195 for (j = 0; j < MAX_PLAYERS; j++)
8197 if (tape->player_participates[j])
8199 int action = tape->pos[i].action[j];
8201 Print("%d:%02x ", j, action);
8202 Print("[%c%c%c%c|%c%c] - ",
8203 (action & JOY_LEFT ? '<' : ' '),
8204 (action & JOY_RIGHT ? '>' : ' '),
8205 (action & JOY_UP ? '^' : ' '),
8206 (action & JOY_DOWN ? 'v' : ' '),
8207 (action & JOY_BUTTON_1 ? '1' : ' '),
8208 (action & JOY_BUTTON_2 ? '2' : ' '));
8212 Print("(%03d) ", tape->pos[i].delay);
8213 Print("[%05d]\n", tape_frame_counter);
8215 tape_frame_counter += tape->pos[i].delay;
8222 /* ========================================================================= */
8223 /* score file functions */
8224 /* ========================================================================= */
8226 void LoadScore(int nr)
8229 char *filename = getScoreFilename(nr);
8230 char cookie[MAX_LINE_LEN];
8231 char line[MAX_LINE_LEN];
8235 /* always start with reliable default values */
8236 for (i = 0; i < MAX_SCORE_ENTRIES; i++)
8238 strcpy(highscore[i].Name, EMPTY_PLAYER_NAME);
8239 highscore[i].Score = 0;
8242 if (!(file = fopen(filename, MODE_READ)))
8245 /* check file identifier */
8246 if (fgets(cookie, MAX_LINE_LEN, file) == NULL)
8248 if (strlen(cookie) > 0 && cookie[strlen(cookie) - 1] == '\n')
8249 cookie[strlen(cookie) - 1] = '\0';
8251 if (!checkCookieString(cookie, SCORE_COOKIE))
8253 Error(ERR_WARN, "unknown format of score file '%s'", filename);
8258 for (i = 0; i < MAX_SCORE_ENTRIES; i++)
8260 if (fscanf(file, "%d", &highscore[i].Score) == EOF)
8261 Error(ERR_WARN, "fscanf() failed; %s", strerror(errno));
8262 if (fgets(line, MAX_LINE_LEN, file) == NULL)
8265 if (strlen(line) > 0 && line[strlen(line) - 1] == '\n')
8266 line[strlen(line) - 1] = '\0';
8268 for (line_ptr = line; *line_ptr; line_ptr++)
8270 if (*line_ptr != ' ' && *line_ptr != '\t' && *line_ptr != '\0')
8272 strncpy(highscore[i].Name, line_ptr, MAX_PLAYER_NAME_LEN);
8273 highscore[i].Name[MAX_PLAYER_NAME_LEN] = '\0';
8282 void SaveScore(int nr)
8285 int permissions = (program.global_scores ? PERMS_PUBLIC : PERMS_PRIVATE);
8286 char *filename = getScoreFilename(nr);
8289 /* used instead of "leveldir_current->subdir" (for network games) */
8290 InitScoreDirectory(levelset.identifier);
8292 if (!(file = fopen(filename, MODE_WRITE)))
8294 Error(ERR_WARN, "cannot save score for level %d", nr);
8298 fprintf(file, "%s\n\n", SCORE_COOKIE);
8300 for (i = 0; i < MAX_SCORE_ENTRIES; i++)
8301 fprintf(file, "%d %s\n", highscore[i].Score, highscore[i].Name);
8305 SetFilePermissions(filename, permissions);
8309 /* ========================================================================= */
8310 /* setup file functions */
8311 /* ========================================================================= */
8313 #define TOKEN_STR_PLAYER_PREFIX "player_"
8318 SETUP_TOKEN_PLAYER_NAME = 0,
8320 SETUP_TOKEN_SOUND_LOOPS,
8321 SETUP_TOKEN_SOUND_MUSIC,
8322 SETUP_TOKEN_SOUND_SIMPLE,
8324 SETUP_TOKEN_SCROLL_DELAY,
8325 SETUP_TOKEN_SCROLL_DELAY_VALUE,
8326 SETUP_TOKEN_ENGINE_SNAPSHOT_MODE,
8327 SETUP_TOKEN_ENGINE_SNAPSHOT_MEMORY,
8328 SETUP_TOKEN_FADE_SCREENS,
8329 SETUP_TOKEN_AUTORECORD,
8330 SETUP_TOKEN_SHOW_TITLESCREEN,
8331 SETUP_TOKEN_QUICK_DOORS,
8332 SETUP_TOKEN_TEAM_MODE,
8333 SETUP_TOKEN_HANDICAP,
8334 SETUP_TOKEN_SKIP_LEVELS,
8335 SETUP_TOKEN_INCREMENT_LEVELS,
8336 SETUP_TOKEN_AUTO_PLAY_NEXT_LEVEL,
8337 SETUP_TOKEN_SKIP_SCORES_AFTER_GAME,
8338 SETUP_TOKEN_TIME_LIMIT,
8339 SETUP_TOKEN_FULLSCREEN,
8340 SETUP_TOKEN_WINDOW_SCALING_PERCENT,
8341 SETUP_TOKEN_WINDOW_SCALING_QUALITY,
8342 SETUP_TOKEN_SCREEN_RENDERING_MODE,
8343 SETUP_TOKEN_ASK_ON_ESCAPE,
8344 SETUP_TOKEN_ASK_ON_ESCAPE_EDITOR,
8345 SETUP_TOKEN_QUICK_SWITCH,
8346 SETUP_TOKEN_INPUT_ON_FOCUS,
8347 SETUP_TOKEN_PREFER_AGA_GRAPHICS,
8348 SETUP_TOKEN_GAME_FRAME_DELAY,
8349 SETUP_TOKEN_SP_SHOW_BORDER_ELEMENTS,
8350 SETUP_TOKEN_SMALL_GAME_GRAPHICS,
8351 SETUP_TOKEN_SHOW_SNAPSHOT_BUTTONS,
8352 SETUP_TOKEN_GRAPHICS_SET,
8353 SETUP_TOKEN_SOUNDS_SET,
8354 SETUP_TOKEN_MUSIC_SET,
8355 SETUP_TOKEN_OVERRIDE_LEVEL_GRAPHICS,
8356 SETUP_TOKEN_OVERRIDE_LEVEL_SOUNDS,
8357 SETUP_TOKEN_OVERRIDE_LEVEL_MUSIC,
8358 SETUP_TOKEN_VOLUME_SIMPLE,
8359 SETUP_TOKEN_VOLUME_LOOPS,
8360 SETUP_TOKEN_VOLUME_MUSIC,
8361 SETUP_TOKEN_NETWORK_MODE,
8362 SETUP_TOKEN_NETWORK_PLAYER_NR,
8363 SETUP_TOKEN_TOUCH_CONTROL_TYPE,
8364 SETUP_TOKEN_TOUCH_MOVE_DISTANCE,
8365 SETUP_TOKEN_TOUCH_DROP_DISTANCE,
8366 SETUP_TOKEN_TOUCH_TRANSPARENCY,
8367 SETUP_TOKEN_TOUCH_DRAW_OUTLINED,
8368 SETUP_TOKEN_TOUCH_DRAW_PRESSED,
8369 SETUP_TOKEN_TOUCH_GRID_XSIZE_0,
8370 SETUP_TOKEN_TOUCH_GRID_YSIZE_0,
8371 SETUP_TOKEN_TOUCH_GRID_XSIZE_1,
8372 SETUP_TOKEN_TOUCH_GRID_YSIZE_1,
8374 NUM_GLOBAL_SETUP_TOKENS
8380 SETUP_TOKEN_AUTO_EDITOR_ZOOM_TILESIZE = 0,
8382 NUM_AUTO_SETUP_TOKENS
8388 SETUP_TOKEN_EDITOR_EL_CLASSIC = 0,
8389 SETUP_TOKEN_EDITOR_EL_CUSTOM,
8390 SETUP_TOKEN_EDITOR_EL_USER_DEFINED,
8391 SETUP_TOKEN_EDITOR_EL_DYNAMIC,
8392 SETUP_TOKEN_EDITOR_EL_HEADLINES,
8393 SETUP_TOKEN_EDITOR_SHOW_ELEMENT_TOKEN,
8395 NUM_EDITOR_SETUP_TOKENS
8398 /* editor cascade setup */
8401 SETUP_TOKEN_EDITOR_CASCADE_BD = 0,
8402 SETUP_TOKEN_EDITOR_CASCADE_EM,
8403 SETUP_TOKEN_EDITOR_CASCADE_EMC,
8404 SETUP_TOKEN_EDITOR_CASCADE_RND,
8405 SETUP_TOKEN_EDITOR_CASCADE_SB,
8406 SETUP_TOKEN_EDITOR_CASCADE_SP,
8407 SETUP_TOKEN_EDITOR_CASCADE_DC,
8408 SETUP_TOKEN_EDITOR_CASCADE_DX,
8409 SETUP_TOKEN_EDITOR_CASCADE_TEXT,
8410 SETUP_TOKEN_EDITOR_CASCADE_STEELTEXT,
8411 SETUP_TOKEN_EDITOR_CASCADE_CE,
8412 SETUP_TOKEN_EDITOR_CASCADE_GE,
8413 SETUP_TOKEN_EDITOR_CASCADE_REF,
8414 SETUP_TOKEN_EDITOR_CASCADE_USER,
8415 SETUP_TOKEN_EDITOR_CASCADE_DYNAMIC,
8417 NUM_EDITOR_CASCADE_SETUP_TOKENS
8420 /* shortcut setup */
8423 SETUP_TOKEN_SHORTCUT_SAVE_GAME = 0,
8424 SETUP_TOKEN_SHORTCUT_LOAD_GAME,
8425 SETUP_TOKEN_SHORTCUT_TOGGLE_PAUSE,
8426 SETUP_TOKEN_SHORTCUT_FOCUS_PLAYER_1,
8427 SETUP_TOKEN_SHORTCUT_FOCUS_PLAYER_2,
8428 SETUP_TOKEN_SHORTCUT_FOCUS_PLAYER_3,
8429 SETUP_TOKEN_SHORTCUT_FOCUS_PLAYER_4,
8430 SETUP_TOKEN_SHORTCUT_FOCUS_PLAYER_ALL,
8431 SETUP_TOKEN_SHORTCUT_TAPE_EJECT,
8432 SETUP_TOKEN_SHORTCUT_TAPE_EXTRA,
8433 SETUP_TOKEN_SHORTCUT_TAPE_STOP,
8434 SETUP_TOKEN_SHORTCUT_TAPE_PAUSE,
8435 SETUP_TOKEN_SHORTCUT_TAPE_RECORD,
8436 SETUP_TOKEN_SHORTCUT_TAPE_PLAY,
8437 SETUP_TOKEN_SHORTCUT_SOUND_SIMPLE,
8438 SETUP_TOKEN_SHORTCUT_SOUND_LOOPS,
8439 SETUP_TOKEN_SHORTCUT_SOUND_MUSIC,
8440 SETUP_TOKEN_SHORTCUT_SNAP_LEFT,
8441 SETUP_TOKEN_SHORTCUT_SNAP_RIGHT,
8442 SETUP_TOKEN_SHORTCUT_SNAP_UP,
8443 SETUP_TOKEN_SHORTCUT_SNAP_DOWN,
8445 NUM_SHORTCUT_SETUP_TOKENS
8451 SETUP_TOKEN_PLAYER_USE_JOYSTICK = 0,
8452 SETUP_TOKEN_PLAYER_JOY_DEVICE_NAME,
8453 SETUP_TOKEN_PLAYER_JOY_XLEFT,
8454 SETUP_TOKEN_PLAYER_JOY_XMIDDLE,
8455 SETUP_TOKEN_PLAYER_JOY_XRIGHT,
8456 SETUP_TOKEN_PLAYER_JOY_YUPPER,
8457 SETUP_TOKEN_PLAYER_JOY_YMIDDLE,
8458 SETUP_TOKEN_PLAYER_JOY_YLOWER,
8459 SETUP_TOKEN_PLAYER_JOY_SNAP,
8460 SETUP_TOKEN_PLAYER_JOY_DROP,
8461 SETUP_TOKEN_PLAYER_KEY_LEFT,
8462 SETUP_TOKEN_PLAYER_KEY_RIGHT,
8463 SETUP_TOKEN_PLAYER_KEY_UP,
8464 SETUP_TOKEN_PLAYER_KEY_DOWN,
8465 SETUP_TOKEN_PLAYER_KEY_SNAP,
8466 SETUP_TOKEN_PLAYER_KEY_DROP,
8468 NUM_PLAYER_SETUP_TOKENS
8474 SETUP_TOKEN_SYSTEM_SDL_VIDEODRIVER = 0,
8475 SETUP_TOKEN_SYSTEM_SDL_AUDIODRIVER,
8476 SETUP_TOKEN_SYSTEM_AUDIO_FRAGMENT_SIZE,
8478 NUM_SYSTEM_SETUP_TOKENS
8481 /* internal setup */
8484 SETUP_TOKEN_INT_PROGRAM_TITLE = 0,
8485 SETUP_TOKEN_INT_PROGRAM_VERSION,
8486 SETUP_TOKEN_INT_PROGRAM_AUTHOR,
8487 SETUP_TOKEN_INT_PROGRAM_EMAIL,
8488 SETUP_TOKEN_INT_PROGRAM_WEBSITE,
8489 SETUP_TOKEN_INT_PROGRAM_COPYRIGHT,
8490 SETUP_TOKEN_INT_PROGRAM_COMPANY,
8491 SETUP_TOKEN_INT_PROGRAM_ICON_FILE,
8492 SETUP_TOKEN_INT_DEFAULT_GRAPHICS_SET,
8493 SETUP_TOKEN_INT_DEFAULT_SOUNDS_SET,
8494 SETUP_TOKEN_INT_DEFAULT_MUSIC_SET,
8495 SETUP_TOKEN_INT_FALLBACK_GRAPHICS_FILE,
8496 SETUP_TOKEN_INT_FALLBACK_SOUNDS_FILE,
8497 SETUP_TOKEN_INT_FALLBACK_MUSIC_FILE,
8498 SETUP_TOKEN_INT_DEFAULT_LEVEL_SERIES,
8499 SETUP_TOKEN_INT_CHOOSE_FROM_TOP_LEVELDIR,
8500 SETUP_TOKEN_INT_SHOW_SCALING_IN_TITLE,
8501 SETUP_TOKEN_INT_DEFAULT_WINDOW_WIDTH,
8502 SETUP_TOKEN_INT_DEFAULT_WINDOW_HEIGHT,
8504 NUM_INTERNAL_SETUP_TOKENS
8510 SETUP_TOKEN_DEBUG_FRAME_DELAY_0 = 0,
8511 SETUP_TOKEN_DEBUG_FRAME_DELAY_1,
8512 SETUP_TOKEN_DEBUG_FRAME_DELAY_2,
8513 SETUP_TOKEN_DEBUG_FRAME_DELAY_3,
8514 SETUP_TOKEN_DEBUG_FRAME_DELAY_4,
8515 SETUP_TOKEN_DEBUG_FRAME_DELAY_5,
8516 SETUP_TOKEN_DEBUG_FRAME_DELAY_6,
8517 SETUP_TOKEN_DEBUG_FRAME_DELAY_7,
8518 SETUP_TOKEN_DEBUG_FRAME_DELAY_8,
8519 SETUP_TOKEN_DEBUG_FRAME_DELAY_9,
8520 SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_0,
8521 SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_1,
8522 SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_2,
8523 SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_3,
8524 SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_4,
8525 SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_5,
8526 SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_6,
8527 SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_7,
8528 SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_8,
8529 SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_9,
8530 SETUP_TOKEN_DEBUG_FRAME_DELAY_USE_MOD_KEY,
8531 SETUP_TOKEN_DEBUG_FRAME_DELAY_GAME_ONLY,
8532 SETUP_TOKEN_DEBUG_SHOW_FRAMES_PER_SECOND,
8534 NUM_DEBUG_SETUP_TOKENS
8540 SETUP_TOKEN_OPTIONS_VERBOSE = 0,
8542 NUM_OPTIONS_SETUP_TOKENS
8546 static struct SetupInfo si;
8547 static struct SetupAutoSetupInfo sasi;
8548 static struct SetupEditorInfo sei;
8549 static struct SetupEditorCascadeInfo seci;
8550 static struct SetupShortcutInfo ssi;
8551 static struct SetupInputInfo sii;
8552 static struct SetupSystemInfo syi;
8553 static struct SetupInternalInfo sxi;
8554 static struct SetupDebugInfo sdi;
8555 static struct OptionInfo soi;
8557 static struct TokenInfo global_setup_tokens[] =
8559 { TYPE_STRING, &si.player_name, "player_name" },
8560 { TYPE_SWITCH, &si.sound, "sound" },
8561 { TYPE_SWITCH, &si.sound_loops, "repeating_sound_loops" },
8562 { TYPE_SWITCH, &si.sound_music, "background_music" },
8563 { TYPE_SWITCH, &si.sound_simple, "simple_sound_effects" },
8564 { TYPE_SWITCH, &si.toons, "toons" },
8565 { TYPE_SWITCH, &si.scroll_delay, "scroll_delay" },
8566 { TYPE_INTEGER,&si.scroll_delay_value, "scroll_delay_value" },
8567 { TYPE_STRING, &si.engine_snapshot_mode, "engine_snapshot_mode" },
8568 { TYPE_INTEGER,&si.engine_snapshot_memory, "engine_snapshot_memory" },
8569 { TYPE_SWITCH, &si.fade_screens, "fade_screens" },
8570 { TYPE_SWITCH, &si.autorecord, "automatic_tape_recording"},
8571 { TYPE_SWITCH, &si.show_titlescreen, "show_titlescreen" },
8572 { TYPE_SWITCH, &si.quick_doors, "quick_doors" },
8573 { TYPE_SWITCH, &si.team_mode, "team_mode" },
8574 { TYPE_SWITCH, &si.handicap, "handicap" },
8575 { TYPE_SWITCH, &si.skip_levels, "skip_levels" },
8576 { TYPE_SWITCH, &si.increment_levels, "increment_levels" },
8577 { TYPE_SWITCH, &si.auto_play_next_level, "auto_play_next_level" },
8578 { TYPE_SWITCH, &si.skip_scores_after_game, "skip_scores_after_game" },
8579 { TYPE_SWITCH, &si.time_limit, "time_limit" },
8580 { TYPE_SWITCH, &si.fullscreen, "fullscreen" },
8581 { TYPE_INTEGER,&si.window_scaling_percent, "window_scaling_percent" },
8582 { TYPE_STRING, &si.window_scaling_quality, "window_scaling_quality" },
8583 { TYPE_STRING, &si.screen_rendering_mode, "screen_rendering_mode" },
8584 { TYPE_SWITCH, &si.ask_on_escape, "ask_on_escape" },
8585 { TYPE_SWITCH, &si.ask_on_escape_editor, "ask_on_escape_editor" },
8586 { TYPE_SWITCH, &si.quick_switch, "quick_player_switch" },
8587 { TYPE_SWITCH, &si.input_on_focus, "input_on_focus" },
8588 { TYPE_SWITCH, &si.prefer_aga_graphics, "prefer_aga_graphics" },
8589 { TYPE_INTEGER,&si.game_frame_delay, "game_frame_delay" },
8590 { TYPE_SWITCH, &si.sp_show_border_elements, "sp_show_border_elements" },
8591 { TYPE_SWITCH, &si.small_game_graphics, "small_game_graphics" },
8592 { TYPE_SWITCH, &si.show_snapshot_buttons, "show_snapshot_buttons" },
8593 { TYPE_STRING, &si.graphics_set, "graphics_set" },
8594 { TYPE_STRING, &si.sounds_set, "sounds_set" },
8595 { TYPE_STRING, &si.music_set, "music_set" },
8596 { TYPE_SWITCH3,&si.override_level_graphics, "override_level_graphics" },
8597 { TYPE_SWITCH3,&si.override_level_sounds, "override_level_sounds" },
8598 { TYPE_SWITCH3,&si.override_level_music, "override_level_music" },
8599 { TYPE_INTEGER,&si.volume_simple, "volume_simple" },
8600 { TYPE_INTEGER,&si.volume_loops, "volume_loops" },
8601 { TYPE_INTEGER,&si.volume_music, "volume_music" },
8602 { TYPE_SWITCH, &si.network_mode, "network_mode" },
8603 { TYPE_PLAYER, &si.network_player_nr, "network_player" },
8604 { TYPE_STRING, &si.touch.control_type, "touch.control_type" },
8605 { TYPE_INTEGER,&si.touch.move_distance, "touch.move_distance" },
8606 { TYPE_INTEGER,&si.touch.drop_distance, "touch.drop_distance" },
8607 { TYPE_INTEGER,&si.touch.transparency, "touch.transparency" },
8608 { TYPE_INTEGER,&si.touch.draw_outlined, "touch.draw_outlined" },
8609 { TYPE_INTEGER,&si.touch.draw_pressed, "touch.draw_pressed" },
8610 { TYPE_INTEGER,&si.touch.grid_xsize[0], "touch.virtual_buttons.0.xsize" },
8611 { TYPE_INTEGER,&si.touch.grid_ysize[0], "touch.virtual_buttons.0.ysize" },
8612 { TYPE_INTEGER,&si.touch.grid_xsize[1], "touch.virtual_buttons.1.xsize" },
8613 { TYPE_INTEGER,&si.touch.grid_ysize[1], "touch.virtual_buttons.1.ysize" },
8616 static struct TokenInfo auto_setup_tokens[] =
8618 { TYPE_INTEGER,&sasi.editor_zoom_tilesize, "editor.zoom_tilesize" },
8621 static struct TokenInfo editor_setup_tokens[] =
8623 { TYPE_SWITCH, &sei.el_classic, "editor.el_classic" },
8624 { TYPE_SWITCH, &sei.el_custom, "editor.el_custom" },
8625 { TYPE_SWITCH, &sei.el_user_defined, "editor.el_user_defined" },
8626 { TYPE_SWITCH, &sei.el_dynamic, "editor.el_dynamic" },
8627 { TYPE_SWITCH, &sei.el_headlines, "editor.el_headlines" },
8628 { TYPE_SWITCH, &sei.show_element_token,"editor.show_element_token" },
8631 static struct TokenInfo editor_cascade_setup_tokens[] =
8633 { TYPE_SWITCH, &seci.el_bd, "editor.cascade.el_bd" },
8634 { TYPE_SWITCH, &seci.el_em, "editor.cascade.el_em" },
8635 { TYPE_SWITCH, &seci.el_emc, "editor.cascade.el_emc" },
8636 { TYPE_SWITCH, &seci.el_rnd, "editor.cascade.el_rnd" },
8637 { TYPE_SWITCH, &seci.el_sb, "editor.cascade.el_sb" },
8638 { TYPE_SWITCH, &seci.el_sp, "editor.cascade.el_sp" },
8639 { TYPE_SWITCH, &seci.el_dc, "editor.cascade.el_dc" },
8640 { TYPE_SWITCH, &seci.el_dx, "editor.cascade.el_dx" },
8641 { TYPE_SWITCH, &seci.el_mm, "editor.cascade.el_mm" },
8642 { TYPE_SWITCH, &seci.el_df, "editor.cascade.el_df" },
8643 { TYPE_SWITCH, &seci.el_chars, "editor.cascade.el_chars" },
8644 { TYPE_SWITCH, &seci.el_steel_chars, "editor.cascade.el_steel_chars" },
8645 { TYPE_SWITCH, &seci.el_ce, "editor.cascade.el_ce" },
8646 { TYPE_SWITCH, &seci.el_ge, "editor.cascade.el_ge" },
8647 { TYPE_SWITCH, &seci.el_ref, "editor.cascade.el_ref" },
8648 { TYPE_SWITCH, &seci.el_user, "editor.cascade.el_user" },
8649 { TYPE_SWITCH, &seci.el_dynamic, "editor.cascade.el_dynamic" },
8652 static struct TokenInfo shortcut_setup_tokens[] =
8654 { TYPE_KEY_X11, &ssi.save_game, "shortcut.save_game" },
8655 { TYPE_KEY_X11, &ssi.load_game, "shortcut.load_game" },
8656 { TYPE_KEY_X11, &ssi.toggle_pause, "shortcut.toggle_pause" },
8657 { TYPE_KEY_X11, &ssi.focus_player[0], "shortcut.focus_player_1" },
8658 { TYPE_KEY_X11, &ssi.focus_player[1], "shortcut.focus_player_2" },
8659 { TYPE_KEY_X11, &ssi.focus_player[2], "shortcut.focus_player_3" },
8660 { TYPE_KEY_X11, &ssi.focus_player[3], "shortcut.focus_player_4" },
8661 { TYPE_KEY_X11, &ssi.focus_player_all,"shortcut.focus_player_all" },
8662 { TYPE_KEY_X11, &ssi.tape_eject, "shortcut.tape_eject" },
8663 { TYPE_KEY_X11, &ssi.tape_extra, "shortcut.tape_extra" },
8664 { TYPE_KEY_X11, &ssi.tape_stop, "shortcut.tape_stop" },
8665 { TYPE_KEY_X11, &ssi.tape_pause, "shortcut.tape_pause" },
8666 { TYPE_KEY_X11, &ssi.tape_record, "shortcut.tape_record" },
8667 { TYPE_KEY_X11, &ssi.tape_play, "shortcut.tape_play" },
8668 { TYPE_KEY_X11, &ssi.sound_simple, "shortcut.sound_simple" },
8669 { TYPE_KEY_X11, &ssi.sound_loops, "shortcut.sound_loops" },
8670 { TYPE_KEY_X11, &ssi.sound_music, "shortcut.sound_music" },
8671 { TYPE_KEY_X11, &ssi.snap_left, "shortcut.snap_left" },
8672 { TYPE_KEY_X11, &ssi.snap_right, "shortcut.snap_right" },
8673 { TYPE_KEY_X11, &ssi.snap_up, "shortcut.snap_up" },
8674 { TYPE_KEY_X11, &ssi.snap_down, "shortcut.snap_down" },
8677 static struct TokenInfo player_setup_tokens[] =
8679 { TYPE_BOOLEAN, &sii.use_joystick, ".use_joystick" },
8680 { TYPE_STRING, &sii.joy.device_name, ".joy.device_name" },
8681 { TYPE_INTEGER, &sii.joy.xleft, ".joy.xleft" },
8682 { TYPE_INTEGER, &sii.joy.xmiddle, ".joy.xmiddle" },
8683 { TYPE_INTEGER, &sii.joy.xright, ".joy.xright" },
8684 { TYPE_INTEGER, &sii.joy.yupper, ".joy.yupper" },
8685 { TYPE_INTEGER, &sii.joy.ymiddle, ".joy.ymiddle" },
8686 { TYPE_INTEGER, &sii.joy.ylower, ".joy.ylower" },
8687 { TYPE_INTEGER, &sii.joy.snap, ".joy.snap_field" },
8688 { TYPE_INTEGER, &sii.joy.drop, ".joy.place_bomb" },
8689 { TYPE_KEY_X11, &sii.key.left, ".key.move_left" },
8690 { TYPE_KEY_X11, &sii.key.right, ".key.move_right" },
8691 { TYPE_KEY_X11, &sii.key.up, ".key.move_up" },
8692 { TYPE_KEY_X11, &sii.key.down, ".key.move_down" },
8693 { TYPE_KEY_X11, &sii.key.snap, ".key.snap_field" },
8694 { TYPE_KEY_X11, &sii.key.drop, ".key.place_bomb" },
8697 static struct TokenInfo system_setup_tokens[] =
8699 { TYPE_STRING, &syi.sdl_videodriver, "system.sdl_videodriver" },
8700 { TYPE_STRING, &syi.sdl_audiodriver, "system.sdl_audiodriver" },
8701 { TYPE_INTEGER, &syi.audio_fragment_size,"system.audio_fragment_size" },
8704 static struct TokenInfo internal_setup_tokens[] =
8706 { TYPE_STRING, &sxi.program_title, "program_title" },
8707 { TYPE_STRING, &sxi.program_version, "program_version" },
8708 { TYPE_STRING, &sxi.program_author, "program_author" },
8709 { TYPE_STRING, &sxi.program_email, "program_email" },
8710 { TYPE_STRING, &sxi.program_website, "program_website" },
8711 { TYPE_STRING, &sxi.program_copyright, "program_copyright" },
8712 { TYPE_STRING, &sxi.program_company, "program_company" },
8713 { TYPE_STRING, &sxi.program_icon_file, "program_icon_file" },
8714 { TYPE_STRING, &sxi.default_graphics_set, "default_graphics_set" },
8715 { TYPE_STRING, &sxi.default_sounds_set, "default_sounds_set" },
8716 { TYPE_STRING, &sxi.default_music_set, "default_music_set" },
8717 { TYPE_STRING, &sxi.fallback_graphics_file, "fallback_graphics_file"},
8718 { TYPE_STRING, &sxi.fallback_sounds_file, "fallback_sounds_file" },
8719 { TYPE_STRING, &sxi.fallback_music_file, "fallback_music_file" },
8720 { TYPE_STRING, &sxi.default_level_series, "default_level_series" },
8721 { TYPE_BOOLEAN,&sxi.choose_from_top_leveldir, "choose_from_top_leveldir" },
8722 { TYPE_BOOLEAN,&sxi.show_scaling_in_title, "show_scaling_in_title" },
8723 { TYPE_INTEGER,&sxi.default_window_width, "default_window_width" },
8724 { TYPE_INTEGER,&sxi.default_window_height, "default_window_height" },
8727 static struct TokenInfo debug_setup_tokens[] =
8729 { TYPE_INTEGER, &sdi.frame_delay[0], "debug.frame_delay_0" },
8730 { TYPE_INTEGER, &sdi.frame_delay[1], "debug.frame_delay_1" },
8731 { TYPE_INTEGER, &sdi.frame_delay[2], "debug.frame_delay_2" },
8732 { TYPE_INTEGER, &sdi.frame_delay[3], "debug.frame_delay_3" },
8733 { TYPE_INTEGER, &sdi.frame_delay[4], "debug.frame_delay_4" },
8734 { TYPE_INTEGER, &sdi.frame_delay[5], "debug.frame_delay_5" },
8735 { TYPE_INTEGER, &sdi.frame_delay[6], "debug.frame_delay_6" },
8736 { TYPE_INTEGER, &sdi.frame_delay[7], "debug.frame_delay_7" },
8737 { TYPE_INTEGER, &sdi.frame_delay[8], "debug.frame_delay_8" },
8738 { TYPE_INTEGER, &sdi.frame_delay[9], "debug.frame_delay_9" },
8739 { TYPE_KEY_X11, &sdi.frame_delay_key[0], "debug.key.frame_delay_0" },
8740 { TYPE_KEY_X11, &sdi.frame_delay_key[1], "debug.key.frame_delay_1" },
8741 { TYPE_KEY_X11, &sdi.frame_delay_key[2], "debug.key.frame_delay_2" },
8742 { TYPE_KEY_X11, &sdi.frame_delay_key[3], "debug.key.frame_delay_3" },
8743 { TYPE_KEY_X11, &sdi.frame_delay_key[4], "debug.key.frame_delay_4" },
8744 { TYPE_KEY_X11, &sdi.frame_delay_key[5], "debug.key.frame_delay_5" },
8745 { TYPE_KEY_X11, &sdi.frame_delay_key[6], "debug.key.frame_delay_6" },
8746 { TYPE_KEY_X11, &sdi.frame_delay_key[7], "debug.key.frame_delay_7" },
8747 { TYPE_KEY_X11, &sdi.frame_delay_key[8], "debug.key.frame_delay_8" },
8748 { TYPE_KEY_X11, &sdi.frame_delay_key[9], "debug.key.frame_delay_9" },
8749 { TYPE_BOOLEAN, &sdi.frame_delay_use_mod_key,"debug.frame_delay.use_mod_key"},
8750 { TYPE_BOOLEAN, &sdi.frame_delay_game_only, "debug.frame_delay.game_only" },
8751 { TYPE_BOOLEAN, &sdi.show_frames_per_second, "debug.show_frames_per_second" },
8754 static struct TokenInfo options_setup_tokens[] =
8756 { TYPE_BOOLEAN, &soi.verbose, "options.verbose" },
8759 static char *get_corrected_login_name(char *login_name)
8761 /* needed because player name must be a fixed length string */
8762 char *login_name_new = checked_malloc(MAX_PLAYER_NAME_LEN + 1);
8764 strncpy(login_name_new, login_name, MAX_PLAYER_NAME_LEN);
8765 login_name_new[MAX_PLAYER_NAME_LEN] = '\0';
8767 if (strlen(login_name) > MAX_PLAYER_NAME_LEN) /* name has been cut */
8768 if (strchr(login_name_new, ' '))
8769 *strchr(login_name_new, ' ') = '\0';
8771 return login_name_new;
8774 static void setSetupInfoToDefaults(struct SetupInfo *si)
8778 si->player_name = get_corrected_login_name(getLoginName());
8781 si->sound_loops = TRUE;
8782 si->sound_music = TRUE;
8783 si->sound_simple = TRUE;
8785 si->scroll_delay = TRUE;
8786 si->scroll_delay_value = STD_SCROLL_DELAY;
8787 si->engine_snapshot_mode = getStringCopy(STR_SNAPSHOT_MODE_DEFAULT);
8788 si->engine_snapshot_memory = SNAPSHOT_MEMORY_DEFAULT;
8789 si->fade_screens = TRUE;
8790 si->autorecord = TRUE;
8791 si->show_titlescreen = TRUE;
8792 si->quick_doors = FALSE;
8793 si->team_mode = FALSE;
8794 si->handicap = TRUE;
8795 si->skip_levels = TRUE;
8796 si->increment_levels = TRUE;
8797 si->auto_play_next_level = TRUE;
8798 si->skip_scores_after_game = FALSE;
8799 si->time_limit = TRUE;
8800 si->fullscreen = FALSE;
8801 si->window_scaling_percent = STD_WINDOW_SCALING_PERCENT;
8802 si->window_scaling_quality = getStringCopy(SCALING_QUALITY_DEFAULT);
8803 si->screen_rendering_mode = getStringCopy(STR_SPECIAL_RENDERING_DEFAULT);
8804 si->ask_on_escape = TRUE;
8805 si->ask_on_escape_editor = TRUE;
8806 si->quick_switch = FALSE;
8807 si->input_on_focus = FALSE;
8808 si->prefer_aga_graphics = TRUE;
8809 si->game_frame_delay = GAME_FRAME_DELAY;
8810 si->sp_show_border_elements = FALSE;
8811 si->small_game_graphics = FALSE;
8812 si->show_snapshot_buttons = FALSE;
8814 si->graphics_set = getStringCopy(GFX_CLASSIC_SUBDIR);
8815 si->sounds_set = getStringCopy(SND_CLASSIC_SUBDIR);
8816 si->music_set = getStringCopy(MUS_CLASSIC_SUBDIR);
8818 si->override_level_graphics = FALSE;
8819 si->override_level_sounds = FALSE;
8820 si->override_level_music = FALSE;
8822 si->volume_simple = 100; /* percent */
8823 si->volume_loops = 100; /* percent */
8824 si->volume_music = 100; /* percent */
8826 si->network_mode = FALSE;
8827 si->network_player_nr = 0; /* first player */
8829 si->touch.control_type = getStringCopy(TOUCH_CONTROL_DEFAULT);
8830 si->touch.move_distance = TOUCH_MOVE_DISTANCE_DEFAULT; /* percent */
8831 si->touch.drop_distance = TOUCH_DROP_DISTANCE_DEFAULT; /* percent */
8832 si->touch.transparency = TOUCH_TRANSPARENCY_DEFAULT; /* percent */
8833 si->touch.draw_outlined = TRUE;
8834 si->touch.draw_pressed = TRUE;
8836 for (i = 0; i < 2; i++)
8838 char *default_grid_button[6][2] =
8844 { "111222", " vv " },
8845 { "111222", " vv " }
8847 int grid_xsize = DEFAULT_GRID_XSIZE(i);
8848 int grid_ysize = DEFAULT_GRID_YSIZE(i);
8849 int min_xsize = MIN(6, grid_xsize);
8850 int min_ysize = MIN(6, grid_ysize);
8851 int startx = grid_xsize - min_xsize;
8852 int starty = grid_ysize - min_ysize;
8855 // virtual buttons grid can only be set to defaults if video is initialized
8856 // (this will be repeated if virtual buttons are not loaded from setup file)
8857 if (video.initialized)
8859 si->touch.grid_xsize[i] = grid_xsize;
8860 si->touch.grid_ysize[i] = grid_ysize;
8864 si->touch.grid_xsize[i] = -1;
8865 si->touch.grid_ysize[i] = -1;
8868 for (x = 0; x < MAX_GRID_XSIZE; x++)
8869 for (y = 0; y < MAX_GRID_YSIZE; y++)
8870 si->touch.grid_button[i][x][y] = CHAR_GRID_BUTTON_NONE;
8872 for (x = 0; x < min_xsize; x++)
8873 for (y = 0; y < min_ysize; y++)
8874 si->touch.grid_button[i][x][starty + y] =
8875 default_grid_button[y][0][x];
8877 for (x = 0; x < min_xsize; x++)
8878 for (y = 0; y < min_ysize; y++)
8879 si->touch.grid_button[i][startx + x][starty + y] =
8880 default_grid_button[y][1][x];
8883 si->touch.grid_initialized = video.initialized;
8885 si->editor.el_boulderdash = TRUE;
8886 si->editor.el_emerald_mine = TRUE;
8887 si->editor.el_emerald_mine_club = TRUE;
8888 si->editor.el_more = TRUE;
8889 si->editor.el_sokoban = TRUE;
8890 si->editor.el_supaplex = TRUE;
8891 si->editor.el_diamond_caves = TRUE;
8892 si->editor.el_dx_boulderdash = TRUE;
8894 si->editor.el_mirror_magic = TRUE;
8895 si->editor.el_deflektor = TRUE;
8897 si->editor.el_chars = TRUE;
8898 si->editor.el_steel_chars = TRUE;
8900 si->editor.el_classic = TRUE;
8901 si->editor.el_custom = TRUE;
8903 si->editor.el_user_defined = FALSE;
8904 si->editor.el_dynamic = TRUE;
8906 si->editor.el_headlines = TRUE;
8908 si->editor.show_element_token = FALSE;
8910 si->editor.use_template_for_new_levels = TRUE;
8912 si->shortcut.save_game = DEFAULT_KEY_SAVE_GAME;
8913 si->shortcut.load_game = DEFAULT_KEY_LOAD_GAME;
8914 si->shortcut.toggle_pause = DEFAULT_KEY_TOGGLE_PAUSE;
8916 si->shortcut.focus_player[0] = DEFAULT_KEY_FOCUS_PLAYER_1;
8917 si->shortcut.focus_player[1] = DEFAULT_KEY_FOCUS_PLAYER_2;
8918 si->shortcut.focus_player[2] = DEFAULT_KEY_FOCUS_PLAYER_3;
8919 si->shortcut.focus_player[3] = DEFAULT_KEY_FOCUS_PLAYER_4;
8920 si->shortcut.focus_player_all = DEFAULT_KEY_FOCUS_PLAYER_ALL;
8922 si->shortcut.tape_eject = DEFAULT_KEY_TAPE_EJECT;
8923 si->shortcut.tape_extra = DEFAULT_KEY_TAPE_EXTRA;
8924 si->shortcut.tape_stop = DEFAULT_KEY_TAPE_STOP;
8925 si->shortcut.tape_pause = DEFAULT_KEY_TAPE_PAUSE;
8926 si->shortcut.tape_record = DEFAULT_KEY_TAPE_RECORD;
8927 si->shortcut.tape_play = DEFAULT_KEY_TAPE_PLAY;
8929 si->shortcut.sound_simple = DEFAULT_KEY_SOUND_SIMPLE;
8930 si->shortcut.sound_loops = DEFAULT_KEY_SOUND_LOOPS;
8931 si->shortcut.sound_music = DEFAULT_KEY_SOUND_MUSIC;
8933 si->shortcut.snap_left = DEFAULT_KEY_SNAP_LEFT;
8934 si->shortcut.snap_right = DEFAULT_KEY_SNAP_RIGHT;
8935 si->shortcut.snap_up = DEFAULT_KEY_SNAP_UP;
8936 si->shortcut.snap_down = DEFAULT_KEY_SNAP_DOWN;
8938 for (i = 0; i < MAX_PLAYERS; i++)
8940 si->input[i].use_joystick = FALSE;
8941 si->input[i].joy.device_name=getStringCopy(getDeviceNameFromJoystickNr(i));
8942 si->input[i].joy.xleft = JOYSTICK_XLEFT;
8943 si->input[i].joy.xmiddle = JOYSTICK_XMIDDLE;
8944 si->input[i].joy.xright = JOYSTICK_XRIGHT;
8945 si->input[i].joy.yupper = JOYSTICK_YUPPER;
8946 si->input[i].joy.ymiddle = JOYSTICK_YMIDDLE;
8947 si->input[i].joy.ylower = JOYSTICK_YLOWER;
8948 si->input[i].joy.snap = (i == 0 ? JOY_BUTTON_1 : 0);
8949 si->input[i].joy.drop = (i == 0 ? JOY_BUTTON_2 : 0);
8950 si->input[i].key.left = (i == 0 ? DEFAULT_KEY_LEFT : KSYM_UNDEFINED);
8951 si->input[i].key.right = (i == 0 ? DEFAULT_KEY_RIGHT : KSYM_UNDEFINED);
8952 si->input[i].key.up = (i == 0 ? DEFAULT_KEY_UP : KSYM_UNDEFINED);
8953 si->input[i].key.down = (i == 0 ? DEFAULT_KEY_DOWN : KSYM_UNDEFINED);
8954 si->input[i].key.snap = (i == 0 ? DEFAULT_KEY_SNAP : KSYM_UNDEFINED);
8955 si->input[i].key.drop = (i == 0 ? DEFAULT_KEY_DROP : KSYM_UNDEFINED);
8958 si->system.sdl_videodriver = getStringCopy(ARG_DEFAULT);
8959 si->system.sdl_audiodriver = getStringCopy(ARG_DEFAULT);
8960 si->system.audio_fragment_size = DEFAULT_AUDIO_FRAGMENT_SIZE;
8962 si->internal.program_title = getStringCopy(PROGRAM_TITLE_STRING);
8963 si->internal.program_version = getStringCopy(getProgramRealVersionString());
8964 si->internal.program_author = getStringCopy(PROGRAM_AUTHOR_STRING);
8965 si->internal.program_email = getStringCopy(PROGRAM_EMAIL_STRING);
8966 si->internal.program_website = getStringCopy(PROGRAM_WEBSITE_STRING);
8967 si->internal.program_copyright = getStringCopy(PROGRAM_COPYRIGHT_STRING);
8968 si->internal.program_company = getStringCopy(PROGRAM_COMPANY_STRING);
8970 si->internal.program_icon_file = getStringCopy(PROGRAM_ICON_FILENAME);
8972 si->internal.default_graphics_set = getStringCopy(GFX_CLASSIC_SUBDIR);
8973 si->internal.default_sounds_set = getStringCopy(SND_CLASSIC_SUBDIR);
8974 si->internal.default_music_set = getStringCopy(MUS_CLASSIC_SUBDIR);
8976 si->internal.fallback_graphics_file = getStringCopy(UNDEFINED_FILENAME);
8977 si->internal.fallback_sounds_file = getStringCopy(UNDEFINED_FILENAME);
8978 si->internal.fallback_music_file = getStringCopy(UNDEFINED_FILENAME);
8980 si->internal.default_level_series = getStringCopy(UNDEFINED_LEVELSET);
8981 si->internal.choose_from_top_leveldir = FALSE;
8982 si->internal.show_scaling_in_title = TRUE;
8984 si->internal.default_window_width = WIN_XSIZE_DEFAULT;
8985 si->internal.default_window_height = WIN_YSIZE_DEFAULT;
8987 si->debug.frame_delay[0] = DEFAULT_FRAME_DELAY_0;
8988 si->debug.frame_delay[1] = DEFAULT_FRAME_DELAY_1;
8989 si->debug.frame_delay[2] = DEFAULT_FRAME_DELAY_2;
8990 si->debug.frame_delay[3] = DEFAULT_FRAME_DELAY_3;
8991 si->debug.frame_delay[4] = DEFAULT_FRAME_DELAY_4;
8992 si->debug.frame_delay[5] = DEFAULT_FRAME_DELAY_5;
8993 si->debug.frame_delay[6] = DEFAULT_FRAME_DELAY_6;
8994 si->debug.frame_delay[7] = DEFAULT_FRAME_DELAY_7;
8995 si->debug.frame_delay[8] = DEFAULT_FRAME_DELAY_8;
8996 si->debug.frame_delay[9] = DEFAULT_FRAME_DELAY_9;
8998 si->debug.frame_delay_key[0] = DEFAULT_KEY_FRAME_DELAY_0;
8999 si->debug.frame_delay_key[1] = DEFAULT_KEY_FRAME_DELAY_1;
9000 si->debug.frame_delay_key[2] = DEFAULT_KEY_FRAME_DELAY_2;
9001 si->debug.frame_delay_key[3] = DEFAULT_KEY_FRAME_DELAY_3;
9002 si->debug.frame_delay_key[4] = DEFAULT_KEY_FRAME_DELAY_4;
9003 si->debug.frame_delay_key[5] = DEFAULT_KEY_FRAME_DELAY_5;
9004 si->debug.frame_delay_key[6] = DEFAULT_KEY_FRAME_DELAY_6;
9005 si->debug.frame_delay_key[7] = DEFAULT_KEY_FRAME_DELAY_7;
9006 si->debug.frame_delay_key[8] = DEFAULT_KEY_FRAME_DELAY_8;
9007 si->debug.frame_delay_key[9] = DEFAULT_KEY_FRAME_DELAY_9;
9009 si->debug.frame_delay_use_mod_key = DEFAULT_FRAME_DELAY_USE_MOD_KEY;
9010 si->debug.frame_delay_game_only = DEFAULT_FRAME_DELAY_GAME_ONLY;
9012 si->debug.show_frames_per_second = FALSE;
9014 si->options.verbose = FALSE;
9016 #if defined(PLATFORM_ANDROID)
9017 si->fullscreen = TRUE;
9021 static void setSetupInfoToDefaults_AutoSetup(struct SetupInfo *si)
9023 si->auto_setup.editor_zoom_tilesize = MINI_TILESIZE;
9026 static void setSetupInfoToDefaults_EditorCascade(struct SetupInfo *si)
9028 si->editor_cascade.el_bd = TRUE;
9029 si->editor_cascade.el_em = TRUE;
9030 si->editor_cascade.el_emc = TRUE;
9031 si->editor_cascade.el_rnd = TRUE;
9032 si->editor_cascade.el_sb = TRUE;
9033 si->editor_cascade.el_sp = TRUE;
9034 si->editor_cascade.el_dc = TRUE;
9035 si->editor_cascade.el_dx = TRUE;
9037 si->editor_cascade.el_mm = TRUE;
9038 si->editor_cascade.el_df = TRUE;
9040 si->editor_cascade.el_chars = FALSE;
9041 si->editor_cascade.el_steel_chars = FALSE;
9042 si->editor_cascade.el_ce = FALSE;
9043 si->editor_cascade.el_ge = FALSE;
9044 si->editor_cascade.el_ref = FALSE;
9045 si->editor_cascade.el_user = FALSE;
9046 si->editor_cascade.el_dynamic = FALSE;
9049 #define MAX_HIDE_SETUP_TOKEN_SIZE 20
9051 static char *getHideSetupToken(void *setup_value)
9053 static char hide_setup_token[MAX_HIDE_SETUP_TOKEN_SIZE];
9055 if (setup_value != NULL)
9056 snprintf(hide_setup_token, MAX_HIDE_SETUP_TOKEN_SIZE, "%p", setup_value);
9058 return hide_setup_token;
9061 void setHideSetupEntry(void *setup_value)
9063 char *hide_setup_token = getHideSetupToken(setup_value);
9065 if (setup_value != NULL)
9066 setHashEntry(hide_setup_hash, hide_setup_token, "");
9069 static void setHideSetupEntryRaw(char *token_text, void *setup_value_raw)
9071 /* !!! DIRTY WORKAROUND; TO BE FIXED AFTER THE MM ENGINE RELEASE !!! */
9072 void *setup_value = setup_value_raw - (void *)&si + (void *)&setup;
9074 setHideSetupEntry(setup_value);
9077 boolean hideSetupEntry(void *setup_value)
9079 char *hide_setup_token = getHideSetupToken(setup_value);
9081 return (setup_value != NULL &&
9082 getHashEntry(hide_setup_hash, hide_setup_token) != NULL);
9085 static void setSetupInfoFromTokenText(SetupFileHash *setup_file_hash,
9086 struct TokenInfo *token_info,
9087 int token_nr, char *token_text)
9089 char *token_hide_text = getStringCat2(token_text, ".hide");
9090 char *token_hide_value = getHashEntry(setup_file_hash, token_hide_text);
9092 /* set the value of this setup option in the setup option structure */
9093 setSetupInfo(token_info, token_nr, getHashEntry(setup_file_hash, token_text));
9095 /* check if this setup option should be hidden in the setup menu */
9096 if (token_hide_value != NULL && get_boolean_from_string(token_hide_value))
9097 setHideSetupEntryRaw(token_text, token_info[token_nr].value);
9100 static void setSetupInfoFromTokenInfo(SetupFileHash *setup_file_hash,
9101 struct TokenInfo *token_info,
9104 setSetupInfoFromTokenText(setup_file_hash, token_info, token_nr,
9105 token_info[token_nr].text);
9108 static void decodeSetupFileHash(SetupFileHash *setup_file_hash)
9112 if (!setup_file_hash)
9115 if (hide_setup_hash == NULL)
9116 hide_setup_hash = newSetupFileHash();
9120 for (i = 0; i < NUM_GLOBAL_SETUP_TOKENS; i++)
9121 setSetupInfoFromTokenInfo(setup_file_hash, global_setup_tokens, i);
9124 /* virtual buttons setup */
9125 setup.touch.grid_initialized = TRUE;
9126 for (i = 0; i < 2; i++)
9128 int grid_xsize = setup.touch.grid_xsize[i];
9129 int grid_ysize = setup.touch.grid_ysize[i];
9132 // if virtual buttons are not loaded from setup file, repeat initializing
9133 // virtual buttons grid with default values later when video is initialized
9134 if (grid_xsize == -1 ||
9137 setup.touch.grid_initialized = FALSE;
9142 for (y = 0; y < grid_ysize; y++)
9144 char token_string[MAX_LINE_LEN];
9146 sprintf(token_string, "touch.virtual_buttons.%d.%02d", i, y);
9148 char *value_string = getHashEntry(setup_file_hash, token_string);
9150 if (value_string == NULL)
9153 for (x = 0; x < grid_xsize; x++)
9155 char c = value_string[x];
9157 setup.touch.grid_button[i][x][y] =
9158 (c == '.' ? CHAR_GRID_BUTTON_NONE : c);
9165 for (i = 0; i < NUM_EDITOR_SETUP_TOKENS; i++)
9166 setSetupInfoFromTokenInfo(setup_file_hash, editor_setup_tokens, i);
9169 /* shortcut setup */
9170 ssi = setup.shortcut;
9171 for (i = 0; i < NUM_SHORTCUT_SETUP_TOKENS; i++)
9172 setSetupInfoFromTokenInfo(setup_file_hash, shortcut_setup_tokens, i);
9173 setup.shortcut = ssi;
9176 for (pnr = 0; pnr < MAX_PLAYERS; pnr++)
9180 sprintf(prefix, "%s%d", TOKEN_STR_PLAYER_PREFIX, pnr + 1);
9182 sii = setup.input[pnr];
9183 for (i = 0; i < NUM_PLAYER_SETUP_TOKENS; i++)
9185 char full_token[100];
9187 sprintf(full_token, "%s%s", prefix, player_setup_tokens[i].text);
9188 setSetupInfoFromTokenText(setup_file_hash, player_setup_tokens, i,
9191 setup.input[pnr] = sii;
9196 for (i = 0; i < NUM_SYSTEM_SETUP_TOKENS; i++)
9197 setSetupInfoFromTokenInfo(setup_file_hash, system_setup_tokens, i);
9200 /* internal setup */
9201 sxi = setup.internal;
9202 for (i = 0; i < NUM_INTERNAL_SETUP_TOKENS; i++)
9203 setSetupInfoFromTokenInfo(setup_file_hash, internal_setup_tokens, i);
9204 setup.internal = sxi;
9208 for (i = 0; i < NUM_DEBUG_SETUP_TOKENS; i++)
9209 setSetupInfoFromTokenInfo(setup_file_hash, debug_setup_tokens, i);
9213 soi = setup.options;
9214 for (i = 0; i < NUM_OPTIONS_SETUP_TOKENS; i++)
9215 setSetupInfoFromTokenInfo(setup_file_hash, options_setup_tokens, i);
9216 setup.options = soi;
9218 setHideRelatedSetupEntries();
9221 static void decodeSetupFileHash_AutoSetup(SetupFileHash *setup_file_hash)
9225 if (!setup_file_hash)
9229 sasi = setup.auto_setup;
9230 for (i = 0; i < NUM_AUTO_SETUP_TOKENS; i++)
9231 setSetupInfo(auto_setup_tokens, i,
9232 getHashEntry(setup_file_hash,
9233 auto_setup_tokens[i].text));
9234 setup.auto_setup = sasi;
9237 static void decodeSetupFileHash_EditorCascade(SetupFileHash *setup_file_hash)
9241 if (!setup_file_hash)
9244 /* editor cascade setup */
9245 seci = setup.editor_cascade;
9246 for (i = 0; i < NUM_EDITOR_CASCADE_SETUP_TOKENS; i++)
9247 setSetupInfo(editor_cascade_setup_tokens, i,
9248 getHashEntry(setup_file_hash,
9249 editor_cascade_setup_tokens[i].text));
9250 setup.editor_cascade = seci;
9253 void LoadSetupFromFilename(char *filename)
9255 SetupFileHash *setup_file_hash = loadSetupFileHash(filename);
9257 if (setup_file_hash)
9259 decodeSetupFileHash(setup_file_hash);
9261 freeSetupFileHash(setup_file_hash);
9265 Error(ERR_DEBUG, "using default setup values");
9269 static void LoadSetup_SpecialPostProcessing()
9271 char *player_name_new;
9273 /* needed to work around problems with fixed length strings */
9274 player_name_new = get_corrected_login_name(setup.player_name);
9275 free(setup.player_name);
9276 setup.player_name = player_name_new;
9278 /* "scroll_delay: on(3) / off(0)" was replaced by scroll delay value */
9279 if (setup.scroll_delay == FALSE)
9281 setup.scroll_delay_value = MIN_SCROLL_DELAY;
9282 setup.scroll_delay = TRUE; /* now always "on" */
9285 /* make sure that scroll delay value stays inside valid range */
9286 setup.scroll_delay_value =
9287 MIN(MAX(MIN_SCROLL_DELAY, setup.scroll_delay_value), MAX_SCROLL_DELAY);
9294 /* always start with reliable default values */
9295 setSetupInfoToDefaults(&setup);
9297 /* try to load setup values from default setup file */
9298 filename = getDefaultSetupFilename();
9300 if (fileExists(filename))
9301 LoadSetupFromFilename(filename);
9303 /* try to load setup values from user setup file */
9304 filename = getSetupFilename();
9306 LoadSetupFromFilename(filename);
9308 LoadSetup_SpecialPostProcessing();
9311 void LoadSetup_AutoSetup()
9313 char *filename = getPath2(getSetupDir(), AUTOSETUP_FILENAME);
9314 SetupFileHash *setup_file_hash = NULL;
9316 /* always start with reliable default values */
9317 setSetupInfoToDefaults_AutoSetup(&setup);
9319 setup_file_hash = loadSetupFileHash(filename);
9321 if (setup_file_hash)
9323 decodeSetupFileHash_AutoSetup(setup_file_hash);
9325 freeSetupFileHash(setup_file_hash);
9331 void LoadSetup_EditorCascade()
9333 char *filename = getPath2(getSetupDir(), EDITORCASCADE_FILENAME);
9334 SetupFileHash *setup_file_hash = NULL;
9336 /* always start with reliable default values */
9337 setSetupInfoToDefaults_EditorCascade(&setup);
9339 setup_file_hash = loadSetupFileHash(filename);
9341 if (setup_file_hash)
9343 decodeSetupFileHash_EditorCascade(setup_file_hash);
9345 freeSetupFileHash(setup_file_hash);
9351 static void addGameControllerMappingToHash(SetupFileHash *mappings_hash,
9354 char mapping_guid[MAX_LINE_LEN];
9355 char *mapping_start, *mapping_end;
9357 // get GUID from game controller mapping line: copy complete line
9358 strncpy(mapping_guid, mapping_line, MAX_LINE_LEN - 1);
9359 mapping_guid[MAX_LINE_LEN - 1] = '\0';
9361 // get GUID from game controller mapping line: cut after GUID part
9362 mapping_start = strchr(mapping_guid, ',');
9363 if (mapping_start != NULL)
9364 *mapping_start = '\0';
9366 // cut newline from game controller mapping line
9367 mapping_end = strchr(mapping_line, '\n');
9368 if (mapping_end != NULL)
9369 *mapping_end = '\0';
9371 // add mapping entry to game controller mappings hash
9372 setHashEntry(mappings_hash, mapping_guid, mapping_line);
9375 static void LoadSetup_ReadGameControllerMappings(SetupFileHash *mappings_hash,
9380 if (!(file = fopen(filename, MODE_READ)))
9382 Error(ERR_WARN, "cannot read game controller mappings file '%s'", filename);
9389 char line[MAX_LINE_LEN];
9391 if (!fgets(line, MAX_LINE_LEN, file))
9394 addGameControllerMappingToHash(mappings_hash, line);
9402 char *filename = getSetupFilename();
9406 InitUserDataDirectory();
9408 if (!(file = fopen(filename, MODE_WRITE)))
9410 Error(ERR_WARN, "cannot write setup file '%s'", filename);
9414 fprintFileHeader(file, SETUP_FILENAME);
9418 for (i = 0; i < NUM_GLOBAL_SETUP_TOKENS; i++)
9420 /* just to make things nicer :) */
9421 if (i == SETUP_TOKEN_PLAYER_NAME + 1 ||
9422 i == SETUP_TOKEN_GRAPHICS_SET ||
9423 i == SETUP_TOKEN_VOLUME_SIMPLE ||
9424 i == SETUP_TOKEN_NETWORK_MODE ||
9425 i == SETUP_TOKEN_TOUCH_CONTROL_TYPE ||
9426 i == SETUP_TOKEN_TOUCH_GRID_XSIZE_0 ||
9427 i == SETUP_TOKEN_TOUCH_GRID_XSIZE_1)
9428 fprintf(file, "\n");
9430 fprintf(file, "%s\n", getSetupLine(global_setup_tokens, "", i));
9433 /* virtual buttons setup */
9434 for (i = 0; i < 2; i++)
9436 int grid_xsize = setup.touch.grid_xsize[i];
9437 int grid_ysize = setup.touch.grid_ysize[i];
9440 fprintf(file, "\n");
9442 for (y = 0; y < grid_ysize; y++)
9444 char token_string[MAX_LINE_LEN];
9445 char value_string[MAX_LINE_LEN];
9447 sprintf(token_string, "touch.virtual_buttons.%d.%02d", i, y);
9449 for (x = 0; x < grid_xsize; x++)
9451 char c = setup.touch.grid_button[i][x][y];
9453 value_string[x] = (c == CHAR_GRID_BUTTON_NONE ? '.' : c);
9456 value_string[grid_xsize] = '\0';
9458 fprintf(file, "%s\n", getFormattedSetupEntry(token_string, value_string));
9464 fprintf(file, "\n");
9465 for (i = 0; i < NUM_EDITOR_SETUP_TOKENS; i++)
9466 fprintf(file, "%s\n", getSetupLine(editor_setup_tokens, "", i));
9468 /* shortcut setup */
9469 ssi = setup.shortcut;
9470 fprintf(file, "\n");
9471 for (i = 0; i < NUM_SHORTCUT_SETUP_TOKENS; i++)
9472 fprintf(file, "%s\n", getSetupLine(shortcut_setup_tokens, "", i));
9475 for (pnr = 0; pnr < MAX_PLAYERS; pnr++)
9479 sprintf(prefix, "%s%d", TOKEN_STR_PLAYER_PREFIX, pnr + 1);
9480 fprintf(file, "\n");
9482 sii = setup.input[pnr];
9483 for (i = 0; i < NUM_PLAYER_SETUP_TOKENS; i++)
9484 fprintf(file, "%s\n", getSetupLine(player_setup_tokens, prefix, i));
9489 fprintf(file, "\n");
9490 for (i = 0; i < NUM_SYSTEM_SETUP_TOKENS; i++)
9491 fprintf(file, "%s\n", getSetupLine(system_setup_tokens, "", i));
9493 /* internal setup */
9494 /* (internal setup values not saved to user setup file) */
9498 fprintf(file, "\n");
9499 for (i = 0; i < NUM_DEBUG_SETUP_TOKENS; i++)
9500 fprintf(file, "%s\n", getSetupLine(debug_setup_tokens, "", i));
9503 soi = setup.options;
9504 fprintf(file, "\n");
9505 for (i = 0; i < NUM_OPTIONS_SETUP_TOKENS; i++)
9506 fprintf(file, "%s\n", getSetupLine(options_setup_tokens, "", i));
9510 SetFilePermissions(filename, PERMS_PRIVATE);
9513 void SaveSetup_AutoSetup()
9515 char *filename = getPath2(getSetupDir(), AUTOSETUP_FILENAME);
9519 InitUserDataDirectory();
9521 if (!(file = fopen(filename, MODE_WRITE)))
9523 Error(ERR_WARN, "cannot write auto setup file '%s'", filename);
9528 fprintFileHeader(file, AUTOSETUP_FILENAME);
9530 sasi = setup.auto_setup;
9531 for (i = 0; i < NUM_AUTO_SETUP_TOKENS; i++)
9532 fprintf(file, "%s\n", getSetupLine(auto_setup_tokens, "", i));
9536 SetFilePermissions(filename, PERMS_PRIVATE);
9541 void SaveSetup_EditorCascade()
9543 char *filename = getPath2(getSetupDir(), EDITORCASCADE_FILENAME);
9547 InitUserDataDirectory();
9549 if (!(file = fopen(filename, MODE_WRITE)))
9551 Error(ERR_WARN, "cannot write editor cascade state file '%s'", filename);
9556 fprintFileHeader(file, EDITORCASCADE_FILENAME);
9558 seci = setup.editor_cascade;
9559 for (i = 0; i < NUM_EDITOR_CASCADE_SETUP_TOKENS; i++)
9560 fprintf(file, "%s\n", getSetupLine(editor_cascade_setup_tokens, "", i));
9564 SetFilePermissions(filename, PERMS_PRIVATE);
9569 static void SaveSetup_WriteGameControllerMappings(SetupFileHash *mappings_hash,
9574 if (!(file = fopen(filename, MODE_WRITE)))
9576 Error(ERR_WARN, "cannot write game controller mappings file '%s'",filename);
9581 BEGIN_HASH_ITERATION(mappings_hash, itr)
9583 fprintf(file, "%s\n", HASH_ITERATION_VALUE(itr));
9585 END_HASH_ITERATION(mappings_hash, itr)
9590 void SaveSetup_AddGameControllerMapping(char *mapping)
9592 char *filename = getPath2(getSetupDir(), GAMECONTROLLER_BASENAME);
9593 SetupFileHash *mappings_hash = newSetupFileHash();
9595 InitUserDataDirectory();
9597 // load existing personal game controller mappings
9598 LoadSetup_ReadGameControllerMappings(mappings_hash, filename);
9600 // add new mapping to personal game controller mappings
9601 addGameControllerMappingToHash(mappings_hash, mapping);
9603 // save updated personal game controller mappings
9604 SaveSetup_WriteGameControllerMappings(mappings_hash, filename);
9606 freeSetupFileHash(mappings_hash);
9610 void LoadCustomElementDescriptions()
9612 char *filename = getCustomArtworkConfigFilename(ARTWORK_TYPE_GRAPHICS);
9613 SetupFileHash *setup_file_hash;
9616 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
9618 if (element_info[i].custom_description != NULL)
9620 free(element_info[i].custom_description);
9621 element_info[i].custom_description = NULL;
9625 if ((setup_file_hash = loadSetupFileHash(filename)) == NULL)
9628 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
9630 char *token = getStringCat2(element_info[i].token_name, ".name");
9631 char *value = getHashEntry(setup_file_hash, token);
9634 element_info[i].custom_description = getStringCopy(value);
9639 freeSetupFileHash(setup_file_hash);
9642 static int getElementFromToken(char *token)
9644 char *value = getHashEntry(element_token_hash, token);
9649 Error(ERR_WARN, "unknown element token '%s'", token);
9651 return EL_UNDEFINED;
9654 static int get_token_parameter_value(char *token, char *value_raw)
9658 if (token == NULL || value_raw == NULL)
9659 return ARG_UNDEFINED_VALUE;
9661 suffix = strrchr(token, '.');
9665 if (strEqual(suffix, ".element"))
9666 return getElementFromToken(value_raw);
9668 /* !!! USE CORRECT VALUE TYPE (currently works also for TYPE_BOOLEAN) !!! */
9669 return get_parameter_value(value_raw, suffix, TYPE_INTEGER);
9672 void InitMenuDesignSettings_Static()
9676 /* always start with reliable default values from static default config */
9677 for (i = 0; image_config_vars[i].token != NULL; i++)
9679 char *value = getHashEntry(image_config_hash, image_config_vars[i].token);
9682 *image_config_vars[i].value =
9683 get_token_parameter_value(image_config_vars[i].token, value);
9687 static void InitMenuDesignSettings_SpecialPreProcessing()
9691 /* the following initializes hierarchical values from static configuration */
9693 /* special case: initialize "ARG_DEFAULT" values in static default config */
9694 /* (e.g., initialize "[titlemessage].fade_mode" from "[title].fade_mode") */
9695 titlescreen_initial_first_default.fade_mode =
9696 title_initial_first_default.fade_mode;
9697 titlescreen_initial_first_default.fade_delay =
9698 title_initial_first_default.fade_delay;
9699 titlescreen_initial_first_default.post_delay =
9700 title_initial_first_default.post_delay;
9701 titlescreen_initial_first_default.auto_delay =
9702 title_initial_first_default.auto_delay;
9703 titlescreen_first_default.fade_mode = title_first_default.fade_mode;
9704 titlescreen_first_default.fade_delay = title_first_default.fade_delay;
9705 titlescreen_first_default.post_delay = title_first_default.post_delay;
9706 titlescreen_first_default.auto_delay = title_first_default.auto_delay;
9707 titlemessage_initial_first_default.fade_mode =
9708 title_initial_first_default.fade_mode;
9709 titlemessage_initial_first_default.fade_delay =
9710 title_initial_first_default.fade_delay;
9711 titlemessage_initial_first_default.post_delay =
9712 title_initial_first_default.post_delay;
9713 titlemessage_initial_first_default.auto_delay =
9714 title_initial_first_default.auto_delay;
9715 titlemessage_first_default.fade_mode = title_first_default.fade_mode;
9716 titlemessage_first_default.fade_delay = title_first_default.fade_delay;
9717 titlemessage_first_default.post_delay = title_first_default.post_delay;
9718 titlemessage_first_default.auto_delay = title_first_default.auto_delay;
9720 titlescreen_initial_default.fade_mode = title_initial_default.fade_mode;
9721 titlescreen_initial_default.fade_delay = title_initial_default.fade_delay;
9722 titlescreen_initial_default.post_delay = title_initial_default.post_delay;
9723 titlescreen_initial_default.auto_delay = title_initial_default.auto_delay;
9724 titlescreen_default.fade_mode = title_default.fade_mode;
9725 titlescreen_default.fade_delay = title_default.fade_delay;
9726 titlescreen_default.post_delay = title_default.post_delay;
9727 titlescreen_default.auto_delay = title_default.auto_delay;
9728 titlemessage_initial_default.fade_mode = title_initial_default.fade_mode;
9729 titlemessage_initial_default.fade_delay = title_initial_default.fade_delay;
9730 titlemessage_initial_default.post_delay = title_initial_default.post_delay;
9731 titlemessage_initial_default.auto_delay = title_initial_default.auto_delay;
9732 titlemessage_default.fade_mode = title_default.fade_mode;
9733 titlemessage_default.fade_delay = title_default.fade_delay;
9734 titlemessage_default.post_delay = title_default.post_delay;
9735 titlemessage_default.auto_delay = title_default.auto_delay;
9737 /* special case: initialize "ARG_DEFAULT" values in static default config */
9738 /* (e.g., init "titlemessage_1.fade_mode" from "[titlemessage].fade_mode") */
9739 for (i = 0; i < MAX_NUM_TITLE_MESSAGES; i++)
9741 titlescreen_initial_first[i] = titlescreen_initial_first_default;
9742 titlescreen_first[i] = titlescreen_first_default;
9743 titlemessage_initial_first[i] = titlemessage_initial_first_default;
9744 titlemessage_first[i] = titlemessage_first_default;
9746 titlescreen_initial[i] = titlescreen_initial_default;
9747 titlescreen[i] = titlescreen_default;
9748 titlemessage_initial[i] = titlemessage_initial_default;
9749 titlemessage[i] = titlemessage_default;
9752 /* special case: initialize "ARG_DEFAULT" values in static default config */
9753 /* (eg, init "menu.enter_screen.SCORES.xyz" from "menu.enter_screen.xyz") */
9754 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
9756 if (i == GFX_SPECIAL_ARG_TITLE) /* title values already initialized */
9759 menu.enter_screen[i] = menu.enter_screen[GFX_SPECIAL_ARG_DEFAULT];
9760 menu.leave_screen[i] = menu.leave_screen[GFX_SPECIAL_ARG_DEFAULT];
9761 menu.next_screen[i] = menu.next_screen[GFX_SPECIAL_ARG_DEFAULT];
9764 /* special case: initialize "ARG_DEFAULT" values in static default config */
9765 /* (eg, init "viewport.door_1.MAIN.xyz" from "viewport.door_1.xyz") */
9766 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
9768 viewport.window[i] = viewport.window[GFX_SPECIAL_ARG_DEFAULT];
9769 viewport.playfield[i] = viewport.playfield[GFX_SPECIAL_ARG_DEFAULT];
9770 viewport.door_1[i] = viewport.door_1[GFX_SPECIAL_ARG_DEFAULT];
9772 if (i == GFX_SPECIAL_ARG_EDITOR) /* editor values already initialized */
9775 viewport.door_2[i] = viewport.door_2[GFX_SPECIAL_ARG_DEFAULT];
9779 static void InitMenuDesignSettings_SpecialPostProcessing()
9783 struct XY *dst, *src;
9787 { &game.button.save, &game.button.stop },
9788 { &game.button.pause2, &game.button.pause },
9789 { &game.button.load, &game.button.play },
9790 { &game.button.undo, &game.button.stop },
9791 { &game.button.redo, &game.button.play },
9797 /* special case: initialize later added SETUP list size from LEVELS value */
9798 if (menu.list_size[GAME_MODE_SETUP] == -1)
9799 menu.list_size[GAME_MODE_SETUP] = menu.list_size[GAME_MODE_LEVELS];
9801 /* set default position for snapshot buttons to stop/pause/play buttons */
9802 for (i = 0; game_buttons_xy[i].dst != NULL; i++)
9803 if ((*game_buttons_xy[i].dst).x == -1 &&
9804 (*game_buttons_xy[i].dst).y == -1)
9805 *game_buttons_xy[i].dst = *game_buttons_xy[i].src;
9808 static void InitMenuDesignSettings_SpecialPostProcessing_AfterGraphics()
9812 struct XYTileSize *dst, *src;
9815 editor_buttons_xy[] =
9818 &editor.button.element_left, &editor.palette.element_left,
9819 IMG_GFX_EDITOR_BUTTON_ELEMENT_LEFT
9822 &editor.button.element_middle, &editor.palette.element_middle,
9823 IMG_GFX_EDITOR_BUTTON_ELEMENT_MIDDLE
9826 &editor.button.element_right, &editor.palette.element_right,
9827 IMG_GFX_EDITOR_BUTTON_ELEMENT_RIGHT
9834 /* set default position for element buttons to element graphics */
9835 for (i = 0; editor_buttons_xy[i].dst != NULL; i++)
9837 if ((*editor_buttons_xy[i].dst).x == -1 &&
9838 (*editor_buttons_xy[i].dst).y == -1)
9840 struct GraphicInfo *gd = &graphic_info[editor_buttons_xy[i].graphic];
9842 gd->width = gd->height = editor_buttons_xy[i].src->tile_size;
9844 *editor_buttons_xy[i].dst = *editor_buttons_xy[i].src;
9849 static void LoadMenuDesignSettingsFromFilename(char *filename)
9851 static struct TitleFadingInfo tfi;
9852 static struct TitleMessageInfo tmi;
9853 static struct TokenInfo title_tokens[] =
9855 { TYPE_INTEGER, &tfi.fade_mode, ".fade_mode" },
9856 { TYPE_INTEGER, &tfi.fade_delay, ".fade_delay" },
9857 { TYPE_INTEGER, &tfi.post_delay, ".post_delay" },
9858 { TYPE_INTEGER, &tfi.auto_delay, ".auto_delay" },
9862 static struct TokenInfo titlemessage_tokens[] =
9864 { TYPE_INTEGER, &tmi.x, ".x" },
9865 { TYPE_INTEGER, &tmi.y, ".y" },
9866 { TYPE_INTEGER, &tmi.width, ".width" },
9867 { TYPE_INTEGER, &tmi.height, ".height" },
9868 { TYPE_INTEGER, &tmi.chars, ".chars" },
9869 { TYPE_INTEGER, &tmi.lines, ".lines" },
9870 { TYPE_INTEGER, &tmi.align, ".align" },
9871 { TYPE_INTEGER, &tmi.valign, ".valign" },
9872 { TYPE_INTEGER, &tmi.font, ".font" },
9873 { TYPE_BOOLEAN, &tmi.autowrap, ".autowrap" },
9874 { TYPE_BOOLEAN, &tmi.centered, ".centered" },
9875 { TYPE_BOOLEAN, &tmi.parse_comments, ".parse_comments" },
9876 { TYPE_INTEGER, &tmi.sort_priority, ".sort_priority" },
9877 { TYPE_INTEGER, &tmi.fade_mode, ".fade_mode" },
9878 { TYPE_INTEGER, &tmi.fade_delay, ".fade_delay" },
9879 { TYPE_INTEGER, &tmi.post_delay, ".post_delay" },
9880 { TYPE_INTEGER, &tmi.auto_delay, ".auto_delay" },
9886 struct TitleFadingInfo *info;
9891 /* initialize first titles from "enter screen" definitions, if defined */
9892 { &title_initial_first_default, "menu.enter_screen.TITLE" },
9893 { &title_first_default, "menu.enter_screen.TITLE" },
9895 /* initialize title screens from "next screen" definitions, if defined */
9896 { &title_initial_default, "menu.next_screen.TITLE" },
9897 { &title_default, "menu.next_screen.TITLE" },
9903 struct TitleMessageInfo *array;
9906 titlemessage_arrays[] =
9908 /* initialize first titles from "enter screen" definitions, if defined */
9909 { titlescreen_initial_first, "menu.enter_screen.TITLE" },
9910 { titlescreen_first, "menu.enter_screen.TITLE" },
9911 { titlemessage_initial_first, "menu.enter_screen.TITLE" },
9912 { titlemessage_first, "menu.enter_screen.TITLE" },
9914 /* initialize titles from "next screen" definitions, if defined */
9915 { titlescreen_initial, "menu.next_screen.TITLE" },
9916 { titlescreen, "menu.next_screen.TITLE" },
9917 { titlemessage_initial, "menu.next_screen.TITLE" },
9918 { titlemessage, "menu.next_screen.TITLE" },
9920 /* overwrite titles with title definitions, if defined */
9921 { titlescreen_initial_first, "[title_initial]" },
9922 { titlescreen_first, "[title]" },
9923 { titlemessage_initial_first, "[title_initial]" },
9924 { titlemessage_first, "[title]" },
9926 { titlescreen_initial, "[title_initial]" },
9927 { titlescreen, "[title]" },
9928 { titlemessage_initial, "[title_initial]" },
9929 { titlemessage, "[title]" },
9931 /* overwrite titles with title screen/message definitions, if defined */
9932 { titlescreen_initial_first, "[titlescreen_initial]" },
9933 { titlescreen_first, "[titlescreen]" },
9934 { titlemessage_initial_first, "[titlemessage_initial]" },
9935 { titlemessage_first, "[titlemessage]" },
9937 { titlescreen_initial, "[titlescreen_initial]" },
9938 { titlescreen, "[titlescreen]" },
9939 { titlemessage_initial, "[titlemessage_initial]" },
9940 { titlemessage, "[titlemessage]" },
9944 SetupFileHash *setup_file_hash;
9947 if ((setup_file_hash = loadSetupFileHash(filename)) == NULL)
9950 /* the following initializes hierarchical values from dynamic configuration */
9952 /* special case: initialize with default values that may be overwritten */
9953 /* (e.g., init "menu.draw_xoffset.INFO" from "menu.draw_xoffset") */
9954 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
9956 char *value_1 = getHashEntry(setup_file_hash, "menu.draw_xoffset");
9957 char *value_2 = getHashEntry(setup_file_hash, "menu.draw_yoffset");
9958 char *value_3 = getHashEntry(setup_file_hash, "menu.list_size");
9960 if (value_1 != NULL)
9961 menu.draw_xoffset[i] = get_integer_from_string(value_1);
9962 if (value_2 != NULL)
9963 menu.draw_yoffset[i] = get_integer_from_string(value_2);
9964 if (value_3 != NULL)
9965 menu.list_size[i] = get_integer_from_string(value_3);
9968 /* special case: initialize with default values that may be overwritten */
9969 /* (eg, init "menu.draw_xoffset.INFO[XXX]" from "menu.draw_xoffset.INFO") */
9970 for (i = 0; i < NUM_SPECIAL_GFX_INFO_ARGS; i++)
9972 char *value_1 = getHashEntry(setup_file_hash, "menu.draw_xoffset.INFO");
9973 char *value_2 = getHashEntry(setup_file_hash, "menu.draw_yoffset.INFO");
9975 if (value_1 != NULL)
9976 menu.draw_xoffset_info[i] = get_integer_from_string(value_1);
9977 if (value_2 != NULL)
9978 menu.draw_yoffset_info[i] = get_integer_from_string(value_2);
9980 if (i == GFX_SPECIAL_ARG_INFO_ELEMENTS)
9982 char *value_1 = getHashEntry(setup_file_hash, "menu.list_size.INFO");
9984 if (value_1 != NULL)
9985 menu.list_size_info[i] = get_integer_from_string(value_1);
9989 /* special case: initialize with default values that may be overwritten */
9990 /* (eg, init "menu.draw_xoffset.SETUP[XXX]" from "menu.draw_xoffset.SETUP") */
9991 for (i = 0; i < NUM_SPECIAL_GFX_SETUP_ARGS; i++)
9993 char *value_1 = getHashEntry(setup_file_hash, "menu.draw_xoffset.SETUP");
9994 char *value_2 = getHashEntry(setup_file_hash, "menu.draw_yoffset.SETUP");
9996 if (value_1 != NULL)
9997 menu.draw_xoffset_setup[i] = get_integer_from_string(value_1);
9998 if (value_2 != NULL)
9999 menu.draw_yoffset_setup[i] = get_integer_from_string(value_2);
10002 /* special case: initialize with default values that may be overwritten */
10003 /* (eg, init "menu.line_spacing.INFO[XXX]" from "menu.line_spacing.INFO") */
10004 for (i = 0; i < NUM_SPECIAL_GFX_INFO_ARGS; i++)
10006 char *value_1 = getHashEntry(setup_file_hash,"menu.left_spacing.INFO");
10007 char *value_2 = getHashEntry(setup_file_hash,"menu.right_spacing.INFO");
10008 char *value_3 = getHashEntry(setup_file_hash,"menu.top_spacing.INFO");
10009 char *value_4 = getHashEntry(setup_file_hash,"menu.bottom_spacing.INFO");
10010 char *value_5 = getHashEntry(setup_file_hash,"menu.paragraph_spacing.INFO");
10011 char *value_6 = getHashEntry(setup_file_hash,"menu.headline1_spacing.INFO");
10012 char *value_7 = getHashEntry(setup_file_hash,"menu.headline2_spacing.INFO");
10013 char *value_8 = getHashEntry(setup_file_hash,"menu.line_spacing.INFO");
10014 char *value_9 = getHashEntry(setup_file_hash,"menu.extra_spacing.INFO");
10016 if (value_1 != NULL)
10017 menu.left_spacing_info[i] = get_integer_from_string(value_1);
10018 if (value_2 != NULL)
10019 menu.right_spacing_info[i] = get_integer_from_string(value_2);
10020 if (value_3 != NULL)
10021 menu.top_spacing_info[i] = get_integer_from_string(value_3);
10022 if (value_4 != NULL)
10023 menu.bottom_spacing_info[i] = get_integer_from_string(value_4);
10024 if (value_5 != NULL)
10025 menu.paragraph_spacing_info[i] = get_integer_from_string(value_5);
10026 if (value_6 != NULL)
10027 menu.headline1_spacing_info[i] = get_integer_from_string(value_6);
10028 if (value_7 != NULL)
10029 menu.headline2_spacing_info[i] = get_integer_from_string(value_7);
10030 if (value_8 != NULL)
10031 menu.line_spacing_info[i] = get_integer_from_string(value_8);
10032 if (value_9 != NULL)
10033 menu.extra_spacing_info[i] = get_integer_from_string(value_9);
10036 /* special case: initialize with default values that may be overwritten */
10037 /* (eg, init "menu.enter_screen.SCORES.xyz" from "menu.enter_screen.xyz") */
10038 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
10040 char *token_1 = "menu.enter_screen.fade_mode";
10041 char *token_2 = "menu.enter_screen.fade_delay";
10042 char *token_3 = "menu.enter_screen.post_delay";
10043 char *token_4 = "menu.leave_screen.fade_mode";
10044 char *token_5 = "menu.leave_screen.fade_delay";
10045 char *token_6 = "menu.leave_screen.post_delay";
10046 char *token_7 = "menu.next_screen.fade_mode";
10047 char *token_8 = "menu.next_screen.fade_delay";
10048 char *token_9 = "menu.next_screen.post_delay";
10049 char *value_1 = getHashEntry(setup_file_hash, token_1);
10050 char *value_2 = getHashEntry(setup_file_hash, token_2);
10051 char *value_3 = getHashEntry(setup_file_hash, token_3);
10052 char *value_4 = getHashEntry(setup_file_hash, token_4);
10053 char *value_5 = getHashEntry(setup_file_hash, token_5);
10054 char *value_6 = getHashEntry(setup_file_hash, token_6);
10055 char *value_7 = getHashEntry(setup_file_hash, token_7);
10056 char *value_8 = getHashEntry(setup_file_hash, token_8);
10057 char *value_9 = getHashEntry(setup_file_hash, token_9);
10059 if (value_1 != NULL)
10060 menu.enter_screen[i].fade_mode = get_token_parameter_value(token_1,
10062 if (value_2 != NULL)
10063 menu.enter_screen[i].fade_delay = get_token_parameter_value(token_2,
10065 if (value_3 != NULL)
10066 menu.enter_screen[i].post_delay = get_token_parameter_value(token_3,
10068 if (value_4 != NULL)
10069 menu.leave_screen[i].fade_mode = get_token_parameter_value(token_4,
10071 if (value_5 != NULL)
10072 menu.leave_screen[i].fade_delay = get_token_parameter_value(token_5,
10074 if (value_6 != NULL)
10075 menu.leave_screen[i].post_delay = get_token_parameter_value(token_6,
10077 if (value_7 != NULL)
10078 menu.next_screen[i].fade_mode = get_token_parameter_value(token_7,
10080 if (value_8 != NULL)
10081 menu.next_screen[i].fade_delay = get_token_parameter_value(token_8,
10083 if (value_9 != NULL)
10084 menu.next_screen[i].post_delay = get_token_parameter_value(token_9,
10088 /* special case: initialize with default values that may be overwritten */
10089 /* (eg, init "viewport.door_1.MAIN.xyz" from "viewport.door_1.xyz") */
10090 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
10092 char *token_w1 = "viewport.window.width";
10093 char *token_w2 = "viewport.window.height";
10094 char *token_01 = "viewport.playfield.x";
10095 char *token_02 = "viewport.playfield.y";
10096 char *token_03 = "viewport.playfield.width";
10097 char *token_04 = "viewport.playfield.height";
10098 char *token_05 = "viewport.playfield.border_size";
10099 char *token_06 = "viewport.door_1.x";
10100 char *token_07 = "viewport.door_1.y";
10101 char *token_08 = "viewport.door_1.width";
10102 char *token_09 = "viewport.door_1.height";
10103 char *token_10 = "viewport.door_1.border_size";
10104 char *token_11 = "viewport.door_2.x";
10105 char *token_12 = "viewport.door_2.y";
10106 char *token_13 = "viewport.door_2.width";
10107 char *token_14 = "viewport.door_2.height";
10108 char *token_15 = "viewport.door_2.border_size";
10109 char *value_w1 = getHashEntry(setup_file_hash, token_w1);
10110 char *value_w2 = getHashEntry(setup_file_hash, token_w2);
10111 char *value_01 = getHashEntry(setup_file_hash, token_01);
10112 char *value_02 = getHashEntry(setup_file_hash, token_02);
10113 char *value_03 = getHashEntry(setup_file_hash, token_03);
10114 char *value_04 = getHashEntry(setup_file_hash, token_04);
10115 char *value_05 = getHashEntry(setup_file_hash, token_05);
10116 char *value_06 = getHashEntry(setup_file_hash, token_06);
10117 char *value_07 = getHashEntry(setup_file_hash, token_07);
10118 char *value_08 = getHashEntry(setup_file_hash, token_08);
10119 char *value_09 = getHashEntry(setup_file_hash, token_09);
10120 char *value_10 = getHashEntry(setup_file_hash, token_10);
10121 char *value_11 = getHashEntry(setup_file_hash, token_11);
10122 char *value_12 = getHashEntry(setup_file_hash, token_12);
10123 char *value_13 = getHashEntry(setup_file_hash, token_13);
10124 char *value_14 = getHashEntry(setup_file_hash, token_14);
10125 char *value_15 = getHashEntry(setup_file_hash, token_15);
10127 if (value_w1 != NULL)
10128 viewport.window[i].width = get_token_parameter_value(token_w1, value_w1);
10129 if (value_w2 != NULL)
10130 viewport.window[i].height = get_token_parameter_value(token_w2, value_w2);
10131 if (value_01 != NULL)
10132 viewport.playfield[i].x = get_token_parameter_value(token_01, value_01);
10133 if (value_02 != NULL)
10134 viewport.playfield[i].y = get_token_parameter_value(token_02, value_02);
10135 if (value_03 != NULL)
10136 viewport.playfield[i].width = get_token_parameter_value(token_03,
10138 if (value_04 != NULL)
10139 viewport.playfield[i].height = get_token_parameter_value(token_04,
10141 if (value_05 != NULL)
10142 viewport.playfield[i].border_size = get_token_parameter_value(token_05,
10144 if (value_06 != NULL)
10145 viewport.door_1[i].x = get_token_parameter_value(token_06, value_06);
10146 if (value_07 != NULL)
10147 viewport.door_1[i].y = get_token_parameter_value(token_07, value_07);
10148 if (value_08 != NULL)
10149 viewport.door_1[i].width = get_token_parameter_value(token_08, value_08);
10150 if (value_09 != NULL)
10151 viewport.door_1[i].height = get_token_parameter_value(token_09, value_09);
10152 if (value_10 != NULL)
10153 viewport.door_1[i].border_size = get_token_parameter_value(token_10,
10155 if (value_11 != NULL)
10156 viewport.door_2[i].x = get_token_parameter_value(token_11, value_11);
10157 if (value_12 != NULL)
10158 viewport.door_2[i].y = get_token_parameter_value(token_12, value_12);
10159 if (value_13 != NULL)
10160 viewport.door_2[i].width = get_token_parameter_value(token_13, value_13);
10161 if (value_14 != NULL)
10162 viewport.door_2[i].height = get_token_parameter_value(token_14, value_14);
10163 if (value_15 != NULL)
10164 viewport.door_1[i].border_size = get_token_parameter_value(token_15,
10168 /* special case: initialize with default values that may be overwritten */
10169 /* (e.g., init "[title].fade_mode" from "menu.next_screen.TITLE.fade_mode") */
10170 for (i = 0; title_info[i].info != NULL; i++)
10172 struct TitleFadingInfo *info = title_info[i].info;
10173 char *base_token = title_info[i].text;
10175 for (j = 0; title_tokens[j].type != -1; j++)
10177 char *token = getStringCat2(base_token, title_tokens[j].text);
10178 char *value = getHashEntry(setup_file_hash, token);
10182 int parameter_value = get_token_parameter_value(token, value);
10186 *(int *)title_tokens[j].value = (int)parameter_value;
10195 /* special case: initialize with default values that may be overwritten */
10196 /* (e.g., init "titlemessage_1.fade_mode" from "[titlemessage].fade_mode") */
10197 for (i = 0; titlemessage_arrays[i].array != NULL; i++)
10199 struct TitleMessageInfo *array = titlemessage_arrays[i].array;
10200 char *base_token = titlemessage_arrays[i].text;
10202 for (j = 0; titlemessage_tokens[j].type != -1; j++)
10204 char *token = getStringCat2(base_token, titlemessage_tokens[j].text);
10205 char *value = getHashEntry(setup_file_hash, token);
10209 int parameter_value = get_token_parameter_value(token, value);
10211 for (k = 0; k < MAX_NUM_TITLE_MESSAGES; k++)
10215 if (titlemessage_tokens[j].type == TYPE_INTEGER)
10216 *(int *)titlemessage_tokens[j].value = (int)parameter_value;
10218 *(boolean *)titlemessage_tokens[j].value = (boolean)parameter_value;
10228 /* read (and overwrite with) values that may be specified in config file */
10229 for (i = 0; image_config_vars[i].token != NULL; i++)
10231 char *value = getHashEntry(setup_file_hash, image_config_vars[i].token);
10233 /* (ignore definitions set to "[DEFAULT]" which are already initialized) */
10234 if (value != NULL && !strEqual(value, ARG_DEFAULT))
10235 *image_config_vars[i].value =
10236 get_token_parameter_value(image_config_vars[i].token, value);
10239 freeSetupFileHash(setup_file_hash);
10242 void LoadMenuDesignSettings()
10244 char *filename_base = UNDEFINED_FILENAME, *filename_local;
10246 InitMenuDesignSettings_Static();
10247 InitMenuDesignSettings_SpecialPreProcessing();
10249 if (!GFX_OVERRIDE_ARTWORK(ARTWORK_TYPE_GRAPHICS))
10251 /* first look for special settings configured in level series config */
10252 filename_base = getCustomArtworkLevelConfigFilename(ARTWORK_TYPE_GRAPHICS);
10254 if (fileExists(filename_base))
10255 LoadMenuDesignSettingsFromFilename(filename_base);
10258 filename_local = getCustomArtworkConfigFilename(ARTWORK_TYPE_GRAPHICS);
10260 if (filename_local != NULL && !strEqual(filename_base, filename_local))
10261 LoadMenuDesignSettingsFromFilename(filename_local);
10263 InitMenuDesignSettings_SpecialPostProcessing();
10266 void LoadMenuDesignSettings_AfterGraphics()
10268 InitMenuDesignSettings_SpecialPostProcessing_AfterGraphics();
10271 void LoadUserDefinedEditorElementList(int **elements, int *num_elements)
10273 char *filename = getEditorSetupFilename();
10274 SetupFileList *setup_file_list, *list;
10275 SetupFileHash *element_hash;
10276 int num_unknown_tokens = 0;
10279 if ((setup_file_list = loadSetupFileList(filename)) == NULL)
10282 element_hash = newSetupFileHash();
10284 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
10285 setHashEntry(element_hash, element_info[i].token_name, i_to_a(i));
10287 /* determined size may be larger than needed (due to unknown elements) */
10289 for (list = setup_file_list; list != NULL; list = list->next)
10292 /* add space for up to 3 more elements for padding that may be needed */
10293 *num_elements += 3;
10295 /* free memory for old list of elements, if needed */
10296 checked_free(*elements);
10298 /* allocate memory for new list of elements */
10299 *elements = checked_malloc(*num_elements * sizeof(int));
10302 for (list = setup_file_list; list != NULL; list = list->next)
10304 char *value = getHashEntry(element_hash, list->token);
10306 if (value == NULL) /* try to find obsolete token mapping */
10308 char *mapped_token = get_mapped_token(list->token);
10310 if (mapped_token != NULL)
10312 value = getHashEntry(element_hash, mapped_token);
10314 free(mapped_token);
10320 (*elements)[(*num_elements)++] = atoi(value);
10324 if (num_unknown_tokens == 0)
10326 Error(ERR_INFO_LINE, "-");
10327 Error(ERR_INFO, "warning: unknown token(s) found in config file:");
10328 Error(ERR_INFO, "- config file: '%s'", filename);
10330 num_unknown_tokens++;
10333 Error(ERR_INFO, "- token: '%s'", list->token);
10337 if (num_unknown_tokens > 0)
10338 Error(ERR_INFO_LINE, "-");
10340 while (*num_elements % 4) /* pad with empty elements, if needed */
10341 (*elements)[(*num_elements)++] = EL_EMPTY;
10343 freeSetupFileList(setup_file_list);
10344 freeSetupFileHash(element_hash);
10347 for (i = 0; i < *num_elements; i++)
10348 printf("editor: element '%s' [%d]\n",
10349 element_info[(*elements)[i]].token_name, (*elements)[i]);
10353 static struct MusicFileInfo *get_music_file_info_ext(char *basename, int music,
10356 SetupFileHash *setup_file_hash = NULL;
10357 struct MusicFileInfo tmp_music_file_info, *new_music_file_info;
10358 char *filename_music, *filename_prefix, *filename_info;
10364 token_to_value_ptr[] =
10366 { "title_header", &tmp_music_file_info.title_header },
10367 { "artist_header", &tmp_music_file_info.artist_header },
10368 { "album_header", &tmp_music_file_info.album_header },
10369 { "year_header", &tmp_music_file_info.year_header },
10371 { "title", &tmp_music_file_info.title },
10372 { "artist", &tmp_music_file_info.artist },
10373 { "album", &tmp_music_file_info.album },
10374 { "year", &tmp_music_file_info.year },
10380 filename_music = (is_sound ? getCustomSoundFilename(basename) :
10381 getCustomMusicFilename(basename));
10383 if (filename_music == NULL)
10386 /* ---------- try to replace file extension ---------- */
10388 filename_prefix = getStringCopy(filename_music);
10389 if (strrchr(filename_prefix, '.') != NULL)
10390 *strrchr(filename_prefix, '.') = '\0';
10391 filename_info = getStringCat2(filename_prefix, ".txt");
10393 if (fileExists(filename_info))
10394 setup_file_hash = loadSetupFileHash(filename_info);
10396 free(filename_prefix);
10397 free(filename_info);
10399 if (setup_file_hash == NULL)
10401 /* ---------- try to add file extension ---------- */
10403 filename_prefix = getStringCopy(filename_music);
10404 filename_info = getStringCat2(filename_prefix, ".txt");
10406 if (fileExists(filename_info))
10407 setup_file_hash = loadSetupFileHash(filename_info);
10409 free(filename_prefix);
10410 free(filename_info);
10413 if (setup_file_hash == NULL)
10416 /* ---------- music file info found ---------- */
10418 clear_mem(&tmp_music_file_info, sizeof(struct MusicFileInfo));
10420 for (i = 0; token_to_value_ptr[i].token != NULL; i++)
10422 char *value = getHashEntry(setup_file_hash, token_to_value_ptr[i].token);
10424 *token_to_value_ptr[i].value_ptr =
10425 getStringCopy(value != NULL && *value != '\0' ? value : UNKNOWN_NAME);
10428 tmp_music_file_info.basename = getStringCopy(basename);
10429 tmp_music_file_info.music = music;
10430 tmp_music_file_info.is_sound = is_sound;
10432 new_music_file_info = checked_malloc(sizeof(struct MusicFileInfo));
10433 *new_music_file_info = tmp_music_file_info;
10435 return new_music_file_info;
10438 static struct MusicFileInfo *get_music_file_info(char *basename, int music)
10440 return get_music_file_info_ext(basename, music, FALSE);
10443 static struct MusicFileInfo *get_sound_file_info(char *basename, int sound)
10445 return get_music_file_info_ext(basename, sound, TRUE);
10448 static boolean music_info_listed_ext(struct MusicFileInfo *list,
10449 char *basename, boolean is_sound)
10451 for (; list != NULL; list = list->next)
10452 if (list->is_sound == is_sound && strEqual(list->basename, basename))
10458 static boolean music_info_listed(struct MusicFileInfo *list, char *basename)
10460 return music_info_listed_ext(list, basename, FALSE);
10463 static boolean sound_info_listed(struct MusicFileInfo *list, char *basename)
10465 return music_info_listed_ext(list, basename, TRUE);
10468 void LoadMusicInfo()
10470 char *music_directory = getCustomMusicDirectory();
10471 int num_music = getMusicListSize();
10472 int num_music_noconf = 0;
10473 int num_sounds = getSoundListSize();
10475 DirectoryEntry *dir_entry;
10476 struct FileInfo *music, *sound;
10477 struct MusicFileInfo *next, **new;
10480 while (music_file_info != NULL)
10482 next = music_file_info->next;
10484 checked_free(music_file_info->basename);
10486 checked_free(music_file_info->title_header);
10487 checked_free(music_file_info->artist_header);
10488 checked_free(music_file_info->album_header);
10489 checked_free(music_file_info->year_header);
10491 checked_free(music_file_info->title);
10492 checked_free(music_file_info->artist);
10493 checked_free(music_file_info->album);
10494 checked_free(music_file_info->year);
10496 free(music_file_info);
10498 music_file_info = next;
10501 new = &music_file_info;
10503 for (i = 0; i < num_music; i++)
10505 music = getMusicListEntry(i);
10507 if (music->filename == NULL)
10510 if (strEqual(music->filename, UNDEFINED_FILENAME))
10513 /* a configured file may be not recognized as music */
10514 if (!FileIsMusic(music->filename))
10517 if (!music_info_listed(music_file_info, music->filename))
10519 *new = get_music_file_info(music->filename, i);
10522 new = &(*new)->next;
10526 if ((dir = openDirectory(music_directory)) == NULL)
10528 Error(ERR_WARN, "cannot read music directory '%s'", music_directory);
10532 while ((dir_entry = readDirectory(dir)) != NULL) /* loop all entries */
10534 char *basename = dir_entry->basename;
10535 boolean music_already_used = FALSE;
10538 /* skip all music files that are configured in music config file */
10539 for (i = 0; i < num_music; i++)
10541 music = getMusicListEntry(i);
10543 if (music->filename == NULL)
10546 if (strEqual(basename, music->filename))
10548 music_already_used = TRUE;
10553 if (music_already_used)
10556 if (!FileIsMusic(dir_entry->filename))
10559 if (!music_info_listed(music_file_info, basename))
10561 *new = get_music_file_info(basename, MAP_NOCONF_MUSIC(num_music_noconf));
10564 new = &(*new)->next;
10567 num_music_noconf++;
10570 closeDirectory(dir);
10572 for (i = 0; i < num_sounds; i++)
10574 sound = getSoundListEntry(i);
10576 if (sound->filename == NULL)
10579 if (strEqual(sound->filename, UNDEFINED_FILENAME))
10582 /* a configured file may be not recognized as sound */
10583 if (!FileIsSound(sound->filename))
10586 if (!sound_info_listed(music_file_info, sound->filename))
10588 *new = get_sound_file_info(sound->filename, i);
10590 new = &(*new)->next;
10595 void add_helpanim_entry(int element, int action, int direction, int delay,
10596 int *num_list_entries)
10598 struct HelpAnimInfo *new_list_entry;
10599 (*num_list_entries)++;
10602 checked_realloc(helpanim_info,
10603 *num_list_entries * sizeof(struct HelpAnimInfo));
10604 new_list_entry = &helpanim_info[*num_list_entries - 1];
10606 new_list_entry->element = element;
10607 new_list_entry->action = action;
10608 new_list_entry->direction = direction;
10609 new_list_entry->delay = delay;
10612 void print_unknown_token(char *filename, char *token, int token_nr)
10616 Error(ERR_INFO_LINE, "-");
10617 Error(ERR_INFO, "warning: unknown token(s) found in config file:");
10618 Error(ERR_INFO, "- config file: '%s'", filename);
10621 Error(ERR_INFO, "- token: '%s'", token);
10624 void print_unknown_token_end(int token_nr)
10627 Error(ERR_INFO_LINE, "-");
10630 void LoadHelpAnimInfo()
10632 char *filename = getHelpAnimFilename();
10633 SetupFileList *setup_file_list = NULL, *list;
10634 SetupFileHash *element_hash, *action_hash, *direction_hash;
10635 int num_list_entries = 0;
10636 int num_unknown_tokens = 0;
10639 if (fileExists(filename))
10640 setup_file_list = loadSetupFileList(filename);
10642 if (setup_file_list == NULL)
10644 /* use reliable default values from static configuration */
10645 SetupFileList *insert_ptr;
10647 insert_ptr = setup_file_list =
10648 newSetupFileList(helpanim_config[0].token,
10649 helpanim_config[0].value);
10651 for (i = 1; helpanim_config[i].token; i++)
10652 insert_ptr = addListEntry(insert_ptr,
10653 helpanim_config[i].token,
10654 helpanim_config[i].value);
10657 element_hash = newSetupFileHash();
10658 action_hash = newSetupFileHash();
10659 direction_hash = newSetupFileHash();
10661 for (i = 0; i < MAX_NUM_ELEMENTS; i++)
10662 setHashEntry(element_hash, element_info[i].token_name, i_to_a(i));
10664 for (i = 0; i < NUM_ACTIONS; i++)
10665 setHashEntry(action_hash, element_action_info[i].suffix,
10666 i_to_a(element_action_info[i].value));
10668 /* do not store direction index (bit) here, but direction value! */
10669 for (i = 0; i < NUM_DIRECTIONS_FULL; i++)
10670 setHashEntry(direction_hash, element_direction_info[i].suffix,
10671 i_to_a(1 << element_direction_info[i].value));
10673 for (list = setup_file_list; list != NULL; list = list->next)
10675 char *element_token, *action_token, *direction_token;
10676 char *element_value, *action_value, *direction_value;
10677 int delay = atoi(list->value);
10679 if (strEqual(list->token, "end"))
10681 add_helpanim_entry(HELPANIM_LIST_NEXT, -1, -1, -1, &num_list_entries);
10686 /* first try to break element into element/action/direction parts;
10687 if this does not work, also accept combined "element[.act][.dir]"
10688 elements (like "dynamite.active"), which are unique elements */
10690 if (strchr(list->token, '.') == NULL) /* token contains no '.' */
10692 element_value = getHashEntry(element_hash, list->token);
10693 if (element_value != NULL) /* element found */
10694 add_helpanim_entry(atoi(element_value), -1, -1, delay,
10695 &num_list_entries);
10698 /* no further suffixes found -- this is not an element */
10699 print_unknown_token(filename, list->token, num_unknown_tokens++);
10705 /* token has format "<prefix>.<something>" */
10707 action_token = strchr(list->token, '.'); /* suffix may be action ... */
10708 direction_token = action_token; /* ... or direction */
10710 element_token = getStringCopy(list->token);
10711 *strchr(element_token, '.') = '\0';
10713 element_value = getHashEntry(element_hash, element_token);
10715 if (element_value == NULL) /* this is no element */
10717 element_value = getHashEntry(element_hash, list->token);
10718 if (element_value != NULL) /* combined element found */
10719 add_helpanim_entry(atoi(element_value), -1, -1, delay,
10720 &num_list_entries);
10722 print_unknown_token(filename, list->token, num_unknown_tokens++);
10724 free(element_token);
10729 action_value = getHashEntry(action_hash, action_token);
10731 if (action_value != NULL) /* action found */
10733 add_helpanim_entry(atoi(element_value), atoi(action_value), -1, delay,
10734 &num_list_entries);
10736 free(element_token);
10741 direction_value = getHashEntry(direction_hash, direction_token);
10743 if (direction_value != NULL) /* direction found */
10745 add_helpanim_entry(atoi(element_value), -1, atoi(direction_value), delay,
10746 &num_list_entries);
10748 free(element_token);
10753 if (strchr(action_token + 1, '.') == NULL)
10755 /* no further suffixes found -- this is not an action nor direction */
10757 element_value = getHashEntry(element_hash, list->token);
10758 if (element_value != NULL) /* combined element found */
10759 add_helpanim_entry(atoi(element_value), -1, -1, delay,
10760 &num_list_entries);
10762 print_unknown_token(filename, list->token, num_unknown_tokens++);
10764 free(element_token);
10769 /* token has format "<prefix>.<suffix>.<something>" */
10771 direction_token = strchr(action_token + 1, '.');
10773 action_token = getStringCopy(action_token);
10774 *strchr(action_token + 1, '.') = '\0';
10776 action_value = getHashEntry(action_hash, action_token);
10778 if (action_value == NULL) /* this is no action */
10780 element_value = getHashEntry(element_hash, list->token);
10781 if (element_value != NULL) /* combined element found */
10782 add_helpanim_entry(atoi(element_value), -1, -1, delay,
10783 &num_list_entries);
10785 print_unknown_token(filename, list->token, num_unknown_tokens++);
10787 free(element_token);
10788 free(action_token);
10793 direction_value = getHashEntry(direction_hash, direction_token);
10795 if (direction_value != NULL) /* direction found */
10797 add_helpanim_entry(atoi(element_value), atoi(action_value),
10798 atoi(direction_value), delay, &num_list_entries);
10800 free(element_token);
10801 free(action_token);
10806 /* this is no direction */
10808 element_value = getHashEntry(element_hash, list->token);
10809 if (element_value != NULL) /* combined element found */
10810 add_helpanim_entry(atoi(element_value), -1, -1, delay,
10811 &num_list_entries);
10813 print_unknown_token(filename, list->token, num_unknown_tokens++);
10815 free(element_token);
10816 free(action_token);
10819 print_unknown_token_end(num_unknown_tokens);
10821 add_helpanim_entry(HELPANIM_LIST_NEXT, -1, -1, -1, &num_list_entries);
10822 add_helpanim_entry(HELPANIM_LIST_END, -1, -1, -1, &num_list_entries);
10824 freeSetupFileList(setup_file_list);
10825 freeSetupFileHash(element_hash);
10826 freeSetupFileHash(action_hash);
10827 freeSetupFileHash(direction_hash);
10830 for (i = 0; i < num_list_entries; i++)
10831 printf("::: '%s': %d, %d, %d => %d\n",
10832 EL_NAME(helpanim_info[i].element),
10833 helpanim_info[i].element,
10834 helpanim_info[i].action,
10835 helpanim_info[i].direction,
10836 helpanim_info[i].delay);
10840 void LoadHelpTextInfo()
10842 char *filename = getHelpTextFilename();
10845 if (helptext_info != NULL)
10847 freeSetupFileHash(helptext_info);
10848 helptext_info = NULL;
10851 if (fileExists(filename))
10852 helptext_info = loadSetupFileHash(filename);
10854 if (helptext_info == NULL)
10856 /* use reliable default values from static configuration */
10857 helptext_info = newSetupFileHash();
10859 for (i = 0; helptext_config[i].token; i++)
10860 setHashEntry(helptext_info,
10861 helptext_config[i].token,
10862 helptext_config[i].value);
10866 BEGIN_HASH_ITERATION(helptext_info, itr)
10868 printf("::: '%s' => '%s'\n",
10869 HASH_ITERATION_TOKEN(itr), HASH_ITERATION_VALUE(itr));
10871 END_HASH_ITERATION(hash, itr)
10876 /* ------------------------------------------------------------------------- */
10877 /* convert levels */
10878 /* ------------------------------------------------------------------------- */
10880 #define MAX_NUM_CONVERT_LEVELS 1000
10882 void ConvertLevels()
10884 static LevelDirTree *convert_leveldir = NULL;
10885 static int convert_level_nr = -1;
10886 static int num_levels_handled = 0;
10887 static int num_levels_converted = 0;
10888 static boolean levels_failed[MAX_NUM_CONVERT_LEVELS];
10891 convert_leveldir = getTreeInfoFromIdentifier(leveldir_first,
10892 global.convert_leveldir);
10894 if (convert_leveldir == NULL)
10895 Error(ERR_EXIT, "no such level identifier: '%s'",
10896 global.convert_leveldir);
10898 leveldir_current = convert_leveldir;
10900 if (global.convert_level_nr != -1)
10902 convert_leveldir->first_level = global.convert_level_nr;
10903 convert_leveldir->last_level = global.convert_level_nr;
10906 convert_level_nr = convert_leveldir->first_level;
10908 PrintLine("=", 79);
10909 Print("Converting levels\n");
10910 PrintLine("-", 79);
10911 Print("Level series identifier: '%s'\n", convert_leveldir->identifier);
10912 Print("Level series name: '%s'\n", convert_leveldir->name);
10913 Print("Level series author: '%s'\n", convert_leveldir->author);
10914 Print("Number of levels: %d\n", convert_leveldir->levels);
10915 PrintLine("=", 79);
10918 for (i = 0; i < MAX_NUM_CONVERT_LEVELS; i++)
10919 levels_failed[i] = FALSE;
10921 while (convert_level_nr <= convert_leveldir->last_level)
10923 char *level_filename;
10926 level_nr = convert_level_nr++;
10928 Print("Level %03d: ", level_nr);
10930 LoadLevel(level_nr);
10931 if (level.no_level_file || level.no_valid_file)
10933 Print("(no level)\n");
10937 Print("converting level ... ");
10939 level_filename = getDefaultLevelFilename(level_nr);
10940 new_level = !fileExists(level_filename);
10944 SaveLevel(level_nr);
10946 num_levels_converted++;
10948 Print("converted.\n");
10952 if (level_nr >= 0 && level_nr < MAX_NUM_CONVERT_LEVELS)
10953 levels_failed[level_nr] = TRUE;
10955 Print("NOT CONVERTED -- LEVEL ALREADY EXISTS.\n");
10958 num_levels_handled++;
10962 PrintLine("=", 79);
10963 Print("Number of levels handled: %d\n", num_levels_handled);
10964 Print("Number of levels converted: %d (%d%%)\n", num_levels_converted,
10965 (num_levels_handled ?
10966 num_levels_converted * 100 / num_levels_handled : 0));
10967 PrintLine("-", 79);
10968 Print("Summary (for automatic parsing by scripts):\n");
10969 Print("LEVELDIR '%s', CONVERTED %d/%d (%d%%)",
10970 convert_leveldir->identifier, num_levels_converted,
10971 num_levels_handled,
10972 (num_levels_handled ?
10973 num_levels_converted * 100 / num_levels_handled : 0));
10975 if (num_levels_handled != num_levels_converted)
10977 Print(", FAILED:");
10978 for (i = 0; i < MAX_NUM_CONVERT_LEVELS; i++)
10979 if (levels_failed[i])
10984 PrintLine("=", 79);
10986 CloseAllAndExit(0);
10990 /* ------------------------------------------------------------------------- */
10991 /* create and save images for use in level sketches (raw BMP format) */
10992 /* ------------------------------------------------------------------------- */
10994 void CreateLevelSketchImages()
10996 #if defined(TARGET_SDL)
11001 InitElementPropertiesGfxElement();
11003 bitmap1 = CreateBitmap(TILEX, TILEY, DEFAULT_DEPTH);
11004 bitmap2 = CreateBitmap(MINI_TILEX, MINI_TILEY, DEFAULT_DEPTH);
11006 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
11008 Bitmap *src_bitmap;
11010 int element = getMappedElement(i);
11011 int graphic = el2edimg(element);
11012 char basename1[16];
11013 char basename2[16];
11017 sprintf(basename1, "%03d.bmp", i);
11018 sprintf(basename2, "%03ds.bmp", i);
11020 filename1 = getPath2(global.create_images_dir, basename1);
11021 filename2 = getPath2(global.create_images_dir, basename2);
11023 getFixedGraphicSource(graphic, 0, &src_bitmap, &src_x, &src_y);
11024 BlitBitmap(src_bitmap, bitmap1, src_x, src_y, TILEX, TILEY,
11027 if (SDL_SaveBMP(bitmap1->surface, filename1) != 0)
11028 Error(ERR_EXIT, "cannot save level sketch image file '%s'", filename1);
11030 getMiniGraphicSource(graphic, &src_bitmap, &src_x, &src_y);
11031 BlitBitmap(src_bitmap, bitmap2, src_x, src_y, MINI_TILEX, MINI_TILEY, 0, 0);
11033 if (SDL_SaveBMP(bitmap2->surface, filename2) != 0)
11034 Error(ERR_EXIT, "cannot save level sketch image file '%s'", filename2);
11040 printf("%03d `%03d%c", i, i, (i % 10 < 9 ? ' ' : '\n'));
11043 FreeBitmap(bitmap1);
11044 FreeBitmap(bitmap2);
11049 Error(ERR_INFO, "%d normal and small images created", NUM_FILE_ELEMENTS);
11051 CloseAllAndExit(0);
11056 /* ------------------------------------------------------------------------- */
11057 /* create and save images for custom and group elements (raw BMP format) */
11058 /* ------------------------------------------------------------------------- */
11060 void CreateCustomElementImages(char *directory)
11062 #if defined(TARGET_SDL)
11063 char *src_basename = "RocksCE-template.ilbm";
11064 char *dst_basename = "RocksCE.bmp";
11065 char *src_filename = getPath2(directory, src_basename);
11066 char *dst_filename = getPath2(directory, dst_basename);
11067 Bitmap *src_bitmap;
11069 int yoffset_ce = 0;
11070 int yoffset_ge = (TILEY * NUM_CUSTOM_ELEMENTS / 16);
11073 SDLInitVideoDisplay();
11075 ReCreateBitmap(&backbuffer, video.width, video.height);
11077 src_bitmap = LoadImage(src_filename);
11079 bitmap = CreateBitmap(TILEX * 16 * 2,
11080 TILEY * (NUM_CUSTOM_ELEMENTS + NUM_GROUP_ELEMENTS) / 16,
11083 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
11090 BlitBitmap(src_bitmap, bitmap, 0, 0, TILEX, TILEY,
11091 TILEX * x, TILEY * y + yoffset_ce);
11093 BlitBitmap(src_bitmap, bitmap, 0, TILEY,
11095 TILEX * x + TILEX * 16,
11096 TILEY * y + yoffset_ce);
11098 for (j = 2; j >= 0; j--)
11102 BlitBitmap(src_bitmap, bitmap,
11103 TILEX + c * 7, 0, 6, 10,
11104 TILEX * x + 6 + j * 7,
11105 TILEY * y + 11 + yoffset_ce);
11107 BlitBitmap(src_bitmap, bitmap,
11108 TILEX + c * 8, TILEY, 6, 10,
11109 TILEX * 16 + TILEX * x + 6 + j * 8,
11110 TILEY * y + 10 + yoffset_ce);
11116 for (i = 0; i < NUM_GROUP_ELEMENTS; i++)
11123 BlitBitmap(src_bitmap, bitmap, 0, 0, TILEX, TILEY,
11124 TILEX * x, TILEY * y + yoffset_ge);
11126 BlitBitmap(src_bitmap, bitmap, 0, TILEY,
11128 TILEX * x + TILEX * 16,
11129 TILEY * y + yoffset_ge);
11131 for (j = 1; j >= 0; j--)
11135 BlitBitmap(src_bitmap, bitmap, TILEX + c * 10, 11, 10, 10,
11136 TILEX * x + 6 + j * 10,
11137 TILEY * y + 11 + yoffset_ge);
11139 BlitBitmap(src_bitmap, bitmap,
11140 TILEX + c * 8, TILEY + 12, 6, 10,
11141 TILEX * 16 + TILEX * x + 10 + j * 8,
11142 TILEY * y + 10 + yoffset_ge);
11148 if (SDL_SaveBMP(bitmap->surface, dst_filename) != 0)
11149 Error(ERR_EXIT, "cannot save CE graphics file '%s'", dst_filename);
11151 FreeBitmap(bitmap);
11153 CloseAllAndExit(0);