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"
25 #define ENABLE_UNUSED_CODE 0 /* currently unused functions */
26 #define ENABLE_HISTORIC_CHUNKS 0 /* only for historic reference */
27 #define ENABLE_RESERVED_CODE 0 /* reserved for later use */
29 #define CHUNK_ID_LEN 4 /* IFF style chunk id length */
30 #define CHUNK_SIZE_UNDEFINED 0 /* undefined chunk size == 0 */
31 #define CHUNK_SIZE_NONE -1 /* do not write chunk size */
33 #define LEVEL_CHUNK_NAME_SIZE MAX_LEVEL_NAME_LEN
34 #define LEVEL_CHUNK_AUTH_SIZE MAX_LEVEL_AUTHOR_LEN
36 #define LEVEL_CHUNK_VERS_SIZE 8 /* size of file version chunk */
37 #define LEVEL_CHUNK_DATE_SIZE 4 /* size of file date chunk */
38 #define LEVEL_CHUNK_HEAD_SIZE 80 /* size of level file header */
39 #define LEVEL_CHUNK_HEAD_UNUSED 0 /* unused level header bytes */
40 #define LEVEL_CHUNK_CNT2_SIZE 160 /* size of level CNT2 chunk */
41 #define LEVEL_CHUNK_CNT2_UNUSED 11 /* unused CNT2 chunk bytes */
42 #define LEVEL_CHUNK_CNT3_HEADER 16 /* size of level CNT3 header */
43 #define LEVEL_CHUNK_CNT3_UNUSED 10 /* unused CNT3 chunk bytes */
44 #define LEVEL_CPART_CUS3_SIZE 134 /* size of CUS3 chunk part */
45 #define LEVEL_CPART_CUS3_UNUSED 15 /* unused CUS3 bytes / part */
46 #define LEVEL_CHUNK_GRP1_SIZE 74 /* size of level GRP1 chunk */
48 /* (element number, number of change pages, change page number) */
49 #define LEVEL_CHUNK_CUSX_UNCHANGED (2 + (1 + 1) + (1 + 1))
51 /* (element number only) */
52 #define LEVEL_CHUNK_GRPX_UNCHANGED 2
53 #define LEVEL_CHUNK_NOTE_UNCHANGED 2
55 /* (nothing at all if unchanged) */
56 #define LEVEL_CHUNK_ELEM_UNCHANGED 0
58 #define TAPE_CHUNK_VERS_SIZE 8 /* size of file version chunk */
59 #define TAPE_CHUNK_HEAD_SIZE 20 /* size of tape file header */
60 #define TAPE_CHUNK_HEAD_UNUSED 3 /* unused tape header bytes */
62 #define LEVEL_CHUNK_CNT3_SIZE(x) (LEVEL_CHUNK_CNT3_HEADER + (x))
63 #define LEVEL_CHUNK_CUS3_SIZE(x) (2 + (x) * LEVEL_CPART_CUS3_SIZE)
64 #define LEVEL_CHUNK_CUS4_SIZE(x) (96 + (x) * 48)
66 /* file identifier strings */
67 #define LEVEL_COOKIE_TMPL "ROCKSNDIAMONDS_LEVEL_FILE_VERSION_x.x"
68 #define TAPE_COOKIE_TMPL "ROCKSNDIAMONDS_TAPE_FILE_VERSION_x.x"
69 #define SCORE_COOKIE "ROCKSNDIAMONDS_SCORE_FILE_VERSION_1.2"
71 /* values for deciding when (not) to save configuration data */
72 #define SAVE_CONF_NEVER 0
73 #define SAVE_CONF_ALWAYS 1
74 #define SAVE_CONF_WHEN_CHANGED -1
76 /* values for chunks using micro chunks */
77 #define CONF_MASK_1_BYTE 0x00
78 #define CONF_MASK_2_BYTE 0x40
79 #define CONF_MASK_4_BYTE 0x80
80 #define CONF_MASK_MULTI_BYTES 0xc0
82 #define CONF_MASK_BYTES 0xc0
83 #define CONF_MASK_TOKEN 0x3f
85 #define CONF_VALUE_1_BYTE(x) (CONF_MASK_1_BYTE | (x))
86 #define CONF_VALUE_2_BYTE(x) (CONF_MASK_2_BYTE | (x))
87 #define CONF_VALUE_4_BYTE(x) (CONF_MASK_4_BYTE | (x))
88 #define CONF_VALUE_MULTI_BYTES(x) (CONF_MASK_MULTI_BYTES | (x))
90 /* these definitions are just for convenience of use and readability */
91 #define CONF_VALUE_8_BIT(x) CONF_VALUE_1_BYTE(x)
92 #define CONF_VALUE_16_BIT(x) CONF_VALUE_2_BYTE(x)
93 #define CONF_VALUE_32_BIT(x) CONF_VALUE_4_BYTE(x)
94 #define CONF_VALUE_BYTES(x) CONF_VALUE_MULTI_BYTES(x)
96 #define CONF_VALUE_NUM_BYTES(x) ((x) == CONF_MASK_1_BYTE ? 1 : \
97 (x) == CONF_MASK_2_BYTE ? 2 : \
98 (x) == CONF_MASK_4_BYTE ? 4 : 0)
100 #define CONF_CONTENT_NUM_ELEMENTS (3 * 3)
101 #define CONF_CONTENT_NUM_BYTES (CONF_CONTENT_NUM_ELEMENTS * 2)
102 #define CONF_ELEMENT_NUM_BYTES (2)
104 #define CONF_ENTITY_NUM_BYTES(t) ((t) == TYPE_ELEMENT || \
105 (t) == TYPE_ELEMENT_LIST ? \
106 CONF_ELEMENT_NUM_BYTES : \
107 (t) == TYPE_CONTENT || \
108 (t) == TYPE_CONTENT_LIST ? \
109 CONF_CONTENT_NUM_BYTES : 1)
111 #define CONF_ELEMENT_BYTE_POS(i) ((i) * CONF_ELEMENT_NUM_BYTES)
112 #define CONF_ELEMENTS_ELEMENT(b,i) ((b[CONF_ELEMENT_BYTE_POS(i)] << 8) | \
113 (b[CONF_ELEMENT_BYTE_POS(i) + 1]))
115 #define CONF_CONTENT_ELEMENT_POS(c,x,y) ((c) * CONF_CONTENT_NUM_ELEMENTS + \
117 #define CONF_CONTENT_BYTE_POS(c,x,y) (CONF_CONTENT_ELEMENT_POS(c,x,y) * \
118 CONF_ELEMENT_NUM_BYTES)
119 #define CONF_CONTENTS_ELEMENT(b,c,x,y) ((b[CONF_CONTENT_BYTE_POS(c,x,y)]<< 8)|\
120 (b[CONF_CONTENT_BYTE_POS(c,x,y) + 1]))
122 /* temporary variables used to store pointers to structure members */
123 static struct LevelInfo li;
124 static struct ElementInfo xx_ei, yy_ei;
125 static struct ElementChangeInfo xx_change;
126 static struct ElementGroupInfo xx_group;
127 static struct EnvelopeInfo xx_envelope;
128 static unsigned int xx_event_bits[NUM_CE_BITFIELDS];
129 static char xx_default_description[MAX_ELEMENT_NAME_LEN + 1];
130 static int xx_num_contents;
131 static int xx_current_change_page;
132 static char xx_default_string_empty[1] = "";
133 static int xx_string_length_unused;
135 struct LevelFileConfigInfo
137 int element; /* element for which data is to be stored */
138 int save_type; /* save data always, never or when changed */
139 int data_type; /* data type (used internally, not stored) */
140 int conf_type; /* micro chunk identifier (stored in file) */
143 void *value; /* variable that holds the data to be stored */
144 int default_value; /* initial default value for this variable */
147 void *value_copy; /* variable that holds the data to be copied */
148 void *num_entities; /* number of entities for multi-byte data */
149 int default_num_entities; /* default number of entities for this data */
150 int max_num_entities; /* maximal number of entities for this data */
151 char *default_string; /* optional default string for string data */
154 static struct LevelFileConfigInfo chunk_config_INFO[] =
156 /* ---------- values not related to single elements ----------------------- */
159 -1, SAVE_CONF_ALWAYS,
160 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
161 &li.game_engine_type, GAME_ENGINE_TYPE_RND
165 -1, SAVE_CONF_ALWAYS,
166 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
167 &li.fieldx, STD_LEV_FIELDX
170 -1, SAVE_CONF_ALWAYS,
171 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
172 &li.fieldy, STD_LEV_FIELDY
176 -1, SAVE_CONF_ALWAYS,
177 TYPE_INTEGER, CONF_VALUE_16_BIT(3),
182 -1, SAVE_CONF_ALWAYS,
183 TYPE_INTEGER, CONF_VALUE_16_BIT(4),
189 TYPE_INTEGER, CONF_VALUE_32_BIT(2),
195 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
196 &li.use_step_counter, FALSE
201 TYPE_BITFIELD, CONF_VALUE_8_BIT(4),
202 &li.wind_direction_initial, MV_NONE
207 TYPE_BOOLEAN, CONF_VALUE_8_BIT(5),
208 &li.em_slippery_gems, FALSE
213 TYPE_BOOLEAN, CONF_VALUE_8_BIT(6),
214 &li.use_custom_template, FALSE
219 TYPE_BITFIELD, CONF_VALUE_32_BIT(1),
220 &li.can_move_into_acid_bits, ~0 /* default: everything can */
225 TYPE_BITFIELD, CONF_VALUE_8_BIT(7),
226 &li.dont_collide_with_bits, ~0 /* default: always deadly */
231 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
232 &li.em_explodes_by_fire, FALSE
237 TYPE_INTEGER, CONF_VALUE_16_BIT(5),
238 &li.score[SC_TIME_BONUS], 1
243 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
244 &li.auto_exit_sokoban, FALSE
254 static struct LevelFileConfigInfo chunk_config_ELEM[] =
256 /* (these values are the same for each player) */
259 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
260 &li.block_last_field, FALSE /* default case for EM levels */
264 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
265 &li.sp_block_last_field, TRUE /* default case for SP levels */
269 TYPE_BOOLEAN, CONF_VALUE_8_BIT(3),
270 &li.instant_relocation, FALSE
274 TYPE_BOOLEAN, CONF_VALUE_8_BIT(4),
275 &li.can_pass_to_walkable, FALSE
279 TYPE_BOOLEAN, CONF_VALUE_8_BIT(5),
280 &li.block_snap_field, TRUE
284 TYPE_BOOLEAN, CONF_VALUE_8_BIT(6),
285 &li.continuous_snapping, TRUE
289 TYPE_BOOLEAN, CONF_VALUE_8_BIT(12),
290 &li.shifted_relocation, FALSE
294 TYPE_BOOLEAN, CONF_VALUE_8_BIT(15),
295 &li.lazy_relocation, FALSE
298 /* (these values are different for each player) */
301 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
302 &li.initial_player_stepsize[0], STEPSIZE_NORMAL
306 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
307 &li.initial_player_gravity[0], FALSE
311 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
312 &li.use_start_element[0], FALSE
316 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
317 &li.start_element[0], EL_PLAYER_1
321 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
322 &li.use_artwork_element[0], FALSE
326 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
327 &li.artwork_element[0], EL_PLAYER_1
331 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
332 &li.use_explosion_element[0], FALSE
336 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
337 &li.explosion_element[0], EL_PLAYER_1
341 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
342 &li.use_initial_inventory[0], FALSE
346 TYPE_BOOLEAN, CONF_VALUE_8_BIT(14),
347 &li.initial_inventory_size[0], 1
351 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
352 &li.initial_inventory_content[0][0],EL_EMPTY, NULL,
353 &li.initial_inventory_size[0], 1, MAX_INITIAL_INVENTORY_SIZE
358 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
359 &li.initial_player_stepsize[1], STEPSIZE_NORMAL
363 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
364 &li.initial_player_gravity[1], FALSE
368 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
369 &li.use_start_element[1], FALSE
373 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
374 &li.start_element[1], EL_PLAYER_2
378 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
379 &li.use_artwork_element[1], FALSE
383 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
384 &li.artwork_element[1], EL_PLAYER_2
388 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
389 &li.use_explosion_element[1], FALSE
393 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
394 &li.explosion_element[1], EL_PLAYER_2
398 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
399 &li.use_initial_inventory[1], FALSE
403 TYPE_BOOLEAN, CONF_VALUE_8_BIT(14),
404 &li.initial_inventory_size[1], 1
408 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
409 &li.initial_inventory_content[1][0],EL_EMPTY, NULL,
410 &li.initial_inventory_size[1], 1, MAX_INITIAL_INVENTORY_SIZE
415 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
416 &li.initial_player_stepsize[2], STEPSIZE_NORMAL
420 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
421 &li.initial_player_gravity[2], FALSE
425 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
426 &li.use_start_element[2], FALSE
430 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
431 &li.start_element[2], EL_PLAYER_3
435 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
436 &li.use_artwork_element[2], FALSE
440 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
441 &li.artwork_element[2], EL_PLAYER_3
445 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
446 &li.use_explosion_element[2], FALSE
450 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
451 &li.explosion_element[2], EL_PLAYER_3
455 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
456 &li.use_initial_inventory[2], FALSE
460 TYPE_BOOLEAN, CONF_VALUE_8_BIT(14),
461 &li.initial_inventory_size[2], 1
465 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
466 &li.initial_inventory_content[2][0],EL_EMPTY, NULL,
467 &li.initial_inventory_size[2], 1, MAX_INITIAL_INVENTORY_SIZE
472 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
473 &li.initial_player_stepsize[3], STEPSIZE_NORMAL
477 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
478 &li.initial_player_gravity[3], FALSE
482 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
483 &li.use_start_element[3], FALSE
487 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
488 &li.start_element[3], EL_PLAYER_4
492 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
493 &li.use_artwork_element[3], FALSE
497 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
498 &li.artwork_element[3], EL_PLAYER_4
502 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
503 &li.use_explosion_element[3], FALSE
507 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
508 &li.explosion_element[3], EL_PLAYER_4
512 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
513 &li.use_initial_inventory[3], FALSE
517 TYPE_BOOLEAN, CONF_VALUE_8_BIT(14),
518 &li.initial_inventory_size[3], 1
522 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
523 &li.initial_inventory_content[3][0],EL_EMPTY, NULL,
524 &li.initial_inventory_size[3], 1, MAX_INITIAL_INVENTORY_SIZE
529 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
530 &li.score[SC_EMERALD], 10
535 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
536 &li.score[SC_DIAMOND], 10
541 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
542 &li.score[SC_BUG], 10
547 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
548 &li.score[SC_SPACESHIP], 10
553 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
554 &li.score[SC_PACMAN], 10
559 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
560 &li.score[SC_NUT], 10
565 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
566 &li.score[SC_DYNAMITE], 10
571 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
572 &li.score[SC_KEY], 10
577 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
578 &li.score[SC_PEARL], 10
583 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
584 &li.score[SC_CRYSTAL], 10
589 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
590 &li.amoeba_content, EL_DIAMOND
594 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
599 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
600 &li.grow_into_diggable, TRUE
605 TYPE_CONTENT_LIST, CONF_VALUE_BYTES(1),
606 &li.yamyam_content, EL_ROCK, NULL,
607 &li.num_yamyam_contents, 4, MAX_ELEMENT_CONTENTS
611 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
612 &li.score[SC_YAMYAM], 10
617 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
618 &li.score[SC_ROBOT], 10
622 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
628 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
634 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
635 &li.time_magic_wall, 10
640 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
641 &li.game_of_life[0], 2
645 TYPE_INTEGER, CONF_VALUE_8_BIT(2),
646 &li.game_of_life[1], 3
650 TYPE_INTEGER, CONF_VALUE_8_BIT(3),
651 &li.game_of_life[2], 3
655 TYPE_INTEGER, CONF_VALUE_8_BIT(4),
656 &li.game_of_life[3], 3
661 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
666 TYPE_INTEGER, CONF_VALUE_8_BIT(2),
671 TYPE_INTEGER, CONF_VALUE_8_BIT(3),
676 TYPE_INTEGER, CONF_VALUE_8_BIT(4),
681 EL_TIMEGATE_SWITCH, -1,
682 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
683 &li.time_timegate, 10
687 EL_LIGHT_SWITCH_ACTIVE, -1,
688 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
693 EL_SHIELD_NORMAL, -1,
694 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
695 &li.shield_normal_time, 10
698 EL_SHIELD_NORMAL, -1,
699 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
700 &li.score[SC_SHIELD], 10
704 EL_SHIELD_DEADLY, -1,
705 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
706 &li.shield_deadly_time, 10
709 EL_SHIELD_DEADLY, -1,
710 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
711 &li.score[SC_SHIELD], 10
716 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
721 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
722 &li.extra_time_score, 10
726 EL_TIME_ORB_FULL, -1,
727 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
728 &li.time_orb_time, 10
731 EL_TIME_ORB_FULL, -1,
732 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
733 &li.use_time_orb_bug, FALSE
738 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
739 &li.use_spring_bug, FALSE
744 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
745 &li.android_move_time, 10
749 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
750 &li.android_clone_time, 10
754 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
755 &li.android_clone_element[0], EL_EMPTY, NULL,
756 &li.num_android_clone_elements, 1, MAX_ANDROID_ELEMENTS
761 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
766 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
771 EL_EMC_MAGNIFIER, -1,
772 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
773 &li.magnify_score, 10
776 EL_EMC_MAGNIFIER, -1,
777 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
782 EL_EMC_MAGIC_BALL, -1,
783 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
787 EL_EMC_MAGIC_BALL, -1,
788 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
789 &li.ball_random, FALSE
792 EL_EMC_MAGIC_BALL, -1,
793 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
794 &li.ball_state_initial, FALSE
797 EL_EMC_MAGIC_BALL, -1,
798 TYPE_CONTENT_LIST, CONF_VALUE_BYTES(1),
799 &li.ball_content, EL_EMPTY, NULL,
800 &li.num_ball_contents, 4, MAX_ELEMENT_CONTENTS
803 /* ---------- unused values ----------------------------------------------- */
806 EL_UNKNOWN, SAVE_CONF_NEVER,
807 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
808 &li.score[SC_UNKNOWN_14], 10
811 EL_UNKNOWN, SAVE_CONF_NEVER,
812 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
813 &li.score[SC_UNKNOWN_15], 10
823 static struct LevelFileConfigInfo chunk_config_NOTE[] =
827 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
828 &xx_envelope.xsize, MAX_ENVELOPE_XSIZE,
832 TYPE_INTEGER, CONF_VALUE_8_BIT(2),
833 &xx_envelope.ysize, MAX_ENVELOPE_YSIZE,
838 TYPE_BOOLEAN, CONF_VALUE_8_BIT(3),
839 &xx_envelope.autowrap, FALSE
843 TYPE_BOOLEAN, CONF_VALUE_8_BIT(4),
844 &xx_envelope.centered, FALSE
849 TYPE_STRING, CONF_VALUE_BYTES(1),
850 &xx_envelope.text, -1, NULL,
851 &xx_string_length_unused, -1, MAX_ENVELOPE_TEXT_LEN,
852 &xx_default_string_empty[0]
862 static struct LevelFileConfigInfo chunk_config_CUSX_base[] =
866 TYPE_STRING, CONF_VALUE_BYTES(1),
867 &xx_ei.description[0], -1,
868 &yy_ei.description[0],
869 &xx_string_length_unused, -1, MAX_ELEMENT_NAME_LEN,
870 &xx_default_description[0]
875 TYPE_BITFIELD, CONF_VALUE_32_BIT(1),
876 &xx_ei.properties[EP_BITFIELD_BASE_NR], EP_BITMASK_BASE_DEFAULT,
877 &yy_ei.properties[EP_BITFIELD_BASE_NR]
879 #if ENABLE_RESERVED_CODE
880 /* (reserved for later use) */
883 TYPE_BITFIELD, CONF_VALUE_32_BIT(2),
884 &xx_ei.properties[EP_BITFIELD_BASE_NR + 1], EP_BITMASK_DEFAULT,
885 &yy_ei.properties[EP_BITFIELD_BASE_NR + 1]
891 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
892 &xx_ei.use_gfx_element, FALSE,
893 &yy_ei.use_gfx_element
897 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
898 &xx_ei.gfx_element_initial, EL_EMPTY_SPACE,
899 &yy_ei.gfx_element_initial
904 TYPE_BITFIELD, CONF_VALUE_8_BIT(2),
905 &xx_ei.access_direction, MV_ALL_DIRECTIONS,
906 &yy_ei.access_direction
911 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
912 &xx_ei.collect_score_initial, 10,
913 &yy_ei.collect_score_initial
917 TYPE_INTEGER, CONF_VALUE_16_BIT(3),
918 &xx_ei.collect_count_initial, 1,
919 &yy_ei.collect_count_initial
924 TYPE_INTEGER, CONF_VALUE_16_BIT(4),
925 &xx_ei.ce_value_fixed_initial, 0,
926 &yy_ei.ce_value_fixed_initial
930 TYPE_INTEGER, CONF_VALUE_16_BIT(5),
931 &xx_ei.ce_value_random_initial, 0,
932 &yy_ei.ce_value_random_initial
936 TYPE_BOOLEAN, CONF_VALUE_8_BIT(3),
937 &xx_ei.use_last_ce_value, FALSE,
938 &yy_ei.use_last_ce_value
943 TYPE_INTEGER, CONF_VALUE_16_BIT(6),
944 &xx_ei.push_delay_fixed, 8,
945 &yy_ei.push_delay_fixed
949 TYPE_INTEGER, CONF_VALUE_16_BIT(7),
950 &xx_ei.push_delay_random, 8,
951 &yy_ei.push_delay_random
955 TYPE_INTEGER, CONF_VALUE_16_BIT(8),
956 &xx_ei.drop_delay_fixed, 0,
957 &yy_ei.drop_delay_fixed
961 TYPE_INTEGER, CONF_VALUE_16_BIT(9),
962 &xx_ei.drop_delay_random, 0,
963 &yy_ei.drop_delay_random
967 TYPE_INTEGER, CONF_VALUE_16_BIT(10),
968 &xx_ei.move_delay_fixed, 0,
969 &yy_ei.move_delay_fixed
973 TYPE_INTEGER, CONF_VALUE_16_BIT(11),
974 &xx_ei.move_delay_random, 0,
975 &yy_ei.move_delay_random
980 TYPE_BITFIELD, CONF_VALUE_32_BIT(3),
981 &xx_ei.move_pattern, MV_ALL_DIRECTIONS,
986 TYPE_BITFIELD, CONF_VALUE_8_BIT(4),
987 &xx_ei.move_direction_initial, MV_START_AUTOMATIC,
988 &yy_ei.move_direction_initial
992 TYPE_INTEGER, CONF_VALUE_8_BIT(5),
993 &xx_ei.move_stepsize, TILEX / 8,
999 TYPE_ELEMENT, CONF_VALUE_16_BIT(12),
1000 &xx_ei.move_enter_element, EL_EMPTY_SPACE,
1001 &yy_ei.move_enter_element
1005 TYPE_ELEMENT, CONF_VALUE_16_BIT(13),
1006 &xx_ei.move_leave_element, EL_EMPTY_SPACE,
1007 &yy_ei.move_leave_element
1011 TYPE_INTEGER, CONF_VALUE_8_BIT(6),
1012 &xx_ei.move_leave_type, LEAVE_TYPE_UNLIMITED,
1013 &yy_ei.move_leave_type
1018 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
1019 &xx_ei.slippery_type, SLIPPERY_ANY_RANDOM,
1020 &yy_ei.slippery_type
1025 TYPE_INTEGER, CONF_VALUE_8_BIT(8),
1026 &xx_ei.explosion_type, EXPLODES_3X3,
1027 &yy_ei.explosion_type
1031 TYPE_INTEGER, CONF_VALUE_16_BIT(14),
1032 &xx_ei.explosion_delay, 16,
1033 &yy_ei.explosion_delay
1037 TYPE_INTEGER, CONF_VALUE_16_BIT(15),
1038 &xx_ei.ignition_delay, 8,
1039 &yy_ei.ignition_delay
1044 TYPE_CONTENT_LIST, CONF_VALUE_BYTES(2),
1045 &xx_ei.content, EL_EMPTY_SPACE,
1047 &xx_num_contents, 1, 1
1050 /* ---------- "num_change_pages" must be the last entry ------------------- */
1053 -1, SAVE_CONF_ALWAYS,
1054 TYPE_INTEGER, CONF_VALUE_8_BIT(9),
1055 &xx_ei.num_change_pages, 1,
1056 &yy_ei.num_change_pages
1067 static struct LevelFileConfigInfo chunk_config_CUSX_change[] =
1069 /* ---------- "current_change_page" must be the first entry --------------- */
1072 -1, SAVE_CONF_ALWAYS,
1073 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
1074 &xx_current_change_page, -1
1077 /* ---------- (the remaining entries can be in any order) ----------------- */
1081 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
1082 &xx_change.can_change, FALSE
1087 TYPE_BITFIELD, CONF_VALUE_32_BIT(1),
1088 &xx_event_bits[0], 0
1092 TYPE_BITFIELD, CONF_VALUE_32_BIT(2),
1093 &xx_event_bits[1], 0
1098 TYPE_BITFIELD, CONF_VALUE_8_BIT(3),
1099 &xx_change.trigger_player, CH_PLAYER_ANY
1103 TYPE_BITFIELD, CONF_VALUE_8_BIT(4),
1104 &xx_change.trigger_side, CH_SIDE_ANY
1108 TYPE_BITFIELD, CONF_VALUE_32_BIT(3),
1109 &xx_change.trigger_page, CH_PAGE_ANY
1114 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
1115 &xx_change.target_element, EL_EMPTY_SPACE
1120 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
1121 &xx_change.delay_fixed, 0
1125 TYPE_INTEGER, CONF_VALUE_16_BIT(3),
1126 &xx_change.delay_random, 0
1130 TYPE_INTEGER, CONF_VALUE_16_BIT(4),
1131 &xx_change.delay_frames, FRAMES_PER_SECOND
1136 TYPE_ELEMENT, CONF_VALUE_16_BIT(5),
1137 &xx_change.initial_trigger_element, EL_EMPTY_SPACE
1142 TYPE_BOOLEAN, CONF_VALUE_8_BIT(6),
1143 &xx_change.explode, FALSE
1147 TYPE_BOOLEAN, CONF_VALUE_8_BIT(7),
1148 &xx_change.use_target_content, FALSE
1152 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
1153 &xx_change.only_if_complete, FALSE
1157 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
1158 &xx_change.use_random_replace, FALSE
1162 TYPE_INTEGER, CONF_VALUE_8_BIT(10),
1163 &xx_change.random_percentage, 100
1167 TYPE_INTEGER, CONF_VALUE_8_BIT(11),
1168 &xx_change.replace_when, CP_WHEN_EMPTY
1173 TYPE_BOOLEAN, CONF_VALUE_8_BIT(12),
1174 &xx_change.has_action, FALSE
1178 TYPE_INTEGER, CONF_VALUE_8_BIT(13),
1179 &xx_change.action_type, CA_NO_ACTION
1183 TYPE_INTEGER, CONF_VALUE_8_BIT(14),
1184 &xx_change.action_mode, CA_MODE_UNDEFINED
1188 TYPE_INTEGER, CONF_VALUE_16_BIT(6),
1189 &xx_change.action_arg, CA_ARG_UNDEFINED
1194 TYPE_ELEMENT, CONF_VALUE_16_BIT(7),
1195 &xx_change.action_element, EL_EMPTY_SPACE
1200 TYPE_CONTENT_LIST, CONF_VALUE_BYTES(1),
1201 &xx_change.target_content, EL_EMPTY_SPACE, NULL,
1202 &xx_num_contents, 1, 1
1212 static struct LevelFileConfigInfo chunk_config_GRPX[] =
1216 TYPE_STRING, CONF_VALUE_BYTES(1),
1217 &xx_ei.description[0], -1, NULL,
1218 &xx_string_length_unused, -1, MAX_ELEMENT_NAME_LEN,
1219 &xx_default_description[0]
1224 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
1225 &xx_ei.use_gfx_element, FALSE
1229 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
1230 &xx_ei.gfx_element_initial, EL_EMPTY_SPACE
1235 TYPE_INTEGER, CONF_VALUE_8_BIT(2),
1236 &xx_group.choice_mode, ANIM_RANDOM
1241 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(2),
1242 &xx_group.element[0], EL_EMPTY_SPACE, NULL,
1243 &xx_group.num_elements, 1, MAX_ELEMENTS_IN_GROUP
1253 static struct LevelFileConfigInfo chunk_config_CONF[] = /* (OBSOLETE) */
1257 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
1258 &li.block_snap_field, TRUE
1262 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
1263 &li.continuous_snapping, TRUE
1267 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
1268 &li.initial_player_stepsize[0], STEPSIZE_NORMAL
1272 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
1273 &li.use_start_element[0], FALSE
1277 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
1278 &li.start_element[0], EL_PLAYER_1
1282 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
1283 &li.use_artwork_element[0], FALSE
1287 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
1288 &li.artwork_element[0], EL_PLAYER_1
1292 TYPE_BOOLEAN, CONF_VALUE_8_BIT(12),
1293 &li.use_explosion_element[0], FALSE
1297 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
1298 &li.explosion_element[0], EL_PLAYER_1
1313 filetype_id_list[] =
1315 { LEVEL_FILE_TYPE_RND, "RND" },
1316 { LEVEL_FILE_TYPE_BD, "BD" },
1317 { LEVEL_FILE_TYPE_EM, "EM" },
1318 { LEVEL_FILE_TYPE_SP, "SP" },
1319 { LEVEL_FILE_TYPE_DX, "DX" },
1320 { LEVEL_FILE_TYPE_SB, "SB" },
1321 { LEVEL_FILE_TYPE_DC, "DC" },
1326 /* ========================================================================= */
1327 /* level file functions */
1328 /* ========================================================================= */
1330 static boolean check_special_flags(char *flag)
1332 if (strEqual(options.special_flags, flag) ||
1333 strEqual(leveldir_current->special_flags, flag))
1339 static struct DateInfo getCurrentDate()
1341 time_t epoch_seconds = time(NULL);
1342 struct tm *now = localtime(&epoch_seconds);
1343 struct DateInfo date;
1345 date.year = now->tm_year + 1900;
1346 date.month = now->tm_mon + 1;
1347 date.day = now->tm_mday;
1349 date.src = DATE_SRC_CLOCK;
1354 static void resetEventFlags(struct ElementChangeInfo *change)
1358 for (i = 0; i < NUM_CHANGE_EVENTS; i++)
1359 change->has_event[i] = FALSE;
1362 static void resetEventBits()
1366 for (i = 0; i < NUM_CE_BITFIELDS; i++)
1367 xx_event_bits[i] = 0;
1370 static void setEventFlagsFromEventBits(struct ElementChangeInfo *change)
1374 /* important: only change event flag if corresponding event bit is set
1375 (this is because all xx_event_bits[] values are loaded separately,
1376 and all xx_event_bits[] values are set back to zero before loading
1377 another value xx_event_bits[x] (each value representing 32 flags)) */
1379 for (i = 0; i < NUM_CHANGE_EVENTS; i++)
1380 if (xx_event_bits[CH_EVENT_BITFIELD_NR(i)] & CH_EVENT_BIT(i))
1381 change->has_event[i] = TRUE;
1384 static void setEventBitsFromEventFlags(struct ElementChangeInfo *change)
1388 /* in contrast to the above function setEventFlagsFromEventBits(), it
1389 would also be possible to set all bits in xx_event_bits[] to 0 or 1
1390 depending on the corresponding change->has_event[i] values here, as
1391 all xx_event_bits[] values are reset in resetEventBits() before */
1393 for (i = 0; i < NUM_CHANGE_EVENTS; i++)
1394 if (change->has_event[i])
1395 xx_event_bits[CH_EVENT_BITFIELD_NR(i)] |= CH_EVENT_BIT(i);
1398 static char *getDefaultElementDescription(struct ElementInfo *ei)
1400 static char description[MAX_ELEMENT_NAME_LEN + 1];
1401 char *default_description = (ei->custom_description != NULL ?
1402 ei->custom_description :
1403 ei->editor_description);
1406 /* always start with reliable default values */
1407 for (i = 0; i < MAX_ELEMENT_NAME_LEN + 1; i++)
1408 description[i] = '\0';
1410 /* truncate element description to MAX_ELEMENT_NAME_LEN bytes */
1411 strncpy(description, default_description, MAX_ELEMENT_NAME_LEN);
1413 return &description[0];
1416 static void setElementDescriptionToDefault(struct ElementInfo *ei)
1418 char *default_description = getDefaultElementDescription(ei);
1421 for (i = 0; i < MAX_ELEMENT_NAME_LEN + 1; i++)
1422 ei->description[i] = default_description[i];
1425 static void setConfigToDefaultsFromConfigList(struct LevelFileConfigInfo *conf)
1429 for (i = 0; conf[i].data_type != -1; i++)
1431 int default_value = conf[i].default_value;
1432 int data_type = conf[i].data_type;
1433 int conf_type = conf[i].conf_type;
1434 int byte_mask = conf_type & CONF_MASK_BYTES;
1436 if (byte_mask == CONF_MASK_MULTI_BYTES)
1438 int default_num_entities = conf[i].default_num_entities;
1439 int max_num_entities = conf[i].max_num_entities;
1441 *(int *)(conf[i].num_entities) = default_num_entities;
1443 if (data_type == TYPE_STRING)
1445 char *default_string = conf[i].default_string;
1446 char *string = (char *)(conf[i].value);
1448 strncpy(string, default_string, max_num_entities);
1450 else if (data_type == TYPE_ELEMENT_LIST)
1452 int *element_array = (int *)(conf[i].value);
1455 for (j = 0; j < max_num_entities; j++)
1456 element_array[j] = default_value;
1458 else if (data_type == TYPE_CONTENT_LIST)
1460 struct Content *content = (struct Content *)(conf[i].value);
1463 for (c = 0; c < max_num_entities; c++)
1464 for (y = 0; y < 3; y++)
1465 for (x = 0; x < 3; x++)
1466 content[c].e[x][y] = default_value;
1469 else /* constant size configuration data (1, 2 or 4 bytes) */
1471 if (data_type == TYPE_BOOLEAN)
1472 *(boolean *)(conf[i].value) = default_value;
1474 *(int *) (conf[i].value) = default_value;
1479 static void copyConfigFromConfigList(struct LevelFileConfigInfo *conf)
1483 for (i = 0; conf[i].data_type != -1; i++)
1485 int data_type = conf[i].data_type;
1486 int conf_type = conf[i].conf_type;
1487 int byte_mask = conf_type & CONF_MASK_BYTES;
1489 if (byte_mask == CONF_MASK_MULTI_BYTES)
1491 int max_num_entities = conf[i].max_num_entities;
1493 if (data_type == TYPE_STRING)
1495 char *string = (char *)(conf[i].value);
1496 char *string_copy = (char *)(conf[i].value_copy);
1498 strncpy(string_copy, string, max_num_entities);
1500 else if (data_type == TYPE_ELEMENT_LIST)
1502 int *element_array = (int *)(conf[i].value);
1503 int *element_array_copy = (int *)(conf[i].value_copy);
1506 for (j = 0; j < max_num_entities; j++)
1507 element_array_copy[j] = element_array[j];
1509 else if (data_type == TYPE_CONTENT_LIST)
1511 struct Content *content = (struct Content *)(conf[i].value);
1512 struct Content *content_copy = (struct Content *)(conf[i].value_copy);
1515 for (c = 0; c < max_num_entities; c++)
1516 for (y = 0; y < 3; y++)
1517 for (x = 0; x < 3; x++)
1518 content_copy[c].e[x][y] = content[c].e[x][y];
1521 else /* constant size configuration data (1, 2 or 4 bytes) */
1523 if (data_type == TYPE_BOOLEAN)
1524 *(boolean *)(conf[i].value_copy) = *(boolean *)(conf[i].value);
1526 *(int *) (conf[i].value_copy) = *(int *) (conf[i].value);
1531 void copyElementInfo(struct ElementInfo *ei_from, struct ElementInfo *ei_to)
1535 xx_ei = *ei_from; /* copy element data into temporary buffer */
1536 yy_ei = *ei_to; /* copy element data into temporary buffer */
1538 copyConfigFromConfigList(chunk_config_CUSX_base);
1543 /* ---------- reinitialize and copy change pages ---------- */
1545 ei_to->num_change_pages = ei_from->num_change_pages;
1546 ei_to->current_change_page = ei_from->current_change_page;
1548 setElementChangePages(ei_to, ei_to->num_change_pages);
1550 for (i = 0; i < ei_to->num_change_pages; i++)
1551 ei_to->change_page[i] = ei_from->change_page[i];
1553 /* ---------- copy group element info ---------- */
1554 if (ei_from->group != NULL && ei_to->group != NULL) /* group or internal */
1555 *ei_to->group = *ei_from->group;
1557 /* mark this custom element as modified */
1558 ei_to->modified_settings = TRUE;
1561 void setElementChangePages(struct ElementInfo *ei, int change_pages)
1563 int change_page_size = sizeof(struct ElementChangeInfo);
1565 ei->num_change_pages = MAX(1, change_pages);
1568 checked_realloc(ei->change_page, ei->num_change_pages * change_page_size);
1570 if (ei->current_change_page >= ei->num_change_pages)
1571 ei->current_change_page = ei->num_change_pages - 1;
1573 ei->change = &ei->change_page[ei->current_change_page];
1576 void setElementChangeInfoToDefaults(struct ElementChangeInfo *change)
1578 xx_change = *change; /* copy change data into temporary buffer */
1580 setConfigToDefaultsFromConfigList(chunk_config_CUSX_change);
1582 *change = xx_change;
1584 resetEventFlags(change);
1586 change->direct_action = 0;
1587 change->other_action = 0;
1589 change->pre_change_function = NULL;
1590 change->change_function = NULL;
1591 change->post_change_function = NULL;
1594 static void setLevelInfoToDefaults_Level(struct LevelInfo *level)
1598 li = *level; /* copy level data into temporary buffer */
1599 setConfigToDefaultsFromConfigList(chunk_config_INFO);
1600 *level = li; /* copy temporary buffer back to level data */
1602 setLevelInfoToDefaults_EM();
1603 setLevelInfoToDefaults_SP();
1605 level->native_em_level = &native_em_level;
1606 level->native_sp_level = &native_sp_level;
1608 level->file_version = FILE_VERSION_ACTUAL;
1609 level->game_version = GAME_VERSION_ACTUAL;
1611 level->creation_date = getCurrentDate();
1613 level->encoding_16bit_field = TRUE;
1614 level->encoding_16bit_yamyam = TRUE;
1615 level->encoding_16bit_amoeba = TRUE;
1617 /* clear level name and level author string buffers */
1618 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
1619 level->name[i] = '\0';
1620 for (i = 0; i < MAX_LEVEL_AUTHOR_LEN; i++)
1621 level->author[i] = '\0';
1623 /* set level name and level author to default values */
1624 strcpy(level->name, NAMELESS_LEVEL_NAME);
1625 strcpy(level->author, ANONYMOUS_NAME);
1627 /* set level playfield to playable default level with player and exit */
1628 for (x = 0; x < MAX_LEV_FIELDX; x++)
1629 for (y = 0; y < MAX_LEV_FIELDY; y++)
1630 level->field[x][y] = EL_SAND;
1632 level->field[0][0] = EL_PLAYER_1;
1633 level->field[STD_LEV_FIELDX - 1][STD_LEV_FIELDY - 1] = EL_EXIT_CLOSED;
1635 BorderElement = EL_STEELWALL;
1637 /* set all bug compatibility flags to "false" => do not emulate this bug */
1638 level->use_action_after_change_bug = FALSE;
1640 if (leveldir_current)
1642 /* try to determine better author name than 'anonymous' */
1643 if (!strEqual(leveldir_current->author, ANONYMOUS_NAME))
1645 strncpy(level->author, leveldir_current->author, MAX_LEVEL_AUTHOR_LEN);
1646 level->author[MAX_LEVEL_AUTHOR_LEN] = '\0';
1650 switch (LEVELCLASS(leveldir_current))
1652 case LEVELCLASS_TUTORIAL:
1653 strcpy(level->author, PROGRAM_AUTHOR_STRING);
1656 case LEVELCLASS_CONTRIB:
1657 strncpy(level->author, leveldir_current->name, MAX_LEVEL_AUTHOR_LEN);
1658 level->author[MAX_LEVEL_AUTHOR_LEN] = '\0';
1661 case LEVELCLASS_PRIVATE:
1662 strncpy(level->author, getRealName(), MAX_LEVEL_AUTHOR_LEN);
1663 level->author[MAX_LEVEL_AUTHOR_LEN] = '\0';
1667 /* keep default value */
1674 static void setLevelInfoToDefaults_Elements(struct LevelInfo *level)
1676 static boolean clipboard_elements_initialized = FALSE;
1679 InitElementPropertiesStatic();
1681 li = *level; /* copy level data into temporary buffer */
1682 setConfigToDefaultsFromConfigList(chunk_config_ELEM);
1683 *level = li; /* copy temporary buffer back to level data */
1685 for (i = 0; i < MAX_NUM_ELEMENTS; i++)
1688 struct ElementInfo *ei = &element_info[element];
1690 /* never initialize clipboard elements after the very first time */
1691 /* (to be able to use clipboard elements between several levels) */
1692 if (IS_CLIPBOARD_ELEMENT(element) && clipboard_elements_initialized)
1695 if (IS_ENVELOPE(element))
1697 int envelope_nr = element - EL_ENVELOPE_1;
1699 setConfigToDefaultsFromConfigList(chunk_config_NOTE);
1701 level->envelope[envelope_nr] = xx_envelope;
1704 if (IS_CUSTOM_ELEMENT(element) ||
1705 IS_GROUP_ELEMENT(element) ||
1706 IS_INTERNAL_ELEMENT(element))
1708 xx_ei = *ei; /* copy element data into temporary buffer */
1710 setConfigToDefaultsFromConfigList(chunk_config_CUSX_base);
1715 setElementChangePages(ei, 1);
1716 setElementChangeInfoToDefaults(ei->change);
1718 if (IS_CUSTOM_ELEMENT(element) ||
1719 IS_GROUP_ELEMENT(element) ||
1720 IS_INTERNAL_ELEMENT(element))
1722 setElementDescriptionToDefault(ei);
1724 ei->modified_settings = FALSE;
1727 if (IS_CUSTOM_ELEMENT(element) ||
1728 IS_INTERNAL_ELEMENT(element))
1730 /* internal values used in level editor */
1732 ei->access_type = 0;
1733 ei->access_layer = 0;
1734 ei->access_protected = 0;
1735 ei->walk_to_action = 0;
1736 ei->smash_targets = 0;
1739 ei->can_explode_by_fire = FALSE;
1740 ei->can_explode_smashed = FALSE;
1741 ei->can_explode_impact = FALSE;
1743 ei->current_change_page = 0;
1746 if (IS_GROUP_ELEMENT(element) ||
1747 IS_INTERNAL_ELEMENT(element))
1749 struct ElementGroupInfo *group;
1751 /* initialize memory for list of elements in group */
1752 if (ei->group == NULL)
1753 ei->group = checked_malloc(sizeof(struct ElementGroupInfo));
1757 xx_group = *group; /* copy group data into temporary buffer */
1759 setConfigToDefaultsFromConfigList(chunk_config_GRPX);
1765 clipboard_elements_initialized = TRUE;
1768 static void setLevelInfoToDefaults(struct LevelInfo *level,
1769 boolean level_info_only,
1770 boolean reset_file_status)
1772 setLevelInfoToDefaults_Level(level);
1774 if (!level_info_only)
1775 setLevelInfoToDefaults_Elements(level);
1777 if (reset_file_status)
1779 level->no_valid_file = FALSE;
1780 level->no_level_file = FALSE;
1783 level->changed = FALSE;
1786 static void setFileInfoToDefaults(struct LevelFileInfo *level_file_info)
1788 level_file_info->nr = 0;
1789 level_file_info->type = LEVEL_FILE_TYPE_UNKNOWN;
1790 level_file_info->packed = FALSE;
1791 level_file_info->basename = NULL;
1792 level_file_info->filename = NULL;
1795 int getMappedElement_SB(int, boolean);
1797 static void ActivateLevelTemplate()
1801 if (check_special_flags("load_xsb_to_ces"))
1803 /* fill smaller playfields with padding "beyond border wall" elements */
1804 if (level.fieldx < level_template.fieldx ||
1805 level.fieldy < level_template.fieldy)
1807 short field[level.fieldx][level.fieldy];
1808 int new_fieldx = MAX(level.fieldx, level_template.fieldx);
1809 int new_fieldy = MAX(level.fieldy, level_template.fieldy);
1810 int pos_fieldx = (new_fieldx - level.fieldx) / 2;
1811 int pos_fieldy = (new_fieldy - level.fieldy) / 2;
1813 /* copy old playfield (which is smaller than the visible area) */
1814 for (y = 0; y < level.fieldy; y++) for (x = 0; x < level.fieldx; x++)
1815 field[x][y] = level.field[x][y];
1817 /* fill new, larger playfield with "beyond border wall" elements */
1818 for (y = 0; y < new_fieldy; y++) for (x = 0; x < new_fieldx; x++)
1819 level.field[x][y] = getMappedElement_SB('_', TRUE);
1821 /* copy the old playfield to the middle of the new playfield */
1822 for (y = 0; y < level.fieldy; y++) for (x = 0; x < level.fieldx; x++)
1823 level.field[pos_fieldx + x][pos_fieldy + y] = field[x][y];
1825 level.fieldx = new_fieldx;
1826 level.fieldy = new_fieldy;
1830 /* Currently there is no special action needed to activate the template
1831 data, because 'element_info' property settings overwrite the original
1832 level data, while all other variables do not change. */
1834 /* Exception: 'from_level_template' elements in the original level playfield
1835 are overwritten with the corresponding elements at the same position in
1836 playfield from the level template. */
1838 for (x = 0; x < level.fieldx; x++)
1839 for (y = 0; y < level.fieldy; y++)
1840 if (level.field[x][y] == EL_FROM_LEVEL_TEMPLATE)
1841 level.field[x][y] = level_template.field[x][y];
1843 if (check_special_flags("load_xsb_to_ces"))
1845 struct LevelInfo level_backup = level;
1847 /* overwrite all individual level settings from template level settings */
1848 level = level_template;
1850 /* restore playfield size */
1851 level.fieldx = level_backup.fieldx;
1852 level.fieldy = level_backup.fieldy;
1854 /* restore playfield content */
1855 for (x = 0; x < level.fieldx; x++)
1856 for (y = 0; y < level.fieldy; y++)
1857 level.field[x][y] = level_backup.field[x][y];
1859 /* restore name and author from individual level */
1860 strcpy(level.name, level_backup.name);
1861 strcpy(level.author, level_backup.author);
1863 /* restore flag "use_custom_template" */
1864 level.use_custom_template = level_backup.use_custom_template;
1868 static char *getLevelFilenameFromBasename(char *basename)
1870 static char *filename[2] = { NULL, NULL };
1871 int pos = (strEqual(basename, LEVELTEMPLATE_FILENAME) ? 0 : 1);
1873 checked_free(filename[pos]);
1875 filename[pos] = getPath2(getCurrentLevelDir(), basename);
1877 return filename[pos];
1880 static int getFileTypeFromBasename(char *basename)
1882 /* !!! ALSO SEE COMMENT IN checkForPackageFromBasename() !!! */
1884 static char *filename = NULL;
1885 struct stat file_status;
1887 /* ---------- try to determine file type from filename ---------- */
1889 /* check for typical filename of a Supaplex level package file */
1890 if (strlen(basename) == 10 && strPrefixLower(basename, "levels.d"))
1891 return LEVEL_FILE_TYPE_SP;
1893 /* check for typical filename of a Diamond Caves II level package file */
1894 if (strSuffixLower(basename, ".dc") ||
1895 strSuffixLower(basename, ".dc2"))
1896 return LEVEL_FILE_TYPE_DC;
1898 /* check for typical filename of a Sokoban level package file */
1899 if (strSuffixLower(basename, ".xsb") &&
1900 strchr(basename, '%') == NULL)
1901 return LEVEL_FILE_TYPE_SB;
1903 /* ---------- try to determine file type from filesize ---------- */
1905 checked_free(filename);
1906 filename = getPath2(getCurrentLevelDir(), basename);
1908 if (stat(filename, &file_status) == 0)
1910 /* check for typical filesize of a Supaplex level package file */
1911 if (file_status.st_size == 170496)
1912 return LEVEL_FILE_TYPE_SP;
1915 return LEVEL_FILE_TYPE_UNKNOWN;
1918 static boolean checkForPackageFromBasename(char *basename)
1920 /* !!! WON'T WORK ANYMORE IF getFileTypeFromBasename() ALSO DETECTS !!!
1921 !!! SINGLE LEVELS (CURRENTLY ONLY DETECTS LEVEL PACKAGES !!! */
1923 return (getFileTypeFromBasename(basename) != LEVEL_FILE_TYPE_UNKNOWN);
1926 static char *getSingleLevelBasenameExt(int nr, char *extension)
1928 static char basename[MAX_FILENAME_LEN];
1931 sprintf(basename, "%s", LEVELTEMPLATE_FILENAME);
1933 sprintf(basename, "%03d.%s", nr, extension);
1938 static char *getSingleLevelBasename(int nr)
1940 return getSingleLevelBasenameExt(nr, LEVELFILE_EXTENSION);
1943 static char *getPackedLevelBasename(int type)
1945 static char basename[MAX_FILENAME_LEN];
1946 char *directory = getCurrentLevelDir();
1948 DirectoryEntry *dir_entry;
1950 strcpy(basename, UNDEFINED_FILENAME); /* default: undefined file */
1952 if ((dir = openDirectory(directory)) == NULL)
1954 Error(ERR_WARN, "cannot read current level directory '%s'", directory);
1959 while ((dir_entry = readDirectory(dir)) != NULL) /* loop all entries */
1961 char *entry_basename = dir_entry->basename;
1962 int entry_type = getFileTypeFromBasename(entry_basename);
1964 if (entry_type != LEVEL_FILE_TYPE_UNKNOWN) /* found valid level package */
1966 if (type == LEVEL_FILE_TYPE_UNKNOWN ||
1969 strcpy(basename, entry_basename);
1976 closeDirectory(dir);
1981 static char *getSingleLevelFilename(int nr)
1983 return getLevelFilenameFromBasename(getSingleLevelBasename(nr));
1986 #if ENABLE_UNUSED_CODE
1987 static char *getPackedLevelFilename(int type)
1989 return getLevelFilenameFromBasename(getPackedLevelBasename(type));
1993 char *getDefaultLevelFilename(int nr)
1995 return getSingleLevelFilename(nr);
1998 #if ENABLE_UNUSED_CODE
1999 static void setLevelFileInfo_SingleLevelFilename(struct LevelFileInfo *lfi,
2003 lfi->packed = FALSE;
2004 lfi->basename = getSingleLevelBasename(lfi->nr, lfi->type);
2005 lfi->filename = getLevelFilenameFromBasename(lfi->basename);
2009 static void setLevelFileInfo_FormatLevelFilename(struct LevelFileInfo *lfi,
2010 int type, char *format, ...)
2012 static char basename[MAX_FILENAME_LEN];
2015 va_start(ap, format);
2016 vsprintf(basename, format, ap);
2020 lfi->packed = FALSE;
2021 lfi->basename = basename;
2022 lfi->filename = getLevelFilenameFromBasename(lfi->basename);
2025 static void setLevelFileInfo_PackedLevelFilename(struct LevelFileInfo *lfi,
2030 lfi->basename = getPackedLevelBasename(lfi->type);
2031 lfi->filename = getLevelFilenameFromBasename(lfi->basename);
2034 static int getFiletypeFromID(char *filetype_id)
2036 char *filetype_id_lower;
2037 int filetype = LEVEL_FILE_TYPE_UNKNOWN;
2040 if (filetype_id == NULL)
2041 return LEVEL_FILE_TYPE_UNKNOWN;
2043 filetype_id_lower = getStringToLower(filetype_id);
2045 for (i = 0; filetype_id_list[i].id != NULL; i++)
2047 char *id_lower = getStringToLower(filetype_id_list[i].id);
2049 if (strEqual(filetype_id_lower, id_lower))
2050 filetype = filetype_id_list[i].filetype;
2054 if (filetype != LEVEL_FILE_TYPE_UNKNOWN)
2058 free(filetype_id_lower);
2063 char *getLocalLevelTemplateFilename()
2065 return getDefaultLevelFilename(-1);
2068 char *getGlobalLevelTemplateFilename()
2070 /* global variable "leveldir_current" must be modified in the loop below */
2071 LevelDirTree *leveldir_current_last = leveldir_current;
2072 char *filename = NULL;
2074 /* check for template level in path from current to topmost tree node */
2076 while (leveldir_current != NULL)
2078 filename = getDefaultLevelFilename(-1);
2080 if (fileExists(filename))
2083 leveldir_current = leveldir_current->node_parent;
2086 /* restore global variable "leveldir_current" modified in above loop */
2087 leveldir_current = leveldir_current_last;
2092 static void determineLevelFileInfo_Filename(struct LevelFileInfo *lfi)
2096 /* special case: level number is negative => check for level template file */
2099 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_RND,
2100 getSingleLevelBasename(-1));
2102 /* replace local level template filename with global template filename */
2103 lfi->filename = getGlobalLevelTemplateFilename();
2105 /* no fallback if template file not existing */
2109 /* special case: check for file name/pattern specified in "levelinfo.conf" */
2110 if (leveldir_current->level_filename != NULL)
2112 int filetype = getFiletypeFromID(leveldir_current->level_filetype);
2114 setLevelFileInfo_FormatLevelFilename(lfi, filetype,
2115 leveldir_current->level_filename, nr);
2117 lfi->packed = checkForPackageFromBasename(leveldir_current->level_filename);
2119 if (fileExists(lfi->filename))
2123 /* check for native Rocks'n'Diamonds level file */
2124 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_RND,
2125 "%03d.%s", nr, LEVELFILE_EXTENSION);
2126 if (fileExists(lfi->filename))
2129 /* check for Emerald Mine level file (V1) */
2130 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "a%c%c",
2131 'a' + (nr / 10) % 26, '0' + nr % 10);
2132 if (fileExists(lfi->filename))
2134 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "A%c%c",
2135 'A' + (nr / 10) % 26, '0' + nr % 10);
2136 if (fileExists(lfi->filename))
2139 /* check for Emerald Mine level file (V2 to V5) */
2140 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%d", nr);
2141 if (fileExists(lfi->filename))
2144 /* check for Emerald Mine level file (V6 / single mode) */
2145 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02ds", nr);
2146 if (fileExists(lfi->filename))
2148 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02dS", nr);
2149 if (fileExists(lfi->filename))
2152 /* check for Emerald Mine level file (V6 / teamwork mode) */
2153 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02dt", nr);
2154 if (fileExists(lfi->filename))
2156 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02dT", nr);
2157 if (fileExists(lfi->filename))
2160 /* check for various packed level file formats */
2161 setLevelFileInfo_PackedLevelFilename(lfi, LEVEL_FILE_TYPE_UNKNOWN);
2162 if (fileExists(lfi->filename))
2165 /* no known level file found -- use default values (and fail later) */
2166 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_RND,
2167 "%03d.%s", nr, LEVELFILE_EXTENSION);
2170 static void determineLevelFileInfo_Filetype(struct LevelFileInfo *lfi)
2172 if (lfi->type == LEVEL_FILE_TYPE_UNKNOWN)
2173 lfi->type = getFileTypeFromBasename(lfi->basename);
2176 static void setLevelFileInfo(struct LevelFileInfo *level_file_info, int nr)
2178 /* always start with reliable default values */
2179 setFileInfoToDefaults(level_file_info);
2181 level_file_info->nr = nr; /* set requested level number */
2183 determineLevelFileInfo_Filename(level_file_info);
2184 determineLevelFileInfo_Filetype(level_file_info);
2187 /* ------------------------------------------------------------------------- */
2188 /* functions for loading R'n'D level */
2189 /* ------------------------------------------------------------------------- */
2191 int getMappedElement(int element)
2193 /* remap some (historic, now obsolete) elements */
2197 case EL_PLAYER_OBSOLETE:
2198 element = EL_PLAYER_1;
2201 case EL_KEY_OBSOLETE:
2205 case EL_EM_KEY_1_FILE_OBSOLETE:
2206 element = EL_EM_KEY_1;
2209 case EL_EM_KEY_2_FILE_OBSOLETE:
2210 element = EL_EM_KEY_2;
2213 case EL_EM_KEY_3_FILE_OBSOLETE:
2214 element = EL_EM_KEY_3;
2217 case EL_EM_KEY_4_FILE_OBSOLETE:
2218 element = EL_EM_KEY_4;
2221 case EL_ENVELOPE_OBSOLETE:
2222 element = EL_ENVELOPE_1;
2230 if (element >= NUM_FILE_ELEMENTS)
2232 Error(ERR_WARN, "invalid level element %d", element);
2234 element = EL_UNKNOWN;
2242 int getMappedElementByVersion(int element, int game_version)
2244 /* remap some elements due to certain game version */
2246 if (game_version <= VERSION_IDENT(2,2,0,0))
2248 /* map game font elements */
2249 element = (element == EL_CHAR('[') ? EL_CHAR_AUMLAUT :
2250 element == EL_CHAR('\\') ? EL_CHAR_OUMLAUT :
2251 element == EL_CHAR(']') ? EL_CHAR_UUMLAUT :
2252 element == EL_CHAR('^') ? EL_CHAR_COPYRIGHT : element);
2255 if (game_version < VERSION_IDENT(3,0,0,0))
2257 /* map Supaplex gravity tube elements */
2258 element = (element == EL_SP_GRAVITY_PORT_LEFT ? EL_SP_PORT_LEFT :
2259 element == EL_SP_GRAVITY_PORT_RIGHT ? EL_SP_PORT_RIGHT :
2260 element == EL_SP_GRAVITY_PORT_UP ? EL_SP_PORT_UP :
2261 element == EL_SP_GRAVITY_PORT_DOWN ? EL_SP_PORT_DOWN :
2268 static int LoadLevel_VERS(File *file, int chunk_size, struct LevelInfo *level)
2270 level->file_version = getFileVersion(file);
2271 level->game_version = getFileVersion(file);
2276 static int LoadLevel_DATE(File *file, int chunk_size, struct LevelInfo *level)
2278 level->creation_date.year = getFile16BitBE(file);
2279 level->creation_date.month = getFile8Bit(file);
2280 level->creation_date.day = getFile8Bit(file);
2282 level->creation_date.src = DATE_SRC_LEVELFILE;
2287 static int LoadLevel_HEAD(File *file, int chunk_size, struct LevelInfo *level)
2289 int initial_player_stepsize;
2290 int initial_player_gravity;
2293 level->fieldx = getFile8Bit(file);
2294 level->fieldy = getFile8Bit(file);
2296 level->time = getFile16BitBE(file);
2297 level->gems_needed = getFile16BitBE(file);
2299 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
2300 level->name[i] = getFile8Bit(file);
2301 level->name[MAX_LEVEL_NAME_LEN] = 0;
2303 for (i = 0; i < LEVEL_SCORE_ELEMENTS; i++)
2304 level->score[i] = getFile8Bit(file);
2306 level->num_yamyam_contents = STD_ELEMENT_CONTENTS;
2307 for (i = 0; i < STD_ELEMENT_CONTENTS; i++)
2308 for (y = 0; y < 3; y++)
2309 for (x = 0; x < 3; x++)
2310 level->yamyam_content[i].e[x][y] = getMappedElement(getFile8Bit(file));
2312 level->amoeba_speed = getFile8Bit(file);
2313 level->time_magic_wall = getFile8Bit(file);
2314 level->time_wheel = getFile8Bit(file);
2315 level->amoeba_content = getMappedElement(getFile8Bit(file));
2317 initial_player_stepsize = (getFile8Bit(file) == 1 ? STEPSIZE_FAST :
2320 for (i = 0; i < MAX_PLAYERS; i++)
2321 level->initial_player_stepsize[i] = initial_player_stepsize;
2323 initial_player_gravity = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2325 for (i = 0; i < MAX_PLAYERS; i++)
2326 level->initial_player_gravity[i] = initial_player_gravity;
2328 level->encoding_16bit_field = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2329 level->em_slippery_gems = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2331 level->use_custom_template = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2333 level->block_last_field = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2334 level->sp_block_last_field = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2335 level->can_move_into_acid_bits = getFile32BitBE(file);
2336 level->dont_collide_with_bits = getFile8Bit(file);
2338 level->use_spring_bug = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2339 level->use_step_counter = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2341 level->instant_relocation = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2342 level->can_pass_to_walkable = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2343 level->grow_into_diggable = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2345 level->game_engine_type = getFile8Bit(file);
2347 ReadUnusedBytesFromFile(file, LEVEL_CHUNK_HEAD_UNUSED);
2352 static int LoadLevel_NAME(File *file, int chunk_size, struct LevelInfo *level)
2356 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
2357 level->name[i] = getFile8Bit(file);
2358 level->name[MAX_LEVEL_NAME_LEN] = 0;
2363 static int LoadLevel_AUTH(File *file, int chunk_size, struct LevelInfo *level)
2367 for (i = 0; i < MAX_LEVEL_AUTHOR_LEN; i++)
2368 level->author[i] = getFile8Bit(file);
2369 level->author[MAX_LEVEL_AUTHOR_LEN] = 0;
2374 static int LoadLevel_BODY(File *file, int chunk_size, struct LevelInfo *level)
2377 int chunk_size_expected = level->fieldx * level->fieldy;
2379 /* Note: "chunk_size" was wrong before version 2.0 when elements are
2380 stored with 16-bit encoding (and should be twice as big then).
2381 Even worse, playfield data was stored 16-bit when only yamyam content
2382 contained 16-bit elements and vice versa. */
2384 if (level->encoding_16bit_field && level->file_version >= FILE_VERSION_2_0)
2385 chunk_size_expected *= 2;
2387 if (chunk_size_expected != chunk_size)
2389 ReadUnusedBytesFromFile(file, chunk_size);
2390 return chunk_size_expected;
2393 for (y = 0; y < level->fieldy; y++)
2394 for (x = 0; x < level->fieldx; x++)
2395 level->field[x][y] =
2396 getMappedElement(level->encoding_16bit_field ? getFile16BitBE(file) :
2401 static int LoadLevel_CONT(File *file, int chunk_size, struct LevelInfo *level)
2404 int header_size = 4;
2405 int content_size = MAX_ELEMENT_CONTENTS * 3 * 3;
2406 int chunk_size_expected = header_size + content_size;
2408 /* Note: "chunk_size" was wrong before version 2.0 when elements are
2409 stored with 16-bit encoding (and should be twice as big then).
2410 Even worse, playfield data was stored 16-bit when only yamyam content
2411 contained 16-bit elements and vice versa. */
2413 if (level->encoding_16bit_field && level->file_version >= FILE_VERSION_2_0)
2414 chunk_size_expected += content_size;
2416 if (chunk_size_expected != chunk_size)
2418 ReadUnusedBytesFromFile(file, chunk_size);
2419 return chunk_size_expected;
2423 level->num_yamyam_contents = getFile8Bit(file);
2427 /* correct invalid number of content fields -- should never happen */
2428 if (level->num_yamyam_contents < 1 ||
2429 level->num_yamyam_contents > MAX_ELEMENT_CONTENTS)
2430 level->num_yamyam_contents = STD_ELEMENT_CONTENTS;
2432 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
2433 for (y = 0; y < 3; y++)
2434 for (x = 0; x < 3; x++)
2435 level->yamyam_content[i].e[x][y] =
2436 getMappedElement(level->encoding_16bit_field ?
2437 getFile16BitBE(file) : getFile8Bit(file));
2441 static int LoadLevel_CNT2(File *file, int chunk_size, struct LevelInfo *level)
2446 int content_array[MAX_ELEMENT_CONTENTS][3][3];
2448 element = getMappedElement(getFile16BitBE(file));
2449 num_contents = getFile8Bit(file);
2451 getFile8Bit(file); /* content x size (unused) */
2452 getFile8Bit(file); /* content y size (unused) */
2454 ReadUnusedBytesFromFile(file, LEVEL_CHUNK_CNT2_UNUSED);
2456 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
2457 for (y = 0; y < 3; y++)
2458 for (x = 0; x < 3; x++)
2459 content_array[i][x][y] = getMappedElement(getFile16BitBE(file));
2461 /* correct invalid number of content fields -- should never happen */
2462 if (num_contents < 1 || num_contents > MAX_ELEMENT_CONTENTS)
2463 num_contents = STD_ELEMENT_CONTENTS;
2465 if (element == EL_YAMYAM)
2467 level->num_yamyam_contents = num_contents;
2469 for (i = 0; i < num_contents; i++)
2470 for (y = 0; y < 3; y++)
2471 for (x = 0; x < 3; x++)
2472 level->yamyam_content[i].e[x][y] = content_array[i][x][y];
2474 else if (element == EL_BD_AMOEBA)
2476 level->amoeba_content = content_array[0][0][0];
2480 Error(ERR_WARN, "cannot load content for element '%d'", element);
2486 static int LoadLevel_CNT3(File *file, int chunk_size, struct LevelInfo *level)
2492 int chunk_size_expected;
2494 element = getMappedElement(getFile16BitBE(file));
2495 if (!IS_ENVELOPE(element))
2496 element = EL_ENVELOPE_1;
2498 envelope_nr = element - EL_ENVELOPE_1;
2500 envelope_len = getFile16BitBE(file);
2502 level->envelope[envelope_nr].xsize = getFile8Bit(file);
2503 level->envelope[envelope_nr].ysize = getFile8Bit(file);
2505 ReadUnusedBytesFromFile(file, LEVEL_CHUNK_CNT3_UNUSED);
2507 chunk_size_expected = LEVEL_CHUNK_CNT3_SIZE(envelope_len);
2508 if (chunk_size_expected != chunk_size)
2510 ReadUnusedBytesFromFile(file, chunk_size - LEVEL_CHUNK_CNT3_HEADER);
2511 return chunk_size_expected;
2514 for (i = 0; i < envelope_len; i++)
2515 level->envelope[envelope_nr].text[i] = getFile8Bit(file);
2520 static int LoadLevel_CUS1(File *file, int chunk_size, struct LevelInfo *level)
2522 int num_changed_custom_elements = getFile16BitBE(file);
2523 int chunk_size_expected = 2 + num_changed_custom_elements * 6;
2526 if (chunk_size_expected != chunk_size)
2528 ReadUnusedBytesFromFile(file, chunk_size - 2);
2529 return chunk_size_expected;
2532 for (i = 0; i < num_changed_custom_elements; i++)
2534 int element = getMappedElement(getFile16BitBE(file));
2535 int properties = getFile32BitBE(file);
2537 if (IS_CUSTOM_ELEMENT(element))
2538 element_info[element].properties[EP_BITFIELD_BASE_NR] = properties;
2540 Error(ERR_WARN, "invalid custom element number %d", element);
2542 /* older game versions that wrote level files with CUS1 chunks used
2543 different default push delay values (not yet stored in level file) */
2544 element_info[element].push_delay_fixed = 2;
2545 element_info[element].push_delay_random = 8;
2551 static int LoadLevel_CUS2(File *file, int chunk_size, struct LevelInfo *level)
2553 int num_changed_custom_elements = getFile16BitBE(file);
2554 int chunk_size_expected = 2 + num_changed_custom_elements * 4;
2557 if (chunk_size_expected != chunk_size)
2559 ReadUnusedBytesFromFile(file, chunk_size - 2);
2560 return chunk_size_expected;
2563 for (i = 0; i < num_changed_custom_elements; i++)
2565 int element = getMappedElement(getFile16BitBE(file));
2566 int custom_target_element = getMappedElement(getFile16BitBE(file));
2568 if (IS_CUSTOM_ELEMENT(element))
2569 element_info[element].change->target_element = custom_target_element;
2571 Error(ERR_WARN, "invalid custom element number %d", element);
2577 static int LoadLevel_CUS3(File *file, int chunk_size, struct LevelInfo *level)
2579 int num_changed_custom_elements = getFile16BitBE(file);
2580 int chunk_size_expected = LEVEL_CHUNK_CUS3_SIZE(num_changed_custom_elements);
2583 if (chunk_size_expected != chunk_size)
2585 ReadUnusedBytesFromFile(file, chunk_size - 2);
2586 return chunk_size_expected;
2589 for (i = 0; i < num_changed_custom_elements; i++)
2591 int element = getMappedElement(getFile16BitBE(file));
2592 struct ElementInfo *ei = &element_info[element];
2593 unsigned int event_bits;
2595 if (!IS_CUSTOM_ELEMENT(element))
2597 Error(ERR_WARN, "invalid custom element number %d", element);
2599 element = EL_INTERNAL_DUMMY;
2602 for (j = 0; j < MAX_ELEMENT_NAME_LEN; j++)
2603 ei->description[j] = getFile8Bit(file);
2604 ei->description[MAX_ELEMENT_NAME_LEN] = 0;
2606 ei->properties[EP_BITFIELD_BASE_NR] = getFile32BitBE(file);
2608 /* some free bytes for future properties and padding */
2609 ReadUnusedBytesFromFile(file, 7);
2611 ei->use_gfx_element = getFile8Bit(file);
2612 ei->gfx_element_initial = getMappedElement(getFile16BitBE(file));
2614 ei->collect_score_initial = getFile8Bit(file);
2615 ei->collect_count_initial = getFile8Bit(file);
2617 ei->push_delay_fixed = getFile16BitBE(file);
2618 ei->push_delay_random = getFile16BitBE(file);
2619 ei->move_delay_fixed = getFile16BitBE(file);
2620 ei->move_delay_random = getFile16BitBE(file);
2622 ei->move_pattern = getFile16BitBE(file);
2623 ei->move_direction_initial = getFile8Bit(file);
2624 ei->move_stepsize = getFile8Bit(file);
2626 for (y = 0; y < 3; y++)
2627 for (x = 0; x < 3; x++)
2628 ei->content.e[x][y] = getMappedElement(getFile16BitBE(file));
2630 event_bits = getFile32BitBE(file);
2631 for (j = 0; j < NUM_CHANGE_EVENTS; j++)
2632 if (event_bits & (1 << j))
2633 ei->change->has_event[j] = TRUE;
2635 ei->change->target_element = getMappedElement(getFile16BitBE(file));
2637 ei->change->delay_fixed = getFile16BitBE(file);
2638 ei->change->delay_random = getFile16BitBE(file);
2639 ei->change->delay_frames = getFile16BitBE(file);
2641 ei->change->initial_trigger_element= getMappedElement(getFile16BitBE(file));
2643 ei->change->explode = getFile8Bit(file);
2644 ei->change->use_target_content = getFile8Bit(file);
2645 ei->change->only_if_complete = getFile8Bit(file);
2646 ei->change->use_random_replace = getFile8Bit(file);
2648 ei->change->random_percentage = getFile8Bit(file);
2649 ei->change->replace_when = getFile8Bit(file);
2651 for (y = 0; y < 3; y++)
2652 for (x = 0; x < 3; x++)
2653 ei->change->target_content.e[x][y] =
2654 getMappedElement(getFile16BitBE(file));
2656 ei->slippery_type = getFile8Bit(file);
2658 /* some free bytes for future properties and padding */
2659 ReadUnusedBytesFromFile(file, LEVEL_CPART_CUS3_UNUSED);
2661 /* mark that this custom element has been modified */
2662 ei->modified_settings = TRUE;
2668 static int LoadLevel_CUS4(File *file, int chunk_size, struct LevelInfo *level)
2670 struct ElementInfo *ei;
2671 int chunk_size_expected;
2675 /* ---------- custom element base property values (96 bytes) ------------- */
2677 element = getMappedElement(getFile16BitBE(file));
2679 if (!IS_CUSTOM_ELEMENT(element))
2681 Error(ERR_WARN, "invalid custom element number %d", element);
2683 ReadUnusedBytesFromFile(file, chunk_size - 2);
2687 ei = &element_info[element];
2689 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
2690 ei->description[i] = getFile8Bit(file);
2691 ei->description[MAX_ELEMENT_NAME_LEN] = 0;
2693 ei->properties[EP_BITFIELD_BASE_NR] = getFile32BitBE(file);
2695 ReadUnusedBytesFromFile(file, 4); /* reserved for more base properties */
2697 ei->num_change_pages = getFile8Bit(file);
2699 chunk_size_expected = LEVEL_CHUNK_CUS4_SIZE(ei->num_change_pages);
2700 if (chunk_size_expected != chunk_size)
2702 ReadUnusedBytesFromFile(file, chunk_size - 43);
2703 return chunk_size_expected;
2706 ei->ce_value_fixed_initial = getFile16BitBE(file);
2707 ei->ce_value_random_initial = getFile16BitBE(file);
2708 ei->use_last_ce_value = getFile8Bit(file);
2710 ei->use_gfx_element = getFile8Bit(file);
2711 ei->gfx_element_initial = getMappedElement(getFile16BitBE(file));
2713 ei->collect_score_initial = getFile8Bit(file);
2714 ei->collect_count_initial = getFile8Bit(file);
2716 ei->drop_delay_fixed = getFile8Bit(file);
2717 ei->push_delay_fixed = getFile8Bit(file);
2718 ei->drop_delay_random = getFile8Bit(file);
2719 ei->push_delay_random = getFile8Bit(file);
2720 ei->move_delay_fixed = getFile16BitBE(file);
2721 ei->move_delay_random = getFile16BitBE(file);
2723 /* bits 0 - 15 of "move_pattern" ... */
2724 ei->move_pattern = getFile16BitBE(file);
2725 ei->move_direction_initial = getFile8Bit(file);
2726 ei->move_stepsize = getFile8Bit(file);
2728 ei->slippery_type = getFile8Bit(file);
2730 for (y = 0; y < 3; y++)
2731 for (x = 0; x < 3; x++)
2732 ei->content.e[x][y] = getMappedElement(getFile16BitBE(file));
2734 ei->move_enter_element = getMappedElement(getFile16BitBE(file));
2735 ei->move_leave_element = getMappedElement(getFile16BitBE(file));
2736 ei->move_leave_type = getFile8Bit(file);
2738 /* ... bits 16 - 31 of "move_pattern" (not nice, but downward compatible) */
2739 ei->move_pattern |= (getFile16BitBE(file) << 16);
2741 ei->access_direction = getFile8Bit(file);
2743 ei->explosion_delay = getFile8Bit(file);
2744 ei->ignition_delay = getFile8Bit(file);
2745 ei->explosion_type = getFile8Bit(file);
2747 /* some free bytes for future custom property values and padding */
2748 ReadUnusedBytesFromFile(file, 1);
2750 /* ---------- change page property values (48 bytes) --------------------- */
2752 setElementChangePages(ei, ei->num_change_pages);
2754 for (i = 0; i < ei->num_change_pages; i++)
2756 struct ElementChangeInfo *change = &ei->change_page[i];
2757 unsigned int event_bits;
2759 /* always start with reliable default values */
2760 setElementChangeInfoToDefaults(change);
2762 /* bits 0 - 31 of "has_event[]" ... */
2763 event_bits = getFile32BitBE(file);
2764 for (j = 0; j < MIN(NUM_CHANGE_EVENTS, 32); j++)
2765 if (event_bits & (1 << j))
2766 change->has_event[j] = TRUE;
2768 change->target_element = getMappedElement(getFile16BitBE(file));
2770 change->delay_fixed = getFile16BitBE(file);
2771 change->delay_random = getFile16BitBE(file);
2772 change->delay_frames = getFile16BitBE(file);
2774 change->initial_trigger_element = getMappedElement(getFile16BitBE(file));
2776 change->explode = getFile8Bit(file);
2777 change->use_target_content = getFile8Bit(file);
2778 change->only_if_complete = getFile8Bit(file);
2779 change->use_random_replace = getFile8Bit(file);
2781 change->random_percentage = getFile8Bit(file);
2782 change->replace_when = getFile8Bit(file);
2784 for (y = 0; y < 3; y++)
2785 for (x = 0; x < 3; x++)
2786 change->target_content.e[x][y]= getMappedElement(getFile16BitBE(file));
2788 change->can_change = getFile8Bit(file);
2790 change->trigger_side = getFile8Bit(file);
2792 change->trigger_player = getFile8Bit(file);
2793 change->trigger_page = getFile8Bit(file);
2795 change->trigger_page = (change->trigger_page == CH_PAGE_ANY_FILE ?
2796 CH_PAGE_ANY : (1 << change->trigger_page));
2798 change->has_action = getFile8Bit(file);
2799 change->action_type = getFile8Bit(file);
2800 change->action_mode = getFile8Bit(file);
2801 change->action_arg = getFile16BitBE(file);
2803 /* ... bits 32 - 39 of "has_event[]" (not nice, but downward compatible) */
2804 event_bits = getFile8Bit(file);
2805 for (j = 32; j < NUM_CHANGE_EVENTS; j++)
2806 if (event_bits & (1 << (j - 32)))
2807 change->has_event[j] = TRUE;
2810 /* mark this custom element as modified */
2811 ei->modified_settings = TRUE;
2816 static int LoadLevel_GRP1(File *file, int chunk_size, struct LevelInfo *level)
2818 struct ElementInfo *ei;
2819 struct ElementGroupInfo *group;
2823 element = getMappedElement(getFile16BitBE(file));
2825 if (!IS_GROUP_ELEMENT(element))
2827 Error(ERR_WARN, "invalid group element number %d", element);
2829 ReadUnusedBytesFromFile(file, chunk_size - 2);
2833 ei = &element_info[element];
2835 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
2836 ei->description[i] = getFile8Bit(file);
2837 ei->description[MAX_ELEMENT_NAME_LEN] = 0;
2839 group = element_info[element].group;
2841 group->num_elements = getFile8Bit(file);
2843 ei->use_gfx_element = getFile8Bit(file);
2844 ei->gfx_element_initial = getMappedElement(getFile16BitBE(file));
2846 group->choice_mode = getFile8Bit(file);
2848 /* some free bytes for future values and padding */
2849 ReadUnusedBytesFromFile(file, 3);
2851 for (i = 0; i < MAX_ELEMENTS_IN_GROUP; i++)
2852 group->element[i] = getMappedElement(getFile16BitBE(file));
2854 /* mark this group element as modified */
2855 element_info[element].modified_settings = TRUE;
2860 static int LoadLevel_MicroChunk(File *file, struct LevelFileConfigInfo *conf,
2861 int element, int real_element)
2863 int micro_chunk_size = 0;
2864 int conf_type = getFile8Bit(file);
2865 int byte_mask = conf_type & CONF_MASK_BYTES;
2866 boolean element_found = FALSE;
2869 micro_chunk_size += 1;
2871 if (byte_mask == CONF_MASK_MULTI_BYTES)
2873 int num_bytes = getFile16BitBE(file);
2874 byte *buffer = checked_malloc(num_bytes);
2876 ReadBytesFromFile(file, buffer, num_bytes);
2878 for (i = 0; conf[i].data_type != -1; i++)
2880 if (conf[i].element == element &&
2881 conf[i].conf_type == conf_type)
2883 int data_type = conf[i].data_type;
2884 int num_entities = num_bytes / CONF_ENTITY_NUM_BYTES(data_type);
2885 int max_num_entities = conf[i].max_num_entities;
2887 if (num_entities > max_num_entities)
2890 "truncating number of entities for element %d from %d to %d",
2891 element, num_entities, max_num_entities);
2893 num_entities = max_num_entities;
2896 if (num_entities == 0 && (data_type == TYPE_ELEMENT_LIST ||
2897 data_type == TYPE_CONTENT_LIST))
2899 /* for element and content lists, zero entities are not allowed */
2900 Error(ERR_WARN, "found empty list of entities for element %d",
2903 /* do not set "num_entities" here to prevent reading behind buffer */
2905 *(int *)(conf[i].num_entities) = 1; /* at least one is required */
2909 *(int *)(conf[i].num_entities) = num_entities;
2912 element_found = TRUE;
2914 if (data_type == TYPE_STRING)
2916 char *string = (char *)(conf[i].value);
2919 for (j = 0; j < max_num_entities; j++)
2920 string[j] = (j < num_entities ? buffer[j] : '\0');
2922 else if (data_type == TYPE_ELEMENT_LIST)
2924 int *element_array = (int *)(conf[i].value);
2927 for (j = 0; j < num_entities; j++)
2929 getMappedElement(CONF_ELEMENTS_ELEMENT(buffer, j));
2931 else if (data_type == TYPE_CONTENT_LIST)
2933 struct Content *content= (struct Content *)(conf[i].value);
2936 for (c = 0; c < num_entities; c++)
2937 for (y = 0; y < 3; y++)
2938 for (x = 0; x < 3; x++)
2939 content[c].e[x][y] =
2940 getMappedElement(CONF_CONTENTS_ELEMENT(buffer, c, x, y));
2943 element_found = FALSE;
2949 checked_free(buffer);
2951 micro_chunk_size += 2 + num_bytes;
2953 else /* constant size configuration data (1, 2 or 4 bytes) */
2955 int value = (byte_mask == CONF_MASK_1_BYTE ? getFile8Bit (file) :
2956 byte_mask == CONF_MASK_2_BYTE ? getFile16BitBE(file) :
2957 byte_mask == CONF_MASK_4_BYTE ? getFile32BitBE(file) : 0);
2959 for (i = 0; conf[i].data_type != -1; i++)
2961 if (conf[i].element == element &&
2962 conf[i].conf_type == conf_type)
2964 int data_type = conf[i].data_type;
2966 if (data_type == TYPE_ELEMENT)
2967 value = getMappedElement(value);
2969 if (data_type == TYPE_BOOLEAN)
2970 *(boolean *)(conf[i].value) = value;
2972 *(int *) (conf[i].value) = value;
2974 element_found = TRUE;
2980 micro_chunk_size += CONF_VALUE_NUM_BYTES(byte_mask);
2985 char *error_conf_chunk_bytes =
2986 (byte_mask == CONF_MASK_1_BYTE ? "CONF_VALUE_8_BIT" :
2987 byte_mask == CONF_MASK_2_BYTE ? "CONF_VALUE_16_BIT" :
2988 byte_mask == CONF_MASK_4_BYTE ? "CONF_VALUE_32_BIT" :"CONF_VALUE_BYTES");
2989 int error_conf_chunk_token = conf_type & CONF_MASK_TOKEN;
2990 int error_element = real_element;
2992 Error(ERR_WARN, "cannot load micro chunk '%s(%d)' value for element %d ['%s']",
2993 error_conf_chunk_bytes, error_conf_chunk_token,
2994 error_element, EL_NAME(error_element));
2997 return micro_chunk_size;
3000 static int LoadLevel_INFO(File *file, int chunk_size, struct LevelInfo *level)
3002 int real_chunk_size = 0;
3004 li = *level; /* copy level data into temporary buffer */
3006 while (!checkEndOfFile(file))
3008 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_INFO, -1, -1);
3010 if (real_chunk_size >= chunk_size)
3014 *level = li; /* copy temporary buffer back to level data */
3016 return real_chunk_size;
3019 static int LoadLevel_CONF(File *file, int chunk_size, struct LevelInfo *level)
3021 int real_chunk_size = 0;
3023 li = *level; /* copy level data into temporary buffer */
3025 while (!checkEndOfFile(file))
3027 int element = getMappedElement(getFile16BitBE(file));
3029 real_chunk_size += 2;
3030 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_CONF,
3032 if (real_chunk_size >= chunk_size)
3036 *level = li; /* copy temporary buffer back to level data */
3038 return real_chunk_size;
3041 static int LoadLevel_ELEM(File *file, int chunk_size, struct LevelInfo *level)
3043 int real_chunk_size = 0;
3045 li = *level; /* copy level data into temporary buffer */
3047 while (!checkEndOfFile(file))
3049 int element = getMappedElement(getFile16BitBE(file));
3051 real_chunk_size += 2;
3052 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_ELEM,
3054 if (real_chunk_size >= chunk_size)
3058 *level = li; /* copy temporary buffer back to level data */
3060 return real_chunk_size;
3063 static int LoadLevel_NOTE(File *file, int chunk_size, struct LevelInfo *level)
3065 int element = getMappedElement(getFile16BitBE(file));
3066 int envelope_nr = element - EL_ENVELOPE_1;
3067 int real_chunk_size = 2;
3069 xx_envelope = level->envelope[envelope_nr]; /* copy into temporary buffer */
3071 while (!checkEndOfFile(file))
3073 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_NOTE,
3076 if (real_chunk_size >= chunk_size)
3080 level->envelope[envelope_nr] = xx_envelope; /* copy from temporary buffer */
3082 return real_chunk_size;
3085 static int LoadLevel_CUSX(File *file, int chunk_size, struct LevelInfo *level)
3087 int element = getMappedElement(getFile16BitBE(file));
3088 int real_chunk_size = 2;
3089 struct ElementInfo *ei = &element_info[element];
3092 xx_ei = *ei; /* copy element data into temporary buffer */
3094 xx_ei.num_change_pages = -1;
3096 while (!checkEndOfFile(file))
3098 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_CUSX_base,
3100 if (xx_ei.num_change_pages != -1)
3103 if (real_chunk_size >= chunk_size)
3109 if (ei->num_change_pages == -1)
3111 Error(ERR_WARN, "LoadLevel_CUSX(): missing 'num_change_pages' for '%s'",
3114 ei->num_change_pages = 1;
3116 setElementChangePages(ei, 1);
3117 setElementChangeInfoToDefaults(ei->change);
3119 return real_chunk_size;
3122 /* initialize number of change pages stored for this custom element */
3123 setElementChangePages(ei, ei->num_change_pages);
3124 for (i = 0; i < ei->num_change_pages; i++)
3125 setElementChangeInfoToDefaults(&ei->change_page[i]);
3127 /* start with reading properties for the first change page */
3128 xx_current_change_page = 0;
3130 while (!checkEndOfFile(file))
3132 struct ElementChangeInfo *change = &ei->change_page[xx_current_change_page];
3134 xx_change = *change; /* copy change data into temporary buffer */
3136 resetEventBits(); /* reset bits; change page might have changed */
3138 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_CUSX_change,
3141 *change = xx_change;
3143 setEventFlagsFromEventBits(change);
3145 if (real_chunk_size >= chunk_size)
3149 return real_chunk_size;
3152 static int LoadLevel_GRPX(File *file, int chunk_size, struct LevelInfo *level)
3154 int element = getMappedElement(getFile16BitBE(file));
3155 int real_chunk_size = 2;
3156 struct ElementInfo *ei = &element_info[element];
3157 struct ElementGroupInfo *group = ei->group;
3159 xx_ei = *ei; /* copy element data into temporary buffer */
3160 xx_group = *group; /* copy group data into temporary buffer */
3162 while (!checkEndOfFile(file))
3164 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_GRPX,
3167 if (real_chunk_size >= chunk_size)
3174 return real_chunk_size;
3177 static void LoadLevelFromFileInfo_RND(struct LevelInfo *level,
3178 struct LevelFileInfo *level_file_info,
3179 boolean level_info_only)
3181 char *filename = level_file_info->filename;
3182 char cookie[MAX_LINE_LEN];
3183 char chunk_name[CHUNK_ID_LEN + 1];
3187 if (!(file = openFile(filename, MODE_READ)))
3189 level->no_valid_file = TRUE;
3190 level->no_level_file = TRUE;
3192 if (level_info_only)
3195 Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
3197 if (!setup.editor.use_template_for_new_levels)
3200 /* if level file not found, try to initialize level data from template */
3201 filename = getGlobalLevelTemplateFilename();
3203 if (!(file = openFile(filename, MODE_READ)))
3206 /* default: for empty levels, use level template for custom elements */
3207 level->use_custom_template = TRUE;
3209 level->no_valid_file = FALSE;
3212 getFileChunkBE(file, chunk_name, NULL);
3213 if (strEqual(chunk_name, "RND1"))
3215 getFile32BitBE(file); /* not used */
3217 getFileChunkBE(file, chunk_name, NULL);
3218 if (!strEqual(chunk_name, "CAVE"))
3220 level->no_valid_file = TRUE;
3222 Error(ERR_WARN, "unknown format of level file '%s'", filename);
3229 else /* check for pre-2.0 file format with cookie string */
3231 strcpy(cookie, chunk_name);
3232 if (getStringFromFile(file, &cookie[4], MAX_LINE_LEN - 4) == NULL)
3234 if (strlen(cookie) > 0 && cookie[strlen(cookie) - 1] == '\n')
3235 cookie[strlen(cookie) - 1] = '\0';
3237 if (!checkCookieString(cookie, LEVEL_COOKIE_TMPL))
3239 level->no_valid_file = TRUE;
3241 Error(ERR_WARN, "unknown format of level file '%s'", filename);
3248 if ((level->file_version = getFileVersionFromCookieString(cookie)) == -1)
3250 level->no_valid_file = TRUE;
3252 Error(ERR_WARN, "unsupported version of level file '%s'", filename);
3259 /* pre-2.0 level files have no game version, so use file version here */
3260 level->game_version = level->file_version;
3263 if (level->file_version < FILE_VERSION_1_2)
3265 /* level files from versions before 1.2.0 without chunk structure */
3266 LoadLevel_HEAD(file, LEVEL_CHUNK_HEAD_SIZE, level);
3267 LoadLevel_BODY(file, level->fieldx * level->fieldy, level);
3275 int (*loader)(File *, int, struct LevelInfo *);
3279 { "VERS", LEVEL_CHUNK_VERS_SIZE, LoadLevel_VERS },
3280 { "DATE", LEVEL_CHUNK_DATE_SIZE, LoadLevel_DATE },
3281 { "HEAD", LEVEL_CHUNK_HEAD_SIZE, LoadLevel_HEAD },
3282 { "NAME", LEVEL_CHUNK_NAME_SIZE, LoadLevel_NAME },
3283 { "AUTH", LEVEL_CHUNK_AUTH_SIZE, LoadLevel_AUTH },
3284 { "INFO", -1, LoadLevel_INFO },
3285 { "BODY", -1, LoadLevel_BODY },
3286 { "CONT", -1, LoadLevel_CONT },
3287 { "CNT2", LEVEL_CHUNK_CNT2_SIZE, LoadLevel_CNT2 },
3288 { "CNT3", -1, LoadLevel_CNT3 },
3289 { "CUS1", -1, LoadLevel_CUS1 },
3290 { "CUS2", -1, LoadLevel_CUS2 },
3291 { "CUS3", -1, LoadLevel_CUS3 },
3292 { "CUS4", -1, LoadLevel_CUS4 },
3293 { "GRP1", -1, LoadLevel_GRP1 },
3294 { "CONF", -1, LoadLevel_CONF },
3295 { "ELEM", -1, LoadLevel_ELEM },
3296 { "NOTE", -1, LoadLevel_NOTE },
3297 { "CUSX", -1, LoadLevel_CUSX },
3298 { "GRPX", -1, LoadLevel_GRPX },
3303 while (getFileChunkBE(file, chunk_name, &chunk_size))
3307 while (chunk_info[i].name != NULL &&
3308 !strEqual(chunk_name, chunk_info[i].name))
3311 if (chunk_info[i].name == NULL)
3313 Error(ERR_WARN, "unknown chunk '%s' in level file '%s'",
3314 chunk_name, filename);
3315 ReadUnusedBytesFromFile(file, chunk_size);
3317 else if (chunk_info[i].size != -1 &&
3318 chunk_info[i].size != chunk_size)
3320 Error(ERR_WARN, "wrong size (%d) of chunk '%s' in level file '%s'",
3321 chunk_size, chunk_name, filename);
3322 ReadUnusedBytesFromFile(file, chunk_size);
3326 /* call function to load this level chunk */
3327 int chunk_size_expected =
3328 (chunk_info[i].loader)(file, chunk_size, level);
3330 /* the size of some chunks cannot be checked before reading other
3331 chunks first (like "HEAD" and "BODY") that contain some header
3332 information, so check them here */
3333 if (chunk_size_expected != chunk_size)
3335 Error(ERR_WARN, "wrong size (%d) of chunk '%s' in level file '%s'",
3336 chunk_size, chunk_name, filename);
3346 /* ------------------------------------------------------------------------- */
3347 /* functions for loading EM level */
3348 /* ------------------------------------------------------------------------- */
3350 void CopyNativeLevel_RND_to_EM(struct LevelInfo *level)
3352 static int ball_xy[8][2] =
3363 struct LevelInfo_EM *level_em = level->native_em_level;
3364 struct LEVEL *lev = level_em->lev;
3365 struct PLAYER **ply = level_em->ply;
3368 lev->width = MIN(level->fieldx, EM_MAX_CAVE_WIDTH);
3369 lev->height = MIN(level->fieldy, EM_MAX_CAVE_HEIGHT);
3371 lev->time_seconds = level->time;
3372 lev->required_initial = level->gems_needed;
3374 lev->emerald_score = level->score[SC_EMERALD];
3375 lev->diamond_score = level->score[SC_DIAMOND];
3376 lev->alien_score = level->score[SC_ROBOT];
3377 lev->tank_score = level->score[SC_SPACESHIP];
3378 lev->bug_score = level->score[SC_BUG];
3379 lev->eater_score = level->score[SC_YAMYAM];
3380 lev->nut_score = level->score[SC_NUT];
3381 lev->dynamite_score = level->score[SC_DYNAMITE];
3382 lev->key_score = level->score[SC_KEY];
3383 lev->exit_score = level->score[SC_TIME_BONUS];
3385 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
3386 for (y = 0; y < 3; y++)
3387 for (x = 0; x < 3; x++)
3388 lev->eater_array[i][y * 3 + x] =
3389 map_element_RND_to_EM(level->yamyam_content[i].e[x][y]);
3391 lev->amoeba_time = level->amoeba_speed;
3392 lev->wonderwall_time_initial = level->time_magic_wall;
3393 lev->wheel_time = level->time_wheel;
3395 lev->android_move_time = level->android_move_time;
3396 lev->android_clone_time = level->android_clone_time;
3397 lev->ball_random = level->ball_random;
3398 lev->ball_state_initial = level->ball_state_initial;
3399 lev->ball_time = level->ball_time;
3400 lev->num_ball_arrays = level->num_ball_contents;
3402 lev->lenses_score = level->lenses_score;
3403 lev->magnify_score = level->magnify_score;
3404 lev->slurp_score = level->slurp_score;
3406 lev->lenses_time = level->lenses_time;
3407 lev->magnify_time = level->magnify_time;
3409 lev->wind_direction_initial =
3410 map_direction_RND_to_EM(level->wind_direction_initial);
3411 lev->wind_cnt_initial = (level->wind_direction_initial != MV_NONE ?
3412 lev->wind_time : 0);
3414 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
3415 for (j = 0; j < 8; j++)
3416 lev->ball_array[i][j] =
3417 map_element_RND_to_EM(level->
3418 ball_content[i].e[ball_xy[j][0]][ball_xy[j][1]]);
3420 map_android_clone_elements_RND_to_EM(level);
3422 /* first fill the complete playfield with the default border element */
3423 for (y = 0; y < EM_MAX_CAVE_HEIGHT; y++)
3424 for (x = 0; x < EM_MAX_CAVE_WIDTH; x++)
3425 level_em->cave[x][y] = ZBORDER;
3427 if (BorderElement == EL_STEELWALL)
3429 for (y = 0; y < lev->height + 2; y++)
3430 for (x = 0; x < lev->width + 2; x++)
3431 level_em->cave[x + 1][y + 1] = map_element_RND_to_EM(EL_STEELWALL);
3434 /* then copy the real level contents from level file into the playfield */
3435 for (y = 0; y < lev->height; y++) for (x = 0; x < lev->width; x++)
3437 int new_element = map_element_RND_to_EM(level->field[x][y]);
3438 int offset = (BorderElement == EL_STEELWALL ? 1 : 0);
3439 int xx = x + 1 + offset;
3440 int yy = y + 1 + offset;
3442 if (level->field[x][y] == EL_AMOEBA_DEAD)
3443 new_element = map_element_RND_to_EM(EL_AMOEBA_WET);
3445 level_em->cave[xx][yy] = new_element;
3448 for (i = 0; i < MAX_PLAYERS; i++)
3450 ply[i]->x_initial = 0;
3451 ply[i]->y_initial = 0;
3454 /* initialize player positions and delete players from the playfield */
3455 for (y = 0; y < lev->height; y++) for (x = 0; x < lev->width; x++)
3457 if (ELEM_IS_PLAYER(level->field[x][y]))
3459 int player_nr = GET_PLAYER_NR(level->field[x][y]);
3460 int offset = (BorderElement == EL_STEELWALL ? 1 : 0);
3461 int xx = x + 1 + offset;
3462 int yy = y + 1 + offset;
3464 ply[player_nr]->x_initial = xx;
3465 ply[player_nr]->y_initial = yy;
3467 level_em->cave[xx][yy] = map_element_RND_to_EM(EL_EMPTY);
3471 if (BorderElement == EL_STEELWALL)
3478 void CopyNativeLevel_EM_to_RND(struct LevelInfo *level)
3480 static int ball_xy[8][2] =
3491 struct LevelInfo_EM *level_em = level->native_em_level;
3492 struct LEVEL *lev = level_em->lev;
3493 struct PLAYER **ply = level_em->ply;
3496 level->fieldx = MIN(lev->width, MAX_LEV_FIELDX);
3497 level->fieldy = MIN(lev->height, MAX_LEV_FIELDY);
3499 level->time = lev->time_seconds;
3500 level->gems_needed = lev->required_initial;
3502 sprintf(level->name, "Level %d", level->file_info.nr);
3504 level->score[SC_EMERALD] = lev->emerald_score;
3505 level->score[SC_DIAMOND] = lev->diamond_score;
3506 level->score[SC_ROBOT] = lev->alien_score;
3507 level->score[SC_SPACESHIP] = lev->tank_score;
3508 level->score[SC_BUG] = lev->bug_score;
3509 level->score[SC_YAMYAM] = lev->eater_score;
3510 level->score[SC_NUT] = lev->nut_score;
3511 level->score[SC_DYNAMITE] = lev->dynamite_score;
3512 level->score[SC_KEY] = lev->key_score;
3513 level->score[SC_TIME_BONUS] = lev->exit_score;
3515 level->num_yamyam_contents = MAX_ELEMENT_CONTENTS;
3517 for (i = 0; i < level->num_yamyam_contents; i++)
3518 for (y = 0; y < 3; y++)
3519 for (x = 0; x < 3; x++)
3520 level->yamyam_content[i].e[x][y] =
3521 map_element_EM_to_RND(lev->eater_array[i][y * 3 + x]);
3523 level->amoeba_speed = lev->amoeba_time;
3524 level->time_magic_wall = lev->wonderwall_time_initial;
3525 level->time_wheel = lev->wheel_time;
3527 level->android_move_time = lev->android_move_time;
3528 level->android_clone_time = lev->android_clone_time;
3529 level->ball_random = lev->ball_random;
3530 level->ball_state_initial = lev->ball_state_initial;
3531 level->ball_time = lev->ball_time;
3532 level->num_ball_contents = lev->num_ball_arrays;
3534 level->lenses_score = lev->lenses_score;
3535 level->magnify_score = lev->magnify_score;
3536 level->slurp_score = lev->slurp_score;
3538 level->lenses_time = lev->lenses_time;
3539 level->magnify_time = lev->magnify_time;
3541 level->wind_direction_initial =
3542 map_direction_EM_to_RND(lev->wind_direction_initial);
3544 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
3545 for (j = 0; j < 8; j++)
3546 level->ball_content[i].e[ball_xy[j][0]][ball_xy[j][1]] =
3547 map_element_EM_to_RND(lev->ball_array[i][j]);
3549 map_android_clone_elements_EM_to_RND(level);
3551 /* convert the playfield (some elements need special treatment) */
3552 for (y = 0; y < level->fieldy; y++) for (x = 0; x < level->fieldx; x++)
3554 int new_element = map_element_EM_to_RND(level_em->cave[x + 1][y + 1]);
3556 if (new_element == EL_AMOEBA_WET && level->amoeba_speed == 0)
3557 new_element = EL_AMOEBA_DEAD;
3559 level->field[x][y] = new_element;
3562 for (i = 0; i < MAX_PLAYERS; i++)
3564 /* in case of all players set to the same field, use the first player */
3565 int nr = MAX_PLAYERS - i - 1;
3566 int jx = ply[nr]->x_initial - 1;
3567 int jy = ply[nr]->y_initial - 1;
3569 if (jx != -1 && jy != -1)
3570 level->field[jx][jy] = EL_PLAYER_1 + nr;
3575 /* ------------------------------------------------------------------------- */
3576 /* functions for loading SP level */
3577 /* ------------------------------------------------------------------------- */
3579 void CopyNativeLevel_RND_to_SP(struct LevelInfo *level)
3581 struct LevelInfo_SP *level_sp = level->native_sp_level;
3582 LevelInfoType *header = &level_sp->header;
3585 level_sp->width = level->fieldx;
3586 level_sp->height = level->fieldy;
3588 for (x = 0; x < level->fieldx; x++)
3589 for (y = 0; y < level->fieldy; y++)
3590 level_sp->playfield[x][y] = map_element_RND_to_SP(level->field[x][y]);
3592 header->InitialGravity = (level->initial_player_gravity[0] ? 1 : 0);
3594 for (i = 0; i < SP_LEVEL_NAME_LEN; i++)
3595 header->LevelTitle[i] = level->name[i];
3596 /* !!! NO STRING TERMINATION IN SUPAPLEX VB CODE YET -- FIX THIS !!! */
3598 header->InfotronsNeeded = level->gems_needed;
3600 header->SpecialPortCount = 0;
3602 for (x = 0; x < level->fieldx; x++) for (y = 0; y < level->fieldy; y++)
3604 boolean gravity_port_found = FALSE;
3605 boolean gravity_port_valid = FALSE;
3606 int gravity_port_flag;
3607 int gravity_port_base_element;
3608 int element = level->field[x][y];
3610 if (element >= EL_SP_GRAVITY_ON_PORT_RIGHT &&
3611 element <= EL_SP_GRAVITY_ON_PORT_UP)
3613 gravity_port_found = TRUE;
3614 gravity_port_valid = TRUE;
3615 gravity_port_flag = 1;
3616 gravity_port_base_element = EL_SP_GRAVITY_ON_PORT_RIGHT;
3618 else if (element >= EL_SP_GRAVITY_OFF_PORT_RIGHT &&
3619 element <= EL_SP_GRAVITY_OFF_PORT_UP)
3621 gravity_port_found = TRUE;
3622 gravity_port_valid = TRUE;
3623 gravity_port_flag = 0;
3624 gravity_port_base_element = EL_SP_GRAVITY_OFF_PORT_RIGHT;
3626 else if (element >= EL_SP_GRAVITY_PORT_RIGHT &&
3627 element <= EL_SP_GRAVITY_PORT_UP)
3629 /* change R'n'D style gravity inverting special port to normal port
3630 (there are no gravity inverting ports in native Supaplex engine) */
3632 gravity_port_found = TRUE;
3633 gravity_port_valid = FALSE;
3634 gravity_port_base_element = EL_SP_GRAVITY_PORT_RIGHT;
3637 if (gravity_port_found)
3639 if (gravity_port_valid &&
3640 header->SpecialPortCount < SP_MAX_SPECIAL_PORTS)
3642 SpecialPortType *port = &header->SpecialPort[header->SpecialPortCount];
3644 port->PortLocation = (y * level->fieldx + x) * 2;
3645 port->Gravity = gravity_port_flag;
3647 element += EL_SP_GRAVITY_PORT_RIGHT - gravity_port_base_element;
3649 header->SpecialPortCount++;
3653 /* change special gravity port to normal port */
3655 element += EL_SP_PORT_RIGHT - gravity_port_base_element;
3658 level_sp->playfield[x][y] = element - EL_SP_START;
3663 void CopyNativeLevel_SP_to_RND(struct LevelInfo *level)
3665 struct LevelInfo_SP *level_sp = level->native_sp_level;
3666 LevelInfoType *header = &level_sp->header;
3669 level->fieldx = level_sp->width;
3670 level->fieldy = level_sp->height;
3672 for (x = 0; x < level->fieldx; x++)
3674 for (y = 0; y < level->fieldy; y++)
3676 int element_old = level_sp->playfield[x][y];
3677 int element_new = getMappedElement(map_element_SP_to_RND(element_old));
3679 if (element_new == EL_UNKNOWN)
3680 Error(ERR_WARN, "invalid element %d at position %d, %d",
3683 level->field[x][y] = element_new;
3687 for (i = 0; i < MAX_PLAYERS; i++)
3688 level->initial_player_gravity[i] =
3689 (header->InitialGravity == 1 ? TRUE : FALSE);
3691 for (i = 0; i < SP_LEVEL_NAME_LEN; i++)
3692 level->name[i] = header->LevelTitle[i];
3693 level->name[SP_LEVEL_NAME_LEN] = '\0';
3695 level->gems_needed = header->InfotronsNeeded;
3697 for (i = 0; i < header->SpecialPortCount; i++)
3699 SpecialPortType *port = &header->SpecialPort[i];
3700 int port_location = port->PortLocation;
3701 int gravity = port->Gravity;
3702 int port_x, port_y, port_element;
3704 port_x = (port_location / 2) % level->fieldx;
3705 port_y = (port_location / 2) / level->fieldx;
3707 if (port_x < 0 || port_x >= level->fieldx ||
3708 port_y < 0 || port_y >= level->fieldy)
3710 Error(ERR_WARN, "special port position (%d, %d) out of bounds",
3716 port_element = level->field[port_x][port_y];
3718 if (port_element < EL_SP_GRAVITY_PORT_RIGHT ||
3719 port_element > EL_SP_GRAVITY_PORT_UP)
3721 Error(ERR_WARN, "no special port at position (%d, %d)", port_x, port_y);
3726 /* change previous (wrong) gravity inverting special port to either
3727 gravity enabling special port or gravity disabling special port */
3728 level->field[port_x][port_y] +=
3729 (gravity == 1 ? EL_SP_GRAVITY_ON_PORT_RIGHT :
3730 EL_SP_GRAVITY_OFF_PORT_RIGHT) - EL_SP_GRAVITY_PORT_RIGHT;
3733 /* change special gravity ports without database entries to normal ports */
3734 for (x = 0; x < level->fieldx; x++)
3735 for (y = 0; y < level->fieldy; y++)
3736 if (level->field[x][y] >= EL_SP_GRAVITY_PORT_RIGHT &&
3737 level->field[x][y] <= EL_SP_GRAVITY_PORT_UP)
3738 level->field[x][y] += EL_SP_PORT_RIGHT - EL_SP_GRAVITY_PORT_RIGHT;
3740 level->time = 0; /* no time limit */
3741 level->amoeba_speed = 0;
3742 level->time_magic_wall = 0;
3743 level->time_wheel = 0;
3744 level->amoeba_content = EL_EMPTY;
3747 /* original Supaplex does not use score values -- use default values */
3749 for (i = 0; i < LEVEL_SCORE_ELEMENTS; i++)
3750 level->score[i] = 0;
3753 /* there are no yamyams in supaplex levels */
3754 for (i = 0; i < level->num_yamyam_contents; i++)
3755 for (x = 0; x < 3; x++)
3756 for (y = 0; y < 3; y++)
3757 level->yamyam_content[i].e[x][y] = EL_EMPTY;
3760 static void CopyNativeTape_RND_to_SP(struct LevelInfo *level)
3762 struct LevelInfo_SP *level_sp = level->native_sp_level;
3763 struct DemoInfo_SP *demo = &level_sp->demo;
3766 /* always start with reliable default values */
3767 demo->is_available = FALSE;
3770 if (TAPE_IS_EMPTY(tape))
3773 demo->level_nr = tape.level_nr; /* (currently not used) */
3775 level_sp->header.DemoRandomSeed = tape.random_seed;
3778 for (i = 0; i < tape.length; i++)
3780 int demo_action = map_key_RND_to_SP(tape.pos[i].action[0]);
3781 int demo_repeat = tape.pos[i].delay;
3783 for (j = 0; j < demo_repeat / 16; j++)
3784 demo->data[demo->length++] = 0xf0 | demo_action;
3786 if (demo_repeat % 16)
3787 demo->data[demo->length++] = ((demo_repeat % 16 - 1) << 4) | demo_action;
3790 demo->data[demo->length++] = 0xff;
3792 demo->is_available = TRUE;
3795 static void setTapeInfoToDefaults();
3797 static void CopyNativeTape_SP_to_RND(struct LevelInfo *level)
3799 struct LevelInfo_SP *level_sp = level->native_sp_level;
3800 struct DemoInfo_SP *demo = &level_sp->demo;
3801 char *filename = level->file_info.filename;
3804 /* always start with reliable default values */
3805 setTapeInfoToDefaults();
3807 if (!demo->is_available)
3810 tape.level_nr = demo->level_nr; /* (currently not used) */
3811 tape.length = demo->length - 1; /* without "end of demo" byte */
3812 tape.random_seed = level_sp->header.DemoRandomSeed;
3814 TapeSetDateFromEpochSeconds(getFileTimestampEpochSeconds(filename));
3816 for (i = 0; i < demo->length - 1; i++)
3818 int demo_action = demo->data[i] & 0x0f;
3819 int demo_repeat = (demo->data[i] & 0xf0) >> 4;
3821 tape.pos[i].action[0] = map_key_SP_to_RND(demo_action);
3822 tape.pos[i].delay = demo_repeat + 1;
3825 tape.length_frames = GetTapeLengthFrames();
3826 tape.length_seconds = GetTapeLengthSeconds();
3830 /* ------------------------------------------------------------------------- */
3831 /* functions for loading DC level */
3832 /* ------------------------------------------------------------------------- */
3834 #define DC_LEVEL_HEADER_SIZE 344
3836 unsigned short getDecodedWord_DC(unsigned short data_encoded, boolean init)
3838 static int last_data_encoded;
3842 int diff_hi, diff_lo;
3843 int data_hi, data_lo;
3844 unsigned short data_decoded;
3848 last_data_encoded = 0;
3855 diff = data_encoded - last_data_encoded;
3856 diff_hi = diff & ~0xff;
3857 diff_lo = diff & 0xff;
3861 data_hi = diff_hi - (offset1 << 8) + (offset2 & 0xff00);
3862 data_lo = (diff_lo + (data_hi >> 16)) & 0x00ff;
3863 data_hi = data_hi & 0xff00;
3865 data_decoded = data_hi | data_lo;
3867 last_data_encoded = data_encoded;
3869 offset1 = (offset1 + 1) % 31;
3870 offset2 = offset2 & 0xff;
3872 return data_decoded;
3875 int getMappedElement_DC(int element)
3883 /* 0x0117 - 0x036e: (?) */
3886 /* 0x042d - 0x0684: (?) */
3902 element = EL_CRYSTAL;
3905 case 0x0e77: /* quicksand (boulder) */
3906 element = EL_QUICKSAND_FAST_FULL;
3909 case 0x0e99: /* slow quicksand (boulder) */
3910 element = EL_QUICKSAND_FULL;
3914 element = EL_EM_EXIT_OPEN;
3918 element = EL_EM_EXIT_CLOSED;
3922 element = EL_EM_STEEL_EXIT_OPEN;
3926 element = EL_EM_STEEL_EXIT_CLOSED;
3929 case 0x0f4f: /* dynamite (lit 1) */
3930 element = EL_EM_DYNAMITE_ACTIVE;
3933 case 0x0f57: /* dynamite (lit 2) */
3934 element = EL_EM_DYNAMITE_ACTIVE;
3937 case 0x0f5f: /* dynamite (lit 3) */
3938 element = EL_EM_DYNAMITE_ACTIVE;
3941 case 0x0f67: /* dynamite (lit 4) */
3942 element = EL_EM_DYNAMITE_ACTIVE;
3949 element = EL_AMOEBA_WET;
3953 element = EL_AMOEBA_DROP;
3957 element = EL_DC_MAGIC_WALL;
3961 element = EL_SPACESHIP_UP;
3965 element = EL_SPACESHIP_DOWN;
3969 element = EL_SPACESHIP_LEFT;
3973 element = EL_SPACESHIP_RIGHT;
3977 element = EL_BUG_UP;
3981 element = EL_BUG_DOWN;
3985 element = EL_BUG_LEFT;
3989 element = EL_BUG_RIGHT;
3993 element = EL_MOLE_UP;
3997 element = EL_MOLE_DOWN;
4001 element = EL_MOLE_LEFT;
4005 element = EL_MOLE_RIGHT;
4013 element = EL_YAMYAM;
4017 element = EL_SWITCHGATE_OPEN;
4021 element = EL_SWITCHGATE_CLOSED;
4025 element = EL_DC_SWITCHGATE_SWITCH_UP;
4029 element = EL_TIMEGATE_CLOSED;
4032 case 0x144c: /* conveyor belt switch (green) */
4033 element = EL_CONVEYOR_BELT_3_SWITCH_MIDDLE;
4036 case 0x144f: /* conveyor belt switch (red) */
4037 element = EL_CONVEYOR_BELT_1_SWITCH_MIDDLE;
4040 case 0x1452: /* conveyor belt switch (blue) */
4041 element = EL_CONVEYOR_BELT_4_SWITCH_MIDDLE;
4045 element = EL_CONVEYOR_BELT_3_MIDDLE;
4049 element = EL_CONVEYOR_BELT_3_LEFT;
4053 element = EL_CONVEYOR_BELT_3_RIGHT;
4057 element = EL_CONVEYOR_BELT_1_MIDDLE;
4061 element = EL_CONVEYOR_BELT_1_LEFT;
4065 element = EL_CONVEYOR_BELT_1_RIGHT;
4069 element = EL_CONVEYOR_BELT_4_MIDDLE;
4073 element = EL_CONVEYOR_BELT_4_LEFT;
4077 element = EL_CONVEYOR_BELT_4_RIGHT;
4081 element = EL_EXPANDABLE_WALL_HORIZONTAL;
4085 element = EL_EXPANDABLE_WALL_VERTICAL;
4089 element = EL_EXPANDABLE_WALL_ANY;
4092 case 0x14ce: /* growing steel wall (left/right) */
4093 element = EL_EXPANDABLE_STEELWALL_HORIZONTAL;
4096 case 0x14df: /* growing steel wall (up/down) */
4097 element = EL_EXPANDABLE_STEELWALL_VERTICAL;
4100 case 0x14e8: /* growing steel wall (up/down/left/right) */
4101 element = EL_EXPANDABLE_STEELWALL_ANY;
4105 element = EL_SHIELD_DEADLY;
4109 element = EL_EXTRA_TIME;
4117 element = EL_EMPTY_SPACE;
4120 case 0x1578: /* quicksand (empty) */
4121 element = EL_QUICKSAND_FAST_EMPTY;
4124 case 0x1579: /* slow quicksand (empty) */
4125 element = EL_QUICKSAND_EMPTY;
4128 /* 0x157c - 0x158b: */
4131 /* 0x1590 - 0x159f: */
4132 /* EL_DC_LANDMINE */
4135 element = EL_EM_DYNAMITE;
4138 case 0x15a1: /* key (red) */
4139 element = EL_EM_KEY_1;
4142 case 0x15a2: /* key (yellow) */
4143 element = EL_EM_KEY_2;
4146 case 0x15a3: /* key (blue) */
4147 element = EL_EM_KEY_4;
4150 case 0x15a4: /* key (green) */
4151 element = EL_EM_KEY_3;
4154 case 0x15a5: /* key (white) */
4155 element = EL_DC_KEY_WHITE;
4159 element = EL_WALL_SLIPPERY;
4166 case 0x15a8: /* wall (not round) */
4170 case 0x15a9: /* (blue) */
4171 element = EL_CHAR_A;
4174 case 0x15aa: /* (blue) */
4175 element = EL_CHAR_B;
4178 case 0x15ab: /* (blue) */
4179 element = EL_CHAR_C;
4182 case 0x15ac: /* (blue) */
4183 element = EL_CHAR_D;
4186 case 0x15ad: /* (blue) */
4187 element = EL_CHAR_E;
4190 case 0x15ae: /* (blue) */
4191 element = EL_CHAR_F;
4194 case 0x15af: /* (blue) */
4195 element = EL_CHAR_G;
4198 case 0x15b0: /* (blue) */
4199 element = EL_CHAR_H;
4202 case 0x15b1: /* (blue) */
4203 element = EL_CHAR_I;
4206 case 0x15b2: /* (blue) */
4207 element = EL_CHAR_J;
4210 case 0x15b3: /* (blue) */
4211 element = EL_CHAR_K;
4214 case 0x15b4: /* (blue) */
4215 element = EL_CHAR_L;
4218 case 0x15b5: /* (blue) */
4219 element = EL_CHAR_M;
4222 case 0x15b6: /* (blue) */
4223 element = EL_CHAR_N;
4226 case 0x15b7: /* (blue) */
4227 element = EL_CHAR_O;
4230 case 0x15b8: /* (blue) */
4231 element = EL_CHAR_P;
4234 case 0x15b9: /* (blue) */
4235 element = EL_CHAR_Q;
4238 case 0x15ba: /* (blue) */
4239 element = EL_CHAR_R;
4242 case 0x15bb: /* (blue) */
4243 element = EL_CHAR_S;
4246 case 0x15bc: /* (blue) */
4247 element = EL_CHAR_T;
4250 case 0x15bd: /* (blue) */
4251 element = EL_CHAR_U;
4254 case 0x15be: /* (blue) */
4255 element = EL_CHAR_V;
4258 case 0x15bf: /* (blue) */
4259 element = EL_CHAR_W;
4262 case 0x15c0: /* (blue) */
4263 element = EL_CHAR_X;
4266 case 0x15c1: /* (blue) */
4267 element = EL_CHAR_Y;
4270 case 0x15c2: /* (blue) */
4271 element = EL_CHAR_Z;
4274 case 0x15c3: /* (blue) */
4275 element = EL_CHAR_AUMLAUT;
4278 case 0x15c4: /* (blue) */
4279 element = EL_CHAR_OUMLAUT;
4282 case 0x15c5: /* (blue) */
4283 element = EL_CHAR_UUMLAUT;
4286 case 0x15c6: /* (blue) */
4287 element = EL_CHAR_0;
4290 case 0x15c7: /* (blue) */
4291 element = EL_CHAR_1;
4294 case 0x15c8: /* (blue) */
4295 element = EL_CHAR_2;
4298 case 0x15c9: /* (blue) */
4299 element = EL_CHAR_3;
4302 case 0x15ca: /* (blue) */
4303 element = EL_CHAR_4;
4306 case 0x15cb: /* (blue) */
4307 element = EL_CHAR_5;
4310 case 0x15cc: /* (blue) */
4311 element = EL_CHAR_6;
4314 case 0x15cd: /* (blue) */
4315 element = EL_CHAR_7;
4318 case 0x15ce: /* (blue) */
4319 element = EL_CHAR_8;
4322 case 0x15cf: /* (blue) */
4323 element = EL_CHAR_9;
4326 case 0x15d0: /* (blue) */
4327 element = EL_CHAR_PERIOD;
4330 case 0x15d1: /* (blue) */
4331 element = EL_CHAR_EXCLAM;
4334 case 0x15d2: /* (blue) */
4335 element = EL_CHAR_COLON;
4338 case 0x15d3: /* (blue) */
4339 element = EL_CHAR_LESS;
4342 case 0x15d4: /* (blue) */
4343 element = EL_CHAR_GREATER;
4346 case 0x15d5: /* (blue) */
4347 element = EL_CHAR_QUESTION;
4350 case 0x15d6: /* (blue) */
4351 element = EL_CHAR_COPYRIGHT;
4354 case 0x15d7: /* (blue) */
4355 element = EL_CHAR_UP;
4358 case 0x15d8: /* (blue) */
4359 element = EL_CHAR_DOWN;
4362 case 0x15d9: /* (blue) */
4363 element = EL_CHAR_BUTTON;
4366 case 0x15da: /* (blue) */
4367 element = EL_CHAR_PLUS;
4370 case 0x15db: /* (blue) */
4371 element = EL_CHAR_MINUS;
4374 case 0x15dc: /* (blue) */
4375 element = EL_CHAR_APOSTROPHE;
4378 case 0x15dd: /* (blue) */
4379 element = EL_CHAR_PARENLEFT;
4382 case 0x15de: /* (blue) */
4383 element = EL_CHAR_PARENRIGHT;
4386 case 0x15df: /* (green) */
4387 element = EL_CHAR_A;
4390 case 0x15e0: /* (green) */
4391 element = EL_CHAR_B;
4394 case 0x15e1: /* (green) */
4395 element = EL_CHAR_C;
4398 case 0x15e2: /* (green) */
4399 element = EL_CHAR_D;
4402 case 0x15e3: /* (green) */
4403 element = EL_CHAR_E;
4406 case 0x15e4: /* (green) */
4407 element = EL_CHAR_F;
4410 case 0x15e5: /* (green) */
4411 element = EL_CHAR_G;
4414 case 0x15e6: /* (green) */
4415 element = EL_CHAR_H;
4418 case 0x15e7: /* (green) */
4419 element = EL_CHAR_I;
4422 case 0x15e8: /* (green) */
4423 element = EL_CHAR_J;
4426 case 0x15e9: /* (green) */
4427 element = EL_CHAR_K;
4430 case 0x15ea: /* (green) */
4431 element = EL_CHAR_L;
4434 case 0x15eb: /* (green) */
4435 element = EL_CHAR_M;
4438 case 0x15ec: /* (green) */
4439 element = EL_CHAR_N;
4442 case 0x15ed: /* (green) */
4443 element = EL_CHAR_O;
4446 case 0x15ee: /* (green) */
4447 element = EL_CHAR_P;
4450 case 0x15ef: /* (green) */
4451 element = EL_CHAR_Q;
4454 case 0x15f0: /* (green) */
4455 element = EL_CHAR_R;
4458 case 0x15f1: /* (green) */
4459 element = EL_CHAR_S;
4462 case 0x15f2: /* (green) */
4463 element = EL_CHAR_T;
4466 case 0x15f3: /* (green) */
4467 element = EL_CHAR_U;
4470 case 0x15f4: /* (green) */
4471 element = EL_CHAR_V;
4474 case 0x15f5: /* (green) */
4475 element = EL_CHAR_W;
4478 case 0x15f6: /* (green) */
4479 element = EL_CHAR_X;
4482 case 0x15f7: /* (green) */
4483 element = EL_CHAR_Y;
4486 case 0x15f8: /* (green) */
4487 element = EL_CHAR_Z;
4490 case 0x15f9: /* (green) */
4491 element = EL_CHAR_AUMLAUT;
4494 case 0x15fa: /* (green) */
4495 element = EL_CHAR_OUMLAUT;
4498 case 0x15fb: /* (green) */
4499 element = EL_CHAR_UUMLAUT;
4502 case 0x15fc: /* (green) */
4503 element = EL_CHAR_0;
4506 case 0x15fd: /* (green) */
4507 element = EL_CHAR_1;
4510 case 0x15fe: /* (green) */
4511 element = EL_CHAR_2;
4514 case 0x15ff: /* (green) */
4515 element = EL_CHAR_3;
4518 case 0x1600: /* (green) */
4519 element = EL_CHAR_4;
4522 case 0x1601: /* (green) */
4523 element = EL_CHAR_5;
4526 case 0x1602: /* (green) */
4527 element = EL_CHAR_6;
4530 case 0x1603: /* (green) */
4531 element = EL_CHAR_7;
4534 case 0x1604: /* (green) */
4535 element = EL_CHAR_8;
4538 case 0x1605: /* (green) */
4539 element = EL_CHAR_9;
4542 case 0x1606: /* (green) */
4543 element = EL_CHAR_PERIOD;
4546 case 0x1607: /* (green) */
4547 element = EL_CHAR_EXCLAM;
4550 case 0x1608: /* (green) */
4551 element = EL_CHAR_COLON;
4554 case 0x1609: /* (green) */
4555 element = EL_CHAR_LESS;
4558 case 0x160a: /* (green) */
4559 element = EL_CHAR_GREATER;
4562 case 0x160b: /* (green) */
4563 element = EL_CHAR_QUESTION;
4566 case 0x160c: /* (green) */
4567 element = EL_CHAR_COPYRIGHT;
4570 case 0x160d: /* (green) */
4571 element = EL_CHAR_UP;
4574 case 0x160e: /* (green) */
4575 element = EL_CHAR_DOWN;
4578 case 0x160f: /* (green) */
4579 element = EL_CHAR_BUTTON;
4582 case 0x1610: /* (green) */
4583 element = EL_CHAR_PLUS;
4586 case 0x1611: /* (green) */
4587 element = EL_CHAR_MINUS;
4590 case 0x1612: /* (green) */
4591 element = EL_CHAR_APOSTROPHE;
4594 case 0x1613: /* (green) */
4595 element = EL_CHAR_PARENLEFT;
4598 case 0x1614: /* (green) */
4599 element = EL_CHAR_PARENRIGHT;
4602 case 0x1615: /* (blue steel) */
4603 element = EL_STEEL_CHAR_A;
4606 case 0x1616: /* (blue steel) */
4607 element = EL_STEEL_CHAR_B;
4610 case 0x1617: /* (blue steel) */
4611 element = EL_STEEL_CHAR_C;
4614 case 0x1618: /* (blue steel) */
4615 element = EL_STEEL_CHAR_D;
4618 case 0x1619: /* (blue steel) */
4619 element = EL_STEEL_CHAR_E;
4622 case 0x161a: /* (blue steel) */
4623 element = EL_STEEL_CHAR_F;
4626 case 0x161b: /* (blue steel) */
4627 element = EL_STEEL_CHAR_G;
4630 case 0x161c: /* (blue steel) */
4631 element = EL_STEEL_CHAR_H;
4634 case 0x161d: /* (blue steel) */
4635 element = EL_STEEL_CHAR_I;
4638 case 0x161e: /* (blue steel) */
4639 element = EL_STEEL_CHAR_J;
4642 case 0x161f: /* (blue steel) */
4643 element = EL_STEEL_CHAR_K;
4646 case 0x1620: /* (blue steel) */
4647 element = EL_STEEL_CHAR_L;
4650 case 0x1621: /* (blue steel) */
4651 element = EL_STEEL_CHAR_M;
4654 case 0x1622: /* (blue steel) */
4655 element = EL_STEEL_CHAR_N;
4658 case 0x1623: /* (blue steel) */
4659 element = EL_STEEL_CHAR_O;
4662 case 0x1624: /* (blue steel) */
4663 element = EL_STEEL_CHAR_P;
4666 case 0x1625: /* (blue steel) */
4667 element = EL_STEEL_CHAR_Q;
4670 case 0x1626: /* (blue steel) */
4671 element = EL_STEEL_CHAR_R;
4674 case 0x1627: /* (blue steel) */
4675 element = EL_STEEL_CHAR_S;
4678 case 0x1628: /* (blue steel) */
4679 element = EL_STEEL_CHAR_T;
4682 case 0x1629: /* (blue steel) */
4683 element = EL_STEEL_CHAR_U;
4686 case 0x162a: /* (blue steel) */
4687 element = EL_STEEL_CHAR_V;
4690 case 0x162b: /* (blue steel) */
4691 element = EL_STEEL_CHAR_W;
4694 case 0x162c: /* (blue steel) */
4695 element = EL_STEEL_CHAR_X;
4698 case 0x162d: /* (blue steel) */
4699 element = EL_STEEL_CHAR_Y;
4702 case 0x162e: /* (blue steel) */
4703 element = EL_STEEL_CHAR_Z;
4706 case 0x162f: /* (blue steel) */
4707 element = EL_STEEL_CHAR_AUMLAUT;
4710 case 0x1630: /* (blue steel) */
4711 element = EL_STEEL_CHAR_OUMLAUT;
4714 case 0x1631: /* (blue steel) */
4715 element = EL_STEEL_CHAR_UUMLAUT;
4718 case 0x1632: /* (blue steel) */
4719 element = EL_STEEL_CHAR_0;
4722 case 0x1633: /* (blue steel) */
4723 element = EL_STEEL_CHAR_1;
4726 case 0x1634: /* (blue steel) */
4727 element = EL_STEEL_CHAR_2;
4730 case 0x1635: /* (blue steel) */
4731 element = EL_STEEL_CHAR_3;
4734 case 0x1636: /* (blue steel) */
4735 element = EL_STEEL_CHAR_4;
4738 case 0x1637: /* (blue steel) */
4739 element = EL_STEEL_CHAR_5;
4742 case 0x1638: /* (blue steel) */
4743 element = EL_STEEL_CHAR_6;
4746 case 0x1639: /* (blue steel) */
4747 element = EL_STEEL_CHAR_7;
4750 case 0x163a: /* (blue steel) */
4751 element = EL_STEEL_CHAR_8;
4754 case 0x163b: /* (blue steel) */
4755 element = EL_STEEL_CHAR_9;
4758 case 0x163c: /* (blue steel) */
4759 element = EL_STEEL_CHAR_PERIOD;
4762 case 0x163d: /* (blue steel) */
4763 element = EL_STEEL_CHAR_EXCLAM;
4766 case 0x163e: /* (blue steel) */
4767 element = EL_STEEL_CHAR_COLON;
4770 case 0x163f: /* (blue steel) */
4771 element = EL_STEEL_CHAR_LESS;
4774 case 0x1640: /* (blue steel) */
4775 element = EL_STEEL_CHAR_GREATER;
4778 case 0x1641: /* (blue steel) */
4779 element = EL_STEEL_CHAR_QUESTION;
4782 case 0x1642: /* (blue steel) */
4783 element = EL_STEEL_CHAR_COPYRIGHT;
4786 case 0x1643: /* (blue steel) */
4787 element = EL_STEEL_CHAR_UP;
4790 case 0x1644: /* (blue steel) */
4791 element = EL_STEEL_CHAR_DOWN;
4794 case 0x1645: /* (blue steel) */
4795 element = EL_STEEL_CHAR_BUTTON;
4798 case 0x1646: /* (blue steel) */
4799 element = EL_STEEL_CHAR_PLUS;
4802 case 0x1647: /* (blue steel) */
4803 element = EL_STEEL_CHAR_MINUS;
4806 case 0x1648: /* (blue steel) */
4807 element = EL_STEEL_CHAR_APOSTROPHE;
4810 case 0x1649: /* (blue steel) */
4811 element = EL_STEEL_CHAR_PARENLEFT;
4814 case 0x164a: /* (blue steel) */
4815 element = EL_STEEL_CHAR_PARENRIGHT;
4818 case 0x164b: /* (green steel) */
4819 element = EL_STEEL_CHAR_A;
4822 case 0x164c: /* (green steel) */
4823 element = EL_STEEL_CHAR_B;
4826 case 0x164d: /* (green steel) */
4827 element = EL_STEEL_CHAR_C;
4830 case 0x164e: /* (green steel) */
4831 element = EL_STEEL_CHAR_D;
4834 case 0x164f: /* (green steel) */
4835 element = EL_STEEL_CHAR_E;
4838 case 0x1650: /* (green steel) */
4839 element = EL_STEEL_CHAR_F;
4842 case 0x1651: /* (green steel) */
4843 element = EL_STEEL_CHAR_G;
4846 case 0x1652: /* (green steel) */
4847 element = EL_STEEL_CHAR_H;
4850 case 0x1653: /* (green steel) */
4851 element = EL_STEEL_CHAR_I;
4854 case 0x1654: /* (green steel) */
4855 element = EL_STEEL_CHAR_J;
4858 case 0x1655: /* (green steel) */
4859 element = EL_STEEL_CHAR_K;
4862 case 0x1656: /* (green steel) */
4863 element = EL_STEEL_CHAR_L;
4866 case 0x1657: /* (green steel) */
4867 element = EL_STEEL_CHAR_M;
4870 case 0x1658: /* (green steel) */
4871 element = EL_STEEL_CHAR_N;
4874 case 0x1659: /* (green steel) */
4875 element = EL_STEEL_CHAR_O;
4878 case 0x165a: /* (green steel) */
4879 element = EL_STEEL_CHAR_P;
4882 case 0x165b: /* (green steel) */
4883 element = EL_STEEL_CHAR_Q;
4886 case 0x165c: /* (green steel) */
4887 element = EL_STEEL_CHAR_R;
4890 case 0x165d: /* (green steel) */
4891 element = EL_STEEL_CHAR_S;
4894 case 0x165e: /* (green steel) */
4895 element = EL_STEEL_CHAR_T;
4898 case 0x165f: /* (green steel) */
4899 element = EL_STEEL_CHAR_U;
4902 case 0x1660: /* (green steel) */
4903 element = EL_STEEL_CHAR_V;
4906 case 0x1661: /* (green steel) */
4907 element = EL_STEEL_CHAR_W;
4910 case 0x1662: /* (green steel) */
4911 element = EL_STEEL_CHAR_X;
4914 case 0x1663: /* (green steel) */
4915 element = EL_STEEL_CHAR_Y;
4918 case 0x1664: /* (green steel) */
4919 element = EL_STEEL_CHAR_Z;
4922 case 0x1665: /* (green steel) */
4923 element = EL_STEEL_CHAR_AUMLAUT;
4926 case 0x1666: /* (green steel) */
4927 element = EL_STEEL_CHAR_OUMLAUT;
4930 case 0x1667: /* (green steel) */
4931 element = EL_STEEL_CHAR_UUMLAUT;
4934 case 0x1668: /* (green steel) */
4935 element = EL_STEEL_CHAR_0;
4938 case 0x1669: /* (green steel) */
4939 element = EL_STEEL_CHAR_1;
4942 case 0x166a: /* (green steel) */
4943 element = EL_STEEL_CHAR_2;
4946 case 0x166b: /* (green steel) */
4947 element = EL_STEEL_CHAR_3;
4950 case 0x166c: /* (green steel) */
4951 element = EL_STEEL_CHAR_4;
4954 case 0x166d: /* (green steel) */
4955 element = EL_STEEL_CHAR_5;
4958 case 0x166e: /* (green steel) */
4959 element = EL_STEEL_CHAR_6;
4962 case 0x166f: /* (green steel) */
4963 element = EL_STEEL_CHAR_7;
4966 case 0x1670: /* (green steel) */
4967 element = EL_STEEL_CHAR_8;
4970 case 0x1671: /* (green steel) */
4971 element = EL_STEEL_CHAR_9;
4974 case 0x1672: /* (green steel) */
4975 element = EL_STEEL_CHAR_PERIOD;
4978 case 0x1673: /* (green steel) */
4979 element = EL_STEEL_CHAR_EXCLAM;
4982 case 0x1674: /* (green steel) */
4983 element = EL_STEEL_CHAR_COLON;
4986 case 0x1675: /* (green steel) */
4987 element = EL_STEEL_CHAR_LESS;
4990 case 0x1676: /* (green steel) */
4991 element = EL_STEEL_CHAR_GREATER;
4994 case 0x1677: /* (green steel) */
4995 element = EL_STEEL_CHAR_QUESTION;
4998 case 0x1678: /* (green steel) */
4999 element = EL_STEEL_CHAR_COPYRIGHT;
5002 case 0x1679: /* (green steel) */
5003 element = EL_STEEL_CHAR_UP;
5006 case 0x167a: /* (green steel) */
5007 element = EL_STEEL_CHAR_DOWN;
5010 case 0x167b: /* (green steel) */
5011 element = EL_STEEL_CHAR_BUTTON;
5014 case 0x167c: /* (green steel) */
5015 element = EL_STEEL_CHAR_PLUS;
5018 case 0x167d: /* (green steel) */
5019 element = EL_STEEL_CHAR_MINUS;
5022 case 0x167e: /* (green steel) */
5023 element = EL_STEEL_CHAR_APOSTROPHE;
5026 case 0x167f: /* (green steel) */
5027 element = EL_STEEL_CHAR_PARENLEFT;
5030 case 0x1680: /* (green steel) */
5031 element = EL_STEEL_CHAR_PARENRIGHT;
5034 case 0x1681: /* gate (red) */
5035 element = EL_EM_GATE_1;
5038 case 0x1682: /* secret gate (red) */
5039 element = EL_GATE_1_GRAY;
5042 case 0x1683: /* gate (yellow) */
5043 element = EL_EM_GATE_2;
5046 case 0x1684: /* secret gate (yellow) */
5047 element = EL_GATE_2_GRAY;
5050 case 0x1685: /* gate (blue) */
5051 element = EL_EM_GATE_4;
5054 case 0x1686: /* secret gate (blue) */
5055 element = EL_GATE_4_GRAY;
5058 case 0x1687: /* gate (green) */
5059 element = EL_EM_GATE_3;
5062 case 0x1688: /* secret gate (green) */
5063 element = EL_GATE_3_GRAY;
5066 case 0x1689: /* gate (white) */
5067 element = EL_DC_GATE_WHITE;
5070 case 0x168a: /* secret gate (white) */
5071 element = EL_DC_GATE_WHITE_GRAY;
5074 case 0x168b: /* secret gate (no key) */
5075 element = EL_DC_GATE_FAKE_GRAY;
5079 element = EL_ROBOT_WHEEL;
5083 element = EL_DC_TIMEGATE_SWITCH;
5087 element = EL_ACID_POOL_BOTTOM;
5091 element = EL_ACID_POOL_TOPLEFT;
5095 element = EL_ACID_POOL_TOPRIGHT;
5099 element = EL_ACID_POOL_BOTTOMLEFT;
5103 element = EL_ACID_POOL_BOTTOMRIGHT;
5107 element = EL_STEELWALL;
5111 element = EL_STEELWALL_SLIPPERY;
5114 case 0x1695: /* steel wall (not round) */
5115 element = EL_STEELWALL;
5118 case 0x1696: /* steel wall (left) */
5119 element = EL_DC_STEELWALL_1_LEFT;
5122 case 0x1697: /* steel wall (bottom) */
5123 element = EL_DC_STEELWALL_1_BOTTOM;
5126 case 0x1698: /* steel wall (right) */
5127 element = EL_DC_STEELWALL_1_RIGHT;
5130 case 0x1699: /* steel wall (top) */
5131 element = EL_DC_STEELWALL_1_TOP;
5134 case 0x169a: /* steel wall (left/bottom) */
5135 element = EL_DC_STEELWALL_1_BOTTOMLEFT;
5138 case 0x169b: /* steel wall (right/bottom) */
5139 element = EL_DC_STEELWALL_1_BOTTOMRIGHT;
5142 case 0x169c: /* steel wall (right/top) */
5143 element = EL_DC_STEELWALL_1_TOPRIGHT;
5146 case 0x169d: /* steel wall (left/top) */
5147 element = EL_DC_STEELWALL_1_TOPLEFT;
5150 case 0x169e: /* steel wall (right/bottom small) */
5151 element = EL_DC_STEELWALL_1_BOTTOMRIGHT_2;
5154 case 0x169f: /* steel wall (left/bottom small) */
5155 element = EL_DC_STEELWALL_1_BOTTOMLEFT_2;
5158 case 0x16a0: /* steel wall (right/top small) */
5159 element = EL_DC_STEELWALL_1_TOPRIGHT_2;
5162 case 0x16a1: /* steel wall (left/top small) */
5163 element = EL_DC_STEELWALL_1_TOPLEFT_2;
5166 case 0x16a2: /* steel wall (left/right) */
5167 element = EL_DC_STEELWALL_1_VERTICAL;
5170 case 0x16a3: /* steel wall (top/bottom) */
5171 element = EL_DC_STEELWALL_1_HORIZONTAL;
5174 case 0x16a4: /* steel wall 2 (left end) */
5175 element = EL_DC_STEELWALL_2_LEFT;
5178 case 0x16a5: /* steel wall 2 (right end) */
5179 element = EL_DC_STEELWALL_2_RIGHT;
5182 case 0x16a6: /* steel wall 2 (top end) */
5183 element = EL_DC_STEELWALL_2_TOP;
5186 case 0x16a7: /* steel wall 2 (bottom end) */
5187 element = EL_DC_STEELWALL_2_BOTTOM;
5190 case 0x16a8: /* steel wall 2 (left/right) */
5191 element = EL_DC_STEELWALL_2_HORIZONTAL;
5194 case 0x16a9: /* steel wall 2 (up/down) */
5195 element = EL_DC_STEELWALL_2_VERTICAL;
5198 case 0x16aa: /* steel wall 2 (mid) */
5199 element = EL_DC_STEELWALL_2_MIDDLE;
5203 element = EL_SIGN_EXCLAMATION;
5207 element = EL_SIGN_RADIOACTIVITY;
5211 element = EL_SIGN_STOP;
5215 element = EL_SIGN_WHEELCHAIR;
5219 element = EL_SIGN_PARKING;
5223 element = EL_SIGN_NO_ENTRY;
5227 element = EL_SIGN_HEART;
5231 element = EL_SIGN_GIVE_WAY;
5235 element = EL_SIGN_ENTRY_FORBIDDEN;
5239 element = EL_SIGN_EMERGENCY_EXIT;
5243 element = EL_SIGN_YIN_YANG;
5247 element = EL_WALL_EMERALD;
5251 element = EL_WALL_DIAMOND;
5255 element = EL_WALL_PEARL;
5259 element = EL_WALL_CRYSTAL;
5263 element = EL_INVISIBLE_WALL;
5267 element = EL_INVISIBLE_STEELWALL;
5270 /* 0x16bc - 0x16cb: */
5271 /* EL_INVISIBLE_SAND */
5274 element = EL_LIGHT_SWITCH;
5278 element = EL_ENVELOPE_1;
5282 if (element >= 0x0117 && element <= 0x036e) /* (?) */
5283 element = EL_DIAMOND;
5284 else if (element >= 0x042d && element <= 0x0684) /* (?) */
5285 element = EL_EMERALD;
5286 else if (element >= 0x157c && element <= 0x158b)
5288 else if (element >= 0x1590 && element <= 0x159f)
5289 element = EL_DC_LANDMINE;
5290 else if (element >= 0x16bc && element <= 0x16cb)
5291 element = EL_INVISIBLE_SAND;
5294 Error(ERR_WARN, "unknown Diamond Caves element 0x%04x", element);
5295 element = EL_UNKNOWN;
5300 return getMappedElement(element);
5303 static void LoadLevelFromFileStream_DC(File *file, struct LevelInfo *level,
5306 byte header[DC_LEVEL_HEADER_SIZE];
5308 int envelope_header_pos = 62;
5309 int envelope_content_pos = 94;
5310 int level_name_pos = 251;
5311 int level_author_pos = 292;
5312 int envelope_header_len;
5313 int envelope_content_len;
5315 int level_author_len;
5317 int num_yamyam_contents;
5320 getDecodedWord_DC(0, TRUE); /* initialize DC2 decoding engine */
5322 for (i = 0; i < DC_LEVEL_HEADER_SIZE / 2; i++)
5324 unsigned short header_word = getDecodedWord_DC(getFile16BitBE(file), FALSE);
5326 header[i * 2 + 0] = header_word >> 8;
5327 header[i * 2 + 1] = header_word & 0xff;
5330 /* read some values from level header to check level decoding integrity */
5331 fieldx = header[6] | (header[7] << 8);
5332 fieldy = header[8] | (header[9] << 8);
5333 num_yamyam_contents = header[60] | (header[61] << 8);
5335 /* do some simple sanity checks to ensure that level was correctly decoded */
5336 if (fieldx < 1 || fieldx > 256 ||
5337 fieldy < 1 || fieldy > 256 ||
5338 num_yamyam_contents < 1 || num_yamyam_contents > 8)
5340 level->no_valid_file = TRUE;
5342 Error(ERR_WARN, "cannot decode level from stream -- using empty level");
5347 /* maximum envelope header size is 31 bytes */
5348 envelope_header_len = header[envelope_header_pos];
5349 /* maximum envelope content size is 110 (156?) bytes */
5350 envelope_content_len = header[envelope_content_pos];
5352 /* maximum level title size is 40 bytes */
5353 level_name_len = MIN(header[level_name_pos], MAX_LEVEL_NAME_LEN);
5354 /* maximum level author size is 30 (51?) bytes */
5355 level_author_len = MIN(header[level_author_pos], MAX_LEVEL_AUTHOR_LEN);
5359 for (i = 0; i < envelope_header_len; i++)
5360 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5361 level->envelope[0].text[envelope_size++] =
5362 header[envelope_header_pos + 1 + i];
5364 if (envelope_header_len > 0 && envelope_content_len > 0)
5366 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5367 level->envelope[0].text[envelope_size++] = '\n';
5368 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5369 level->envelope[0].text[envelope_size++] = '\n';
5372 for (i = 0; i < envelope_content_len; i++)
5373 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5374 level->envelope[0].text[envelope_size++] =
5375 header[envelope_content_pos + 1 + i];
5377 level->envelope[0].text[envelope_size] = '\0';
5379 level->envelope[0].xsize = MAX_ENVELOPE_XSIZE;
5380 level->envelope[0].ysize = 10;
5381 level->envelope[0].autowrap = TRUE;
5382 level->envelope[0].centered = TRUE;
5384 for (i = 0; i < level_name_len; i++)
5385 level->name[i] = header[level_name_pos + 1 + i];
5386 level->name[level_name_len] = '\0';
5388 for (i = 0; i < level_author_len; i++)
5389 level->author[i] = header[level_author_pos + 1 + i];
5390 level->author[level_author_len] = '\0';
5392 num_yamyam_contents = header[60] | (header[61] << 8);
5393 level->num_yamyam_contents =
5394 MIN(MAX(MIN_ELEMENT_CONTENTS, num_yamyam_contents), MAX_ELEMENT_CONTENTS);
5396 for (i = 0; i < num_yamyam_contents; i++)
5398 for (y = 0; y < 3; y++) for (x = 0; x < 3; x++)
5400 unsigned short word = getDecodedWord_DC(getFile16BitBE(file), FALSE);
5401 int element_dc = ((word & 0xff) << 8) | ((word >> 8) & 0xff);
5403 if (i < MAX_ELEMENT_CONTENTS)
5404 level->yamyam_content[i].e[x][y] = getMappedElement_DC(element_dc);
5408 fieldx = header[6] | (header[7] << 8);
5409 fieldy = header[8] | (header[9] << 8);
5410 level->fieldx = MIN(MAX(MIN_LEV_FIELDX, fieldx), MAX_LEV_FIELDX);
5411 level->fieldy = MIN(MAX(MIN_LEV_FIELDY, fieldy), MAX_LEV_FIELDY);
5413 for (y = 0; y < fieldy; y++) for (x = 0; x < fieldx; x++)
5415 unsigned short word = getDecodedWord_DC(getFile16BitBE(file), FALSE);
5416 int element_dc = ((word & 0xff) << 8) | ((word >> 8) & 0xff);
5418 if (x < MAX_LEV_FIELDX && y < MAX_LEV_FIELDY)
5419 level->field[x][y] = getMappedElement_DC(element_dc);
5422 x = MIN(MAX(0, (header[10] | (header[11] << 8)) - 1), MAX_LEV_FIELDX - 1);
5423 y = MIN(MAX(0, (header[12] | (header[13] << 8)) - 1), MAX_LEV_FIELDY - 1);
5424 level->field[x][y] = EL_PLAYER_1;
5426 x = MIN(MAX(0, (header[14] | (header[15] << 8)) - 1), MAX_LEV_FIELDX - 1);
5427 y = MIN(MAX(0, (header[16] | (header[17] << 8)) - 1), MAX_LEV_FIELDY - 1);
5428 level->field[x][y] = EL_PLAYER_2;
5430 level->gems_needed = header[18] | (header[19] << 8);
5432 level->score[SC_EMERALD] = header[20] | (header[21] << 8);
5433 level->score[SC_DIAMOND] = header[22] | (header[23] << 8);
5434 level->score[SC_PEARL] = header[24] | (header[25] << 8);
5435 level->score[SC_CRYSTAL] = header[26] | (header[27] << 8);
5436 level->score[SC_NUT] = header[28] | (header[29] << 8);
5437 level->score[SC_ROBOT] = header[30] | (header[31] << 8);
5438 level->score[SC_SPACESHIP] = header[32] | (header[33] << 8);
5439 level->score[SC_BUG] = header[34] | (header[35] << 8);
5440 level->score[SC_YAMYAM] = header[36] | (header[37] << 8);
5441 level->score[SC_DYNAMITE] = header[38] | (header[39] << 8);
5442 level->score[SC_KEY] = header[40] | (header[41] << 8);
5443 level->score[SC_TIME_BONUS] = header[42] | (header[43] << 8);
5445 level->time = header[44] | (header[45] << 8);
5447 level->amoeba_speed = header[46] | (header[47] << 8);
5448 level->time_light = header[48] | (header[49] << 8);
5449 level->time_timegate = header[50] | (header[51] << 8);
5450 level->time_wheel = header[52] | (header[53] << 8);
5451 level->time_magic_wall = header[54] | (header[55] << 8);
5452 level->extra_time = header[56] | (header[57] << 8);
5453 level->shield_normal_time = header[58] | (header[59] << 8);
5455 /* Diamond Caves has the same (strange) behaviour as Emerald Mine that gems
5456 can slip down from flat walls, like normal walls and steel walls */
5457 level->em_slippery_gems = TRUE;
5460 static void LoadLevelFromFileInfo_DC(struct LevelInfo *level,
5461 struct LevelFileInfo *level_file_info,
5462 boolean level_info_only)
5464 char *filename = level_file_info->filename;
5466 int num_magic_bytes = 8;
5467 char magic_bytes[num_magic_bytes + 1];
5468 int num_levels_to_skip = level_file_info->nr - leveldir_current->first_level;
5470 if (!(file = openFile(filename, MODE_READ)))
5472 level->no_valid_file = TRUE;
5474 if (!level_info_only)
5475 Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
5480 // fseek(file, 0x0000, SEEK_SET);
5482 if (level_file_info->packed)
5484 /* read "magic bytes" from start of file */
5485 if (getStringFromFile(file, magic_bytes, num_magic_bytes + 1) == NULL)
5486 magic_bytes[0] = '\0';
5488 /* check "magic bytes" for correct file format */
5489 if (!strPrefix(magic_bytes, "DC2"))
5491 level->no_valid_file = TRUE;
5493 Error(ERR_WARN, "unknown DC level file '%s' -- using empty level",
5499 if (strPrefix(magic_bytes, "DC2Win95") ||
5500 strPrefix(magic_bytes, "DC2Win98"))
5502 int position_first_level = 0x00fa;
5503 int extra_bytes = 4;
5506 /* advance file stream to first level inside the level package */
5507 skip_bytes = position_first_level - num_magic_bytes - extra_bytes;
5509 /* each block of level data is followed by block of non-level data */
5510 num_levels_to_skip *= 2;
5512 /* at least skip header bytes, therefore use ">= 0" instead of "> 0" */
5513 while (num_levels_to_skip >= 0)
5515 /* advance file stream to next level inside the level package */
5516 if (seekFile(file, skip_bytes, SEEK_CUR) != 0)
5518 level->no_valid_file = TRUE;
5520 Error(ERR_WARN, "cannot fseek in file '%s' -- using empty level",
5526 /* skip apparently unused extra bytes following each level */
5527 ReadUnusedBytesFromFile(file, extra_bytes);
5529 /* read size of next level in level package */
5530 skip_bytes = getFile32BitLE(file);
5532 num_levels_to_skip--;
5537 level->no_valid_file = TRUE;
5539 Error(ERR_WARN, "unknown DC2 level file '%s' -- using empty level",
5546 LoadLevelFromFileStream_DC(file, level, level_file_info->nr);
5552 /* ------------------------------------------------------------------------- */
5553 /* functions for loading SB level */
5554 /* ------------------------------------------------------------------------- */
5556 int getMappedElement_SB(int element_ascii, boolean use_ces)
5564 sb_element_mapping[] =
5566 { ' ', EL_EMPTY, EL_CUSTOM_1 }, /* floor (space) */
5567 { '#', EL_STEELWALL, EL_CUSTOM_2 }, /* wall */
5568 { '@', EL_PLAYER_1, EL_CUSTOM_3 }, /* player */
5569 { '$', EL_SOKOBAN_OBJECT, EL_CUSTOM_4 }, /* box */
5570 { '.', EL_SOKOBAN_FIELD_EMPTY, EL_CUSTOM_5 }, /* goal square */
5571 { '*', EL_SOKOBAN_FIELD_FULL, EL_CUSTOM_6 }, /* box on goal square */
5572 { '+', EL_SOKOBAN_FIELD_PLAYER, EL_CUSTOM_7 }, /* player on goal square */
5573 { '_', EL_INVISIBLE_STEELWALL, EL_FROM_LEVEL_TEMPLATE }, /* floor beyond border */
5580 for (i = 0; sb_element_mapping[i].ascii != 0; i++)
5581 if (element_ascii == sb_element_mapping[i].ascii)
5582 return (use_ces ? sb_element_mapping[i].ce : sb_element_mapping[i].sb);
5584 return EL_UNDEFINED;
5587 static void LoadLevelFromFileInfo_SB(struct LevelInfo *level,
5588 struct LevelFileInfo *level_file_info,
5589 boolean level_info_only)
5591 char *filename = level_file_info->filename;
5592 char line[MAX_LINE_LEN], line_raw[MAX_LINE_LEN], previous_line[MAX_LINE_LEN];
5593 char last_comment[MAX_LINE_LEN];
5594 char level_name[MAX_LINE_LEN];
5597 int num_levels_to_skip = level_file_info->nr - leveldir_current->first_level;
5598 boolean read_continued_line = FALSE;
5599 boolean reading_playfield = FALSE;
5600 boolean got_valid_playfield_line = FALSE;
5601 boolean invalid_playfield_char = FALSE;
5602 boolean load_xsb_to_ces = check_special_flags("load_xsb_to_ces");
5603 int file_level_nr = 0;
5605 int x = 0, y = 0; /* initialized to make compilers happy */
5607 last_comment[0] = '\0';
5608 level_name[0] = '\0';
5610 if (!(file = openFile(filename, MODE_READ)))
5612 level->no_valid_file = TRUE;
5614 if (!level_info_only)
5615 Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
5620 while (!checkEndOfFile(file))
5622 /* level successfully read, but next level may follow here */
5623 if (!got_valid_playfield_line && reading_playfield)
5625 /* read playfield from single level file -- skip remaining file */
5626 if (!level_file_info->packed)
5629 if (file_level_nr >= num_levels_to_skip)
5634 last_comment[0] = '\0';
5635 level_name[0] = '\0';
5637 reading_playfield = FALSE;
5640 got_valid_playfield_line = FALSE;
5642 /* read next line of input file */
5643 if (!getStringFromFile(file, line, MAX_LINE_LEN))
5646 /* check if line was completely read and is terminated by line break */
5647 if (strlen(line) > 0 && line[strlen(line) - 1] == '\n')
5650 /* cut trailing line break (this can be newline and/or carriage return) */
5651 for (line_ptr = &line[strlen(line)]; line_ptr >= line; line_ptr--)
5652 if ((*line_ptr == '\n' || *line_ptr == '\r') && *(line_ptr + 1) == '\0')
5655 /* copy raw input line for later use (mainly debugging output) */
5656 strcpy(line_raw, line);
5658 if (read_continued_line)
5660 /* append new line to existing line, if there is enough space */
5661 if (strlen(previous_line) + strlen(line_ptr) < MAX_LINE_LEN)
5662 strcat(previous_line, line_ptr);
5664 strcpy(line, previous_line); /* copy storage buffer to line */
5666 read_continued_line = FALSE;
5669 /* if the last character is '\', continue at next line */
5670 if (strlen(line) > 0 && line[strlen(line) - 1] == '\\')
5672 line[strlen(line) - 1] = '\0'; /* cut off trailing backslash */
5673 strcpy(previous_line, line); /* copy line to storage buffer */
5675 read_continued_line = TRUE;
5680 /* skip empty lines */
5681 if (line[0] == '\0')
5684 /* extract comment text from comment line */
5687 for (line_ptr = line; *line_ptr; line_ptr++)
5688 if (*line_ptr != ' ' && *line_ptr != '\t' && *line_ptr != ';')
5691 strcpy(last_comment, line_ptr);
5696 /* extract level title text from line containing level title */
5697 if (line[0] == '\'')
5699 strcpy(level_name, &line[1]);
5701 if (strlen(level_name) > 0 && level_name[strlen(level_name) - 1] == '\'')
5702 level_name[strlen(level_name) - 1] = '\0';
5707 /* skip lines containing only spaces (or empty lines) */
5708 for (line_ptr = line; *line_ptr; line_ptr++)
5709 if (*line_ptr != ' ')
5711 if (*line_ptr == '\0')
5714 /* at this point, we have found a line containing part of a playfield */
5716 got_valid_playfield_line = TRUE;
5718 if (!reading_playfield)
5720 reading_playfield = TRUE;
5721 invalid_playfield_char = FALSE;
5723 for (x = 0; x < MAX_LEV_FIELDX; x++)
5724 for (y = 0; y < MAX_LEV_FIELDY; y++)
5725 level->field[x][y] = getMappedElement_SB(' ', load_xsb_to_ces);
5730 /* start with topmost tile row */
5734 /* skip playfield line if larger row than allowed */
5735 if (y >= MAX_LEV_FIELDY)
5738 /* start with leftmost tile column */
5741 /* read playfield elements from line */
5742 for (line_ptr = line; *line_ptr; line_ptr++)
5744 int mapped_sb_element = getMappedElement_SB(*line_ptr, load_xsb_to_ces);
5746 /* stop parsing playfield line if larger column than allowed */
5747 if (x >= MAX_LEV_FIELDX)
5750 if (mapped_sb_element == EL_UNDEFINED)
5752 invalid_playfield_char = TRUE;
5757 level->field[x][y] = mapped_sb_element;
5759 /* continue with next tile column */
5762 level->fieldx = MAX(x, level->fieldx);
5765 if (invalid_playfield_char)
5767 /* if first playfield line, treat invalid lines as comment lines */
5769 reading_playfield = FALSE;
5774 /* continue with next tile row */
5782 level->fieldx = MIN(MAX(MIN_LEV_FIELDX, level->fieldx), MAX_LEV_FIELDX);
5783 level->fieldy = MIN(MAX(MIN_LEV_FIELDY, level->fieldy), MAX_LEV_FIELDY);
5785 if (!reading_playfield)
5787 level->no_valid_file = TRUE;
5789 Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
5794 if (*level_name != '\0')
5796 strncpy(level->name, level_name, MAX_LEVEL_NAME_LEN);
5797 level->name[MAX_LEVEL_NAME_LEN] = '\0';
5799 else if (*last_comment != '\0')
5801 strncpy(level->name, last_comment, MAX_LEVEL_NAME_LEN);
5802 level->name[MAX_LEVEL_NAME_LEN] = '\0';
5806 sprintf(level->name, "--> Level %d <--", level_file_info->nr);
5809 /* set all empty fields beyond the border walls to invisible steel wall */
5810 for (y = 0; y < level->fieldy; y++) for (x = 0; x < level->fieldx; x++)
5812 if ((x == 0 || x == level->fieldx - 1 ||
5813 y == 0 || y == level->fieldy - 1) &&
5814 level->field[x][y] == getMappedElement_SB(' ', load_xsb_to_ces))
5815 FloodFillLevel(x, y, getMappedElement_SB('_', load_xsb_to_ces),
5816 level->field, level->fieldx, level->fieldy);
5819 /* set special level settings for Sokoban levels */
5822 level->use_step_counter = TRUE;
5824 if (load_xsb_to_ces)
5826 /* special global settings can now be set in level template */
5828 level->use_custom_template = TRUE;
5833 /* ------------------------------------------------------------------------- */
5834 /* functions for handling native levels */
5835 /* ------------------------------------------------------------------------- */
5837 static void LoadLevelFromFileInfo_EM(struct LevelInfo *level,
5838 struct LevelFileInfo *level_file_info,
5839 boolean level_info_only)
5841 if (!LoadNativeLevel_EM(level_file_info->filename, level_info_only))
5842 level->no_valid_file = TRUE;
5845 static void LoadLevelFromFileInfo_SP(struct LevelInfo *level,
5846 struct LevelFileInfo *level_file_info,
5847 boolean level_info_only)
5851 /* determine position of requested level inside level package */
5852 if (level_file_info->packed)
5853 pos = level_file_info->nr - leveldir_current->first_level;
5855 if (!LoadNativeLevel_SP(level_file_info->filename, pos, level_info_only))
5856 level->no_valid_file = TRUE;
5859 void CopyNativeLevel_RND_to_Native(struct LevelInfo *level)
5861 if (level->game_engine_type == GAME_ENGINE_TYPE_EM)
5862 CopyNativeLevel_RND_to_EM(level);
5863 else if (level->game_engine_type == GAME_ENGINE_TYPE_SP)
5864 CopyNativeLevel_RND_to_SP(level);
5867 void CopyNativeLevel_Native_to_RND(struct LevelInfo *level)
5869 if (level->game_engine_type == GAME_ENGINE_TYPE_EM)
5870 CopyNativeLevel_EM_to_RND(level);
5871 else if (level->game_engine_type == GAME_ENGINE_TYPE_SP)
5872 CopyNativeLevel_SP_to_RND(level);
5875 void SaveNativeLevel(struct LevelInfo *level)
5877 if (level->game_engine_type == GAME_ENGINE_TYPE_SP)
5879 char *basename = getSingleLevelBasenameExt(level->file_info.nr, "sp");
5880 char *filename = getLevelFilenameFromBasename(basename);
5882 CopyNativeLevel_RND_to_SP(level);
5883 CopyNativeTape_RND_to_SP(level);
5885 SaveNativeLevel_SP(filename);
5890 /* ------------------------------------------------------------------------- */
5891 /* functions for loading generic level */
5892 /* ------------------------------------------------------------------------- */
5894 static void LoadLevelFromFileInfo(struct LevelInfo *level,
5895 struct LevelFileInfo *level_file_info,
5896 boolean level_info_only)
5898 /* always start with reliable default values */
5899 setLevelInfoToDefaults(level, level_info_only, TRUE);
5901 switch (level_file_info->type)
5903 case LEVEL_FILE_TYPE_RND:
5904 LoadLevelFromFileInfo_RND(level, level_file_info, level_info_only);
5907 case LEVEL_FILE_TYPE_EM:
5908 LoadLevelFromFileInfo_EM(level, level_file_info, level_info_only);
5909 level->game_engine_type = GAME_ENGINE_TYPE_EM;
5912 case LEVEL_FILE_TYPE_SP:
5913 LoadLevelFromFileInfo_SP(level, level_file_info, level_info_only);
5914 level->game_engine_type = GAME_ENGINE_TYPE_SP;
5917 case LEVEL_FILE_TYPE_DC:
5918 LoadLevelFromFileInfo_DC(level, level_file_info, level_info_only);
5921 case LEVEL_FILE_TYPE_SB:
5922 LoadLevelFromFileInfo_SB(level, level_file_info, level_info_only);
5926 LoadLevelFromFileInfo_RND(level, level_file_info, level_info_only);
5930 /* if level file is invalid, restore level structure to default values */
5931 if (level->no_valid_file)
5932 setLevelInfoToDefaults(level, level_info_only, FALSE);
5934 if (level->game_engine_type == GAME_ENGINE_TYPE_UNKNOWN)
5935 level->game_engine_type = GAME_ENGINE_TYPE_RND;
5937 if (level_file_info->type != LEVEL_FILE_TYPE_RND)
5938 CopyNativeLevel_Native_to_RND(level);
5941 void LoadLevelFromFilename(struct LevelInfo *level, char *filename)
5943 static struct LevelFileInfo level_file_info;
5945 /* always start with reliable default values */
5946 setFileInfoToDefaults(&level_file_info);
5948 level_file_info.nr = 0; /* unknown level number */
5949 level_file_info.type = LEVEL_FILE_TYPE_RND; /* no others supported yet */
5950 level_file_info.filename = filename;
5952 LoadLevelFromFileInfo(level, &level_file_info, FALSE);
5955 static void LoadLevel_InitVersion(struct LevelInfo *level, char *filename)
5959 if (leveldir_current == NULL) /* only when dumping level */
5962 /* all engine modifications also valid for levels which use latest engine */
5963 if (level->game_version < VERSION_IDENT(3,2,0,5))
5965 /* time bonus score was given for 10 s instead of 1 s before 3.2.0-5 */
5966 level->score[SC_TIME_BONUS] /= 10;
5969 if (leveldir_current->latest_engine)
5971 /* ---------- use latest game engine ----------------------------------- */
5973 /* For all levels which are forced to use the latest game engine version
5974 (normally all but user contributed, private and undefined levels), set
5975 the game engine version to the actual version; this allows for actual
5976 corrections in the game engine to take effect for existing, converted
5977 levels (from "classic" or other existing games) to make the emulation
5978 of the corresponding game more accurate, while (hopefully) not breaking
5979 existing levels created from other players. */
5981 level->game_version = GAME_VERSION_ACTUAL;
5983 /* Set special EM style gems behaviour: EM style gems slip down from
5984 normal, steel and growing wall. As this is a more fundamental change,
5985 it seems better to set the default behaviour to "off" (as it is more
5986 natural) and make it configurable in the level editor (as a property
5987 of gem style elements). Already existing converted levels (neither
5988 private nor contributed levels) are changed to the new behaviour. */
5990 if (level->file_version < FILE_VERSION_2_0)
5991 level->em_slippery_gems = TRUE;
5996 /* ---------- use game engine the level was created with ----------------- */
5998 /* For all levels which are not forced to use the latest game engine
5999 version (normally user contributed, private and undefined levels),
6000 use the version of the game engine the levels were created for.
6002 Since 2.0.1, the game engine version is now directly stored
6003 in the level file (chunk "VERS"), so there is no need anymore
6004 to set the game version from the file version (except for old,
6005 pre-2.0 levels, where the game version is still taken from the
6006 file format version used to store the level -- see above). */
6008 /* player was faster than enemies in 1.0.0 and before */
6009 if (level->file_version == FILE_VERSION_1_0)
6010 for (i = 0; i < MAX_PLAYERS; i++)
6011 level->initial_player_stepsize[i] = STEPSIZE_FAST;
6013 /* default behaviour for EM style gems was "slippery" only in 2.0.1 */
6014 if (level->game_version == VERSION_IDENT(2,0,1,0))
6015 level->em_slippery_gems = TRUE;
6017 /* springs could be pushed over pits before (pre-release version) 2.2.0 */
6018 if (level->game_version < VERSION_IDENT(2,2,0,0))
6019 level->use_spring_bug = TRUE;
6021 if (level->game_version < VERSION_IDENT(3,2,0,5))
6023 /* time orb caused limited time in endless time levels before 3.2.0-5 */
6024 level->use_time_orb_bug = TRUE;
6026 /* default behaviour for snapping was "no snap delay" before 3.2.0-5 */
6027 level->block_snap_field = FALSE;
6029 /* extra time score was same value as time left score before 3.2.0-5 */
6030 level->extra_time_score = level->score[SC_TIME_BONUS];
6033 if (level->game_version < VERSION_IDENT(3,2,0,7))
6035 /* default behaviour for snapping was "not continuous" before 3.2.0-7 */
6036 level->continuous_snapping = FALSE;
6039 /* only few elements were able to actively move into acid before 3.1.0 */
6040 /* trigger settings did not exist before 3.1.0; set to default "any" */
6041 if (level->game_version < VERSION_IDENT(3,1,0,0))
6043 /* correct "can move into acid" settings (all zero in old levels) */
6045 level->can_move_into_acid_bits = 0; /* nothing can move into acid */
6046 level->dont_collide_with_bits = 0; /* nothing is deadly when colliding */
6048 setMoveIntoAcidProperty(level, EL_ROBOT, TRUE);
6049 setMoveIntoAcidProperty(level, EL_SATELLITE, TRUE);
6050 setMoveIntoAcidProperty(level, EL_PENGUIN, TRUE);
6051 setMoveIntoAcidProperty(level, EL_BALLOON, TRUE);
6053 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6054 SET_PROPERTY(EL_CUSTOM_START + i, EP_CAN_MOVE_INTO_ACID, TRUE);
6056 /* correct trigger settings (stored as zero == "none" in old levels) */
6058 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6060 int element = EL_CUSTOM_START + i;
6061 struct ElementInfo *ei = &element_info[element];
6063 for (j = 0; j < ei->num_change_pages; j++)
6065 struct ElementChangeInfo *change = &ei->change_page[j];
6067 change->trigger_player = CH_PLAYER_ANY;
6068 change->trigger_page = CH_PAGE_ANY;
6073 /* try to detect and fix "Snake Bite" levels, which are broken with 3.2.0 */
6075 int element = EL_CUSTOM_256;
6076 struct ElementInfo *ei = &element_info[element];
6077 struct ElementChangeInfo *change = &ei->change_page[0];
6079 /* This is needed to fix a problem that was caused by a bugfix in function
6080 game.c/CreateFieldExt() introduced with 3.2.0 that corrects the behaviour
6081 when a custom element changes to EL_SOKOBAN_FIELD_PLAYER (before, it did
6082 not replace walkable elements, but instead just placed the player on it,
6083 without placing the Sokoban field under the player). Unfortunately, this
6084 breaks "Snake Bite" style levels when the snake is halfway through a door
6085 that just closes (the snake head is still alive and can be moved in this
6086 case). This can be fixed by replacing the EL_SOKOBAN_FIELD_PLAYER by the
6087 player (without Sokoban element) which then gets killed as designed). */
6089 if ((strncmp(leveldir_current->identifier, "snake_bite", 10) == 0 ||
6090 strncmp(ei->description, "pause b4 death", 14) == 0) &&
6091 change->target_element == EL_SOKOBAN_FIELD_PLAYER)
6092 change->target_element = EL_PLAYER_1;
6095 /* try to detect and fix "Zelda" style levels, which are broken with 3.2.5 */
6096 if (level->game_version < VERSION_IDENT(3,2,5,0))
6098 /* This is needed to fix a problem that was caused by a bugfix in function
6099 game.c/CheckTriggeredElementChangeExt() introduced with 3.2.5 that
6100 corrects the behaviour when a custom element changes to another custom
6101 element with a higher element number that has change actions defined.
6102 Normally, only one change per frame is allowed for custom elements.
6103 Therefore, it is checked if a custom element already changed in the
6104 current frame; if it did, subsequent changes are suppressed.
6105 Unfortunately, this is only checked for element changes, but not for
6106 change actions, which are still executed. As the function above loops
6107 through all custom elements from lower to higher, an element change
6108 resulting in a lower CE number won't be checked again, while a target
6109 element with a higher number will also be checked, and potential change
6110 actions will get executed for this CE, too (which is wrong), while
6111 further changes are ignored (which is correct). As this bugfix breaks
6112 Zelda II (and introduces graphical bugs to Zelda I, and also breaks a
6113 few other levels like Alan Bond's "FMV"), allow the previous, incorrect
6114 behaviour for existing levels and tapes that make use of this bug */
6116 level->use_action_after_change_bug = TRUE;
6119 /* not centering level after relocating player was default only in 3.2.3 */
6120 if (level->game_version == VERSION_IDENT(3,2,3,0)) /* (no pre-releases) */
6121 level->shifted_relocation = TRUE;
6123 /* EM style elements always chain-exploded in R'n'D engine before 3.2.6 */
6124 if (level->game_version < VERSION_IDENT(3,2,6,0))
6125 level->em_explodes_by_fire = TRUE;
6128 static void LoadLevel_InitElements(struct LevelInfo *level, char *filename)
6132 /* map custom element change events that have changed in newer versions
6133 (these following values were accidentally changed in version 3.0.1)
6134 (this seems to be needed only for 'ab_levelset3' and 'ab_levelset4') */
6135 if (level->game_version <= VERSION_IDENT(3,0,0,0))
6137 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6139 int element = EL_CUSTOM_START + i;
6141 /* order of checking and copying events to be mapped is important */
6142 /* (do not change the start and end value -- they are constant) */
6143 for (j = CE_BY_OTHER_ACTION; j >= CE_VALUE_GETS_ZERO; j--)
6145 if (HAS_CHANGE_EVENT(element, j - 2))
6147 SET_CHANGE_EVENT(element, j - 2, FALSE);
6148 SET_CHANGE_EVENT(element, j, TRUE);
6152 /* order of checking and copying events to be mapped is important */
6153 /* (do not change the start and end value -- they are constant) */
6154 for (j = CE_PLAYER_COLLECTS_X; j >= CE_HITTING_SOMETHING; j--)
6156 if (HAS_CHANGE_EVENT(element, j - 1))
6158 SET_CHANGE_EVENT(element, j - 1, FALSE);
6159 SET_CHANGE_EVENT(element, j, TRUE);
6165 /* initialize "can_change" field for old levels with only one change page */
6166 if (level->game_version <= VERSION_IDENT(3,0,2,0))
6168 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6170 int element = EL_CUSTOM_START + i;
6172 if (CAN_CHANGE(element))
6173 element_info[element].change->can_change = TRUE;
6177 /* correct custom element values (for old levels without these options) */
6178 if (level->game_version < VERSION_IDENT(3,1,1,0))
6180 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6182 int element = EL_CUSTOM_START + i;
6183 struct ElementInfo *ei = &element_info[element];
6185 if (ei->access_direction == MV_NO_DIRECTION)
6186 ei->access_direction = MV_ALL_DIRECTIONS;
6190 /* correct custom element values (fix invalid values for all versions) */
6193 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6195 int element = EL_CUSTOM_START + i;
6196 struct ElementInfo *ei = &element_info[element];
6198 for (j = 0; j < ei->num_change_pages; j++)
6200 struct ElementChangeInfo *change = &ei->change_page[j];
6202 if (change->trigger_player == CH_PLAYER_NONE)
6203 change->trigger_player = CH_PLAYER_ANY;
6205 if (change->trigger_side == CH_SIDE_NONE)
6206 change->trigger_side = CH_SIDE_ANY;
6211 /* initialize "can_explode" field for old levels which did not store this */
6212 /* !!! CHECK THIS -- "<= 3,1,0,0" IS PROBABLY WRONG !!! */
6213 if (level->game_version <= VERSION_IDENT(3,1,0,0))
6215 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6217 int element = EL_CUSTOM_START + i;
6219 if (EXPLODES_1X1_OLD(element))
6220 element_info[element].explosion_type = EXPLODES_1X1;
6222 SET_PROPERTY(element, EP_CAN_EXPLODE, (EXPLODES_BY_FIRE(element) ||
6223 EXPLODES_SMASHED(element) ||
6224 EXPLODES_IMPACT(element)));
6228 /* correct previously hard-coded move delay values for maze runner style */
6229 if (level->game_version < VERSION_IDENT(3,1,1,0))
6231 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6233 int element = EL_CUSTOM_START + i;
6235 if (element_info[element].move_pattern & MV_MAZE_RUNNER_STYLE)
6237 /* previously hard-coded and therefore ignored */
6238 element_info[element].move_delay_fixed = 9;
6239 element_info[element].move_delay_random = 0;
6244 /* map elements that have changed in newer versions */
6245 level->amoeba_content = getMappedElementByVersion(level->amoeba_content,
6246 level->game_version);
6247 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6248 for (x = 0; x < 3; x++)
6249 for (y = 0; y < 3; y++)
6250 level->yamyam_content[i].e[x][y] =
6251 getMappedElementByVersion(level->yamyam_content[i].e[x][y],
6252 level->game_version);
6254 /* initialize element properties for level editor etc. */
6255 InitElementPropertiesEngine(level->game_version);
6256 InitElementPropertiesAfterLoading(level->game_version);
6257 InitElementPropertiesGfxElement();
6260 static void LoadLevel_InitPlayfield(struct LevelInfo *level, char *filename)
6264 /* map elements that have changed in newer versions */
6265 for (y = 0; y < level->fieldy; y++)
6266 for (x = 0; x < level->fieldx; x++)
6267 level->field[x][y] = getMappedElementByVersion(level->field[x][y],
6268 level->game_version);
6270 /* clear unused playfield data (nicer if level gets resized in editor) */
6271 for (x = 0; x < MAX_LEV_FIELDX; x++)
6272 for (y = 0; y < MAX_LEV_FIELDY; y++)
6273 if (x >= level->fieldx || y >= level->fieldy)
6274 level->field[x][y] = EL_EMPTY;
6276 /* copy elements to runtime playfield array */
6277 for (x = 0; x < MAX_LEV_FIELDX; x++)
6278 for (y = 0; y < MAX_LEV_FIELDY; y++)
6279 Feld[x][y] = level->field[x][y];
6281 /* initialize level size variables for faster access */
6282 lev_fieldx = level->fieldx;
6283 lev_fieldy = level->fieldy;
6285 /* determine border element for this level */
6286 if (level->file_info.type == LEVEL_FILE_TYPE_DC)
6287 BorderElement = EL_EMPTY; /* (in editor, SetBorderElement() is used) */
6292 static void LoadLevel_InitNativeEngines(struct LevelInfo *level,char *filename)
6294 struct LevelFileInfo *level_file_info = &level->file_info;
6296 if (level_file_info->type == LEVEL_FILE_TYPE_RND)
6297 CopyNativeLevel_RND_to_Native(level);
6300 void LoadLevelTemplate(int nr)
6304 setLevelFileInfo(&level_template.file_info, nr);
6305 filename = level_template.file_info.filename;
6307 LoadLevelFromFileInfo(&level_template, &level_template.file_info, FALSE);
6309 LoadLevel_InitVersion(&level_template, filename);
6310 LoadLevel_InitElements(&level_template, filename);
6312 ActivateLevelTemplate();
6315 void LoadLevel(int nr)
6319 setLevelFileInfo(&level.file_info, nr);
6320 filename = level.file_info.filename;
6322 LoadLevelFromFileInfo(&level, &level.file_info, FALSE);
6324 if (level.use_custom_template)
6325 LoadLevelTemplate(-1);
6327 LoadLevel_InitVersion(&level, filename);
6328 LoadLevel_InitElements(&level, filename);
6329 LoadLevel_InitPlayfield(&level, filename);
6331 LoadLevel_InitNativeEngines(&level, filename);
6334 void LoadLevelInfoOnly(int nr)
6336 setLevelFileInfo(&level.file_info, nr);
6338 LoadLevelFromFileInfo(&level, &level.file_info, TRUE);
6341 static int SaveLevel_VERS(FILE *file, struct LevelInfo *level)
6345 chunk_size += putFileVersion(file, level->file_version);
6346 chunk_size += putFileVersion(file, level->game_version);
6351 static int SaveLevel_DATE(FILE *file, struct LevelInfo *level)
6355 chunk_size += putFile16BitBE(file, level->creation_date.year);
6356 chunk_size += putFile8Bit(file, level->creation_date.month);
6357 chunk_size += putFile8Bit(file, level->creation_date.day);
6362 #if ENABLE_HISTORIC_CHUNKS
6363 static void SaveLevel_HEAD(FILE *file, struct LevelInfo *level)
6367 putFile8Bit(file, level->fieldx);
6368 putFile8Bit(file, level->fieldy);
6370 putFile16BitBE(file, level->time);
6371 putFile16BitBE(file, level->gems_needed);
6373 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
6374 putFile8Bit(file, level->name[i]);
6376 for (i = 0; i < LEVEL_SCORE_ELEMENTS; i++)
6377 putFile8Bit(file, level->score[i]);
6379 for (i = 0; i < STD_ELEMENT_CONTENTS; i++)
6380 for (y = 0; y < 3; y++)
6381 for (x = 0; x < 3; x++)
6382 putFile8Bit(file, (level->encoding_16bit_yamyam ? EL_EMPTY :
6383 level->yamyam_content[i].e[x][y]));
6384 putFile8Bit(file, level->amoeba_speed);
6385 putFile8Bit(file, level->time_magic_wall);
6386 putFile8Bit(file, level->time_wheel);
6387 putFile8Bit(file, (level->encoding_16bit_amoeba ? EL_EMPTY :
6388 level->amoeba_content));
6389 putFile8Bit(file, (level->initial_player_stepsize == STEPSIZE_FAST ? 1 : 0));
6390 putFile8Bit(file, (level->initial_gravity ? 1 : 0));
6391 putFile8Bit(file, (level->encoding_16bit_field ? 1 : 0));
6392 putFile8Bit(file, (level->em_slippery_gems ? 1 : 0));
6394 putFile8Bit(file, (level->use_custom_template ? 1 : 0));
6396 putFile8Bit(file, (level->block_last_field ? 1 : 0));
6397 putFile8Bit(file, (level->sp_block_last_field ? 1 : 0));
6398 putFile32BitBE(file, level->can_move_into_acid_bits);
6399 putFile8Bit(file, level->dont_collide_with_bits);
6401 putFile8Bit(file, (level->use_spring_bug ? 1 : 0));
6402 putFile8Bit(file, (level->use_step_counter ? 1 : 0));
6404 putFile8Bit(file, (level->instant_relocation ? 1 : 0));
6405 putFile8Bit(file, (level->can_pass_to_walkable ? 1 : 0));
6406 putFile8Bit(file, (level->grow_into_diggable ? 1 : 0));
6408 putFile8Bit(file, level->game_engine_type);
6410 WriteUnusedBytesToFile(file, LEVEL_CHUNK_HEAD_UNUSED);
6414 static int SaveLevel_NAME(FILE *file, struct LevelInfo *level)
6419 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
6420 chunk_size += putFile8Bit(file, level->name[i]);
6425 static int SaveLevel_AUTH(FILE *file, struct LevelInfo *level)
6430 for (i = 0; i < MAX_LEVEL_AUTHOR_LEN; i++)
6431 chunk_size += putFile8Bit(file, level->author[i]);
6436 #if ENABLE_HISTORIC_CHUNKS
6437 static int SaveLevel_BODY(FILE *file, struct LevelInfo *level)
6442 for (y = 0; y < level->fieldy; y++)
6443 for (x = 0; x < level->fieldx; x++)
6444 if (level->encoding_16bit_field)
6445 chunk_size += putFile16BitBE(file, level->field[x][y]);
6447 chunk_size += putFile8Bit(file, level->field[x][y]);
6453 static int SaveLevel_BODY(FILE *file, struct LevelInfo *level)
6458 for (y = 0; y < level->fieldy; y++)
6459 for (x = 0; x < level->fieldx; x++)
6460 chunk_size += putFile16BitBE(file, level->field[x][y]);
6465 #if ENABLE_HISTORIC_CHUNKS
6466 static void SaveLevel_CONT(FILE *file, struct LevelInfo *level)
6470 putFile8Bit(file, EL_YAMYAM);
6471 putFile8Bit(file, level->num_yamyam_contents);
6472 putFile8Bit(file, 0);
6473 putFile8Bit(file, 0);
6475 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6476 for (y = 0; y < 3; y++)
6477 for (x = 0; x < 3; x++)
6478 if (level->encoding_16bit_field)
6479 putFile16BitBE(file, level->yamyam_content[i].e[x][y]);
6481 putFile8Bit(file, level->yamyam_content[i].e[x][y]);
6485 #if ENABLE_HISTORIC_CHUNKS
6486 static void SaveLevel_CNT2(FILE *file, struct LevelInfo *level, int element)
6489 int num_contents, content_xsize, content_ysize;
6490 int content_array[MAX_ELEMENT_CONTENTS][3][3];
6492 if (element == EL_YAMYAM)
6494 num_contents = level->num_yamyam_contents;
6498 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6499 for (y = 0; y < 3; y++)
6500 for (x = 0; x < 3; x++)
6501 content_array[i][x][y] = level->yamyam_content[i].e[x][y];
6503 else if (element == EL_BD_AMOEBA)
6509 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6510 for (y = 0; y < 3; y++)
6511 for (x = 0; x < 3; x++)
6512 content_array[i][x][y] = EL_EMPTY;
6513 content_array[0][0][0] = level->amoeba_content;
6517 /* chunk header already written -- write empty chunk data */
6518 WriteUnusedBytesToFile(file, LEVEL_CHUNK_CNT2_SIZE);
6520 Error(ERR_WARN, "cannot save content for element '%d'", element);
6524 putFile16BitBE(file, element);
6525 putFile8Bit(file, num_contents);
6526 putFile8Bit(file, content_xsize);
6527 putFile8Bit(file, content_ysize);
6529 WriteUnusedBytesToFile(file, LEVEL_CHUNK_CNT2_UNUSED);
6531 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6532 for (y = 0; y < 3; y++)
6533 for (x = 0; x < 3; x++)
6534 putFile16BitBE(file, content_array[i][x][y]);
6538 #if ENABLE_HISTORIC_CHUNKS
6539 static int SaveLevel_CNT3(FILE *file, struct LevelInfo *level, int element)
6541 int envelope_nr = element - EL_ENVELOPE_1;
6542 int envelope_len = strlen(level->envelope_text[envelope_nr]) + 1;
6546 chunk_size += putFile16BitBE(file, element);
6547 chunk_size += putFile16BitBE(file, envelope_len);
6548 chunk_size += putFile8Bit(file, level->envelope_xsize[envelope_nr]);
6549 chunk_size += putFile8Bit(file, level->envelope_ysize[envelope_nr]);
6551 WriteUnusedBytesToFile(file, LEVEL_CHUNK_CNT3_UNUSED);
6552 chunk_size += LEVEL_CHUNK_CNT3_UNUSED;
6554 for (i = 0; i < envelope_len; i++)
6555 chunk_size += putFile8Bit(file, level->envelope_text[envelope_nr][i]);
6561 #if ENABLE_HISTORIC_CHUNKS
6562 static void SaveLevel_CUS1(FILE *file, struct LevelInfo *level,
6563 int num_changed_custom_elements)
6567 putFile16BitBE(file, num_changed_custom_elements);
6569 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6571 int element = EL_CUSTOM_START + i;
6573 struct ElementInfo *ei = &element_info[element];
6575 if (ei->properties[EP_BITFIELD_BASE_NR] != EP_BITMASK_DEFAULT)
6577 if (check < num_changed_custom_elements)
6579 putFile16BitBE(file, element);
6580 putFile32BitBE(file, ei->properties[EP_BITFIELD_BASE_NR]);
6587 if (check != num_changed_custom_elements) /* should not happen */
6588 Error(ERR_WARN, "inconsistent number of custom element properties");
6592 #if ENABLE_HISTORIC_CHUNKS
6593 static void SaveLevel_CUS2(FILE *file, struct LevelInfo *level,
6594 int num_changed_custom_elements)
6598 putFile16BitBE(file, num_changed_custom_elements);
6600 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6602 int element = EL_CUSTOM_START + i;
6604 if (element_info[element].change->target_element != EL_EMPTY_SPACE)
6606 if (check < num_changed_custom_elements)
6608 putFile16BitBE(file, element);
6609 putFile16BitBE(file, element_info[element].change->target_element);
6616 if (check != num_changed_custom_elements) /* should not happen */
6617 Error(ERR_WARN, "inconsistent number of custom target elements");
6621 #if ENABLE_HISTORIC_CHUNKS
6622 static void SaveLevel_CUS3(FILE *file, struct LevelInfo *level,
6623 int num_changed_custom_elements)
6625 int i, j, x, y, check = 0;
6627 putFile16BitBE(file, num_changed_custom_elements);
6629 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6631 int element = EL_CUSTOM_START + i;
6632 struct ElementInfo *ei = &element_info[element];
6634 if (ei->modified_settings)
6636 if (check < num_changed_custom_elements)
6638 putFile16BitBE(file, element);
6640 for (j = 0; j < MAX_ELEMENT_NAME_LEN; j++)
6641 putFile8Bit(file, ei->description[j]);
6643 putFile32BitBE(file, ei->properties[EP_BITFIELD_BASE_NR]);
6645 /* some free bytes for future properties and padding */
6646 WriteUnusedBytesToFile(file, 7);
6648 putFile8Bit(file, ei->use_gfx_element);
6649 putFile16BitBE(file, ei->gfx_element_initial);
6651 putFile8Bit(file, ei->collect_score_initial);
6652 putFile8Bit(file, ei->collect_count_initial);
6654 putFile16BitBE(file, ei->push_delay_fixed);
6655 putFile16BitBE(file, ei->push_delay_random);
6656 putFile16BitBE(file, ei->move_delay_fixed);
6657 putFile16BitBE(file, ei->move_delay_random);
6659 putFile16BitBE(file, ei->move_pattern);
6660 putFile8Bit(file, ei->move_direction_initial);
6661 putFile8Bit(file, ei->move_stepsize);
6663 for (y = 0; y < 3; y++)
6664 for (x = 0; x < 3; x++)
6665 putFile16BitBE(file, ei->content.e[x][y]);
6667 putFile32BitBE(file, ei->change->events);
6669 putFile16BitBE(file, ei->change->target_element);
6671 putFile16BitBE(file, ei->change->delay_fixed);
6672 putFile16BitBE(file, ei->change->delay_random);
6673 putFile16BitBE(file, ei->change->delay_frames);
6675 putFile16BitBE(file, ei->change->initial_trigger_element);
6677 putFile8Bit(file, ei->change->explode);
6678 putFile8Bit(file, ei->change->use_target_content);
6679 putFile8Bit(file, ei->change->only_if_complete);
6680 putFile8Bit(file, ei->change->use_random_replace);
6682 putFile8Bit(file, ei->change->random_percentage);
6683 putFile8Bit(file, ei->change->replace_when);
6685 for (y = 0; y < 3; y++)
6686 for (x = 0; x < 3; x++)
6687 putFile16BitBE(file, ei->change->content.e[x][y]);
6689 putFile8Bit(file, ei->slippery_type);
6691 /* some free bytes for future properties and padding */
6692 WriteUnusedBytesToFile(file, LEVEL_CPART_CUS3_UNUSED);
6699 if (check != num_changed_custom_elements) /* should not happen */
6700 Error(ERR_WARN, "inconsistent number of custom element properties");
6704 #if ENABLE_HISTORIC_CHUNKS
6705 static void SaveLevel_CUS4(FILE *file, struct LevelInfo *level, int element)
6707 struct ElementInfo *ei = &element_info[element];
6710 /* ---------- custom element base property values (96 bytes) ------------- */
6712 putFile16BitBE(file, element);
6714 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
6715 putFile8Bit(file, ei->description[i]);
6717 putFile32BitBE(file, ei->properties[EP_BITFIELD_BASE_NR]);
6719 WriteUnusedBytesToFile(file, 4); /* reserved for more base properties */
6721 putFile8Bit(file, ei->num_change_pages);
6723 putFile16BitBE(file, ei->ce_value_fixed_initial);
6724 putFile16BitBE(file, ei->ce_value_random_initial);
6725 putFile8Bit(file, ei->use_last_ce_value);
6727 putFile8Bit(file, ei->use_gfx_element);
6728 putFile16BitBE(file, ei->gfx_element_initial);
6730 putFile8Bit(file, ei->collect_score_initial);
6731 putFile8Bit(file, ei->collect_count_initial);
6733 putFile8Bit(file, ei->drop_delay_fixed);
6734 putFile8Bit(file, ei->push_delay_fixed);
6735 putFile8Bit(file, ei->drop_delay_random);
6736 putFile8Bit(file, ei->push_delay_random);
6737 putFile16BitBE(file, ei->move_delay_fixed);
6738 putFile16BitBE(file, ei->move_delay_random);
6740 /* bits 0 - 15 of "move_pattern" ... */
6741 putFile16BitBE(file, ei->move_pattern & 0xffff);
6742 putFile8Bit(file, ei->move_direction_initial);
6743 putFile8Bit(file, ei->move_stepsize);
6745 putFile8Bit(file, ei->slippery_type);
6747 for (y = 0; y < 3; y++)
6748 for (x = 0; x < 3; x++)
6749 putFile16BitBE(file, ei->content.e[x][y]);
6751 putFile16BitBE(file, ei->move_enter_element);
6752 putFile16BitBE(file, ei->move_leave_element);
6753 putFile8Bit(file, ei->move_leave_type);
6755 /* ... bits 16 - 31 of "move_pattern" (not nice, but downward compatible) */
6756 putFile16BitBE(file, (ei->move_pattern >> 16) & 0xffff);
6758 putFile8Bit(file, ei->access_direction);
6760 putFile8Bit(file, ei->explosion_delay);
6761 putFile8Bit(file, ei->ignition_delay);
6762 putFile8Bit(file, ei->explosion_type);
6764 /* some free bytes for future custom property values and padding */
6765 WriteUnusedBytesToFile(file, 1);
6767 /* ---------- change page property values (48 bytes) --------------------- */
6769 for (i = 0; i < ei->num_change_pages; i++)
6771 struct ElementChangeInfo *change = &ei->change_page[i];
6772 unsigned int event_bits;
6774 /* bits 0 - 31 of "has_event[]" ... */
6776 for (j = 0; j < MIN(NUM_CHANGE_EVENTS, 32); j++)
6777 if (change->has_event[j])
6778 event_bits |= (1 << j);
6779 putFile32BitBE(file, event_bits);
6781 putFile16BitBE(file, change->target_element);
6783 putFile16BitBE(file, change->delay_fixed);
6784 putFile16BitBE(file, change->delay_random);
6785 putFile16BitBE(file, change->delay_frames);
6787 putFile16BitBE(file, change->initial_trigger_element);
6789 putFile8Bit(file, change->explode);
6790 putFile8Bit(file, change->use_target_content);
6791 putFile8Bit(file, change->only_if_complete);
6792 putFile8Bit(file, change->use_random_replace);
6794 putFile8Bit(file, change->random_percentage);
6795 putFile8Bit(file, change->replace_when);
6797 for (y = 0; y < 3; y++)
6798 for (x = 0; x < 3; x++)
6799 putFile16BitBE(file, change->target_content.e[x][y]);
6801 putFile8Bit(file, change->can_change);
6803 putFile8Bit(file, change->trigger_side);
6805 putFile8Bit(file, change->trigger_player);
6806 putFile8Bit(file, (change->trigger_page == CH_PAGE_ANY ? CH_PAGE_ANY_FILE :
6807 log_2(change->trigger_page)));
6809 putFile8Bit(file, change->has_action);
6810 putFile8Bit(file, change->action_type);
6811 putFile8Bit(file, change->action_mode);
6812 putFile16BitBE(file, change->action_arg);
6814 /* ... bits 32 - 39 of "has_event[]" (not nice, but downward compatible) */
6816 for (j = 32; j < NUM_CHANGE_EVENTS; j++)
6817 if (change->has_event[j])
6818 event_bits |= (1 << (j - 32));
6819 putFile8Bit(file, event_bits);
6824 #if ENABLE_HISTORIC_CHUNKS
6825 static void SaveLevel_GRP1(FILE *file, struct LevelInfo *level, int element)
6827 struct ElementInfo *ei = &element_info[element];
6828 struct ElementGroupInfo *group = ei->group;
6831 putFile16BitBE(file, element);
6833 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
6834 putFile8Bit(file, ei->description[i]);
6836 putFile8Bit(file, group->num_elements);
6838 putFile8Bit(file, ei->use_gfx_element);
6839 putFile16BitBE(file, ei->gfx_element_initial);
6841 putFile8Bit(file, group->choice_mode);
6843 /* some free bytes for future values and padding */
6844 WriteUnusedBytesToFile(file, 3);
6846 for (i = 0; i < MAX_ELEMENTS_IN_GROUP; i++)
6847 putFile16BitBE(file, group->element[i]);
6851 static int SaveLevel_MicroChunk(FILE *file, struct LevelFileConfigInfo *entry,
6852 boolean write_element)
6854 int save_type = entry->save_type;
6855 int data_type = entry->data_type;
6856 int conf_type = entry->conf_type;
6857 int byte_mask = conf_type & CONF_MASK_BYTES;
6858 int element = entry->element;
6859 int default_value = entry->default_value;
6861 boolean modified = FALSE;
6863 if (byte_mask != CONF_MASK_MULTI_BYTES)
6865 void *value_ptr = entry->value;
6866 int value = (data_type == TYPE_BOOLEAN ? *(boolean *)value_ptr :
6869 /* check if any settings have been modified before saving them */
6870 if (value != default_value)
6873 /* do not save if explicitly told or if unmodified default settings */
6874 if ((save_type == SAVE_CONF_NEVER) ||
6875 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
6879 num_bytes += putFile16BitBE(file, element);
6881 num_bytes += putFile8Bit(file, conf_type);
6882 num_bytes += (byte_mask == CONF_MASK_1_BYTE ? putFile8Bit (file, value) :
6883 byte_mask == CONF_MASK_2_BYTE ? putFile16BitBE(file, value) :
6884 byte_mask == CONF_MASK_4_BYTE ? putFile32BitBE(file, value) :
6887 else if (data_type == TYPE_STRING)
6889 char *default_string = entry->default_string;
6890 char *string = (char *)(entry->value);
6891 int string_length = strlen(string);
6894 /* check if any settings have been modified before saving them */
6895 if (!strEqual(string, default_string))
6898 /* do not save if explicitly told or if unmodified default settings */
6899 if ((save_type == SAVE_CONF_NEVER) ||
6900 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
6904 num_bytes += putFile16BitBE(file, element);
6906 num_bytes += putFile8Bit(file, conf_type);
6907 num_bytes += putFile16BitBE(file, string_length);
6909 for (i = 0; i < string_length; i++)
6910 num_bytes += putFile8Bit(file, string[i]);
6912 else if (data_type == TYPE_ELEMENT_LIST)
6914 int *element_array = (int *)(entry->value);
6915 int num_elements = *(int *)(entry->num_entities);
6918 /* check if any settings have been modified before saving them */
6919 for (i = 0; i < num_elements; i++)
6920 if (element_array[i] != default_value)
6923 /* do not save if explicitly told or if unmodified default settings */
6924 if ((save_type == SAVE_CONF_NEVER) ||
6925 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
6929 num_bytes += putFile16BitBE(file, element);
6931 num_bytes += putFile8Bit(file, conf_type);
6932 num_bytes += putFile16BitBE(file, num_elements * CONF_ELEMENT_NUM_BYTES);
6934 for (i = 0; i < num_elements; i++)
6935 num_bytes += putFile16BitBE(file, element_array[i]);
6937 else if (data_type == TYPE_CONTENT_LIST)
6939 struct Content *content = (struct Content *)(entry->value);
6940 int num_contents = *(int *)(entry->num_entities);
6943 /* check if any settings have been modified before saving them */
6944 for (i = 0; i < num_contents; i++)
6945 for (y = 0; y < 3; y++)
6946 for (x = 0; x < 3; x++)
6947 if (content[i].e[x][y] != default_value)
6950 /* do not save if explicitly told or if unmodified default settings */
6951 if ((save_type == SAVE_CONF_NEVER) ||
6952 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
6956 num_bytes += putFile16BitBE(file, element);
6958 num_bytes += putFile8Bit(file, conf_type);
6959 num_bytes += putFile16BitBE(file, num_contents * CONF_CONTENT_NUM_BYTES);
6961 for (i = 0; i < num_contents; i++)
6962 for (y = 0; y < 3; y++)
6963 for (x = 0; x < 3; x++)
6964 num_bytes += putFile16BitBE(file, content[i].e[x][y]);
6970 static int SaveLevel_INFO(FILE *file, struct LevelInfo *level)
6975 li = *level; /* copy level data into temporary buffer */
6977 for (i = 0; chunk_config_INFO[i].data_type != -1; i++)
6978 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_INFO[i], FALSE);
6983 static int SaveLevel_ELEM(FILE *file, struct LevelInfo *level)
6988 li = *level; /* copy level data into temporary buffer */
6990 for (i = 0; chunk_config_ELEM[i].data_type != -1; i++)
6991 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_ELEM[i], TRUE);
6996 static int SaveLevel_NOTE(FILE *file, struct LevelInfo *level, int element)
6998 int envelope_nr = element - EL_ENVELOPE_1;
7002 chunk_size += putFile16BitBE(file, element);
7004 /* copy envelope data into temporary buffer */
7005 xx_envelope = level->envelope[envelope_nr];
7007 for (i = 0; chunk_config_NOTE[i].data_type != -1; i++)
7008 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_NOTE[i], FALSE);
7013 static int SaveLevel_CUSX(FILE *file, struct LevelInfo *level, int element)
7015 struct ElementInfo *ei = &element_info[element];
7019 chunk_size += putFile16BitBE(file, element);
7021 xx_ei = *ei; /* copy element data into temporary buffer */
7023 /* set default description string for this specific element */
7024 strcpy(xx_default_description, getDefaultElementDescription(ei));
7026 for (i = 0; chunk_config_CUSX_base[i].data_type != -1; i++)
7027 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_CUSX_base[i], FALSE);
7029 for (i = 0; i < ei->num_change_pages; i++)
7031 struct ElementChangeInfo *change = &ei->change_page[i];
7033 xx_current_change_page = i;
7035 xx_change = *change; /* copy change data into temporary buffer */
7038 setEventBitsFromEventFlags(change);
7040 for (j = 0; chunk_config_CUSX_change[j].data_type != -1; j++)
7041 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_CUSX_change[j],
7048 static int SaveLevel_GRPX(FILE *file, struct LevelInfo *level, int element)
7050 struct ElementInfo *ei = &element_info[element];
7051 struct ElementGroupInfo *group = ei->group;
7055 chunk_size += putFile16BitBE(file, element);
7057 xx_ei = *ei; /* copy element data into temporary buffer */
7058 xx_group = *group; /* copy group data into temporary buffer */
7060 /* set default description string for this specific element */
7061 strcpy(xx_default_description, getDefaultElementDescription(ei));
7063 for (i = 0; chunk_config_GRPX[i].data_type != -1; i++)
7064 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_GRPX[i], FALSE);
7069 static void SaveLevelFromFilename(struct LevelInfo *level, char *filename,
7070 boolean save_as_template)
7076 if (!(file = fopen(filename, MODE_WRITE)))
7078 Error(ERR_WARN, "cannot save level file '%s'", filename);
7082 level->file_version = FILE_VERSION_ACTUAL;
7083 level->game_version = GAME_VERSION_ACTUAL;
7085 level->creation_date = getCurrentDate();
7087 putFileChunkBE(file, "RND1", CHUNK_SIZE_UNDEFINED);
7088 putFileChunkBE(file, "CAVE", CHUNK_SIZE_NONE);
7090 chunk_size = SaveLevel_VERS(NULL, level);
7091 putFileChunkBE(file, "VERS", chunk_size);
7092 SaveLevel_VERS(file, level);
7094 chunk_size = SaveLevel_DATE(NULL, level);
7095 putFileChunkBE(file, "DATE", chunk_size);
7096 SaveLevel_DATE(file, level);
7098 chunk_size = SaveLevel_NAME(NULL, level);
7099 putFileChunkBE(file, "NAME", chunk_size);
7100 SaveLevel_NAME(file, level);
7102 chunk_size = SaveLevel_AUTH(NULL, level);
7103 putFileChunkBE(file, "AUTH", chunk_size);
7104 SaveLevel_AUTH(file, level);
7106 chunk_size = SaveLevel_INFO(NULL, level);
7107 putFileChunkBE(file, "INFO", chunk_size);
7108 SaveLevel_INFO(file, level);
7110 chunk_size = SaveLevel_BODY(NULL, level);
7111 putFileChunkBE(file, "BODY", chunk_size);
7112 SaveLevel_BODY(file, level);
7114 chunk_size = SaveLevel_ELEM(NULL, level);
7115 if (chunk_size > LEVEL_CHUNK_ELEM_UNCHANGED) /* save if changed */
7117 putFileChunkBE(file, "ELEM", chunk_size);
7118 SaveLevel_ELEM(file, level);
7121 for (i = 0; i < NUM_ENVELOPES; i++)
7123 int element = EL_ENVELOPE_1 + i;
7125 chunk_size = SaveLevel_NOTE(NULL, level, element);
7126 if (chunk_size > LEVEL_CHUNK_NOTE_UNCHANGED) /* save if changed */
7128 putFileChunkBE(file, "NOTE", chunk_size);
7129 SaveLevel_NOTE(file, level, element);
7133 /* if not using template level, check for non-default custom/group elements */
7134 if (!level->use_custom_template || save_as_template)
7136 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
7138 int element = EL_CUSTOM_START + i;
7140 chunk_size = SaveLevel_CUSX(NULL, level, element);
7141 if (chunk_size > LEVEL_CHUNK_CUSX_UNCHANGED) /* save if changed */
7143 putFileChunkBE(file, "CUSX", chunk_size);
7144 SaveLevel_CUSX(file, level, element);
7148 for (i = 0; i < NUM_GROUP_ELEMENTS; i++)
7150 int element = EL_GROUP_START + i;
7152 chunk_size = SaveLevel_GRPX(NULL, level, element);
7153 if (chunk_size > LEVEL_CHUNK_GRPX_UNCHANGED) /* save if changed */
7155 putFileChunkBE(file, "GRPX", chunk_size);
7156 SaveLevel_GRPX(file, level, element);
7163 SetFilePermissions(filename, PERMS_PRIVATE);
7166 void SaveLevel(int nr)
7168 char *filename = getDefaultLevelFilename(nr);
7170 SaveLevelFromFilename(&level, filename, FALSE);
7173 void SaveLevelTemplate()
7175 char *filename = getLocalLevelTemplateFilename();
7177 SaveLevelFromFilename(&level, filename, TRUE);
7180 boolean SaveLevelChecked(int nr)
7182 char *filename = getDefaultLevelFilename(nr);
7183 boolean new_level = !fileExists(filename);
7184 boolean level_saved = FALSE;
7186 if (new_level || Request("Save this level and kill the old?", REQ_ASK))
7191 Request("Level saved!", REQ_CONFIRM);
7199 void DumpLevel(struct LevelInfo *level)
7201 if (level->no_level_file || level->no_valid_file)
7203 Error(ERR_WARN, "cannot dump -- no valid level file found");
7209 Print("Level xxx (file version %08d, game version %08d)\n",
7210 level->file_version, level->game_version);
7213 Print("Level author: '%s'\n", level->author);
7214 Print("Level title: '%s'\n", level->name);
7216 Print("Playfield size: %d x %d\n", level->fieldx, level->fieldy);
7218 Print("Level time: %d seconds\n", level->time);
7219 Print("Gems needed: %d\n", level->gems_needed);
7221 Print("Time for magic wall: %d seconds\n", level->time_magic_wall);
7222 Print("Time for wheel: %d seconds\n", level->time_wheel);
7223 Print("Time for light: %d seconds\n", level->time_light);
7224 Print("Time for timegate: %d seconds\n", level->time_timegate);
7226 Print("Amoeba speed: %d\n", level->amoeba_speed);
7229 Print("EM style slippery gems: %s\n", (level->em_slippery_gems ? "yes" : "no"));
7230 Print("Player blocks last field: %s\n", (level->block_last_field ? "yes" : "no"));
7231 Print("SP player blocks last field: %s\n", (level->sp_block_last_field ? "yes" : "no"));
7232 Print("use spring bug: %s\n", (level->use_spring_bug ? "yes" : "no"));
7233 Print("use step counter: %s\n", (level->use_step_counter ? "yes" : "no"));
7239 /* ========================================================================= */
7240 /* tape file functions */
7241 /* ========================================================================= */
7243 static void setTapeInfoToDefaults()
7247 /* always start with reliable default values (empty tape) */
7250 /* default values (also for pre-1.2 tapes) with only the first player */
7251 tape.player_participates[0] = TRUE;
7252 for (i = 1; i < MAX_PLAYERS; i++)
7253 tape.player_participates[i] = FALSE;
7255 /* at least one (default: the first) player participates in every tape */
7256 tape.num_participating_players = 1;
7258 tape.level_nr = level_nr;
7260 tape.changed = FALSE;
7262 tape.recording = FALSE;
7263 tape.playing = FALSE;
7264 tape.pausing = FALSE;
7266 tape.no_valid_file = FALSE;
7269 static int LoadTape_VERS(File *file, int chunk_size, struct TapeInfo *tape)
7271 tape->file_version = getFileVersion(file);
7272 tape->game_version = getFileVersion(file);
7277 static int LoadTape_HEAD(File *file, int chunk_size, struct TapeInfo *tape)
7281 tape->random_seed = getFile32BitBE(file);
7282 tape->date = getFile32BitBE(file);
7283 tape->length = getFile32BitBE(file);
7285 /* read header fields that are new since version 1.2 */
7286 if (tape->file_version >= FILE_VERSION_1_2)
7288 byte store_participating_players = getFile8Bit(file);
7291 /* since version 1.2, tapes store which players participate in the tape */
7292 tape->num_participating_players = 0;
7293 for (i = 0; i < MAX_PLAYERS; i++)
7295 tape->player_participates[i] = FALSE;
7297 if (store_participating_players & (1 << i))
7299 tape->player_participates[i] = TRUE;
7300 tape->num_participating_players++;
7304 ReadUnusedBytesFromFile(file, TAPE_CHUNK_HEAD_UNUSED);
7306 engine_version = getFileVersion(file);
7307 if (engine_version > 0)
7308 tape->engine_version = engine_version;
7310 tape->engine_version = tape->game_version;
7316 static int LoadTape_INFO(File *file, int chunk_size, struct TapeInfo *tape)
7318 int level_identifier_size;
7321 level_identifier_size = getFile16BitBE(file);
7323 tape->level_identifier =
7324 checked_realloc(tape->level_identifier, level_identifier_size);
7326 for (i = 0; i < level_identifier_size; i++)
7327 tape->level_identifier[i] = getFile8Bit(file);
7329 tape->level_nr = getFile16BitBE(file);
7331 chunk_size = 2 + level_identifier_size + 2;
7336 static int LoadTape_BODY(File *file, int chunk_size, struct TapeInfo *tape)
7339 int chunk_size_expected =
7340 (tape->num_participating_players + 1) * tape->length;
7342 if (chunk_size_expected != chunk_size)
7344 ReadUnusedBytesFromFile(file, chunk_size);
7345 return chunk_size_expected;
7348 for (i = 0; i < tape->length; i++)
7350 if (i >= MAX_TAPE_LEN)
7353 for (j = 0; j < MAX_PLAYERS; j++)
7355 tape->pos[i].action[j] = MV_NONE;
7357 if (tape->player_participates[j])
7358 tape->pos[i].action[j] = getFile8Bit(file);
7361 tape->pos[i].delay = getFile8Bit(file);
7363 if (tape->file_version == FILE_VERSION_1_0)
7365 /* eliminate possible diagonal moves in old tapes */
7366 /* this is only for backward compatibility */
7368 byte joy_dir[4] = { JOY_LEFT, JOY_RIGHT, JOY_UP, JOY_DOWN };
7369 byte action = tape->pos[i].action[0];
7370 int k, num_moves = 0;
7372 for (k = 0; k<4; k++)
7374 if (action & joy_dir[k])
7376 tape->pos[i + num_moves].action[0] = joy_dir[k];
7378 tape->pos[i + num_moves].delay = 0;
7387 tape->length += num_moves;
7390 else if (tape->file_version < FILE_VERSION_2_0)
7392 /* convert pre-2.0 tapes to new tape format */
7394 if (tape->pos[i].delay > 1)
7397 tape->pos[i + 1] = tape->pos[i];
7398 tape->pos[i + 1].delay = 1;
7401 for (j = 0; j < MAX_PLAYERS; j++)
7402 tape->pos[i].action[j] = MV_NONE;
7403 tape->pos[i].delay--;
7410 if (checkEndOfFile(file))
7414 if (i != tape->length)
7415 chunk_size = (tape->num_participating_players + 1) * i;
7420 void LoadTape_SokobanSolution(char *filename)
7423 int move_delay = TILESIZE / level.initial_player_stepsize[0];
7425 if (!(file = openFile(filename, MODE_READ)))
7427 tape.no_valid_file = TRUE;
7432 while (!checkEndOfFile(file))
7434 unsigned char c = getByteFromFile(file);
7436 if (checkEndOfFile(file))
7443 tape.pos[tape.length].action[0] = MV_UP;
7444 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
7450 tape.pos[tape.length].action[0] = MV_DOWN;
7451 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
7457 tape.pos[tape.length].action[0] = MV_LEFT;
7458 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
7464 tape.pos[tape.length].action[0] = MV_RIGHT;
7465 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
7473 /* ignore white-space characters */
7477 tape.no_valid_file = TRUE;
7479 Error(ERR_WARN, "unsupported Sokoban solution file '%s' ['%d']", filename, c);
7487 if (tape.no_valid_file)
7490 tape.length_frames = GetTapeLengthFrames();
7491 tape.length_seconds = GetTapeLengthSeconds();
7494 void LoadTapeFromFilename(char *filename)
7496 char cookie[MAX_LINE_LEN];
7497 char chunk_name[CHUNK_ID_LEN + 1];
7501 /* always start with reliable default values */
7502 setTapeInfoToDefaults();
7504 if (strSuffix(filename, ".sln"))
7506 LoadTape_SokobanSolution(filename);
7511 if (!(file = openFile(filename, MODE_READ)))
7513 tape.no_valid_file = TRUE;
7518 getFileChunkBE(file, chunk_name, NULL);
7519 if (strEqual(chunk_name, "RND1"))
7521 getFile32BitBE(file); /* not used */
7523 getFileChunkBE(file, chunk_name, NULL);
7524 if (!strEqual(chunk_name, "TAPE"))
7526 tape.no_valid_file = TRUE;
7528 Error(ERR_WARN, "unknown format of tape file '%s'", filename);
7535 else /* check for pre-2.0 file format with cookie string */
7537 strcpy(cookie, chunk_name);
7538 if (getStringFromFile(file, &cookie[4], MAX_LINE_LEN - 4) == NULL)
7540 if (strlen(cookie) > 0 && cookie[strlen(cookie) - 1] == '\n')
7541 cookie[strlen(cookie) - 1] = '\0';
7543 if (!checkCookieString(cookie, TAPE_COOKIE_TMPL))
7545 tape.no_valid_file = TRUE;
7547 Error(ERR_WARN, "unknown format of tape file '%s'", filename);
7554 if ((tape.file_version = getFileVersionFromCookieString(cookie)) == -1)
7556 tape.no_valid_file = TRUE;
7558 Error(ERR_WARN, "unsupported version of tape file '%s'", filename);
7565 /* pre-2.0 tape files have no game version, so use file version here */
7566 tape.game_version = tape.file_version;
7569 if (tape.file_version < FILE_VERSION_1_2)
7571 /* tape files from versions before 1.2.0 without chunk structure */
7572 LoadTape_HEAD(file, TAPE_CHUNK_HEAD_SIZE, &tape);
7573 LoadTape_BODY(file, 2 * tape.length, &tape);
7581 int (*loader)(File *, int, struct TapeInfo *);
7585 { "VERS", TAPE_CHUNK_VERS_SIZE, LoadTape_VERS },
7586 { "HEAD", TAPE_CHUNK_HEAD_SIZE, LoadTape_HEAD },
7587 { "INFO", -1, LoadTape_INFO },
7588 { "BODY", -1, LoadTape_BODY },
7592 while (getFileChunkBE(file, chunk_name, &chunk_size))
7596 while (chunk_info[i].name != NULL &&
7597 !strEqual(chunk_name, chunk_info[i].name))
7600 if (chunk_info[i].name == NULL)
7602 Error(ERR_WARN, "unknown chunk '%s' in tape file '%s'",
7603 chunk_name, filename);
7604 ReadUnusedBytesFromFile(file, chunk_size);
7606 else if (chunk_info[i].size != -1 &&
7607 chunk_info[i].size != chunk_size)
7609 Error(ERR_WARN, "wrong size (%d) of chunk '%s' in tape file '%s'",
7610 chunk_size, chunk_name, filename);
7611 ReadUnusedBytesFromFile(file, chunk_size);
7615 /* call function to load this tape chunk */
7616 int chunk_size_expected =
7617 (chunk_info[i].loader)(file, chunk_size, &tape);
7619 /* the size of some chunks cannot be checked before reading other
7620 chunks first (like "HEAD" and "BODY") that contain some header
7621 information, so check them here */
7622 if (chunk_size_expected != chunk_size)
7624 Error(ERR_WARN, "wrong size (%d) of chunk '%s' in tape file '%s'",
7625 chunk_size, chunk_name, filename);
7633 tape.length_frames = GetTapeLengthFrames();
7634 tape.length_seconds = GetTapeLengthSeconds();
7637 printf("::: tape file version: %d\n", tape.file_version);
7638 printf("::: tape game version: %d\n", tape.game_version);
7639 printf("::: tape engine version: %d\n", tape.engine_version);
7643 void LoadTape(int nr)
7645 char *filename = getTapeFilename(nr);
7647 LoadTapeFromFilename(filename);
7650 void LoadSolutionTape(int nr)
7652 char *filename = getSolutionTapeFilename(nr);
7654 LoadTapeFromFilename(filename);
7656 if (TAPE_IS_EMPTY(tape) &&
7657 level.game_engine_type == GAME_ENGINE_TYPE_SP &&
7658 level.native_sp_level->demo.is_available)
7659 CopyNativeTape_SP_to_RND(&level);
7662 static void SaveTape_VERS(FILE *file, struct TapeInfo *tape)
7664 putFileVersion(file, tape->file_version);
7665 putFileVersion(file, tape->game_version);
7668 static void SaveTape_HEAD(FILE *file, struct TapeInfo *tape)
7671 byte store_participating_players = 0;
7673 /* set bits for participating players for compact storage */
7674 for (i = 0; i < MAX_PLAYERS; i++)
7675 if (tape->player_participates[i])
7676 store_participating_players |= (1 << i);
7678 putFile32BitBE(file, tape->random_seed);
7679 putFile32BitBE(file, tape->date);
7680 putFile32BitBE(file, tape->length);
7682 putFile8Bit(file, store_participating_players);
7684 /* unused bytes not at the end here for 4-byte alignment of engine_version */
7685 WriteUnusedBytesToFile(file, TAPE_CHUNK_HEAD_UNUSED);
7687 putFileVersion(file, tape->engine_version);
7690 static void SaveTape_INFO(FILE *file, struct TapeInfo *tape)
7692 int level_identifier_size = strlen(tape->level_identifier) + 1;
7695 putFile16BitBE(file, level_identifier_size);
7697 for (i = 0; i < level_identifier_size; i++)
7698 putFile8Bit(file, tape->level_identifier[i]);
7700 putFile16BitBE(file, tape->level_nr);
7703 static void SaveTape_BODY(FILE *file, struct TapeInfo *tape)
7707 for (i = 0; i < tape->length; i++)
7709 for (j = 0; j < MAX_PLAYERS; j++)
7710 if (tape->player_participates[j])
7711 putFile8Bit(file, tape->pos[i].action[j]);
7713 putFile8Bit(file, tape->pos[i].delay);
7717 void SaveTape(int nr)
7719 char *filename = getTapeFilename(nr);
7721 int num_participating_players = 0;
7722 int info_chunk_size;
7723 int body_chunk_size;
7726 InitTapeDirectory(leveldir_current->subdir);
7728 if (!(file = fopen(filename, MODE_WRITE)))
7730 Error(ERR_WARN, "cannot save level recording file '%s'", filename);
7734 tape.file_version = FILE_VERSION_ACTUAL;
7735 tape.game_version = GAME_VERSION_ACTUAL;
7737 /* count number of participating players */
7738 for (i = 0; i < MAX_PLAYERS; i++)
7739 if (tape.player_participates[i])
7740 num_participating_players++;
7742 info_chunk_size = 2 + (strlen(tape.level_identifier) + 1) + 2;
7743 body_chunk_size = (num_participating_players + 1) * tape.length;
7745 putFileChunkBE(file, "RND1", CHUNK_SIZE_UNDEFINED);
7746 putFileChunkBE(file, "TAPE", CHUNK_SIZE_NONE);
7748 putFileChunkBE(file, "VERS", TAPE_CHUNK_VERS_SIZE);
7749 SaveTape_VERS(file, &tape);
7751 putFileChunkBE(file, "HEAD", TAPE_CHUNK_HEAD_SIZE);
7752 SaveTape_HEAD(file, &tape);
7754 putFileChunkBE(file, "INFO", info_chunk_size);
7755 SaveTape_INFO(file, &tape);
7757 putFileChunkBE(file, "BODY", body_chunk_size);
7758 SaveTape_BODY(file, &tape);
7762 SetFilePermissions(filename, PERMS_PRIVATE);
7764 tape.changed = FALSE;
7767 boolean SaveTapeChecked(int nr)
7769 char *filename = getTapeFilename(nr);
7770 boolean new_tape = !fileExists(filename);
7771 boolean tape_saved = FALSE;
7773 if (new_tape || Request("Replace old tape?", REQ_ASK))
7778 Request("Tape saved!", REQ_CONFIRM);
7786 void DumpTape(struct TapeInfo *tape)
7788 int tape_frame_counter;
7791 if (tape->no_valid_file)
7793 Error(ERR_WARN, "cannot dump -- no valid tape file found");
7799 Print("Tape of Level %03d (file version %08d, game version %08d)\n",
7800 tape->level_nr, tape->file_version, tape->game_version);
7801 Print(" (effective engine version %08d)\n",
7802 tape->engine_version);
7803 Print("Level series identifier: '%s'\n", tape->level_identifier);
7806 tape_frame_counter = 0;
7808 for (i = 0; i < tape->length; i++)
7810 if (i >= MAX_TAPE_LEN)
7815 for (j = 0; j < MAX_PLAYERS; j++)
7817 if (tape->player_participates[j])
7819 int action = tape->pos[i].action[j];
7821 Print("%d:%02x ", j, action);
7822 Print("[%c%c%c%c|%c%c] - ",
7823 (action & JOY_LEFT ? '<' : ' '),
7824 (action & JOY_RIGHT ? '>' : ' '),
7825 (action & JOY_UP ? '^' : ' '),
7826 (action & JOY_DOWN ? 'v' : ' '),
7827 (action & JOY_BUTTON_1 ? '1' : ' '),
7828 (action & JOY_BUTTON_2 ? '2' : ' '));
7832 Print("(%03d) ", tape->pos[i].delay);
7833 Print("[%05d]\n", tape_frame_counter);
7835 tape_frame_counter += tape->pos[i].delay;
7842 /* ========================================================================= */
7843 /* score file functions */
7844 /* ========================================================================= */
7846 void LoadScore(int nr)
7849 char *filename = getScoreFilename(nr);
7850 char cookie[MAX_LINE_LEN];
7851 char line[MAX_LINE_LEN];
7855 /* always start with reliable default values */
7856 for (i = 0; i < MAX_SCORE_ENTRIES; i++)
7858 strcpy(highscore[i].Name, EMPTY_PLAYER_NAME);
7859 highscore[i].Score = 0;
7862 if (!(file = fopen(filename, MODE_READ)))
7865 /* check file identifier */
7866 if (fgets(cookie, MAX_LINE_LEN, file) == NULL)
7868 if (strlen(cookie) > 0 && cookie[strlen(cookie) - 1] == '\n')
7869 cookie[strlen(cookie) - 1] = '\0';
7871 if (!checkCookieString(cookie, SCORE_COOKIE))
7873 Error(ERR_WARN, "unknown format of score file '%s'", filename);
7878 for (i = 0; i < MAX_SCORE_ENTRIES; i++)
7880 if (fscanf(file, "%d", &highscore[i].Score) == EOF)
7881 Error(ERR_WARN, "fscanf() failed; %s", strerror(errno));
7882 if (fgets(line, MAX_LINE_LEN, file) == NULL)
7885 if (strlen(line) > 0 && line[strlen(line) - 1] == '\n')
7886 line[strlen(line) - 1] = '\0';
7888 for (line_ptr = line; *line_ptr; line_ptr++)
7890 if (*line_ptr != ' ' && *line_ptr != '\t' && *line_ptr != '\0')
7892 strncpy(highscore[i].Name, line_ptr, MAX_PLAYER_NAME_LEN);
7893 highscore[i].Name[MAX_PLAYER_NAME_LEN] = '\0';
7902 void SaveScore(int nr)
7905 int permissions = (program.global_scores ? PERMS_PUBLIC : PERMS_PRIVATE);
7906 char *filename = getScoreFilename(nr);
7909 InitScoreDirectory(leveldir_current->subdir);
7911 if (!(file = fopen(filename, MODE_WRITE)))
7913 Error(ERR_WARN, "cannot save score for level %d", nr);
7917 fprintf(file, "%s\n\n", SCORE_COOKIE);
7919 for (i = 0; i < MAX_SCORE_ENTRIES; i++)
7920 fprintf(file, "%d %s\n", highscore[i].Score, highscore[i].Name);
7924 SetFilePermissions(filename, permissions);
7928 /* ========================================================================= */
7929 /* setup file functions */
7930 /* ========================================================================= */
7932 #define TOKEN_STR_PLAYER_PREFIX "player_"
7935 #define SETUP_TOKEN_PLAYER_NAME 0
7936 #define SETUP_TOKEN_SOUND 1
7937 #define SETUP_TOKEN_SOUND_LOOPS 2
7938 #define SETUP_TOKEN_SOUND_MUSIC 3
7939 #define SETUP_TOKEN_SOUND_SIMPLE 4
7940 #define SETUP_TOKEN_TOONS 5
7941 #define SETUP_TOKEN_SCROLL_DELAY 6
7942 #define SETUP_TOKEN_SCROLL_DELAY_VALUE 7
7943 #define SETUP_TOKEN_ENGINE_SNAPSHOT_MODE 8
7944 #define SETUP_TOKEN_ENGINE_SNAPSHOT_MEMORY 9
7945 #define SETUP_TOKEN_FADE_SCREENS 10
7946 #define SETUP_TOKEN_AUTORECORD 11
7947 #define SETUP_TOKEN_SHOW_TITLESCREEN 12
7948 #define SETUP_TOKEN_QUICK_DOORS 13
7949 #define SETUP_TOKEN_TEAM_MODE 14
7950 #define SETUP_TOKEN_HANDICAP 15
7951 #define SETUP_TOKEN_SKIP_LEVELS 16
7952 #define SETUP_TOKEN_INCREMENT_LEVELS 17
7953 #define SETUP_TOKEN_TIME_LIMIT 18
7954 #define SETUP_TOKEN_FULLSCREEN 19
7955 #define SETUP_TOKEN_WINDOW_SCALING_PERCENT 20
7956 #define SETUP_TOKEN_WINDOW_SCALING_QUALITY 21
7957 #define SETUP_TOKEN_SCREEN_RENDERING_MODE 22
7958 #define SETUP_TOKEN_ASK_ON_ESCAPE 23
7959 #define SETUP_TOKEN_ASK_ON_ESCAPE_EDITOR 24
7960 #define SETUP_TOKEN_QUICK_SWITCH 25
7961 #define SETUP_TOKEN_INPUT_ON_FOCUS 26
7962 #define SETUP_TOKEN_PREFER_AGA_GRAPHICS 27
7963 #define SETUP_TOKEN_GAME_FRAME_DELAY 28
7964 #define SETUP_TOKEN_SP_SHOW_BORDER_ELEMENTS 29
7965 #define SETUP_TOKEN_SMALL_GAME_GRAPHICS 30
7966 #define SETUP_TOKEN_SHOW_SNAPSHOT_BUTTONS 31
7967 #define SETUP_TOKEN_GRAPHICS_SET 32
7968 #define SETUP_TOKEN_SOUNDS_SET 33
7969 #define SETUP_TOKEN_MUSIC_SET 34
7970 #define SETUP_TOKEN_OVERRIDE_LEVEL_GRAPHICS 35
7971 #define SETUP_TOKEN_OVERRIDE_LEVEL_SOUNDS 36
7972 #define SETUP_TOKEN_OVERRIDE_LEVEL_MUSIC 37
7973 #define SETUP_TOKEN_VOLUME_SIMPLE 38
7974 #define SETUP_TOKEN_VOLUME_LOOPS 39
7975 #define SETUP_TOKEN_VOLUME_MUSIC 40
7976 #define SETUP_TOKEN_TOUCH_CONTROL_TYPE 41
7977 #define SETUP_TOKEN_TOUCH_MOVE_DISTANCE 42
7978 #define SETUP_TOKEN_TOUCH_DROP_DISTANCE 43
7980 #define NUM_GLOBAL_SETUP_TOKENS 44
7983 #define SETUP_TOKEN_EDITOR_EL_CLASSIC 0
7984 #define SETUP_TOKEN_EDITOR_EL_CUSTOM 1
7985 #define SETUP_TOKEN_EDITOR_EL_USER_DEFINED 2
7986 #define SETUP_TOKEN_EDITOR_EL_DYNAMIC 3
7987 #define SETUP_TOKEN_EDITOR_EL_HEADLINES 4
7988 #define SETUP_TOKEN_EDITOR_SHOW_ELEMENT_TOKEN 5
7990 #define NUM_EDITOR_SETUP_TOKENS 6
7992 /* editor cascade setup */
7993 #define SETUP_TOKEN_EDITOR_CASCADE_BD 0
7994 #define SETUP_TOKEN_EDITOR_CASCADE_EM 1
7995 #define SETUP_TOKEN_EDITOR_CASCADE_EMC 2
7996 #define SETUP_TOKEN_EDITOR_CASCADE_RND 3
7997 #define SETUP_TOKEN_EDITOR_CASCADE_SB 4
7998 #define SETUP_TOKEN_EDITOR_CASCADE_SP 5
7999 #define SETUP_TOKEN_EDITOR_CASCADE_DC 6
8000 #define SETUP_TOKEN_EDITOR_CASCADE_DX 7
8001 #define SETUP_TOKEN_EDITOR_CASCADE_TEXT 8
8002 #define SETUP_TOKEN_EDITOR_CASCADE_STEELTEXT 9
8003 #define SETUP_TOKEN_EDITOR_CASCADE_CE 10
8004 #define SETUP_TOKEN_EDITOR_CASCADE_GE 11
8005 #define SETUP_TOKEN_EDITOR_CASCADE_REF 12
8006 #define SETUP_TOKEN_EDITOR_CASCADE_USER 13
8007 #define SETUP_TOKEN_EDITOR_CASCADE_DYNAMIC 14
8009 #define NUM_EDITOR_CASCADE_SETUP_TOKENS 15
8011 /* shortcut setup */
8012 #define SETUP_TOKEN_SHORTCUT_SAVE_GAME 0
8013 #define SETUP_TOKEN_SHORTCUT_LOAD_GAME 1
8014 #define SETUP_TOKEN_SHORTCUT_TOGGLE_PAUSE 2
8015 #define SETUP_TOKEN_SHORTCUT_FOCUS_PLAYER_1 3
8016 #define SETUP_TOKEN_SHORTCUT_FOCUS_PLAYER_2 4
8017 #define SETUP_TOKEN_SHORTCUT_FOCUS_PLAYER_3 5
8018 #define SETUP_TOKEN_SHORTCUT_FOCUS_PLAYER_4 6
8019 #define SETUP_TOKEN_SHORTCUT_FOCUS_PLAYER_ALL 7
8020 #define SETUP_TOKEN_SHORTCUT_TAPE_EJECT 8
8021 #define SETUP_TOKEN_SHORTCUT_TAPE_EXTRA 9
8022 #define SETUP_TOKEN_SHORTCUT_TAPE_STOP 10
8023 #define SETUP_TOKEN_SHORTCUT_TAPE_PAUSE 11
8024 #define SETUP_TOKEN_SHORTCUT_TAPE_RECORD 12
8025 #define SETUP_TOKEN_SHORTCUT_TAPE_PLAY 13
8026 #define SETUP_TOKEN_SHORTCUT_SOUND_SIMPLE 14
8027 #define SETUP_TOKEN_SHORTCUT_SOUND_LOOPS 15
8028 #define SETUP_TOKEN_SHORTCUT_SOUND_MUSIC 16
8029 #define SETUP_TOKEN_SHORTCUT_SNAP_LEFT 17
8030 #define SETUP_TOKEN_SHORTCUT_SNAP_RIGHT 18
8031 #define SETUP_TOKEN_SHORTCUT_SNAP_UP 19
8032 #define SETUP_TOKEN_SHORTCUT_SNAP_DOWN 20
8034 #define NUM_SHORTCUT_SETUP_TOKENS 21
8037 #define SETUP_TOKEN_PLAYER_USE_JOYSTICK 0
8038 #define SETUP_TOKEN_PLAYER_JOY_DEVICE_NAME 1
8039 #define SETUP_TOKEN_PLAYER_JOY_XLEFT 2
8040 #define SETUP_TOKEN_PLAYER_JOY_XMIDDLE 3
8041 #define SETUP_TOKEN_PLAYER_JOY_XRIGHT 4
8042 #define SETUP_TOKEN_PLAYER_JOY_YUPPER 5
8043 #define SETUP_TOKEN_PLAYER_JOY_YMIDDLE 6
8044 #define SETUP_TOKEN_PLAYER_JOY_YLOWER 7
8045 #define SETUP_TOKEN_PLAYER_JOY_SNAP 8
8046 #define SETUP_TOKEN_PLAYER_JOY_DROP 9
8047 #define SETUP_TOKEN_PLAYER_KEY_LEFT 10
8048 #define SETUP_TOKEN_PLAYER_KEY_RIGHT 11
8049 #define SETUP_TOKEN_PLAYER_KEY_UP 12
8050 #define SETUP_TOKEN_PLAYER_KEY_DOWN 13
8051 #define SETUP_TOKEN_PLAYER_KEY_SNAP 14
8052 #define SETUP_TOKEN_PLAYER_KEY_DROP 15
8054 #define NUM_PLAYER_SETUP_TOKENS 16
8057 #define SETUP_TOKEN_SYSTEM_SDL_VIDEODRIVER 0
8058 #define SETUP_TOKEN_SYSTEM_SDL_AUDIODRIVER 1
8059 #define SETUP_TOKEN_SYSTEM_AUDIO_FRAGMENT_SIZE 2
8061 #define NUM_SYSTEM_SETUP_TOKENS 3
8063 /* internal setup */
8064 #define SETUP_TOKEN_INT_PROGRAM_TITLE 0
8065 #define SETUP_TOKEN_INT_PROGRAM_VERSION 1
8066 #define SETUP_TOKEN_INT_PROGRAM_AUTHOR 2
8067 #define SETUP_TOKEN_INT_PROGRAM_EMAIL 3
8068 #define SETUP_TOKEN_INT_PROGRAM_WEBSITE 4
8069 #define SETUP_TOKEN_INT_PROGRAM_COPYRIGHT 5
8070 #define SETUP_TOKEN_INT_PROGRAM_COMPANY 6
8071 #define SETUP_TOKEN_INT_PROGRAM_ICON_FILE 7
8072 #define SETUP_TOKEN_INT_DEFAULT_GRAPHICS_SET 8
8073 #define SETUP_TOKEN_INT_DEFAULT_SOUNDS_SET 9
8074 #define SETUP_TOKEN_INT_DEFAULT_MUSIC_SET 10
8075 #define SETUP_TOKEN_INT_FALLBACK_GRAPHICS_FILE 11
8076 #define SETUP_TOKEN_INT_FALLBACK_SOUNDS_FILE 12
8077 #define SETUP_TOKEN_INT_FALLBACK_MUSIC_FILE 13
8078 #define SETUP_TOKEN_INT_DEFAULT_LEVEL_SERIES 14
8079 #define SETUP_TOKEN_INT_CHOOSE_FROM_TOP_LEVELDIR 15
8080 #define SETUP_TOKEN_INT_SHOW_SCALING_IN_TITLE 16
8081 #define SETUP_TOKEN_INT_DEFAULT_WINDOW_WIDTH 17
8082 #define SETUP_TOKEN_INT_DEFAULT_WINDOW_HEIGHT 18
8084 #define NUM_INTERNAL_SETUP_TOKENS 19
8087 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_0 0
8088 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_1 1
8089 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_2 2
8090 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_3 3
8091 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_4 4
8092 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_5 5
8093 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_6 6
8094 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_7 7
8095 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_8 8
8096 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_9 9
8097 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_0 10
8098 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_1 11
8099 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_2 12
8100 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_3 13
8101 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_4 14
8102 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_5 15
8103 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_6 16
8104 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_7 17
8105 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_8 18
8106 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_KEY_9 19
8107 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_USE_MOD_KEY 20
8108 #define SETUP_TOKEN_DEBUG_FRAME_DELAY_GAME_ONLY 21
8109 #define SETUP_TOKEN_DEBUG_SHOW_FRAMES_PER_SECOND 22
8111 #define NUM_DEBUG_SETUP_TOKENS 23
8114 #define SETUP_TOKEN_OPTIONS_VERBOSE 0
8116 #define NUM_OPTIONS_SETUP_TOKENS 1
8119 static struct SetupInfo si;
8120 static struct SetupEditorInfo sei;
8121 static struct SetupEditorCascadeInfo seci;
8122 static struct SetupShortcutInfo ssi;
8123 static struct SetupInputInfo sii;
8124 static struct SetupSystemInfo syi;
8125 static struct SetupInternalInfo sxi;
8126 static struct SetupDebugInfo sdi;
8127 static struct OptionInfo soi;
8129 static struct TokenInfo global_setup_tokens[] =
8131 { TYPE_STRING, &si.player_name, "player_name" },
8132 { TYPE_SWITCH, &si.sound, "sound" },
8133 { TYPE_SWITCH, &si.sound_loops, "repeating_sound_loops" },
8134 { TYPE_SWITCH, &si.sound_music, "background_music" },
8135 { TYPE_SWITCH, &si.sound_simple, "simple_sound_effects" },
8136 { TYPE_SWITCH, &si.toons, "toons" },
8137 { TYPE_SWITCH, &si.scroll_delay, "scroll_delay" },
8138 { TYPE_INTEGER,&si.scroll_delay_value, "scroll_delay_value" },
8139 { TYPE_STRING, &si.engine_snapshot_mode, "engine_snapshot_mode" },
8140 { TYPE_INTEGER,&si.engine_snapshot_memory, "engine_snapshot_memory" },
8141 { TYPE_SWITCH, &si.fade_screens, "fade_screens" },
8142 { TYPE_SWITCH, &si.autorecord, "automatic_tape_recording"},
8143 { TYPE_SWITCH, &si.show_titlescreen, "show_titlescreen" },
8144 { TYPE_SWITCH, &si.quick_doors, "quick_doors" },
8145 { TYPE_SWITCH, &si.team_mode, "team_mode" },
8146 { TYPE_SWITCH, &si.handicap, "handicap" },
8147 { TYPE_SWITCH, &si.skip_levels, "skip_levels" },
8148 { TYPE_SWITCH, &si.increment_levels, "increment_levels" },
8149 { TYPE_SWITCH, &si.time_limit, "time_limit" },
8150 { TYPE_SWITCH, &si.fullscreen, "fullscreen" },
8151 { TYPE_INTEGER,&si.window_scaling_percent, "window_scaling_percent" },
8152 { TYPE_STRING, &si.window_scaling_quality, "window_scaling_quality" },
8153 { TYPE_STRING, &si.screen_rendering_mode, "screen_rendering_mode" },
8154 { TYPE_SWITCH, &si.ask_on_escape, "ask_on_escape" },
8155 { TYPE_SWITCH, &si.ask_on_escape_editor, "ask_on_escape_editor" },
8156 { TYPE_SWITCH, &si.quick_switch, "quick_player_switch" },
8157 { TYPE_SWITCH, &si.input_on_focus, "input_on_focus" },
8158 { TYPE_SWITCH, &si.prefer_aga_graphics, "prefer_aga_graphics" },
8159 { TYPE_INTEGER,&si.game_frame_delay, "game_frame_delay" },
8160 { TYPE_SWITCH, &si.sp_show_border_elements, "sp_show_border_elements" },
8161 { TYPE_SWITCH, &si.small_game_graphics, "small_game_graphics" },
8162 { TYPE_SWITCH, &si.show_snapshot_buttons, "show_snapshot_buttons" },
8163 { TYPE_STRING, &si.graphics_set, "graphics_set" },
8164 { TYPE_STRING, &si.sounds_set, "sounds_set" },
8165 { TYPE_STRING, &si.music_set, "music_set" },
8166 { TYPE_SWITCH3,&si.override_level_graphics, "override_level_graphics" },
8167 { TYPE_SWITCH3,&si.override_level_sounds, "override_level_sounds" },
8168 { TYPE_SWITCH3,&si.override_level_music, "override_level_music" },
8169 { TYPE_INTEGER,&si.volume_simple, "volume_simple" },
8170 { TYPE_INTEGER,&si.volume_loops, "volume_loops" },
8171 { TYPE_INTEGER,&si.volume_music, "volume_music" },
8172 { TYPE_STRING, &si.touch.control_type, "touch.control_type" },
8173 { TYPE_INTEGER,&si.touch.move_distance, "touch.move_distance" },
8174 { TYPE_INTEGER,&si.touch.drop_distance, "touch.drop_distance" },
8177 static struct TokenInfo editor_setup_tokens[] =
8179 { TYPE_SWITCH, &sei.el_classic, "editor.el_classic" },
8180 { TYPE_SWITCH, &sei.el_custom, "editor.el_custom" },
8181 { TYPE_SWITCH, &sei.el_user_defined, "editor.el_user_defined" },
8182 { TYPE_SWITCH, &sei.el_dynamic, "editor.el_dynamic" },
8183 { TYPE_SWITCH, &sei.el_headlines, "editor.el_headlines" },
8184 { TYPE_SWITCH, &sei.show_element_token,"editor.show_element_token" },
8187 static struct TokenInfo editor_cascade_setup_tokens[] =
8189 { TYPE_SWITCH, &seci.el_bd, "editor.cascade.el_bd" },
8190 { TYPE_SWITCH, &seci.el_em, "editor.cascade.el_em" },
8191 { TYPE_SWITCH, &seci.el_emc, "editor.cascade.el_emc" },
8192 { TYPE_SWITCH, &seci.el_rnd, "editor.cascade.el_rnd" },
8193 { TYPE_SWITCH, &seci.el_sb, "editor.cascade.el_sb" },
8194 { TYPE_SWITCH, &seci.el_sp, "editor.cascade.el_sp" },
8195 { TYPE_SWITCH, &seci.el_dc, "editor.cascade.el_dc" },
8196 { TYPE_SWITCH, &seci.el_dx, "editor.cascade.el_dx" },
8197 { TYPE_SWITCH, &seci.el_chars, "editor.cascade.el_chars" },
8198 { TYPE_SWITCH, &seci.el_steel_chars, "editor.cascade.el_steel_chars" },
8199 { TYPE_SWITCH, &seci.el_ce, "editor.cascade.el_ce" },
8200 { TYPE_SWITCH, &seci.el_ge, "editor.cascade.el_ge" },
8201 { TYPE_SWITCH, &seci.el_ref, "editor.cascade.el_ref" },
8202 { TYPE_SWITCH, &seci.el_user, "editor.cascade.el_user" },
8203 { TYPE_SWITCH, &seci.el_dynamic, "editor.cascade.el_dynamic" },
8206 static struct TokenInfo shortcut_setup_tokens[] =
8208 { TYPE_KEY_X11, &ssi.save_game, "shortcut.save_game" },
8209 { TYPE_KEY_X11, &ssi.load_game, "shortcut.load_game" },
8210 { TYPE_KEY_X11, &ssi.toggle_pause, "shortcut.toggle_pause" },
8211 { TYPE_KEY_X11, &ssi.focus_player[0], "shortcut.focus_player_1" },
8212 { TYPE_KEY_X11, &ssi.focus_player[1], "shortcut.focus_player_2" },
8213 { TYPE_KEY_X11, &ssi.focus_player[2], "shortcut.focus_player_3" },
8214 { TYPE_KEY_X11, &ssi.focus_player[3], "shortcut.focus_player_4" },
8215 { TYPE_KEY_X11, &ssi.focus_player_all,"shortcut.focus_player_all" },
8216 { TYPE_KEY_X11, &ssi.tape_eject, "shortcut.tape_eject" },
8217 { TYPE_KEY_X11, &ssi.tape_extra, "shortcut.tape_extra" },
8218 { TYPE_KEY_X11, &ssi.tape_stop, "shortcut.tape_stop" },
8219 { TYPE_KEY_X11, &ssi.tape_pause, "shortcut.tape_pause" },
8220 { TYPE_KEY_X11, &ssi.tape_record, "shortcut.tape_record" },
8221 { TYPE_KEY_X11, &ssi.tape_play, "shortcut.tape_play" },
8222 { TYPE_KEY_X11, &ssi.sound_simple, "shortcut.sound_simple" },
8223 { TYPE_KEY_X11, &ssi.sound_loops, "shortcut.sound_loops" },
8224 { TYPE_KEY_X11, &ssi.sound_music, "shortcut.sound_music" },
8225 { TYPE_KEY_X11, &ssi.snap_left, "shortcut.snap_left" },
8226 { TYPE_KEY_X11, &ssi.snap_right, "shortcut.snap_right" },
8227 { TYPE_KEY_X11, &ssi.snap_up, "shortcut.snap_up" },
8228 { TYPE_KEY_X11, &ssi.snap_down, "shortcut.snap_down" },
8231 static struct TokenInfo player_setup_tokens[] =
8233 { TYPE_BOOLEAN, &sii.use_joystick, ".use_joystick" },
8234 { TYPE_STRING, &sii.joy.device_name, ".joy.device_name" },
8235 { TYPE_INTEGER, &sii.joy.xleft, ".joy.xleft" },
8236 { TYPE_INTEGER, &sii.joy.xmiddle, ".joy.xmiddle" },
8237 { TYPE_INTEGER, &sii.joy.xright, ".joy.xright" },
8238 { TYPE_INTEGER, &sii.joy.yupper, ".joy.yupper" },
8239 { TYPE_INTEGER, &sii.joy.ymiddle, ".joy.ymiddle" },
8240 { TYPE_INTEGER, &sii.joy.ylower, ".joy.ylower" },
8241 { TYPE_INTEGER, &sii.joy.snap, ".joy.snap_field" },
8242 { TYPE_INTEGER, &sii.joy.drop, ".joy.place_bomb" },
8243 { TYPE_KEY_X11, &sii.key.left, ".key.move_left" },
8244 { TYPE_KEY_X11, &sii.key.right, ".key.move_right" },
8245 { TYPE_KEY_X11, &sii.key.up, ".key.move_up" },
8246 { TYPE_KEY_X11, &sii.key.down, ".key.move_down" },
8247 { TYPE_KEY_X11, &sii.key.snap, ".key.snap_field" },
8248 { TYPE_KEY_X11, &sii.key.drop, ".key.place_bomb" },
8251 static struct TokenInfo system_setup_tokens[] =
8253 { TYPE_STRING, &syi.sdl_videodriver, "system.sdl_videodriver" },
8254 { TYPE_STRING, &syi.sdl_audiodriver, "system.sdl_audiodriver" },
8255 { TYPE_INTEGER, &syi.audio_fragment_size,"system.audio_fragment_size" },
8258 static struct TokenInfo internal_setup_tokens[] =
8260 { TYPE_STRING, &sxi.program_title, "program_title" },
8261 { TYPE_STRING, &sxi.program_version, "program_version" },
8262 { TYPE_STRING, &sxi.program_author, "program_author" },
8263 { TYPE_STRING, &sxi.program_email, "program_email" },
8264 { TYPE_STRING, &sxi.program_website, "program_website" },
8265 { TYPE_STRING, &sxi.program_copyright, "program_copyright" },
8266 { TYPE_STRING, &sxi.program_company, "program_company" },
8267 { TYPE_STRING, &sxi.program_icon_file, "program_icon_file" },
8268 { TYPE_STRING, &sxi.default_graphics_set, "default_graphics_set" },
8269 { TYPE_STRING, &sxi.default_sounds_set, "default_sounds_set" },
8270 { TYPE_STRING, &sxi.default_music_set, "default_music_set" },
8271 { TYPE_STRING, &sxi.fallback_graphics_file, "fallback_graphics_file"},
8272 { TYPE_STRING, &sxi.fallback_sounds_file, "fallback_sounds_file" },
8273 { TYPE_STRING, &sxi.fallback_music_file, "fallback_music_file" },
8274 { TYPE_STRING, &sxi.default_level_series, "default_level_series" },
8275 { TYPE_BOOLEAN,&sxi.choose_from_top_leveldir, "choose_from_top_leveldir" },
8276 { TYPE_BOOLEAN,&sxi.show_scaling_in_title, "show_scaling_in_title" },
8277 { TYPE_INTEGER,&sxi.default_window_width, "default_window_width" },
8278 { TYPE_INTEGER,&sxi.default_window_height, "default_window_height" },
8281 static struct TokenInfo debug_setup_tokens[] =
8283 { TYPE_INTEGER, &sdi.frame_delay[0], "debug.frame_delay_0" },
8284 { TYPE_INTEGER, &sdi.frame_delay[1], "debug.frame_delay_1" },
8285 { TYPE_INTEGER, &sdi.frame_delay[2], "debug.frame_delay_2" },
8286 { TYPE_INTEGER, &sdi.frame_delay[3], "debug.frame_delay_3" },
8287 { TYPE_INTEGER, &sdi.frame_delay[4], "debug.frame_delay_4" },
8288 { TYPE_INTEGER, &sdi.frame_delay[5], "debug.frame_delay_5" },
8289 { TYPE_INTEGER, &sdi.frame_delay[6], "debug.frame_delay_6" },
8290 { TYPE_INTEGER, &sdi.frame_delay[7], "debug.frame_delay_7" },
8291 { TYPE_INTEGER, &sdi.frame_delay[8], "debug.frame_delay_8" },
8292 { TYPE_INTEGER, &sdi.frame_delay[9], "debug.frame_delay_9" },
8293 { TYPE_KEY_X11, &sdi.frame_delay_key[0], "debug.key.frame_delay_0" },
8294 { TYPE_KEY_X11, &sdi.frame_delay_key[1], "debug.key.frame_delay_1" },
8295 { TYPE_KEY_X11, &sdi.frame_delay_key[2], "debug.key.frame_delay_2" },
8296 { TYPE_KEY_X11, &sdi.frame_delay_key[3], "debug.key.frame_delay_3" },
8297 { TYPE_KEY_X11, &sdi.frame_delay_key[4], "debug.key.frame_delay_4" },
8298 { TYPE_KEY_X11, &sdi.frame_delay_key[5], "debug.key.frame_delay_5" },
8299 { TYPE_KEY_X11, &sdi.frame_delay_key[6], "debug.key.frame_delay_6" },
8300 { TYPE_KEY_X11, &sdi.frame_delay_key[7], "debug.key.frame_delay_7" },
8301 { TYPE_KEY_X11, &sdi.frame_delay_key[8], "debug.key.frame_delay_8" },
8302 { TYPE_KEY_X11, &sdi.frame_delay_key[9], "debug.key.frame_delay_9" },
8303 { TYPE_BOOLEAN, &sdi.frame_delay_use_mod_key,"debug.frame_delay.use_mod_key"},
8304 { TYPE_BOOLEAN, &sdi.frame_delay_game_only, "debug.frame_delay.game_only" },
8305 { TYPE_BOOLEAN, &sdi.show_frames_per_second, "debug.show_frames_per_second" },
8308 static struct TokenInfo options_setup_tokens[] =
8310 { TYPE_BOOLEAN, &soi.verbose, "options.verbose" },
8313 static char *get_corrected_login_name(char *login_name)
8315 /* needed because player name must be a fixed length string */
8316 char *login_name_new = checked_malloc(MAX_PLAYER_NAME_LEN + 1);
8318 strncpy(login_name_new, login_name, MAX_PLAYER_NAME_LEN);
8319 login_name_new[MAX_PLAYER_NAME_LEN] = '\0';
8321 if (strlen(login_name) > MAX_PLAYER_NAME_LEN) /* name has been cut */
8322 if (strchr(login_name_new, ' '))
8323 *strchr(login_name_new, ' ') = '\0';
8325 return login_name_new;
8328 static void setSetupInfoToDefaults(struct SetupInfo *si)
8332 si->player_name = get_corrected_login_name(getLoginName());
8335 si->sound_loops = TRUE;
8336 si->sound_music = TRUE;
8337 si->sound_simple = TRUE;
8339 si->scroll_delay = TRUE;
8340 si->scroll_delay_value = STD_SCROLL_DELAY;
8341 si->engine_snapshot_mode = getStringCopy(STR_SNAPSHOT_MODE_DEFAULT);
8342 si->engine_snapshot_memory = SNAPSHOT_MEMORY_DEFAULT;
8343 si->fade_screens = TRUE;
8344 si->autorecord = TRUE;
8345 si->show_titlescreen = TRUE;
8346 si->quick_doors = FALSE;
8347 si->team_mode = FALSE;
8348 si->handicap = TRUE;
8349 si->skip_levels = TRUE;
8350 si->increment_levels = TRUE;
8351 si->time_limit = TRUE;
8352 si->fullscreen = FALSE;
8353 si->window_scaling_percent = STD_WINDOW_SCALING_PERCENT;
8354 si->window_scaling_quality = getStringCopy(SCALING_QUALITY_DEFAULT);
8355 si->screen_rendering_mode = getStringCopy(STR_SPECIAL_RENDERING_DEFAULT);
8356 si->ask_on_escape = TRUE;
8357 si->ask_on_escape_editor = TRUE;
8358 si->quick_switch = FALSE;
8359 si->input_on_focus = FALSE;
8360 si->prefer_aga_graphics = TRUE;
8361 si->game_frame_delay = GAME_FRAME_DELAY;
8362 si->sp_show_border_elements = FALSE;
8363 si->small_game_graphics = FALSE;
8364 si->show_snapshot_buttons = FALSE;
8366 si->graphics_set = getStringCopy(GFX_CLASSIC_SUBDIR);
8367 si->sounds_set = getStringCopy(SND_CLASSIC_SUBDIR);
8368 si->music_set = getStringCopy(MUS_CLASSIC_SUBDIR);
8370 si->override_level_graphics = FALSE;
8371 si->override_level_sounds = FALSE;
8372 si->override_level_music = FALSE;
8374 si->volume_simple = 100; /* percent */
8375 si->volume_loops = 100; /* percent */
8376 si->volume_music = 100; /* percent */
8378 si->touch.control_type = getStringCopy(TOUCH_CONTROL_DEFAULT);
8379 si->touch.move_distance = TOUCH_MOVE_DISTANCE_DEFAULT; /* percent */
8380 si->touch.drop_distance = TOUCH_DROP_DISTANCE_DEFAULT; /* percent */
8382 si->editor.el_boulderdash = TRUE;
8383 si->editor.el_emerald_mine = TRUE;
8384 si->editor.el_emerald_mine_club = TRUE;
8385 si->editor.el_more = TRUE;
8386 si->editor.el_sokoban = TRUE;
8387 si->editor.el_supaplex = TRUE;
8388 si->editor.el_diamond_caves = TRUE;
8389 si->editor.el_dx_boulderdash = TRUE;
8390 si->editor.el_chars = TRUE;
8391 si->editor.el_steel_chars = TRUE;
8393 si->editor.el_classic = TRUE;
8394 si->editor.el_custom = TRUE;
8396 si->editor.el_user_defined = FALSE;
8397 si->editor.el_dynamic = TRUE;
8399 si->editor.el_headlines = TRUE;
8401 si->editor.show_element_token = FALSE;
8403 si->editor.use_template_for_new_levels = TRUE;
8405 si->shortcut.save_game = DEFAULT_KEY_SAVE_GAME;
8406 si->shortcut.load_game = DEFAULT_KEY_LOAD_GAME;
8407 si->shortcut.toggle_pause = DEFAULT_KEY_TOGGLE_PAUSE;
8409 si->shortcut.focus_player[0] = DEFAULT_KEY_FOCUS_PLAYER_1;
8410 si->shortcut.focus_player[1] = DEFAULT_KEY_FOCUS_PLAYER_2;
8411 si->shortcut.focus_player[2] = DEFAULT_KEY_FOCUS_PLAYER_3;
8412 si->shortcut.focus_player[3] = DEFAULT_KEY_FOCUS_PLAYER_4;
8413 si->shortcut.focus_player_all = DEFAULT_KEY_FOCUS_PLAYER_ALL;
8415 si->shortcut.tape_eject = DEFAULT_KEY_TAPE_EJECT;
8416 si->shortcut.tape_extra = DEFAULT_KEY_TAPE_EXTRA;
8417 si->shortcut.tape_stop = DEFAULT_KEY_TAPE_STOP;
8418 si->shortcut.tape_pause = DEFAULT_KEY_TAPE_PAUSE;
8419 si->shortcut.tape_record = DEFAULT_KEY_TAPE_RECORD;
8420 si->shortcut.tape_play = DEFAULT_KEY_TAPE_PLAY;
8422 si->shortcut.sound_simple = DEFAULT_KEY_SOUND_SIMPLE;
8423 si->shortcut.sound_loops = DEFAULT_KEY_SOUND_LOOPS;
8424 si->shortcut.sound_music = DEFAULT_KEY_SOUND_MUSIC;
8426 si->shortcut.snap_left = DEFAULT_KEY_SNAP_LEFT;
8427 si->shortcut.snap_right = DEFAULT_KEY_SNAP_RIGHT;
8428 si->shortcut.snap_up = DEFAULT_KEY_SNAP_UP;
8429 si->shortcut.snap_down = DEFAULT_KEY_SNAP_DOWN;
8431 for (i = 0; i < MAX_PLAYERS; i++)
8433 si->input[i].use_joystick = FALSE;
8434 si->input[i].joy.device_name=getStringCopy(getDeviceNameFromJoystickNr(i));
8435 si->input[i].joy.xleft = JOYSTICK_XLEFT;
8436 si->input[i].joy.xmiddle = JOYSTICK_XMIDDLE;
8437 si->input[i].joy.xright = JOYSTICK_XRIGHT;
8438 si->input[i].joy.yupper = JOYSTICK_YUPPER;
8439 si->input[i].joy.ymiddle = JOYSTICK_YMIDDLE;
8440 si->input[i].joy.ylower = JOYSTICK_YLOWER;
8441 si->input[i].joy.snap = (i == 0 ? JOY_BUTTON_1 : 0);
8442 si->input[i].joy.drop = (i == 0 ? JOY_BUTTON_2 : 0);
8443 si->input[i].key.left = (i == 0 ? DEFAULT_KEY_LEFT : KSYM_UNDEFINED);
8444 si->input[i].key.right = (i == 0 ? DEFAULT_KEY_RIGHT : KSYM_UNDEFINED);
8445 si->input[i].key.up = (i == 0 ? DEFAULT_KEY_UP : KSYM_UNDEFINED);
8446 si->input[i].key.down = (i == 0 ? DEFAULT_KEY_DOWN : KSYM_UNDEFINED);
8447 si->input[i].key.snap = (i == 0 ? DEFAULT_KEY_SNAP : KSYM_UNDEFINED);
8448 si->input[i].key.drop = (i == 0 ? DEFAULT_KEY_DROP : KSYM_UNDEFINED);
8451 si->system.sdl_videodriver = getStringCopy(ARG_DEFAULT);
8452 si->system.sdl_audiodriver = getStringCopy(ARG_DEFAULT);
8453 si->system.audio_fragment_size = DEFAULT_AUDIO_FRAGMENT_SIZE;
8455 si->internal.program_title = getStringCopy(PROGRAM_TITLE_STRING);
8456 si->internal.program_version = getStringCopy(getProgramRealVersionString());
8457 si->internal.program_author = getStringCopy(PROGRAM_AUTHOR_STRING);
8458 si->internal.program_email = getStringCopy(PROGRAM_EMAIL_STRING);
8459 si->internal.program_website = getStringCopy(PROGRAM_WEBSITE_STRING);
8460 si->internal.program_copyright = getStringCopy(PROGRAM_COPYRIGHT_STRING);
8461 si->internal.program_company = getStringCopy(PROGRAM_COMPANY_STRING);
8463 si->internal.program_icon_file = getStringCopy(PROGRAM_ICON_FILENAME);
8465 si->internal.default_graphics_set = getStringCopy(GFX_CLASSIC_SUBDIR);
8466 si->internal.default_sounds_set = getStringCopy(SND_CLASSIC_SUBDIR);
8467 si->internal.default_music_set = getStringCopy(MUS_CLASSIC_SUBDIR);
8469 si->internal.fallback_graphics_file = getStringCopy(UNDEFINED_FILENAME);
8470 si->internal.fallback_sounds_file = getStringCopy(UNDEFINED_FILENAME);
8471 si->internal.fallback_music_file = getStringCopy(UNDEFINED_FILENAME);
8473 si->internal.default_level_series = getStringCopy(UNDEFINED_LEVELSET);
8474 si->internal.choose_from_top_leveldir = FALSE;
8475 si->internal.show_scaling_in_title = TRUE;
8477 si->internal.default_window_width = WIN_XSIZE_DEFAULT;
8478 si->internal.default_window_height = WIN_YSIZE_DEFAULT;
8480 si->debug.frame_delay[0] = DEFAULT_FRAME_DELAY_0;
8481 si->debug.frame_delay[1] = DEFAULT_FRAME_DELAY_1;
8482 si->debug.frame_delay[2] = DEFAULT_FRAME_DELAY_2;
8483 si->debug.frame_delay[3] = DEFAULT_FRAME_DELAY_3;
8484 si->debug.frame_delay[4] = DEFAULT_FRAME_DELAY_4;
8485 si->debug.frame_delay[5] = DEFAULT_FRAME_DELAY_5;
8486 si->debug.frame_delay[6] = DEFAULT_FRAME_DELAY_6;
8487 si->debug.frame_delay[7] = DEFAULT_FRAME_DELAY_7;
8488 si->debug.frame_delay[8] = DEFAULT_FRAME_DELAY_8;
8489 si->debug.frame_delay[9] = DEFAULT_FRAME_DELAY_9;
8491 si->debug.frame_delay_key[0] = DEFAULT_KEY_FRAME_DELAY_0;
8492 si->debug.frame_delay_key[1] = DEFAULT_KEY_FRAME_DELAY_1;
8493 si->debug.frame_delay_key[2] = DEFAULT_KEY_FRAME_DELAY_2;
8494 si->debug.frame_delay_key[3] = DEFAULT_KEY_FRAME_DELAY_3;
8495 si->debug.frame_delay_key[4] = DEFAULT_KEY_FRAME_DELAY_4;
8496 si->debug.frame_delay_key[5] = DEFAULT_KEY_FRAME_DELAY_5;
8497 si->debug.frame_delay_key[6] = DEFAULT_KEY_FRAME_DELAY_6;
8498 si->debug.frame_delay_key[7] = DEFAULT_KEY_FRAME_DELAY_7;
8499 si->debug.frame_delay_key[8] = DEFAULT_KEY_FRAME_DELAY_8;
8500 si->debug.frame_delay_key[9] = DEFAULT_KEY_FRAME_DELAY_9;
8502 si->debug.frame_delay_use_mod_key = DEFAULT_FRAME_DELAY_USE_MOD_KEY;
8503 si->debug.frame_delay_game_only = DEFAULT_FRAME_DELAY_GAME_ONLY;
8505 si->debug.show_frames_per_second = FALSE;
8507 si->options.verbose = FALSE;
8509 #if defined(PLATFORM_ANDROID)
8510 si->fullscreen = TRUE;
8514 static void setSetupInfoToDefaults_EditorCascade(struct SetupInfo *si)
8516 si->editor_cascade.el_bd = TRUE;
8517 si->editor_cascade.el_em = TRUE;
8518 si->editor_cascade.el_emc = TRUE;
8519 si->editor_cascade.el_rnd = TRUE;
8520 si->editor_cascade.el_sb = TRUE;
8521 si->editor_cascade.el_sp = TRUE;
8522 si->editor_cascade.el_dc = TRUE;
8523 si->editor_cascade.el_dx = TRUE;
8525 si->editor_cascade.el_chars = FALSE;
8526 si->editor_cascade.el_steel_chars = FALSE;
8527 si->editor_cascade.el_ce = FALSE;
8528 si->editor_cascade.el_ge = FALSE;
8529 si->editor_cascade.el_ref = FALSE;
8530 si->editor_cascade.el_user = FALSE;
8531 si->editor_cascade.el_dynamic = FALSE;
8534 #define MAX_HIDE_SETUP_TOKEN_SIZE 20
8536 static char *getHideSetupToken(void *setup_value)
8538 static char hide_setup_token[MAX_HIDE_SETUP_TOKEN_SIZE];
8540 if (setup_value != NULL)
8541 snprintf(hide_setup_token, MAX_HIDE_SETUP_TOKEN_SIZE, "%p", setup_value);
8543 return hide_setup_token;
8546 static void setHideSetupEntry(void *setup_value_raw)
8548 /* !!! DIRTY WORKAROUND; TO BE FIXED AFTER THE MM ENGINE RELEASE !!! */
8549 void *setup_value = setup_value_raw - (void *)&si + (void *)&setup;
8551 char *hide_setup_token = getHideSetupToken(setup_value);
8553 if (setup_value != NULL)
8554 setHashEntry(hide_setup_hash, hide_setup_token, "");
8557 boolean hideSetupEntry(void *setup_value)
8559 char *hide_setup_token = getHideSetupToken(setup_value);
8561 return (setup_value != NULL &&
8562 getHashEntry(hide_setup_hash, hide_setup_token) != NULL);
8565 static void setSetupInfoFromTokenText(SetupFileHash *setup_file_hash,
8566 struct TokenInfo *token_info,
8567 int token_nr, char *token_text)
8569 char *token_hide_text = getStringCat2(token_text, ".hide");
8570 char *token_hide_value = getHashEntry(setup_file_hash, token_hide_text);
8572 /* set the value of this setup option in the setup option structure */
8573 setSetupInfo(token_info, token_nr, getHashEntry(setup_file_hash, token_text));
8575 /* check if this setup option should be hidden in the setup menu */
8576 if (token_hide_value != NULL && get_boolean_from_string(token_hide_value))
8577 setHideSetupEntry(token_info[token_nr].value);
8580 static void setSetupInfoFromTokenInfo(SetupFileHash *setup_file_hash,
8581 struct TokenInfo *token_info,
8584 setSetupInfoFromTokenText(setup_file_hash, token_info, token_nr,
8585 token_info[token_nr].text);
8588 static void decodeSetupFileHash(SetupFileHash *setup_file_hash)
8592 if (!setup_file_hash)
8595 if (hide_setup_hash == NULL)
8596 hide_setup_hash = newSetupFileHash();
8600 for (i = 0; i < NUM_GLOBAL_SETUP_TOKENS; i++)
8601 setSetupInfoFromTokenInfo(setup_file_hash, global_setup_tokens, i);
8606 for (i = 0; i < NUM_EDITOR_SETUP_TOKENS; i++)
8607 setSetupInfoFromTokenInfo(setup_file_hash, editor_setup_tokens, i);
8610 /* shortcut setup */
8611 ssi = setup.shortcut;
8612 for (i = 0; i < NUM_SHORTCUT_SETUP_TOKENS; i++)
8613 setSetupInfoFromTokenInfo(setup_file_hash, shortcut_setup_tokens, i);
8614 setup.shortcut = ssi;
8617 for (pnr = 0; pnr < MAX_PLAYERS; pnr++)
8621 sprintf(prefix, "%s%d", TOKEN_STR_PLAYER_PREFIX, pnr + 1);
8623 sii = setup.input[pnr];
8624 for (i = 0; i < NUM_PLAYER_SETUP_TOKENS; i++)
8626 char full_token[100];
8628 sprintf(full_token, "%s%s", prefix, player_setup_tokens[i].text);
8629 setSetupInfoFromTokenText(setup_file_hash, player_setup_tokens, i,
8632 setup.input[pnr] = sii;
8637 for (i = 0; i < NUM_SYSTEM_SETUP_TOKENS; i++)
8638 setSetupInfoFromTokenInfo(setup_file_hash, system_setup_tokens, i);
8641 /* internal setup */
8642 sxi = setup.internal;
8643 for (i = 0; i < NUM_INTERNAL_SETUP_TOKENS; i++)
8644 setSetupInfoFromTokenInfo(setup_file_hash, internal_setup_tokens, i);
8645 setup.internal = sxi;
8649 for (i = 0; i < NUM_DEBUG_SETUP_TOKENS; i++)
8650 setSetupInfoFromTokenInfo(setup_file_hash, debug_setup_tokens, i);
8654 soi = setup.options;
8655 for (i = 0; i < NUM_OPTIONS_SETUP_TOKENS; i++)
8656 setSetupInfoFromTokenInfo(setup_file_hash, options_setup_tokens, i);
8657 setup.options = soi;
8660 static void decodeSetupFileHash_EditorCascade(SetupFileHash *setup_file_hash)
8664 if (!setup_file_hash)
8667 /* editor cascade setup */
8668 seci = setup.editor_cascade;
8669 for (i = 0; i < NUM_EDITOR_CASCADE_SETUP_TOKENS; i++)
8670 setSetupInfo(editor_cascade_setup_tokens, i,
8671 getHashEntry(setup_file_hash,
8672 editor_cascade_setup_tokens[i].text));
8673 setup.editor_cascade = seci;
8676 void LoadSetupFromFilename(char *filename)
8678 SetupFileHash *setup_file_hash = loadSetupFileHash(filename);
8680 if (setup_file_hash)
8682 decodeSetupFileHash(setup_file_hash);
8684 freeSetupFileHash(setup_file_hash);
8688 Error(ERR_DEBUG, "using default setup values");
8692 static void LoadSetup_SpecialPostProcessing()
8694 char *player_name_new;
8696 /* needed to work around problems with fixed length strings */
8697 player_name_new = get_corrected_login_name(setup.player_name);
8698 free(setup.player_name);
8699 setup.player_name = player_name_new;
8701 /* "scroll_delay: on(3) / off(0)" was replaced by scroll delay value */
8702 if (setup.scroll_delay == FALSE)
8704 setup.scroll_delay_value = MIN_SCROLL_DELAY;
8705 setup.scroll_delay = TRUE; /* now always "on" */
8708 /* make sure that scroll delay value stays inside valid range */
8709 setup.scroll_delay_value =
8710 MIN(MAX(MIN_SCROLL_DELAY, setup.scroll_delay_value), MAX_SCROLL_DELAY);
8717 /* always start with reliable default values */
8718 setSetupInfoToDefaults(&setup);
8720 /* try to load setup values from default setup file */
8721 filename = getDefaultSetupFilename();
8723 if (fileExists(filename))
8724 LoadSetupFromFilename(filename);
8726 /* try to load setup values from user setup file */
8727 filename = getSetupFilename();
8729 LoadSetupFromFilename(filename);
8731 LoadSetup_SpecialPostProcessing();
8734 void LoadSetup_EditorCascade()
8736 char *filename = getPath2(getSetupDir(), EDITORCASCADE_FILENAME);
8737 SetupFileHash *setup_file_hash = NULL;
8739 /* always start with reliable default values */
8740 setSetupInfoToDefaults_EditorCascade(&setup);
8742 setup_file_hash = loadSetupFileHash(filename);
8744 if (setup_file_hash)
8746 decodeSetupFileHash_EditorCascade(setup_file_hash);
8748 freeSetupFileHash(setup_file_hash);
8754 static void addGameControllerMappingToHash(SetupFileHash *mappings_hash,
8757 char mapping_guid[MAX_LINE_LEN];
8758 char *mapping_start, *mapping_end;
8760 // get GUID from game controller mapping line: copy complete line
8761 strncpy(mapping_guid, mapping_line, MAX_LINE_LEN - 1);
8762 mapping_guid[MAX_LINE_LEN - 1] = '\0';
8764 // get GUID from game controller mapping line: cut after GUID part
8765 mapping_start = strchr(mapping_guid, ',');
8766 if (mapping_start != NULL)
8767 *mapping_start = '\0';
8769 // cut newline from game controller mapping line
8770 mapping_end = strchr(mapping_line, '\n');
8771 if (mapping_end != NULL)
8772 *mapping_end = '\0';
8774 // add mapping entry to game controller mappings hash
8775 setHashEntry(mappings_hash, mapping_guid, mapping_line);
8778 static void LoadSetup_ReadGameControllerMappings(SetupFileHash *mappings_hash,
8783 if (!(file = fopen(filename, MODE_READ)))
8785 Error(ERR_WARN, "cannot read game controller mappings file '%s'", filename);
8792 char line[MAX_LINE_LEN];
8794 if (!fgets(line, MAX_LINE_LEN, file))
8797 addGameControllerMappingToHash(mappings_hash, line);
8805 char *filename = getSetupFilename();
8809 InitUserDataDirectory();
8811 if (!(file = fopen(filename, MODE_WRITE)))
8813 Error(ERR_WARN, "cannot write setup file '%s'", filename);
8817 fprintFileHeader(file, SETUP_FILENAME);
8821 for (i = 0; i < NUM_GLOBAL_SETUP_TOKENS; i++)
8823 /* just to make things nicer :) */
8824 if (i == SETUP_TOKEN_PLAYER_NAME + 1 ||
8825 i == SETUP_TOKEN_GRAPHICS_SET ||
8826 i == SETUP_TOKEN_VOLUME_SIMPLE ||
8827 i == SETUP_TOKEN_TOUCH_CONTROL_TYPE)
8828 fprintf(file, "\n");
8830 fprintf(file, "%s\n", getSetupLine(global_setup_tokens, "", i));
8835 fprintf(file, "\n");
8836 for (i = 0; i < NUM_EDITOR_SETUP_TOKENS; i++)
8837 fprintf(file, "%s\n", getSetupLine(editor_setup_tokens, "", i));
8839 /* shortcut setup */
8840 ssi = setup.shortcut;
8841 fprintf(file, "\n");
8842 for (i = 0; i < NUM_SHORTCUT_SETUP_TOKENS; i++)
8843 fprintf(file, "%s\n", getSetupLine(shortcut_setup_tokens, "", i));
8846 for (pnr = 0; pnr < MAX_PLAYERS; pnr++)
8850 sprintf(prefix, "%s%d", TOKEN_STR_PLAYER_PREFIX, pnr + 1);
8851 fprintf(file, "\n");
8853 sii = setup.input[pnr];
8854 for (i = 0; i < NUM_PLAYER_SETUP_TOKENS; i++)
8855 fprintf(file, "%s\n", getSetupLine(player_setup_tokens, prefix, i));
8860 fprintf(file, "\n");
8861 for (i = 0; i < NUM_SYSTEM_SETUP_TOKENS; i++)
8862 fprintf(file, "%s\n", getSetupLine(system_setup_tokens, "", i));
8864 /* internal setup */
8865 /* (internal setup values not saved to user setup file) */
8869 fprintf(file, "\n");
8870 for (i = 0; i < NUM_DEBUG_SETUP_TOKENS; i++)
8871 fprintf(file, "%s\n", getSetupLine(debug_setup_tokens, "", i));
8874 soi = setup.options;
8875 fprintf(file, "\n");
8876 for (i = 0; i < NUM_OPTIONS_SETUP_TOKENS; i++)
8877 fprintf(file, "%s\n", getSetupLine(options_setup_tokens, "", i));
8881 SetFilePermissions(filename, PERMS_PRIVATE);
8884 void SaveSetup_EditorCascade()
8886 char *filename = getPath2(getSetupDir(), EDITORCASCADE_FILENAME);
8890 InitUserDataDirectory();
8892 if (!(file = fopen(filename, MODE_WRITE)))
8894 Error(ERR_WARN, "cannot write editor cascade state file '%s'", filename);
8899 fprintFileHeader(file, EDITORCASCADE_FILENAME);
8901 seci = setup.editor_cascade;
8902 for (i = 0; i < NUM_EDITOR_CASCADE_SETUP_TOKENS; i++)
8903 fprintf(file, "%s\n", getSetupLine(editor_cascade_setup_tokens, "", i));
8907 SetFilePermissions(filename, PERMS_PRIVATE);
8912 static void SaveSetup_WriteGameControllerMappings(SetupFileHash *mappings_hash,
8917 if (!(file = fopen(filename, MODE_WRITE)))
8919 Error(ERR_WARN, "cannot write game controller mappings file '%s'",filename);
8924 BEGIN_HASH_ITERATION(mappings_hash, itr)
8926 fprintf(file, "%s\n", HASH_ITERATION_VALUE(itr));
8928 END_HASH_ITERATION(mappings_hash, itr)
8933 void SaveSetup_AddGameControllerMapping(char *mapping)
8935 char *filename = getPath2(getSetupDir(), GAMECONTROLLER_BASENAME);
8936 SetupFileHash *mappings_hash = newSetupFileHash();
8938 InitUserDataDirectory();
8940 // load existing personal game controller mappings
8941 LoadSetup_ReadGameControllerMappings(mappings_hash, filename);
8943 // add new mapping to personal game controller mappings
8944 addGameControllerMappingToHash(mappings_hash, mapping);
8946 // save updated personal game controller mappings
8947 SaveSetup_WriteGameControllerMappings(mappings_hash, filename);
8949 freeSetupFileHash(mappings_hash);
8953 void LoadCustomElementDescriptions()
8955 char *filename = getCustomArtworkConfigFilename(ARTWORK_TYPE_GRAPHICS);
8956 SetupFileHash *setup_file_hash;
8959 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
8961 if (element_info[i].custom_description != NULL)
8963 free(element_info[i].custom_description);
8964 element_info[i].custom_description = NULL;
8968 if ((setup_file_hash = loadSetupFileHash(filename)) == NULL)
8971 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
8973 char *token = getStringCat2(element_info[i].token_name, ".name");
8974 char *value = getHashEntry(setup_file_hash, token);
8977 element_info[i].custom_description = getStringCopy(value);
8982 freeSetupFileHash(setup_file_hash);
8985 static int getElementFromToken(char *token)
8987 char *value = getHashEntry(element_token_hash, token);
8992 Error(ERR_WARN, "unknown element token '%s'", token);
8994 return EL_UNDEFINED;
8997 static int get_token_parameter_value(char *token, char *value_raw)
9001 if (token == NULL || value_raw == NULL)
9002 return ARG_UNDEFINED_VALUE;
9004 suffix = strrchr(token, '.');
9008 if (strEqual(suffix, ".element"))
9009 return getElementFromToken(value_raw);
9011 /* !!! USE CORRECT VALUE TYPE (currently works also for TYPE_BOOLEAN) !!! */
9012 return get_parameter_value(value_raw, suffix, TYPE_INTEGER);
9015 void InitMenuDesignSettings_Static()
9019 /* always start with reliable default values from static default config */
9020 for (i = 0; image_config_vars[i].token != NULL; i++)
9022 char *value = getHashEntry(image_config_hash, image_config_vars[i].token);
9025 *image_config_vars[i].value =
9026 get_token_parameter_value(image_config_vars[i].token, value);
9030 static void InitMenuDesignSettings_SpecialPreProcessing()
9034 /* the following initializes hierarchical values from static configuration */
9036 /* special case: initialize "ARG_DEFAULT" values in static default config */
9037 /* (e.g., initialize "[titlemessage].fade_mode" from "[title].fade_mode") */
9038 titlescreen_initial_first_default.fade_mode =
9039 title_initial_first_default.fade_mode;
9040 titlescreen_initial_first_default.fade_delay =
9041 title_initial_first_default.fade_delay;
9042 titlescreen_initial_first_default.post_delay =
9043 title_initial_first_default.post_delay;
9044 titlescreen_initial_first_default.auto_delay =
9045 title_initial_first_default.auto_delay;
9046 titlescreen_first_default.fade_mode = title_first_default.fade_mode;
9047 titlescreen_first_default.fade_delay = title_first_default.fade_delay;
9048 titlescreen_first_default.post_delay = title_first_default.post_delay;
9049 titlescreen_first_default.auto_delay = title_first_default.auto_delay;
9050 titlemessage_initial_first_default.fade_mode =
9051 title_initial_first_default.fade_mode;
9052 titlemessage_initial_first_default.fade_delay =
9053 title_initial_first_default.fade_delay;
9054 titlemessage_initial_first_default.post_delay =
9055 title_initial_first_default.post_delay;
9056 titlemessage_initial_first_default.auto_delay =
9057 title_initial_first_default.auto_delay;
9058 titlemessage_first_default.fade_mode = title_first_default.fade_mode;
9059 titlemessage_first_default.fade_delay = title_first_default.fade_delay;
9060 titlemessage_first_default.post_delay = title_first_default.post_delay;
9061 titlemessage_first_default.auto_delay = title_first_default.auto_delay;
9063 titlescreen_initial_default.fade_mode = title_initial_default.fade_mode;
9064 titlescreen_initial_default.fade_delay = title_initial_default.fade_delay;
9065 titlescreen_initial_default.post_delay = title_initial_default.post_delay;
9066 titlescreen_initial_default.auto_delay = title_initial_default.auto_delay;
9067 titlescreen_default.fade_mode = title_default.fade_mode;
9068 titlescreen_default.fade_delay = title_default.fade_delay;
9069 titlescreen_default.post_delay = title_default.post_delay;
9070 titlescreen_default.auto_delay = title_default.auto_delay;
9071 titlemessage_initial_default.fade_mode = title_initial_default.fade_mode;
9072 titlemessage_initial_default.fade_delay = title_initial_default.fade_delay;
9073 titlemessage_initial_default.post_delay = title_initial_default.post_delay;
9074 titlemessage_initial_default.auto_delay = title_initial_default.auto_delay;
9075 titlemessage_default.fade_mode = title_default.fade_mode;
9076 titlemessage_default.fade_delay = title_default.fade_delay;
9077 titlemessage_default.post_delay = title_default.post_delay;
9078 titlemessage_default.auto_delay = title_default.auto_delay;
9080 /* special case: initialize "ARG_DEFAULT" values in static default config */
9081 /* (e.g., init "titlemessage_1.fade_mode" from "[titlemessage].fade_mode") */
9082 for (i = 0; i < MAX_NUM_TITLE_MESSAGES; i++)
9084 titlescreen_initial_first[i] = titlescreen_initial_first_default;
9085 titlescreen_first[i] = titlescreen_first_default;
9086 titlemessage_initial_first[i] = titlemessage_initial_first_default;
9087 titlemessage_first[i] = titlemessage_first_default;
9089 titlescreen_initial[i] = titlescreen_initial_default;
9090 titlescreen[i] = titlescreen_default;
9091 titlemessage_initial[i] = titlemessage_initial_default;
9092 titlemessage[i] = titlemessage_default;
9095 /* special case: initialize "ARG_DEFAULT" values in static default config */
9096 /* (eg, init "menu.enter_screen.SCORES.xyz" from "menu.enter_screen.xyz") */
9097 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
9099 if (i == GFX_SPECIAL_ARG_TITLE) /* title values already initialized */
9102 menu.enter_screen[i] = menu.enter_screen[GFX_SPECIAL_ARG_DEFAULT];
9103 menu.leave_screen[i] = menu.leave_screen[GFX_SPECIAL_ARG_DEFAULT];
9104 menu.next_screen[i] = menu.next_screen[GFX_SPECIAL_ARG_DEFAULT];
9107 /* special case: initialize "ARG_DEFAULT" values in static default config */
9108 /* (eg, init "viewport.door_1.MAIN.xyz" from "viewport.door_1.xyz") */
9109 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
9111 viewport.window[i] = viewport.window[GFX_SPECIAL_ARG_DEFAULT];
9112 viewport.playfield[i] = viewport.playfield[GFX_SPECIAL_ARG_DEFAULT];
9113 viewport.door_1[i] = viewport.door_1[GFX_SPECIAL_ARG_DEFAULT];
9115 if (i == GFX_SPECIAL_ARG_EDITOR) /* editor values already initialized */
9118 viewport.door_2[i] = viewport.door_2[GFX_SPECIAL_ARG_DEFAULT];
9122 static void InitMenuDesignSettings_SpecialPostProcessing()
9126 struct XY *dst, *src;
9130 { &game.button.save, &game.button.stop },
9131 { &game.button.pause2, &game.button.pause },
9132 { &game.button.load, &game.button.play },
9133 { &game.button.undo, &game.button.stop },
9134 { &game.button.redo, &game.button.play },
9140 /* special case: initialize later added SETUP list size from LEVELS value */
9141 if (menu.list_size[GAME_MODE_SETUP] == -1)
9142 menu.list_size[GAME_MODE_SETUP] = menu.list_size[GAME_MODE_LEVELS];
9144 /* set default position for snapshot buttons to stop/pause/play buttons */
9145 for (i = 0; game_buttons_xy[i].dst != NULL; i++)
9146 if ((*game_buttons_xy[i].dst).x == -1 &&
9147 (*game_buttons_xy[i].dst).y == -1)
9148 *game_buttons_xy[i].dst = *game_buttons_xy[i].src;
9151 static void InitMenuDesignSettings_SpecialPostProcessing_AfterGraphics()
9155 struct XYTileSize *dst, *src;
9158 editor_buttons_xy[] =
9161 &editor.button.element_left, &editor.palette.element_left,
9162 IMG_GFX_EDITOR_BUTTON_ELEMENT_LEFT
9165 &editor.button.element_middle, &editor.palette.element_middle,
9166 IMG_GFX_EDITOR_BUTTON_ELEMENT_MIDDLE
9169 &editor.button.element_right, &editor.palette.element_right,
9170 IMG_GFX_EDITOR_BUTTON_ELEMENT_RIGHT
9177 /* set default position for element buttons to element graphics */
9178 for (i = 0; editor_buttons_xy[i].dst != NULL; i++)
9180 if ((*editor_buttons_xy[i].dst).x == -1 &&
9181 (*editor_buttons_xy[i].dst).y == -1)
9183 struct GraphicInfo *gd = &graphic_info[editor_buttons_xy[i].graphic];
9185 gd->width = gd->height = editor_buttons_xy[i].src->tile_size;
9187 *editor_buttons_xy[i].dst = *editor_buttons_xy[i].src;
9192 static void LoadMenuDesignSettingsFromFilename(char *filename)
9194 static struct TitleFadingInfo tfi;
9195 static struct TitleMessageInfo tmi;
9196 static struct TokenInfo title_tokens[] =
9198 { TYPE_INTEGER, &tfi.fade_mode, ".fade_mode" },
9199 { TYPE_INTEGER, &tfi.fade_delay, ".fade_delay" },
9200 { TYPE_INTEGER, &tfi.post_delay, ".post_delay" },
9201 { TYPE_INTEGER, &tfi.auto_delay, ".auto_delay" },
9205 static struct TokenInfo titlemessage_tokens[] =
9207 { TYPE_INTEGER, &tmi.x, ".x" },
9208 { TYPE_INTEGER, &tmi.y, ".y" },
9209 { TYPE_INTEGER, &tmi.width, ".width" },
9210 { TYPE_INTEGER, &tmi.height, ".height" },
9211 { TYPE_INTEGER, &tmi.chars, ".chars" },
9212 { TYPE_INTEGER, &tmi.lines, ".lines" },
9213 { TYPE_INTEGER, &tmi.align, ".align" },
9214 { TYPE_INTEGER, &tmi.valign, ".valign" },
9215 { TYPE_INTEGER, &tmi.font, ".font" },
9216 { TYPE_BOOLEAN, &tmi.autowrap, ".autowrap" },
9217 { TYPE_BOOLEAN, &tmi.centered, ".centered" },
9218 { TYPE_BOOLEAN, &tmi.parse_comments, ".parse_comments" },
9219 { TYPE_INTEGER, &tmi.sort_priority, ".sort_priority" },
9220 { TYPE_INTEGER, &tmi.fade_mode, ".fade_mode" },
9221 { TYPE_INTEGER, &tmi.fade_delay, ".fade_delay" },
9222 { TYPE_INTEGER, &tmi.post_delay, ".post_delay" },
9223 { TYPE_INTEGER, &tmi.auto_delay, ".auto_delay" },
9229 struct TitleFadingInfo *info;
9234 /* initialize first titles from "enter screen" definitions, if defined */
9235 { &title_initial_first_default, "menu.enter_screen.TITLE" },
9236 { &title_first_default, "menu.enter_screen.TITLE" },
9238 /* initialize title screens from "next screen" definitions, if defined */
9239 { &title_initial_default, "menu.next_screen.TITLE" },
9240 { &title_default, "menu.next_screen.TITLE" },
9246 struct TitleMessageInfo *array;
9249 titlemessage_arrays[] =
9251 /* initialize first titles from "enter screen" definitions, if defined */
9252 { titlescreen_initial_first, "menu.enter_screen.TITLE" },
9253 { titlescreen_first, "menu.enter_screen.TITLE" },
9254 { titlemessage_initial_first, "menu.enter_screen.TITLE" },
9255 { titlemessage_first, "menu.enter_screen.TITLE" },
9257 /* initialize titles from "next screen" definitions, if defined */
9258 { titlescreen_initial, "menu.next_screen.TITLE" },
9259 { titlescreen, "menu.next_screen.TITLE" },
9260 { titlemessage_initial, "menu.next_screen.TITLE" },
9261 { titlemessage, "menu.next_screen.TITLE" },
9263 /* overwrite titles with title definitions, if defined */
9264 { titlescreen_initial_first, "[title_initial]" },
9265 { titlescreen_first, "[title]" },
9266 { titlemessage_initial_first, "[title_initial]" },
9267 { titlemessage_first, "[title]" },
9269 { titlescreen_initial, "[title_initial]" },
9270 { titlescreen, "[title]" },
9271 { titlemessage_initial, "[title_initial]" },
9272 { titlemessage, "[title]" },
9274 /* overwrite titles with title screen/message definitions, if defined */
9275 { titlescreen_initial_first, "[titlescreen_initial]" },
9276 { titlescreen_first, "[titlescreen]" },
9277 { titlemessage_initial_first, "[titlemessage_initial]" },
9278 { titlemessage_first, "[titlemessage]" },
9280 { titlescreen_initial, "[titlescreen_initial]" },
9281 { titlescreen, "[titlescreen]" },
9282 { titlemessage_initial, "[titlemessage_initial]" },
9283 { titlemessage, "[titlemessage]" },
9287 SetupFileHash *setup_file_hash;
9290 if ((setup_file_hash = loadSetupFileHash(filename)) == NULL)
9293 /* the following initializes hierarchical values from dynamic configuration */
9295 /* special case: initialize with default values that may be overwritten */
9296 /* (e.g., init "menu.draw_xoffset.INFO" from "menu.draw_xoffset") */
9297 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
9299 char *value_1 = getHashEntry(setup_file_hash, "menu.draw_xoffset");
9300 char *value_2 = getHashEntry(setup_file_hash, "menu.draw_yoffset");
9301 char *value_3 = getHashEntry(setup_file_hash, "menu.list_size");
9303 if (value_1 != NULL)
9304 menu.draw_xoffset[i] = get_integer_from_string(value_1);
9305 if (value_2 != NULL)
9306 menu.draw_yoffset[i] = get_integer_from_string(value_2);
9307 if (value_3 != NULL)
9308 menu.list_size[i] = get_integer_from_string(value_3);
9311 /* special case: initialize with default values that may be overwritten */
9312 /* (eg, init "menu.draw_xoffset.INFO[XXX]" from "menu.draw_xoffset.INFO") */
9313 for (i = 0; i < NUM_SPECIAL_GFX_INFO_ARGS; i++)
9315 char *value_1 = getHashEntry(setup_file_hash, "menu.draw_xoffset.INFO");
9316 char *value_2 = getHashEntry(setup_file_hash, "menu.draw_yoffset.INFO");
9318 if (value_1 != NULL)
9319 menu.draw_xoffset_info[i] = get_integer_from_string(value_1);
9320 if (value_2 != NULL)
9321 menu.draw_yoffset_info[i] = get_integer_from_string(value_2);
9323 if (i == GFX_SPECIAL_ARG_INFO_ELEMENTS)
9325 char *value_1 = getHashEntry(setup_file_hash, "menu.list_size.INFO");
9327 if (value_1 != NULL)
9328 menu.list_size_info[i] = get_integer_from_string(value_1);
9332 /* special case: initialize with default values that may be overwritten */
9333 /* (eg, init "menu.draw_xoffset.SETUP[XXX]" from "menu.draw_xoffset.SETUP") */
9334 for (i = 0; i < NUM_SPECIAL_GFX_SETUP_ARGS; i++)
9336 char *value_1 = getHashEntry(setup_file_hash, "menu.draw_xoffset.SETUP");
9337 char *value_2 = getHashEntry(setup_file_hash, "menu.draw_yoffset.SETUP");
9339 if (value_1 != NULL)
9340 menu.draw_xoffset_setup[i] = get_integer_from_string(value_1);
9341 if (value_2 != NULL)
9342 menu.draw_yoffset_setup[i] = get_integer_from_string(value_2);
9345 /* special case: initialize with default values that may be overwritten */
9346 /* (eg, init "menu.enter_screen.SCORES.xyz" from "menu.enter_screen.xyz") */
9347 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
9349 char *token_1 = "menu.enter_screen.fade_mode";
9350 char *token_2 = "menu.enter_screen.fade_delay";
9351 char *token_3 = "menu.enter_screen.post_delay";
9352 char *token_4 = "menu.leave_screen.fade_mode";
9353 char *token_5 = "menu.leave_screen.fade_delay";
9354 char *token_6 = "menu.leave_screen.post_delay";
9355 char *token_7 = "menu.next_screen.fade_mode";
9356 char *token_8 = "menu.next_screen.fade_delay";
9357 char *token_9 = "menu.next_screen.post_delay";
9358 char *value_1 = getHashEntry(setup_file_hash, token_1);
9359 char *value_2 = getHashEntry(setup_file_hash, token_2);
9360 char *value_3 = getHashEntry(setup_file_hash, token_3);
9361 char *value_4 = getHashEntry(setup_file_hash, token_4);
9362 char *value_5 = getHashEntry(setup_file_hash, token_5);
9363 char *value_6 = getHashEntry(setup_file_hash, token_6);
9364 char *value_7 = getHashEntry(setup_file_hash, token_7);
9365 char *value_8 = getHashEntry(setup_file_hash, token_8);
9366 char *value_9 = getHashEntry(setup_file_hash, token_9);
9368 if (value_1 != NULL)
9369 menu.enter_screen[i].fade_mode = get_token_parameter_value(token_1,
9371 if (value_2 != NULL)
9372 menu.enter_screen[i].fade_delay = get_token_parameter_value(token_2,
9374 if (value_3 != NULL)
9375 menu.enter_screen[i].post_delay = get_token_parameter_value(token_3,
9377 if (value_4 != NULL)
9378 menu.leave_screen[i].fade_mode = get_token_parameter_value(token_4,
9380 if (value_5 != NULL)
9381 menu.leave_screen[i].fade_delay = get_token_parameter_value(token_5,
9383 if (value_6 != NULL)
9384 menu.leave_screen[i].post_delay = get_token_parameter_value(token_6,
9386 if (value_7 != NULL)
9387 menu.next_screen[i].fade_mode = get_token_parameter_value(token_7,
9389 if (value_8 != NULL)
9390 menu.next_screen[i].fade_delay = get_token_parameter_value(token_8,
9392 if (value_9 != NULL)
9393 menu.next_screen[i].post_delay = get_token_parameter_value(token_9,
9397 /* special case: initialize with default values that may be overwritten */
9398 /* (eg, init "viewport.door_1.MAIN.xyz" from "viewport.door_1.xyz") */
9399 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
9401 char *token_w1 = "viewport.window.width";
9402 char *token_w2 = "viewport.window.height";
9403 char *token_01 = "viewport.playfield.x";
9404 char *token_02 = "viewport.playfield.y";
9405 char *token_03 = "viewport.playfield.width";
9406 char *token_04 = "viewport.playfield.height";
9407 char *token_05 = "viewport.playfield.border_size";
9408 char *token_06 = "viewport.door_1.x";
9409 char *token_07 = "viewport.door_1.y";
9410 char *token_08 = "viewport.door_1.width";
9411 char *token_09 = "viewport.door_1.height";
9412 char *token_10 = "viewport.door_1.border_size";
9413 char *token_11 = "viewport.door_2.x";
9414 char *token_12 = "viewport.door_2.y";
9415 char *token_13 = "viewport.door_2.width";
9416 char *token_14 = "viewport.door_2.height";
9417 char *token_15 = "viewport.door_2.border_size";
9418 char *value_w1 = getHashEntry(setup_file_hash, token_w1);
9419 char *value_w2 = getHashEntry(setup_file_hash, token_w2);
9420 char *value_01 = getHashEntry(setup_file_hash, token_01);
9421 char *value_02 = getHashEntry(setup_file_hash, token_02);
9422 char *value_03 = getHashEntry(setup_file_hash, token_03);
9423 char *value_04 = getHashEntry(setup_file_hash, token_04);
9424 char *value_05 = getHashEntry(setup_file_hash, token_05);
9425 char *value_06 = getHashEntry(setup_file_hash, token_06);
9426 char *value_07 = getHashEntry(setup_file_hash, token_07);
9427 char *value_08 = getHashEntry(setup_file_hash, token_08);
9428 char *value_09 = getHashEntry(setup_file_hash, token_09);
9429 char *value_10 = getHashEntry(setup_file_hash, token_10);
9430 char *value_11 = getHashEntry(setup_file_hash, token_11);
9431 char *value_12 = getHashEntry(setup_file_hash, token_12);
9432 char *value_13 = getHashEntry(setup_file_hash, token_13);
9433 char *value_14 = getHashEntry(setup_file_hash, token_14);
9434 char *value_15 = getHashEntry(setup_file_hash, token_15);
9436 if (value_w1 != NULL)
9437 viewport.window[i].width = get_token_parameter_value(token_w1, value_w1);
9438 if (value_w2 != NULL)
9439 viewport.window[i].height = get_token_parameter_value(token_w2, value_w2);
9440 if (value_01 != NULL)
9441 viewport.playfield[i].x = get_token_parameter_value(token_01, value_01);
9442 if (value_02 != NULL)
9443 viewport.playfield[i].y = get_token_parameter_value(token_02, value_02);
9444 if (value_03 != NULL)
9445 viewport.playfield[i].width = get_token_parameter_value(token_03,
9447 if (value_04 != NULL)
9448 viewport.playfield[i].height = get_token_parameter_value(token_04,
9450 if (value_05 != NULL)
9451 viewport.playfield[i].border_size = get_token_parameter_value(token_05,
9453 if (value_06 != NULL)
9454 viewport.door_1[i].x = get_token_parameter_value(token_06, value_06);
9455 if (value_07 != NULL)
9456 viewport.door_1[i].y = get_token_parameter_value(token_07, value_07);
9457 if (value_08 != NULL)
9458 viewport.door_1[i].width = get_token_parameter_value(token_08, value_08);
9459 if (value_09 != NULL)
9460 viewport.door_1[i].height = get_token_parameter_value(token_09, value_09);
9461 if (value_10 != NULL)
9462 viewport.door_1[i].border_size = get_token_parameter_value(token_10,
9464 if (value_11 != NULL)
9465 viewport.door_2[i].x = get_token_parameter_value(token_11, value_11);
9466 if (value_12 != NULL)
9467 viewport.door_2[i].y = get_token_parameter_value(token_12, value_12);
9468 if (value_13 != NULL)
9469 viewport.door_2[i].width = get_token_parameter_value(token_13, value_13);
9470 if (value_14 != NULL)
9471 viewport.door_2[i].height = get_token_parameter_value(token_14, value_14);
9472 if (value_15 != NULL)
9473 viewport.door_1[i].border_size = get_token_parameter_value(token_15,
9477 /* special case: initialize with default values that may be overwritten */
9478 /* (e.g., init "[title].fade_mode" from "menu.next_screen.TITLE.fade_mode") */
9479 for (i = 0; title_info[i].info != NULL; i++)
9481 struct TitleFadingInfo *info = title_info[i].info;
9482 char *base_token = title_info[i].text;
9484 for (j = 0; title_tokens[j].type != -1; j++)
9486 char *token = getStringCat2(base_token, title_tokens[j].text);
9487 char *value = getHashEntry(setup_file_hash, token);
9491 int parameter_value = get_token_parameter_value(token, value);
9495 *(int *)title_tokens[j].value = (int)parameter_value;
9504 /* special case: initialize with default values that may be overwritten */
9505 /* (e.g., init "titlemessage_1.fade_mode" from "[titlemessage].fade_mode") */
9506 for (i = 0; titlemessage_arrays[i].array != NULL; i++)
9508 struct TitleMessageInfo *array = titlemessage_arrays[i].array;
9509 char *base_token = titlemessage_arrays[i].text;
9511 for (j = 0; titlemessage_tokens[j].type != -1; j++)
9513 char *token = getStringCat2(base_token, titlemessage_tokens[j].text);
9514 char *value = getHashEntry(setup_file_hash, token);
9518 int parameter_value = get_token_parameter_value(token, value);
9520 for (k = 0; k < MAX_NUM_TITLE_MESSAGES; k++)
9524 if (titlemessage_tokens[j].type == TYPE_INTEGER)
9525 *(int *)titlemessage_tokens[j].value = (int)parameter_value;
9527 *(boolean *)titlemessage_tokens[j].value = (boolean)parameter_value;
9537 /* read (and overwrite with) values that may be specified in config file */
9538 for (i = 0; image_config_vars[i].token != NULL; i++)
9540 char *value = getHashEntry(setup_file_hash, image_config_vars[i].token);
9542 /* (ignore definitions set to "[DEFAULT]" which are already initialized) */
9543 if (value != NULL && !strEqual(value, ARG_DEFAULT))
9544 *image_config_vars[i].value =
9545 get_token_parameter_value(image_config_vars[i].token, value);
9548 freeSetupFileHash(setup_file_hash);
9551 void LoadMenuDesignSettings()
9553 char *filename_base = UNDEFINED_FILENAME, *filename_local;
9555 InitMenuDesignSettings_Static();
9556 InitMenuDesignSettings_SpecialPreProcessing();
9558 if (!GFX_OVERRIDE_ARTWORK(ARTWORK_TYPE_GRAPHICS))
9560 /* first look for special settings configured in level series config */
9561 filename_base = getCustomArtworkLevelConfigFilename(ARTWORK_TYPE_GRAPHICS);
9563 if (fileExists(filename_base))
9564 LoadMenuDesignSettingsFromFilename(filename_base);
9567 filename_local = getCustomArtworkConfigFilename(ARTWORK_TYPE_GRAPHICS);
9569 if (filename_local != NULL && !strEqual(filename_base, filename_local))
9570 LoadMenuDesignSettingsFromFilename(filename_local);
9572 InitMenuDesignSettings_SpecialPostProcessing();
9575 void LoadMenuDesignSettings_AfterGraphics()
9577 InitMenuDesignSettings_SpecialPostProcessing_AfterGraphics();
9580 void LoadUserDefinedEditorElementList(int **elements, int *num_elements)
9582 char *filename = getEditorSetupFilename();
9583 SetupFileList *setup_file_list, *list;
9584 SetupFileHash *element_hash;
9585 int num_unknown_tokens = 0;
9588 if ((setup_file_list = loadSetupFileList(filename)) == NULL)
9591 element_hash = newSetupFileHash();
9593 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
9594 setHashEntry(element_hash, element_info[i].token_name, i_to_a(i));
9596 /* determined size may be larger than needed (due to unknown elements) */
9598 for (list = setup_file_list; list != NULL; list = list->next)
9601 /* add space for up to 3 more elements for padding that may be needed */
9604 /* free memory for old list of elements, if needed */
9605 checked_free(*elements);
9607 /* allocate memory for new list of elements */
9608 *elements = checked_malloc(*num_elements * sizeof(int));
9611 for (list = setup_file_list; list != NULL; list = list->next)
9613 char *value = getHashEntry(element_hash, list->token);
9615 if (value == NULL) /* try to find obsolete token mapping */
9617 char *mapped_token = get_mapped_token(list->token);
9619 if (mapped_token != NULL)
9621 value = getHashEntry(element_hash, mapped_token);
9629 (*elements)[(*num_elements)++] = atoi(value);
9633 if (num_unknown_tokens == 0)
9635 Error(ERR_INFO_LINE, "-");
9636 Error(ERR_INFO, "warning: unknown token(s) found in config file:");
9637 Error(ERR_INFO, "- config file: '%s'", filename);
9639 num_unknown_tokens++;
9642 Error(ERR_INFO, "- token: '%s'", list->token);
9646 if (num_unknown_tokens > 0)
9647 Error(ERR_INFO_LINE, "-");
9649 while (*num_elements % 4) /* pad with empty elements, if needed */
9650 (*elements)[(*num_elements)++] = EL_EMPTY;
9652 freeSetupFileList(setup_file_list);
9653 freeSetupFileHash(element_hash);
9656 for (i = 0; i < *num_elements; i++)
9657 printf("editor: element '%s' [%d]\n",
9658 element_info[(*elements)[i]].token_name, (*elements)[i]);
9662 static struct MusicFileInfo *get_music_file_info_ext(char *basename, int music,
9665 SetupFileHash *setup_file_hash = NULL;
9666 struct MusicFileInfo tmp_music_file_info, *new_music_file_info;
9667 char *filename_music, *filename_prefix, *filename_info;
9673 token_to_value_ptr[] =
9675 { "title_header", &tmp_music_file_info.title_header },
9676 { "artist_header", &tmp_music_file_info.artist_header },
9677 { "album_header", &tmp_music_file_info.album_header },
9678 { "year_header", &tmp_music_file_info.year_header },
9680 { "title", &tmp_music_file_info.title },
9681 { "artist", &tmp_music_file_info.artist },
9682 { "album", &tmp_music_file_info.album },
9683 { "year", &tmp_music_file_info.year },
9689 filename_music = (is_sound ? getCustomSoundFilename(basename) :
9690 getCustomMusicFilename(basename));
9692 if (filename_music == NULL)
9695 /* ---------- try to replace file extension ---------- */
9697 filename_prefix = getStringCopy(filename_music);
9698 if (strrchr(filename_prefix, '.') != NULL)
9699 *strrchr(filename_prefix, '.') = '\0';
9700 filename_info = getStringCat2(filename_prefix, ".txt");
9702 if (fileExists(filename_info))
9703 setup_file_hash = loadSetupFileHash(filename_info);
9705 free(filename_prefix);
9706 free(filename_info);
9708 if (setup_file_hash == NULL)
9710 /* ---------- try to add file extension ---------- */
9712 filename_prefix = getStringCopy(filename_music);
9713 filename_info = getStringCat2(filename_prefix, ".txt");
9715 if (fileExists(filename_info))
9716 setup_file_hash = loadSetupFileHash(filename_info);
9718 free(filename_prefix);
9719 free(filename_info);
9722 if (setup_file_hash == NULL)
9725 /* ---------- music file info found ---------- */
9727 clear_mem(&tmp_music_file_info, sizeof(struct MusicFileInfo));
9729 for (i = 0; token_to_value_ptr[i].token != NULL; i++)
9731 char *value = getHashEntry(setup_file_hash, token_to_value_ptr[i].token);
9733 *token_to_value_ptr[i].value_ptr =
9734 getStringCopy(value != NULL && *value != '\0' ? value : UNKNOWN_NAME);
9737 tmp_music_file_info.basename = getStringCopy(basename);
9738 tmp_music_file_info.music = music;
9739 tmp_music_file_info.is_sound = is_sound;
9741 new_music_file_info = checked_malloc(sizeof(struct MusicFileInfo));
9742 *new_music_file_info = tmp_music_file_info;
9744 return new_music_file_info;
9747 static struct MusicFileInfo *get_music_file_info(char *basename, int music)
9749 return get_music_file_info_ext(basename, music, FALSE);
9752 static struct MusicFileInfo *get_sound_file_info(char *basename, int sound)
9754 return get_music_file_info_ext(basename, sound, TRUE);
9757 static boolean music_info_listed_ext(struct MusicFileInfo *list,
9758 char *basename, boolean is_sound)
9760 for (; list != NULL; list = list->next)
9761 if (list->is_sound == is_sound && strEqual(list->basename, basename))
9767 static boolean music_info_listed(struct MusicFileInfo *list, char *basename)
9769 return music_info_listed_ext(list, basename, FALSE);
9772 static boolean sound_info_listed(struct MusicFileInfo *list, char *basename)
9774 return music_info_listed_ext(list, basename, TRUE);
9777 void LoadMusicInfo()
9779 char *music_directory = getCustomMusicDirectory();
9780 int num_music = getMusicListSize();
9781 int num_music_noconf = 0;
9782 int num_sounds = getSoundListSize();
9784 DirectoryEntry *dir_entry;
9785 struct FileInfo *music, *sound;
9786 struct MusicFileInfo *next, **new;
9789 while (music_file_info != NULL)
9791 next = music_file_info->next;
9793 checked_free(music_file_info->basename);
9795 checked_free(music_file_info->title_header);
9796 checked_free(music_file_info->artist_header);
9797 checked_free(music_file_info->album_header);
9798 checked_free(music_file_info->year_header);
9800 checked_free(music_file_info->title);
9801 checked_free(music_file_info->artist);
9802 checked_free(music_file_info->album);
9803 checked_free(music_file_info->year);
9805 free(music_file_info);
9807 music_file_info = next;
9810 new = &music_file_info;
9812 for (i = 0; i < num_music; i++)
9814 music = getMusicListEntry(i);
9816 if (music->filename == NULL)
9819 if (strEqual(music->filename, UNDEFINED_FILENAME))
9822 /* a configured file may be not recognized as music */
9823 if (!FileIsMusic(music->filename))
9826 if (!music_info_listed(music_file_info, music->filename))
9828 *new = get_music_file_info(music->filename, i);
9831 new = &(*new)->next;
9835 if ((dir = openDirectory(music_directory)) == NULL)
9837 Error(ERR_WARN, "cannot read music directory '%s'", music_directory);
9841 while ((dir_entry = readDirectory(dir)) != NULL) /* loop all entries */
9843 char *basename = dir_entry->basename;
9844 boolean music_already_used = FALSE;
9847 /* skip all music files that are configured in music config file */
9848 for (i = 0; i < num_music; i++)
9850 music = getMusicListEntry(i);
9852 if (music->filename == NULL)
9855 if (strEqual(basename, music->filename))
9857 music_already_used = TRUE;
9862 if (music_already_used)
9865 if (!FileIsMusic(dir_entry->filename))
9868 if (!music_info_listed(music_file_info, basename))
9870 *new = get_music_file_info(basename, MAP_NOCONF_MUSIC(num_music_noconf));
9873 new = &(*new)->next;
9879 closeDirectory(dir);
9881 for (i = 0; i < num_sounds; i++)
9883 sound = getSoundListEntry(i);
9885 if (sound->filename == NULL)
9888 if (strEqual(sound->filename, UNDEFINED_FILENAME))
9891 /* a configured file may be not recognized as sound */
9892 if (!FileIsSound(sound->filename))
9895 if (!sound_info_listed(music_file_info, sound->filename))
9897 *new = get_sound_file_info(sound->filename, i);
9899 new = &(*new)->next;
9904 void add_helpanim_entry(int element, int action, int direction, int delay,
9905 int *num_list_entries)
9907 struct HelpAnimInfo *new_list_entry;
9908 (*num_list_entries)++;
9911 checked_realloc(helpanim_info,
9912 *num_list_entries * sizeof(struct HelpAnimInfo));
9913 new_list_entry = &helpanim_info[*num_list_entries - 1];
9915 new_list_entry->element = element;
9916 new_list_entry->action = action;
9917 new_list_entry->direction = direction;
9918 new_list_entry->delay = delay;
9921 void print_unknown_token(char *filename, char *token, int token_nr)
9925 Error(ERR_INFO_LINE, "-");
9926 Error(ERR_INFO, "warning: unknown token(s) found in config file:");
9927 Error(ERR_INFO, "- config file: '%s'", filename);
9930 Error(ERR_INFO, "- token: '%s'", token);
9933 void print_unknown_token_end(int token_nr)
9936 Error(ERR_INFO_LINE, "-");
9939 void LoadHelpAnimInfo()
9941 char *filename = getHelpAnimFilename();
9942 SetupFileList *setup_file_list = NULL, *list;
9943 SetupFileHash *element_hash, *action_hash, *direction_hash;
9944 int num_list_entries = 0;
9945 int num_unknown_tokens = 0;
9948 if (fileExists(filename))
9949 setup_file_list = loadSetupFileList(filename);
9951 if (setup_file_list == NULL)
9953 /* use reliable default values from static configuration */
9954 SetupFileList *insert_ptr;
9956 insert_ptr = setup_file_list =
9957 newSetupFileList(helpanim_config[0].token,
9958 helpanim_config[0].value);
9960 for (i = 1; helpanim_config[i].token; i++)
9961 insert_ptr = addListEntry(insert_ptr,
9962 helpanim_config[i].token,
9963 helpanim_config[i].value);
9966 element_hash = newSetupFileHash();
9967 action_hash = newSetupFileHash();
9968 direction_hash = newSetupFileHash();
9970 for (i = 0; i < MAX_NUM_ELEMENTS; i++)
9971 setHashEntry(element_hash, element_info[i].token_name, i_to_a(i));
9973 for (i = 0; i < NUM_ACTIONS; i++)
9974 setHashEntry(action_hash, element_action_info[i].suffix,
9975 i_to_a(element_action_info[i].value));
9977 /* do not store direction index (bit) here, but direction value! */
9978 for (i = 0; i < NUM_DIRECTIONS_FULL; i++)
9979 setHashEntry(direction_hash, element_direction_info[i].suffix,
9980 i_to_a(1 << element_direction_info[i].value));
9982 for (list = setup_file_list; list != NULL; list = list->next)
9984 char *element_token, *action_token, *direction_token;
9985 char *element_value, *action_value, *direction_value;
9986 int delay = atoi(list->value);
9988 if (strEqual(list->token, "end"))
9990 add_helpanim_entry(HELPANIM_LIST_NEXT, -1, -1, -1, &num_list_entries);
9995 /* first try to break element into element/action/direction parts;
9996 if this does not work, also accept combined "element[.act][.dir]"
9997 elements (like "dynamite.active"), which are unique elements */
9999 if (strchr(list->token, '.') == NULL) /* token contains no '.' */
10001 element_value = getHashEntry(element_hash, list->token);
10002 if (element_value != NULL) /* element found */
10003 add_helpanim_entry(atoi(element_value), -1, -1, delay,
10004 &num_list_entries);
10007 /* no further suffixes found -- this is not an element */
10008 print_unknown_token(filename, list->token, num_unknown_tokens++);
10014 /* token has format "<prefix>.<something>" */
10016 action_token = strchr(list->token, '.'); /* suffix may be action ... */
10017 direction_token = action_token; /* ... or direction */
10019 element_token = getStringCopy(list->token);
10020 *strchr(element_token, '.') = '\0';
10022 element_value = getHashEntry(element_hash, element_token);
10024 if (element_value == NULL) /* this is no element */
10026 element_value = getHashEntry(element_hash, list->token);
10027 if (element_value != NULL) /* combined element found */
10028 add_helpanim_entry(atoi(element_value), -1, -1, delay,
10029 &num_list_entries);
10031 print_unknown_token(filename, list->token, num_unknown_tokens++);
10033 free(element_token);
10038 action_value = getHashEntry(action_hash, action_token);
10040 if (action_value != NULL) /* action found */
10042 add_helpanim_entry(atoi(element_value), atoi(action_value), -1, delay,
10043 &num_list_entries);
10045 free(element_token);
10050 direction_value = getHashEntry(direction_hash, direction_token);
10052 if (direction_value != NULL) /* direction found */
10054 add_helpanim_entry(atoi(element_value), -1, atoi(direction_value), delay,
10055 &num_list_entries);
10057 free(element_token);
10062 if (strchr(action_token + 1, '.') == NULL)
10064 /* no further suffixes found -- this is not an action nor direction */
10066 element_value = getHashEntry(element_hash, list->token);
10067 if (element_value != NULL) /* combined element found */
10068 add_helpanim_entry(atoi(element_value), -1, -1, delay,
10069 &num_list_entries);
10071 print_unknown_token(filename, list->token, num_unknown_tokens++);
10073 free(element_token);
10078 /* token has format "<prefix>.<suffix>.<something>" */
10080 direction_token = strchr(action_token + 1, '.');
10082 action_token = getStringCopy(action_token);
10083 *strchr(action_token + 1, '.') = '\0';
10085 action_value = getHashEntry(action_hash, action_token);
10087 if (action_value == NULL) /* this is no action */
10089 element_value = getHashEntry(element_hash, list->token);
10090 if (element_value != NULL) /* combined element found */
10091 add_helpanim_entry(atoi(element_value), -1, -1, delay,
10092 &num_list_entries);
10094 print_unknown_token(filename, list->token, num_unknown_tokens++);
10096 free(element_token);
10097 free(action_token);
10102 direction_value = getHashEntry(direction_hash, direction_token);
10104 if (direction_value != NULL) /* direction found */
10106 add_helpanim_entry(atoi(element_value), atoi(action_value),
10107 atoi(direction_value), delay, &num_list_entries);
10109 free(element_token);
10110 free(action_token);
10115 /* this is no direction */
10117 element_value = getHashEntry(element_hash, list->token);
10118 if (element_value != NULL) /* combined element found */
10119 add_helpanim_entry(atoi(element_value), -1, -1, delay,
10120 &num_list_entries);
10122 print_unknown_token(filename, list->token, num_unknown_tokens++);
10124 free(element_token);
10125 free(action_token);
10128 print_unknown_token_end(num_unknown_tokens);
10130 add_helpanim_entry(HELPANIM_LIST_NEXT, -1, -1, -1, &num_list_entries);
10131 add_helpanim_entry(HELPANIM_LIST_END, -1, -1, -1, &num_list_entries);
10133 freeSetupFileList(setup_file_list);
10134 freeSetupFileHash(element_hash);
10135 freeSetupFileHash(action_hash);
10136 freeSetupFileHash(direction_hash);
10139 for (i = 0; i < num_list_entries; i++)
10140 printf("::: '%s': %d, %d, %d => %d\n",
10141 EL_NAME(helpanim_info[i].element),
10142 helpanim_info[i].element,
10143 helpanim_info[i].action,
10144 helpanim_info[i].direction,
10145 helpanim_info[i].delay);
10149 void LoadHelpTextInfo()
10151 char *filename = getHelpTextFilename();
10154 if (helptext_info != NULL)
10156 freeSetupFileHash(helptext_info);
10157 helptext_info = NULL;
10160 if (fileExists(filename))
10161 helptext_info = loadSetupFileHash(filename);
10163 if (helptext_info == NULL)
10165 /* use reliable default values from static configuration */
10166 helptext_info = newSetupFileHash();
10168 for (i = 0; helptext_config[i].token; i++)
10169 setHashEntry(helptext_info,
10170 helptext_config[i].token,
10171 helptext_config[i].value);
10175 BEGIN_HASH_ITERATION(helptext_info, itr)
10177 printf("::: '%s' => '%s'\n",
10178 HASH_ITERATION_TOKEN(itr), HASH_ITERATION_VALUE(itr));
10180 END_HASH_ITERATION(hash, itr)
10185 /* ------------------------------------------------------------------------- */
10186 /* convert levels */
10187 /* ------------------------------------------------------------------------- */
10189 #define MAX_NUM_CONVERT_LEVELS 1000
10191 void ConvertLevels()
10193 static LevelDirTree *convert_leveldir = NULL;
10194 static int convert_level_nr = -1;
10195 static int num_levels_handled = 0;
10196 static int num_levels_converted = 0;
10197 static boolean levels_failed[MAX_NUM_CONVERT_LEVELS];
10200 convert_leveldir = getTreeInfoFromIdentifier(leveldir_first,
10201 global.convert_leveldir);
10203 if (convert_leveldir == NULL)
10204 Error(ERR_EXIT, "no such level identifier: '%s'",
10205 global.convert_leveldir);
10207 leveldir_current = convert_leveldir;
10209 if (global.convert_level_nr != -1)
10211 convert_leveldir->first_level = global.convert_level_nr;
10212 convert_leveldir->last_level = global.convert_level_nr;
10215 convert_level_nr = convert_leveldir->first_level;
10217 PrintLine("=", 79);
10218 Print("Converting levels\n");
10219 PrintLine("-", 79);
10220 Print("Level series identifier: '%s'\n", convert_leveldir->identifier);
10221 Print("Level series name: '%s'\n", convert_leveldir->name);
10222 Print("Level series author: '%s'\n", convert_leveldir->author);
10223 Print("Number of levels: %d\n", convert_leveldir->levels);
10224 PrintLine("=", 79);
10227 for (i = 0; i < MAX_NUM_CONVERT_LEVELS; i++)
10228 levels_failed[i] = FALSE;
10230 while (convert_level_nr <= convert_leveldir->last_level)
10232 char *level_filename;
10235 level_nr = convert_level_nr++;
10237 Print("Level %03d: ", level_nr);
10239 LoadLevel(level_nr);
10240 if (level.no_level_file || level.no_valid_file)
10242 Print("(no level)\n");
10246 Print("converting level ... ");
10248 level_filename = getDefaultLevelFilename(level_nr);
10249 new_level = !fileExists(level_filename);
10253 SaveLevel(level_nr);
10255 num_levels_converted++;
10257 Print("converted.\n");
10261 if (level_nr >= 0 && level_nr < MAX_NUM_CONVERT_LEVELS)
10262 levels_failed[level_nr] = TRUE;
10264 Print("NOT CONVERTED -- LEVEL ALREADY EXISTS.\n");
10267 num_levels_handled++;
10271 PrintLine("=", 79);
10272 Print("Number of levels handled: %d\n", num_levels_handled);
10273 Print("Number of levels converted: %d (%d%%)\n", num_levels_converted,
10274 (num_levels_handled ?
10275 num_levels_converted * 100 / num_levels_handled : 0));
10276 PrintLine("-", 79);
10277 Print("Summary (for automatic parsing by scripts):\n");
10278 Print("LEVELDIR '%s', CONVERTED %d/%d (%d%%)",
10279 convert_leveldir->identifier, num_levels_converted,
10280 num_levels_handled,
10281 (num_levels_handled ?
10282 num_levels_converted * 100 / num_levels_handled : 0));
10284 if (num_levels_handled != num_levels_converted)
10286 Print(", FAILED:");
10287 for (i = 0; i < MAX_NUM_CONVERT_LEVELS; i++)
10288 if (levels_failed[i])
10293 PrintLine("=", 79);
10295 CloseAllAndExit(0);
10299 /* ------------------------------------------------------------------------- */
10300 /* create and save images for use in level sketches (raw BMP format) */
10301 /* ------------------------------------------------------------------------- */
10303 void CreateLevelSketchImages()
10305 #if defined(TARGET_SDL)
10310 InitElementPropertiesGfxElement();
10312 bitmap1 = CreateBitmap(TILEX, TILEY, DEFAULT_DEPTH);
10313 bitmap2 = CreateBitmap(MINI_TILEX, MINI_TILEY, DEFAULT_DEPTH);
10315 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
10317 Bitmap *src_bitmap;
10319 int element = getMappedElement(i);
10320 int graphic = el2edimg(element);
10321 char basename1[16];
10322 char basename2[16];
10326 sprintf(basename1, "%03d.bmp", i);
10327 sprintf(basename2, "%03ds.bmp", i);
10329 filename1 = getPath2(global.create_images_dir, basename1);
10330 filename2 = getPath2(global.create_images_dir, basename2);
10332 getFixedGraphicSource(graphic, 0, &src_bitmap, &src_x, &src_y);
10333 BlitBitmap(src_bitmap, bitmap1, src_x, src_y, TILEX, TILEY,
10336 if (SDL_SaveBMP(bitmap1->surface, filename1) != 0)
10337 Error(ERR_EXIT, "cannot save level sketch image file '%s'", filename1);
10339 getMiniGraphicSource(graphic, &src_bitmap, &src_x, &src_y);
10340 BlitBitmap(src_bitmap, bitmap2, src_x, src_y, MINI_TILEX, MINI_TILEY, 0, 0);
10342 if (SDL_SaveBMP(bitmap2->surface, filename2) != 0)
10343 Error(ERR_EXIT, "cannot save level sketch image file '%s'", filename2);
10349 printf("%03d `%03d%c", i, i, (i % 10 < 9 ? ' ' : '\n'));
10352 FreeBitmap(bitmap1);
10353 FreeBitmap(bitmap2);
10358 Error(ERR_INFO, "%d normal and small images created", NUM_FILE_ELEMENTS);
10360 CloseAllAndExit(0);
10365 /* ------------------------------------------------------------------------- */
10366 /* create and save images for custom and group elements (raw BMP format) */
10367 /* ------------------------------------------------------------------------- */
10369 void CreateCustomElementImages(char *directory)
10371 #if defined(TARGET_SDL)
10372 char *src_basename = "RocksCE-template.ilbm";
10373 char *dst_basename = "RocksCE.bmp";
10374 char *src_filename = getPath2(directory, src_basename);
10375 char *dst_filename = getPath2(directory, dst_basename);
10376 Bitmap *src_bitmap;
10378 int yoffset_ce = 0;
10379 int yoffset_ge = (TILEY * NUM_CUSTOM_ELEMENTS / 16);
10382 SDLInitVideoDisplay();
10384 ReCreateBitmap(&backbuffer, video.width, video.height);
10386 src_bitmap = LoadImage(src_filename);
10388 bitmap = CreateBitmap(TILEX * 16 * 2,
10389 TILEY * (NUM_CUSTOM_ELEMENTS + NUM_GROUP_ELEMENTS) / 16,
10392 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
10399 BlitBitmap(src_bitmap, bitmap, 0, 0, TILEX, TILEY,
10400 TILEX * x, TILEY * y + yoffset_ce);
10402 BlitBitmap(src_bitmap, bitmap, 0, TILEY,
10404 TILEX * x + TILEX * 16,
10405 TILEY * y + yoffset_ce);
10407 for (j = 2; j >= 0; j--)
10411 BlitBitmap(src_bitmap, bitmap,
10412 TILEX + c * 7, 0, 6, 10,
10413 TILEX * x + 6 + j * 7,
10414 TILEY * y + 11 + yoffset_ce);
10416 BlitBitmap(src_bitmap, bitmap,
10417 TILEX + c * 8, TILEY, 6, 10,
10418 TILEX * 16 + TILEX * x + 6 + j * 8,
10419 TILEY * y + 10 + yoffset_ce);
10425 for (i = 0; i < NUM_GROUP_ELEMENTS; i++)
10432 BlitBitmap(src_bitmap, bitmap, 0, 0, TILEX, TILEY,
10433 TILEX * x, TILEY * y + yoffset_ge);
10435 BlitBitmap(src_bitmap, bitmap, 0, TILEY,
10437 TILEX * x + TILEX * 16,
10438 TILEY * y + yoffset_ge);
10440 for (j = 1; j >= 0; j--)
10444 BlitBitmap(src_bitmap, bitmap, TILEX + c * 10, 11, 10, 10,
10445 TILEX * x + 6 + j * 10,
10446 TILEY * y + 11 + yoffset_ge);
10448 BlitBitmap(src_bitmap, bitmap,
10449 TILEX + c * 8, TILEY + 12, 6, 10,
10450 TILEX * 16 + TILEX * x + 10 + j * 8,
10451 TILEY * y + 10 + yoffset_ge);
10457 if (SDL_SaveBMP(bitmap->surface, dst_filename) != 0)
10458 Error(ERR_EXIT, "cannot save CE graphics file '%s'", dst_filename);
10460 FreeBitmap(bitmap);
10462 CloseAllAndExit(0);