1 // ============================================================================
2 // Rocks'n'Diamonds - McDuffin Strikes Back!
3 // ----------------------------------------------------------------------------
4 // (c) 1995-2014 by Artsoft Entertainment
7 // https://www.artsoft.org/
8 // ----------------------------------------------------------------------------
10 // ============================================================================
17 #include "libgame/libgame.h"
26 #define ENABLE_UNUSED_CODE 0 // currently unused functions
27 #define ENABLE_HISTORIC_CHUNKS 0 // only for historic reference
28 #define ENABLE_RESERVED_CODE 0 // reserved for later use
30 #define CHUNK_ID_LEN 4 // IFF style chunk id length
31 #define CHUNK_SIZE_UNDEFINED 0 // undefined chunk size == 0
32 #define CHUNK_SIZE_NONE -1 // do not write chunk size
34 #define LEVEL_CHUNK_NAME_SIZE MAX_LEVEL_NAME_LEN
35 #define LEVEL_CHUNK_AUTH_SIZE MAX_LEVEL_AUTHOR_LEN
37 #define LEVEL_CHUNK_VERS_SIZE 8 // size of file version chunk
38 #define LEVEL_CHUNK_DATE_SIZE 4 // size of file date chunk
39 #define LEVEL_CHUNK_HEAD_SIZE 80 // size of level file header
40 #define LEVEL_CHUNK_HEAD_UNUSED 0 // unused level header bytes
41 #define LEVEL_CHUNK_CNT2_SIZE 160 // size of level CNT2 chunk
42 #define LEVEL_CHUNK_CNT2_UNUSED 11 // unused CNT2 chunk bytes
43 #define LEVEL_CHUNK_CNT3_HEADER 16 // size of level CNT3 header
44 #define LEVEL_CHUNK_CNT3_UNUSED 10 // unused CNT3 chunk bytes
45 #define LEVEL_CPART_CUS3_SIZE 134 // size of CUS3 chunk part
46 #define LEVEL_CPART_CUS3_UNUSED 15 // unused CUS3 bytes / part
47 #define LEVEL_CHUNK_GRP1_SIZE 74 // size of level GRP1 chunk
49 // (element number, number of change pages, change page number)
50 #define LEVEL_CHUNK_CUSX_UNCHANGED (2 + (1 + 1) + (1 + 1))
52 // (element number only)
53 #define LEVEL_CHUNK_GRPX_UNCHANGED 2
54 #define LEVEL_CHUNK_NOTE_UNCHANGED 2
56 // (nothing at all if unchanged)
57 #define LEVEL_CHUNK_ELEM_UNCHANGED 0
59 #define TAPE_CHUNK_VERS_SIZE 8 // size of file version chunk
60 #define TAPE_CHUNK_HEAD_SIZE 20 // size of tape file header
61 #define TAPE_CHUNK_HEAD_UNUSED 2 // unused tape header bytes
63 #define LEVEL_CHUNK_CNT3_SIZE(x) (LEVEL_CHUNK_CNT3_HEADER + (x))
64 #define LEVEL_CHUNK_CUS3_SIZE(x) (2 + (x) * LEVEL_CPART_CUS3_SIZE)
65 #define LEVEL_CHUNK_CUS4_SIZE(x) (96 + (x) * 48)
67 // file identifier strings
68 #define LEVEL_COOKIE_TMPL "ROCKSNDIAMONDS_LEVEL_FILE_VERSION_x.x"
69 #define TAPE_COOKIE_TMPL "ROCKSNDIAMONDS_TAPE_FILE_VERSION_x.x"
70 #define SCORE_COOKIE "ROCKSNDIAMONDS_SCORE_FILE_VERSION_1.2"
72 // values for deciding when (not) to save configuration data
73 #define SAVE_CONF_NEVER 0
74 #define SAVE_CONF_ALWAYS 1
75 #define SAVE_CONF_WHEN_CHANGED -1
77 // values for chunks using micro chunks
78 #define CONF_MASK_1_BYTE 0x00
79 #define CONF_MASK_2_BYTE 0x40
80 #define CONF_MASK_4_BYTE 0x80
81 #define CONF_MASK_MULTI_BYTES 0xc0
83 #define CONF_MASK_BYTES 0xc0
84 #define CONF_MASK_TOKEN 0x3f
86 #define CONF_VALUE_1_BYTE(x) (CONF_MASK_1_BYTE | (x))
87 #define CONF_VALUE_2_BYTE(x) (CONF_MASK_2_BYTE | (x))
88 #define CONF_VALUE_4_BYTE(x) (CONF_MASK_4_BYTE | (x))
89 #define CONF_VALUE_MULTI_BYTES(x) (CONF_MASK_MULTI_BYTES | (x))
91 // these definitions are just for convenience of use and readability
92 #define CONF_VALUE_8_BIT(x) CONF_VALUE_1_BYTE(x)
93 #define CONF_VALUE_16_BIT(x) CONF_VALUE_2_BYTE(x)
94 #define CONF_VALUE_32_BIT(x) CONF_VALUE_4_BYTE(x)
95 #define CONF_VALUE_BYTES(x) CONF_VALUE_MULTI_BYTES(x)
97 #define CONF_VALUE_NUM_BYTES(x) ((x) == CONF_MASK_1_BYTE ? 1 : \
98 (x) == CONF_MASK_2_BYTE ? 2 : \
99 (x) == CONF_MASK_4_BYTE ? 4 : 0)
101 #define CONF_CONTENT_NUM_ELEMENTS (3 * 3)
102 #define CONF_CONTENT_NUM_BYTES (CONF_CONTENT_NUM_ELEMENTS * 2)
103 #define CONF_ELEMENT_NUM_BYTES (2)
105 #define CONF_ENTITY_NUM_BYTES(t) ((t) == TYPE_ELEMENT || \
106 (t) == TYPE_ELEMENT_LIST ? \
107 CONF_ELEMENT_NUM_BYTES : \
108 (t) == TYPE_CONTENT || \
109 (t) == TYPE_CONTENT_LIST ? \
110 CONF_CONTENT_NUM_BYTES : 1)
112 #define CONF_ELEMENT_BYTE_POS(i) ((i) * CONF_ELEMENT_NUM_BYTES)
113 #define CONF_ELEMENTS_ELEMENT(b,i) ((b[CONF_ELEMENT_BYTE_POS(i)] << 8) | \
114 (b[CONF_ELEMENT_BYTE_POS(i) + 1]))
116 #define CONF_CONTENT_ELEMENT_POS(c,x,y) ((c) * CONF_CONTENT_NUM_ELEMENTS + \
118 #define CONF_CONTENT_BYTE_POS(c,x,y) (CONF_CONTENT_ELEMENT_POS(c,x,y) * \
119 CONF_ELEMENT_NUM_BYTES)
120 #define CONF_CONTENTS_ELEMENT(b,c,x,y) ((b[CONF_CONTENT_BYTE_POS(c,x,y)]<< 8)|\
121 (b[CONF_CONTENT_BYTE_POS(c,x,y) + 1]))
123 // temporary variables used to store pointers to structure members
124 static struct LevelInfo li;
125 static struct ElementInfo xx_ei, yy_ei;
126 static struct ElementChangeInfo xx_change;
127 static struct ElementGroupInfo xx_group;
128 static struct EnvelopeInfo xx_envelope;
129 static unsigned int xx_event_bits[NUM_CE_BITFIELDS];
130 static char xx_default_description[MAX_ELEMENT_NAME_LEN + 1];
131 static int xx_num_contents;
132 static int xx_current_change_page;
133 static char xx_default_string_empty[1] = "";
134 static int xx_string_length_unused;
136 struct LevelFileConfigInfo
138 int element; // element for which data is to be stored
139 int save_type; // save data always, never or when changed
140 int data_type; // data type (used internally, not stored)
141 int conf_type; // micro chunk identifier (stored in file)
144 void *value; // variable that holds the data to be stored
145 int default_value; // initial default value for this variable
148 void *value_copy; // variable that holds the data to be copied
149 void *num_entities; // number of entities for multi-byte data
150 int default_num_entities; // default number of entities for this data
151 int max_num_entities; // maximal number of entities for this data
152 char *default_string; // optional default string for string data
155 static struct LevelFileConfigInfo chunk_config_INFO[] =
157 // ---------- values not related to single elements -------------------------
160 -1, SAVE_CONF_ALWAYS,
161 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
162 &li.game_engine_type, GAME_ENGINE_TYPE_RND
166 -1, SAVE_CONF_ALWAYS,
167 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
168 &li.fieldx, STD_LEV_FIELDX
171 -1, SAVE_CONF_ALWAYS,
172 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
173 &li.fieldy, STD_LEV_FIELDY
177 -1, SAVE_CONF_ALWAYS,
178 TYPE_INTEGER, CONF_VALUE_16_BIT(3),
183 -1, SAVE_CONF_ALWAYS,
184 TYPE_INTEGER, CONF_VALUE_16_BIT(4),
190 TYPE_INTEGER, CONF_VALUE_32_BIT(2),
196 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
197 &li.use_step_counter, FALSE
202 TYPE_BITFIELD, CONF_VALUE_8_BIT(4),
203 &li.wind_direction_initial, MV_NONE
208 TYPE_BOOLEAN, CONF_VALUE_8_BIT(5),
209 &li.em_slippery_gems, FALSE
214 TYPE_BOOLEAN, CONF_VALUE_8_BIT(6),
215 &li.use_custom_template, FALSE
220 TYPE_BITFIELD, CONF_VALUE_32_BIT(1),
221 &li.can_move_into_acid_bits, ~0 // default: everything can
226 TYPE_BITFIELD, CONF_VALUE_8_BIT(7),
227 &li.dont_collide_with_bits, ~0 // default: always deadly
232 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
233 &li.em_explodes_by_fire, FALSE
238 TYPE_INTEGER, CONF_VALUE_16_BIT(5),
239 &li.score[SC_TIME_BONUS], 1
244 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
245 &li.auto_exit_sokoban, FALSE
250 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
251 &li.auto_count_gems, FALSE
256 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
257 &li.solved_by_one_player, FALSE
267 static struct LevelFileConfigInfo chunk_config_ELEM[] =
269 // (these values are the same for each player)
272 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
273 &li.block_last_field, FALSE // default case for EM levels
277 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
278 &li.sp_block_last_field, TRUE // default case for SP levels
282 TYPE_BOOLEAN, CONF_VALUE_8_BIT(3),
283 &li.instant_relocation, FALSE
287 TYPE_BOOLEAN, CONF_VALUE_8_BIT(4),
288 &li.can_pass_to_walkable, FALSE
292 TYPE_BOOLEAN, CONF_VALUE_8_BIT(5),
293 &li.block_snap_field, TRUE
297 TYPE_BOOLEAN, CONF_VALUE_8_BIT(6),
298 &li.continuous_snapping, TRUE
302 TYPE_BOOLEAN, CONF_VALUE_8_BIT(12),
303 &li.shifted_relocation, FALSE
307 TYPE_BOOLEAN, CONF_VALUE_8_BIT(15),
308 &li.lazy_relocation, FALSE
311 // (these values are different for each player)
314 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
315 &li.initial_player_stepsize[0], STEPSIZE_NORMAL
319 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
320 &li.initial_player_gravity[0], FALSE
324 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
325 &li.use_start_element[0], FALSE
329 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
330 &li.start_element[0], EL_PLAYER_1
334 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
335 &li.use_artwork_element[0], FALSE
339 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
340 &li.artwork_element[0], EL_PLAYER_1
344 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
345 &li.use_explosion_element[0], FALSE
349 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
350 &li.explosion_element[0], EL_PLAYER_1
354 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
355 &li.use_initial_inventory[0], FALSE
359 TYPE_BOOLEAN, CONF_VALUE_8_BIT(14),
360 &li.initial_inventory_size[0], 1
364 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
365 &li.initial_inventory_content[0][0],EL_EMPTY, NULL,
366 &li.initial_inventory_size[0], 1, MAX_INITIAL_INVENTORY_SIZE
371 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
372 &li.initial_player_stepsize[1], STEPSIZE_NORMAL
376 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
377 &li.initial_player_gravity[1], FALSE
381 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
382 &li.use_start_element[1], FALSE
386 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
387 &li.start_element[1], EL_PLAYER_2
391 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
392 &li.use_artwork_element[1], FALSE
396 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
397 &li.artwork_element[1], EL_PLAYER_2
401 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
402 &li.use_explosion_element[1], FALSE
406 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
407 &li.explosion_element[1], EL_PLAYER_2
411 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
412 &li.use_initial_inventory[1], FALSE
416 TYPE_BOOLEAN, CONF_VALUE_8_BIT(14),
417 &li.initial_inventory_size[1], 1
421 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
422 &li.initial_inventory_content[1][0],EL_EMPTY, NULL,
423 &li.initial_inventory_size[1], 1, MAX_INITIAL_INVENTORY_SIZE
428 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
429 &li.initial_player_stepsize[2], STEPSIZE_NORMAL
433 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
434 &li.initial_player_gravity[2], FALSE
438 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
439 &li.use_start_element[2], FALSE
443 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
444 &li.start_element[2], EL_PLAYER_3
448 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
449 &li.use_artwork_element[2], FALSE
453 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
454 &li.artwork_element[2], EL_PLAYER_3
458 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
459 &li.use_explosion_element[2], FALSE
463 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
464 &li.explosion_element[2], EL_PLAYER_3
468 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
469 &li.use_initial_inventory[2], FALSE
473 TYPE_BOOLEAN, CONF_VALUE_8_BIT(14),
474 &li.initial_inventory_size[2], 1
478 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
479 &li.initial_inventory_content[2][0],EL_EMPTY, NULL,
480 &li.initial_inventory_size[2], 1, MAX_INITIAL_INVENTORY_SIZE
485 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
486 &li.initial_player_stepsize[3], STEPSIZE_NORMAL
490 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
491 &li.initial_player_gravity[3], FALSE
495 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
496 &li.use_start_element[3], FALSE
500 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
501 &li.start_element[3], EL_PLAYER_4
505 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
506 &li.use_artwork_element[3], FALSE
510 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
511 &li.artwork_element[3], EL_PLAYER_4
515 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
516 &li.use_explosion_element[3], FALSE
520 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
521 &li.explosion_element[3], EL_PLAYER_4
525 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
526 &li.use_initial_inventory[3], FALSE
530 TYPE_BOOLEAN, CONF_VALUE_8_BIT(14),
531 &li.initial_inventory_size[3], 1
535 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
536 &li.initial_inventory_content[3][0],EL_EMPTY, NULL,
537 &li.initial_inventory_size[3], 1, MAX_INITIAL_INVENTORY_SIZE
542 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
543 &li.score[SC_EMERALD], 10
548 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
549 &li.score[SC_DIAMOND], 10
554 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
555 &li.score[SC_BUG], 10
560 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
561 &li.score[SC_SPACESHIP], 10
566 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
567 &li.score[SC_PACMAN], 10
572 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
573 &li.score[SC_NUT], 10
578 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
579 &li.score[SC_DYNAMITE], 10
584 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
585 &li.score[SC_KEY], 10
590 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
591 &li.score[SC_PEARL], 10
596 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
597 &li.score[SC_CRYSTAL], 10
602 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
603 &li.amoeba_content, EL_DIAMOND
607 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
612 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
613 &li.grow_into_diggable, TRUE
618 TYPE_CONTENT_LIST, CONF_VALUE_BYTES(1),
619 &li.yamyam_content, EL_ROCK, NULL,
620 &li.num_yamyam_contents, 4, MAX_ELEMENT_CONTENTS
624 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
625 &li.score[SC_YAMYAM], 10
630 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
631 &li.score[SC_ROBOT], 10
635 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
641 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
647 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
648 &li.time_magic_wall, 10
653 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
654 &li.game_of_life[0], 2
658 TYPE_INTEGER, CONF_VALUE_8_BIT(2),
659 &li.game_of_life[1], 3
663 TYPE_INTEGER, CONF_VALUE_8_BIT(3),
664 &li.game_of_life[2], 3
668 TYPE_INTEGER, CONF_VALUE_8_BIT(4),
669 &li.game_of_life[3], 3
673 TYPE_BOOLEAN, CONF_VALUE_8_BIT(5),
674 &li.use_life_bugs, FALSE
679 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
684 TYPE_INTEGER, CONF_VALUE_8_BIT(2),
689 TYPE_INTEGER, CONF_VALUE_8_BIT(3),
694 TYPE_INTEGER, CONF_VALUE_8_BIT(4),
699 EL_TIMEGATE_SWITCH, -1,
700 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
701 &li.time_timegate, 10
705 EL_LIGHT_SWITCH_ACTIVE, -1,
706 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
711 EL_SHIELD_NORMAL, -1,
712 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
713 &li.shield_normal_time, 10
716 EL_SHIELD_NORMAL, -1,
717 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
718 &li.score[SC_SHIELD], 10
722 EL_SHIELD_DEADLY, -1,
723 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
724 &li.shield_deadly_time, 10
727 EL_SHIELD_DEADLY, -1,
728 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
729 &li.score[SC_SHIELD], 10
734 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
739 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
740 &li.extra_time_score, 10
744 EL_TIME_ORB_FULL, -1,
745 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
746 &li.time_orb_time, 10
749 EL_TIME_ORB_FULL, -1,
750 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
751 &li.use_time_orb_bug, FALSE
756 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
757 &li.use_spring_bug, FALSE
762 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
763 &li.android_move_time, 10
767 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
768 &li.android_clone_time, 10
771 EL_EMC_ANDROID, SAVE_CONF_NEVER,
772 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
773 &li.android_clone_element[0], EL_EMPTY, NULL,
774 &li.num_android_clone_elements, 1, MAX_ANDROID_ELEMENTS_OLD
778 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(2),
779 &li.android_clone_element[0], EL_EMPTY, NULL,
780 &li.num_android_clone_elements, 1, MAX_ANDROID_ELEMENTS
785 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
790 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
795 EL_EMC_MAGNIFIER, -1,
796 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
797 &li.magnify_score, 10
800 EL_EMC_MAGNIFIER, -1,
801 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
806 EL_EMC_MAGIC_BALL, -1,
807 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
811 EL_EMC_MAGIC_BALL, -1,
812 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
813 &li.ball_random, FALSE
816 EL_EMC_MAGIC_BALL, -1,
817 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
818 &li.ball_active_initial, FALSE
821 EL_EMC_MAGIC_BALL, -1,
822 TYPE_CONTENT_LIST, CONF_VALUE_BYTES(1),
823 &li.ball_content, EL_EMPTY, NULL,
824 &li.num_ball_contents, 4, MAX_ELEMENT_CONTENTS
828 EL_SOKOBAN_FIELD_EMPTY, -1,
829 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
830 &li.sb_fields_needed, TRUE
834 EL_SOKOBAN_OBJECT, -1,
835 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
836 &li.sb_objects_needed, TRUE
841 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
842 &li.mm_laser_red, FALSE
846 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
847 &li.mm_laser_green, FALSE
851 TYPE_BOOLEAN, CONF_VALUE_8_BIT(3),
852 &li.mm_laser_blue, TRUE
857 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
858 &li.df_laser_red, TRUE
862 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
863 &li.df_laser_green, TRUE
867 TYPE_BOOLEAN, CONF_VALUE_8_BIT(3),
868 &li.df_laser_blue, FALSE
872 EL_MM_FUSE_ACTIVE, -1,
873 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
878 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
883 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
887 EL_MM_STEEL_BLOCK, -1,
888 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
889 &li.mm_time_block, 75
893 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
894 &li.score[SC_ELEM_BONUS], 10
897 // ---------- unused values -------------------------------------------------
900 EL_UNKNOWN, SAVE_CONF_NEVER,
901 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
902 &li.score[SC_UNKNOWN_15], 10
912 static struct LevelFileConfigInfo chunk_config_NOTE[] =
916 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
917 &xx_envelope.xsize, MAX_ENVELOPE_XSIZE,
921 TYPE_INTEGER, CONF_VALUE_8_BIT(2),
922 &xx_envelope.ysize, MAX_ENVELOPE_YSIZE,
927 TYPE_BOOLEAN, CONF_VALUE_8_BIT(3),
928 &xx_envelope.autowrap, FALSE
932 TYPE_BOOLEAN, CONF_VALUE_8_BIT(4),
933 &xx_envelope.centered, FALSE
938 TYPE_STRING, CONF_VALUE_BYTES(1),
939 &xx_envelope.text, -1, NULL,
940 &xx_string_length_unused, -1, MAX_ENVELOPE_TEXT_LEN,
941 &xx_default_string_empty[0]
951 static struct LevelFileConfigInfo chunk_config_CUSX_base[] =
955 TYPE_STRING, CONF_VALUE_BYTES(1),
956 &xx_ei.description[0], -1,
957 &yy_ei.description[0],
958 &xx_string_length_unused, -1, MAX_ELEMENT_NAME_LEN,
959 &xx_default_description[0]
964 TYPE_BITFIELD, CONF_VALUE_32_BIT(1),
965 &xx_ei.properties[EP_BITFIELD_BASE_NR], EP_BITMASK_BASE_DEFAULT,
966 &yy_ei.properties[EP_BITFIELD_BASE_NR]
968 #if ENABLE_RESERVED_CODE
969 // (reserved for later use)
972 TYPE_BITFIELD, CONF_VALUE_32_BIT(2),
973 &xx_ei.properties[EP_BITFIELD_BASE_NR + 1], EP_BITMASK_DEFAULT,
974 &yy_ei.properties[EP_BITFIELD_BASE_NR + 1]
980 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
981 &xx_ei.use_gfx_element, FALSE,
982 &yy_ei.use_gfx_element
986 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
987 &xx_ei.gfx_element_initial, EL_EMPTY_SPACE,
988 &yy_ei.gfx_element_initial
993 TYPE_BITFIELD, CONF_VALUE_8_BIT(2),
994 &xx_ei.access_direction, MV_ALL_DIRECTIONS,
995 &yy_ei.access_direction
1000 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
1001 &xx_ei.collect_score_initial, 10,
1002 &yy_ei.collect_score_initial
1006 TYPE_INTEGER, CONF_VALUE_16_BIT(3),
1007 &xx_ei.collect_count_initial, 1,
1008 &yy_ei.collect_count_initial
1013 TYPE_INTEGER, CONF_VALUE_16_BIT(4),
1014 &xx_ei.ce_value_fixed_initial, 0,
1015 &yy_ei.ce_value_fixed_initial
1019 TYPE_INTEGER, CONF_VALUE_16_BIT(5),
1020 &xx_ei.ce_value_random_initial, 0,
1021 &yy_ei.ce_value_random_initial
1025 TYPE_BOOLEAN, CONF_VALUE_8_BIT(3),
1026 &xx_ei.use_last_ce_value, FALSE,
1027 &yy_ei.use_last_ce_value
1032 TYPE_INTEGER, CONF_VALUE_16_BIT(6),
1033 &xx_ei.push_delay_fixed, 8,
1034 &yy_ei.push_delay_fixed
1038 TYPE_INTEGER, CONF_VALUE_16_BIT(7),
1039 &xx_ei.push_delay_random, 8,
1040 &yy_ei.push_delay_random
1044 TYPE_INTEGER, CONF_VALUE_16_BIT(8),
1045 &xx_ei.drop_delay_fixed, 0,
1046 &yy_ei.drop_delay_fixed
1050 TYPE_INTEGER, CONF_VALUE_16_BIT(9),
1051 &xx_ei.drop_delay_random, 0,
1052 &yy_ei.drop_delay_random
1056 TYPE_INTEGER, CONF_VALUE_16_BIT(10),
1057 &xx_ei.move_delay_fixed, 0,
1058 &yy_ei.move_delay_fixed
1062 TYPE_INTEGER, CONF_VALUE_16_BIT(11),
1063 &xx_ei.move_delay_random, 0,
1064 &yy_ei.move_delay_random
1069 TYPE_BITFIELD, CONF_VALUE_32_BIT(3),
1070 &xx_ei.move_pattern, MV_ALL_DIRECTIONS,
1075 TYPE_BITFIELD, CONF_VALUE_8_BIT(4),
1076 &xx_ei.move_direction_initial, MV_START_AUTOMATIC,
1077 &yy_ei.move_direction_initial
1081 TYPE_INTEGER, CONF_VALUE_8_BIT(5),
1082 &xx_ei.move_stepsize, TILEX / 8,
1083 &yy_ei.move_stepsize
1088 TYPE_ELEMENT, CONF_VALUE_16_BIT(12),
1089 &xx_ei.move_enter_element, EL_EMPTY_SPACE,
1090 &yy_ei.move_enter_element
1094 TYPE_ELEMENT, CONF_VALUE_16_BIT(13),
1095 &xx_ei.move_leave_element, EL_EMPTY_SPACE,
1096 &yy_ei.move_leave_element
1100 TYPE_INTEGER, CONF_VALUE_8_BIT(6),
1101 &xx_ei.move_leave_type, LEAVE_TYPE_UNLIMITED,
1102 &yy_ei.move_leave_type
1107 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
1108 &xx_ei.slippery_type, SLIPPERY_ANY_RANDOM,
1109 &yy_ei.slippery_type
1114 TYPE_INTEGER, CONF_VALUE_8_BIT(8),
1115 &xx_ei.explosion_type, EXPLODES_3X3,
1116 &yy_ei.explosion_type
1120 TYPE_INTEGER, CONF_VALUE_16_BIT(14),
1121 &xx_ei.explosion_delay, 16,
1122 &yy_ei.explosion_delay
1126 TYPE_INTEGER, CONF_VALUE_16_BIT(15),
1127 &xx_ei.ignition_delay, 8,
1128 &yy_ei.ignition_delay
1133 TYPE_CONTENT_LIST, CONF_VALUE_BYTES(2),
1134 &xx_ei.content, EL_EMPTY_SPACE,
1136 &xx_num_contents, 1, 1
1139 // ---------- "num_change_pages" must be the last entry ---------------------
1142 -1, SAVE_CONF_ALWAYS,
1143 TYPE_INTEGER, CONF_VALUE_8_BIT(9),
1144 &xx_ei.num_change_pages, 1,
1145 &yy_ei.num_change_pages
1156 static struct LevelFileConfigInfo chunk_config_CUSX_change[] =
1158 // ---------- "current_change_page" must be the first entry -----------------
1161 -1, SAVE_CONF_ALWAYS,
1162 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
1163 &xx_current_change_page, -1
1166 // ---------- (the remaining entries can be in any order) -------------------
1170 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
1171 &xx_change.can_change, FALSE
1176 TYPE_BITFIELD, CONF_VALUE_32_BIT(1),
1177 &xx_event_bits[0], 0
1181 TYPE_BITFIELD, CONF_VALUE_32_BIT(2),
1182 &xx_event_bits[1], 0
1187 TYPE_BITFIELD, CONF_VALUE_8_BIT(3),
1188 &xx_change.trigger_player, CH_PLAYER_ANY
1192 TYPE_BITFIELD, CONF_VALUE_8_BIT(4),
1193 &xx_change.trigger_side, CH_SIDE_ANY
1197 TYPE_BITFIELD, CONF_VALUE_32_BIT(3),
1198 &xx_change.trigger_page, CH_PAGE_ANY
1203 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
1204 &xx_change.target_element, EL_EMPTY_SPACE
1209 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
1210 &xx_change.delay_fixed, 0
1214 TYPE_INTEGER, CONF_VALUE_16_BIT(3),
1215 &xx_change.delay_random, 0
1219 TYPE_INTEGER, CONF_VALUE_16_BIT(4),
1220 &xx_change.delay_frames, FRAMES_PER_SECOND
1225 TYPE_ELEMENT, CONF_VALUE_16_BIT(5),
1226 &xx_change.initial_trigger_element, EL_EMPTY_SPACE
1231 TYPE_BOOLEAN, CONF_VALUE_8_BIT(6),
1232 &xx_change.explode, FALSE
1236 TYPE_BOOLEAN, CONF_VALUE_8_BIT(7),
1237 &xx_change.use_target_content, FALSE
1241 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
1242 &xx_change.only_if_complete, FALSE
1246 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
1247 &xx_change.use_random_replace, FALSE
1251 TYPE_INTEGER, CONF_VALUE_8_BIT(10),
1252 &xx_change.random_percentage, 100
1256 TYPE_INTEGER, CONF_VALUE_8_BIT(11),
1257 &xx_change.replace_when, CP_WHEN_EMPTY
1262 TYPE_BOOLEAN, CONF_VALUE_8_BIT(12),
1263 &xx_change.has_action, FALSE
1267 TYPE_INTEGER, CONF_VALUE_8_BIT(13),
1268 &xx_change.action_type, CA_NO_ACTION
1272 TYPE_INTEGER, CONF_VALUE_8_BIT(14),
1273 &xx_change.action_mode, CA_MODE_UNDEFINED
1277 TYPE_INTEGER, CONF_VALUE_16_BIT(6),
1278 &xx_change.action_arg, CA_ARG_UNDEFINED
1283 TYPE_ELEMENT, CONF_VALUE_16_BIT(7),
1284 &xx_change.action_element, EL_EMPTY_SPACE
1289 TYPE_CONTENT_LIST, CONF_VALUE_BYTES(1),
1290 &xx_change.target_content, EL_EMPTY_SPACE, NULL,
1291 &xx_num_contents, 1, 1
1301 static struct LevelFileConfigInfo chunk_config_GRPX[] =
1305 TYPE_STRING, CONF_VALUE_BYTES(1),
1306 &xx_ei.description[0], -1, NULL,
1307 &xx_string_length_unused, -1, MAX_ELEMENT_NAME_LEN,
1308 &xx_default_description[0]
1313 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
1314 &xx_ei.use_gfx_element, FALSE
1318 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
1319 &xx_ei.gfx_element_initial, EL_EMPTY_SPACE
1324 TYPE_INTEGER, CONF_VALUE_8_BIT(2),
1325 &xx_group.choice_mode, ANIM_RANDOM
1330 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(2),
1331 &xx_group.element[0], EL_EMPTY_SPACE, NULL,
1332 &xx_group.num_elements, 1, MAX_ELEMENTS_IN_GROUP
1342 static struct LevelFileConfigInfo chunk_config_CONF[] = // (OBSOLETE)
1346 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
1347 &li.block_snap_field, TRUE
1351 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
1352 &li.continuous_snapping, TRUE
1356 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
1357 &li.initial_player_stepsize[0], STEPSIZE_NORMAL
1361 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
1362 &li.use_start_element[0], FALSE
1366 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
1367 &li.start_element[0], EL_PLAYER_1
1371 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
1372 &li.use_artwork_element[0], FALSE
1376 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
1377 &li.artwork_element[0], EL_PLAYER_1
1381 TYPE_BOOLEAN, CONF_VALUE_8_BIT(12),
1382 &li.use_explosion_element[0], FALSE
1386 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
1387 &li.explosion_element[0], EL_PLAYER_1
1402 filetype_id_list[] =
1404 { LEVEL_FILE_TYPE_RND, "RND" },
1405 { LEVEL_FILE_TYPE_BD, "BD" },
1406 { LEVEL_FILE_TYPE_EM, "EM" },
1407 { LEVEL_FILE_TYPE_SP, "SP" },
1408 { LEVEL_FILE_TYPE_DX, "DX" },
1409 { LEVEL_FILE_TYPE_SB, "SB" },
1410 { LEVEL_FILE_TYPE_DC, "DC" },
1411 { LEVEL_FILE_TYPE_MM, "MM" },
1412 { LEVEL_FILE_TYPE_MM, "DF" },
1417 // ============================================================================
1418 // level file functions
1419 // ============================================================================
1421 static boolean check_special_flags(char *flag)
1423 if (strEqual(options.special_flags, flag) ||
1424 strEqual(leveldir_current->special_flags, flag))
1430 static struct DateInfo getCurrentDate(void)
1432 time_t epoch_seconds = time(NULL);
1433 struct tm *now = localtime(&epoch_seconds);
1434 struct DateInfo date;
1436 date.year = now->tm_year + 1900;
1437 date.month = now->tm_mon + 1;
1438 date.day = now->tm_mday;
1440 date.src = DATE_SRC_CLOCK;
1445 static void resetEventFlags(struct ElementChangeInfo *change)
1449 for (i = 0; i < NUM_CHANGE_EVENTS; i++)
1450 change->has_event[i] = FALSE;
1453 static void resetEventBits(void)
1457 for (i = 0; i < NUM_CE_BITFIELDS; i++)
1458 xx_event_bits[i] = 0;
1461 static void setEventFlagsFromEventBits(struct ElementChangeInfo *change)
1465 /* important: only change event flag if corresponding event bit is set
1466 (this is because all xx_event_bits[] values are loaded separately,
1467 and all xx_event_bits[] values are set back to zero before loading
1468 another value xx_event_bits[x] (each value representing 32 flags)) */
1470 for (i = 0; i < NUM_CHANGE_EVENTS; i++)
1471 if (xx_event_bits[CH_EVENT_BITFIELD_NR(i)] & CH_EVENT_BIT(i))
1472 change->has_event[i] = TRUE;
1475 static void setEventBitsFromEventFlags(struct ElementChangeInfo *change)
1479 /* in contrast to the above function setEventFlagsFromEventBits(), it
1480 would also be possible to set all bits in xx_event_bits[] to 0 or 1
1481 depending on the corresponding change->has_event[i] values here, as
1482 all xx_event_bits[] values are reset in resetEventBits() before */
1484 for (i = 0; i < NUM_CHANGE_EVENTS; i++)
1485 if (change->has_event[i])
1486 xx_event_bits[CH_EVENT_BITFIELD_NR(i)] |= CH_EVENT_BIT(i);
1489 static char *getDefaultElementDescription(struct ElementInfo *ei)
1491 static char description[MAX_ELEMENT_NAME_LEN + 1];
1492 char *default_description = (ei->custom_description != NULL ?
1493 ei->custom_description :
1494 ei->editor_description);
1497 // always start with reliable default values
1498 for (i = 0; i < MAX_ELEMENT_NAME_LEN + 1; i++)
1499 description[i] = '\0';
1501 // truncate element description to MAX_ELEMENT_NAME_LEN bytes
1502 strncpy(description, default_description, MAX_ELEMENT_NAME_LEN);
1504 return &description[0];
1507 static void setElementDescriptionToDefault(struct ElementInfo *ei)
1509 char *default_description = getDefaultElementDescription(ei);
1512 for (i = 0; i < MAX_ELEMENT_NAME_LEN + 1; i++)
1513 ei->description[i] = default_description[i];
1516 static void setConfigToDefaultsFromConfigList(struct LevelFileConfigInfo *conf)
1520 for (i = 0; conf[i].data_type != -1; i++)
1522 int default_value = conf[i].default_value;
1523 int data_type = conf[i].data_type;
1524 int conf_type = conf[i].conf_type;
1525 int byte_mask = conf_type & CONF_MASK_BYTES;
1527 if (byte_mask == CONF_MASK_MULTI_BYTES)
1529 int default_num_entities = conf[i].default_num_entities;
1530 int max_num_entities = conf[i].max_num_entities;
1532 *(int *)(conf[i].num_entities) = default_num_entities;
1534 if (data_type == TYPE_STRING)
1536 char *default_string = conf[i].default_string;
1537 char *string = (char *)(conf[i].value);
1539 strncpy(string, default_string, max_num_entities);
1541 else if (data_type == TYPE_ELEMENT_LIST)
1543 int *element_array = (int *)(conf[i].value);
1546 for (j = 0; j < max_num_entities; j++)
1547 element_array[j] = default_value;
1549 else if (data_type == TYPE_CONTENT_LIST)
1551 struct Content *content = (struct Content *)(conf[i].value);
1554 for (c = 0; c < max_num_entities; c++)
1555 for (y = 0; y < 3; y++)
1556 for (x = 0; x < 3; x++)
1557 content[c].e[x][y] = default_value;
1560 else // constant size configuration data (1, 2 or 4 bytes)
1562 if (data_type == TYPE_BOOLEAN)
1563 *(boolean *)(conf[i].value) = default_value;
1565 *(int *) (conf[i].value) = default_value;
1570 static void copyConfigFromConfigList(struct LevelFileConfigInfo *conf)
1574 for (i = 0; conf[i].data_type != -1; i++)
1576 int data_type = conf[i].data_type;
1577 int conf_type = conf[i].conf_type;
1578 int byte_mask = conf_type & CONF_MASK_BYTES;
1580 if (byte_mask == CONF_MASK_MULTI_BYTES)
1582 int max_num_entities = conf[i].max_num_entities;
1584 if (data_type == TYPE_STRING)
1586 char *string = (char *)(conf[i].value);
1587 char *string_copy = (char *)(conf[i].value_copy);
1589 strncpy(string_copy, string, max_num_entities);
1591 else if (data_type == TYPE_ELEMENT_LIST)
1593 int *element_array = (int *)(conf[i].value);
1594 int *element_array_copy = (int *)(conf[i].value_copy);
1597 for (j = 0; j < max_num_entities; j++)
1598 element_array_copy[j] = element_array[j];
1600 else if (data_type == TYPE_CONTENT_LIST)
1602 struct Content *content = (struct Content *)(conf[i].value);
1603 struct Content *content_copy = (struct Content *)(conf[i].value_copy);
1606 for (c = 0; c < max_num_entities; c++)
1607 for (y = 0; y < 3; y++)
1608 for (x = 0; x < 3; x++)
1609 content_copy[c].e[x][y] = content[c].e[x][y];
1612 else // constant size configuration data (1, 2 or 4 bytes)
1614 if (data_type == TYPE_BOOLEAN)
1615 *(boolean *)(conf[i].value_copy) = *(boolean *)(conf[i].value);
1617 *(int *) (conf[i].value_copy) = *(int *) (conf[i].value);
1622 void copyElementInfo(struct ElementInfo *ei_from, struct ElementInfo *ei_to)
1626 xx_ei = *ei_from; // copy element data into temporary buffer
1627 yy_ei = *ei_to; // copy element data into temporary buffer
1629 copyConfigFromConfigList(chunk_config_CUSX_base);
1634 // ---------- reinitialize and copy change pages ----------
1636 ei_to->num_change_pages = ei_from->num_change_pages;
1637 ei_to->current_change_page = ei_from->current_change_page;
1639 setElementChangePages(ei_to, ei_to->num_change_pages);
1641 for (i = 0; i < ei_to->num_change_pages; i++)
1642 ei_to->change_page[i] = ei_from->change_page[i];
1644 // ---------- copy group element info ----------
1645 if (ei_from->group != NULL && ei_to->group != NULL) // group or internal
1646 *ei_to->group = *ei_from->group;
1648 // mark this custom element as modified
1649 ei_to->modified_settings = TRUE;
1652 void setElementChangePages(struct ElementInfo *ei, int change_pages)
1654 int change_page_size = sizeof(struct ElementChangeInfo);
1656 ei->num_change_pages = MAX(1, change_pages);
1659 checked_realloc(ei->change_page, ei->num_change_pages * change_page_size);
1661 if (ei->current_change_page >= ei->num_change_pages)
1662 ei->current_change_page = ei->num_change_pages - 1;
1664 ei->change = &ei->change_page[ei->current_change_page];
1667 void setElementChangeInfoToDefaults(struct ElementChangeInfo *change)
1669 xx_change = *change; // copy change data into temporary buffer
1671 setConfigToDefaultsFromConfigList(chunk_config_CUSX_change);
1673 *change = xx_change;
1675 resetEventFlags(change);
1677 change->direct_action = 0;
1678 change->other_action = 0;
1680 change->pre_change_function = NULL;
1681 change->change_function = NULL;
1682 change->post_change_function = NULL;
1685 static void setLevelInfoToDefaults_Level(struct LevelInfo *level)
1689 li = *level; // copy level data into temporary buffer
1690 setConfigToDefaultsFromConfigList(chunk_config_INFO);
1691 *level = li; // copy temporary buffer back to level data
1693 setLevelInfoToDefaults_EM();
1694 setLevelInfoToDefaults_SP();
1695 setLevelInfoToDefaults_MM();
1697 level->native_em_level = &native_em_level;
1698 level->native_sp_level = &native_sp_level;
1699 level->native_mm_level = &native_mm_level;
1701 level->file_version = FILE_VERSION_ACTUAL;
1702 level->game_version = GAME_VERSION_ACTUAL;
1704 level->creation_date = getCurrentDate();
1706 level->encoding_16bit_field = TRUE;
1707 level->encoding_16bit_yamyam = TRUE;
1708 level->encoding_16bit_amoeba = TRUE;
1710 // clear level name and level author string buffers
1711 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
1712 level->name[i] = '\0';
1713 for (i = 0; i < MAX_LEVEL_AUTHOR_LEN; i++)
1714 level->author[i] = '\0';
1716 // set level name and level author to default values
1717 strcpy(level->name, NAMELESS_LEVEL_NAME);
1718 strcpy(level->author, ANONYMOUS_NAME);
1720 // set level playfield to playable default level with player and exit
1721 for (x = 0; x < MAX_LEV_FIELDX; x++)
1722 for (y = 0; y < MAX_LEV_FIELDY; y++)
1723 level->field[x][y] = EL_SAND;
1725 level->field[0][0] = EL_PLAYER_1;
1726 level->field[STD_LEV_FIELDX - 1][STD_LEV_FIELDY - 1] = EL_EXIT_CLOSED;
1728 BorderElement = EL_STEELWALL;
1730 // detect custom elements when loading them
1731 level->file_has_custom_elements = FALSE;
1733 // set all bug compatibility flags to "false" => do not emulate this bug
1734 level->use_action_after_change_bug = FALSE;
1736 if (leveldir_current)
1738 // try to determine better author name than 'anonymous'
1739 if (!strEqual(leveldir_current->author, ANONYMOUS_NAME))
1741 strncpy(level->author, leveldir_current->author, MAX_LEVEL_AUTHOR_LEN);
1742 level->author[MAX_LEVEL_AUTHOR_LEN] = '\0';
1746 switch (LEVELCLASS(leveldir_current))
1748 case LEVELCLASS_TUTORIAL:
1749 strcpy(level->author, PROGRAM_AUTHOR_STRING);
1752 case LEVELCLASS_CONTRIB:
1753 strncpy(level->author, leveldir_current->name, MAX_LEVEL_AUTHOR_LEN);
1754 level->author[MAX_LEVEL_AUTHOR_LEN] = '\0';
1757 case LEVELCLASS_PRIVATE:
1758 strncpy(level->author, getRealName(), MAX_LEVEL_AUTHOR_LEN);
1759 level->author[MAX_LEVEL_AUTHOR_LEN] = '\0';
1763 // keep default value
1770 static void setLevelInfoToDefaults_Elements(struct LevelInfo *level)
1772 static boolean clipboard_elements_initialized = FALSE;
1775 InitElementPropertiesStatic();
1777 li = *level; // copy level data into temporary buffer
1778 setConfigToDefaultsFromConfigList(chunk_config_ELEM);
1779 *level = li; // copy temporary buffer back to level data
1781 for (i = 0; i < MAX_NUM_ELEMENTS; i++)
1784 struct ElementInfo *ei = &element_info[element];
1786 // never initialize clipboard elements after the very first time
1787 // (to be able to use clipboard elements between several levels)
1788 if (IS_CLIPBOARD_ELEMENT(element) && clipboard_elements_initialized)
1791 if (IS_ENVELOPE(element))
1793 int envelope_nr = element - EL_ENVELOPE_1;
1795 setConfigToDefaultsFromConfigList(chunk_config_NOTE);
1797 level->envelope[envelope_nr] = xx_envelope;
1800 if (IS_CUSTOM_ELEMENT(element) ||
1801 IS_GROUP_ELEMENT(element) ||
1802 IS_INTERNAL_ELEMENT(element))
1804 xx_ei = *ei; // copy element data into temporary buffer
1806 setConfigToDefaultsFromConfigList(chunk_config_CUSX_base);
1811 setElementChangePages(ei, 1);
1812 setElementChangeInfoToDefaults(ei->change);
1814 if (IS_CUSTOM_ELEMENT(element) ||
1815 IS_GROUP_ELEMENT(element) ||
1816 IS_INTERNAL_ELEMENT(element))
1818 setElementDescriptionToDefault(ei);
1820 ei->modified_settings = FALSE;
1823 if (IS_CUSTOM_ELEMENT(element) ||
1824 IS_INTERNAL_ELEMENT(element))
1826 // internal values used in level editor
1828 ei->access_type = 0;
1829 ei->access_layer = 0;
1830 ei->access_protected = 0;
1831 ei->walk_to_action = 0;
1832 ei->smash_targets = 0;
1835 ei->can_explode_by_fire = FALSE;
1836 ei->can_explode_smashed = FALSE;
1837 ei->can_explode_impact = FALSE;
1839 ei->current_change_page = 0;
1842 if (IS_GROUP_ELEMENT(element) ||
1843 IS_INTERNAL_ELEMENT(element))
1845 struct ElementGroupInfo *group;
1847 // initialize memory for list of elements in group
1848 if (ei->group == NULL)
1849 ei->group = checked_malloc(sizeof(struct ElementGroupInfo));
1853 xx_group = *group; // copy group data into temporary buffer
1855 setConfigToDefaultsFromConfigList(chunk_config_GRPX);
1861 clipboard_elements_initialized = TRUE;
1864 static void setLevelInfoToDefaults(struct LevelInfo *level,
1865 boolean level_info_only,
1866 boolean reset_file_status)
1868 setLevelInfoToDefaults_Level(level);
1870 if (!level_info_only)
1871 setLevelInfoToDefaults_Elements(level);
1873 if (reset_file_status)
1875 level->no_valid_file = FALSE;
1876 level->no_level_file = FALSE;
1879 level->changed = FALSE;
1882 static void setFileInfoToDefaults(struct LevelFileInfo *level_file_info)
1884 level_file_info->nr = 0;
1885 level_file_info->type = LEVEL_FILE_TYPE_UNKNOWN;
1886 level_file_info->packed = FALSE;
1888 setString(&level_file_info->basename, NULL);
1889 setString(&level_file_info->filename, NULL);
1892 int getMappedElement_SB(int, boolean);
1894 static void ActivateLevelTemplate(void)
1898 if (check_special_flags("load_xsb_to_ces"))
1900 // fill smaller playfields with padding "beyond border wall" elements
1901 if (level.fieldx < level_template.fieldx ||
1902 level.fieldy < level_template.fieldy)
1904 short field[level.fieldx][level.fieldy];
1905 int new_fieldx = MAX(level.fieldx, level_template.fieldx);
1906 int new_fieldy = MAX(level.fieldy, level_template.fieldy);
1907 int pos_fieldx = (new_fieldx - level.fieldx) / 2;
1908 int pos_fieldy = (new_fieldy - level.fieldy) / 2;
1910 // copy old playfield (which is smaller than the visible area)
1911 for (y = 0; y < level.fieldy; y++) for (x = 0; x < level.fieldx; x++)
1912 field[x][y] = level.field[x][y];
1914 // fill new, larger playfield with "beyond border wall" elements
1915 for (y = 0; y < new_fieldy; y++) for (x = 0; x < new_fieldx; x++)
1916 level.field[x][y] = getMappedElement_SB('_', TRUE);
1918 // copy the old playfield to the middle of the new playfield
1919 for (y = 0; y < level.fieldy; y++) for (x = 0; x < level.fieldx; x++)
1920 level.field[pos_fieldx + x][pos_fieldy + y] = field[x][y];
1922 level.fieldx = new_fieldx;
1923 level.fieldy = new_fieldy;
1927 // Currently there is no special action needed to activate the template
1928 // data, because 'element_info' property settings overwrite the original
1929 // level data, while all other variables do not change.
1931 // Exception: 'from_level_template' elements in the original level playfield
1932 // are overwritten with the corresponding elements at the same position in
1933 // playfield from the level template.
1935 for (x = 0; x < level.fieldx; x++)
1936 for (y = 0; y < level.fieldy; y++)
1937 if (level.field[x][y] == EL_FROM_LEVEL_TEMPLATE)
1938 level.field[x][y] = level_template.field[x][y];
1940 if (check_special_flags("load_xsb_to_ces"))
1942 struct LevelInfo level_backup = level;
1944 // overwrite all individual level settings from template level settings
1945 level = level_template;
1947 // restore level file info
1948 level.file_info = level_backup.file_info;
1950 // restore playfield size
1951 level.fieldx = level_backup.fieldx;
1952 level.fieldy = level_backup.fieldy;
1954 // restore playfield content
1955 for (x = 0; x < level.fieldx; x++)
1956 for (y = 0; y < level.fieldy; y++)
1957 level.field[x][y] = level_backup.field[x][y];
1959 // restore name and author from individual level
1960 strcpy(level.name, level_backup.name);
1961 strcpy(level.author, level_backup.author);
1963 // restore flag "use_custom_template"
1964 level.use_custom_template = level_backup.use_custom_template;
1968 static char *getLevelFilenameFromBasename(char *basename)
1970 static char *filename = NULL;
1972 checked_free(filename);
1974 filename = getPath2(getCurrentLevelDir(), basename);
1979 static int getFileTypeFromBasename(char *basename)
1981 // !!! ALSO SEE COMMENT IN checkForPackageFromBasename() !!!
1983 static char *filename = NULL;
1984 struct stat file_status;
1986 // ---------- try to determine file type from filename ----------
1988 // check for typical filename of a Supaplex level package file
1989 if (strlen(basename) == 10 && strPrefixLower(basename, "levels.d"))
1990 return LEVEL_FILE_TYPE_SP;
1992 // check for typical filename of a Diamond Caves II level package file
1993 if (strSuffixLower(basename, ".dc") ||
1994 strSuffixLower(basename, ".dc2"))
1995 return LEVEL_FILE_TYPE_DC;
1997 // check for typical filename of a Sokoban level package file
1998 if (strSuffixLower(basename, ".xsb") &&
1999 strchr(basename, '%') == NULL)
2000 return LEVEL_FILE_TYPE_SB;
2002 // ---------- try to determine file type from filesize ----------
2004 checked_free(filename);
2005 filename = getPath2(getCurrentLevelDir(), basename);
2007 if (stat(filename, &file_status) == 0)
2009 // check for typical filesize of a Supaplex level package file
2010 if (file_status.st_size == 170496)
2011 return LEVEL_FILE_TYPE_SP;
2014 return LEVEL_FILE_TYPE_UNKNOWN;
2017 static int getFileTypeFromMagicBytes(char *filename, int type)
2021 if ((file = openFile(filename, MODE_READ)))
2023 char chunk_name[CHUNK_ID_LEN + 1];
2025 getFileChunkBE(file, chunk_name, NULL);
2027 if (strEqual(chunk_name, "MMII") ||
2028 strEqual(chunk_name, "MIRR"))
2029 type = LEVEL_FILE_TYPE_MM;
2037 static boolean checkForPackageFromBasename(char *basename)
2039 // !!! WON'T WORK ANYMORE IF getFileTypeFromBasename() ALSO DETECTS !!!
2040 // !!! SINGLE LEVELS (CURRENTLY ONLY DETECTS LEVEL PACKAGES !!!
2042 return (getFileTypeFromBasename(basename) != LEVEL_FILE_TYPE_UNKNOWN);
2045 static char *getSingleLevelBasenameExt(int nr, char *extension)
2047 static char basename[MAX_FILENAME_LEN];
2050 sprintf(basename, "%s", LEVELTEMPLATE_FILENAME);
2052 sprintf(basename, "%03d.%s", nr, extension);
2057 static char *getSingleLevelBasename(int nr)
2059 return getSingleLevelBasenameExt(nr, LEVELFILE_EXTENSION);
2062 static char *getPackedLevelBasename(int type)
2064 static char basename[MAX_FILENAME_LEN];
2065 char *directory = getCurrentLevelDir();
2067 DirectoryEntry *dir_entry;
2069 strcpy(basename, UNDEFINED_FILENAME); // default: undefined file
2071 if ((dir = openDirectory(directory)) == NULL)
2073 Error(ERR_WARN, "cannot read current level directory '%s'", directory);
2078 while ((dir_entry = readDirectory(dir)) != NULL) // loop all entries
2080 char *entry_basename = dir_entry->basename;
2081 int entry_type = getFileTypeFromBasename(entry_basename);
2083 if (entry_type != LEVEL_FILE_TYPE_UNKNOWN) // found valid level package
2085 if (type == LEVEL_FILE_TYPE_UNKNOWN ||
2088 strcpy(basename, entry_basename);
2095 closeDirectory(dir);
2100 static char *getSingleLevelFilename(int nr)
2102 return getLevelFilenameFromBasename(getSingleLevelBasename(nr));
2105 #if ENABLE_UNUSED_CODE
2106 static char *getPackedLevelFilename(int type)
2108 return getLevelFilenameFromBasename(getPackedLevelBasename(type));
2112 char *getDefaultLevelFilename(int nr)
2114 return getSingleLevelFilename(nr);
2117 #if ENABLE_UNUSED_CODE
2118 static void setLevelFileInfo_SingleLevelFilename(struct LevelFileInfo *lfi,
2122 lfi->packed = FALSE;
2124 setString(&lfi->basename, getSingleLevelBasename(lfi->nr, lfi->type));
2125 setString(&lfi->filename, getLevelFilenameFromBasename(lfi->basename));
2129 static void setLevelFileInfo_FormatLevelFilename(struct LevelFileInfo *lfi,
2130 int type, char *format, ...)
2132 static char basename[MAX_FILENAME_LEN];
2135 va_start(ap, format);
2136 vsprintf(basename, format, ap);
2140 lfi->packed = FALSE;
2142 setString(&lfi->basename, basename);
2143 setString(&lfi->filename, getLevelFilenameFromBasename(lfi->basename));
2146 static void setLevelFileInfo_PackedLevelFilename(struct LevelFileInfo *lfi,
2152 setString(&lfi->basename, getPackedLevelBasename(lfi->type));
2153 setString(&lfi->filename, getLevelFilenameFromBasename(lfi->basename));
2156 static int getFiletypeFromID(char *filetype_id)
2158 char *filetype_id_lower;
2159 int filetype = LEVEL_FILE_TYPE_UNKNOWN;
2162 if (filetype_id == NULL)
2163 return LEVEL_FILE_TYPE_UNKNOWN;
2165 filetype_id_lower = getStringToLower(filetype_id);
2167 for (i = 0; filetype_id_list[i].id != NULL; i++)
2169 char *id_lower = getStringToLower(filetype_id_list[i].id);
2171 if (strEqual(filetype_id_lower, id_lower))
2172 filetype = filetype_id_list[i].filetype;
2176 if (filetype != LEVEL_FILE_TYPE_UNKNOWN)
2180 free(filetype_id_lower);
2185 char *getLocalLevelTemplateFilename(void)
2187 return getDefaultLevelFilename(-1);
2190 char *getGlobalLevelTemplateFilename(void)
2192 // global variable "leveldir_current" must be modified in the loop below
2193 LevelDirTree *leveldir_current_last = leveldir_current;
2194 char *filename = NULL;
2196 // check for template level in path from current to topmost tree node
2198 while (leveldir_current != NULL)
2200 filename = getDefaultLevelFilename(-1);
2202 if (fileExists(filename))
2205 leveldir_current = leveldir_current->node_parent;
2208 // restore global variable "leveldir_current" modified in above loop
2209 leveldir_current = leveldir_current_last;
2214 static void determineLevelFileInfo_Filename(struct LevelFileInfo *lfi)
2218 // special case: level number is negative => check for level template file
2221 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_RND,
2222 getSingleLevelBasename(-1));
2224 // replace local level template filename with global template filename
2225 setString(&lfi->filename, getGlobalLevelTemplateFilename());
2227 // no fallback if template file not existing
2231 // special case: check for file name/pattern specified in "levelinfo.conf"
2232 if (leveldir_current->level_filename != NULL)
2234 int filetype = getFiletypeFromID(leveldir_current->level_filetype);
2236 setLevelFileInfo_FormatLevelFilename(lfi, filetype,
2237 leveldir_current->level_filename, nr);
2239 lfi->packed = checkForPackageFromBasename(leveldir_current->level_filename);
2241 if (fileExists(lfi->filename))
2244 else if (leveldir_current->level_filetype != NULL)
2246 int filetype = getFiletypeFromID(leveldir_current->level_filetype);
2248 // check for specified native level file with standard file name
2249 setLevelFileInfo_FormatLevelFilename(lfi, filetype,
2250 "%03d.%s", nr, LEVELFILE_EXTENSION);
2251 if (fileExists(lfi->filename))
2255 // check for native Rocks'n'Diamonds level file
2256 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_RND,
2257 "%03d.%s", nr, LEVELFILE_EXTENSION);
2258 if (fileExists(lfi->filename))
2261 // check for Emerald Mine level file (V1)
2262 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "a%c%c",
2263 'a' + (nr / 10) % 26, '0' + nr % 10);
2264 if (fileExists(lfi->filename))
2266 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "A%c%c",
2267 'A' + (nr / 10) % 26, '0' + nr % 10);
2268 if (fileExists(lfi->filename))
2271 // check for Emerald Mine level file (V2 to V5)
2272 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%d", nr);
2273 if (fileExists(lfi->filename))
2276 // check for Emerald Mine level file (V6 / single mode)
2277 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02ds", nr);
2278 if (fileExists(lfi->filename))
2280 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02dS", nr);
2281 if (fileExists(lfi->filename))
2284 // check for Emerald Mine level file (V6 / teamwork mode)
2285 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02dt", nr);
2286 if (fileExists(lfi->filename))
2288 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02dT", nr);
2289 if (fileExists(lfi->filename))
2292 // check for various packed level file formats
2293 setLevelFileInfo_PackedLevelFilename(lfi, LEVEL_FILE_TYPE_UNKNOWN);
2294 if (fileExists(lfi->filename))
2297 // no known level file found -- use default values (and fail later)
2298 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_RND,
2299 "%03d.%s", nr, LEVELFILE_EXTENSION);
2302 static void determineLevelFileInfo_Filetype(struct LevelFileInfo *lfi)
2304 if (lfi->type == LEVEL_FILE_TYPE_UNKNOWN)
2305 lfi->type = getFileTypeFromBasename(lfi->basename);
2307 if (lfi->type == LEVEL_FILE_TYPE_RND)
2308 lfi->type = getFileTypeFromMagicBytes(lfi->filename, lfi->type);
2311 static void setLevelFileInfo(struct LevelFileInfo *level_file_info, int nr)
2313 // always start with reliable default values
2314 setFileInfoToDefaults(level_file_info);
2316 level_file_info->nr = nr; // set requested level number
2318 determineLevelFileInfo_Filename(level_file_info);
2319 determineLevelFileInfo_Filetype(level_file_info);
2322 static void copyLevelFileInfo(struct LevelFileInfo *lfi_from,
2323 struct LevelFileInfo *lfi_to)
2325 lfi_to->nr = lfi_from->nr;
2326 lfi_to->type = lfi_from->type;
2327 lfi_to->packed = lfi_from->packed;
2329 setString(&lfi_to->basename, lfi_from->basename);
2330 setString(&lfi_to->filename, lfi_from->filename);
2333 // ----------------------------------------------------------------------------
2334 // functions for loading R'n'D level
2335 // ----------------------------------------------------------------------------
2337 static int getMappedElement(int element)
2339 // remap some (historic, now obsolete) elements
2343 case EL_PLAYER_OBSOLETE:
2344 element = EL_PLAYER_1;
2347 case EL_KEY_OBSOLETE:
2351 case EL_EM_KEY_1_FILE_OBSOLETE:
2352 element = EL_EM_KEY_1;
2355 case EL_EM_KEY_2_FILE_OBSOLETE:
2356 element = EL_EM_KEY_2;
2359 case EL_EM_KEY_3_FILE_OBSOLETE:
2360 element = EL_EM_KEY_3;
2363 case EL_EM_KEY_4_FILE_OBSOLETE:
2364 element = EL_EM_KEY_4;
2367 case EL_ENVELOPE_OBSOLETE:
2368 element = EL_ENVELOPE_1;
2376 if (element >= NUM_FILE_ELEMENTS)
2378 Error(ERR_WARN, "invalid level element %d", element);
2380 element = EL_UNKNOWN;
2388 static int getMappedElementByVersion(int element, int game_version)
2390 // remap some elements due to certain game version
2392 if (game_version <= VERSION_IDENT(2,2,0,0))
2394 // map game font elements
2395 element = (element == EL_CHAR('[') ? EL_CHAR_AUMLAUT :
2396 element == EL_CHAR('\\') ? EL_CHAR_OUMLAUT :
2397 element == EL_CHAR(']') ? EL_CHAR_UUMLAUT :
2398 element == EL_CHAR('^') ? EL_CHAR_COPYRIGHT : element);
2401 if (game_version < VERSION_IDENT(3,0,0,0))
2403 // map Supaplex gravity tube elements
2404 element = (element == EL_SP_GRAVITY_PORT_LEFT ? EL_SP_PORT_LEFT :
2405 element == EL_SP_GRAVITY_PORT_RIGHT ? EL_SP_PORT_RIGHT :
2406 element == EL_SP_GRAVITY_PORT_UP ? EL_SP_PORT_UP :
2407 element == EL_SP_GRAVITY_PORT_DOWN ? EL_SP_PORT_DOWN :
2414 static int LoadLevel_VERS(File *file, int chunk_size, struct LevelInfo *level)
2416 level->file_version = getFileVersion(file);
2417 level->game_version = getFileVersion(file);
2422 static int LoadLevel_DATE(File *file, int chunk_size, struct LevelInfo *level)
2424 level->creation_date.year = getFile16BitBE(file);
2425 level->creation_date.month = getFile8Bit(file);
2426 level->creation_date.day = getFile8Bit(file);
2428 level->creation_date.src = DATE_SRC_LEVELFILE;
2433 static int LoadLevel_HEAD(File *file, int chunk_size, struct LevelInfo *level)
2435 int initial_player_stepsize;
2436 int initial_player_gravity;
2439 level->fieldx = getFile8Bit(file);
2440 level->fieldy = getFile8Bit(file);
2442 level->time = getFile16BitBE(file);
2443 level->gems_needed = getFile16BitBE(file);
2445 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
2446 level->name[i] = getFile8Bit(file);
2447 level->name[MAX_LEVEL_NAME_LEN] = 0;
2449 for (i = 0; i < LEVEL_SCORE_ELEMENTS; i++)
2450 level->score[i] = getFile8Bit(file);
2452 level->num_yamyam_contents = STD_ELEMENT_CONTENTS;
2453 for (i = 0; i < STD_ELEMENT_CONTENTS; i++)
2454 for (y = 0; y < 3; y++)
2455 for (x = 0; x < 3; x++)
2456 level->yamyam_content[i].e[x][y] = getMappedElement(getFile8Bit(file));
2458 level->amoeba_speed = getFile8Bit(file);
2459 level->time_magic_wall = getFile8Bit(file);
2460 level->time_wheel = getFile8Bit(file);
2461 level->amoeba_content = getMappedElement(getFile8Bit(file));
2463 initial_player_stepsize = (getFile8Bit(file) == 1 ? STEPSIZE_FAST :
2466 for (i = 0; i < MAX_PLAYERS; i++)
2467 level->initial_player_stepsize[i] = initial_player_stepsize;
2469 initial_player_gravity = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2471 for (i = 0; i < MAX_PLAYERS; i++)
2472 level->initial_player_gravity[i] = initial_player_gravity;
2474 level->encoding_16bit_field = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2475 level->em_slippery_gems = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2477 level->use_custom_template = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2479 level->block_last_field = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2480 level->sp_block_last_field = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2481 level->can_move_into_acid_bits = getFile32BitBE(file);
2482 level->dont_collide_with_bits = getFile8Bit(file);
2484 level->use_spring_bug = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2485 level->use_step_counter = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2487 level->instant_relocation = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2488 level->can_pass_to_walkable = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2489 level->grow_into_diggable = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2491 level->game_engine_type = getFile8Bit(file);
2493 ReadUnusedBytesFromFile(file, LEVEL_CHUNK_HEAD_UNUSED);
2498 static int LoadLevel_NAME(File *file, int chunk_size, struct LevelInfo *level)
2502 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
2503 level->name[i] = getFile8Bit(file);
2504 level->name[MAX_LEVEL_NAME_LEN] = 0;
2509 static int LoadLevel_AUTH(File *file, int chunk_size, struct LevelInfo *level)
2513 for (i = 0; i < MAX_LEVEL_AUTHOR_LEN; i++)
2514 level->author[i] = getFile8Bit(file);
2515 level->author[MAX_LEVEL_AUTHOR_LEN] = 0;
2520 static int LoadLevel_BODY(File *file, int chunk_size, struct LevelInfo *level)
2523 int chunk_size_expected = level->fieldx * level->fieldy;
2525 /* Note: "chunk_size" was wrong before version 2.0 when elements are
2526 stored with 16-bit encoding (and should be twice as big then).
2527 Even worse, playfield data was stored 16-bit when only yamyam content
2528 contained 16-bit elements and vice versa. */
2530 if (level->encoding_16bit_field && level->file_version >= FILE_VERSION_2_0)
2531 chunk_size_expected *= 2;
2533 if (chunk_size_expected != chunk_size)
2535 ReadUnusedBytesFromFile(file, chunk_size);
2536 return chunk_size_expected;
2539 for (y = 0; y < level->fieldy; y++)
2540 for (x = 0; x < level->fieldx; x++)
2541 level->field[x][y] =
2542 getMappedElement(level->encoding_16bit_field ? getFile16BitBE(file) :
2547 static int LoadLevel_CONT(File *file, int chunk_size, struct LevelInfo *level)
2550 int header_size = 4;
2551 int content_size = MAX_ELEMENT_CONTENTS * 3 * 3;
2552 int chunk_size_expected = header_size + content_size;
2554 /* Note: "chunk_size" was wrong before version 2.0 when elements are
2555 stored with 16-bit encoding (and should be twice as big then).
2556 Even worse, playfield data was stored 16-bit when only yamyam content
2557 contained 16-bit elements and vice versa. */
2559 if (level->encoding_16bit_field && level->file_version >= FILE_VERSION_2_0)
2560 chunk_size_expected += content_size;
2562 if (chunk_size_expected != chunk_size)
2564 ReadUnusedBytesFromFile(file, chunk_size);
2565 return chunk_size_expected;
2569 level->num_yamyam_contents = getFile8Bit(file);
2573 // correct invalid number of content fields -- should never happen
2574 if (level->num_yamyam_contents < 1 ||
2575 level->num_yamyam_contents > MAX_ELEMENT_CONTENTS)
2576 level->num_yamyam_contents = STD_ELEMENT_CONTENTS;
2578 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
2579 for (y = 0; y < 3; y++)
2580 for (x = 0; x < 3; x++)
2581 level->yamyam_content[i].e[x][y] =
2582 getMappedElement(level->encoding_16bit_field ?
2583 getFile16BitBE(file) : getFile8Bit(file));
2587 static int LoadLevel_CNT2(File *file, int chunk_size, struct LevelInfo *level)
2592 int content_array[MAX_ELEMENT_CONTENTS][3][3];
2594 element = getMappedElement(getFile16BitBE(file));
2595 num_contents = getFile8Bit(file);
2597 getFile8Bit(file); // content x size (unused)
2598 getFile8Bit(file); // content y size (unused)
2600 ReadUnusedBytesFromFile(file, LEVEL_CHUNK_CNT2_UNUSED);
2602 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
2603 for (y = 0; y < 3; y++)
2604 for (x = 0; x < 3; x++)
2605 content_array[i][x][y] = getMappedElement(getFile16BitBE(file));
2607 // correct invalid number of content fields -- should never happen
2608 if (num_contents < 1 || num_contents > MAX_ELEMENT_CONTENTS)
2609 num_contents = STD_ELEMENT_CONTENTS;
2611 if (element == EL_YAMYAM)
2613 level->num_yamyam_contents = num_contents;
2615 for (i = 0; i < num_contents; i++)
2616 for (y = 0; y < 3; y++)
2617 for (x = 0; x < 3; x++)
2618 level->yamyam_content[i].e[x][y] = content_array[i][x][y];
2620 else if (element == EL_BD_AMOEBA)
2622 level->amoeba_content = content_array[0][0][0];
2626 Error(ERR_WARN, "cannot load content for element '%d'", element);
2632 static int LoadLevel_CNT3(File *file, int chunk_size, struct LevelInfo *level)
2638 int chunk_size_expected;
2640 element = getMappedElement(getFile16BitBE(file));
2641 if (!IS_ENVELOPE(element))
2642 element = EL_ENVELOPE_1;
2644 envelope_nr = element - EL_ENVELOPE_1;
2646 envelope_len = getFile16BitBE(file);
2648 level->envelope[envelope_nr].xsize = getFile8Bit(file);
2649 level->envelope[envelope_nr].ysize = getFile8Bit(file);
2651 ReadUnusedBytesFromFile(file, LEVEL_CHUNK_CNT3_UNUSED);
2653 chunk_size_expected = LEVEL_CHUNK_CNT3_SIZE(envelope_len);
2654 if (chunk_size_expected != chunk_size)
2656 ReadUnusedBytesFromFile(file, chunk_size - LEVEL_CHUNK_CNT3_HEADER);
2657 return chunk_size_expected;
2660 for (i = 0; i < envelope_len; i++)
2661 level->envelope[envelope_nr].text[i] = getFile8Bit(file);
2666 static int LoadLevel_CUS1(File *file, int chunk_size, struct LevelInfo *level)
2668 int num_changed_custom_elements = getFile16BitBE(file);
2669 int chunk_size_expected = 2 + num_changed_custom_elements * 6;
2672 if (chunk_size_expected != chunk_size)
2674 ReadUnusedBytesFromFile(file, chunk_size - 2);
2675 return chunk_size_expected;
2678 for (i = 0; i < num_changed_custom_elements; i++)
2680 int element = getMappedElement(getFile16BitBE(file));
2681 int properties = getFile32BitBE(file);
2683 if (IS_CUSTOM_ELEMENT(element))
2684 element_info[element].properties[EP_BITFIELD_BASE_NR] = properties;
2686 Error(ERR_WARN, "invalid custom element number %d", element);
2688 // older game versions that wrote level files with CUS1 chunks used
2689 // different default push delay values (not yet stored in level file)
2690 element_info[element].push_delay_fixed = 2;
2691 element_info[element].push_delay_random = 8;
2694 level->file_has_custom_elements = TRUE;
2699 static int LoadLevel_CUS2(File *file, int chunk_size, struct LevelInfo *level)
2701 int num_changed_custom_elements = getFile16BitBE(file);
2702 int chunk_size_expected = 2 + num_changed_custom_elements * 4;
2705 if (chunk_size_expected != chunk_size)
2707 ReadUnusedBytesFromFile(file, chunk_size - 2);
2708 return chunk_size_expected;
2711 for (i = 0; i < num_changed_custom_elements; i++)
2713 int element = getMappedElement(getFile16BitBE(file));
2714 int custom_target_element = getMappedElement(getFile16BitBE(file));
2716 if (IS_CUSTOM_ELEMENT(element))
2717 element_info[element].change->target_element = custom_target_element;
2719 Error(ERR_WARN, "invalid custom element number %d", element);
2722 level->file_has_custom_elements = TRUE;
2727 static int LoadLevel_CUS3(File *file, int chunk_size, struct LevelInfo *level)
2729 int num_changed_custom_elements = getFile16BitBE(file);
2730 int chunk_size_expected = LEVEL_CHUNK_CUS3_SIZE(num_changed_custom_elements);
2733 if (chunk_size_expected != chunk_size)
2735 ReadUnusedBytesFromFile(file, chunk_size - 2);
2736 return chunk_size_expected;
2739 for (i = 0; i < num_changed_custom_elements; i++)
2741 int element = getMappedElement(getFile16BitBE(file));
2742 struct ElementInfo *ei = &element_info[element];
2743 unsigned int event_bits;
2745 if (!IS_CUSTOM_ELEMENT(element))
2747 Error(ERR_WARN, "invalid custom element number %d", element);
2749 element = EL_INTERNAL_DUMMY;
2752 for (j = 0; j < MAX_ELEMENT_NAME_LEN; j++)
2753 ei->description[j] = getFile8Bit(file);
2754 ei->description[MAX_ELEMENT_NAME_LEN] = 0;
2756 ei->properties[EP_BITFIELD_BASE_NR] = getFile32BitBE(file);
2758 // some free bytes for future properties and padding
2759 ReadUnusedBytesFromFile(file, 7);
2761 ei->use_gfx_element = getFile8Bit(file);
2762 ei->gfx_element_initial = getMappedElement(getFile16BitBE(file));
2764 ei->collect_score_initial = getFile8Bit(file);
2765 ei->collect_count_initial = getFile8Bit(file);
2767 ei->push_delay_fixed = getFile16BitBE(file);
2768 ei->push_delay_random = getFile16BitBE(file);
2769 ei->move_delay_fixed = getFile16BitBE(file);
2770 ei->move_delay_random = getFile16BitBE(file);
2772 ei->move_pattern = getFile16BitBE(file);
2773 ei->move_direction_initial = getFile8Bit(file);
2774 ei->move_stepsize = getFile8Bit(file);
2776 for (y = 0; y < 3; y++)
2777 for (x = 0; x < 3; x++)
2778 ei->content.e[x][y] = getMappedElement(getFile16BitBE(file));
2780 event_bits = getFile32BitBE(file);
2781 for (j = 0; j < NUM_CHANGE_EVENTS; j++)
2782 if (event_bits & (1 << j))
2783 ei->change->has_event[j] = TRUE;
2785 ei->change->target_element = getMappedElement(getFile16BitBE(file));
2787 ei->change->delay_fixed = getFile16BitBE(file);
2788 ei->change->delay_random = getFile16BitBE(file);
2789 ei->change->delay_frames = getFile16BitBE(file);
2791 ei->change->initial_trigger_element= getMappedElement(getFile16BitBE(file));
2793 ei->change->explode = getFile8Bit(file);
2794 ei->change->use_target_content = getFile8Bit(file);
2795 ei->change->only_if_complete = getFile8Bit(file);
2796 ei->change->use_random_replace = getFile8Bit(file);
2798 ei->change->random_percentage = getFile8Bit(file);
2799 ei->change->replace_when = getFile8Bit(file);
2801 for (y = 0; y < 3; y++)
2802 for (x = 0; x < 3; x++)
2803 ei->change->target_content.e[x][y] =
2804 getMappedElement(getFile16BitBE(file));
2806 ei->slippery_type = getFile8Bit(file);
2808 // some free bytes for future properties and padding
2809 ReadUnusedBytesFromFile(file, LEVEL_CPART_CUS3_UNUSED);
2811 // mark that this custom element has been modified
2812 ei->modified_settings = TRUE;
2815 level->file_has_custom_elements = TRUE;
2820 static int LoadLevel_CUS4(File *file, int chunk_size, struct LevelInfo *level)
2822 struct ElementInfo *ei;
2823 int chunk_size_expected;
2827 // ---------- custom element base property values (96 bytes) ----------------
2829 element = getMappedElement(getFile16BitBE(file));
2831 if (!IS_CUSTOM_ELEMENT(element))
2833 Error(ERR_WARN, "invalid custom element number %d", element);
2835 ReadUnusedBytesFromFile(file, chunk_size - 2);
2839 ei = &element_info[element];
2841 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
2842 ei->description[i] = getFile8Bit(file);
2843 ei->description[MAX_ELEMENT_NAME_LEN] = 0;
2845 ei->properties[EP_BITFIELD_BASE_NR] = getFile32BitBE(file);
2847 ReadUnusedBytesFromFile(file, 4); // reserved for more base properties
2849 ei->num_change_pages = getFile8Bit(file);
2851 chunk_size_expected = LEVEL_CHUNK_CUS4_SIZE(ei->num_change_pages);
2852 if (chunk_size_expected != chunk_size)
2854 ReadUnusedBytesFromFile(file, chunk_size - 43);
2855 return chunk_size_expected;
2858 ei->ce_value_fixed_initial = getFile16BitBE(file);
2859 ei->ce_value_random_initial = getFile16BitBE(file);
2860 ei->use_last_ce_value = getFile8Bit(file);
2862 ei->use_gfx_element = getFile8Bit(file);
2863 ei->gfx_element_initial = getMappedElement(getFile16BitBE(file));
2865 ei->collect_score_initial = getFile8Bit(file);
2866 ei->collect_count_initial = getFile8Bit(file);
2868 ei->drop_delay_fixed = getFile8Bit(file);
2869 ei->push_delay_fixed = getFile8Bit(file);
2870 ei->drop_delay_random = getFile8Bit(file);
2871 ei->push_delay_random = getFile8Bit(file);
2872 ei->move_delay_fixed = getFile16BitBE(file);
2873 ei->move_delay_random = getFile16BitBE(file);
2875 // bits 0 - 15 of "move_pattern" ...
2876 ei->move_pattern = getFile16BitBE(file);
2877 ei->move_direction_initial = getFile8Bit(file);
2878 ei->move_stepsize = getFile8Bit(file);
2880 ei->slippery_type = getFile8Bit(file);
2882 for (y = 0; y < 3; y++)
2883 for (x = 0; x < 3; x++)
2884 ei->content.e[x][y] = getMappedElement(getFile16BitBE(file));
2886 ei->move_enter_element = getMappedElement(getFile16BitBE(file));
2887 ei->move_leave_element = getMappedElement(getFile16BitBE(file));
2888 ei->move_leave_type = getFile8Bit(file);
2890 // ... bits 16 - 31 of "move_pattern" (not nice, but downward compatible)
2891 ei->move_pattern |= (getFile16BitBE(file) << 16);
2893 ei->access_direction = getFile8Bit(file);
2895 ei->explosion_delay = getFile8Bit(file);
2896 ei->ignition_delay = getFile8Bit(file);
2897 ei->explosion_type = getFile8Bit(file);
2899 // some free bytes for future custom property values and padding
2900 ReadUnusedBytesFromFile(file, 1);
2902 // ---------- change page property values (48 bytes) ------------------------
2904 setElementChangePages(ei, ei->num_change_pages);
2906 for (i = 0; i < ei->num_change_pages; i++)
2908 struct ElementChangeInfo *change = &ei->change_page[i];
2909 unsigned int event_bits;
2911 // always start with reliable default values
2912 setElementChangeInfoToDefaults(change);
2914 // bits 0 - 31 of "has_event[]" ...
2915 event_bits = getFile32BitBE(file);
2916 for (j = 0; j < MIN(NUM_CHANGE_EVENTS, 32); j++)
2917 if (event_bits & (1 << j))
2918 change->has_event[j] = TRUE;
2920 change->target_element = getMappedElement(getFile16BitBE(file));
2922 change->delay_fixed = getFile16BitBE(file);
2923 change->delay_random = getFile16BitBE(file);
2924 change->delay_frames = getFile16BitBE(file);
2926 change->initial_trigger_element = getMappedElement(getFile16BitBE(file));
2928 change->explode = getFile8Bit(file);
2929 change->use_target_content = getFile8Bit(file);
2930 change->only_if_complete = getFile8Bit(file);
2931 change->use_random_replace = getFile8Bit(file);
2933 change->random_percentage = getFile8Bit(file);
2934 change->replace_when = getFile8Bit(file);
2936 for (y = 0; y < 3; y++)
2937 for (x = 0; x < 3; x++)
2938 change->target_content.e[x][y]= getMappedElement(getFile16BitBE(file));
2940 change->can_change = getFile8Bit(file);
2942 change->trigger_side = getFile8Bit(file);
2944 change->trigger_player = getFile8Bit(file);
2945 change->trigger_page = getFile8Bit(file);
2947 change->trigger_page = (change->trigger_page == CH_PAGE_ANY_FILE ?
2948 CH_PAGE_ANY : (1 << change->trigger_page));
2950 change->has_action = getFile8Bit(file);
2951 change->action_type = getFile8Bit(file);
2952 change->action_mode = getFile8Bit(file);
2953 change->action_arg = getFile16BitBE(file);
2955 // ... bits 32 - 39 of "has_event[]" (not nice, but downward compatible)
2956 event_bits = getFile8Bit(file);
2957 for (j = 32; j < NUM_CHANGE_EVENTS; j++)
2958 if (event_bits & (1 << (j - 32)))
2959 change->has_event[j] = TRUE;
2962 // mark this custom element as modified
2963 ei->modified_settings = TRUE;
2965 level->file_has_custom_elements = TRUE;
2970 static int LoadLevel_GRP1(File *file, int chunk_size, struct LevelInfo *level)
2972 struct ElementInfo *ei;
2973 struct ElementGroupInfo *group;
2977 element = getMappedElement(getFile16BitBE(file));
2979 if (!IS_GROUP_ELEMENT(element))
2981 Error(ERR_WARN, "invalid group element number %d", element);
2983 ReadUnusedBytesFromFile(file, chunk_size - 2);
2987 ei = &element_info[element];
2989 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
2990 ei->description[i] = getFile8Bit(file);
2991 ei->description[MAX_ELEMENT_NAME_LEN] = 0;
2993 group = element_info[element].group;
2995 group->num_elements = getFile8Bit(file);
2997 ei->use_gfx_element = getFile8Bit(file);
2998 ei->gfx_element_initial = getMappedElement(getFile16BitBE(file));
3000 group->choice_mode = getFile8Bit(file);
3002 // some free bytes for future values and padding
3003 ReadUnusedBytesFromFile(file, 3);
3005 for (i = 0; i < MAX_ELEMENTS_IN_GROUP; i++)
3006 group->element[i] = getMappedElement(getFile16BitBE(file));
3008 // mark this group element as modified
3009 element_info[element].modified_settings = TRUE;
3011 level->file_has_custom_elements = TRUE;
3016 static int LoadLevel_MicroChunk(File *file, struct LevelFileConfigInfo *conf,
3017 int element, int real_element)
3019 int micro_chunk_size = 0;
3020 int conf_type = getFile8Bit(file);
3021 int byte_mask = conf_type & CONF_MASK_BYTES;
3022 boolean element_found = FALSE;
3025 micro_chunk_size += 1;
3027 if (byte_mask == CONF_MASK_MULTI_BYTES)
3029 int num_bytes = getFile16BitBE(file);
3030 byte *buffer = checked_malloc(num_bytes);
3032 ReadBytesFromFile(file, buffer, num_bytes);
3034 for (i = 0; conf[i].data_type != -1; i++)
3036 if (conf[i].element == element &&
3037 conf[i].conf_type == conf_type)
3039 int data_type = conf[i].data_type;
3040 int num_entities = num_bytes / CONF_ENTITY_NUM_BYTES(data_type);
3041 int max_num_entities = conf[i].max_num_entities;
3043 if (num_entities > max_num_entities)
3046 "truncating number of entities for element %d from %d to %d",
3047 element, num_entities, max_num_entities);
3049 num_entities = max_num_entities;
3052 if (num_entities == 0 && (data_type == TYPE_ELEMENT_LIST ||
3053 data_type == TYPE_CONTENT_LIST))
3055 // for element and content lists, zero entities are not allowed
3056 Error(ERR_WARN, "found empty list of entities for element %d",
3059 // do not set "num_entities" here to prevent reading behind buffer
3061 *(int *)(conf[i].num_entities) = 1; // at least one is required
3065 *(int *)(conf[i].num_entities) = num_entities;
3068 element_found = TRUE;
3070 if (data_type == TYPE_STRING)
3072 char *string = (char *)(conf[i].value);
3075 for (j = 0; j < max_num_entities; j++)
3076 string[j] = (j < num_entities ? buffer[j] : '\0');
3078 else if (data_type == TYPE_ELEMENT_LIST)
3080 int *element_array = (int *)(conf[i].value);
3083 for (j = 0; j < num_entities; j++)
3085 getMappedElement(CONF_ELEMENTS_ELEMENT(buffer, j));
3087 else if (data_type == TYPE_CONTENT_LIST)
3089 struct Content *content= (struct Content *)(conf[i].value);
3092 for (c = 0; c < num_entities; c++)
3093 for (y = 0; y < 3; y++)
3094 for (x = 0; x < 3; x++)
3095 content[c].e[x][y] =
3096 getMappedElement(CONF_CONTENTS_ELEMENT(buffer, c, x, y));
3099 element_found = FALSE;
3105 checked_free(buffer);
3107 micro_chunk_size += 2 + num_bytes;
3109 else // constant size configuration data (1, 2 or 4 bytes)
3111 int value = (byte_mask == CONF_MASK_1_BYTE ? getFile8Bit (file) :
3112 byte_mask == CONF_MASK_2_BYTE ? getFile16BitBE(file) :
3113 byte_mask == CONF_MASK_4_BYTE ? getFile32BitBE(file) : 0);
3115 for (i = 0; conf[i].data_type != -1; i++)
3117 if (conf[i].element == element &&
3118 conf[i].conf_type == conf_type)
3120 int data_type = conf[i].data_type;
3122 if (data_type == TYPE_ELEMENT)
3123 value = getMappedElement(value);
3125 if (data_type == TYPE_BOOLEAN)
3126 *(boolean *)(conf[i].value) = value;
3128 *(int *) (conf[i].value) = value;
3130 element_found = TRUE;
3136 micro_chunk_size += CONF_VALUE_NUM_BYTES(byte_mask);
3141 char *error_conf_chunk_bytes =
3142 (byte_mask == CONF_MASK_1_BYTE ? "CONF_VALUE_8_BIT" :
3143 byte_mask == CONF_MASK_2_BYTE ? "CONF_VALUE_16_BIT" :
3144 byte_mask == CONF_MASK_4_BYTE ? "CONF_VALUE_32_BIT" :"CONF_VALUE_BYTES");
3145 int error_conf_chunk_token = conf_type & CONF_MASK_TOKEN;
3146 int error_element = real_element;
3148 Error(ERR_WARN, "cannot load micro chunk '%s(%d)' value for element %d ['%s']",
3149 error_conf_chunk_bytes, error_conf_chunk_token,
3150 error_element, EL_NAME(error_element));
3153 return micro_chunk_size;
3156 static int LoadLevel_INFO(File *file, int chunk_size, struct LevelInfo *level)
3158 int real_chunk_size = 0;
3160 li = *level; // copy level data into temporary buffer
3162 while (!checkEndOfFile(file))
3164 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_INFO, -1, -1);
3166 if (real_chunk_size >= chunk_size)
3170 *level = li; // copy temporary buffer back to level data
3172 return real_chunk_size;
3175 static int LoadLevel_CONF(File *file, int chunk_size, struct LevelInfo *level)
3177 int real_chunk_size = 0;
3179 li = *level; // copy level data into temporary buffer
3181 while (!checkEndOfFile(file))
3183 int element = getMappedElement(getFile16BitBE(file));
3185 real_chunk_size += 2;
3186 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_CONF,
3188 if (real_chunk_size >= chunk_size)
3192 *level = li; // copy temporary buffer back to level data
3194 return real_chunk_size;
3197 static int LoadLevel_ELEM(File *file, int chunk_size, struct LevelInfo *level)
3199 int real_chunk_size = 0;
3201 li = *level; // copy level data into temporary buffer
3203 while (!checkEndOfFile(file))
3205 int element = getMappedElement(getFile16BitBE(file));
3207 real_chunk_size += 2;
3208 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_ELEM,
3210 if (real_chunk_size >= chunk_size)
3214 *level = li; // copy temporary buffer back to level data
3216 return real_chunk_size;
3219 static int LoadLevel_NOTE(File *file, int chunk_size, struct LevelInfo *level)
3221 int element = getMappedElement(getFile16BitBE(file));
3222 int envelope_nr = element - EL_ENVELOPE_1;
3223 int real_chunk_size = 2;
3225 xx_envelope = level->envelope[envelope_nr]; // copy into temporary buffer
3227 while (!checkEndOfFile(file))
3229 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_NOTE,
3232 if (real_chunk_size >= chunk_size)
3236 level->envelope[envelope_nr] = xx_envelope; // copy from temporary buffer
3238 return real_chunk_size;
3241 static int LoadLevel_CUSX(File *file, int chunk_size, struct LevelInfo *level)
3243 int element = getMappedElement(getFile16BitBE(file));
3244 int real_chunk_size = 2;
3245 struct ElementInfo *ei = &element_info[element];
3248 xx_ei = *ei; // copy element data into temporary buffer
3250 xx_ei.num_change_pages = -1;
3252 while (!checkEndOfFile(file))
3254 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_CUSX_base,
3256 if (xx_ei.num_change_pages != -1)
3259 if (real_chunk_size >= chunk_size)
3265 if (ei->num_change_pages == -1)
3267 Error(ERR_WARN, "LoadLevel_CUSX(): missing 'num_change_pages' for '%s'",
3270 ei->num_change_pages = 1;
3272 setElementChangePages(ei, 1);
3273 setElementChangeInfoToDefaults(ei->change);
3275 return real_chunk_size;
3278 // initialize number of change pages stored for this custom element
3279 setElementChangePages(ei, ei->num_change_pages);
3280 for (i = 0; i < ei->num_change_pages; i++)
3281 setElementChangeInfoToDefaults(&ei->change_page[i]);
3283 // start with reading properties for the first change page
3284 xx_current_change_page = 0;
3286 while (!checkEndOfFile(file))
3288 struct ElementChangeInfo *change = &ei->change_page[xx_current_change_page];
3290 xx_change = *change; // copy change data into temporary buffer
3292 resetEventBits(); // reset bits; change page might have changed
3294 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_CUSX_change,
3297 *change = xx_change;
3299 setEventFlagsFromEventBits(change);
3301 if (real_chunk_size >= chunk_size)
3305 level->file_has_custom_elements = TRUE;
3307 return real_chunk_size;
3310 static int LoadLevel_GRPX(File *file, int chunk_size, struct LevelInfo *level)
3312 int element = getMappedElement(getFile16BitBE(file));
3313 int real_chunk_size = 2;
3314 struct ElementInfo *ei = &element_info[element];
3315 struct ElementGroupInfo *group = ei->group;
3317 xx_ei = *ei; // copy element data into temporary buffer
3318 xx_group = *group; // copy group data into temporary buffer
3320 while (!checkEndOfFile(file))
3322 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_GRPX,
3325 if (real_chunk_size >= chunk_size)
3332 level->file_has_custom_elements = TRUE;
3334 return real_chunk_size;
3337 static void LoadLevelFromFileInfo_RND(struct LevelInfo *level,
3338 struct LevelFileInfo *level_file_info,
3339 boolean level_info_only)
3341 char *filename = level_file_info->filename;
3342 char cookie[MAX_LINE_LEN];
3343 char chunk_name[CHUNK_ID_LEN + 1];
3347 if (!(file = openFile(filename, MODE_READ)))
3349 level->no_valid_file = TRUE;
3350 level->no_level_file = TRUE;
3352 if (level_info_only)
3355 Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
3357 if (!setup.editor.use_template_for_new_levels)
3360 // if level file not found, try to initialize level data from template
3361 filename = getGlobalLevelTemplateFilename();
3363 if (!(file = openFile(filename, MODE_READ)))
3366 // default: for empty levels, use level template for custom elements
3367 level->use_custom_template = TRUE;
3369 level->no_valid_file = FALSE;
3372 getFileChunkBE(file, chunk_name, NULL);
3373 if (strEqual(chunk_name, "RND1"))
3375 getFile32BitBE(file); // not used
3377 getFileChunkBE(file, chunk_name, NULL);
3378 if (!strEqual(chunk_name, "CAVE"))
3380 level->no_valid_file = TRUE;
3382 Error(ERR_WARN, "unknown format of level file '%s'", filename);
3389 else // check for pre-2.0 file format with cookie string
3391 strcpy(cookie, chunk_name);
3392 if (getStringFromFile(file, &cookie[4], MAX_LINE_LEN - 4) == NULL)
3394 if (strlen(cookie) > 0 && cookie[strlen(cookie) - 1] == '\n')
3395 cookie[strlen(cookie) - 1] = '\0';
3397 if (!checkCookieString(cookie, LEVEL_COOKIE_TMPL))
3399 level->no_valid_file = TRUE;
3401 Error(ERR_WARN, "unknown format of level file '%s'", filename);
3408 if ((level->file_version = getFileVersionFromCookieString(cookie)) == -1)
3410 level->no_valid_file = TRUE;
3412 Error(ERR_WARN, "unsupported version of level file '%s'", filename);
3419 // pre-2.0 level files have no game version, so use file version here
3420 level->game_version = level->file_version;
3423 if (level->file_version < FILE_VERSION_1_2)
3425 // level files from versions before 1.2.0 without chunk structure
3426 LoadLevel_HEAD(file, LEVEL_CHUNK_HEAD_SIZE, level);
3427 LoadLevel_BODY(file, level->fieldx * level->fieldy, level);
3435 int (*loader)(File *, int, struct LevelInfo *);
3439 { "VERS", LEVEL_CHUNK_VERS_SIZE, LoadLevel_VERS },
3440 { "DATE", LEVEL_CHUNK_DATE_SIZE, LoadLevel_DATE },
3441 { "HEAD", LEVEL_CHUNK_HEAD_SIZE, LoadLevel_HEAD },
3442 { "NAME", LEVEL_CHUNK_NAME_SIZE, LoadLevel_NAME },
3443 { "AUTH", LEVEL_CHUNK_AUTH_SIZE, LoadLevel_AUTH },
3444 { "INFO", -1, LoadLevel_INFO },
3445 { "BODY", -1, LoadLevel_BODY },
3446 { "CONT", -1, LoadLevel_CONT },
3447 { "CNT2", LEVEL_CHUNK_CNT2_SIZE, LoadLevel_CNT2 },
3448 { "CNT3", -1, LoadLevel_CNT3 },
3449 { "CUS1", -1, LoadLevel_CUS1 },
3450 { "CUS2", -1, LoadLevel_CUS2 },
3451 { "CUS3", -1, LoadLevel_CUS3 },
3452 { "CUS4", -1, LoadLevel_CUS4 },
3453 { "GRP1", -1, LoadLevel_GRP1 },
3454 { "CONF", -1, LoadLevel_CONF },
3455 { "ELEM", -1, LoadLevel_ELEM },
3456 { "NOTE", -1, LoadLevel_NOTE },
3457 { "CUSX", -1, LoadLevel_CUSX },
3458 { "GRPX", -1, LoadLevel_GRPX },
3463 while (getFileChunkBE(file, chunk_name, &chunk_size))
3467 while (chunk_info[i].name != NULL &&
3468 !strEqual(chunk_name, chunk_info[i].name))
3471 if (chunk_info[i].name == NULL)
3473 Error(ERR_WARN, "unknown chunk '%s' in level file '%s'",
3474 chunk_name, filename);
3475 ReadUnusedBytesFromFile(file, chunk_size);
3477 else if (chunk_info[i].size != -1 &&
3478 chunk_info[i].size != chunk_size)
3480 Error(ERR_WARN, "wrong size (%d) of chunk '%s' in level file '%s'",
3481 chunk_size, chunk_name, filename);
3482 ReadUnusedBytesFromFile(file, chunk_size);
3486 // call function to load this level chunk
3487 int chunk_size_expected =
3488 (chunk_info[i].loader)(file, chunk_size, level);
3490 // the size of some chunks cannot be checked before reading other
3491 // chunks first (like "HEAD" and "BODY") that contain some header
3492 // information, so check them here
3493 if (chunk_size_expected != chunk_size)
3495 Error(ERR_WARN, "wrong size (%d) of chunk '%s' in level file '%s'",
3496 chunk_size, chunk_name, filename);
3506 // ----------------------------------------------------------------------------
3507 // functions for loading EM level
3508 // ----------------------------------------------------------------------------
3510 static void CopyNativeLevel_RND_to_EM(struct LevelInfo *level)
3512 static int ball_xy[8][2] =
3523 struct LevelInfo_EM *level_em = level->native_em_level;
3524 struct CAVE *cav = level_em->cav;
3527 cav->width = MIN(level->fieldx, MAX_PLAYFIELD_WIDTH);
3528 cav->height = MIN(level->fieldy, MAX_PLAYFIELD_HEIGHT);
3530 cav->time_seconds = level->time;
3531 cav->gems_needed = level->gems_needed;
3533 cav->emerald_score = level->score[SC_EMERALD];
3534 cav->diamond_score = level->score[SC_DIAMOND];
3535 cav->alien_score = level->score[SC_ROBOT];
3536 cav->tank_score = level->score[SC_SPACESHIP];
3537 cav->bug_score = level->score[SC_BUG];
3538 cav->eater_score = level->score[SC_YAMYAM];
3539 cav->nut_score = level->score[SC_NUT];
3540 cav->dynamite_score = level->score[SC_DYNAMITE];
3541 cav->key_score = level->score[SC_KEY];
3542 cav->exit_score = level->score[SC_TIME_BONUS];
3544 cav->num_eater_arrays = level->num_yamyam_contents;
3546 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
3547 for (y = 0; y < 3; y++)
3548 for (x = 0; x < 3; x++)
3549 cav->eater_array[i][y * 3 + x] =
3550 map_element_RND_to_EM_cave(level->yamyam_content[i].e[x][y]);
3552 cav->amoeba_time = level->amoeba_speed;
3553 cav->wonderwall_time = level->time_magic_wall;
3554 cav->wheel_time = level->time_wheel;
3556 cav->android_move_time = level->android_move_time;
3557 cav->android_clone_time = level->android_clone_time;
3558 cav->ball_random = level->ball_random;
3559 cav->ball_active = level->ball_active_initial;
3560 cav->ball_time = level->ball_time;
3561 cav->num_ball_arrays = level->num_ball_contents;
3563 cav->lenses_score = level->lenses_score;
3564 cav->magnify_score = level->magnify_score;
3565 cav->slurp_score = level->slurp_score;
3567 cav->lenses_time = level->lenses_time;
3568 cav->magnify_time = level->magnify_time;
3570 cav->wind_direction =
3571 map_direction_RND_to_EM(level->wind_direction_initial);
3573 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
3574 for (j = 0; j < 8; j++)
3575 cav->ball_array[i][j] =
3576 map_element_RND_to_EM_cave(level->ball_content[i].
3577 e[ball_xy[j][0]][ball_xy[j][1]]);
3579 map_android_clone_elements_RND_to_EM(level);
3581 // first fill the complete playfield with the empty space element
3582 for (y = 0; y < EM_MAX_CAVE_HEIGHT; y++)
3583 for (x = 0; x < EM_MAX_CAVE_WIDTH; x++)
3584 cav->cave[x][y] = Cblank;
3586 // then copy the real level contents from level file into the playfield
3587 for (y = 0; y < cav->height; y++) for (x = 0; x < cav->width; x++)
3589 int new_element = map_element_RND_to_EM_cave(level->field[x][y]);
3591 if (level->field[x][y] == EL_AMOEBA_DEAD)
3592 new_element = map_element_RND_to_EM_cave(EL_AMOEBA_WET);
3594 cav->cave[x][y] = new_element;
3597 for (i = 0; i < MAX_PLAYERS; i++)
3599 cav->player_x[i] = -1;
3600 cav->player_y[i] = -1;
3603 // initialize player positions and delete players from the playfield
3604 for (y = 0; y < cav->height; y++) for (x = 0; x < cav->width; x++)
3606 if (ELEM_IS_PLAYER(level->field[x][y]))
3608 int player_nr = GET_PLAYER_NR(level->field[x][y]);
3610 cav->player_x[player_nr] = x;
3611 cav->player_y[player_nr] = y;
3613 cav->cave[x][y] = map_element_RND_to_EM_cave(EL_EMPTY);
3618 static void CopyNativeLevel_EM_to_RND(struct LevelInfo *level)
3620 static int ball_xy[8][2] =
3631 struct LevelInfo_EM *level_em = level->native_em_level;
3632 struct CAVE *cav = level_em->cav;
3635 level->fieldx = MIN(cav->width, MAX_LEV_FIELDX);
3636 level->fieldy = MIN(cav->height, MAX_LEV_FIELDY);
3638 level->time = cav->time_seconds;
3639 level->gems_needed = cav->gems_needed;
3641 sprintf(level->name, "Level %d", level->file_info.nr);
3643 level->score[SC_EMERALD] = cav->emerald_score;
3644 level->score[SC_DIAMOND] = cav->diamond_score;
3645 level->score[SC_ROBOT] = cav->alien_score;
3646 level->score[SC_SPACESHIP] = cav->tank_score;
3647 level->score[SC_BUG] = cav->bug_score;
3648 level->score[SC_YAMYAM] = cav->eater_score;
3649 level->score[SC_NUT] = cav->nut_score;
3650 level->score[SC_DYNAMITE] = cav->dynamite_score;
3651 level->score[SC_KEY] = cav->key_score;
3652 level->score[SC_TIME_BONUS] = cav->exit_score;
3654 level->num_yamyam_contents = cav->num_eater_arrays;
3656 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
3657 for (y = 0; y < 3; y++)
3658 for (x = 0; x < 3; x++)
3659 level->yamyam_content[i].e[x][y] =
3660 map_element_EM_to_RND_cave(cav->eater_array[i][y * 3 + x]);
3662 level->amoeba_speed = cav->amoeba_time;
3663 level->time_magic_wall = cav->wonderwall_time;
3664 level->time_wheel = cav->wheel_time;
3666 level->android_move_time = cav->android_move_time;
3667 level->android_clone_time = cav->android_clone_time;
3668 level->ball_random = cav->ball_random;
3669 level->ball_active_initial = cav->ball_active;
3670 level->ball_time = cav->ball_time;
3671 level->num_ball_contents = cav->num_ball_arrays;
3673 level->lenses_score = cav->lenses_score;
3674 level->magnify_score = cav->magnify_score;
3675 level->slurp_score = cav->slurp_score;
3677 level->lenses_time = cav->lenses_time;
3678 level->magnify_time = cav->magnify_time;
3680 level->wind_direction_initial =
3681 map_direction_EM_to_RND(cav->wind_direction);
3683 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
3684 for (j = 0; j < 8; j++)
3685 level->ball_content[i].e[ball_xy[j][0]][ball_xy[j][1]] =
3686 map_element_EM_to_RND_cave(cav->ball_array[i][j]);
3688 map_android_clone_elements_EM_to_RND(level);
3690 // convert the playfield (some elements need special treatment)
3691 for (y = 0; y < level->fieldy; y++) for (x = 0; x < level->fieldx; x++)
3693 int new_element = map_element_EM_to_RND_cave(cav->cave[x][y]);
3695 if (new_element == EL_AMOEBA_WET && level->amoeba_speed == 0)
3696 new_element = EL_AMOEBA_DEAD;
3698 level->field[x][y] = new_element;
3701 for (i = 0; i < MAX_PLAYERS; i++)
3703 // in case of all players set to the same field, use the first player
3704 int nr = MAX_PLAYERS - i - 1;
3705 int jx = cav->player_x[nr];
3706 int jy = cav->player_y[nr];
3708 if (jx != -1 && jy != -1)
3709 level->field[jx][jy] = EL_PLAYER_1 + nr;
3714 // ----------------------------------------------------------------------------
3715 // functions for loading SP level
3716 // ----------------------------------------------------------------------------
3718 static void CopyNativeLevel_RND_to_SP(struct LevelInfo *level)
3720 struct LevelInfo_SP *level_sp = level->native_sp_level;
3721 LevelInfoType *header = &level_sp->header;
3724 level_sp->width = level->fieldx;
3725 level_sp->height = level->fieldy;
3727 for (x = 0; x < level->fieldx; x++)
3728 for (y = 0; y < level->fieldy; y++)
3729 level_sp->playfield[x][y] = map_element_RND_to_SP(level->field[x][y]);
3731 header->InitialGravity = (level->initial_player_gravity[0] ? 1 : 0);
3733 for (i = 0; i < SP_LEVEL_NAME_LEN; i++)
3734 header->LevelTitle[i] = level->name[i];
3735 // !!! NO STRING TERMINATION IN SUPAPLEX VB CODE YET -- FIX THIS !!!
3737 header->InfotronsNeeded = level->gems_needed;
3739 header->SpecialPortCount = 0;
3741 for (x = 0; x < level->fieldx; x++) for (y = 0; y < level->fieldy; y++)
3743 boolean gravity_port_found = FALSE;
3744 boolean gravity_port_valid = FALSE;
3745 int gravity_port_flag;
3746 int gravity_port_base_element;
3747 int element = level->field[x][y];
3749 if (element >= EL_SP_GRAVITY_ON_PORT_RIGHT &&
3750 element <= EL_SP_GRAVITY_ON_PORT_UP)
3752 gravity_port_found = TRUE;
3753 gravity_port_valid = TRUE;
3754 gravity_port_flag = 1;
3755 gravity_port_base_element = EL_SP_GRAVITY_ON_PORT_RIGHT;
3757 else if (element >= EL_SP_GRAVITY_OFF_PORT_RIGHT &&
3758 element <= EL_SP_GRAVITY_OFF_PORT_UP)
3760 gravity_port_found = TRUE;
3761 gravity_port_valid = TRUE;
3762 gravity_port_flag = 0;
3763 gravity_port_base_element = EL_SP_GRAVITY_OFF_PORT_RIGHT;
3765 else if (element >= EL_SP_GRAVITY_PORT_RIGHT &&
3766 element <= EL_SP_GRAVITY_PORT_UP)
3768 // change R'n'D style gravity inverting special port to normal port
3769 // (there are no gravity inverting ports in native Supaplex engine)
3771 gravity_port_found = TRUE;
3772 gravity_port_valid = FALSE;
3773 gravity_port_base_element = EL_SP_GRAVITY_PORT_RIGHT;
3776 if (gravity_port_found)
3778 if (gravity_port_valid &&
3779 header->SpecialPortCount < SP_MAX_SPECIAL_PORTS)
3781 SpecialPortType *port = &header->SpecialPort[header->SpecialPortCount];
3783 port->PortLocation = (y * level->fieldx + x) * 2;
3784 port->Gravity = gravity_port_flag;
3786 element += EL_SP_GRAVITY_PORT_RIGHT - gravity_port_base_element;
3788 header->SpecialPortCount++;
3792 // change special gravity port to normal port
3794 element += EL_SP_PORT_RIGHT - gravity_port_base_element;
3797 level_sp->playfield[x][y] = element - EL_SP_START;
3802 static void CopyNativeLevel_SP_to_RND(struct LevelInfo *level)
3804 struct LevelInfo_SP *level_sp = level->native_sp_level;
3805 LevelInfoType *header = &level_sp->header;
3806 boolean num_invalid_elements = 0;
3809 level->fieldx = level_sp->width;
3810 level->fieldy = level_sp->height;
3812 for (x = 0; x < level->fieldx; x++)
3814 for (y = 0; y < level->fieldy; y++)
3816 int element_old = level_sp->playfield[x][y];
3817 int element_new = getMappedElement(map_element_SP_to_RND(element_old));
3819 if (element_new == EL_UNKNOWN)
3821 num_invalid_elements++;
3823 Error(ERR_DEBUG, "invalid element %d at position %d, %d",
3827 level->field[x][y] = element_new;
3831 if (num_invalid_elements > 0)
3832 Error(ERR_WARN, "found %d invalid elements%s", num_invalid_elements,
3833 (!options.debug ? " (use '--debug' for more details)" : ""));
3835 for (i = 0; i < MAX_PLAYERS; i++)
3836 level->initial_player_gravity[i] =
3837 (header->InitialGravity == 1 ? TRUE : FALSE);
3839 // skip leading spaces
3840 for (i = 0; i < SP_LEVEL_NAME_LEN; i++)
3841 if (header->LevelTitle[i] != ' ')
3845 for (j = 0; i < SP_LEVEL_NAME_LEN; i++, j++)
3846 level->name[j] = header->LevelTitle[i];
3847 level->name[j] = '\0';
3849 // cut trailing spaces
3851 if (level->name[j - 1] == ' ' && level->name[j] == '\0')
3852 level->name[j - 1] = '\0';
3854 level->gems_needed = header->InfotronsNeeded;
3856 for (i = 0; i < header->SpecialPortCount; i++)
3858 SpecialPortType *port = &header->SpecialPort[i];
3859 int port_location = port->PortLocation;
3860 int gravity = port->Gravity;
3861 int port_x, port_y, port_element;
3863 port_x = (port_location / 2) % level->fieldx;
3864 port_y = (port_location / 2) / level->fieldx;
3866 if (port_x < 0 || port_x >= level->fieldx ||
3867 port_y < 0 || port_y >= level->fieldy)
3869 Error(ERR_WARN, "special port position (%d, %d) out of bounds",
3875 port_element = level->field[port_x][port_y];
3877 if (port_element < EL_SP_GRAVITY_PORT_RIGHT ||
3878 port_element > EL_SP_GRAVITY_PORT_UP)
3880 Error(ERR_WARN, "no special port at position (%d, %d)", port_x, port_y);
3885 // change previous (wrong) gravity inverting special port to either
3886 // gravity enabling special port or gravity disabling special port
3887 level->field[port_x][port_y] +=
3888 (gravity == 1 ? EL_SP_GRAVITY_ON_PORT_RIGHT :
3889 EL_SP_GRAVITY_OFF_PORT_RIGHT) - EL_SP_GRAVITY_PORT_RIGHT;
3892 // change special gravity ports without database entries to normal ports
3893 for (x = 0; x < level->fieldx; x++)
3894 for (y = 0; y < level->fieldy; y++)
3895 if (level->field[x][y] >= EL_SP_GRAVITY_PORT_RIGHT &&
3896 level->field[x][y] <= EL_SP_GRAVITY_PORT_UP)
3897 level->field[x][y] += EL_SP_PORT_RIGHT - EL_SP_GRAVITY_PORT_RIGHT;
3899 level->time = 0; // no time limit
3900 level->amoeba_speed = 0;
3901 level->time_magic_wall = 0;
3902 level->time_wheel = 0;
3903 level->amoeba_content = EL_EMPTY;
3906 // original Supaplex does not use score values -- use default values
3908 for (i = 0; i < LEVEL_SCORE_ELEMENTS; i++)
3909 level->score[i] = 0;
3912 // there are no yamyams in supaplex levels
3913 for (i = 0; i < level->num_yamyam_contents; i++)
3914 for (x = 0; x < 3; x++)
3915 for (y = 0; y < 3; y++)
3916 level->yamyam_content[i].e[x][y] = EL_EMPTY;
3919 static void CopyNativeTape_RND_to_SP(struct LevelInfo *level)
3921 struct LevelInfo_SP *level_sp = level->native_sp_level;
3922 struct DemoInfo_SP *demo = &level_sp->demo;
3925 // always start with reliable default values
3926 demo->is_available = FALSE;
3929 if (TAPE_IS_EMPTY(tape))
3932 demo->level_nr = tape.level_nr; // (currently not used)
3934 level_sp->header.DemoRandomSeed = tape.random_seed;
3938 for (i = 0; i < tape.length; i++)
3940 int demo_action = map_key_RND_to_SP(tape.pos[i].action[0]);
3941 int demo_repeat = tape.pos[i].delay;
3942 int demo_entries = (demo_repeat + 15) / 16;
3944 if (demo->length + demo_entries >= SP_MAX_TAPE_LEN)
3946 Error(ERR_WARN, "tape truncated: size exceeds maximum SP demo size %d",
3952 for (j = 0; j < demo_repeat / 16; j++)
3953 demo->data[demo->length++] = 0xf0 | demo_action;
3955 if (demo_repeat % 16)
3956 demo->data[demo->length++] = ((demo_repeat % 16 - 1) << 4) | demo_action;
3959 demo->is_available = TRUE;
3962 static void setTapeInfoToDefaults(void);
3964 static void CopyNativeTape_SP_to_RND(struct LevelInfo *level)
3966 struct LevelInfo_SP *level_sp = level->native_sp_level;
3967 struct DemoInfo_SP *demo = &level_sp->demo;
3968 char *filename = level->file_info.filename;
3971 // always start with reliable default values
3972 setTapeInfoToDefaults();
3974 if (!demo->is_available)
3977 tape.level_nr = demo->level_nr; // (currently not used)
3978 tape.random_seed = level_sp->header.DemoRandomSeed;
3980 TapeSetDateFromEpochSeconds(getFileTimestampEpochSeconds(filename));
3983 tape.pos[tape.counter].delay = 0;
3985 for (i = 0; i < demo->length; i++)
3987 int demo_action = demo->data[i] & 0x0f;
3988 int demo_repeat = (demo->data[i] & 0xf0) >> 4;
3989 int tape_action = map_key_SP_to_RND(demo_action);
3990 int tape_repeat = demo_repeat + 1;
3991 byte action[MAX_TAPE_ACTIONS] = { tape_action };
3992 boolean success = 0;
3995 for (j = 0; j < tape_repeat; j++)
3996 success = TapeAddAction(action);
4000 Error(ERR_WARN, "SP demo truncated: size exceeds maximum tape size %d",
4007 TapeHaltRecording();
4011 // ----------------------------------------------------------------------------
4012 // functions for loading MM level
4013 // ----------------------------------------------------------------------------
4015 static void CopyNativeLevel_RND_to_MM(struct LevelInfo *level)
4017 struct LevelInfo_MM *level_mm = level->native_mm_level;
4020 level_mm->fieldx = MIN(level->fieldx, MM_MAX_PLAYFIELD_WIDTH);
4021 level_mm->fieldy = MIN(level->fieldy, MM_MAX_PLAYFIELD_HEIGHT);
4023 level_mm->time = level->time;
4024 level_mm->kettles_needed = level->gems_needed;
4025 level_mm->auto_count_kettles = level->auto_count_gems;
4027 level_mm->laser_red = level->mm_laser_red;
4028 level_mm->laser_green = level->mm_laser_green;
4029 level_mm->laser_blue = level->mm_laser_blue;
4031 strcpy(level_mm->name, level->name);
4032 strcpy(level_mm->author, level->author);
4034 level_mm->score[SC_EMERALD] = level->score[SC_EMERALD];
4035 level_mm->score[SC_PACMAN] = level->score[SC_PACMAN];
4036 level_mm->score[SC_KEY] = level->score[SC_KEY];
4037 level_mm->score[SC_TIME_BONUS] = level->score[SC_TIME_BONUS];
4038 level_mm->score[SC_ELEM_BONUS] = level->score[SC_ELEM_BONUS];
4040 level_mm->amoeba_speed = level->amoeba_speed;
4041 level_mm->time_fuse = level->mm_time_fuse;
4042 level_mm->time_bomb = level->mm_time_bomb;
4043 level_mm->time_ball = level->mm_time_ball;
4044 level_mm->time_block = level->mm_time_block;
4046 for (x = 0; x < level->fieldx; x++)
4047 for (y = 0; y < level->fieldy; y++)
4049 level_mm->field[x][y] = map_element_RND_to_MM(level->field[x][y]);
4052 static void CopyNativeLevel_MM_to_RND(struct LevelInfo *level)
4054 struct LevelInfo_MM *level_mm = level->native_mm_level;
4057 level->fieldx = MIN(level_mm->fieldx, MAX_LEV_FIELDX);
4058 level->fieldy = MIN(level_mm->fieldy, MAX_LEV_FIELDY);
4060 level->time = level_mm->time;
4061 level->gems_needed = level_mm->kettles_needed;
4062 level->auto_count_gems = level_mm->auto_count_kettles;
4064 level->mm_laser_red = level_mm->laser_red;
4065 level->mm_laser_green = level_mm->laser_green;
4066 level->mm_laser_blue = level_mm->laser_blue;
4068 strcpy(level->name, level_mm->name);
4070 // only overwrite author from 'levelinfo.conf' if author defined in level
4071 if (!strEqual(level_mm->author, ANONYMOUS_NAME))
4072 strcpy(level->author, level_mm->author);
4074 level->score[SC_EMERALD] = level_mm->score[SC_EMERALD];
4075 level->score[SC_PACMAN] = level_mm->score[SC_PACMAN];
4076 level->score[SC_KEY] = level_mm->score[SC_KEY];
4077 level->score[SC_TIME_BONUS] = level_mm->score[SC_TIME_BONUS];
4078 level->score[SC_ELEM_BONUS] = level_mm->score[SC_ELEM_BONUS];
4080 level->amoeba_speed = level_mm->amoeba_speed;
4081 level->mm_time_fuse = level_mm->time_fuse;
4082 level->mm_time_bomb = level_mm->time_bomb;
4083 level->mm_time_ball = level_mm->time_ball;
4084 level->mm_time_block = level_mm->time_block;
4086 for (x = 0; x < level->fieldx; x++)
4087 for (y = 0; y < level->fieldy; y++)
4088 level->field[x][y] = map_element_MM_to_RND(level_mm->field[x][y]);
4092 // ----------------------------------------------------------------------------
4093 // functions for loading DC level
4094 // ----------------------------------------------------------------------------
4096 #define DC_LEVEL_HEADER_SIZE 344
4098 static unsigned short getDecodedWord_DC(unsigned short data_encoded,
4101 static int last_data_encoded;
4105 int diff_hi, diff_lo;
4106 int data_hi, data_lo;
4107 unsigned short data_decoded;
4111 last_data_encoded = 0;
4118 diff = data_encoded - last_data_encoded;
4119 diff_hi = diff & ~0xff;
4120 diff_lo = diff & 0xff;
4124 data_hi = diff_hi - (offset1 << 8) + (offset2 & 0xff00);
4125 data_lo = (diff_lo + (data_hi >> 16)) & 0x00ff;
4126 data_hi = data_hi & 0xff00;
4128 data_decoded = data_hi | data_lo;
4130 last_data_encoded = data_encoded;
4132 offset1 = (offset1 + 1) % 31;
4133 offset2 = offset2 & 0xff;
4135 return data_decoded;
4138 static int getMappedElement_DC(int element)
4146 // 0x0117 - 0x036e: (?)
4149 // 0x042d - 0x0684: (?)
4165 element = EL_CRYSTAL;
4168 case 0x0e77: // quicksand (boulder)
4169 element = EL_QUICKSAND_FAST_FULL;
4172 case 0x0e99: // slow quicksand (boulder)
4173 element = EL_QUICKSAND_FULL;
4177 element = EL_EM_EXIT_OPEN;
4181 element = EL_EM_EXIT_CLOSED;
4185 element = EL_EM_STEEL_EXIT_OPEN;
4189 element = EL_EM_STEEL_EXIT_CLOSED;
4192 case 0x0f4f: // dynamite (lit 1)
4193 element = EL_EM_DYNAMITE_ACTIVE;
4196 case 0x0f57: // dynamite (lit 2)
4197 element = EL_EM_DYNAMITE_ACTIVE;
4200 case 0x0f5f: // dynamite (lit 3)
4201 element = EL_EM_DYNAMITE_ACTIVE;
4204 case 0x0f67: // dynamite (lit 4)
4205 element = EL_EM_DYNAMITE_ACTIVE;
4212 element = EL_AMOEBA_WET;
4216 element = EL_AMOEBA_DROP;
4220 element = EL_DC_MAGIC_WALL;
4224 element = EL_SPACESHIP_UP;
4228 element = EL_SPACESHIP_DOWN;
4232 element = EL_SPACESHIP_LEFT;
4236 element = EL_SPACESHIP_RIGHT;
4240 element = EL_BUG_UP;
4244 element = EL_BUG_DOWN;
4248 element = EL_BUG_LEFT;
4252 element = EL_BUG_RIGHT;
4256 element = EL_MOLE_UP;
4260 element = EL_MOLE_DOWN;
4264 element = EL_MOLE_LEFT;
4268 element = EL_MOLE_RIGHT;
4276 element = EL_YAMYAM;
4280 element = EL_SWITCHGATE_OPEN;
4284 element = EL_SWITCHGATE_CLOSED;
4288 element = EL_DC_SWITCHGATE_SWITCH_UP;
4292 element = EL_TIMEGATE_CLOSED;
4295 case 0x144c: // conveyor belt switch (green)
4296 element = EL_CONVEYOR_BELT_3_SWITCH_MIDDLE;
4299 case 0x144f: // conveyor belt switch (red)
4300 element = EL_CONVEYOR_BELT_1_SWITCH_MIDDLE;
4303 case 0x1452: // conveyor belt switch (blue)
4304 element = EL_CONVEYOR_BELT_4_SWITCH_MIDDLE;
4308 element = EL_CONVEYOR_BELT_3_MIDDLE;
4312 element = EL_CONVEYOR_BELT_3_LEFT;
4316 element = EL_CONVEYOR_BELT_3_RIGHT;
4320 element = EL_CONVEYOR_BELT_1_MIDDLE;
4324 element = EL_CONVEYOR_BELT_1_LEFT;
4328 element = EL_CONVEYOR_BELT_1_RIGHT;
4332 element = EL_CONVEYOR_BELT_4_MIDDLE;
4336 element = EL_CONVEYOR_BELT_4_LEFT;
4340 element = EL_CONVEYOR_BELT_4_RIGHT;
4344 element = EL_EXPANDABLE_WALL_HORIZONTAL;
4348 element = EL_EXPANDABLE_WALL_VERTICAL;
4352 element = EL_EXPANDABLE_WALL_ANY;
4355 case 0x14ce: // growing steel wall (left/right)
4356 element = EL_EXPANDABLE_STEELWALL_HORIZONTAL;
4359 case 0x14df: // growing steel wall (up/down)
4360 element = EL_EXPANDABLE_STEELWALL_VERTICAL;
4363 case 0x14e8: // growing steel wall (up/down/left/right)
4364 element = EL_EXPANDABLE_STEELWALL_ANY;
4368 element = EL_SHIELD_DEADLY;
4372 element = EL_EXTRA_TIME;
4380 element = EL_EMPTY_SPACE;
4383 case 0x1578: // quicksand (empty)
4384 element = EL_QUICKSAND_FAST_EMPTY;
4387 case 0x1579: // slow quicksand (empty)
4388 element = EL_QUICKSAND_EMPTY;
4398 element = EL_EM_DYNAMITE;
4401 case 0x15a1: // key (red)
4402 element = EL_EM_KEY_1;
4405 case 0x15a2: // key (yellow)
4406 element = EL_EM_KEY_2;
4409 case 0x15a3: // key (blue)
4410 element = EL_EM_KEY_4;
4413 case 0x15a4: // key (green)
4414 element = EL_EM_KEY_3;
4417 case 0x15a5: // key (white)
4418 element = EL_DC_KEY_WHITE;
4422 element = EL_WALL_SLIPPERY;
4429 case 0x15a8: // wall (not round)
4433 case 0x15a9: // (blue)
4434 element = EL_CHAR_A;
4437 case 0x15aa: // (blue)
4438 element = EL_CHAR_B;
4441 case 0x15ab: // (blue)
4442 element = EL_CHAR_C;
4445 case 0x15ac: // (blue)
4446 element = EL_CHAR_D;
4449 case 0x15ad: // (blue)
4450 element = EL_CHAR_E;
4453 case 0x15ae: // (blue)
4454 element = EL_CHAR_F;
4457 case 0x15af: // (blue)
4458 element = EL_CHAR_G;
4461 case 0x15b0: // (blue)
4462 element = EL_CHAR_H;
4465 case 0x15b1: // (blue)
4466 element = EL_CHAR_I;
4469 case 0x15b2: // (blue)
4470 element = EL_CHAR_J;
4473 case 0x15b3: // (blue)
4474 element = EL_CHAR_K;
4477 case 0x15b4: // (blue)
4478 element = EL_CHAR_L;
4481 case 0x15b5: // (blue)
4482 element = EL_CHAR_M;
4485 case 0x15b6: // (blue)
4486 element = EL_CHAR_N;
4489 case 0x15b7: // (blue)
4490 element = EL_CHAR_O;
4493 case 0x15b8: // (blue)
4494 element = EL_CHAR_P;
4497 case 0x15b9: // (blue)
4498 element = EL_CHAR_Q;
4501 case 0x15ba: // (blue)
4502 element = EL_CHAR_R;
4505 case 0x15bb: // (blue)
4506 element = EL_CHAR_S;
4509 case 0x15bc: // (blue)
4510 element = EL_CHAR_T;
4513 case 0x15bd: // (blue)
4514 element = EL_CHAR_U;
4517 case 0x15be: // (blue)
4518 element = EL_CHAR_V;
4521 case 0x15bf: // (blue)
4522 element = EL_CHAR_W;
4525 case 0x15c0: // (blue)
4526 element = EL_CHAR_X;
4529 case 0x15c1: // (blue)
4530 element = EL_CHAR_Y;
4533 case 0x15c2: // (blue)
4534 element = EL_CHAR_Z;
4537 case 0x15c3: // (blue)
4538 element = EL_CHAR_AUMLAUT;
4541 case 0x15c4: // (blue)
4542 element = EL_CHAR_OUMLAUT;
4545 case 0x15c5: // (blue)
4546 element = EL_CHAR_UUMLAUT;
4549 case 0x15c6: // (blue)
4550 element = EL_CHAR_0;
4553 case 0x15c7: // (blue)
4554 element = EL_CHAR_1;
4557 case 0x15c8: // (blue)
4558 element = EL_CHAR_2;
4561 case 0x15c9: // (blue)
4562 element = EL_CHAR_3;
4565 case 0x15ca: // (blue)
4566 element = EL_CHAR_4;
4569 case 0x15cb: // (blue)
4570 element = EL_CHAR_5;
4573 case 0x15cc: // (blue)
4574 element = EL_CHAR_6;
4577 case 0x15cd: // (blue)
4578 element = EL_CHAR_7;
4581 case 0x15ce: // (blue)
4582 element = EL_CHAR_8;
4585 case 0x15cf: // (blue)
4586 element = EL_CHAR_9;
4589 case 0x15d0: // (blue)
4590 element = EL_CHAR_PERIOD;
4593 case 0x15d1: // (blue)
4594 element = EL_CHAR_EXCLAM;
4597 case 0x15d2: // (blue)
4598 element = EL_CHAR_COLON;
4601 case 0x15d3: // (blue)
4602 element = EL_CHAR_LESS;
4605 case 0x15d4: // (blue)
4606 element = EL_CHAR_GREATER;
4609 case 0x15d5: // (blue)
4610 element = EL_CHAR_QUESTION;
4613 case 0x15d6: // (blue)
4614 element = EL_CHAR_COPYRIGHT;
4617 case 0x15d7: // (blue)
4618 element = EL_CHAR_UP;
4621 case 0x15d8: // (blue)
4622 element = EL_CHAR_DOWN;
4625 case 0x15d9: // (blue)
4626 element = EL_CHAR_BUTTON;
4629 case 0x15da: // (blue)
4630 element = EL_CHAR_PLUS;
4633 case 0x15db: // (blue)
4634 element = EL_CHAR_MINUS;
4637 case 0x15dc: // (blue)
4638 element = EL_CHAR_APOSTROPHE;
4641 case 0x15dd: // (blue)
4642 element = EL_CHAR_PARENLEFT;
4645 case 0x15de: // (blue)
4646 element = EL_CHAR_PARENRIGHT;
4649 case 0x15df: // (green)
4650 element = EL_CHAR_A;
4653 case 0x15e0: // (green)
4654 element = EL_CHAR_B;
4657 case 0x15e1: // (green)
4658 element = EL_CHAR_C;
4661 case 0x15e2: // (green)
4662 element = EL_CHAR_D;
4665 case 0x15e3: // (green)
4666 element = EL_CHAR_E;
4669 case 0x15e4: // (green)
4670 element = EL_CHAR_F;
4673 case 0x15e5: // (green)
4674 element = EL_CHAR_G;
4677 case 0x15e6: // (green)
4678 element = EL_CHAR_H;
4681 case 0x15e7: // (green)
4682 element = EL_CHAR_I;
4685 case 0x15e8: // (green)
4686 element = EL_CHAR_J;
4689 case 0x15e9: // (green)
4690 element = EL_CHAR_K;
4693 case 0x15ea: // (green)
4694 element = EL_CHAR_L;
4697 case 0x15eb: // (green)
4698 element = EL_CHAR_M;
4701 case 0x15ec: // (green)
4702 element = EL_CHAR_N;
4705 case 0x15ed: // (green)
4706 element = EL_CHAR_O;
4709 case 0x15ee: // (green)
4710 element = EL_CHAR_P;
4713 case 0x15ef: // (green)
4714 element = EL_CHAR_Q;
4717 case 0x15f0: // (green)
4718 element = EL_CHAR_R;
4721 case 0x15f1: // (green)
4722 element = EL_CHAR_S;
4725 case 0x15f2: // (green)
4726 element = EL_CHAR_T;
4729 case 0x15f3: // (green)
4730 element = EL_CHAR_U;
4733 case 0x15f4: // (green)
4734 element = EL_CHAR_V;
4737 case 0x15f5: // (green)
4738 element = EL_CHAR_W;
4741 case 0x15f6: // (green)
4742 element = EL_CHAR_X;
4745 case 0x15f7: // (green)
4746 element = EL_CHAR_Y;
4749 case 0x15f8: // (green)
4750 element = EL_CHAR_Z;
4753 case 0x15f9: // (green)
4754 element = EL_CHAR_AUMLAUT;
4757 case 0x15fa: // (green)
4758 element = EL_CHAR_OUMLAUT;
4761 case 0x15fb: // (green)
4762 element = EL_CHAR_UUMLAUT;
4765 case 0x15fc: // (green)
4766 element = EL_CHAR_0;
4769 case 0x15fd: // (green)
4770 element = EL_CHAR_1;
4773 case 0x15fe: // (green)
4774 element = EL_CHAR_2;
4777 case 0x15ff: // (green)
4778 element = EL_CHAR_3;
4781 case 0x1600: // (green)
4782 element = EL_CHAR_4;
4785 case 0x1601: // (green)
4786 element = EL_CHAR_5;
4789 case 0x1602: // (green)
4790 element = EL_CHAR_6;
4793 case 0x1603: // (green)
4794 element = EL_CHAR_7;
4797 case 0x1604: // (green)
4798 element = EL_CHAR_8;
4801 case 0x1605: // (green)
4802 element = EL_CHAR_9;
4805 case 0x1606: // (green)
4806 element = EL_CHAR_PERIOD;
4809 case 0x1607: // (green)
4810 element = EL_CHAR_EXCLAM;
4813 case 0x1608: // (green)
4814 element = EL_CHAR_COLON;
4817 case 0x1609: // (green)
4818 element = EL_CHAR_LESS;
4821 case 0x160a: // (green)
4822 element = EL_CHAR_GREATER;
4825 case 0x160b: // (green)
4826 element = EL_CHAR_QUESTION;
4829 case 0x160c: // (green)
4830 element = EL_CHAR_COPYRIGHT;
4833 case 0x160d: // (green)
4834 element = EL_CHAR_UP;
4837 case 0x160e: // (green)
4838 element = EL_CHAR_DOWN;
4841 case 0x160f: // (green)
4842 element = EL_CHAR_BUTTON;
4845 case 0x1610: // (green)
4846 element = EL_CHAR_PLUS;
4849 case 0x1611: // (green)
4850 element = EL_CHAR_MINUS;
4853 case 0x1612: // (green)
4854 element = EL_CHAR_APOSTROPHE;
4857 case 0x1613: // (green)
4858 element = EL_CHAR_PARENLEFT;
4861 case 0x1614: // (green)
4862 element = EL_CHAR_PARENRIGHT;
4865 case 0x1615: // (blue steel)
4866 element = EL_STEEL_CHAR_A;
4869 case 0x1616: // (blue steel)
4870 element = EL_STEEL_CHAR_B;
4873 case 0x1617: // (blue steel)
4874 element = EL_STEEL_CHAR_C;
4877 case 0x1618: // (blue steel)
4878 element = EL_STEEL_CHAR_D;
4881 case 0x1619: // (blue steel)
4882 element = EL_STEEL_CHAR_E;
4885 case 0x161a: // (blue steel)
4886 element = EL_STEEL_CHAR_F;
4889 case 0x161b: // (blue steel)
4890 element = EL_STEEL_CHAR_G;
4893 case 0x161c: // (blue steel)
4894 element = EL_STEEL_CHAR_H;
4897 case 0x161d: // (blue steel)
4898 element = EL_STEEL_CHAR_I;
4901 case 0x161e: // (blue steel)
4902 element = EL_STEEL_CHAR_J;
4905 case 0x161f: // (blue steel)
4906 element = EL_STEEL_CHAR_K;
4909 case 0x1620: // (blue steel)
4910 element = EL_STEEL_CHAR_L;
4913 case 0x1621: // (blue steel)
4914 element = EL_STEEL_CHAR_M;
4917 case 0x1622: // (blue steel)
4918 element = EL_STEEL_CHAR_N;
4921 case 0x1623: // (blue steel)
4922 element = EL_STEEL_CHAR_O;
4925 case 0x1624: // (blue steel)
4926 element = EL_STEEL_CHAR_P;
4929 case 0x1625: // (blue steel)
4930 element = EL_STEEL_CHAR_Q;
4933 case 0x1626: // (blue steel)
4934 element = EL_STEEL_CHAR_R;
4937 case 0x1627: // (blue steel)
4938 element = EL_STEEL_CHAR_S;
4941 case 0x1628: // (blue steel)
4942 element = EL_STEEL_CHAR_T;
4945 case 0x1629: // (blue steel)
4946 element = EL_STEEL_CHAR_U;
4949 case 0x162a: // (blue steel)
4950 element = EL_STEEL_CHAR_V;
4953 case 0x162b: // (blue steel)
4954 element = EL_STEEL_CHAR_W;
4957 case 0x162c: // (blue steel)
4958 element = EL_STEEL_CHAR_X;
4961 case 0x162d: // (blue steel)
4962 element = EL_STEEL_CHAR_Y;
4965 case 0x162e: // (blue steel)
4966 element = EL_STEEL_CHAR_Z;
4969 case 0x162f: // (blue steel)
4970 element = EL_STEEL_CHAR_AUMLAUT;
4973 case 0x1630: // (blue steel)
4974 element = EL_STEEL_CHAR_OUMLAUT;
4977 case 0x1631: // (blue steel)
4978 element = EL_STEEL_CHAR_UUMLAUT;
4981 case 0x1632: // (blue steel)
4982 element = EL_STEEL_CHAR_0;
4985 case 0x1633: // (blue steel)
4986 element = EL_STEEL_CHAR_1;
4989 case 0x1634: // (blue steel)
4990 element = EL_STEEL_CHAR_2;
4993 case 0x1635: // (blue steel)
4994 element = EL_STEEL_CHAR_3;
4997 case 0x1636: // (blue steel)
4998 element = EL_STEEL_CHAR_4;
5001 case 0x1637: // (blue steel)
5002 element = EL_STEEL_CHAR_5;
5005 case 0x1638: // (blue steel)
5006 element = EL_STEEL_CHAR_6;
5009 case 0x1639: // (blue steel)
5010 element = EL_STEEL_CHAR_7;
5013 case 0x163a: // (blue steel)
5014 element = EL_STEEL_CHAR_8;
5017 case 0x163b: // (blue steel)
5018 element = EL_STEEL_CHAR_9;
5021 case 0x163c: // (blue steel)
5022 element = EL_STEEL_CHAR_PERIOD;
5025 case 0x163d: // (blue steel)
5026 element = EL_STEEL_CHAR_EXCLAM;
5029 case 0x163e: // (blue steel)
5030 element = EL_STEEL_CHAR_COLON;
5033 case 0x163f: // (blue steel)
5034 element = EL_STEEL_CHAR_LESS;
5037 case 0x1640: // (blue steel)
5038 element = EL_STEEL_CHAR_GREATER;
5041 case 0x1641: // (blue steel)
5042 element = EL_STEEL_CHAR_QUESTION;
5045 case 0x1642: // (blue steel)
5046 element = EL_STEEL_CHAR_COPYRIGHT;
5049 case 0x1643: // (blue steel)
5050 element = EL_STEEL_CHAR_UP;
5053 case 0x1644: // (blue steel)
5054 element = EL_STEEL_CHAR_DOWN;
5057 case 0x1645: // (blue steel)
5058 element = EL_STEEL_CHAR_BUTTON;
5061 case 0x1646: // (blue steel)
5062 element = EL_STEEL_CHAR_PLUS;
5065 case 0x1647: // (blue steel)
5066 element = EL_STEEL_CHAR_MINUS;
5069 case 0x1648: // (blue steel)
5070 element = EL_STEEL_CHAR_APOSTROPHE;
5073 case 0x1649: // (blue steel)
5074 element = EL_STEEL_CHAR_PARENLEFT;
5077 case 0x164a: // (blue steel)
5078 element = EL_STEEL_CHAR_PARENRIGHT;
5081 case 0x164b: // (green steel)
5082 element = EL_STEEL_CHAR_A;
5085 case 0x164c: // (green steel)
5086 element = EL_STEEL_CHAR_B;
5089 case 0x164d: // (green steel)
5090 element = EL_STEEL_CHAR_C;
5093 case 0x164e: // (green steel)
5094 element = EL_STEEL_CHAR_D;
5097 case 0x164f: // (green steel)
5098 element = EL_STEEL_CHAR_E;
5101 case 0x1650: // (green steel)
5102 element = EL_STEEL_CHAR_F;
5105 case 0x1651: // (green steel)
5106 element = EL_STEEL_CHAR_G;
5109 case 0x1652: // (green steel)
5110 element = EL_STEEL_CHAR_H;
5113 case 0x1653: // (green steel)
5114 element = EL_STEEL_CHAR_I;
5117 case 0x1654: // (green steel)
5118 element = EL_STEEL_CHAR_J;
5121 case 0x1655: // (green steel)
5122 element = EL_STEEL_CHAR_K;
5125 case 0x1656: // (green steel)
5126 element = EL_STEEL_CHAR_L;
5129 case 0x1657: // (green steel)
5130 element = EL_STEEL_CHAR_M;
5133 case 0x1658: // (green steel)
5134 element = EL_STEEL_CHAR_N;
5137 case 0x1659: // (green steel)
5138 element = EL_STEEL_CHAR_O;
5141 case 0x165a: // (green steel)
5142 element = EL_STEEL_CHAR_P;
5145 case 0x165b: // (green steel)
5146 element = EL_STEEL_CHAR_Q;
5149 case 0x165c: // (green steel)
5150 element = EL_STEEL_CHAR_R;
5153 case 0x165d: // (green steel)
5154 element = EL_STEEL_CHAR_S;
5157 case 0x165e: // (green steel)
5158 element = EL_STEEL_CHAR_T;
5161 case 0x165f: // (green steel)
5162 element = EL_STEEL_CHAR_U;
5165 case 0x1660: // (green steel)
5166 element = EL_STEEL_CHAR_V;
5169 case 0x1661: // (green steel)
5170 element = EL_STEEL_CHAR_W;
5173 case 0x1662: // (green steel)
5174 element = EL_STEEL_CHAR_X;
5177 case 0x1663: // (green steel)
5178 element = EL_STEEL_CHAR_Y;
5181 case 0x1664: // (green steel)
5182 element = EL_STEEL_CHAR_Z;
5185 case 0x1665: // (green steel)
5186 element = EL_STEEL_CHAR_AUMLAUT;
5189 case 0x1666: // (green steel)
5190 element = EL_STEEL_CHAR_OUMLAUT;
5193 case 0x1667: // (green steel)
5194 element = EL_STEEL_CHAR_UUMLAUT;
5197 case 0x1668: // (green steel)
5198 element = EL_STEEL_CHAR_0;
5201 case 0x1669: // (green steel)
5202 element = EL_STEEL_CHAR_1;
5205 case 0x166a: // (green steel)
5206 element = EL_STEEL_CHAR_2;
5209 case 0x166b: // (green steel)
5210 element = EL_STEEL_CHAR_3;
5213 case 0x166c: // (green steel)
5214 element = EL_STEEL_CHAR_4;
5217 case 0x166d: // (green steel)
5218 element = EL_STEEL_CHAR_5;
5221 case 0x166e: // (green steel)
5222 element = EL_STEEL_CHAR_6;
5225 case 0x166f: // (green steel)
5226 element = EL_STEEL_CHAR_7;
5229 case 0x1670: // (green steel)
5230 element = EL_STEEL_CHAR_8;
5233 case 0x1671: // (green steel)
5234 element = EL_STEEL_CHAR_9;
5237 case 0x1672: // (green steel)
5238 element = EL_STEEL_CHAR_PERIOD;
5241 case 0x1673: // (green steel)
5242 element = EL_STEEL_CHAR_EXCLAM;
5245 case 0x1674: // (green steel)
5246 element = EL_STEEL_CHAR_COLON;
5249 case 0x1675: // (green steel)
5250 element = EL_STEEL_CHAR_LESS;
5253 case 0x1676: // (green steel)
5254 element = EL_STEEL_CHAR_GREATER;
5257 case 0x1677: // (green steel)
5258 element = EL_STEEL_CHAR_QUESTION;
5261 case 0x1678: // (green steel)
5262 element = EL_STEEL_CHAR_COPYRIGHT;
5265 case 0x1679: // (green steel)
5266 element = EL_STEEL_CHAR_UP;
5269 case 0x167a: // (green steel)
5270 element = EL_STEEL_CHAR_DOWN;
5273 case 0x167b: // (green steel)
5274 element = EL_STEEL_CHAR_BUTTON;
5277 case 0x167c: // (green steel)
5278 element = EL_STEEL_CHAR_PLUS;
5281 case 0x167d: // (green steel)
5282 element = EL_STEEL_CHAR_MINUS;
5285 case 0x167e: // (green steel)
5286 element = EL_STEEL_CHAR_APOSTROPHE;
5289 case 0x167f: // (green steel)
5290 element = EL_STEEL_CHAR_PARENLEFT;
5293 case 0x1680: // (green steel)
5294 element = EL_STEEL_CHAR_PARENRIGHT;
5297 case 0x1681: // gate (red)
5298 element = EL_EM_GATE_1;
5301 case 0x1682: // secret gate (red)
5302 element = EL_GATE_1_GRAY;
5305 case 0x1683: // gate (yellow)
5306 element = EL_EM_GATE_2;
5309 case 0x1684: // secret gate (yellow)
5310 element = EL_GATE_2_GRAY;
5313 case 0x1685: // gate (blue)
5314 element = EL_EM_GATE_4;
5317 case 0x1686: // secret gate (blue)
5318 element = EL_GATE_4_GRAY;
5321 case 0x1687: // gate (green)
5322 element = EL_EM_GATE_3;
5325 case 0x1688: // secret gate (green)
5326 element = EL_GATE_3_GRAY;
5329 case 0x1689: // gate (white)
5330 element = EL_DC_GATE_WHITE;
5333 case 0x168a: // secret gate (white)
5334 element = EL_DC_GATE_WHITE_GRAY;
5337 case 0x168b: // secret gate (no key)
5338 element = EL_DC_GATE_FAKE_GRAY;
5342 element = EL_ROBOT_WHEEL;
5346 element = EL_DC_TIMEGATE_SWITCH;
5350 element = EL_ACID_POOL_BOTTOM;
5354 element = EL_ACID_POOL_TOPLEFT;
5358 element = EL_ACID_POOL_TOPRIGHT;
5362 element = EL_ACID_POOL_BOTTOMLEFT;
5366 element = EL_ACID_POOL_BOTTOMRIGHT;
5370 element = EL_STEELWALL;
5374 element = EL_STEELWALL_SLIPPERY;
5377 case 0x1695: // steel wall (not round)
5378 element = EL_STEELWALL;
5381 case 0x1696: // steel wall (left)
5382 element = EL_DC_STEELWALL_1_LEFT;
5385 case 0x1697: // steel wall (bottom)
5386 element = EL_DC_STEELWALL_1_BOTTOM;
5389 case 0x1698: // steel wall (right)
5390 element = EL_DC_STEELWALL_1_RIGHT;
5393 case 0x1699: // steel wall (top)
5394 element = EL_DC_STEELWALL_1_TOP;
5397 case 0x169a: // steel wall (left/bottom)
5398 element = EL_DC_STEELWALL_1_BOTTOMLEFT;
5401 case 0x169b: // steel wall (right/bottom)
5402 element = EL_DC_STEELWALL_1_BOTTOMRIGHT;
5405 case 0x169c: // steel wall (right/top)
5406 element = EL_DC_STEELWALL_1_TOPRIGHT;
5409 case 0x169d: // steel wall (left/top)
5410 element = EL_DC_STEELWALL_1_TOPLEFT;
5413 case 0x169e: // steel wall (right/bottom small)
5414 element = EL_DC_STEELWALL_1_BOTTOMRIGHT_2;
5417 case 0x169f: // steel wall (left/bottom small)
5418 element = EL_DC_STEELWALL_1_BOTTOMLEFT_2;
5421 case 0x16a0: // steel wall (right/top small)
5422 element = EL_DC_STEELWALL_1_TOPRIGHT_2;
5425 case 0x16a1: // steel wall (left/top small)
5426 element = EL_DC_STEELWALL_1_TOPLEFT_2;
5429 case 0x16a2: // steel wall (left/right)
5430 element = EL_DC_STEELWALL_1_VERTICAL;
5433 case 0x16a3: // steel wall (top/bottom)
5434 element = EL_DC_STEELWALL_1_HORIZONTAL;
5437 case 0x16a4: // steel wall 2 (left end)
5438 element = EL_DC_STEELWALL_2_LEFT;
5441 case 0x16a5: // steel wall 2 (right end)
5442 element = EL_DC_STEELWALL_2_RIGHT;
5445 case 0x16a6: // steel wall 2 (top end)
5446 element = EL_DC_STEELWALL_2_TOP;
5449 case 0x16a7: // steel wall 2 (bottom end)
5450 element = EL_DC_STEELWALL_2_BOTTOM;
5453 case 0x16a8: // steel wall 2 (left/right)
5454 element = EL_DC_STEELWALL_2_HORIZONTAL;
5457 case 0x16a9: // steel wall 2 (up/down)
5458 element = EL_DC_STEELWALL_2_VERTICAL;
5461 case 0x16aa: // steel wall 2 (mid)
5462 element = EL_DC_STEELWALL_2_MIDDLE;
5466 element = EL_SIGN_EXCLAMATION;
5470 element = EL_SIGN_RADIOACTIVITY;
5474 element = EL_SIGN_STOP;
5478 element = EL_SIGN_WHEELCHAIR;
5482 element = EL_SIGN_PARKING;
5486 element = EL_SIGN_NO_ENTRY;
5490 element = EL_SIGN_HEART;
5494 element = EL_SIGN_GIVE_WAY;
5498 element = EL_SIGN_ENTRY_FORBIDDEN;
5502 element = EL_SIGN_EMERGENCY_EXIT;
5506 element = EL_SIGN_YIN_YANG;
5510 element = EL_WALL_EMERALD;
5514 element = EL_WALL_DIAMOND;
5518 element = EL_WALL_PEARL;
5522 element = EL_WALL_CRYSTAL;
5526 element = EL_INVISIBLE_WALL;
5530 element = EL_INVISIBLE_STEELWALL;
5534 // EL_INVISIBLE_SAND
5537 element = EL_LIGHT_SWITCH;
5541 element = EL_ENVELOPE_1;
5545 if (element >= 0x0117 && element <= 0x036e) // (?)
5546 element = EL_DIAMOND;
5547 else if (element >= 0x042d && element <= 0x0684) // (?)
5548 element = EL_EMERALD;
5549 else if (element >= 0x157c && element <= 0x158b)
5551 else if (element >= 0x1590 && element <= 0x159f)
5552 element = EL_DC_LANDMINE;
5553 else if (element >= 0x16bc && element <= 0x16cb)
5554 element = EL_INVISIBLE_SAND;
5557 Error(ERR_WARN, "unknown Diamond Caves element 0x%04x", element);
5558 element = EL_UNKNOWN;
5563 return getMappedElement(element);
5566 static void LoadLevelFromFileStream_DC(File *file, struct LevelInfo *level,
5569 byte header[DC_LEVEL_HEADER_SIZE];
5571 int envelope_header_pos = 62;
5572 int envelope_content_pos = 94;
5573 int level_name_pos = 251;
5574 int level_author_pos = 292;
5575 int envelope_header_len;
5576 int envelope_content_len;
5578 int level_author_len;
5580 int num_yamyam_contents;
5583 getDecodedWord_DC(0, TRUE); // initialize DC2 decoding engine
5585 for (i = 0; i < DC_LEVEL_HEADER_SIZE / 2; i++)
5587 unsigned short header_word = getDecodedWord_DC(getFile16BitBE(file), FALSE);
5589 header[i * 2 + 0] = header_word >> 8;
5590 header[i * 2 + 1] = header_word & 0xff;
5593 // read some values from level header to check level decoding integrity
5594 fieldx = header[6] | (header[7] << 8);
5595 fieldy = header[8] | (header[9] << 8);
5596 num_yamyam_contents = header[60] | (header[61] << 8);
5598 // do some simple sanity checks to ensure that level was correctly decoded
5599 if (fieldx < 1 || fieldx > 256 ||
5600 fieldy < 1 || fieldy > 256 ||
5601 num_yamyam_contents < 1 || num_yamyam_contents > 8)
5603 level->no_valid_file = TRUE;
5605 Error(ERR_WARN, "cannot decode level from stream -- using empty level");
5610 // maximum envelope header size is 31 bytes
5611 envelope_header_len = header[envelope_header_pos];
5612 // maximum envelope content size is 110 (156?) bytes
5613 envelope_content_len = header[envelope_content_pos];
5615 // maximum level title size is 40 bytes
5616 level_name_len = MIN(header[level_name_pos], MAX_LEVEL_NAME_LEN);
5617 // maximum level author size is 30 (51?) bytes
5618 level_author_len = MIN(header[level_author_pos], MAX_LEVEL_AUTHOR_LEN);
5622 for (i = 0; i < envelope_header_len; i++)
5623 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5624 level->envelope[0].text[envelope_size++] =
5625 header[envelope_header_pos + 1 + i];
5627 if (envelope_header_len > 0 && envelope_content_len > 0)
5629 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5630 level->envelope[0].text[envelope_size++] = '\n';
5631 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5632 level->envelope[0].text[envelope_size++] = '\n';
5635 for (i = 0; i < envelope_content_len; i++)
5636 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5637 level->envelope[0].text[envelope_size++] =
5638 header[envelope_content_pos + 1 + i];
5640 level->envelope[0].text[envelope_size] = '\0';
5642 level->envelope[0].xsize = MAX_ENVELOPE_XSIZE;
5643 level->envelope[0].ysize = 10;
5644 level->envelope[0].autowrap = TRUE;
5645 level->envelope[0].centered = TRUE;
5647 for (i = 0; i < level_name_len; i++)
5648 level->name[i] = header[level_name_pos + 1 + i];
5649 level->name[level_name_len] = '\0';
5651 for (i = 0; i < level_author_len; i++)
5652 level->author[i] = header[level_author_pos + 1 + i];
5653 level->author[level_author_len] = '\0';
5655 num_yamyam_contents = header[60] | (header[61] << 8);
5656 level->num_yamyam_contents =
5657 MIN(MAX(MIN_ELEMENT_CONTENTS, num_yamyam_contents), MAX_ELEMENT_CONTENTS);
5659 for (i = 0; i < num_yamyam_contents; i++)
5661 for (y = 0; y < 3; y++) for (x = 0; x < 3; x++)
5663 unsigned short word = getDecodedWord_DC(getFile16BitBE(file), FALSE);
5664 int element_dc = ((word & 0xff) << 8) | ((word >> 8) & 0xff);
5666 if (i < MAX_ELEMENT_CONTENTS)
5667 level->yamyam_content[i].e[x][y] = getMappedElement_DC(element_dc);
5671 fieldx = header[6] | (header[7] << 8);
5672 fieldy = header[8] | (header[9] << 8);
5673 level->fieldx = MIN(MAX(MIN_LEV_FIELDX, fieldx), MAX_LEV_FIELDX);
5674 level->fieldy = MIN(MAX(MIN_LEV_FIELDY, fieldy), MAX_LEV_FIELDY);
5676 for (y = 0; y < fieldy; y++) for (x = 0; x < fieldx; x++)
5678 unsigned short word = getDecodedWord_DC(getFile16BitBE(file), FALSE);
5679 int element_dc = ((word & 0xff) << 8) | ((word >> 8) & 0xff);
5681 if (x < MAX_LEV_FIELDX && y < MAX_LEV_FIELDY)
5682 level->field[x][y] = getMappedElement_DC(element_dc);
5685 x = MIN(MAX(0, (header[10] | (header[11] << 8)) - 1), MAX_LEV_FIELDX - 1);
5686 y = MIN(MAX(0, (header[12] | (header[13] << 8)) - 1), MAX_LEV_FIELDY - 1);
5687 level->field[x][y] = EL_PLAYER_1;
5689 x = MIN(MAX(0, (header[14] | (header[15] << 8)) - 1), MAX_LEV_FIELDX - 1);
5690 y = MIN(MAX(0, (header[16] | (header[17] << 8)) - 1), MAX_LEV_FIELDY - 1);
5691 level->field[x][y] = EL_PLAYER_2;
5693 level->gems_needed = header[18] | (header[19] << 8);
5695 level->score[SC_EMERALD] = header[20] | (header[21] << 8);
5696 level->score[SC_DIAMOND] = header[22] | (header[23] << 8);
5697 level->score[SC_PEARL] = header[24] | (header[25] << 8);
5698 level->score[SC_CRYSTAL] = header[26] | (header[27] << 8);
5699 level->score[SC_NUT] = header[28] | (header[29] << 8);
5700 level->score[SC_ROBOT] = header[30] | (header[31] << 8);
5701 level->score[SC_SPACESHIP] = header[32] | (header[33] << 8);
5702 level->score[SC_BUG] = header[34] | (header[35] << 8);
5703 level->score[SC_YAMYAM] = header[36] | (header[37] << 8);
5704 level->score[SC_DYNAMITE] = header[38] | (header[39] << 8);
5705 level->score[SC_KEY] = header[40] | (header[41] << 8);
5706 level->score[SC_TIME_BONUS] = header[42] | (header[43] << 8);
5708 level->time = header[44] | (header[45] << 8);
5710 level->amoeba_speed = header[46] | (header[47] << 8);
5711 level->time_light = header[48] | (header[49] << 8);
5712 level->time_timegate = header[50] | (header[51] << 8);
5713 level->time_wheel = header[52] | (header[53] << 8);
5714 level->time_magic_wall = header[54] | (header[55] << 8);
5715 level->extra_time = header[56] | (header[57] << 8);
5716 level->shield_normal_time = header[58] | (header[59] << 8);
5718 // Diamond Caves has the same (strange) behaviour as Emerald Mine that gems
5719 // can slip down from flat walls, like normal walls and steel walls
5720 level->em_slippery_gems = TRUE;
5723 static void LoadLevelFromFileInfo_DC(struct LevelInfo *level,
5724 struct LevelFileInfo *level_file_info,
5725 boolean level_info_only)
5727 char *filename = level_file_info->filename;
5729 int num_magic_bytes = 8;
5730 char magic_bytes[num_magic_bytes + 1];
5731 int num_levels_to_skip = level_file_info->nr - leveldir_current->first_level;
5733 if (!(file = openFile(filename, MODE_READ)))
5735 level->no_valid_file = TRUE;
5737 if (!level_info_only)
5738 Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
5743 // fseek(file, 0x0000, SEEK_SET);
5745 if (level_file_info->packed)
5747 // read "magic bytes" from start of file
5748 if (getStringFromFile(file, magic_bytes, num_magic_bytes + 1) == NULL)
5749 magic_bytes[0] = '\0';
5751 // check "magic bytes" for correct file format
5752 if (!strPrefix(magic_bytes, "DC2"))
5754 level->no_valid_file = TRUE;
5756 Error(ERR_WARN, "unknown DC level file '%s' -- using empty level",
5762 if (strPrefix(magic_bytes, "DC2Win95") ||
5763 strPrefix(magic_bytes, "DC2Win98"))
5765 int position_first_level = 0x00fa;
5766 int extra_bytes = 4;
5769 // advance file stream to first level inside the level package
5770 skip_bytes = position_first_level - num_magic_bytes - extra_bytes;
5772 // each block of level data is followed by block of non-level data
5773 num_levels_to_skip *= 2;
5775 // at least skip header bytes, therefore use ">= 0" instead of "> 0"
5776 while (num_levels_to_skip >= 0)
5778 // advance file stream to next level inside the level package
5779 if (seekFile(file, skip_bytes, SEEK_CUR) != 0)
5781 level->no_valid_file = TRUE;
5783 Error(ERR_WARN, "cannot fseek in file '%s' -- using empty level",
5789 // skip apparently unused extra bytes following each level
5790 ReadUnusedBytesFromFile(file, extra_bytes);
5792 // read size of next level in level package
5793 skip_bytes = getFile32BitLE(file);
5795 num_levels_to_skip--;
5800 level->no_valid_file = TRUE;
5802 Error(ERR_WARN, "unknown DC2 level file '%s' -- using empty level",
5809 LoadLevelFromFileStream_DC(file, level, level_file_info->nr);
5815 // ----------------------------------------------------------------------------
5816 // functions for loading SB level
5817 // ----------------------------------------------------------------------------
5819 int getMappedElement_SB(int element_ascii, boolean use_ces)
5827 sb_element_mapping[] =
5829 { ' ', EL_EMPTY, EL_CUSTOM_1 }, // floor (space)
5830 { '#', EL_STEELWALL, EL_CUSTOM_2 }, // wall
5831 { '@', EL_PLAYER_1, EL_CUSTOM_3 }, // player
5832 { '$', EL_SOKOBAN_OBJECT, EL_CUSTOM_4 }, // box
5833 { '.', EL_SOKOBAN_FIELD_EMPTY, EL_CUSTOM_5 }, // goal square
5834 { '*', EL_SOKOBAN_FIELD_FULL, EL_CUSTOM_6 }, // box on goal square
5835 { '+', EL_SOKOBAN_FIELD_PLAYER, EL_CUSTOM_7 }, // player on goal square
5836 { '_', EL_INVISIBLE_STEELWALL, EL_FROM_LEVEL_TEMPLATE }, // floor beyond border
5843 for (i = 0; sb_element_mapping[i].ascii != 0; i++)
5844 if (element_ascii == sb_element_mapping[i].ascii)
5845 return (use_ces ? sb_element_mapping[i].ce : sb_element_mapping[i].sb);
5847 return EL_UNDEFINED;
5850 static void LoadLevelFromFileInfo_SB(struct LevelInfo *level,
5851 struct LevelFileInfo *level_file_info,
5852 boolean level_info_only)
5854 char *filename = level_file_info->filename;
5855 char line[MAX_LINE_LEN], line_raw[MAX_LINE_LEN], previous_line[MAX_LINE_LEN];
5856 char last_comment[MAX_LINE_LEN];
5857 char level_name[MAX_LINE_LEN];
5860 int num_levels_to_skip = level_file_info->nr - leveldir_current->first_level;
5861 boolean read_continued_line = FALSE;
5862 boolean reading_playfield = FALSE;
5863 boolean got_valid_playfield_line = FALSE;
5864 boolean invalid_playfield_char = FALSE;
5865 boolean load_xsb_to_ces = check_special_flags("load_xsb_to_ces");
5866 int file_level_nr = 0;
5868 int x = 0, y = 0; // initialized to make compilers happy
5870 last_comment[0] = '\0';
5871 level_name[0] = '\0';
5873 if (!(file = openFile(filename, MODE_READ)))
5875 level->no_valid_file = TRUE;
5877 if (!level_info_only)
5878 Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
5883 while (!checkEndOfFile(file))
5885 // level successfully read, but next level may follow here
5886 if (!got_valid_playfield_line && reading_playfield)
5888 // read playfield from single level file -- skip remaining file
5889 if (!level_file_info->packed)
5892 if (file_level_nr >= num_levels_to_skip)
5897 last_comment[0] = '\0';
5898 level_name[0] = '\0';
5900 reading_playfield = FALSE;
5903 got_valid_playfield_line = FALSE;
5905 // read next line of input file
5906 if (!getStringFromFile(file, line, MAX_LINE_LEN))
5909 // check if line was completely read and is terminated by line break
5910 if (strlen(line) > 0 && line[strlen(line) - 1] == '\n')
5913 // cut trailing line break (this can be newline and/or carriage return)
5914 for (line_ptr = &line[strlen(line)]; line_ptr >= line; line_ptr--)
5915 if ((*line_ptr == '\n' || *line_ptr == '\r') && *(line_ptr + 1) == '\0')
5918 // copy raw input line for later use (mainly debugging output)
5919 strcpy(line_raw, line);
5921 if (read_continued_line)
5923 // append new line to existing line, if there is enough space
5924 if (strlen(previous_line) + strlen(line_ptr) < MAX_LINE_LEN)
5925 strcat(previous_line, line_ptr);
5927 strcpy(line, previous_line); // copy storage buffer to line
5929 read_continued_line = FALSE;
5932 // if the last character is '\', continue at next line
5933 if (strlen(line) > 0 && line[strlen(line) - 1] == '\\')
5935 line[strlen(line) - 1] = '\0'; // cut off trailing backslash
5936 strcpy(previous_line, line); // copy line to storage buffer
5938 read_continued_line = TRUE;
5944 if (line[0] == '\0')
5947 // extract comment text from comment line
5950 for (line_ptr = line; *line_ptr; line_ptr++)
5951 if (*line_ptr != ' ' && *line_ptr != '\t' && *line_ptr != ';')
5954 strcpy(last_comment, line_ptr);
5959 // extract level title text from line containing level title
5960 if (line[0] == '\'')
5962 strcpy(level_name, &line[1]);
5964 if (strlen(level_name) > 0 && level_name[strlen(level_name) - 1] == '\'')
5965 level_name[strlen(level_name) - 1] = '\0';
5970 // skip lines containing only spaces (or empty lines)
5971 for (line_ptr = line; *line_ptr; line_ptr++)
5972 if (*line_ptr != ' ')
5974 if (*line_ptr == '\0')
5977 // at this point, we have found a line containing part of a playfield
5979 got_valid_playfield_line = TRUE;
5981 if (!reading_playfield)
5983 reading_playfield = TRUE;
5984 invalid_playfield_char = FALSE;
5986 for (x = 0; x < MAX_LEV_FIELDX; x++)
5987 for (y = 0; y < MAX_LEV_FIELDY; y++)
5988 level->field[x][y] = getMappedElement_SB(' ', load_xsb_to_ces);
5993 // start with topmost tile row
5997 // skip playfield line if larger row than allowed
5998 if (y >= MAX_LEV_FIELDY)
6001 // start with leftmost tile column
6004 // read playfield elements from line
6005 for (line_ptr = line; *line_ptr; line_ptr++)
6007 int mapped_sb_element = getMappedElement_SB(*line_ptr, load_xsb_to_ces);
6009 // stop parsing playfield line if larger column than allowed
6010 if (x >= MAX_LEV_FIELDX)
6013 if (mapped_sb_element == EL_UNDEFINED)
6015 invalid_playfield_char = TRUE;
6020 level->field[x][y] = mapped_sb_element;
6022 // continue with next tile column
6025 level->fieldx = MAX(x, level->fieldx);
6028 if (invalid_playfield_char)
6030 // if first playfield line, treat invalid lines as comment lines
6032 reading_playfield = FALSE;
6037 // continue with next tile row
6045 level->fieldx = MIN(MAX(MIN_LEV_FIELDX, level->fieldx), MAX_LEV_FIELDX);
6046 level->fieldy = MIN(MAX(MIN_LEV_FIELDY, level->fieldy), MAX_LEV_FIELDY);
6048 if (!reading_playfield)
6050 level->no_valid_file = TRUE;
6052 Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
6057 if (*level_name != '\0')
6059 strncpy(level->name, level_name, MAX_LEVEL_NAME_LEN);
6060 level->name[MAX_LEVEL_NAME_LEN] = '\0';
6062 else if (*last_comment != '\0')
6064 strncpy(level->name, last_comment, MAX_LEVEL_NAME_LEN);
6065 level->name[MAX_LEVEL_NAME_LEN] = '\0';
6069 sprintf(level->name, "--> Level %d <--", level_file_info->nr);
6072 // set all empty fields beyond the border walls to invisible steel wall
6073 for (y = 0; y < level->fieldy; y++) for (x = 0; x < level->fieldx; x++)
6075 if ((x == 0 || x == level->fieldx - 1 ||
6076 y == 0 || y == level->fieldy - 1) &&
6077 level->field[x][y] == getMappedElement_SB(' ', load_xsb_to_ces))
6078 FloodFillLevel(x, y, getMappedElement_SB('_', load_xsb_to_ces),
6079 level->field, level->fieldx, level->fieldy);
6082 // set special level settings for Sokoban levels
6085 level->use_step_counter = TRUE;
6087 if (load_xsb_to_ces)
6089 // special global settings can now be set in level template
6091 level->use_custom_template = TRUE;
6096 // -------------------------------------------------------------------------
6097 // functions for handling native levels
6098 // -------------------------------------------------------------------------
6100 static void LoadLevelFromFileInfo_EM(struct LevelInfo *level,
6101 struct LevelFileInfo *level_file_info,
6102 boolean level_info_only)
6104 if (!LoadNativeLevel_EM(level_file_info->filename, level_info_only))
6105 level->no_valid_file = TRUE;
6108 static void LoadLevelFromFileInfo_SP(struct LevelInfo *level,
6109 struct LevelFileInfo *level_file_info,
6110 boolean level_info_only)
6114 // determine position of requested level inside level package
6115 if (level_file_info->packed)
6116 pos = level_file_info->nr - leveldir_current->first_level;
6118 if (!LoadNativeLevel_SP(level_file_info->filename, pos, level_info_only))
6119 level->no_valid_file = TRUE;
6122 static void LoadLevelFromFileInfo_MM(struct LevelInfo *level,
6123 struct LevelFileInfo *level_file_info,
6124 boolean level_info_only)
6126 if (!LoadNativeLevel_MM(level_file_info->filename, level_info_only))
6127 level->no_valid_file = TRUE;
6130 void CopyNativeLevel_RND_to_Native(struct LevelInfo *level)
6132 if (level->game_engine_type == GAME_ENGINE_TYPE_EM)
6133 CopyNativeLevel_RND_to_EM(level);
6134 else if (level->game_engine_type == GAME_ENGINE_TYPE_SP)
6135 CopyNativeLevel_RND_to_SP(level);
6136 else if (level->game_engine_type == GAME_ENGINE_TYPE_MM)
6137 CopyNativeLevel_RND_to_MM(level);
6140 void CopyNativeLevel_Native_to_RND(struct LevelInfo *level)
6142 if (level->game_engine_type == GAME_ENGINE_TYPE_EM)
6143 CopyNativeLevel_EM_to_RND(level);
6144 else if (level->game_engine_type == GAME_ENGINE_TYPE_SP)
6145 CopyNativeLevel_SP_to_RND(level);
6146 else if (level->game_engine_type == GAME_ENGINE_TYPE_MM)
6147 CopyNativeLevel_MM_to_RND(level);
6150 void SaveNativeLevel(struct LevelInfo *level)
6152 if (level->game_engine_type == GAME_ENGINE_TYPE_SP)
6154 char *basename = getSingleLevelBasenameExt(level->file_info.nr, "sp");
6155 char *filename = getLevelFilenameFromBasename(basename);
6157 CopyNativeLevel_RND_to_SP(level);
6158 CopyNativeTape_RND_to_SP(level);
6160 SaveNativeLevel_SP(filename);
6165 // ----------------------------------------------------------------------------
6166 // functions for loading generic level
6167 // ----------------------------------------------------------------------------
6169 static void LoadLevelFromFileInfo(struct LevelInfo *level,
6170 struct LevelFileInfo *level_file_info,
6171 boolean level_info_only)
6173 // always start with reliable default values
6174 setLevelInfoToDefaults(level, level_info_only, TRUE);
6176 switch (level_file_info->type)
6178 case LEVEL_FILE_TYPE_RND:
6179 LoadLevelFromFileInfo_RND(level, level_file_info, level_info_only);
6182 case LEVEL_FILE_TYPE_EM:
6183 LoadLevelFromFileInfo_EM(level, level_file_info, level_info_only);
6184 level->game_engine_type = GAME_ENGINE_TYPE_EM;
6187 case LEVEL_FILE_TYPE_SP:
6188 LoadLevelFromFileInfo_SP(level, level_file_info, level_info_only);
6189 level->game_engine_type = GAME_ENGINE_TYPE_SP;
6192 case LEVEL_FILE_TYPE_MM:
6193 LoadLevelFromFileInfo_MM(level, level_file_info, level_info_only);
6194 level->game_engine_type = GAME_ENGINE_TYPE_MM;
6197 case LEVEL_FILE_TYPE_DC:
6198 LoadLevelFromFileInfo_DC(level, level_file_info, level_info_only);
6201 case LEVEL_FILE_TYPE_SB:
6202 LoadLevelFromFileInfo_SB(level, level_file_info, level_info_only);
6206 LoadLevelFromFileInfo_RND(level, level_file_info, level_info_only);
6210 // if level file is invalid, restore level structure to default values
6211 if (level->no_valid_file)
6212 setLevelInfoToDefaults(level, level_info_only, FALSE);
6214 if (level->game_engine_type == GAME_ENGINE_TYPE_UNKNOWN)
6215 level->game_engine_type = GAME_ENGINE_TYPE_RND;
6217 if (level_file_info->type != LEVEL_FILE_TYPE_RND)
6218 CopyNativeLevel_Native_to_RND(level);
6221 void LoadLevelFromFilename(struct LevelInfo *level, char *filename)
6223 static struct LevelFileInfo level_file_info;
6225 // always start with reliable default values
6226 setFileInfoToDefaults(&level_file_info);
6228 level_file_info.nr = 0; // unknown level number
6229 level_file_info.type = LEVEL_FILE_TYPE_RND; // no others supported yet
6231 setString(&level_file_info.filename, filename);
6233 LoadLevelFromFileInfo(level, &level_file_info, FALSE);
6236 static void LoadLevel_InitVersion(struct LevelInfo *level)
6240 if (leveldir_current == NULL) // only when dumping level
6243 // all engine modifications also valid for levels which use latest engine
6244 if (level->game_version < VERSION_IDENT(3,2,0,5))
6246 // time bonus score was given for 10 s instead of 1 s before 3.2.0-5
6247 level->score[SC_TIME_BONUS] /= 10;
6250 if (leveldir_current->latest_engine)
6252 // ---------- use latest game engine --------------------------------------
6254 /* For all levels which are forced to use the latest game engine version
6255 (normally all but user contributed, private and undefined levels), set
6256 the game engine version to the actual version; this allows for actual
6257 corrections in the game engine to take effect for existing, converted
6258 levels (from "classic" or other existing games) to make the emulation
6259 of the corresponding game more accurate, while (hopefully) not breaking
6260 existing levels created from other players. */
6262 level->game_version = GAME_VERSION_ACTUAL;
6264 /* Set special EM style gems behaviour: EM style gems slip down from
6265 normal, steel and growing wall. As this is a more fundamental change,
6266 it seems better to set the default behaviour to "off" (as it is more
6267 natural) and make it configurable in the level editor (as a property
6268 of gem style elements). Already existing converted levels (neither
6269 private nor contributed levels) are changed to the new behaviour. */
6271 if (level->file_version < FILE_VERSION_2_0)
6272 level->em_slippery_gems = TRUE;
6277 // ---------- use game engine the level was created with --------------------
6279 /* For all levels which are not forced to use the latest game engine
6280 version (normally user contributed, private and undefined levels),
6281 use the version of the game engine the levels were created for.
6283 Since 2.0.1, the game engine version is now directly stored
6284 in the level file (chunk "VERS"), so there is no need anymore
6285 to set the game version from the file version (except for old,
6286 pre-2.0 levels, where the game version is still taken from the
6287 file format version used to store the level -- see above). */
6289 // player was faster than enemies in 1.0.0 and before
6290 if (level->file_version == FILE_VERSION_1_0)
6291 for (i = 0; i < MAX_PLAYERS; i++)
6292 level->initial_player_stepsize[i] = STEPSIZE_FAST;
6294 // default behaviour for EM style gems was "slippery" only in 2.0.1
6295 if (level->game_version == VERSION_IDENT(2,0,1,0))
6296 level->em_slippery_gems = TRUE;
6298 // springs could be pushed over pits before (pre-release version) 2.2.0
6299 if (level->game_version < VERSION_IDENT(2,2,0,0))
6300 level->use_spring_bug = TRUE;
6302 if (level->game_version < VERSION_IDENT(3,2,0,5))
6304 // time orb caused limited time in endless time levels before 3.2.0-5
6305 level->use_time_orb_bug = TRUE;
6307 // default behaviour for snapping was "no snap delay" before 3.2.0-5
6308 level->block_snap_field = FALSE;
6310 // extra time score was same value as time left score before 3.2.0-5
6311 level->extra_time_score = level->score[SC_TIME_BONUS];
6314 if (level->game_version < VERSION_IDENT(3,2,0,7))
6316 // default behaviour for snapping was "not continuous" before 3.2.0-7
6317 level->continuous_snapping = FALSE;
6320 // only few elements were able to actively move into acid before 3.1.0
6321 // trigger settings did not exist before 3.1.0; set to default "any"
6322 if (level->game_version < VERSION_IDENT(3,1,0,0))
6324 // correct "can move into acid" settings (all zero in old levels)
6326 level->can_move_into_acid_bits = 0; // nothing can move into acid
6327 level->dont_collide_with_bits = 0; // nothing is deadly when colliding
6329 setMoveIntoAcidProperty(level, EL_ROBOT, TRUE);
6330 setMoveIntoAcidProperty(level, EL_SATELLITE, TRUE);
6331 setMoveIntoAcidProperty(level, EL_PENGUIN, TRUE);
6332 setMoveIntoAcidProperty(level, EL_BALLOON, TRUE);
6334 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6335 SET_PROPERTY(EL_CUSTOM_START + i, EP_CAN_MOVE_INTO_ACID, TRUE);
6337 // correct trigger settings (stored as zero == "none" in old levels)
6339 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6341 int element = EL_CUSTOM_START + i;
6342 struct ElementInfo *ei = &element_info[element];
6344 for (j = 0; j < ei->num_change_pages; j++)
6346 struct ElementChangeInfo *change = &ei->change_page[j];
6348 change->trigger_player = CH_PLAYER_ANY;
6349 change->trigger_page = CH_PAGE_ANY;
6354 // try to detect and fix "Snake Bite" levels, which are broken with 3.2.0
6356 int element = EL_CUSTOM_256;
6357 struct ElementInfo *ei = &element_info[element];
6358 struct ElementChangeInfo *change = &ei->change_page[0];
6360 /* This is needed to fix a problem that was caused by a bugfix in function
6361 game.c/CreateFieldExt() introduced with 3.2.0 that corrects the behaviour
6362 when a custom element changes to EL_SOKOBAN_FIELD_PLAYER (before, it did
6363 not replace walkable elements, but instead just placed the player on it,
6364 without placing the Sokoban field under the player). Unfortunately, this
6365 breaks "Snake Bite" style levels when the snake is halfway through a door
6366 that just closes (the snake head is still alive and can be moved in this
6367 case). This can be fixed by replacing the EL_SOKOBAN_FIELD_PLAYER by the
6368 player (without Sokoban element) which then gets killed as designed). */
6370 if ((strncmp(leveldir_current->identifier, "snake_bite", 10) == 0 ||
6371 strncmp(ei->description, "pause b4 death", 14) == 0) &&
6372 change->target_element == EL_SOKOBAN_FIELD_PLAYER)
6373 change->target_element = EL_PLAYER_1;
6376 // try to detect and fix "Zelda" style levels, which are broken with 3.2.5
6377 if (level->game_version < VERSION_IDENT(3,2,5,0))
6379 /* This is needed to fix a problem that was caused by a bugfix in function
6380 game.c/CheckTriggeredElementChangeExt() introduced with 3.2.5 that
6381 corrects the behaviour when a custom element changes to another custom
6382 element with a higher element number that has change actions defined.
6383 Normally, only one change per frame is allowed for custom elements.
6384 Therefore, it is checked if a custom element already changed in the
6385 current frame; if it did, subsequent changes are suppressed.
6386 Unfortunately, this is only checked for element changes, but not for
6387 change actions, which are still executed. As the function above loops
6388 through all custom elements from lower to higher, an element change
6389 resulting in a lower CE number won't be checked again, while a target
6390 element with a higher number will also be checked, and potential change
6391 actions will get executed for this CE, too (which is wrong), while
6392 further changes are ignored (which is correct). As this bugfix breaks
6393 Zelda II (and introduces graphical bugs to Zelda I, and also breaks a
6394 few other levels like Alan Bond's "FMV"), allow the previous, incorrect
6395 behaviour for existing levels and tapes that make use of this bug */
6397 level->use_action_after_change_bug = TRUE;
6400 // not centering level after relocating player was default only in 3.2.3
6401 if (level->game_version == VERSION_IDENT(3,2,3,0)) // (no pre-releases)
6402 level->shifted_relocation = TRUE;
6404 // EM style elements always chain-exploded in R'n'D engine before 3.2.6
6405 if (level->game_version < VERSION_IDENT(3,2,6,0))
6406 level->em_explodes_by_fire = TRUE;
6408 // levels were solved by the first player entering an exit up to 4.1.0.0
6409 if (level->game_version <= VERSION_IDENT(4,1,0,0))
6410 level->solved_by_one_player = TRUE;
6412 // game logic of "game of life" and "biomaze" was buggy before 4.1.1.1
6413 if (level->game_version < VERSION_IDENT(4,1,1,1))
6414 level->use_life_bugs = TRUE;
6416 // only Sokoban fields (but not objects) had to be solved before 4.1.1.1
6417 if (level->game_version < VERSION_IDENT(4,1,1,1))
6418 level->sb_objects_needed = FALSE;
6421 static void LoadLevel_InitStandardElements(struct LevelInfo *level)
6425 // map elements that have changed in newer versions
6426 level->amoeba_content = getMappedElementByVersion(level->amoeba_content,
6427 level->game_version);
6428 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6429 for (x = 0; x < 3; x++)
6430 for (y = 0; y < 3; y++)
6431 level->yamyam_content[i].e[x][y] =
6432 getMappedElementByVersion(level->yamyam_content[i].e[x][y],
6433 level->game_version);
6437 static void LoadLevel_InitCustomElements(struct LevelInfo *level)
6441 // map custom element change events that have changed in newer versions
6442 // (these following values were accidentally changed in version 3.0.1)
6443 // (this seems to be needed only for 'ab_levelset3' and 'ab_levelset4')
6444 if (level->game_version <= VERSION_IDENT(3,0,0,0))
6446 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6448 int element = EL_CUSTOM_START + i;
6450 // order of checking and copying events to be mapped is important
6451 // (do not change the start and end value -- they are constant)
6452 for (j = CE_BY_OTHER_ACTION; j >= CE_VALUE_GETS_ZERO; j--)
6454 if (HAS_CHANGE_EVENT(element, j - 2))
6456 SET_CHANGE_EVENT(element, j - 2, FALSE);
6457 SET_CHANGE_EVENT(element, j, TRUE);
6461 // order of checking and copying events to be mapped is important
6462 // (do not change the start and end value -- they are constant)
6463 for (j = CE_PLAYER_COLLECTS_X; j >= CE_HITTING_SOMETHING; j--)
6465 if (HAS_CHANGE_EVENT(element, j - 1))
6467 SET_CHANGE_EVENT(element, j - 1, FALSE);
6468 SET_CHANGE_EVENT(element, j, TRUE);
6474 // initialize "can_change" field for old levels with only one change page
6475 if (level->game_version <= VERSION_IDENT(3,0,2,0))
6477 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6479 int element = EL_CUSTOM_START + i;
6481 if (CAN_CHANGE(element))
6482 element_info[element].change->can_change = TRUE;
6486 // correct custom element values (for old levels without these options)
6487 if (level->game_version < VERSION_IDENT(3,1,1,0))
6489 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6491 int element = EL_CUSTOM_START + i;
6492 struct ElementInfo *ei = &element_info[element];
6494 if (ei->access_direction == MV_NO_DIRECTION)
6495 ei->access_direction = MV_ALL_DIRECTIONS;
6499 // correct custom element values (fix invalid values for all versions)
6502 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6504 int element = EL_CUSTOM_START + i;
6505 struct ElementInfo *ei = &element_info[element];
6507 for (j = 0; j < ei->num_change_pages; j++)
6509 struct ElementChangeInfo *change = &ei->change_page[j];
6511 if (change->trigger_player == CH_PLAYER_NONE)
6512 change->trigger_player = CH_PLAYER_ANY;
6514 if (change->trigger_side == CH_SIDE_NONE)
6515 change->trigger_side = CH_SIDE_ANY;
6520 // initialize "can_explode" field for old levels which did not store this
6521 // !!! CHECK THIS -- "<= 3,1,0,0" IS PROBABLY WRONG !!!
6522 if (level->game_version <= VERSION_IDENT(3,1,0,0))
6524 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6526 int element = EL_CUSTOM_START + i;
6528 if (EXPLODES_1X1_OLD(element))
6529 element_info[element].explosion_type = EXPLODES_1X1;
6531 SET_PROPERTY(element, EP_CAN_EXPLODE, (EXPLODES_BY_FIRE(element) ||
6532 EXPLODES_SMASHED(element) ||
6533 EXPLODES_IMPACT(element)));
6537 // correct previously hard-coded move delay values for maze runner style
6538 if (level->game_version < VERSION_IDENT(3,1,1,0))
6540 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6542 int element = EL_CUSTOM_START + i;
6544 if (element_info[element].move_pattern & MV_MAZE_RUNNER_STYLE)
6546 // previously hard-coded and therefore ignored
6547 element_info[element].move_delay_fixed = 9;
6548 element_info[element].move_delay_random = 0;
6553 // set some other uninitialized values of custom elements in older levels
6554 if (level->game_version < VERSION_IDENT(3,1,0,0))
6556 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6558 int element = EL_CUSTOM_START + i;
6560 element_info[element].access_direction = MV_ALL_DIRECTIONS;
6562 element_info[element].explosion_delay = 17;
6563 element_info[element].ignition_delay = 8;
6568 static void LoadLevel_InitElements(struct LevelInfo *level)
6570 LoadLevel_InitStandardElements(level);
6572 if (level->file_has_custom_elements)
6573 LoadLevel_InitCustomElements(level);
6575 // initialize element properties for level editor etc.
6576 InitElementPropertiesEngine(level->game_version);
6577 InitElementPropertiesGfxElement();
6580 static void LoadLevel_InitPlayfield(struct LevelInfo *level)
6584 // map elements that have changed in newer versions
6585 for (y = 0; y < level->fieldy; y++)
6586 for (x = 0; x < level->fieldx; x++)
6587 level->field[x][y] = getMappedElementByVersion(level->field[x][y],
6588 level->game_version);
6590 // clear unused playfield data (nicer if level gets resized in editor)
6591 for (x = 0; x < MAX_LEV_FIELDX; x++)
6592 for (y = 0; y < MAX_LEV_FIELDY; y++)
6593 if (x >= level->fieldx || y >= level->fieldy)
6594 level->field[x][y] = EL_EMPTY;
6596 // copy elements to runtime playfield array
6597 for (x = 0; x < MAX_LEV_FIELDX; x++)
6598 for (y = 0; y < MAX_LEV_FIELDY; y++)
6599 Feld[x][y] = level->field[x][y];
6601 // initialize level size variables for faster access
6602 lev_fieldx = level->fieldx;
6603 lev_fieldy = level->fieldy;
6605 // determine border element for this level
6606 if (level->file_info.type == LEVEL_FILE_TYPE_DC)
6607 BorderElement = EL_EMPTY; // (in editor, SetBorderElement() is used)
6612 static void LoadLevel_InitNativeEngines(struct LevelInfo *level)
6614 struct LevelFileInfo *level_file_info = &level->file_info;
6616 if (level_file_info->type == LEVEL_FILE_TYPE_RND)
6617 CopyNativeLevel_RND_to_Native(level);
6620 static void LoadLevelTemplate_LoadAndInit(void)
6622 LoadLevelFromFileInfo(&level_template, &level_template.file_info, FALSE);
6624 LoadLevel_InitVersion(&level_template);
6625 LoadLevel_InitElements(&level_template);
6627 ActivateLevelTemplate();
6630 void LoadLevelTemplate(int nr)
6632 if (!fileExists(getGlobalLevelTemplateFilename()))
6634 Error(ERR_WARN, "no level template found for this level");
6639 setLevelFileInfo(&level_template.file_info, nr);
6641 LoadLevelTemplate_LoadAndInit();
6644 static void LoadNetworkLevelTemplate(struct NetworkLevelInfo *network_level)
6646 copyLevelFileInfo(&network_level->tmpl_info, &level_template.file_info);
6648 LoadLevelTemplate_LoadAndInit();
6651 static void LoadLevel_LoadAndInit(struct NetworkLevelInfo *network_level)
6653 LoadLevelFromFileInfo(&level, &level.file_info, FALSE);
6655 if (level.use_custom_template)
6657 if (network_level != NULL)
6658 LoadNetworkLevelTemplate(network_level);
6660 LoadLevelTemplate(-1);
6663 LoadLevel_InitVersion(&level);
6664 LoadLevel_InitElements(&level);
6665 LoadLevel_InitPlayfield(&level);
6667 LoadLevel_InitNativeEngines(&level);
6670 void LoadLevel(int nr)
6672 SetLevelSetInfo(leveldir_current->identifier, nr);
6674 setLevelFileInfo(&level.file_info, nr);
6676 LoadLevel_LoadAndInit(NULL);
6679 void LoadLevelInfoOnly(int nr)
6681 setLevelFileInfo(&level.file_info, nr);
6683 LoadLevelFromFileInfo(&level, &level.file_info, TRUE);
6686 void LoadNetworkLevel(struct NetworkLevelInfo *network_level)
6688 SetLevelSetInfo(network_level->leveldir_identifier,
6689 network_level->file_info.nr);
6691 copyLevelFileInfo(&network_level->file_info, &level.file_info);
6693 LoadLevel_LoadAndInit(network_level);
6696 static int SaveLevel_VERS(FILE *file, struct LevelInfo *level)
6700 chunk_size += putFileVersion(file, level->file_version);
6701 chunk_size += putFileVersion(file, level->game_version);
6706 static int SaveLevel_DATE(FILE *file, struct LevelInfo *level)
6710 chunk_size += putFile16BitBE(file, level->creation_date.year);
6711 chunk_size += putFile8Bit(file, level->creation_date.month);
6712 chunk_size += putFile8Bit(file, level->creation_date.day);
6717 #if ENABLE_HISTORIC_CHUNKS
6718 static void SaveLevel_HEAD(FILE *file, struct LevelInfo *level)
6722 putFile8Bit(file, level->fieldx);
6723 putFile8Bit(file, level->fieldy);
6725 putFile16BitBE(file, level->time);
6726 putFile16BitBE(file, level->gems_needed);
6728 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
6729 putFile8Bit(file, level->name[i]);
6731 for (i = 0; i < LEVEL_SCORE_ELEMENTS; i++)
6732 putFile8Bit(file, level->score[i]);
6734 for (i = 0; i < STD_ELEMENT_CONTENTS; i++)
6735 for (y = 0; y < 3; y++)
6736 for (x = 0; x < 3; x++)
6737 putFile8Bit(file, (level->encoding_16bit_yamyam ? EL_EMPTY :
6738 level->yamyam_content[i].e[x][y]));
6739 putFile8Bit(file, level->amoeba_speed);
6740 putFile8Bit(file, level->time_magic_wall);
6741 putFile8Bit(file, level->time_wheel);
6742 putFile8Bit(file, (level->encoding_16bit_amoeba ? EL_EMPTY :
6743 level->amoeba_content));
6744 putFile8Bit(file, (level->initial_player_stepsize == STEPSIZE_FAST ? 1 : 0));
6745 putFile8Bit(file, (level->initial_gravity ? 1 : 0));
6746 putFile8Bit(file, (level->encoding_16bit_field ? 1 : 0));
6747 putFile8Bit(file, (level->em_slippery_gems ? 1 : 0));
6749 putFile8Bit(file, (level->use_custom_template ? 1 : 0));
6751 putFile8Bit(file, (level->block_last_field ? 1 : 0));
6752 putFile8Bit(file, (level->sp_block_last_field ? 1 : 0));
6753 putFile32BitBE(file, level->can_move_into_acid_bits);
6754 putFile8Bit(file, level->dont_collide_with_bits);
6756 putFile8Bit(file, (level->use_spring_bug ? 1 : 0));
6757 putFile8Bit(file, (level->use_step_counter ? 1 : 0));
6759 putFile8Bit(file, (level->instant_relocation ? 1 : 0));
6760 putFile8Bit(file, (level->can_pass_to_walkable ? 1 : 0));
6761 putFile8Bit(file, (level->grow_into_diggable ? 1 : 0));
6763 putFile8Bit(file, level->game_engine_type);
6765 WriteUnusedBytesToFile(file, LEVEL_CHUNK_HEAD_UNUSED);
6769 static int SaveLevel_NAME(FILE *file, struct LevelInfo *level)
6774 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
6775 chunk_size += putFile8Bit(file, level->name[i]);
6780 static int SaveLevel_AUTH(FILE *file, struct LevelInfo *level)
6785 for (i = 0; i < MAX_LEVEL_AUTHOR_LEN; i++)
6786 chunk_size += putFile8Bit(file, level->author[i]);
6791 #if ENABLE_HISTORIC_CHUNKS
6792 static int SaveLevel_BODY(FILE *file, struct LevelInfo *level)
6797 for (y = 0; y < level->fieldy; y++)
6798 for (x = 0; x < level->fieldx; x++)
6799 if (level->encoding_16bit_field)
6800 chunk_size += putFile16BitBE(file, level->field[x][y]);
6802 chunk_size += putFile8Bit(file, level->field[x][y]);
6808 static int SaveLevel_BODY(FILE *file, struct LevelInfo *level)
6813 for (y = 0; y < level->fieldy; y++)
6814 for (x = 0; x < level->fieldx; x++)
6815 chunk_size += putFile16BitBE(file, level->field[x][y]);
6820 #if ENABLE_HISTORIC_CHUNKS
6821 static void SaveLevel_CONT(FILE *file, struct LevelInfo *level)
6825 putFile8Bit(file, EL_YAMYAM);
6826 putFile8Bit(file, level->num_yamyam_contents);
6827 putFile8Bit(file, 0);
6828 putFile8Bit(file, 0);
6830 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6831 for (y = 0; y < 3; y++)
6832 for (x = 0; x < 3; x++)
6833 if (level->encoding_16bit_field)
6834 putFile16BitBE(file, level->yamyam_content[i].e[x][y]);
6836 putFile8Bit(file, level->yamyam_content[i].e[x][y]);
6840 #if ENABLE_HISTORIC_CHUNKS
6841 static void SaveLevel_CNT2(FILE *file, struct LevelInfo *level, int element)
6844 int num_contents, content_xsize, content_ysize;
6845 int content_array[MAX_ELEMENT_CONTENTS][3][3];
6847 if (element == EL_YAMYAM)
6849 num_contents = level->num_yamyam_contents;
6853 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6854 for (y = 0; y < 3; y++)
6855 for (x = 0; x < 3; x++)
6856 content_array[i][x][y] = level->yamyam_content[i].e[x][y];
6858 else if (element == EL_BD_AMOEBA)
6864 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6865 for (y = 0; y < 3; y++)
6866 for (x = 0; x < 3; x++)
6867 content_array[i][x][y] = EL_EMPTY;
6868 content_array[0][0][0] = level->amoeba_content;
6872 // chunk header already written -- write empty chunk data
6873 WriteUnusedBytesToFile(file, LEVEL_CHUNK_CNT2_SIZE);
6875 Error(ERR_WARN, "cannot save content for element '%d'", element);
6879 putFile16BitBE(file, element);
6880 putFile8Bit(file, num_contents);
6881 putFile8Bit(file, content_xsize);
6882 putFile8Bit(file, content_ysize);
6884 WriteUnusedBytesToFile(file, LEVEL_CHUNK_CNT2_UNUSED);
6886 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6887 for (y = 0; y < 3; y++)
6888 for (x = 0; x < 3; x++)
6889 putFile16BitBE(file, content_array[i][x][y]);
6893 #if ENABLE_HISTORIC_CHUNKS
6894 static int SaveLevel_CNT3(FILE *file, struct LevelInfo *level, int element)
6896 int envelope_nr = element - EL_ENVELOPE_1;
6897 int envelope_len = strlen(level->envelope_text[envelope_nr]) + 1;
6901 chunk_size += putFile16BitBE(file, element);
6902 chunk_size += putFile16BitBE(file, envelope_len);
6903 chunk_size += putFile8Bit(file, level->envelope_xsize[envelope_nr]);
6904 chunk_size += putFile8Bit(file, level->envelope_ysize[envelope_nr]);
6906 WriteUnusedBytesToFile(file, LEVEL_CHUNK_CNT3_UNUSED);
6907 chunk_size += LEVEL_CHUNK_CNT3_UNUSED;
6909 for (i = 0; i < envelope_len; i++)
6910 chunk_size += putFile8Bit(file, level->envelope_text[envelope_nr][i]);
6916 #if ENABLE_HISTORIC_CHUNKS
6917 static void SaveLevel_CUS1(FILE *file, struct LevelInfo *level,
6918 int num_changed_custom_elements)
6922 putFile16BitBE(file, num_changed_custom_elements);
6924 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6926 int element = EL_CUSTOM_START + i;
6928 struct ElementInfo *ei = &element_info[element];
6930 if (ei->properties[EP_BITFIELD_BASE_NR] != EP_BITMASK_DEFAULT)
6932 if (check < num_changed_custom_elements)
6934 putFile16BitBE(file, element);
6935 putFile32BitBE(file, ei->properties[EP_BITFIELD_BASE_NR]);
6942 if (check != num_changed_custom_elements) // should not happen
6943 Error(ERR_WARN, "inconsistent number of custom element properties");
6947 #if ENABLE_HISTORIC_CHUNKS
6948 static void SaveLevel_CUS2(FILE *file, struct LevelInfo *level,
6949 int num_changed_custom_elements)
6953 putFile16BitBE(file, num_changed_custom_elements);
6955 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6957 int element = EL_CUSTOM_START + i;
6959 if (element_info[element].change->target_element != EL_EMPTY_SPACE)
6961 if (check < num_changed_custom_elements)
6963 putFile16BitBE(file, element);
6964 putFile16BitBE(file, element_info[element].change->target_element);
6971 if (check != num_changed_custom_elements) // should not happen
6972 Error(ERR_WARN, "inconsistent number of custom target elements");
6976 #if ENABLE_HISTORIC_CHUNKS
6977 static void SaveLevel_CUS3(FILE *file, struct LevelInfo *level,
6978 int num_changed_custom_elements)
6980 int i, j, x, y, check = 0;
6982 putFile16BitBE(file, num_changed_custom_elements);
6984 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6986 int element = EL_CUSTOM_START + i;
6987 struct ElementInfo *ei = &element_info[element];
6989 if (ei->modified_settings)
6991 if (check < num_changed_custom_elements)
6993 putFile16BitBE(file, element);
6995 for (j = 0; j < MAX_ELEMENT_NAME_LEN; j++)
6996 putFile8Bit(file, ei->description[j]);
6998 putFile32BitBE(file, ei->properties[EP_BITFIELD_BASE_NR]);
7000 // some free bytes for future properties and padding
7001 WriteUnusedBytesToFile(file, 7);
7003 putFile8Bit(file, ei->use_gfx_element);
7004 putFile16BitBE(file, ei->gfx_element_initial);
7006 putFile8Bit(file, ei->collect_score_initial);
7007 putFile8Bit(file, ei->collect_count_initial);
7009 putFile16BitBE(file, ei->push_delay_fixed);
7010 putFile16BitBE(file, ei->push_delay_random);
7011 putFile16BitBE(file, ei->move_delay_fixed);
7012 putFile16BitBE(file, ei->move_delay_random);
7014 putFile16BitBE(file, ei->move_pattern);
7015 putFile8Bit(file, ei->move_direction_initial);
7016 putFile8Bit(file, ei->move_stepsize);
7018 for (y = 0; y < 3; y++)
7019 for (x = 0; x < 3; x++)
7020 putFile16BitBE(file, ei->content.e[x][y]);
7022 putFile32BitBE(file, ei->change->events);
7024 putFile16BitBE(file, ei->change->target_element);
7026 putFile16BitBE(file, ei->change->delay_fixed);
7027 putFile16BitBE(file, ei->change->delay_random);
7028 putFile16BitBE(file, ei->change->delay_frames);
7030 putFile16BitBE(file, ei->change->initial_trigger_element);
7032 putFile8Bit(file, ei->change->explode);
7033 putFile8Bit(file, ei->change->use_target_content);
7034 putFile8Bit(file, ei->change->only_if_complete);
7035 putFile8Bit(file, ei->change->use_random_replace);
7037 putFile8Bit(file, ei->change->random_percentage);
7038 putFile8Bit(file, ei->change->replace_when);
7040 for (y = 0; y < 3; y++)
7041 for (x = 0; x < 3; x++)
7042 putFile16BitBE(file, ei->change->content.e[x][y]);
7044 putFile8Bit(file, ei->slippery_type);
7046 // some free bytes for future properties and padding
7047 WriteUnusedBytesToFile(file, LEVEL_CPART_CUS3_UNUSED);
7054 if (check != num_changed_custom_elements) // should not happen
7055 Error(ERR_WARN, "inconsistent number of custom element properties");
7059 #if ENABLE_HISTORIC_CHUNKS
7060 static void SaveLevel_CUS4(FILE *file, struct LevelInfo *level, int element)
7062 struct ElementInfo *ei = &element_info[element];
7065 // ---------- custom element base property values (96 bytes) ----------------
7067 putFile16BitBE(file, element);
7069 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
7070 putFile8Bit(file, ei->description[i]);
7072 putFile32BitBE(file, ei->properties[EP_BITFIELD_BASE_NR]);
7074 WriteUnusedBytesToFile(file, 4); // reserved for more base properties
7076 putFile8Bit(file, ei->num_change_pages);
7078 putFile16BitBE(file, ei->ce_value_fixed_initial);
7079 putFile16BitBE(file, ei->ce_value_random_initial);
7080 putFile8Bit(file, ei->use_last_ce_value);
7082 putFile8Bit(file, ei->use_gfx_element);
7083 putFile16BitBE(file, ei->gfx_element_initial);
7085 putFile8Bit(file, ei->collect_score_initial);
7086 putFile8Bit(file, ei->collect_count_initial);
7088 putFile8Bit(file, ei->drop_delay_fixed);
7089 putFile8Bit(file, ei->push_delay_fixed);
7090 putFile8Bit(file, ei->drop_delay_random);
7091 putFile8Bit(file, ei->push_delay_random);
7092 putFile16BitBE(file, ei->move_delay_fixed);
7093 putFile16BitBE(file, ei->move_delay_random);
7095 // bits 0 - 15 of "move_pattern" ...
7096 putFile16BitBE(file, ei->move_pattern & 0xffff);
7097 putFile8Bit(file, ei->move_direction_initial);
7098 putFile8Bit(file, ei->move_stepsize);
7100 putFile8Bit(file, ei->slippery_type);
7102 for (y = 0; y < 3; y++)
7103 for (x = 0; x < 3; x++)
7104 putFile16BitBE(file, ei->content.e[x][y]);
7106 putFile16BitBE(file, ei->move_enter_element);
7107 putFile16BitBE(file, ei->move_leave_element);
7108 putFile8Bit(file, ei->move_leave_type);
7110 // ... bits 16 - 31 of "move_pattern" (not nice, but downward compatible)
7111 putFile16BitBE(file, (ei->move_pattern >> 16) & 0xffff);
7113 putFile8Bit(file, ei->access_direction);
7115 putFile8Bit(file, ei->explosion_delay);
7116 putFile8Bit(file, ei->ignition_delay);
7117 putFile8Bit(file, ei->explosion_type);
7119 // some free bytes for future custom property values and padding
7120 WriteUnusedBytesToFile(file, 1);
7122 // ---------- change page property values (48 bytes) ------------------------
7124 for (i = 0; i < ei->num_change_pages; i++)
7126 struct ElementChangeInfo *change = &ei->change_page[i];
7127 unsigned int event_bits;
7129 // bits 0 - 31 of "has_event[]" ...
7131 for (j = 0; j < MIN(NUM_CHANGE_EVENTS, 32); j++)
7132 if (change->has_event[j])
7133 event_bits |= (1 << j);
7134 putFile32BitBE(file, event_bits);
7136 putFile16BitBE(file, change->target_element);
7138 putFile16BitBE(file, change->delay_fixed);
7139 putFile16BitBE(file, change->delay_random);
7140 putFile16BitBE(file, change->delay_frames);
7142 putFile16BitBE(file, change->initial_trigger_element);
7144 putFile8Bit(file, change->explode);
7145 putFile8Bit(file, change->use_target_content);
7146 putFile8Bit(file, change->only_if_complete);
7147 putFile8Bit(file, change->use_random_replace);
7149 putFile8Bit(file, change->random_percentage);
7150 putFile8Bit(file, change->replace_when);
7152 for (y = 0; y < 3; y++)
7153 for (x = 0; x < 3; x++)
7154 putFile16BitBE(file, change->target_content.e[x][y]);
7156 putFile8Bit(file, change->can_change);
7158 putFile8Bit(file, change->trigger_side);
7160 putFile8Bit(file, change->trigger_player);
7161 putFile8Bit(file, (change->trigger_page == CH_PAGE_ANY ? CH_PAGE_ANY_FILE :
7162 log_2(change->trigger_page)));
7164 putFile8Bit(file, change->has_action);
7165 putFile8Bit(file, change->action_type);
7166 putFile8Bit(file, change->action_mode);
7167 putFile16BitBE(file, change->action_arg);
7169 // ... bits 32 - 39 of "has_event[]" (not nice, but downward compatible)
7171 for (j = 32; j < NUM_CHANGE_EVENTS; j++)
7172 if (change->has_event[j])
7173 event_bits |= (1 << (j - 32));
7174 putFile8Bit(file, event_bits);
7179 #if ENABLE_HISTORIC_CHUNKS
7180 static void SaveLevel_GRP1(FILE *file, struct LevelInfo *level, int element)
7182 struct ElementInfo *ei = &element_info[element];
7183 struct ElementGroupInfo *group = ei->group;
7186 putFile16BitBE(file, element);
7188 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
7189 putFile8Bit(file, ei->description[i]);
7191 putFile8Bit(file, group->num_elements);
7193 putFile8Bit(file, ei->use_gfx_element);
7194 putFile16BitBE(file, ei->gfx_element_initial);
7196 putFile8Bit(file, group->choice_mode);
7198 // some free bytes for future values and padding
7199 WriteUnusedBytesToFile(file, 3);
7201 for (i = 0; i < MAX_ELEMENTS_IN_GROUP; i++)
7202 putFile16BitBE(file, group->element[i]);
7206 static int SaveLevel_MicroChunk(FILE *file, struct LevelFileConfigInfo *entry,
7207 boolean write_element)
7209 int save_type = entry->save_type;
7210 int data_type = entry->data_type;
7211 int conf_type = entry->conf_type;
7212 int byte_mask = conf_type & CONF_MASK_BYTES;
7213 int element = entry->element;
7214 int default_value = entry->default_value;
7216 boolean modified = FALSE;
7218 if (byte_mask != CONF_MASK_MULTI_BYTES)
7220 void *value_ptr = entry->value;
7221 int value = (data_type == TYPE_BOOLEAN ? *(boolean *)value_ptr :
7224 // check if any settings have been modified before saving them
7225 if (value != default_value)
7228 // do not save if explicitly told or if unmodified default settings
7229 if ((save_type == SAVE_CONF_NEVER) ||
7230 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
7234 num_bytes += putFile16BitBE(file, element);
7236 num_bytes += putFile8Bit(file, conf_type);
7237 num_bytes += (byte_mask == CONF_MASK_1_BYTE ? putFile8Bit (file, value) :
7238 byte_mask == CONF_MASK_2_BYTE ? putFile16BitBE(file, value) :
7239 byte_mask == CONF_MASK_4_BYTE ? putFile32BitBE(file, value) :
7242 else if (data_type == TYPE_STRING)
7244 char *default_string = entry->default_string;
7245 char *string = (char *)(entry->value);
7246 int string_length = strlen(string);
7249 // check if any settings have been modified before saving them
7250 if (!strEqual(string, default_string))
7253 // do not save if explicitly told or if unmodified default settings
7254 if ((save_type == SAVE_CONF_NEVER) ||
7255 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
7259 num_bytes += putFile16BitBE(file, element);
7261 num_bytes += putFile8Bit(file, conf_type);
7262 num_bytes += putFile16BitBE(file, string_length);
7264 for (i = 0; i < string_length; i++)
7265 num_bytes += putFile8Bit(file, string[i]);
7267 else if (data_type == TYPE_ELEMENT_LIST)
7269 int *element_array = (int *)(entry->value);
7270 int num_elements = *(int *)(entry->num_entities);
7273 // check if any settings have been modified before saving them
7274 for (i = 0; i < num_elements; i++)
7275 if (element_array[i] != default_value)
7278 // do not save if explicitly told or if unmodified default settings
7279 if ((save_type == SAVE_CONF_NEVER) ||
7280 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
7284 num_bytes += putFile16BitBE(file, element);
7286 num_bytes += putFile8Bit(file, conf_type);
7287 num_bytes += putFile16BitBE(file, num_elements * CONF_ELEMENT_NUM_BYTES);
7289 for (i = 0; i < num_elements; i++)
7290 num_bytes += putFile16BitBE(file, element_array[i]);
7292 else if (data_type == TYPE_CONTENT_LIST)
7294 struct Content *content = (struct Content *)(entry->value);
7295 int num_contents = *(int *)(entry->num_entities);
7298 // check if any settings have been modified before saving them
7299 for (i = 0; i < num_contents; i++)
7300 for (y = 0; y < 3; y++)
7301 for (x = 0; x < 3; x++)
7302 if (content[i].e[x][y] != default_value)
7305 // do not save if explicitly told or if unmodified default settings
7306 if ((save_type == SAVE_CONF_NEVER) ||
7307 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
7311 num_bytes += putFile16BitBE(file, element);
7313 num_bytes += putFile8Bit(file, conf_type);
7314 num_bytes += putFile16BitBE(file, num_contents * CONF_CONTENT_NUM_BYTES);
7316 for (i = 0; i < num_contents; i++)
7317 for (y = 0; y < 3; y++)
7318 for (x = 0; x < 3; x++)
7319 num_bytes += putFile16BitBE(file, content[i].e[x][y]);
7325 static int SaveLevel_INFO(FILE *file, struct LevelInfo *level)
7330 li = *level; // copy level data into temporary buffer
7332 for (i = 0; chunk_config_INFO[i].data_type != -1; i++)
7333 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_INFO[i], FALSE);
7338 static int SaveLevel_ELEM(FILE *file, struct LevelInfo *level)
7343 li = *level; // copy level data into temporary buffer
7345 for (i = 0; chunk_config_ELEM[i].data_type != -1; i++)
7346 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_ELEM[i], TRUE);
7351 static int SaveLevel_NOTE(FILE *file, struct LevelInfo *level, int element)
7353 int envelope_nr = element - EL_ENVELOPE_1;
7357 chunk_size += putFile16BitBE(file, element);
7359 // copy envelope data into temporary buffer
7360 xx_envelope = level->envelope[envelope_nr];
7362 for (i = 0; chunk_config_NOTE[i].data_type != -1; i++)
7363 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_NOTE[i], FALSE);
7368 static int SaveLevel_CUSX(FILE *file, struct LevelInfo *level, int element)
7370 struct ElementInfo *ei = &element_info[element];
7374 chunk_size += putFile16BitBE(file, element);
7376 xx_ei = *ei; // copy element data into temporary buffer
7378 // set default description string for this specific element
7379 strcpy(xx_default_description, getDefaultElementDescription(ei));
7381 for (i = 0; chunk_config_CUSX_base[i].data_type != -1; i++)
7382 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_CUSX_base[i], FALSE);
7384 for (i = 0; i < ei->num_change_pages; i++)
7386 struct ElementChangeInfo *change = &ei->change_page[i];
7388 xx_current_change_page = i;
7390 xx_change = *change; // copy change data into temporary buffer
7393 setEventBitsFromEventFlags(change);
7395 for (j = 0; chunk_config_CUSX_change[j].data_type != -1; j++)
7396 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_CUSX_change[j],
7403 static int SaveLevel_GRPX(FILE *file, struct LevelInfo *level, int element)
7405 struct ElementInfo *ei = &element_info[element];
7406 struct ElementGroupInfo *group = ei->group;
7410 chunk_size += putFile16BitBE(file, element);
7412 xx_ei = *ei; // copy element data into temporary buffer
7413 xx_group = *group; // copy group data into temporary buffer
7415 // set default description string for this specific element
7416 strcpy(xx_default_description, getDefaultElementDescription(ei));
7418 for (i = 0; chunk_config_GRPX[i].data_type != -1; i++)
7419 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_GRPX[i], FALSE);
7424 static void SaveLevelFromFilename(struct LevelInfo *level, char *filename,
7425 boolean save_as_template)
7431 if (!(file = fopen(filename, MODE_WRITE)))
7433 Error(ERR_WARN, "cannot save level file '%s'", filename);
7437 level->file_version = FILE_VERSION_ACTUAL;
7438 level->game_version = GAME_VERSION_ACTUAL;
7440 level->creation_date = getCurrentDate();
7442 putFileChunkBE(file, "RND1", CHUNK_SIZE_UNDEFINED);
7443 putFileChunkBE(file, "CAVE", CHUNK_SIZE_NONE);
7445 chunk_size = SaveLevel_VERS(NULL, level);
7446 putFileChunkBE(file, "VERS", chunk_size);
7447 SaveLevel_VERS(file, level);
7449 chunk_size = SaveLevel_DATE(NULL, level);
7450 putFileChunkBE(file, "DATE", chunk_size);
7451 SaveLevel_DATE(file, level);
7453 chunk_size = SaveLevel_NAME(NULL, level);
7454 putFileChunkBE(file, "NAME", chunk_size);
7455 SaveLevel_NAME(file, level);
7457 chunk_size = SaveLevel_AUTH(NULL, level);
7458 putFileChunkBE(file, "AUTH", chunk_size);
7459 SaveLevel_AUTH(file, level);
7461 chunk_size = SaveLevel_INFO(NULL, level);
7462 putFileChunkBE(file, "INFO", chunk_size);
7463 SaveLevel_INFO(file, level);
7465 chunk_size = SaveLevel_BODY(NULL, level);
7466 putFileChunkBE(file, "BODY", chunk_size);
7467 SaveLevel_BODY(file, level);
7469 chunk_size = SaveLevel_ELEM(NULL, level);
7470 if (chunk_size > LEVEL_CHUNK_ELEM_UNCHANGED) // save if changed
7472 putFileChunkBE(file, "ELEM", chunk_size);
7473 SaveLevel_ELEM(file, level);
7476 for (i = 0; i < NUM_ENVELOPES; i++)
7478 int element = EL_ENVELOPE_1 + i;
7480 chunk_size = SaveLevel_NOTE(NULL, level, element);
7481 if (chunk_size > LEVEL_CHUNK_NOTE_UNCHANGED) // save if changed
7483 putFileChunkBE(file, "NOTE", chunk_size);
7484 SaveLevel_NOTE(file, level, element);
7488 // if not using template level, check for non-default custom/group elements
7489 if (!level->use_custom_template || save_as_template)
7491 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
7493 int element = EL_CUSTOM_START + i;
7495 chunk_size = SaveLevel_CUSX(NULL, level, element);
7496 if (chunk_size > LEVEL_CHUNK_CUSX_UNCHANGED) // save if changed
7498 putFileChunkBE(file, "CUSX", chunk_size);
7499 SaveLevel_CUSX(file, level, element);
7503 for (i = 0; i < NUM_GROUP_ELEMENTS; i++)
7505 int element = EL_GROUP_START + i;
7507 chunk_size = SaveLevel_GRPX(NULL, level, element);
7508 if (chunk_size > LEVEL_CHUNK_GRPX_UNCHANGED) // save if changed
7510 putFileChunkBE(file, "GRPX", chunk_size);
7511 SaveLevel_GRPX(file, level, element);
7518 SetFilePermissions(filename, PERMS_PRIVATE);
7521 void SaveLevel(int nr)
7523 char *filename = getDefaultLevelFilename(nr);
7525 SaveLevelFromFilename(&level, filename, FALSE);
7528 void SaveLevelTemplate(void)
7530 char *filename = getLocalLevelTemplateFilename();
7532 SaveLevelFromFilename(&level, filename, TRUE);
7535 boolean SaveLevelChecked(int nr)
7537 char *filename = getDefaultLevelFilename(nr);
7538 boolean new_level = !fileExists(filename);
7539 boolean level_saved = FALSE;
7541 if (new_level || Request("Save this level and kill the old?", REQ_ASK))
7546 Request("Level saved!", REQ_CONFIRM);
7554 void DumpLevel(struct LevelInfo *level)
7556 if (level->no_level_file || level->no_valid_file)
7558 Error(ERR_WARN, "cannot dump -- no valid level file found");
7564 Print("Level xxx (file version %08d, game version %08d)\n",
7565 level->file_version, level->game_version);
7568 Print("Level author: '%s'\n", level->author);
7569 Print("Level title: '%s'\n", level->name);
7571 Print("Playfield size: %d x %d\n", level->fieldx, level->fieldy);
7573 Print("Level time: %d seconds\n", level->time);
7574 Print("Gems needed: %d\n", level->gems_needed);
7576 Print("Time for magic wall: %d seconds\n", level->time_magic_wall);
7577 Print("Time for wheel: %d seconds\n", level->time_wheel);
7578 Print("Time for light: %d seconds\n", level->time_light);
7579 Print("Time for timegate: %d seconds\n", level->time_timegate);
7581 Print("Amoeba speed: %d\n", level->amoeba_speed);
7584 Print("EM style slippery gems: %s\n", (level->em_slippery_gems ? "yes" : "no"));
7585 Print("Player blocks last field: %s\n", (level->block_last_field ? "yes" : "no"));
7586 Print("SP player blocks last field: %s\n", (level->sp_block_last_field ? "yes" : "no"));
7587 Print("use spring bug: %s\n", (level->use_spring_bug ? "yes" : "no"));
7588 Print("use step counter: %s\n", (level->use_step_counter ? "yes" : "no"));
7594 // ============================================================================
7595 // tape file functions
7596 // ============================================================================
7598 static void setTapeInfoToDefaults(void)
7602 // always start with reliable default values (empty tape)
7605 // default values (also for pre-1.2 tapes) with only the first player
7606 tape.player_participates[0] = TRUE;
7607 for (i = 1; i < MAX_PLAYERS; i++)
7608 tape.player_participates[i] = FALSE;
7610 // at least one (default: the first) player participates in every tape
7611 tape.num_participating_players = 1;
7613 tape.level_nr = level_nr;
7615 tape.changed = FALSE;
7617 tape.recording = FALSE;
7618 tape.playing = FALSE;
7619 tape.pausing = FALSE;
7621 tape.no_valid_file = FALSE;
7624 static int getTapePosSize(struct TapeInfo *tape)
7626 int tape_pos_size = 0;
7628 if (tape->use_key_actions)
7629 tape_pos_size += tape->num_participating_players;
7631 if (tape->use_mouse_actions)
7632 tape_pos_size += 3; // x and y position and mouse button mask
7634 tape_pos_size += 1; // tape action delay value
7636 return tape_pos_size;
7639 static void setTapeActionFlags(struct TapeInfo *tape, int value)
7641 tape->use_key_actions = FALSE;
7642 tape->use_mouse_actions = FALSE;
7644 if (value != TAPE_USE_MOUSE_ACTIONS_ONLY)
7645 tape->use_key_actions = TRUE;
7647 if (value != TAPE_USE_KEY_ACTIONS_ONLY)
7648 tape->use_mouse_actions = TRUE;
7651 static int getTapeActionValue(struct TapeInfo *tape)
7653 return (tape->use_key_actions &&
7654 tape->use_mouse_actions ? TAPE_USE_KEY_AND_MOUSE_ACTIONS :
7655 tape->use_key_actions ? TAPE_USE_KEY_ACTIONS_ONLY :
7656 tape->use_mouse_actions ? TAPE_USE_MOUSE_ACTIONS_ONLY :
7657 TAPE_ACTIONS_DEFAULT);
7660 static int LoadTape_VERS(File *file, int chunk_size, struct TapeInfo *tape)
7662 tape->file_version = getFileVersion(file);
7663 tape->game_version = getFileVersion(file);
7668 static int LoadTape_HEAD(File *file, int chunk_size, struct TapeInfo *tape)
7672 tape->random_seed = getFile32BitBE(file);
7673 tape->date = getFile32BitBE(file);
7674 tape->length = getFile32BitBE(file);
7676 // read header fields that are new since version 1.2
7677 if (tape->file_version >= FILE_VERSION_1_2)
7679 byte store_participating_players = getFile8Bit(file);
7682 // since version 1.2, tapes store which players participate in the tape
7683 tape->num_participating_players = 0;
7684 for (i = 0; i < MAX_PLAYERS; i++)
7686 tape->player_participates[i] = FALSE;
7688 if (store_participating_players & (1 << i))
7690 tape->player_participates[i] = TRUE;
7691 tape->num_participating_players++;
7695 setTapeActionFlags(tape, getFile8Bit(file));
7697 ReadUnusedBytesFromFile(file, TAPE_CHUNK_HEAD_UNUSED);
7699 engine_version = getFileVersion(file);
7700 if (engine_version > 0)
7701 tape->engine_version = engine_version;
7703 tape->engine_version = tape->game_version;
7709 static int LoadTape_INFO(File *file, int chunk_size, struct TapeInfo *tape)
7711 int level_identifier_size;
7714 level_identifier_size = getFile16BitBE(file);
7716 tape->level_identifier =
7717 checked_realloc(tape->level_identifier, level_identifier_size);
7719 for (i = 0; i < level_identifier_size; i++)
7720 tape->level_identifier[i] = getFile8Bit(file);
7722 tape->level_nr = getFile16BitBE(file);
7724 chunk_size = 2 + level_identifier_size + 2;
7729 static int LoadTape_BODY(File *file, int chunk_size, struct TapeInfo *tape)
7732 int tape_pos_size = getTapePosSize(tape);
7733 int chunk_size_expected = tape_pos_size * tape->length;
7735 if (chunk_size_expected != chunk_size)
7737 ReadUnusedBytesFromFile(file, chunk_size);
7738 return chunk_size_expected;
7741 for (i = 0; i < tape->length; i++)
7743 if (i >= MAX_TAPE_LEN)
7745 Error(ERR_WARN, "tape truncated -- size exceeds maximum tape size %d",
7748 // tape too large; read and ignore remaining tape data from this chunk
7749 for (;i < tape->length; i++)
7750 ReadUnusedBytesFromFile(file, tape_pos_size);
7755 if (tape->use_key_actions)
7757 for (j = 0; j < MAX_PLAYERS; j++)
7759 tape->pos[i].action[j] = MV_NONE;
7761 if (tape->player_participates[j])
7762 tape->pos[i].action[j] = getFile8Bit(file);
7766 if (tape->use_mouse_actions)
7768 tape->pos[i].action[TAPE_ACTION_LX] = getFile8Bit(file);
7769 tape->pos[i].action[TAPE_ACTION_LY] = getFile8Bit(file);
7770 tape->pos[i].action[TAPE_ACTION_BUTTON] = getFile8Bit(file);
7773 tape->pos[i].delay = getFile8Bit(file);
7775 if (tape->file_version == FILE_VERSION_1_0)
7777 // eliminate possible diagonal moves in old tapes
7778 // this is only for backward compatibility
7780 byte joy_dir[4] = { JOY_LEFT, JOY_RIGHT, JOY_UP, JOY_DOWN };
7781 byte action = tape->pos[i].action[0];
7782 int k, num_moves = 0;
7784 for (k = 0; k<4; k++)
7786 if (action & joy_dir[k])
7788 tape->pos[i + num_moves].action[0] = joy_dir[k];
7790 tape->pos[i + num_moves].delay = 0;
7799 tape->length += num_moves;
7802 else if (tape->file_version < FILE_VERSION_2_0)
7804 // convert pre-2.0 tapes to new tape format
7806 if (tape->pos[i].delay > 1)
7809 tape->pos[i + 1] = tape->pos[i];
7810 tape->pos[i + 1].delay = 1;
7813 for (j = 0; j < MAX_PLAYERS; j++)
7814 tape->pos[i].action[j] = MV_NONE;
7815 tape->pos[i].delay--;
7822 if (checkEndOfFile(file))
7826 if (i != tape->length)
7827 chunk_size = tape_pos_size * i;
7832 static void LoadTape_SokobanSolution(char *filename)
7835 int move_delay = TILESIZE / level.initial_player_stepsize[0];
7837 if (!(file = openFile(filename, MODE_READ)))
7839 tape.no_valid_file = TRUE;
7844 while (!checkEndOfFile(file))
7846 unsigned char c = getByteFromFile(file);
7848 if (checkEndOfFile(file))
7855 tape.pos[tape.length].action[0] = MV_UP;
7856 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
7862 tape.pos[tape.length].action[0] = MV_DOWN;
7863 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
7869 tape.pos[tape.length].action[0] = MV_LEFT;
7870 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
7876 tape.pos[tape.length].action[0] = MV_RIGHT;
7877 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
7885 // ignore white-space characters
7889 tape.no_valid_file = TRUE;
7891 Error(ERR_WARN, "unsupported Sokoban solution file '%s' ['%d']", filename, c);
7899 if (tape.no_valid_file)
7902 tape.length_frames = GetTapeLengthFrames();
7903 tape.length_seconds = GetTapeLengthSeconds();
7906 void LoadTapeFromFilename(char *filename)
7908 char cookie[MAX_LINE_LEN];
7909 char chunk_name[CHUNK_ID_LEN + 1];
7913 // always start with reliable default values
7914 setTapeInfoToDefaults();
7916 if (strSuffix(filename, ".sln"))
7918 LoadTape_SokobanSolution(filename);
7923 if (!(file = openFile(filename, MODE_READ)))
7925 tape.no_valid_file = TRUE;
7930 getFileChunkBE(file, chunk_name, NULL);
7931 if (strEqual(chunk_name, "RND1"))
7933 getFile32BitBE(file); // not used
7935 getFileChunkBE(file, chunk_name, NULL);
7936 if (!strEqual(chunk_name, "TAPE"))
7938 tape.no_valid_file = TRUE;
7940 Error(ERR_WARN, "unknown format of tape file '%s'", filename);
7947 else // check for pre-2.0 file format with cookie string
7949 strcpy(cookie, chunk_name);
7950 if (getStringFromFile(file, &cookie[4], MAX_LINE_LEN - 4) == NULL)
7952 if (strlen(cookie) > 0 && cookie[strlen(cookie) - 1] == '\n')
7953 cookie[strlen(cookie) - 1] = '\0';
7955 if (!checkCookieString(cookie, TAPE_COOKIE_TMPL))
7957 tape.no_valid_file = TRUE;
7959 Error(ERR_WARN, "unknown format of tape file '%s'", filename);
7966 if ((tape.file_version = getFileVersionFromCookieString(cookie)) == -1)
7968 tape.no_valid_file = TRUE;
7970 Error(ERR_WARN, "unsupported version of tape file '%s'", filename);
7977 // pre-2.0 tape files have no game version, so use file version here
7978 tape.game_version = tape.file_version;
7981 if (tape.file_version < FILE_VERSION_1_2)
7983 // tape files from versions before 1.2.0 without chunk structure
7984 LoadTape_HEAD(file, TAPE_CHUNK_HEAD_SIZE, &tape);
7985 LoadTape_BODY(file, 2 * tape.length, &tape);
7993 int (*loader)(File *, int, struct TapeInfo *);
7997 { "VERS", TAPE_CHUNK_VERS_SIZE, LoadTape_VERS },
7998 { "HEAD", TAPE_CHUNK_HEAD_SIZE, LoadTape_HEAD },
7999 { "INFO", -1, LoadTape_INFO },
8000 { "BODY", -1, LoadTape_BODY },
8004 while (getFileChunkBE(file, chunk_name, &chunk_size))
8008 while (chunk_info[i].name != NULL &&
8009 !strEqual(chunk_name, chunk_info[i].name))
8012 if (chunk_info[i].name == NULL)
8014 Error(ERR_WARN, "unknown chunk '%s' in tape file '%s'",
8015 chunk_name, filename);
8016 ReadUnusedBytesFromFile(file, chunk_size);
8018 else if (chunk_info[i].size != -1 &&
8019 chunk_info[i].size != chunk_size)
8021 Error(ERR_WARN, "wrong size (%d) of chunk '%s' in tape file '%s'",
8022 chunk_size, chunk_name, filename);
8023 ReadUnusedBytesFromFile(file, chunk_size);
8027 // call function to load this tape chunk
8028 int chunk_size_expected =
8029 (chunk_info[i].loader)(file, chunk_size, &tape);
8031 // the size of some chunks cannot be checked before reading other
8032 // chunks first (like "HEAD" and "BODY") that contain some header
8033 // information, so check them here
8034 if (chunk_size_expected != chunk_size)
8036 Error(ERR_WARN, "wrong size (%d) of chunk '%s' in tape file '%s'",
8037 chunk_size, chunk_name, filename);
8045 tape.length_frames = GetTapeLengthFrames();
8046 tape.length_seconds = GetTapeLengthSeconds();
8049 printf("::: tape file version: %d\n", tape.file_version);
8050 printf("::: tape game version: %d\n", tape.game_version);
8051 printf("::: tape engine version: %d\n", tape.engine_version);
8055 void LoadTape(int nr)
8057 char *filename = getTapeFilename(nr);
8059 LoadTapeFromFilename(filename);
8062 void LoadSolutionTape(int nr)
8064 char *filename = getSolutionTapeFilename(nr);
8066 LoadTapeFromFilename(filename);
8068 if (TAPE_IS_EMPTY(tape) &&
8069 level.game_engine_type == GAME_ENGINE_TYPE_SP &&
8070 level.native_sp_level->demo.is_available)
8071 CopyNativeTape_SP_to_RND(&level);
8074 static void SaveTape_VERS(FILE *file, struct TapeInfo *tape)
8076 putFileVersion(file, tape->file_version);
8077 putFileVersion(file, tape->game_version);
8080 static void SaveTape_HEAD(FILE *file, struct TapeInfo *tape)
8083 byte store_participating_players = 0;
8085 // set bits for participating players for compact storage
8086 for (i = 0; i < MAX_PLAYERS; i++)
8087 if (tape->player_participates[i])
8088 store_participating_players |= (1 << i);
8090 putFile32BitBE(file, tape->random_seed);
8091 putFile32BitBE(file, tape->date);
8092 putFile32BitBE(file, tape->length);
8094 putFile8Bit(file, store_participating_players);
8096 putFile8Bit(file, getTapeActionValue(tape));
8098 // unused bytes not at the end here for 4-byte alignment of engine_version
8099 WriteUnusedBytesToFile(file, TAPE_CHUNK_HEAD_UNUSED);
8101 putFileVersion(file, tape->engine_version);
8104 static void SaveTape_INFO(FILE *file, struct TapeInfo *tape)
8106 int level_identifier_size = strlen(tape->level_identifier) + 1;
8109 putFile16BitBE(file, level_identifier_size);
8111 for (i = 0; i < level_identifier_size; i++)
8112 putFile8Bit(file, tape->level_identifier[i]);
8114 putFile16BitBE(file, tape->level_nr);
8117 static void SaveTape_BODY(FILE *file, struct TapeInfo *tape)
8121 for (i = 0; i < tape->length; i++)
8123 if (tape->use_key_actions)
8125 for (j = 0; j < MAX_PLAYERS; j++)
8126 if (tape->player_participates[j])
8127 putFile8Bit(file, tape->pos[i].action[j]);
8130 if (tape->use_mouse_actions)
8132 putFile8Bit(file, tape->pos[i].action[TAPE_ACTION_LX]);
8133 putFile8Bit(file, tape->pos[i].action[TAPE_ACTION_LY]);
8134 putFile8Bit(file, tape->pos[i].action[TAPE_ACTION_BUTTON]);
8137 putFile8Bit(file, tape->pos[i].delay);
8141 void SaveTape(int nr)
8143 char *filename = getTapeFilename(nr);
8146 int info_chunk_size;
8147 int body_chunk_size;
8150 InitTapeDirectory(leveldir_current->subdir);
8152 if (!(file = fopen(filename, MODE_WRITE)))
8154 Error(ERR_WARN, "cannot save level recording file '%s'", filename);
8158 tape.file_version = FILE_VERSION_ACTUAL;
8159 tape.game_version = GAME_VERSION_ACTUAL;
8161 tape.num_participating_players = 0;
8163 // count number of participating players
8164 for (i = 0; i < MAX_PLAYERS; i++)
8165 if (tape.player_participates[i])
8166 tape.num_participating_players++;
8168 tape_pos_size = getTapePosSize(&tape);
8170 info_chunk_size = 2 + (strlen(tape.level_identifier) + 1) + 2;
8171 body_chunk_size = tape_pos_size * tape.length;
8173 putFileChunkBE(file, "RND1", CHUNK_SIZE_UNDEFINED);
8174 putFileChunkBE(file, "TAPE", CHUNK_SIZE_NONE);
8176 putFileChunkBE(file, "VERS", TAPE_CHUNK_VERS_SIZE);
8177 SaveTape_VERS(file, &tape);
8179 putFileChunkBE(file, "HEAD", TAPE_CHUNK_HEAD_SIZE);
8180 SaveTape_HEAD(file, &tape);
8182 putFileChunkBE(file, "INFO", info_chunk_size);
8183 SaveTape_INFO(file, &tape);
8185 putFileChunkBE(file, "BODY", body_chunk_size);
8186 SaveTape_BODY(file, &tape);
8190 SetFilePermissions(filename, PERMS_PRIVATE);
8192 tape.changed = FALSE;
8195 static boolean SaveTapeCheckedExt(int nr, char *msg_replace, char *msg_saved,
8196 unsigned int req_state_added)
8198 char *filename = getTapeFilename(nr);
8199 boolean new_tape = !fileExists(filename);
8200 boolean tape_saved = FALSE;
8202 if (new_tape || Request(msg_replace, REQ_ASK | req_state_added))
8207 Request(msg_saved, REQ_CONFIRM | req_state_added);
8215 boolean SaveTapeChecked(int nr)
8217 return SaveTapeCheckedExt(nr, "Replace old tape?", "Tape saved!", 0);
8220 boolean SaveTapeChecked_LevelSolved(int nr)
8222 return SaveTapeCheckedExt(nr, "Level solved! Replace old tape?",
8223 "Level solved! Tape saved!", REQ_STAY_OPEN);
8226 void DumpTape(struct TapeInfo *tape)
8228 int tape_frame_counter;
8231 if (tape->no_valid_file)
8233 Error(ERR_WARN, "cannot dump -- no valid tape file found");
8239 Print("Tape of Level %03d (file version %08d, game version %08d)\n",
8240 tape->level_nr, tape->file_version, tape->game_version);
8241 Print(" (effective engine version %08d)\n",
8242 tape->engine_version);
8243 Print("Level series identifier: '%s'\n", tape->level_identifier);
8246 tape_frame_counter = 0;
8248 for (i = 0; i < tape->length; i++)
8250 if (i >= MAX_TAPE_LEN)
8255 for (j = 0; j < MAX_PLAYERS; j++)
8257 if (tape->player_participates[j])
8259 int action = tape->pos[i].action[j];
8261 Print("%d:%02x ", j, action);
8262 Print("[%c%c%c%c|%c%c] - ",
8263 (action & JOY_LEFT ? '<' : ' '),
8264 (action & JOY_RIGHT ? '>' : ' '),
8265 (action & JOY_UP ? '^' : ' '),
8266 (action & JOY_DOWN ? 'v' : ' '),
8267 (action & JOY_BUTTON_1 ? '1' : ' '),
8268 (action & JOY_BUTTON_2 ? '2' : ' '));
8272 Print("(%03d) ", tape->pos[i].delay);
8273 Print("[%05d]\n", tape_frame_counter);
8275 tape_frame_counter += tape->pos[i].delay;
8282 // ============================================================================
8283 // score file functions
8284 // ============================================================================
8286 void LoadScore(int nr)
8289 char *filename = getScoreFilename(nr);
8290 char cookie[MAX_LINE_LEN];
8291 char line[MAX_LINE_LEN];
8295 // always start with reliable default values
8296 for (i = 0; i < MAX_SCORE_ENTRIES; i++)
8298 strcpy(highscore[i].Name, EMPTY_PLAYER_NAME);
8299 highscore[i].Score = 0;
8302 if (!(file = fopen(filename, MODE_READ)))
8305 // check file identifier
8306 if (fgets(cookie, MAX_LINE_LEN, file) == NULL)
8308 if (strlen(cookie) > 0 && cookie[strlen(cookie) - 1] == '\n')
8309 cookie[strlen(cookie) - 1] = '\0';
8311 if (!checkCookieString(cookie, SCORE_COOKIE))
8313 Error(ERR_WARN, "unknown format of score file '%s'", filename);
8318 for (i = 0; i < MAX_SCORE_ENTRIES; i++)
8320 if (fscanf(file, "%d", &highscore[i].Score) == EOF)
8321 Error(ERR_WARN, "fscanf() failed; %s", strerror(errno));
8322 if (fgets(line, MAX_LINE_LEN, file) == NULL)
8325 if (strlen(line) > 0 && line[strlen(line) - 1] == '\n')
8326 line[strlen(line) - 1] = '\0';
8328 for (line_ptr = line; *line_ptr; line_ptr++)
8330 if (*line_ptr != ' ' && *line_ptr != '\t' && *line_ptr != '\0')
8332 strncpy(highscore[i].Name, line_ptr, MAX_PLAYER_NAME_LEN);
8333 highscore[i].Name[MAX_PLAYER_NAME_LEN] = '\0';
8342 void SaveScore(int nr)
8345 int permissions = (program.global_scores ? PERMS_PUBLIC : PERMS_PRIVATE);
8346 char *filename = getScoreFilename(nr);
8349 // used instead of "leveldir_current->subdir" (for network games)
8350 InitScoreDirectory(levelset.identifier);
8352 if (!(file = fopen(filename, MODE_WRITE)))
8354 Error(ERR_WARN, "cannot save score for level %d", nr);
8358 fprintf(file, "%s\n\n", SCORE_COOKIE);
8360 for (i = 0; i < MAX_SCORE_ENTRIES; i++)
8361 fprintf(file, "%d %s\n", highscore[i].Score, highscore[i].Name);
8365 SetFilePermissions(filename, permissions);
8369 // ============================================================================
8370 // setup file functions
8371 // ============================================================================
8373 #define TOKEN_STR_PLAYER_PREFIX "player_"
8376 static struct TokenInfo global_setup_tokens[] =
8380 &setup.player_name, "player_name"
8384 &setup.sound, "sound"
8388 &setup.sound_loops, "repeating_sound_loops"
8392 &setup.sound_music, "background_music"
8396 &setup.sound_simple, "simple_sound_effects"
8400 &setup.toons, "toons"
8404 &setup.scroll_delay, "scroll_delay"
8408 &setup.forced_scroll_delay, "forced_scroll_delay"
8412 &setup.scroll_delay_value, "scroll_delay_value"
8416 &setup.engine_snapshot_mode, "engine_snapshot_mode"
8420 &setup.engine_snapshot_memory, "engine_snapshot_memory"
8424 &setup.fade_screens, "fade_screens"
8428 &setup.autorecord, "automatic_tape_recording"
8432 &setup.show_titlescreen, "show_titlescreen"
8436 &setup.quick_doors, "quick_doors"
8440 &setup.team_mode, "team_mode"
8444 &setup.handicap, "handicap"
8448 &setup.skip_levels, "skip_levels"
8452 &setup.increment_levels, "increment_levels"
8456 &setup.auto_play_next_level, "auto_play_next_level"
8460 &setup.skip_scores_after_game, "skip_scores_after_game"
8464 &setup.time_limit, "time_limit"
8468 &setup.fullscreen, "fullscreen"
8472 &setup.window_scaling_percent, "window_scaling_percent"
8476 &setup.window_scaling_quality, "window_scaling_quality"
8480 &setup.screen_rendering_mode, "screen_rendering_mode"
8484 &setup.vsync_mode, "vsync_mode"
8488 &setup.ask_on_escape, "ask_on_escape"
8492 &setup.ask_on_escape_editor, "ask_on_escape_editor"
8496 &setup.ask_on_game_over, "ask_on_game_over"
8500 &setup.quick_switch, "quick_player_switch"
8504 &setup.input_on_focus, "input_on_focus"
8508 &setup.prefer_aga_graphics, "prefer_aga_graphics"
8512 &setup.prefer_lowpass_sounds, "prefer_lowpass_sounds"
8516 &setup.game_speed_extended, "game_speed_extended"
8520 &setup.game_frame_delay, "game_frame_delay"
8524 &setup.sp_show_border_elements, "sp_show_border_elements"
8528 &setup.small_game_graphics, "small_game_graphics"
8532 &setup.show_snapshot_buttons, "show_snapshot_buttons"
8536 &setup.graphics_set, "graphics_set"
8540 &setup.sounds_set, "sounds_set"
8544 &setup.music_set, "music_set"
8548 &setup.override_level_graphics, "override_level_graphics"
8552 &setup.override_level_sounds, "override_level_sounds"
8556 &setup.override_level_music, "override_level_music"
8560 &setup.volume_simple, "volume_simple"
8564 &setup.volume_loops, "volume_loops"
8568 &setup.volume_music, "volume_music"
8572 &setup.network_mode, "network_mode"
8576 &setup.network_player_nr, "network_player"
8580 &setup.network_server_hostname, "network_server_hostname"
8584 &setup.touch.control_type, "touch.control_type"
8588 &setup.touch.move_distance, "touch.move_distance"
8592 &setup.touch.drop_distance, "touch.drop_distance"
8596 &setup.touch.transparency, "touch.transparency"
8600 &setup.touch.draw_outlined, "touch.draw_outlined"
8604 &setup.touch.draw_pressed, "touch.draw_pressed"
8608 &setup.touch.grid_xsize[0], "touch.virtual_buttons.0.xsize"
8612 &setup.touch.grid_ysize[0], "touch.virtual_buttons.0.ysize"
8616 &setup.touch.grid_xsize[1], "touch.virtual_buttons.1.xsize"
8620 &setup.touch.grid_ysize[1], "touch.virtual_buttons.1.ysize"
8624 static struct TokenInfo auto_setup_tokens[] =
8628 &setup.auto_setup.editor_zoom_tilesize, "editor.zoom_tilesize"
8632 static struct TokenInfo editor_setup_tokens[] =
8636 &setup.editor.el_classic, "editor.el_classic"
8640 &setup.editor.el_custom, "editor.el_custom"
8644 &setup.editor.el_user_defined, "editor.el_user_defined"
8648 &setup.editor.el_dynamic, "editor.el_dynamic"
8652 &setup.editor.el_headlines, "editor.el_headlines"
8656 &setup.editor.show_element_token, "editor.show_element_token"
8660 static struct TokenInfo editor_cascade_setup_tokens[] =
8664 &setup.editor_cascade.el_bd, "editor.cascade.el_bd"
8668 &setup.editor_cascade.el_em, "editor.cascade.el_em"
8672 &setup.editor_cascade.el_emc, "editor.cascade.el_emc"
8676 &setup.editor_cascade.el_rnd, "editor.cascade.el_rnd"
8680 &setup.editor_cascade.el_sb, "editor.cascade.el_sb"
8684 &setup.editor_cascade.el_sp, "editor.cascade.el_sp"
8688 &setup.editor_cascade.el_dc, "editor.cascade.el_dc"
8692 &setup.editor_cascade.el_dx, "editor.cascade.el_dx"
8696 &setup.editor_cascade.el_mm, "editor.cascade.el_mm"
8700 &setup.editor_cascade.el_df, "editor.cascade.el_df"
8704 &setup.editor_cascade.el_chars, "editor.cascade.el_chars"
8708 &setup.editor_cascade.el_steel_chars, "editor.cascade.el_steel_chars"
8712 &setup.editor_cascade.el_ce, "editor.cascade.el_ce"
8716 &setup.editor_cascade.el_ge, "editor.cascade.el_ge"
8720 &setup.editor_cascade.el_ref, "editor.cascade.el_ref"
8724 &setup.editor_cascade.el_user, "editor.cascade.el_user"
8728 &setup.editor_cascade.el_dynamic, "editor.cascade.el_dynamic"
8732 static struct TokenInfo shortcut_setup_tokens[] =
8736 &setup.shortcut.save_game, "shortcut.save_game"
8740 &setup.shortcut.load_game, "shortcut.load_game"
8744 &setup.shortcut.toggle_pause, "shortcut.toggle_pause"
8748 &setup.shortcut.focus_player[0], "shortcut.focus_player_1"
8752 &setup.shortcut.focus_player[1], "shortcut.focus_player_2"
8756 &setup.shortcut.focus_player[2], "shortcut.focus_player_3"
8760 &setup.shortcut.focus_player[3], "shortcut.focus_player_4"
8764 &setup.shortcut.focus_player_all, "shortcut.focus_player_all"
8768 &setup.shortcut.tape_eject, "shortcut.tape_eject"
8772 &setup.shortcut.tape_extra, "shortcut.tape_extra"
8776 &setup.shortcut.tape_stop, "shortcut.tape_stop"
8780 &setup.shortcut.tape_pause, "shortcut.tape_pause"
8784 &setup.shortcut.tape_record, "shortcut.tape_record"
8788 &setup.shortcut.tape_play, "shortcut.tape_play"
8792 &setup.shortcut.sound_simple, "shortcut.sound_simple"
8796 &setup.shortcut.sound_loops, "shortcut.sound_loops"
8800 &setup.shortcut.sound_music, "shortcut.sound_music"
8804 &setup.shortcut.snap_left, "shortcut.snap_left"
8808 &setup.shortcut.snap_right, "shortcut.snap_right"
8812 &setup.shortcut.snap_up, "shortcut.snap_up"
8816 &setup.shortcut.snap_down, "shortcut.snap_down"
8820 static struct SetupInputInfo setup_input;
8821 static struct TokenInfo player_setup_tokens[] =
8825 &setup_input.use_joystick, ".use_joystick"
8829 &setup_input.joy.device_name, ".joy.device_name"
8833 &setup_input.joy.xleft, ".joy.xleft"
8837 &setup_input.joy.xmiddle, ".joy.xmiddle"
8841 &setup_input.joy.xright, ".joy.xright"
8845 &setup_input.joy.yupper, ".joy.yupper"
8849 &setup_input.joy.ymiddle, ".joy.ymiddle"
8853 &setup_input.joy.ylower, ".joy.ylower"
8857 &setup_input.joy.snap, ".joy.snap_field"
8861 &setup_input.joy.drop, ".joy.place_bomb"
8865 &setup_input.key.left, ".key.move_left"
8869 &setup_input.key.right, ".key.move_right"
8873 &setup_input.key.up, ".key.move_up"
8877 &setup_input.key.down, ".key.move_down"
8881 &setup_input.key.snap, ".key.snap_field"
8885 &setup_input.key.drop, ".key.place_bomb"
8889 static struct TokenInfo system_setup_tokens[] =
8893 &setup.system.sdl_renderdriver, "system.sdl_renderdriver"
8897 &setup.system.sdl_videodriver, "system.sdl_videodriver"
8901 &setup.system.sdl_audiodriver, "system.sdl_audiodriver"
8905 &setup.system.audio_fragment_size, "system.audio_fragment_size"
8909 static struct TokenInfo internal_setup_tokens[] =
8913 &setup.internal.program_title, "program_title"
8917 &setup.internal.program_version, "program_version"
8921 &setup.internal.program_author, "program_author"
8925 &setup.internal.program_email, "program_email"
8929 &setup.internal.program_website, "program_website"
8933 &setup.internal.program_copyright, "program_copyright"
8937 &setup.internal.program_company, "program_company"
8941 &setup.internal.program_icon_file, "program_icon_file"
8945 &setup.internal.default_graphics_set, "default_graphics_set"
8949 &setup.internal.default_sounds_set, "default_sounds_set"
8953 &setup.internal.default_music_set, "default_music_set"
8957 &setup.internal.fallback_graphics_file, "fallback_graphics_file"
8961 &setup.internal.fallback_sounds_file, "fallback_sounds_file"
8965 &setup.internal.fallback_music_file, "fallback_music_file"
8969 &setup.internal.default_level_series, "default_level_series"
8973 &setup.internal.default_window_width, "default_window_width"
8977 &setup.internal.default_window_height, "default_window_height"
8981 &setup.internal.choose_from_top_leveldir, "choose_from_top_leveldir"
8985 &setup.internal.show_scaling_in_title, "show_scaling_in_title"
8989 &setup.internal.create_user_levelset, "create_user_levelset"
8993 &setup.internal.menu_game, "menu_game"
8997 &setup.internal.menu_editor, "menu_editor"
9001 &setup.internal.menu_graphics, "menu_graphics"
9005 &setup.internal.menu_sound, "menu_sound"
9009 &setup.internal.menu_artwork, "menu_artwork"
9013 &setup.internal.menu_input, "menu_input"
9017 &setup.internal.menu_touch, "menu_touch"
9021 &setup.internal.menu_shortcuts, "menu_shortcuts"
9025 &setup.internal.menu_exit, "menu_exit"
9029 &setup.internal.menu_save_and_exit, "menu_save_and_exit"
9033 static struct TokenInfo debug_setup_tokens[] =
9037 &setup.debug.frame_delay[0], "debug.frame_delay_0"
9041 &setup.debug.frame_delay[1], "debug.frame_delay_1"
9045 &setup.debug.frame_delay[2], "debug.frame_delay_2"
9049 &setup.debug.frame_delay[3], "debug.frame_delay_3"
9053 &setup.debug.frame_delay[4], "debug.frame_delay_4"
9057 &setup.debug.frame_delay[5], "debug.frame_delay_5"
9061 &setup.debug.frame_delay[6], "debug.frame_delay_6"
9065 &setup.debug.frame_delay[7], "debug.frame_delay_7"
9069 &setup.debug.frame_delay[8], "debug.frame_delay_8"
9073 &setup.debug.frame_delay[9], "debug.frame_delay_9"
9077 &setup.debug.frame_delay_key[0], "debug.key.frame_delay_0"
9081 &setup.debug.frame_delay_key[1], "debug.key.frame_delay_1"
9085 &setup.debug.frame_delay_key[2], "debug.key.frame_delay_2"
9089 &setup.debug.frame_delay_key[3], "debug.key.frame_delay_3"
9093 &setup.debug.frame_delay_key[4], "debug.key.frame_delay_4"
9097 &setup.debug.frame_delay_key[5], "debug.key.frame_delay_5"
9101 &setup.debug.frame_delay_key[6], "debug.key.frame_delay_6"
9105 &setup.debug.frame_delay_key[7], "debug.key.frame_delay_7"
9109 &setup.debug.frame_delay_key[8], "debug.key.frame_delay_8"
9113 &setup.debug.frame_delay_key[9], "debug.key.frame_delay_9"
9117 &setup.debug.frame_delay_use_mod_key, "debug.frame_delay.use_mod_key"},
9120 &setup.debug.frame_delay_game_only, "debug.frame_delay.game_only"
9124 &setup.debug.show_frames_per_second, "debug.show_frames_per_second"
9128 static struct TokenInfo options_setup_tokens[] =
9132 &setup.options.verbose, "options.verbose"
9136 static char *get_corrected_login_name(char *login_name)
9138 // needed because player name must be a fixed length string
9139 char *login_name_new = checked_malloc(MAX_PLAYER_NAME_LEN + 1);
9141 strncpy(login_name_new, login_name, MAX_PLAYER_NAME_LEN);
9142 login_name_new[MAX_PLAYER_NAME_LEN] = '\0';
9144 if (strlen(login_name) > MAX_PLAYER_NAME_LEN) // name has been cut
9145 if (strchr(login_name_new, ' '))
9146 *strchr(login_name_new, ' ') = '\0';
9148 return login_name_new;
9151 static void setSetupInfoToDefaults(struct SetupInfo *si)
9155 si->player_name = get_corrected_login_name(getLoginName());
9158 si->sound_loops = TRUE;
9159 si->sound_music = TRUE;
9160 si->sound_simple = TRUE;
9162 si->scroll_delay = TRUE;
9163 si->forced_scroll_delay = FALSE;
9164 si->scroll_delay_value = STD_SCROLL_DELAY;
9165 si->engine_snapshot_mode = getStringCopy(STR_SNAPSHOT_MODE_DEFAULT);
9166 si->engine_snapshot_memory = SNAPSHOT_MEMORY_DEFAULT;
9167 si->fade_screens = TRUE;
9168 si->autorecord = TRUE;
9169 si->show_titlescreen = TRUE;
9170 si->quick_doors = FALSE;
9171 si->team_mode = FALSE;
9172 si->handicap = TRUE;
9173 si->skip_levels = TRUE;
9174 si->increment_levels = TRUE;
9175 si->auto_play_next_level = TRUE;
9176 si->skip_scores_after_game = FALSE;
9177 si->time_limit = TRUE;
9178 si->fullscreen = FALSE;
9179 si->window_scaling_percent = STD_WINDOW_SCALING_PERCENT;
9180 si->window_scaling_quality = getStringCopy(SCALING_QUALITY_DEFAULT);
9181 si->screen_rendering_mode = getStringCopy(STR_SPECIAL_RENDERING_DEFAULT);
9182 si->vsync_mode = getStringCopy(STR_VSYNC_MODE_DEFAULT);
9183 si->ask_on_escape = TRUE;
9184 si->ask_on_escape_editor = TRUE;
9185 si->ask_on_game_over = TRUE;
9186 si->quick_switch = FALSE;
9187 si->input_on_focus = FALSE;
9188 si->prefer_aga_graphics = TRUE;
9189 si->prefer_lowpass_sounds = FALSE;
9190 si->game_speed_extended = FALSE;
9191 si->game_frame_delay = GAME_FRAME_DELAY;
9192 si->sp_show_border_elements = FALSE;
9193 si->small_game_graphics = FALSE;
9194 si->show_snapshot_buttons = FALSE;
9196 si->graphics_set = getStringCopy(GFX_CLASSIC_SUBDIR);
9197 si->sounds_set = getStringCopy(SND_CLASSIC_SUBDIR);
9198 si->music_set = getStringCopy(MUS_CLASSIC_SUBDIR);
9200 si->override_level_graphics = FALSE;
9201 si->override_level_sounds = FALSE;
9202 si->override_level_music = FALSE;
9204 si->volume_simple = 100; // percent
9205 si->volume_loops = 100; // percent
9206 si->volume_music = 100; // percent
9208 si->network_mode = FALSE;
9209 si->network_player_nr = 0; // first player
9210 si->network_server_hostname = getStringCopy(STR_NETWORK_AUTO_DETECT);
9212 si->touch.control_type = getStringCopy(TOUCH_CONTROL_DEFAULT);
9213 si->touch.move_distance = TOUCH_MOVE_DISTANCE_DEFAULT; // percent
9214 si->touch.drop_distance = TOUCH_DROP_DISTANCE_DEFAULT; // percent
9215 si->touch.transparency = TOUCH_TRANSPARENCY_DEFAULT; // percent
9216 si->touch.draw_outlined = TRUE;
9217 si->touch.draw_pressed = TRUE;
9219 for (i = 0; i < 2; i++)
9221 char *default_grid_button[6][2] =
9227 { "111222", " vv " },
9228 { "111222", " vv " }
9230 int grid_xsize = DEFAULT_GRID_XSIZE(i);
9231 int grid_ysize = DEFAULT_GRID_YSIZE(i);
9232 int min_xsize = MIN(6, grid_xsize);
9233 int min_ysize = MIN(6, grid_ysize);
9234 int startx = grid_xsize - min_xsize;
9235 int starty = grid_ysize - min_ysize;
9238 // virtual buttons grid can only be set to defaults if video is initialized
9239 // (this will be repeated if virtual buttons are not loaded from setup file)
9240 if (video.initialized)
9242 si->touch.grid_xsize[i] = grid_xsize;
9243 si->touch.grid_ysize[i] = grid_ysize;
9247 si->touch.grid_xsize[i] = -1;
9248 si->touch.grid_ysize[i] = -1;
9251 for (x = 0; x < MAX_GRID_XSIZE; x++)
9252 for (y = 0; y < MAX_GRID_YSIZE; y++)
9253 si->touch.grid_button[i][x][y] = CHAR_GRID_BUTTON_NONE;
9255 for (x = 0; x < min_xsize; x++)
9256 for (y = 0; y < min_ysize; y++)
9257 si->touch.grid_button[i][x][starty + y] =
9258 default_grid_button[y][0][x];
9260 for (x = 0; x < min_xsize; x++)
9261 for (y = 0; y < min_ysize; y++)
9262 si->touch.grid_button[i][startx + x][starty + y] =
9263 default_grid_button[y][1][x];
9266 si->touch.grid_initialized = video.initialized;
9268 si->editor.el_boulderdash = TRUE;
9269 si->editor.el_emerald_mine = TRUE;
9270 si->editor.el_emerald_mine_club = TRUE;
9271 si->editor.el_more = TRUE;
9272 si->editor.el_sokoban = TRUE;
9273 si->editor.el_supaplex = TRUE;
9274 si->editor.el_diamond_caves = TRUE;
9275 si->editor.el_dx_boulderdash = TRUE;
9277 si->editor.el_mirror_magic = TRUE;
9278 si->editor.el_deflektor = TRUE;
9280 si->editor.el_chars = TRUE;
9281 si->editor.el_steel_chars = TRUE;
9283 si->editor.el_classic = TRUE;
9284 si->editor.el_custom = TRUE;
9286 si->editor.el_user_defined = FALSE;
9287 si->editor.el_dynamic = TRUE;
9289 si->editor.el_headlines = TRUE;
9291 si->editor.show_element_token = FALSE;
9293 si->editor.use_template_for_new_levels = TRUE;
9295 si->shortcut.save_game = DEFAULT_KEY_SAVE_GAME;
9296 si->shortcut.load_game = DEFAULT_KEY_LOAD_GAME;
9297 si->shortcut.toggle_pause = DEFAULT_KEY_TOGGLE_PAUSE;
9299 si->shortcut.focus_player[0] = DEFAULT_KEY_FOCUS_PLAYER_1;
9300 si->shortcut.focus_player[1] = DEFAULT_KEY_FOCUS_PLAYER_2;
9301 si->shortcut.focus_player[2] = DEFAULT_KEY_FOCUS_PLAYER_3;
9302 si->shortcut.focus_player[3] = DEFAULT_KEY_FOCUS_PLAYER_4;
9303 si->shortcut.focus_player_all = DEFAULT_KEY_FOCUS_PLAYER_ALL;
9305 si->shortcut.tape_eject = DEFAULT_KEY_TAPE_EJECT;
9306 si->shortcut.tape_extra = DEFAULT_KEY_TAPE_EXTRA;
9307 si->shortcut.tape_stop = DEFAULT_KEY_TAPE_STOP;
9308 si->shortcut.tape_pause = DEFAULT_KEY_TAPE_PAUSE;
9309 si->shortcut.tape_record = DEFAULT_KEY_TAPE_RECORD;
9310 si->shortcut.tape_play = DEFAULT_KEY_TAPE_PLAY;
9312 si->shortcut.sound_simple = DEFAULT_KEY_SOUND_SIMPLE;
9313 si->shortcut.sound_loops = DEFAULT_KEY_SOUND_LOOPS;
9314 si->shortcut.sound_music = DEFAULT_KEY_SOUND_MUSIC;
9316 si->shortcut.snap_left = DEFAULT_KEY_SNAP_LEFT;
9317 si->shortcut.snap_right = DEFAULT_KEY_SNAP_RIGHT;
9318 si->shortcut.snap_up = DEFAULT_KEY_SNAP_UP;
9319 si->shortcut.snap_down = DEFAULT_KEY_SNAP_DOWN;
9321 for (i = 0; i < MAX_PLAYERS; i++)
9323 si->input[i].use_joystick = FALSE;
9324 si->input[i].joy.device_name=getStringCopy(getDeviceNameFromJoystickNr(i));
9325 si->input[i].joy.xleft = JOYSTICK_XLEFT;
9326 si->input[i].joy.xmiddle = JOYSTICK_XMIDDLE;
9327 si->input[i].joy.xright = JOYSTICK_XRIGHT;
9328 si->input[i].joy.yupper = JOYSTICK_YUPPER;
9329 si->input[i].joy.ymiddle = JOYSTICK_YMIDDLE;
9330 si->input[i].joy.ylower = JOYSTICK_YLOWER;
9331 si->input[i].joy.snap = (i == 0 ? JOY_BUTTON_1 : 0);
9332 si->input[i].joy.drop = (i == 0 ? JOY_BUTTON_2 : 0);
9333 si->input[i].key.left = (i == 0 ? DEFAULT_KEY_LEFT : KSYM_UNDEFINED);
9334 si->input[i].key.right = (i == 0 ? DEFAULT_KEY_RIGHT : KSYM_UNDEFINED);
9335 si->input[i].key.up = (i == 0 ? DEFAULT_KEY_UP : KSYM_UNDEFINED);
9336 si->input[i].key.down = (i == 0 ? DEFAULT_KEY_DOWN : KSYM_UNDEFINED);
9337 si->input[i].key.snap = (i == 0 ? DEFAULT_KEY_SNAP : KSYM_UNDEFINED);
9338 si->input[i].key.drop = (i == 0 ? DEFAULT_KEY_DROP : KSYM_UNDEFINED);
9341 si->system.sdl_renderdriver = getStringCopy(ARG_DEFAULT);
9342 si->system.sdl_videodriver = getStringCopy(ARG_DEFAULT);
9343 si->system.sdl_audiodriver = getStringCopy(ARG_DEFAULT);
9344 si->system.audio_fragment_size = DEFAULT_AUDIO_FRAGMENT_SIZE;
9346 si->internal.program_title = getStringCopy(PROGRAM_TITLE_STRING);
9347 si->internal.program_version = getStringCopy(getProgramRealVersionString());
9348 si->internal.program_author = getStringCopy(PROGRAM_AUTHOR_STRING);
9349 si->internal.program_email = getStringCopy(PROGRAM_EMAIL_STRING);
9350 si->internal.program_website = getStringCopy(PROGRAM_WEBSITE_STRING);
9351 si->internal.program_copyright = getStringCopy(PROGRAM_COPYRIGHT_STRING);
9352 si->internal.program_company = getStringCopy(PROGRAM_COMPANY_STRING);
9354 si->internal.program_icon_file = getStringCopy(PROGRAM_ICON_FILENAME);
9356 si->internal.default_graphics_set = getStringCopy(GFX_CLASSIC_SUBDIR);
9357 si->internal.default_sounds_set = getStringCopy(SND_CLASSIC_SUBDIR);
9358 si->internal.default_music_set = getStringCopy(MUS_CLASSIC_SUBDIR);
9360 si->internal.fallback_graphics_file = getStringCopy(UNDEFINED_FILENAME);
9361 si->internal.fallback_sounds_file = getStringCopy(UNDEFINED_FILENAME);
9362 si->internal.fallback_music_file = getStringCopy(UNDEFINED_FILENAME);
9364 si->internal.default_level_series = getStringCopy(UNDEFINED_LEVELSET);
9365 si->internal.choose_from_top_leveldir = FALSE;
9366 si->internal.show_scaling_in_title = TRUE;
9367 si->internal.create_user_levelset = TRUE;
9369 si->internal.default_window_width = WIN_XSIZE_DEFAULT;
9370 si->internal.default_window_height = WIN_YSIZE_DEFAULT;
9372 si->debug.frame_delay[0] = DEFAULT_FRAME_DELAY_0;
9373 si->debug.frame_delay[1] = DEFAULT_FRAME_DELAY_1;
9374 si->debug.frame_delay[2] = DEFAULT_FRAME_DELAY_2;
9375 si->debug.frame_delay[3] = DEFAULT_FRAME_DELAY_3;
9376 si->debug.frame_delay[4] = DEFAULT_FRAME_DELAY_4;
9377 si->debug.frame_delay[5] = DEFAULT_FRAME_DELAY_5;
9378 si->debug.frame_delay[6] = DEFAULT_FRAME_DELAY_6;
9379 si->debug.frame_delay[7] = DEFAULT_FRAME_DELAY_7;
9380 si->debug.frame_delay[8] = DEFAULT_FRAME_DELAY_8;
9381 si->debug.frame_delay[9] = DEFAULT_FRAME_DELAY_9;
9383 si->debug.frame_delay_key[0] = DEFAULT_KEY_FRAME_DELAY_0;
9384 si->debug.frame_delay_key[1] = DEFAULT_KEY_FRAME_DELAY_1;
9385 si->debug.frame_delay_key[2] = DEFAULT_KEY_FRAME_DELAY_2;
9386 si->debug.frame_delay_key[3] = DEFAULT_KEY_FRAME_DELAY_3;
9387 si->debug.frame_delay_key[4] = DEFAULT_KEY_FRAME_DELAY_4;
9388 si->debug.frame_delay_key[5] = DEFAULT_KEY_FRAME_DELAY_5;
9389 si->debug.frame_delay_key[6] = DEFAULT_KEY_FRAME_DELAY_6;
9390 si->debug.frame_delay_key[7] = DEFAULT_KEY_FRAME_DELAY_7;
9391 si->debug.frame_delay_key[8] = DEFAULT_KEY_FRAME_DELAY_8;
9392 si->debug.frame_delay_key[9] = DEFAULT_KEY_FRAME_DELAY_9;
9394 si->debug.frame_delay_use_mod_key = DEFAULT_FRAME_DELAY_USE_MOD_KEY;
9395 si->debug.frame_delay_game_only = DEFAULT_FRAME_DELAY_GAME_ONLY;
9397 si->debug.show_frames_per_second = FALSE;
9399 si->options.verbose = FALSE;
9401 #if defined(PLATFORM_ANDROID)
9402 si->fullscreen = TRUE;
9406 static void setSetupInfoToDefaults_AutoSetup(struct SetupInfo *si)
9408 si->auto_setup.editor_zoom_tilesize = MINI_TILESIZE;
9411 static void setSetupInfoToDefaults_EditorCascade(struct SetupInfo *si)
9413 si->editor_cascade.el_bd = TRUE;
9414 si->editor_cascade.el_em = TRUE;
9415 si->editor_cascade.el_emc = TRUE;
9416 si->editor_cascade.el_rnd = TRUE;
9417 si->editor_cascade.el_sb = TRUE;
9418 si->editor_cascade.el_sp = TRUE;
9419 si->editor_cascade.el_dc = TRUE;
9420 si->editor_cascade.el_dx = TRUE;
9422 si->editor_cascade.el_mm = TRUE;
9423 si->editor_cascade.el_df = TRUE;
9425 si->editor_cascade.el_chars = FALSE;
9426 si->editor_cascade.el_steel_chars = FALSE;
9427 si->editor_cascade.el_ce = FALSE;
9428 si->editor_cascade.el_ge = FALSE;
9429 si->editor_cascade.el_ref = FALSE;
9430 si->editor_cascade.el_user = FALSE;
9431 si->editor_cascade.el_dynamic = FALSE;
9434 #define MAX_HIDE_SETUP_TOKEN_SIZE 20
9436 static char *getHideSetupToken(void *setup_value)
9438 static char hide_setup_token[MAX_HIDE_SETUP_TOKEN_SIZE];
9440 if (setup_value != NULL)
9441 snprintf(hide_setup_token, MAX_HIDE_SETUP_TOKEN_SIZE, "%p", setup_value);
9443 return hide_setup_token;
9446 void setHideSetupEntry(void *setup_value)
9448 char *hide_setup_token = getHideSetupToken(setup_value);
9450 if (setup_value != NULL)
9451 setHashEntry(hide_setup_hash, hide_setup_token, "");
9454 boolean hideSetupEntry(void *setup_value)
9456 char *hide_setup_token = getHideSetupToken(setup_value);
9458 return (setup_value != NULL &&
9459 getHashEntry(hide_setup_hash, hide_setup_token) != NULL);
9462 static void setSetupInfoFromTokenText(SetupFileHash *setup_file_hash,
9463 struct TokenInfo *token_info,
9464 int token_nr, char *token_text)
9466 char *token_hide_text = getStringCat2(token_text, ".hide");
9467 char *token_hide_value = getHashEntry(setup_file_hash, token_hide_text);
9469 // set the value of this setup option in the setup option structure
9470 setSetupInfo(token_info, token_nr, getHashEntry(setup_file_hash, token_text));
9472 // check if this setup option should be hidden in the setup menu
9473 if (token_hide_value != NULL && get_boolean_from_string(token_hide_value))
9474 setHideSetupEntry(token_info[token_nr].value);
9477 static void setSetupInfoFromTokenInfo(SetupFileHash *setup_file_hash,
9478 struct TokenInfo *token_info,
9481 setSetupInfoFromTokenText(setup_file_hash, token_info, token_nr,
9482 token_info[token_nr].text);
9485 static void decodeSetupFileHash(SetupFileHash *setup_file_hash)
9489 if (!setup_file_hash)
9492 if (hide_setup_hash == NULL)
9493 hide_setup_hash = newSetupFileHash();
9495 for (i = 0; i < ARRAY_SIZE(global_setup_tokens); i++)
9496 setSetupInfoFromTokenInfo(setup_file_hash, global_setup_tokens, i);
9498 setup.touch.grid_initialized = TRUE;
9499 for (i = 0; i < 2; i++)
9501 int grid_xsize = setup.touch.grid_xsize[i];
9502 int grid_ysize = setup.touch.grid_ysize[i];
9505 // if virtual buttons are not loaded from setup file, repeat initializing
9506 // virtual buttons grid with default values later when video is initialized
9507 if (grid_xsize == -1 ||
9510 setup.touch.grid_initialized = FALSE;
9515 for (y = 0; y < grid_ysize; y++)
9517 char token_string[MAX_LINE_LEN];
9519 sprintf(token_string, "touch.virtual_buttons.%d.%02d", i, y);
9521 char *value_string = getHashEntry(setup_file_hash, token_string);
9523 if (value_string == NULL)
9526 for (x = 0; x < grid_xsize; x++)
9528 char c = value_string[x];
9530 setup.touch.grid_button[i][x][y] =
9531 (c == '.' ? CHAR_GRID_BUTTON_NONE : c);
9536 for (i = 0; i < ARRAY_SIZE(editor_setup_tokens); i++)
9537 setSetupInfoFromTokenInfo(setup_file_hash, editor_setup_tokens, i);
9539 for (i = 0; i < ARRAY_SIZE(shortcut_setup_tokens); i++)
9540 setSetupInfoFromTokenInfo(setup_file_hash, shortcut_setup_tokens, i);
9542 for (pnr = 0; pnr < MAX_PLAYERS; pnr++)
9546 sprintf(prefix, "%s%d", TOKEN_STR_PLAYER_PREFIX, pnr + 1);
9548 setup_input = setup.input[pnr];
9549 for (i = 0; i < ARRAY_SIZE(player_setup_tokens); i++)
9551 char full_token[100];
9553 sprintf(full_token, "%s%s", prefix, player_setup_tokens[i].text);
9554 setSetupInfoFromTokenText(setup_file_hash, player_setup_tokens, i,
9557 setup.input[pnr] = setup_input;
9560 for (i = 0; i < ARRAY_SIZE(system_setup_tokens); i++)
9561 setSetupInfoFromTokenInfo(setup_file_hash, system_setup_tokens, i);
9563 for (i = 0; i < ARRAY_SIZE(internal_setup_tokens); i++)
9564 setSetupInfoFromTokenInfo(setup_file_hash, internal_setup_tokens, i);
9566 for (i = 0; i < ARRAY_SIZE(debug_setup_tokens); i++)
9567 setSetupInfoFromTokenInfo(setup_file_hash, debug_setup_tokens, i);
9569 for (i = 0; i < ARRAY_SIZE(options_setup_tokens); i++)
9570 setSetupInfoFromTokenInfo(setup_file_hash, options_setup_tokens, i);
9572 setHideRelatedSetupEntries();
9575 static void decodeSetupFileHash_AutoSetup(SetupFileHash *setup_file_hash)
9579 if (!setup_file_hash)
9582 for (i = 0; i < ARRAY_SIZE(auto_setup_tokens); i++)
9583 setSetupInfo(auto_setup_tokens, i,
9584 getHashEntry(setup_file_hash,
9585 auto_setup_tokens[i].text));
9588 static void decodeSetupFileHash_EditorCascade(SetupFileHash *setup_file_hash)
9592 if (!setup_file_hash)
9595 for (i = 0; i < ARRAY_SIZE(editor_cascade_setup_tokens); i++)
9596 setSetupInfo(editor_cascade_setup_tokens, i,
9597 getHashEntry(setup_file_hash,
9598 editor_cascade_setup_tokens[i].text));
9601 void LoadSetupFromFilename(char *filename)
9603 SetupFileHash *setup_file_hash = loadSetupFileHash(filename);
9605 if (setup_file_hash)
9607 decodeSetupFileHash(setup_file_hash);
9609 freeSetupFileHash(setup_file_hash);
9613 Error(ERR_DEBUG, "using default setup values");
9617 static void LoadSetup_SpecialPostProcessing(void)
9619 char *player_name_new;
9621 // needed to work around problems with fixed length strings
9622 player_name_new = get_corrected_login_name(setup.player_name);
9623 free(setup.player_name);
9624 setup.player_name = player_name_new;
9626 // "scroll_delay: on(3) / off(0)" was replaced by scroll delay value
9627 if (setup.scroll_delay == FALSE)
9629 setup.scroll_delay_value = MIN_SCROLL_DELAY;
9630 setup.scroll_delay = TRUE; // now always "on"
9633 // make sure that scroll delay value stays inside valid range
9634 setup.scroll_delay_value =
9635 MIN(MAX(MIN_SCROLL_DELAY, setup.scroll_delay_value), MAX_SCROLL_DELAY);
9638 void LoadSetup(void)
9642 // always start with reliable default values
9643 setSetupInfoToDefaults(&setup);
9645 // try to load setup values from default setup file
9646 filename = getDefaultSetupFilename();
9648 if (fileExists(filename))
9649 LoadSetupFromFilename(filename);
9651 // try to load setup values from user setup file
9652 filename = getSetupFilename();
9654 LoadSetupFromFilename(filename);
9656 LoadSetup_SpecialPostProcessing();
9659 void LoadSetup_AutoSetup(void)
9661 char *filename = getPath2(getSetupDir(), AUTOSETUP_FILENAME);
9662 SetupFileHash *setup_file_hash = NULL;
9664 // always start with reliable default values
9665 setSetupInfoToDefaults_AutoSetup(&setup);
9667 setup_file_hash = loadSetupFileHash(filename);
9669 if (setup_file_hash)
9671 decodeSetupFileHash_AutoSetup(setup_file_hash);
9673 freeSetupFileHash(setup_file_hash);
9679 void LoadSetup_EditorCascade(void)
9681 char *filename = getPath2(getSetupDir(), EDITORCASCADE_FILENAME);
9682 SetupFileHash *setup_file_hash = NULL;
9684 // always start with reliable default values
9685 setSetupInfoToDefaults_EditorCascade(&setup);
9687 setup_file_hash = loadSetupFileHash(filename);
9689 if (setup_file_hash)
9691 decodeSetupFileHash_EditorCascade(setup_file_hash);
9693 freeSetupFileHash(setup_file_hash);
9699 static void addGameControllerMappingToHash(SetupFileHash *mappings_hash,
9702 char mapping_guid[MAX_LINE_LEN];
9703 char *mapping_start, *mapping_end;
9705 // get GUID from game controller mapping line: copy complete line
9706 strncpy(mapping_guid, mapping_line, MAX_LINE_LEN - 1);
9707 mapping_guid[MAX_LINE_LEN - 1] = '\0';
9709 // get GUID from game controller mapping line: cut after GUID part
9710 mapping_start = strchr(mapping_guid, ',');
9711 if (mapping_start != NULL)
9712 *mapping_start = '\0';
9714 // cut newline from game controller mapping line
9715 mapping_end = strchr(mapping_line, '\n');
9716 if (mapping_end != NULL)
9717 *mapping_end = '\0';
9719 // add mapping entry to game controller mappings hash
9720 setHashEntry(mappings_hash, mapping_guid, mapping_line);
9723 static void LoadSetup_ReadGameControllerMappings(SetupFileHash *mappings_hash,
9728 if (!(file = fopen(filename, MODE_READ)))
9730 Error(ERR_WARN, "cannot read game controller mappings file '%s'", filename);
9737 char line[MAX_LINE_LEN];
9739 if (!fgets(line, MAX_LINE_LEN, file))
9742 addGameControllerMappingToHash(mappings_hash, line);
9748 void SaveSetup(void)
9750 char *filename = getSetupFilename();
9754 InitUserDataDirectory();
9756 if (!(file = fopen(filename, MODE_WRITE)))
9758 Error(ERR_WARN, "cannot write setup file '%s'", filename);
9762 fprintFileHeader(file, SETUP_FILENAME);
9764 for (i = 0; i < ARRAY_SIZE(global_setup_tokens); i++)
9766 // just to make things nicer :)
9767 if (global_setup_tokens[i].value == &setup.sound ||
9768 global_setup_tokens[i].value == &setup.graphics_set ||
9769 global_setup_tokens[i].value == &setup.volume_simple ||
9770 global_setup_tokens[i].value == &setup.network_mode ||
9771 global_setup_tokens[i].value == &setup.touch.control_type ||
9772 global_setup_tokens[i].value == &setup.touch.grid_xsize[0] ||
9773 global_setup_tokens[i].value == &setup.touch.grid_xsize[1])
9774 fprintf(file, "\n");
9776 fprintf(file, "%s\n", getSetupLine(global_setup_tokens, "", i));
9779 for (i = 0; i < 2; i++)
9781 int grid_xsize = setup.touch.grid_xsize[i];
9782 int grid_ysize = setup.touch.grid_ysize[i];
9785 fprintf(file, "\n");
9787 for (y = 0; y < grid_ysize; y++)
9789 char token_string[MAX_LINE_LEN];
9790 char value_string[MAX_LINE_LEN];
9792 sprintf(token_string, "touch.virtual_buttons.%d.%02d", i, y);
9794 for (x = 0; x < grid_xsize; x++)
9796 char c = setup.touch.grid_button[i][x][y];
9798 value_string[x] = (c == CHAR_GRID_BUTTON_NONE ? '.' : c);
9801 value_string[grid_xsize] = '\0';
9803 fprintf(file, "%s\n", getFormattedSetupEntry(token_string, value_string));
9807 fprintf(file, "\n");
9808 for (i = 0; i < ARRAY_SIZE(editor_setup_tokens); i++)
9809 fprintf(file, "%s\n", getSetupLine(editor_setup_tokens, "", i));
9811 fprintf(file, "\n");
9812 for (i = 0; i < ARRAY_SIZE(shortcut_setup_tokens); i++)
9813 fprintf(file, "%s\n", getSetupLine(shortcut_setup_tokens, "", i));
9815 for (pnr = 0; pnr < MAX_PLAYERS; pnr++)
9819 sprintf(prefix, "%s%d", TOKEN_STR_PLAYER_PREFIX, pnr + 1);
9820 fprintf(file, "\n");
9822 setup_input = setup.input[pnr];
9823 for (i = 0; i < ARRAY_SIZE(player_setup_tokens); i++)
9824 fprintf(file, "%s\n", getSetupLine(player_setup_tokens, prefix, i));
9827 fprintf(file, "\n");
9828 for (i = 0; i < ARRAY_SIZE(system_setup_tokens); i++)
9829 fprintf(file, "%s\n", getSetupLine(system_setup_tokens, "", i));
9831 // (internal setup values not saved to user setup file)
9833 fprintf(file, "\n");
9834 for (i = 0; i < ARRAY_SIZE(debug_setup_tokens); i++)
9835 fprintf(file, "%s\n", getSetupLine(debug_setup_tokens, "", i));
9837 fprintf(file, "\n");
9838 for (i = 0; i < ARRAY_SIZE(options_setup_tokens); i++)
9839 fprintf(file, "%s\n", getSetupLine(options_setup_tokens, "", i));
9843 SetFilePermissions(filename, PERMS_PRIVATE);
9846 void SaveSetup_AutoSetup(void)
9848 char *filename = getPath2(getSetupDir(), AUTOSETUP_FILENAME);
9852 InitUserDataDirectory();
9854 if (!(file = fopen(filename, MODE_WRITE)))
9856 Error(ERR_WARN, "cannot write auto setup file '%s'", filename);
9861 fprintFileHeader(file, AUTOSETUP_FILENAME);
9863 for (i = 0; i < ARRAY_SIZE(auto_setup_tokens); i++)
9864 fprintf(file, "%s\n", getSetupLine(auto_setup_tokens, "", i));
9868 SetFilePermissions(filename, PERMS_PRIVATE);
9873 void SaveSetup_EditorCascade(void)
9875 char *filename = getPath2(getSetupDir(), EDITORCASCADE_FILENAME);
9879 InitUserDataDirectory();
9881 if (!(file = fopen(filename, MODE_WRITE)))
9883 Error(ERR_WARN, "cannot write editor cascade state file '%s'", filename);
9888 fprintFileHeader(file, EDITORCASCADE_FILENAME);
9890 for (i = 0; i < ARRAY_SIZE(editor_cascade_setup_tokens); i++)
9891 fprintf(file, "%s\n", getSetupLine(editor_cascade_setup_tokens, "", i));
9895 SetFilePermissions(filename, PERMS_PRIVATE);
9900 static void SaveSetup_WriteGameControllerMappings(SetupFileHash *mappings_hash,
9905 if (!(file = fopen(filename, MODE_WRITE)))
9907 Error(ERR_WARN, "cannot write game controller mappings file '%s'",filename);
9912 BEGIN_HASH_ITERATION(mappings_hash, itr)
9914 fprintf(file, "%s\n", HASH_ITERATION_VALUE(itr));
9916 END_HASH_ITERATION(mappings_hash, itr)
9921 void SaveSetup_AddGameControllerMapping(char *mapping)
9923 char *filename = getPath2(getSetupDir(), GAMECONTROLLER_BASENAME);
9924 SetupFileHash *mappings_hash = newSetupFileHash();
9926 InitUserDataDirectory();
9928 // load existing personal game controller mappings
9929 LoadSetup_ReadGameControllerMappings(mappings_hash, filename);
9931 // add new mapping to personal game controller mappings
9932 addGameControllerMappingToHash(mappings_hash, mapping);
9934 // save updated personal game controller mappings
9935 SaveSetup_WriteGameControllerMappings(mappings_hash, filename);
9937 freeSetupFileHash(mappings_hash);
9941 void LoadCustomElementDescriptions(void)
9943 char *filename = getCustomArtworkConfigFilename(ARTWORK_TYPE_GRAPHICS);
9944 SetupFileHash *setup_file_hash;
9947 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
9949 if (element_info[i].custom_description != NULL)
9951 free(element_info[i].custom_description);
9952 element_info[i].custom_description = NULL;
9956 if ((setup_file_hash = loadSetupFileHash(filename)) == NULL)
9959 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
9961 char *token = getStringCat2(element_info[i].token_name, ".name");
9962 char *value = getHashEntry(setup_file_hash, token);
9965 element_info[i].custom_description = getStringCopy(value);
9970 freeSetupFileHash(setup_file_hash);
9973 static int getElementFromToken(char *token)
9975 char *value = getHashEntry(element_token_hash, token);
9980 Error(ERR_WARN, "unknown element token '%s'", token);
9982 return EL_UNDEFINED;
9985 void FreeGlobalAnimEventInfo(void)
9987 struct GlobalAnimEventInfo *gaei = &global_anim_event_info;
9989 if (gaei->event_list == NULL)
9994 for (i = 0; i < gaei->num_event_lists; i++)
9996 checked_free(gaei->event_list[i]->event_value);
9997 checked_free(gaei->event_list[i]);
10000 checked_free(gaei->event_list);
10002 gaei->event_list = NULL;
10003 gaei->num_event_lists = 0;
10006 static int AddGlobalAnimEventList(void)
10008 struct GlobalAnimEventInfo *gaei = &global_anim_event_info;
10009 int list_pos = gaei->num_event_lists++;
10011 gaei->event_list = checked_realloc(gaei->event_list, gaei->num_event_lists *
10012 sizeof(struct GlobalAnimEventListInfo *));
10014 gaei->event_list[list_pos] =
10015 checked_calloc(sizeof(struct GlobalAnimEventListInfo));
10017 struct GlobalAnimEventListInfo *gaeli = gaei->event_list[list_pos];
10019 gaeli->event_value = NULL;
10020 gaeli->num_event_values = 0;
10025 static int AddGlobalAnimEventValue(int list_pos, int event_value)
10027 // do not add empty global animation events
10028 if (event_value == ANIM_EVENT_NONE)
10031 // if list position is undefined, create new list
10032 if (list_pos == ANIM_EVENT_UNDEFINED)
10033 list_pos = AddGlobalAnimEventList();
10035 struct GlobalAnimEventInfo *gaei = &global_anim_event_info;
10036 struct GlobalAnimEventListInfo *gaeli = gaei->event_list[list_pos];
10037 int value_pos = gaeli->num_event_values++;
10039 gaeli->event_value = checked_realloc(gaeli->event_value,
10040 gaeli->num_event_values * sizeof(int *));
10042 gaeli->event_value[value_pos] = event_value;
10047 int GetGlobalAnimEventValue(int list_pos, int value_pos)
10049 if (list_pos == ANIM_EVENT_UNDEFINED)
10050 return ANIM_EVENT_NONE;
10052 struct GlobalAnimEventInfo *gaei = &global_anim_event_info;
10053 struct GlobalAnimEventListInfo *gaeli = gaei->event_list[list_pos];
10055 return gaeli->event_value[value_pos];
10058 int GetGlobalAnimEventValueCount(int list_pos)
10060 if (list_pos == ANIM_EVENT_UNDEFINED)
10063 struct GlobalAnimEventInfo *gaei = &global_anim_event_info;
10064 struct GlobalAnimEventListInfo *gaeli = gaei->event_list[list_pos];
10066 return gaeli->num_event_values;
10069 // This function checks if a string <s> of the format "string1, string2, ..."
10070 // exactly contains a string <s_contained>.
10072 static boolean string_has_parameter(char *s, char *s_contained)
10076 if (s == NULL || s_contained == NULL)
10079 if (strlen(s_contained) > strlen(s))
10082 if (strncmp(s, s_contained, strlen(s_contained)) == 0)
10084 char next_char = s[strlen(s_contained)];
10086 // check if next character is delimiter or whitespace
10087 return (next_char == ',' || next_char == '\0' ||
10088 next_char == ' ' || next_char == '\t' ? TRUE : FALSE);
10091 // check if string contains another parameter string after a comma
10092 substring = strchr(s, ',');
10093 if (substring == NULL) // string does not contain a comma
10096 // advance string pointer to next character after the comma
10099 // skip potential whitespaces after the comma
10100 while (*substring == ' ' || *substring == '\t')
10103 return string_has_parameter(substring, s_contained);
10106 static int get_anim_parameter_value(char *s)
10108 int event_value[] =
10116 char *pattern_1[] =
10124 char *pattern_2 = ".part_";
10125 char *matching_char = NULL;
10127 int pattern_1_len = 0;
10128 int result = ANIM_EVENT_NONE;
10131 for (i = 0; i < ARRAY_SIZE(event_value); i++)
10133 matching_char = strstr(s_ptr, pattern_1[i]);
10134 pattern_1_len = strlen(pattern_1[i]);
10135 result = event_value[i];
10137 if (matching_char != NULL)
10141 if (matching_char == NULL)
10142 return ANIM_EVENT_NONE;
10144 s_ptr = matching_char + pattern_1_len;
10146 // check for main animation number ("anim_X" or "anim_XX")
10147 if (*s_ptr >= '0' && *s_ptr <= '9')
10149 int gic_anim_nr = (*s_ptr++ - '0');
10151 if (*s_ptr >= '0' && *s_ptr <= '9')
10152 gic_anim_nr = 10 * gic_anim_nr + (*s_ptr++ - '0');
10154 if (gic_anim_nr < 1 || gic_anim_nr > MAX_GLOBAL_ANIMS)
10155 return ANIM_EVENT_NONE;
10157 result |= gic_anim_nr << ANIM_EVENT_ANIM_BIT;
10161 // invalid main animation number specified
10163 return ANIM_EVENT_NONE;
10166 // check for animation part number ("part_X" or "part_XX") (optional)
10167 if (strPrefix(s_ptr, pattern_2))
10169 s_ptr += strlen(pattern_2);
10171 if (*s_ptr >= '0' && *s_ptr <= '9')
10173 int gic_part_nr = (*s_ptr++ - '0');
10175 if (*s_ptr >= '0' && *s_ptr <= '9')
10176 gic_part_nr = 10 * gic_part_nr + (*s_ptr++ - '0');
10178 if (gic_part_nr < 1 || gic_part_nr > MAX_GLOBAL_ANIM_PARTS)
10179 return ANIM_EVENT_NONE;
10181 result |= gic_part_nr << ANIM_EVENT_PART_BIT;
10185 // invalid animation part number specified
10187 return ANIM_EVENT_NONE;
10191 // discard result if next character is neither delimiter nor whitespace
10192 if (!(*s_ptr == ',' || *s_ptr == '\0' ||
10193 *s_ptr == ' ' || *s_ptr == '\t'))
10194 return ANIM_EVENT_NONE;
10199 static int get_anim_parameter_values(char *s)
10201 int list_pos = ANIM_EVENT_UNDEFINED;
10202 int event_value = ANIM_EVENT_DEFAULT;
10204 if (string_has_parameter(s, "any"))
10205 event_value |= ANIM_EVENT_ANY;
10207 if (string_has_parameter(s, "click:self") ||
10208 string_has_parameter(s, "click") ||
10209 string_has_parameter(s, "self"))
10210 event_value |= ANIM_EVENT_SELF;
10212 if (string_has_parameter(s, "unclick:any"))
10213 event_value |= ANIM_EVENT_UNCLICK_ANY;
10215 // if animation event found, add it to global animation event list
10216 if (event_value != ANIM_EVENT_NONE)
10217 list_pos = AddGlobalAnimEventValue(list_pos, event_value);
10221 // add optional "click:anim_X" or "click:anim_X.part_X" parameter
10222 event_value = get_anim_parameter_value(s);
10224 // if animation event found, add it to global animation event list
10225 if (event_value != ANIM_EVENT_NONE)
10226 list_pos = AddGlobalAnimEventValue(list_pos, event_value);
10228 // continue with next part of the string, starting with next comma
10229 s = strchr(s + 1, ',');
10235 static int get_anim_action_parameter_value(char *token)
10237 int result = getImageIDFromToken(token);
10241 char *gfx_token = getStringCat2("gfx.", token);
10243 result = getImageIDFromToken(gfx_token);
10245 checked_free(gfx_token);
10250 Key key = getKeyFromX11KeyName(token);
10252 if (key != KSYM_UNDEFINED)
10253 result = -(int)key;
10257 result = ANIM_EVENT_ACTION_NONE;
10262 int get_parameter_value(char *value_raw, char *suffix, int type)
10264 char *value = getStringToLower(value_raw);
10265 int result = 0; // probably a save default value
10267 if (strEqual(suffix, ".direction"))
10269 result = (strEqual(value, "left") ? MV_LEFT :
10270 strEqual(value, "right") ? MV_RIGHT :
10271 strEqual(value, "up") ? MV_UP :
10272 strEqual(value, "down") ? MV_DOWN : MV_NONE);
10274 else if (strEqual(suffix, ".position"))
10276 result = (strEqual(value, "left") ? POS_LEFT :
10277 strEqual(value, "right") ? POS_RIGHT :
10278 strEqual(value, "top") ? POS_TOP :
10279 strEqual(value, "upper") ? POS_UPPER :
10280 strEqual(value, "middle") ? POS_MIDDLE :
10281 strEqual(value, "lower") ? POS_LOWER :
10282 strEqual(value, "bottom") ? POS_BOTTOM :
10283 strEqual(value, "any") ? POS_ANY :
10284 strEqual(value, "last") ? POS_LAST : POS_UNDEFINED);
10286 else if (strEqual(suffix, ".align"))
10288 result = (strEqual(value, "left") ? ALIGN_LEFT :
10289 strEqual(value, "right") ? ALIGN_RIGHT :
10290 strEqual(value, "center") ? ALIGN_CENTER :
10291 strEqual(value, "middle") ? ALIGN_CENTER : ALIGN_DEFAULT);
10293 else if (strEqual(suffix, ".valign"))
10295 result = (strEqual(value, "top") ? VALIGN_TOP :
10296 strEqual(value, "bottom") ? VALIGN_BOTTOM :
10297 strEqual(value, "middle") ? VALIGN_MIDDLE :
10298 strEqual(value, "center") ? VALIGN_MIDDLE : VALIGN_DEFAULT);
10300 else if (strEqual(suffix, ".anim_mode"))
10302 result = (string_has_parameter(value, "none") ? ANIM_NONE :
10303 string_has_parameter(value, "loop") ? ANIM_LOOP :
10304 string_has_parameter(value, "linear") ? ANIM_LINEAR :
10305 string_has_parameter(value, "pingpong") ? ANIM_PINGPONG :
10306 string_has_parameter(value, "pingpong2") ? ANIM_PINGPONG2 :
10307 string_has_parameter(value, "random") ? ANIM_RANDOM :
10308 string_has_parameter(value, "ce_value") ? ANIM_CE_VALUE :
10309 string_has_parameter(value, "ce_score") ? ANIM_CE_SCORE :
10310 string_has_parameter(value, "ce_delay") ? ANIM_CE_DELAY :
10311 string_has_parameter(value, "horizontal") ? ANIM_HORIZONTAL :
10312 string_has_parameter(value, "vertical") ? ANIM_VERTICAL :
10313 string_has_parameter(value, "centered") ? ANIM_CENTERED :
10314 string_has_parameter(value, "all") ? ANIM_ALL :
10317 if (string_has_parameter(value, "once"))
10318 result |= ANIM_ONCE;
10320 if (string_has_parameter(value, "reverse"))
10321 result |= ANIM_REVERSE;
10323 if (string_has_parameter(value, "opaque_player"))
10324 result |= ANIM_OPAQUE_PLAYER;
10326 if (string_has_parameter(value, "static_panel"))
10327 result |= ANIM_STATIC_PANEL;
10329 else if (strEqual(suffix, ".init_event") ||
10330 strEqual(suffix, ".anim_event"))
10332 result = get_anim_parameter_values(value);
10334 else if (strEqual(suffix, ".init_delay_action") ||
10335 strEqual(suffix, ".anim_delay_action") ||
10336 strEqual(suffix, ".post_delay_action") ||
10337 strEqual(suffix, ".init_event_action") ||
10338 strEqual(suffix, ".anim_event_action"))
10340 result = get_anim_action_parameter_value(value_raw);
10342 else if (strEqual(suffix, ".class"))
10344 result = (strEqual(value, ARG_UNDEFINED) ? ARG_UNDEFINED_VALUE :
10345 get_hash_from_key(value));
10347 else if (strEqual(suffix, ".style"))
10349 result = STYLE_DEFAULT;
10351 if (string_has_parameter(value, "accurate_borders"))
10352 result |= STYLE_ACCURATE_BORDERS;
10354 if (string_has_parameter(value, "inner_corners"))
10355 result |= STYLE_INNER_CORNERS;
10357 if (string_has_parameter(value, "reverse"))
10358 result |= STYLE_REVERSE;
10360 if (string_has_parameter(value, "block_clicks"))
10361 result |= STYLE_BLOCK;
10363 if (string_has_parameter(value, "passthrough_clicks"))
10364 result |= STYLE_PASSTHROUGH;
10366 if (string_has_parameter(value, "multiple_actions"))
10367 result |= STYLE_MULTIPLE_ACTIONS;
10369 else if (strEqual(suffix, ".fade_mode"))
10371 result = (string_has_parameter(value, "none") ? FADE_MODE_NONE :
10372 string_has_parameter(value, "fade") ? FADE_MODE_FADE :
10373 string_has_parameter(value, "crossfade") ? FADE_MODE_CROSSFADE :
10374 string_has_parameter(value, "melt") ? FADE_MODE_MELT :
10375 string_has_parameter(value, "curtain") ? FADE_MODE_CURTAIN :
10376 FADE_MODE_DEFAULT);
10378 else if (strEqual(suffix, ".auto_delay_unit"))
10380 result = (string_has_parameter(value, "ms") ? AUTO_DELAY_UNIT_MS :
10381 string_has_parameter(value, "frames") ? AUTO_DELAY_UNIT_FRAMES :
10382 AUTO_DELAY_UNIT_DEFAULT);
10384 else if (strPrefix(suffix, ".font")) // (may also be ".font_xyz")
10386 result = gfx.get_font_from_token_function(value);
10388 else // generic parameter of type integer or boolean
10390 result = (strEqual(value, ARG_UNDEFINED) ? ARG_UNDEFINED_VALUE :
10391 type == TYPE_INTEGER ? get_integer_from_string(value) :
10392 type == TYPE_BOOLEAN ? get_boolean_from_string(value) :
10393 ARG_UNDEFINED_VALUE);
10401 static int get_token_parameter_value(char *token, char *value_raw)
10405 if (token == NULL || value_raw == NULL)
10406 return ARG_UNDEFINED_VALUE;
10408 suffix = strrchr(token, '.');
10409 if (suffix == NULL)
10412 if (strEqual(suffix, ".element"))
10413 return getElementFromToken(value_raw);
10415 // !!! USE CORRECT VALUE TYPE (currently works also for TYPE_BOOLEAN) !!!
10416 return get_parameter_value(value_raw, suffix, TYPE_INTEGER);
10419 void InitMenuDesignSettings_Static(void)
10423 // always start with reliable default values from static default config
10424 for (i = 0; image_config_vars[i].token != NULL; i++)
10426 char *value = getHashEntry(image_config_hash, image_config_vars[i].token);
10429 *image_config_vars[i].value =
10430 get_token_parameter_value(image_config_vars[i].token, value);
10434 static void InitMenuDesignSettings_SpecialPreProcessing(void)
10438 // the following initializes hierarchical values from static configuration
10440 // special case: initialize "ARG_DEFAULT" values in static default config
10441 // (e.g., initialize "[titlemessage].fade_mode" from "[title].fade_mode")
10442 titlescreen_initial_first_default.fade_mode =
10443 title_initial_first_default.fade_mode;
10444 titlescreen_initial_first_default.fade_delay =
10445 title_initial_first_default.fade_delay;
10446 titlescreen_initial_first_default.post_delay =
10447 title_initial_first_default.post_delay;
10448 titlescreen_initial_first_default.auto_delay =
10449 title_initial_first_default.auto_delay;
10450 titlescreen_initial_first_default.auto_delay_unit =
10451 title_initial_first_default.auto_delay_unit;
10452 titlescreen_first_default.fade_mode = title_first_default.fade_mode;
10453 titlescreen_first_default.fade_delay = title_first_default.fade_delay;
10454 titlescreen_first_default.post_delay = title_first_default.post_delay;
10455 titlescreen_first_default.auto_delay = title_first_default.auto_delay;
10456 titlescreen_first_default.auto_delay_unit =
10457 title_first_default.auto_delay_unit;
10458 titlemessage_initial_first_default.fade_mode =
10459 title_initial_first_default.fade_mode;
10460 titlemessage_initial_first_default.fade_delay =
10461 title_initial_first_default.fade_delay;
10462 titlemessage_initial_first_default.post_delay =
10463 title_initial_first_default.post_delay;
10464 titlemessage_initial_first_default.auto_delay =
10465 title_initial_first_default.auto_delay;
10466 titlemessage_initial_first_default.auto_delay_unit =
10467 title_initial_first_default.auto_delay_unit;
10468 titlemessage_first_default.fade_mode = title_first_default.fade_mode;
10469 titlemessage_first_default.fade_delay = title_first_default.fade_delay;
10470 titlemessage_first_default.post_delay = title_first_default.post_delay;
10471 titlemessage_first_default.auto_delay = title_first_default.auto_delay;
10472 titlemessage_first_default.auto_delay_unit =
10473 title_first_default.auto_delay_unit;
10475 titlescreen_initial_default.fade_mode = title_initial_default.fade_mode;
10476 titlescreen_initial_default.fade_delay = title_initial_default.fade_delay;
10477 titlescreen_initial_default.post_delay = title_initial_default.post_delay;
10478 titlescreen_initial_default.auto_delay = title_initial_default.auto_delay;
10479 titlescreen_initial_default.auto_delay_unit =
10480 title_initial_default.auto_delay_unit;
10481 titlescreen_default.fade_mode = title_default.fade_mode;
10482 titlescreen_default.fade_delay = title_default.fade_delay;
10483 titlescreen_default.post_delay = title_default.post_delay;
10484 titlescreen_default.auto_delay = title_default.auto_delay;
10485 titlescreen_default.auto_delay_unit = title_default.auto_delay_unit;
10486 titlemessage_initial_default.fade_mode = title_initial_default.fade_mode;
10487 titlemessage_initial_default.fade_delay = title_initial_default.fade_delay;
10488 titlemessage_initial_default.post_delay = title_initial_default.post_delay;
10489 titlemessage_initial_default.auto_delay_unit =
10490 title_initial_default.auto_delay_unit;
10491 titlemessage_default.fade_mode = title_default.fade_mode;
10492 titlemessage_default.fade_delay = title_default.fade_delay;
10493 titlemessage_default.post_delay = title_default.post_delay;
10494 titlemessage_default.auto_delay = title_default.auto_delay;
10495 titlemessage_default.auto_delay_unit = title_default.auto_delay_unit;
10497 // special case: initialize "ARG_DEFAULT" values in static default config
10498 // (e.g., init "titlemessage_1.fade_mode" from "[titlemessage].fade_mode")
10499 for (i = 0; i < MAX_NUM_TITLE_MESSAGES; i++)
10501 titlescreen_initial_first[i] = titlescreen_initial_first_default;
10502 titlescreen_first[i] = titlescreen_first_default;
10503 titlemessage_initial_first[i] = titlemessage_initial_first_default;
10504 titlemessage_first[i] = titlemessage_first_default;
10506 titlescreen_initial[i] = titlescreen_initial_default;
10507 titlescreen[i] = titlescreen_default;
10508 titlemessage_initial[i] = titlemessage_initial_default;
10509 titlemessage[i] = titlemessage_default;
10512 // special case: initialize "ARG_DEFAULT" values in static default config
10513 // (eg, init "menu.enter_screen.SCORES.xyz" from "menu.enter_screen.xyz")
10514 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
10516 if (i == GFX_SPECIAL_ARG_TITLE) // title values already initialized
10519 menu.enter_screen[i] = menu.enter_screen[GFX_SPECIAL_ARG_DEFAULT];
10520 menu.leave_screen[i] = menu.leave_screen[GFX_SPECIAL_ARG_DEFAULT];
10521 menu.next_screen[i] = menu.next_screen[GFX_SPECIAL_ARG_DEFAULT];
10524 // special case: initialize "ARG_DEFAULT" values in static default config
10525 // (eg, init "viewport.door_1.MAIN.xyz" from "viewport.door_1.xyz")
10526 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
10528 viewport.window[i] = viewport.window[GFX_SPECIAL_ARG_DEFAULT];
10529 viewport.playfield[i] = viewport.playfield[GFX_SPECIAL_ARG_DEFAULT];
10530 viewport.door_1[i] = viewport.door_1[GFX_SPECIAL_ARG_DEFAULT];
10532 if (i == GFX_SPECIAL_ARG_EDITOR) // editor values already initialized
10535 viewport.door_2[i] = viewport.door_2[GFX_SPECIAL_ARG_DEFAULT];
10539 static void InitMenuDesignSettings_SpecialPostProcessing(void)
10543 struct XY *dst, *src;
10545 game_buttons_xy[] =
10547 { &game.button.save, &game.button.stop },
10548 { &game.button.pause2, &game.button.pause },
10549 { &game.button.load, &game.button.play },
10550 { &game.button.undo, &game.button.stop },
10551 { &game.button.redo, &game.button.play },
10557 // special case: initialize later added SETUP list size from LEVELS value
10558 if (menu.list_size[GAME_MODE_SETUP] == -1)
10559 menu.list_size[GAME_MODE_SETUP] = menu.list_size[GAME_MODE_LEVELS];
10561 // set default position for snapshot buttons to stop/pause/play buttons
10562 for (i = 0; game_buttons_xy[i].dst != NULL; i++)
10563 if ((*game_buttons_xy[i].dst).x == -1 &&
10564 (*game_buttons_xy[i].dst).y == -1)
10565 *game_buttons_xy[i].dst = *game_buttons_xy[i].src;
10567 // --------------------------------------------------------------------------
10568 // dynamic viewports (including playfield margins, borders and alignments)
10569 // --------------------------------------------------------------------------
10571 // dynamic viewports currently only supported for landscape mode
10572 int display_width = MAX(video.display_width, video.display_height);
10573 int display_height = MIN(video.display_width, video.display_height);
10575 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
10577 struct RectWithBorder *vp_window = &viewport.window[i];
10578 struct RectWithBorder *vp_playfield = &viewport.playfield[i];
10579 struct RectWithBorder *vp_door_1 = &viewport.door_1[i];
10580 struct RectWithBorder *vp_door_2 = &viewport.door_2[i];
10581 boolean dynamic_window_width = (vp_window->min_width != -1);
10582 boolean dynamic_window_height = (vp_window->min_height != -1);
10583 boolean dynamic_playfield_width = (vp_playfield->min_width != -1);
10584 boolean dynamic_playfield_height = (vp_playfield->min_height != -1);
10586 // adjust window size if min/max width/height is specified
10588 if (vp_window->min_width != -1)
10590 int window_width = display_width;
10592 // when using static window height, use aspect ratio of display
10593 if (vp_window->min_height == -1)
10594 window_width = vp_window->height * display_width / display_height;
10596 vp_window->width = MAX(vp_window->min_width, window_width);
10599 if (vp_window->min_height != -1)
10601 int window_height = display_height;
10603 // when using static window width, use aspect ratio of display
10604 if (vp_window->min_width == -1)
10605 window_height = vp_window->width * display_height / display_width;
10607 vp_window->height = MAX(vp_window->min_height, window_height);
10610 if (vp_window->max_width != -1)
10611 vp_window->width = MIN(vp_window->width, vp_window->max_width);
10613 if (vp_window->max_height != -1)
10614 vp_window->height = MIN(vp_window->height, vp_window->max_height);
10616 int playfield_width = vp_window->width;
10617 int playfield_height = vp_window->height;
10619 // adjust playfield size and position according to specified margins
10621 playfield_width -= vp_playfield->margin_left;
10622 playfield_width -= vp_playfield->margin_right;
10624 playfield_height -= vp_playfield->margin_top;
10625 playfield_height -= vp_playfield->margin_bottom;
10627 // adjust playfield size if min/max width/height is specified
10629 if (vp_playfield->min_width != -1)
10630 vp_playfield->width = MAX(vp_playfield->min_width, playfield_width);
10632 if (vp_playfield->min_height != -1)
10633 vp_playfield->height = MAX(vp_playfield->min_height, playfield_height);
10635 if (vp_playfield->max_width != -1)
10636 vp_playfield->width = MIN(vp_playfield->width, vp_playfield->max_width);
10638 if (vp_playfield->max_height != -1)
10639 vp_playfield->height = MIN(vp_playfield->height,vp_playfield->max_height);
10641 // adjust playfield position according to specified alignment
10643 if (vp_playfield->align == ALIGN_LEFT || vp_playfield->x > 0)
10644 vp_playfield->x = ALIGNED_VP_XPOS(vp_playfield);
10645 else if (vp_playfield->align == ALIGN_CENTER)
10646 vp_playfield->x = playfield_width / 2 - vp_playfield->width / 2;
10647 else if (vp_playfield->align == ALIGN_RIGHT)
10648 vp_playfield->x += playfield_width - vp_playfield->width;
10650 if (vp_playfield->valign == VALIGN_TOP || vp_playfield->y > 0)
10651 vp_playfield->y = ALIGNED_VP_YPOS(vp_playfield);
10652 else if (vp_playfield->valign == VALIGN_MIDDLE)
10653 vp_playfield->y = playfield_height / 2 - vp_playfield->height / 2;
10654 else if (vp_playfield->valign == VALIGN_BOTTOM)
10655 vp_playfield->y += playfield_height - vp_playfield->height;
10657 vp_playfield->x += vp_playfield->margin_left;
10658 vp_playfield->y += vp_playfield->margin_top;
10660 // adjust individual playfield borders if only default border is specified
10662 if (vp_playfield->border_left == -1)
10663 vp_playfield->border_left = vp_playfield->border_size;
10664 if (vp_playfield->border_right == -1)
10665 vp_playfield->border_right = vp_playfield->border_size;
10666 if (vp_playfield->border_top == -1)
10667 vp_playfield->border_top = vp_playfield->border_size;
10668 if (vp_playfield->border_bottom == -1)
10669 vp_playfield->border_bottom = vp_playfield->border_size;
10671 // set dynamic playfield borders if borders are specified as undefined
10672 // (but only if window size was dynamic and playfield size was static)
10674 if (dynamic_window_width && !dynamic_playfield_width)
10676 if (vp_playfield->border_left == -1)
10678 vp_playfield->border_left = (vp_playfield->x -
10679 vp_playfield->margin_left);
10680 vp_playfield->x -= vp_playfield->border_left;
10681 vp_playfield->width += vp_playfield->border_left;
10684 if (vp_playfield->border_right == -1)
10686 vp_playfield->border_right = (vp_window->width -
10688 vp_playfield->width -
10689 vp_playfield->margin_right);
10690 vp_playfield->width += vp_playfield->border_right;
10694 if (dynamic_window_height && !dynamic_playfield_height)
10696 if (vp_playfield->border_top == -1)
10698 vp_playfield->border_top = (vp_playfield->y -
10699 vp_playfield->margin_top);
10700 vp_playfield->y -= vp_playfield->border_top;
10701 vp_playfield->height += vp_playfield->border_top;
10704 if (vp_playfield->border_bottom == -1)
10706 vp_playfield->border_bottom = (vp_window->height -
10708 vp_playfield->height -
10709 vp_playfield->margin_bottom);
10710 vp_playfield->height += vp_playfield->border_bottom;
10714 // adjust playfield size to be a multiple of a defined alignment tile size
10716 int align_size = vp_playfield->align_size;
10717 int playfield_xtiles = vp_playfield->width / align_size;
10718 int playfield_ytiles = vp_playfield->height / align_size;
10719 int playfield_width_corrected = playfield_xtiles * align_size;
10720 int playfield_height_corrected = playfield_ytiles * align_size;
10721 boolean is_playfield_mode = (i == GFX_SPECIAL_ARG_PLAYING ||
10722 i == GFX_SPECIAL_ARG_EDITOR);
10724 if (is_playfield_mode &&
10725 dynamic_playfield_width &&
10726 vp_playfield->width != playfield_width_corrected)
10728 int playfield_xdiff = vp_playfield->width - playfield_width_corrected;
10730 vp_playfield->width = playfield_width_corrected;
10732 if (vp_playfield->align == ALIGN_LEFT)
10734 vp_playfield->border_left += playfield_xdiff;
10736 else if (vp_playfield->align == ALIGN_RIGHT)
10738 vp_playfield->border_right += playfield_xdiff;
10740 else if (vp_playfield->align == ALIGN_CENTER)
10742 int border_left_diff = playfield_xdiff / 2;
10743 int border_right_diff = playfield_xdiff - border_left_diff;
10745 vp_playfield->border_left += border_left_diff;
10746 vp_playfield->border_right += border_right_diff;
10750 if (is_playfield_mode &&
10751 dynamic_playfield_height &&
10752 vp_playfield->height != playfield_height_corrected)
10754 int playfield_ydiff = vp_playfield->height - playfield_height_corrected;
10756 vp_playfield->height = playfield_height_corrected;
10758 if (vp_playfield->valign == VALIGN_TOP)
10760 vp_playfield->border_top += playfield_ydiff;
10762 else if (vp_playfield->align == VALIGN_BOTTOM)
10764 vp_playfield->border_right += playfield_ydiff;
10766 else if (vp_playfield->align == VALIGN_MIDDLE)
10768 int border_top_diff = playfield_ydiff / 2;
10769 int border_bottom_diff = playfield_ydiff - border_top_diff;
10771 vp_playfield->border_top += border_top_diff;
10772 vp_playfield->border_bottom += border_bottom_diff;
10776 // adjust door positions according to specified alignment
10778 for (j = 0; j < 2; j++)
10780 struct RectWithBorder *vp_door = (j == 0 ? vp_door_1 : vp_door_2);
10782 if (vp_door->align == ALIGN_LEFT || vp_door->x > 0)
10783 vp_door->x = ALIGNED_VP_XPOS(vp_door);
10784 else if (vp_door->align == ALIGN_CENTER)
10785 vp_door->x = vp_window->width / 2 - vp_door->width / 2;
10786 else if (vp_door->align == ALIGN_RIGHT)
10787 vp_door->x += vp_window->width - vp_door->width;
10789 if (vp_door->valign == VALIGN_TOP || vp_door->y > 0)
10790 vp_door->y = ALIGNED_VP_YPOS(vp_door);
10791 else if (vp_door->valign == VALIGN_MIDDLE)
10792 vp_door->y = vp_window->height / 2 - vp_door->height / 2;
10793 else if (vp_door->valign == VALIGN_BOTTOM)
10794 vp_door->y += vp_window->height - vp_door->height;
10799 static void InitMenuDesignSettings_SpecialPostProcessing_AfterGraphics(void)
10803 struct XYTileSize *dst, *src;
10806 editor_buttons_xy[] =
10809 &editor.button.element_left, &editor.palette.element_left,
10810 IMG_GFX_EDITOR_BUTTON_ELEMENT_LEFT
10813 &editor.button.element_middle, &editor.palette.element_middle,
10814 IMG_GFX_EDITOR_BUTTON_ELEMENT_MIDDLE
10817 &editor.button.element_right, &editor.palette.element_right,
10818 IMG_GFX_EDITOR_BUTTON_ELEMENT_RIGHT
10825 // set default position for element buttons to element graphics
10826 for (i = 0; editor_buttons_xy[i].dst != NULL; i++)
10828 if ((*editor_buttons_xy[i].dst).x == -1 &&
10829 (*editor_buttons_xy[i].dst).y == -1)
10831 struct GraphicInfo *gd = &graphic_info[editor_buttons_xy[i].graphic];
10833 gd->width = gd->height = editor_buttons_xy[i].src->tile_size;
10835 *editor_buttons_xy[i].dst = *editor_buttons_xy[i].src;
10839 // adjust editor palette rows and columns if specified to be dynamic
10841 if (editor.palette.cols == -1)
10843 int vp_width = viewport.playfield[GFX_SPECIAL_ARG_EDITOR].width;
10844 int bt_width = graphic_info[IMG_EDITOR_PALETTE_BUTTON].width;
10845 int sc_width = graphic_info[IMG_EDITOR_PALETTE_SCROLLBAR].width;
10847 editor.palette.cols = (vp_width - sc_width) / bt_width;
10849 if (editor.palette.x == -1)
10851 int palette_width = editor.palette.cols * bt_width + sc_width;
10853 editor.palette.x = (vp_width - palette_width) / 2;
10857 if (editor.palette.rows == -1)
10859 int vp_height = viewport.playfield[GFX_SPECIAL_ARG_EDITOR].height;
10860 int bt_height = graphic_info[IMG_EDITOR_PALETTE_BUTTON].height;
10861 int tx_height = getFontHeight(FONT_TEXT_2);
10863 editor.palette.rows = (vp_height - tx_height) / bt_height;
10865 if (editor.palette.y == -1)
10867 int palette_height = editor.palette.rows * bt_height + tx_height;
10869 editor.palette.y = (vp_height - palette_height) / 2;
10874 static void LoadMenuDesignSettingsFromFilename(char *filename)
10876 static struct TitleFadingInfo tfi;
10877 static struct TitleMessageInfo tmi;
10878 static struct TokenInfo title_tokens[] =
10880 { TYPE_INTEGER, &tfi.fade_mode, ".fade_mode" },
10881 { TYPE_INTEGER, &tfi.fade_delay, ".fade_delay" },
10882 { TYPE_INTEGER, &tfi.post_delay, ".post_delay" },
10883 { TYPE_INTEGER, &tfi.auto_delay, ".auto_delay" },
10884 { TYPE_INTEGER, &tfi.auto_delay_unit, ".auto_delay_unit" },
10888 static struct TokenInfo titlemessage_tokens[] =
10890 { TYPE_INTEGER, &tmi.x, ".x" },
10891 { TYPE_INTEGER, &tmi.y, ".y" },
10892 { TYPE_INTEGER, &tmi.width, ".width" },
10893 { TYPE_INTEGER, &tmi.height, ".height" },
10894 { TYPE_INTEGER, &tmi.chars, ".chars" },
10895 { TYPE_INTEGER, &tmi.lines, ".lines" },
10896 { TYPE_INTEGER, &tmi.align, ".align" },
10897 { TYPE_INTEGER, &tmi.valign, ".valign" },
10898 { TYPE_INTEGER, &tmi.font, ".font" },
10899 { TYPE_BOOLEAN, &tmi.autowrap, ".autowrap" },
10900 { TYPE_BOOLEAN, &tmi.centered, ".centered" },
10901 { TYPE_BOOLEAN, &tmi.parse_comments, ".parse_comments" },
10902 { TYPE_INTEGER, &tmi.sort_priority, ".sort_priority" },
10903 { TYPE_INTEGER, &tmi.fade_mode, ".fade_mode" },
10904 { TYPE_INTEGER, &tmi.fade_delay, ".fade_delay" },
10905 { TYPE_INTEGER, &tmi.post_delay, ".post_delay" },
10906 { TYPE_INTEGER, &tmi.auto_delay, ".auto_delay" },
10907 { TYPE_INTEGER, &tmi.auto_delay_unit, ".auto_delay_unit" },
10913 struct TitleFadingInfo *info;
10918 // initialize first titles from "enter screen" definitions, if defined
10919 { &title_initial_first_default, "menu.enter_screen.TITLE" },
10920 { &title_first_default, "menu.enter_screen.TITLE" },
10922 // initialize title screens from "next screen" definitions, if defined
10923 { &title_initial_default, "menu.next_screen.TITLE" },
10924 { &title_default, "menu.next_screen.TITLE" },
10930 struct TitleMessageInfo *array;
10933 titlemessage_arrays[] =
10935 // initialize first titles from "enter screen" definitions, if defined
10936 { titlescreen_initial_first, "menu.enter_screen.TITLE" },
10937 { titlescreen_first, "menu.enter_screen.TITLE" },
10938 { titlemessage_initial_first, "menu.enter_screen.TITLE" },
10939 { titlemessage_first, "menu.enter_screen.TITLE" },
10941 // initialize titles from "next screen" definitions, if defined
10942 { titlescreen_initial, "menu.next_screen.TITLE" },
10943 { titlescreen, "menu.next_screen.TITLE" },
10944 { titlemessage_initial, "menu.next_screen.TITLE" },
10945 { titlemessage, "menu.next_screen.TITLE" },
10947 // overwrite titles with title definitions, if defined
10948 { titlescreen_initial_first, "[title_initial]" },
10949 { titlescreen_first, "[title]" },
10950 { titlemessage_initial_first, "[title_initial]" },
10951 { titlemessage_first, "[title]" },
10953 { titlescreen_initial, "[title_initial]" },
10954 { titlescreen, "[title]" },
10955 { titlemessage_initial, "[title_initial]" },
10956 { titlemessage, "[title]" },
10958 // overwrite titles with title screen/message definitions, if defined
10959 { titlescreen_initial_first, "[titlescreen_initial]" },
10960 { titlescreen_first, "[titlescreen]" },
10961 { titlemessage_initial_first, "[titlemessage_initial]" },
10962 { titlemessage_first, "[titlemessage]" },
10964 { titlescreen_initial, "[titlescreen_initial]" },
10965 { titlescreen, "[titlescreen]" },
10966 { titlemessage_initial, "[titlemessage_initial]" },
10967 { titlemessage, "[titlemessage]" },
10971 SetupFileHash *setup_file_hash;
10974 if ((setup_file_hash = loadSetupFileHash(filename)) == NULL)
10977 // the following initializes hierarchical values from dynamic configuration
10979 // special case: initialize with default values that may be overwritten
10980 // (e.g., init "menu.draw_xoffset.INFO" from "menu.draw_xoffset")
10981 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
10983 struct TokenIntPtrInfo menu_config[] =
10985 { "menu.draw_xoffset", &menu.draw_xoffset[i] },
10986 { "menu.draw_yoffset", &menu.draw_yoffset[i] },
10987 { "menu.list_size", &menu.list_size[i] }
10990 for (j = 0; j < ARRAY_SIZE(menu_config); j++)
10992 char *token = menu_config[j].token;
10993 char *value = getHashEntry(setup_file_hash, token);
10996 *menu_config[j].value = get_integer_from_string(value);
11000 // special case: initialize with default values that may be overwritten
11001 // (eg, init "menu.draw_xoffset.INFO[XXX]" from "menu.draw_xoffset.INFO")
11002 for (i = 0; i < NUM_SPECIAL_GFX_INFO_ARGS; i++)
11004 struct TokenIntPtrInfo menu_config[] =
11006 { "menu.draw_xoffset.INFO", &menu.draw_xoffset_info[i] },
11007 { "menu.draw_yoffset.INFO", &menu.draw_yoffset_info[i] },
11008 { "menu.list_size.INFO", &menu.list_size_info[i] }
11011 for (j = 0; j < ARRAY_SIZE(menu_config); j++)
11013 char *token = menu_config[j].token;
11014 char *value = getHashEntry(setup_file_hash, token);
11017 *menu_config[j].value = get_integer_from_string(value);
11021 // special case: initialize with default values that may be overwritten
11022 // (eg, init "menu.draw_xoffset.SETUP[XXX]" from "menu.draw_xoffset.SETUP")
11023 for (i = 0; i < NUM_SPECIAL_GFX_SETUP_ARGS; i++)
11025 struct TokenIntPtrInfo menu_config[] =
11027 { "menu.draw_xoffset.SETUP", &menu.draw_xoffset_setup[i] },
11028 { "menu.draw_yoffset.SETUP", &menu.draw_yoffset_setup[i] }
11031 for (j = 0; j < ARRAY_SIZE(menu_config); j++)
11033 char *token = menu_config[j].token;
11034 char *value = getHashEntry(setup_file_hash, token);
11037 *menu_config[j].value = get_integer_from_string(value);
11041 // special case: initialize with default values that may be overwritten
11042 // (eg, init "menu.line_spacing.INFO[XXX]" from "menu.line_spacing.INFO")
11043 for (i = 0; i < NUM_SPECIAL_GFX_INFO_ARGS; i++)
11045 struct TokenIntPtrInfo menu_config[] =
11047 { "menu.left_spacing.INFO", &menu.left_spacing_info[i] },
11048 { "menu.right_spacing.INFO", &menu.right_spacing_info[i] },
11049 { "menu.top_spacing.INFO", &menu.top_spacing_info[i] },
11050 { "menu.bottom_spacing.INFO", &menu.bottom_spacing_info[i] },
11051 { "menu.paragraph_spacing.INFO", &menu.paragraph_spacing_info[i] },
11052 { "menu.headline1_spacing.INFO", &menu.headline1_spacing_info[i] },
11053 { "menu.headline2_spacing.INFO", &menu.headline2_spacing_info[i] },
11054 { "menu.line_spacing.INFO", &menu.line_spacing_info[i] },
11055 { "menu.extra_spacing.INFO", &menu.extra_spacing_info[i] },
11058 for (j = 0; j < ARRAY_SIZE(menu_config); j++)
11060 char *token = menu_config[j].token;
11061 char *value = getHashEntry(setup_file_hash, token);
11064 *menu_config[j].value = get_integer_from_string(value);
11068 // special case: initialize with default values that may be overwritten
11069 // (eg, init "menu.enter_screen.SCORES.xyz" from "menu.enter_screen.xyz")
11070 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
11072 struct TokenIntPtrInfo menu_config[] =
11074 { "menu.enter_screen.fade_mode", &menu.enter_screen[i].fade_mode },
11075 { "menu.enter_screen.fade_delay", &menu.enter_screen[i].fade_delay },
11076 { "menu.enter_screen.post_delay", &menu.enter_screen[i].post_delay },
11077 { "menu.leave_screen.fade_mode", &menu.leave_screen[i].fade_mode },
11078 { "menu.leave_screen.fade_delay", &menu.leave_screen[i].fade_delay },
11079 { "menu.leave_screen.post_delay", &menu.leave_screen[i].post_delay },
11080 { "menu.next_screen.fade_mode", &menu.next_screen[i].fade_mode },
11081 { "menu.next_screen.fade_delay", &menu.next_screen[i].fade_delay },
11082 { "menu.next_screen.post_delay", &menu.next_screen[i].post_delay }
11085 for (j = 0; j < ARRAY_SIZE(menu_config); j++)
11087 char *token = menu_config[j].token;
11088 char *value = getHashEntry(setup_file_hash, token);
11091 *menu_config[j].value = get_token_parameter_value(token, value);
11095 // special case: initialize with default values that may be overwritten
11096 // (eg, init "viewport.door_1.MAIN.xyz" from "viewport.door_1.xyz")
11097 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
11101 char *token_prefix;
11102 struct RectWithBorder *struct_ptr;
11106 { "viewport.window", &viewport.window[i] },
11107 { "viewport.playfield", &viewport.playfield[i] },
11108 { "viewport.door_1", &viewport.door_1[i] },
11109 { "viewport.door_2", &viewport.door_2[i] }
11112 for (j = 0; j < ARRAY_SIZE(vp_struct); j++)
11114 struct TokenIntPtrInfo vp_config[] =
11116 { ".x", &vp_struct[j].struct_ptr->x },
11117 { ".y", &vp_struct[j].struct_ptr->y },
11118 { ".width", &vp_struct[j].struct_ptr->width },
11119 { ".height", &vp_struct[j].struct_ptr->height },
11120 { ".min_width", &vp_struct[j].struct_ptr->min_width },
11121 { ".min_height", &vp_struct[j].struct_ptr->min_height },
11122 { ".max_width", &vp_struct[j].struct_ptr->max_width },
11123 { ".max_height", &vp_struct[j].struct_ptr->max_height },
11124 { ".margin_left", &vp_struct[j].struct_ptr->margin_left },
11125 { ".margin_right", &vp_struct[j].struct_ptr->margin_right },
11126 { ".margin_top", &vp_struct[j].struct_ptr->margin_top },
11127 { ".margin_bottom", &vp_struct[j].struct_ptr->margin_bottom },
11128 { ".border_left", &vp_struct[j].struct_ptr->border_left },
11129 { ".border_right", &vp_struct[j].struct_ptr->border_right },
11130 { ".border_top", &vp_struct[j].struct_ptr->border_top },
11131 { ".border_bottom", &vp_struct[j].struct_ptr->border_bottom },
11132 { ".border_size", &vp_struct[j].struct_ptr->border_size },
11133 { ".align_size", &vp_struct[j].struct_ptr->align_size },
11134 { ".align", &vp_struct[j].struct_ptr->align },
11135 { ".valign", &vp_struct[j].struct_ptr->valign }
11138 for (k = 0; k < ARRAY_SIZE(vp_config); k++)
11140 char *token = getStringCat2(vp_struct[j].token_prefix,
11141 vp_config[k].token);
11142 char *value = getHashEntry(setup_file_hash, token);
11145 *vp_config[k].value = get_token_parameter_value(token, value);
11152 // special case: initialize with default values that may be overwritten
11153 // (e.g., init "[title].fade_mode" from "menu.next_screen.TITLE.fade_mode")
11154 for (i = 0; title_info[i].info != NULL; i++)
11156 struct TitleFadingInfo *info = title_info[i].info;
11157 char *base_token = title_info[i].text;
11159 for (j = 0; title_tokens[j].type != -1; j++)
11161 char *token = getStringCat2(base_token, title_tokens[j].text);
11162 char *value = getHashEntry(setup_file_hash, token);
11166 int parameter_value = get_token_parameter_value(token, value);
11170 *(int *)title_tokens[j].value = (int)parameter_value;
11179 // special case: initialize with default values that may be overwritten
11180 // (e.g., init "titlemessage_1.fade_mode" from "[titlemessage].fade_mode")
11181 for (i = 0; titlemessage_arrays[i].array != NULL; i++)
11183 struct TitleMessageInfo *array = titlemessage_arrays[i].array;
11184 char *base_token = titlemessage_arrays[i].text;
11186 for (j = 0; titlemessage_tokens[j].type != -1; j++)
11188 char *token = getStringCat2(base_token, titlemessage_tokens[j].text);
11189 char *value = getHashEntry(setup_file_hash, token);
11193 int parameter_value = get_token_parameter_value(token, value);
11195 for (k = 0; k < MAX_NUM_TITLE_MESSAGES; k++)
11199 if (titlemessage_tokens[j].type == TYPE_INTEGER)
11200 *(int *)titlemessage_tokens[j].value = (int)parameter_value;
11202 *(boolean *)titlemessage_tokens[j].value = (boolean)parameter_value;
11212 // special case: check if network and preview player positions are redefined,
11213 // to compare this later against the main menu level preview being redefined
11214 struct TokenIntPtrInfo menu_config_players[] =
11216 { "main.network_players.x", &menu.main.network_players.redefined },
11217 { "main.network_players.y", &menu.main.network_players.redefined },
11218 { "main.preview_players.x", &menu.main.preview_players.redefined },
11219 { "main.preview_players.y", &menu.main.preview_players.redefined },
11220 { "preview.x", &preview.redefined },
11221 { "preview.y", &preview.redefined }
11224 for (i = 0; i < ARRAY_SIZE(menu_config_players); i++)
11225 *menu_config_players[i].value = FALSE;
11227 for (i = 0; i < ARRAY_SIZE(menu_config_players); i++)
11228 if (getHashEntry(setup_file_hash, menu_config_players[i].token) != NULL)
11229 *menu_config_players[i].value = TRUE;
11231 // read (and overwrite with) values that may be specified in config file
11232 for (i = 0; image_config_vars[i].token != NULL; i++)
11234 char *value = getHashEntry(setup_file_hash, image_config_vars[i].token);
11236 // (ignore definitions set to "[DEFAULT]" which are already initialized)
11237 if (value != NULL && !strEqual(value, ARG_DEFAULT))
11238 *image_config_vars[i].value =
11239 get_token_parameter_value(image_config_vars[i].token, value);
11242 freeSetupFileHash(setup_file_hash);
11245 void LoadMenuDesignSettings(void)
11247 char *filename_base = UNDEFINED_FILENAME, *filename_local;
11249 InitMenuDesignSettings_Static();
11250 InitMenuDesignSettings_SpecialPreProcessing();
11252 if (!GFX_OVERRIDE_ARTWORK(ARTWORK_TYPE_GRAPHICS))
11254 // first look for special settings configured in level series config
11255 filename_base = getCustomArtworkLevelConfigFilename(ARTWORK_TYPE_GRAPHICS);
11257 if (fileExists(filename_base))
11258 LoadMenuDesignSettingsFromFilename(filename_base);
11261 filename_local = getCustomArtworkConfigFilename(ARTWORK_TYPE_GRAPHICS);
11263 if (filename_local != NULL && !strEqual(filename_base, filename_local))
11264 LoadMenuDesignSettingsFromFilename(filename_local);
11266 InitMenuDesignSettings_SpecialPostProcessing();
11269 void LoadMenuDesignSettings_AfterGraphics(void)
11271 InitMenuDesignSettings_SpecialPostProcessing_AfterGraphics();
11274 void LoadUserDefinedEditorElementList(int **elements, int *num_elements)
11276 char *filename = getEditorSetupFilename();
11277 SetupFileList *setup_file_list, *list;
11278 SetupFileHash *element_hash;
11279 int num_unknown_tokens = 0;
11282 if ((setup_file_list = loadSetupFileList(filename)) == NULL)
11285 element_hash = newSetupFileHash();
11287 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
11288 setHashEntry(element_hash, element_info[i].token_name, i_to_a(i));
11290 // determined size may be larger than needed (due to unknown elements)
11292 for (list = setup_file_list; list != NULL; list = list->next)
11295 // add space for up to 3 more elements for padding that may be needed
11296 *num_elements += 3;
11298 // free memory for old list of elements, if needed
11299 checked_free(*elements);
11301 // allocate memory for new list of elements
11302 *elements = checked_malloc(*num_elements * sizeof(int));
11305 for (list = setup_file_list; list != NULL; list = list->next)
11307 char *value = getHashEntry(element_hash, list->token);
11309 if (value == NULL) // try to find obsolete token mapping
11311 char *mapped_token = get_mapped_token(list->token);
11313 if (mapped_token != NULL)
11315 value = getHashEntry(element_hash, mapped_token);
11317 free(mapped_token);
11323 (*elements)[(*num_elements)++] = atoi(value);
11327 if (num_unknown_tokens == 0)
11329 Error(ERR_INFO_LINE, "-");
11330 Error(ERR_INFO, "warning: unknown token(s) found in config file:");
11331 Error(ERR_INFO, "- config file: '%s'", filename);
11333 num_unknown_tokens++;
11336 Error(ERR_INFO, "- token: '%s'", list->token);
11340 if (num_unknown_tokens > 0)
11341 Error(ERR_INFO_LINE, "-");
11343 while (*num_elements % 4) // pad with empty elements, if needed
11344 (*elements)[(*num_elements)++] = EL_EMPTY;
11346 freeSetupFileList(setup_file_list);
11347 freeSetupFileHash(element_hash);
11350 for (i = 0; i < *num_elements; i++)
11351 printf("editor: element '%s' [%d]\n",
11352 element_info[(*elements)[i]].token_name, (*elements)[i]);
11356 static struct MusicFileInfo *get_music_file_info_ext(char *basename, int music,
11359 SetupFileHash *setup_file_hash = NULL;
11360 struct MusicFileInfo tmp_music_file_info, *new_music_file_info;
11361 char *filename_music, *filename_prefix, *filename_info;
11367 token_to_value_ptr[] =
11369 { "title_header", &tmp_music_file_info.title_header },
11370 { "artist_header", &tmp_music_file_info.artist_header },
11371 { "album_header", &tmp_music_file_info.album_header },
11372 { "year_header", &tmp_music_file_info.year_header },
11374 { "title", &tmp_music_file_info.title },
11375 { "artist", &tmp_music_file_info.artist },
11376 { "album", &tmp_music_file_info.album },
11377 { "year", &tmp_music_file_info.year },
11383 filename_music = (is_sound ? getCustomSoundFilename(basename) :
11384 getCustomMusicFilename(basename));
11386 if (filename_music == NULL)
11389 // ---------- try to replace file extension ----------
11391 filename_prefix = getStringCopy(filename_music);
11392 if (strrchr(filename_prefix, '.') != NULL)
11393 *strrchr(filename_prefix, '.') = '\0';
11394 filename_info = getStringCat2(filename_prefix, ".txt");
11396 if (fileExists(filename_info))
11397 setup_file_hash = loadSetupFileHash(filename_info);
11399 free(filename_prefix);
11400 free(filename_info);
11402 if (setup_file_hash == NULL)
11404 // ---------- try to add file extension ----------
11406 filename_prefix = getStringCopy(filename_music);
11407 filename_info = getStringCat2(filename_prefix, ".txt");
11409 if (fileExists(filename_info))
11410 setup_file_hash = loadSetupFileHash(filename_info);
11412 free(filename_prefix);
11413 free(filename_info);
11416 if (setup_file_hash == NULL)
11419 // ---------- music file info found ----------
11421 clear_mem(&tmp_music_file_info, sizeof(struct MusicFileInfo));
11423 for (i = 0; token_to_value_ptr[i].token != NULL; i++)
11425 char *value = getHashEntry(setup_file_hash, token_to_value_ptr[i].token);
11427 *token_to_value_ptr[i].value_ptr =
11428 getStringCopy(value != NULL && *value != '\0' ? value : UNKNOWN_NAME);
11431 tmp_music_file_info.basename = getStringCopy(basename);
11432 tmp_music_file_info.music = music;
11433 tmp_music_file_info.is_sound = is_sound;
11435 new_music_file_info = checked_malloc(sizeof(struct MusicFileInfo));
11436 *new_music_file_info = tmp_music_file_info;
11438 return new_music_file_info;
11441 static struct MusicFileInfo *get_music_file_info(char *basename, int music)
11443 return get_music_file_info_ext(basename, music, FALSE);
11446 static struct MusicFileInfo *get_sound_file_info(char *basename, int sound)
11448 return get_music_file_info_ext(basename, sound, TRUE);
11451 static boolean music_info_listed_ext(struct MusicFileInfo *list,
11452 char *basename, boolean is_sound)
11454 for (; list != NULL; list = list->next)
11455 if (list->is_sound == is_sound && strEqual(list->basename, basename))
11461 static boolean music_info_listed(struct MusicFileInfo *list, char *basename)
11463 return music_info_listed_ext(list, basename, FALSE);
11466 static boolean sound_info_listed(struct MusicFileInfo *list, char *basename)
11468 return music_info_listed_ext(list, basename, TRUE);
11471 void LoadMusicInfo(void)
11473 char *music_directory = getCustomMusicDirectory();
11474 int num_music = getMusicListSize();
11475 int num_music_noconf = 0;
11476 int num_sounds = getSoundListSize();
11478 DirectoryEntry *dir_entry;
11479 struct FileInfo *music, *sound;
11480 struct MusicFileInfo *next, **new;
11483 while (music_file_info != NULL)
11485 next = music_file_info->next;
11487 checked_free(music_file_info->basename);
11489 checked_free(music_file_info->title_header);
11490 checked_free(music_file_info->artist_header);
11491 checked_free(music_file_info->album_header);
11492 checked_free(music_file_info->year_header);
11494 checked_free(music_file_info->title);
11495 checked_free(music_file_info->artist);
11496 checked_free(music_file_info->album);
11497 checked_free(music_file_info->year);
11499 free(music_file_info);
11501 music_file_info = next;
11504 new = &music_file_info;
11506 for (i = 0; i < num_music; i++)
11508 music = getMusicListEntry(i);
11510 if (music->filename == NULL)
11513 if (strEqual(music->filename, UNDEFINED_FILENAME))
11516 // a configured file may be not recognized as music
11517 if (!FileIsMusic(music->filename))
11520 if (!music_info_listed(music_file_info, music->filename))
11522 *new = get_music_file_info(music->filename, i);
11525 new = &(*new)->next;
11529 if ((dir = openDirectory(music_directory)) == NULL)
11531 Error(ERR_WARN, "cannot read music directory '%s'", music_directory);
11535 while ((dir_entry = readDirectory(dir)) != NULL) // loop all entries
11537 char *basename = dir_entry->basename;
11538 boolean music_already_used = FALSE;
11541 // skip all music files that are configured in music config file
11542 for (i = 0; i < num_music; i++)
11544 music = getMusicListEntry(i);
11546 if (music->filename == NULL)
11549 if (strEqual(basename, music->filename))
11551 music_already_used = TRUE;
11556 if (music_already_used)
11559 if (!FileIsMusic(dir_entry->filename))
11562 if (!music_info_listed(music_file_info, basename))
11564 *new = get_music_file_info(basename, MAP_NOCONF_MUSIC(num_music_noconf));
11567 new = &(*new)->next;
11570 num_music_noconf++;
11573 closeDirectory(dir);
11575 for (i = 0; i < num_sounds; i++)
11577 sound = getSoundListEntry(i);
11579 if (sound->filename == NULL)
11582 if (strEqual(sound->filename, UNDEFINED_FILENAME))
11585 // a configured file may be not recognized as sound
11586 if (!FileIsSound(sound->filename))
11589 if (!sound_info_listed(music_file_info, sound->filename))
11591 *new = get_sound_file_info(sound->filename, i);
11593 new = &(*new)->next;
11598 static void add_helpanim_entry(int element, int action, int direction,
11599 int delay, int *num_list_entries)
11601 struct HelpAnimInfo *new_list_entry;
11602 (*num_list_entries)++;
11605 checked_realloc(helpanim_info,
11606 *num_list_entries * sizeof(struct HelpAnimInfo));
11607 new_list_entry = &helpanim_info[*num_list_entries - 1];
11609 new_list_entry->element = element;
11610 new_list_entry->action = action;
11611 new_list_entry->direction = direction;
11612 new_list_entry->delay = delay;
11615 static void print_unknown_token(char *filename, char *token, int token_nr)
11619 Error(ERR_INFO_LINE, "-");
11620 Error(ERR_INFO, "warning: unknown token(s) found in config file:");
11621 Error(ERR_INFO, "- config file: '%s'", filename);
11624 Error(ERR_INFO, "- token: '%s'", token);
11627 static void print_unknown_token_end(int token_nr)
11630 Error(ERR_INFO_LINE, "-");
11633 void LoadHelpAnimInfo(void)
11635 char *filename = getHelpAnimFilename();
11636 SetupFileList *setup_file_list = NULL, *list;
11637 SetupFileHash *element_hash, *action_hash, *direction_hash;
11638 int num_list_entries = 0;
11639 int num_unknown_tokens = 0;
11642 if (fileExists(filename))
11643 setup_file_list = loadSetupFileList(filename);
11645 if (setup_file_list == NULL)
11647 // use reliable default values from static configuration
11648 SetupFileList *insert_ptr;
11650 insert_ptr = setup_file_list =
11651 newSetupFileList(helpanim_config[0].token,
11652 helpanim_config[0].value);
11654 for (i = 1; helpanim_config[i].token; i++)
11655 insert_ptr = addListEntry(insert_ptr,
11656 helpanim_config[i].token,
11657 helpanim_config[i].value);
11660 element_hash = newSetupFileHash();
11661 action_hash = newSetupFileHash();
11662 direction_hash = newSetupFileHash();
11664 for (i = 0; i < MAX_NUM_ELEMENTS; i++)
11665 setHashEntry(element_hash, element_info[i].token_name, i_to_a(i));
11667 for (i = 0; i < NUM_ACTIONS; i++)
11668 setHashEntry(action_hash, element_action_info[i].suffix,
11669 i_to_a(element_action_info[i].value));
11671 // do not store direction index (bit) here, but direction value!
11672 for (i = 0; i < NUM_DIRECTIONS_FULL; i++)
11673 setHashEntry(direction_hash, element_direction_info[i].suffix,
11674 i_to_a(1 << element_direction_info[i].value));
11676 for (list = setup_file_list; list != NULL; list = list->next)
11678 char *element_token, *action_token, *direction_token;
11679 char *element_value, *action_value, *direction_value;
11680 int delay = atoi(list->value);
11682 if (strEqual(list->token, "end"))
11684 add_helpanim_entry(HELPANIM_LIST_NEXT, -1, -1, -1, &num_list_entries);
11689 /* first try to break element into element/action/direction parts;
11690 if this does not work, also accept combined "element[.act][.dir]"
11691 elements (like "dynamite.active"), which are unique elements */
11693 if (strchr(list->token, '.') == NULL) // token contains no '.'
11695 element_value = getHashEntry(element_hash, list->token);
11696 if (element_value != NULL) // element found
11697 add_helpanim_entry(atoi(element_value), -1, -1, delay,
11698 &num_list_entries);
11701 // no further suffixes found -- this is not an element
11702 print_unknown_token(filename, list->token, num_unknown_tokens++);
11708 // token has format "<prefix>.<something>"
11710 action_token = strchr(list->token, '.'); // suffix may be action ...
11711 direction_token = action_token; // ... or direction
11713 element_token = getStringCopy(list->token);
11714 *strchr(element_token, '.') = '\0';
11716 element_value = getHashEntry(element_hash, element_token);
11718 if (element_value == NULL) // this is no element
11720 element_value = getHashEntry(element_hash, list->token);
11721 if (element_value != NULL) // combined element found
11722 add_helpanim_entry(atoi(element_value), -1, -1, delay,
11723 &num_list_entries);
11725 print_unknown_token(filename, list->token, num_unknown_tokens++);
11727 free(element_token);
11732 action_value = getHashEntry(action_hash, action_token);
11734 if (action_value != NULL) // action found
11736 add_helpanim_entry(atoi(element_value), atoi(action_value), -1, delay,
11737 &num_list_entries);
11739 free(element_token);
11744 direction_value = getHashEntry(direction_hash, direction_token);
11746 if (direction_value != NULL) // direction found
11748 add_helpanim_entry(atoi(element_value), -1, atoi(direction_value), delay,
11749 &num_list_entries);
11751 free(element_token);
11756 if (strchr(action_token + 1, '.') == NULL)
11758 // no further suffixes found -- this is not an action nor direction
11760 element_value = getHashEntry(element_hash, list->token);
11761 if (element_value != NULL) // combined element found
11762 add_helpanim_entry(atoi(element_value), -1, -1, delay,
11763 &num_list_entries);
11765 print_unknown_token(filename, list->token, num_unknown_tokens++);
11767 free(element_token);
11772 // token has format "<prefix>.<suffix>.<something>"
11774 direction_token = strchr(action_token + 1, '.');
11776 action_token = getStringCopy(action_token);
11777 *strchr(action_token + 1, '.') = '\0';
11779 action_value = getHashEntry(action_hash, action_token);
11781 if (action_value == NULL) // this is no action
11783 element_value = getHashEntry(element_hash, list->token);
11784 if (element_value != NULL) // combined element found
11785 add_helpanim_entry(atoi(element_value), -1, -1, delay,
11786 &num_list_entries);
11788 print_unknown_token(filename, list->token, num_unknown_tokens++);
11790 free(element_token);
11791 free(action_token);
11796 direction_value = getHashEntry(direction_hash, direction_token);
11798 if (direction_value != NULL) // direction found
11800 add_helpanim_entry(atoi(element_value), atoi(action_value),
11801 atoi(direction_value), delay, &num_list_entries);
11803 free(element_token);
11804 free(action_token);
11809 // this is no direction
11811 element_value = getHashEntry(element_hash, list->token);
11812 if (element_value != NULL) // combined element found
11813 add_helpanim_entry(atoi(element_value), -1, -1, delay,
11814 &num_list_entries);
11816 print_unknown_token(filename, list->token, num_unknown_tokens++);
11818 free(element_token);
11819 free(action_token);
11822 print_unknown_token_end(num_unknown_tokens);
11824 add_helpanim_entry(HELPANIM_LIST_NEXT, -1, -1, -1, &num_list_entries);
11825 add_helpanim_entry(HELPANIM_LIST_END, -1, -1, -1, &num_list_entries);
11827 freeSetupFileList(setup_file_list);
11828 freeSetupFileHash(element_hash);
11829 freeSetupFileHash(action_hash);
11830 freeSetupFileHash(direction_hash);
11833 for (i = 0; i < num_list_entries; i++)
11834 printf("::: '%s': %d, %d, %d => %d\n",
11835 EL_NAME(helpanim_info[i].element),
11836 helpanim_info[i].element,
11837 helpanim_info[i].action,
11838 helpanim_info[i].direction,
11839 helpanim_info[i].delay);
11843 void LoadHelpTextInfo(void)
11845 char *filename = getHelpTextFilename();
11848 if (helptext_info != NULL)
11850 freeSetupFileHash(helptext_info);
11851 helptext_info = NULL;
11854 if (fileExists(filename))
11855 helptext_info = loadSetupFileHash(filename);
11857 if (helptext_info == NULL)
11859 // use reliable default values from static configuration
11860 helptext_info = newSetupFileHash();
11862 for (i = 0; helptext_config[i].token; i++)
11863 setHashEntry(helptext_info,
11864 helptext_config[i].token,
11865 helptext_config[i].value);
11869 BEGIN_HASH_ITERATION(helptext_info, itr)
11871 printf("::: '%s' => '%s'\n",
11872 HASH_ITERATION_TOKEN(itr), HASH_ITERATION_VALUE(itr));
11874 END_HASH_ITERATION(hash, itr)
11879 // ----------------------------------------------------------------------------
11881 // ----------------------------------------------------------------------------
11883 #define MAX_NUM_CONVERT_LEVELS 1000
11885 void ConvertLevels(void)
11887 static LevelDirTree *convert_leveldir = NULL;
11888 static int convert_level_nr = -1;
11889 static int num_levels_handled = 0;
11890 static int num_levels_converted = 0;
11891 static boolean levels_failed[MAX_NUM_CONVERT_LEVELS];
11894 convert_leveldir = getTreeInfoFromIdentifier(leveldir_first,
11895 global.convert_leveldir);
11897 if (convert_leveldir == NULL)
11898 Error(ERR_EXIT, "no such level identifier: '%s'",
11899 global.convert_leveldir);
11901 leveldir_current = convert_leveldir;
11903 if (global.convert_level_nr != -1)
11905 convert_leveldir->first_level = global.convert_level_nr;
11906 convert_leveldir->last_level = global.convert_level_nr;
11909 convert_level_nr = convert_leveldir->first_level;
11911 PrintLine("=", 79);
11912 Print("Converting levels\n");
11913 PrintLine("-", 79);
11914 Print("Level series identifier: '%s'\n", convert_leveldir->identifier);
11915 Print("Level series name: '%s'\n", convert_leveldir->name);
11916 Print("Level series author: '%s'\n", convert_leveldir->author);
11917 Print("Number of levels: %d\n", convert_leveldir->levels);
11918 PrintLine("=", 79);
11921 for (i = 0; i < MAX_NUM_CONVERT_LEVELS; i++)
11922 levels_failed[i] = FALSE;
11924 while (convert_level_nr <= convert_leveldir->last_level)
11926 char *level_filename;
11929 level_nr = convert_level_nr++;
11931 Print("Level %03d: ", level_nr);
11933 LoadLevel(level_nr);
11934 if (level.no_level_file || level.no_valid_file)
11936 Print("(no level)\n");
11940 Print("converting level ... ");
11942 level_filename = getDefaultLevelFilename(level_nr);
11943 new_level = !fileExists(level_filename);
11947 SaveLevel(level_nr);
11949 num_levels_converted++;
11951 Print("converted.\n");
11955 if (level_nr >= 0 && level_nr < MAX_NUM_CONVERT_LEVELS)
11956 levels_failed[level_nr] = TRUE;
11958 Print("NOT CONVERTED -- LEVEL ALREADY EXISTS.\n");
11961 num_levels_handled++;
11965 PrintLine("=", 79);
11966 Print("Number of levels handled: %d\n", num_levels_handled);
11967 Print("Number of levels converted: %d (%d%%)\n", num_levels_converted,
11968 (num_levels_handled ?
11969 num_levels_converted * 100 / num_levels_handled : 0));
11970 PrintLine("-", 79);
11971 Print("Summary (for automatic parsing by scripts):\n");
11972 Print("LEVELDIR '%s', CONVERTED %d/%d (%d%%)",
11973 convert_leveldir->identifier, num_levels_converted,
11974 num_levels_handled,
11975 (num_levels_handled ?
11976 num_levels_converted * 100 / num_levels_handled : 0));
11978 if (num_levels_handled != num_levels_converted)
11980 Print(", FAILED:");
11981 for (i = 0; i < MAX_NUM_CONVERT_LEVELS; i++)
11982 if (levels_failed[i])
11987 PrintLine("=", 79);
11989 CloseAllAndExit(0);
11993 // ----------------------------------------------------------------------------
11994 // create and save images for use in level sketches (raw BMP format)
11995 // ----------------------------------------------------------------------------
11997 void CreateLevelSketchImages(void)
12003 InitElementPropertiesGfxElement();
12005 bitmap1 = CreateBitmap(TILEX, TILEY, DEFAULT_DEPTH);
12006 bitmap2 = CreateBitmap(MINI_TILEX, MINI_TILEY, DEFAULT_DEPTH);
12008 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
12010 int element = getMappedElement(i);
12011 char basename1[16];
12012 char basename2[16];
12016 sprintf(basename1, "%04d.bmp", i);
12017 sprintf(basename2, "%04ds.bmp", i);
12019 filename1 = getPath2(global.create_images_dir, basename1);
12020 filename2 = getPath2(global.create_images_dir, basename2);
12022 DrawSizedElement(0, 0, element, TILESIZE);
12023 BlitBitmap(drawto, bitmap1, SX, SY, TILEX, TILEY, 0, 0);
12025 if (SDL_SaveBMP(bitmap1->surface, filename1) != 0)
12026 Error(ERR_EXIT, "cannot save level sketch image file '%s'", filename1);
12028 DrawSizedElement(0, 0, element, MINI_TILESIZE);
12029 BlitBitmap(drawto, bitmap2, SX, SY, MINI_TILEX, MINI_TILEY, 0, 0);
12031 if (SDL_SaveBMP(bitmap2->surface, filename2) != 0)
12032 Error(ERR_EXIT, "cannot save level sketch image file '%s'", filename2);
12037 // create corresponding SQL statements (for normal and small images)
12040 printf("insert into phpbb_words values (NULL, '`%03d', '<IMG class=\"levelsketch\" src=\"/I/%04d.png\"/>');\n", i, i);
12041 printf("insert into phpbb_words values (NULL, '¸%03d', '<IMG class=\"levelsketch\" src=\"/I/%04ds.png\"/>');\n", i, i);
12044 printf("insert into phpbb_words values (NULL, '`%04d', '<IMG class=\"levelsketch\" src=\"/I/%04d.png\"/>');\n", i, i);
12045 printf("insert into phpbb_words values (NULL, '¸%04d', '<IMG class=\"levelsketch\" src=\"/I/%04ds.png\"/>');\n", i, i);
12047 // optional: create content for forum level sketch demonstration post
12049 fprintf(stderr, "%03d `%03d%c", i, i, (i % 10 < 9 ? ' ' : '\n'));
12052 FreeBitmap(bitmap1);
12053 FreeBitmap(bitmap2);
12056 fprintf(stderr, "\n");
12058 Error(ERR_INFO, "%d normal and small images created", NUM_FILE_ELEMENTS);
12060 CloseAllAndExit(0);
12064 // ----------------------------------------------------------------------------
12065 // create and save images for custom and group elements (raw BMP format)
12066 // ----------------------------------------------------------------------------
12068 void CreateCustomElementImages(char *directory)
12070 char *src_basename = "RocksCE-template.ilbm";
12071 char *dst_basename = "RocksCE.bmp";
12072 char *src_filename = getPath2(directory, src_basename);
12073 char *dst_filename = getPath2(directory, dst_basename);
12074 Bitmap *src_bitmap;
12076 int yoffset_ce = 0;
12077 int yoffset_ge = (TILEY * NUM_CUSTOM_ELEMENTS / 16);
12080 InitVideoDefaults();
12082 ReCreateBitmap(&backbuffer, video.width, video.height);
12084 src_bitmap = LoadImage(src_filename);
12086 bitmap = CreateBitmap(TILEX * 16 * 2,
12087 TILEY * (NUM_CUSTOM_ELEMENTS + NUM_GROUP_ELEMENTS) / 16,
12090 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
12097 BlitBitmap(src_bitmap, bitmap, 0, 0, TILEX, TILEY,
12098 TILEX * x, TILEY * y + yoffset_ce);
12100 BlitBitmap(src_bitmap, bitmap, 0, TILEY,
12102 TILEX * x + TILEX * 16,
12103 TILEY * y + yoffset_ce);
12105 for (j = 2; j >= 0; j--)
12109 BlitBitmap(src_bitmap, bitmap,
12110 TILEX + c * 7, 0, 6, 10,
12111 TILEX * x + 6 + j * 7,
12112 TILEY * y + 11 + yoffset_ce);
12114 BlitBitmap(src_bitmap, bitmap,
12115 TILEX + c * 8, TILEY, 6, 10,
12116 TILEX * 16 + TILEX * x + 6 + j * 8,
12117 TILEY * y + 10 + yoffset_ce);
12123 for (i = 0; i < NUM_GROUP_ELEMENTS; i++)
12130 BlitBitmap(src_bitmap, bitmap, 0, 0, TILEX, TILEY,
12131 TILEX * x, TILEY * y + yoffset_ge);
12133 BlitBitmap(src_bitmap, bitmap, 0, TILEY,
12135 TILEX * x + TILEX * 16,
12136 TILEY * y + yoffset_ge);
12138 for (j = 1; j >= 0; j--)
12142 BlitBitmap(src_bitmap, bitmap, TILEX + c * 10, 11, 10, 10,
12143 TILEX * x + 6 + j * 10,
12144 TILEY * y + 11 + yoffset_ge);
12146 BlitBitmap(src_bitmap, bitmap,
12147 TILEX + c * 8, TILEY + 12, 6, 10,
12148 TILEX * 16 + TILEX * x + 10 + j * 8,
12149 TILEY * y + 10 + yoffset_ge);
12155 if (SDL_SaveBMP(bitmap->surface, dst_filename) != 0)
12156 Error(ERR_EXIT, "cannot save CE graphics file '%s'", dst_filename);
12158 FreeBitmap(bitmap);
12160 CloseAllAndExit(0);