1 // ============================================================================
2 // Rocks'n'Diamonds - McDuffin Strikes Back!
3 // ----------------------------------------------------------------------------
4 // (c) 1995-2014 by Artsoft Entertainment
7 // http://www.artsoft.org/
8 // ----------------------------------------------------------------------------
10 // ============================================================================
17 #include "libgame/libgame.h"
26 #define ENABLE_UNUSED_CODE 0 // currently unused functions
27 #define ENABLE_HISTORIC_CHUNKS 0 // only for historic reference
28 #define ENABLE_RESERVED_CODE 0 // reserved for later use
30 #define CHUNK_ID_LEN 4 // IFF style chunk id length
31 #define CHUNK_SIZE_UNDEFINED 0 // undefined chunk size == 0
32 #define CHUNK_SIZE_NONE -1 // do not write chunk size
34 #define LEVEL_CHUNK_NAME_SIZE MAX_LEVEL_NAME_LEN
35 #define LEVEL_CHUNK_AUTH_SIZE MAX_LEVEL_AUTHOR_LEN
37 #define LEVEL_CHUNK_VERS_SIZE 8 // size of file version chunk
38 #define LEVEL_CHUNK_DATE_SIZE 4 // size of file date chunk
39 #define LEVEL_CHUNK_HEAD_SIZE 80 // size of level file header
40 #define LEVEL_CHUNK_HEAD_UNUSED 0 // unused level header bytes
41 #define LEVEL_CHUNK_CNT2_SIZE 160 // size of level CNT2 chunk
42 #define LEVEL_CHUNK_CNT2_UNUSED 11 // unused CNT2 chunk bytes
43 #define LEVEL_CHUNK_CNT3_HEADER 16 // size of level CNT3 header
44 #define LEVEL_CHUNK_CNT3_UNUSED 10 // unused CNT3 chunk bytes
45 #define LEVEL_CPART_CUS3_SIZE 134 // size of CUS3 chunk part
46 #define LEVEL_CPART_CUS3_UNUSED 15 // unused CUS3 bytes / part
47 #define LEVEL_CHUNK_GRP1_SIZE 74 // size of level GRP1 chunk
49 // (element number, number of change pages, change page number)
50 #define LEVEL_CHUNK_CUSX_UNCHANGED (2 + (1 + 1) + (1 + 1))
52 // (element number only)
53 #define LEVEL_CHUNK_GRPX_UNCHANGED 2
54 #define LEVEL_CHUNK_NOTE_UNCHANGED 2
56 // (nothing at all if unchanged)
57 #define LEVEL_CHUNK_ELEM_UNCHANGED 0
59 #define TAPE_CHUNK_VERS_SIZE 8 // size of file version chunk
60 #define TAPE_CHUNK_HEAD_SIZE 20 // size of tape file header
61 #define TAPE_CHUNK_HEAD_UNUSED 2 // unused tape header bytes
63 #define LEVEL_CHUNK_CNT3_SIZE(x) (LEVEL_CHUNK_CNT3_HEADER + (x))
64 #define LEVEL_CHUNK_CUS3_SIZE(x) (2 + (x) * LEVEL_CPART_CUS3_SIZE)
65 #define LEVEL_CHUNK_CUS4_SIZE(x) (96 + (x) * 48)
67 // file identifier strings
68 #define LEVEL_COOKIE_TMPL "ROCKSNDIAMONDS_LEVEL_FILE_VERSION_x.x"
69 #define TAPE_COOKIE_TMPL "ROCKSNDIAMONDS_TAPE_FILE_VERSION_x.x"
70 #define SCORE_COOKIE "ROCKSNDIAMONDS_SCORE_FILE_VERSION_1.2"
72 // values for deciding when (not) to save configuration data
73 #define SAVE_CONF_NEVER 0
74 #define SAVE_CONF_ALWAYS 1
75 #define SAVE_CONF_WHEN_CHANGED -1
77 // values for chunks using micro chunks
78 #define CONF_MASK_1_BYTE 0x00
79 #define CONF_MASK_2_BYTE 0x40
80 #define CONF_MASK_4_BYTE 0x80
81 #define CONF_MASK_MULTI_BYTES 0xc0
83 #define CONF_MASK_BYTES 0xc0
84 #define CONF_MASK_TOKEN 0x3f
86 #define CONF_VALUE_1_BYTE(x) (CONF_MASK_1_BYTE | (x))
87 #define CONF_VALUE_2_BYTE(x) (CONF_MASK_2_BYTE | (x))
88 #define CONF_VALUE_4_BYTE(x) (CONF_MASK_4_BYTE | (x))
89 #define CONF_VALUE_MULTI_BYTES(x) (CONF_MASK_MULTI_BYTES | (x))
91 // these definitions are just for convenience of use and readability
92 #define CONF_VALUE_8_BIT(x) CONF_VALUE_1_BYTE(x)
93 #define CONF_VALUE_16_BIT(x) CONF_VALUE_2_BYTE(x)
94 #define CONF_VALUE_32_BIT(x) CONF_VALUE_4_BYTE(x)
95 #define CONF_VALUE_BYTES(x) CONF_VALUE_MULTI_BYTES(x)
97 #define CONF_VALUE_NUM_BYTES(x) ((x) == CONF_MASK_1_BYTE ? 1 : \
98 (x) == CONF_MASK_2_BYTE ? 2 : \
99 (x) == CONF_MASK_4_BYTE ? 4 : 0)
101 #define CONF_CONTENT_NUM_ELEMENTS (3 * 3)
102 #define CONF_CONTENT_NUM_BYTES (CONF_CONTENT_NUM_ELEMENTS * 2)
103 #define CONF_ELEMENT_NUM_BYTES (2)
105 #define CONF_ENTITY_NUM_BYTES(t) ((t) == TYPE_ELEMENT || \
106 (t) == TYPE_ELEMENT_LIST ? \
107 CONF_ELEMENT_NUM_BYTES : \
108 (t) == TYPE_CONTENT || \
109 (t) == TYPE_CONTENT_LIST ? \
110 CONF_CONTENT_NUM_BYTES : 1)
112 #define CONF_ELEMENT_BYTE_POS(i) ((i) * CONF_ELEMENT_NUM_BYTES)
113 #define CONF_ELEMENTS_ELEMENT(b,i) ((b[CONF_ELEMENT_BYTE_POS(i)] << 8) | \
114 (b[CONF_ELEMENT_BYTE_POS(i) + 1]))
116 #define CONF_CONTENT_ELEMENT_POS(c,x,y) ((c) * CONF_CONTENT_NUM_ELEMENTS + \
118 #define CONF_CONTENT_BYTE_POS(c,x,y) (CONF_CONTENT_ELEMENT_POS(c,x,y) * \
119 CONF_ELEMENT_NUM_BYTES)
120 #define CONF_CONTENTS_ELEMENT(b,c,x,y) ((b[CONF_CONTENT_BYTE_POS(c,x,y)]<< 8)|\
121 (b[CONF_CONTENT_BYTE_POS(c,x,y) + 1]))
123 // temporary variables used to store pointers to structure members
124 static struct LevelInfo li;
125 static struct ElementInfo xx_ei, yy_ei;
126 static struct ElementChangeInfo xx_change;
127 static struct ElementGroupInfo xx_group;
128 static struct EnvelopeInfo xx_envelope;
129 static unsigned int xx_event_bits[NUM_CE_BITFIELDS];
130 static char xx_default_description[MAX_ELEMENT_NAME_LEN + 1];
131 static int xx_num_contents;
132 static int xx_current_change_page;
133 static char xx_default_string_empty[1] = "";
134 static int xx_string_length_unused;
136 struct LevelFileConfigInfo
138 int element; // element for which data is to be stored
139 int save_type; // save data always, never or when changed
140 int data_type; // data type (used internally, not stored)
141 int conf_type; // micro chunk identifier (stored in file)
144 void *value; // variable that holds the data to be stored
145 int default_value; // initial default value for this variable
148 void *value_copy; // variable that holds the data to be copied
149 void *num_entities; // number of entities for multi-byte data
150 int default_num_entities; // default number of entities for this data
151 int max_num_entities; // maximal number of entities for this data
152 char *default_string; // optional default string for string data
155 static struct LevelFileConfigInfo chunk_config_INFO[] =
157 // ---------- values not related to single elements -------------------------
160 -1, SAVE_CONF_ALWAYS,
161 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
162 &li.game_engine_type, GAME_ENGINE_TYPE_RND
166 -1, SAVE_CONF_ALWAYS,
167 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
168 &li.fieldx, STD_LEV_FIELDX
171 -1, SAVE_CONF_ALWAYS,
172 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
173 &li.fieldy, STD_LEV_FIELDY
177 -1, SAVE_CONF_ALWAYS,
178 TYPE_INTEGER, CONF_VALUE_16_BIT(3),
183 -1, SAVE_CONF_ALWAYS,
184 TYPE_INTEGER, CONF_VALUE_16_BIT(4),
190 TYPE_INTEGER, CONF_VALUE_32_BIT(2),
196 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
197 &li.use_step_counter, FALSE
202 TYPE_BITFIELD, CONF_VALUE_8_BIT(4),
203 &li.wind_direction_initial, MV_NONE
208 TYPE_BOOLEAN, CONF_VALUE_8_BIT(5),
209 &li.em_slippery_gems, FALSE
214 TYPE_BOOLEAN, CONF_VALUE_8_BIT(6),
215 &li.use_custom_template, FALSE
220 TYPE_BITFIELD, CONF_VALUE_32_BIT(1),
221 &li.can_move_into_acid_bits, ~0 // default: everything can
226 TYPE_BITFIELD, CONF_VALUE_8_BIT(7),
227 &li.dont_collide_with_bits, ~0 // default: always deadly
232 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
233 &li.em_explodes_by_fire, FALSE
238 TYPE_INTEGER, CONF_VALUE_16_BIT(5),
239 &li.score[SC_TIME_BONUS], 1
244 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
245 &li.auto_exit_sokoban, FALSE
250 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
251 &li.auto_count_gems, FALSE
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
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
779 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
784 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
789 EL_EMC_MAGNIFIER, -1,
790 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
791 &li.magnify_score, 10
794 EL_EMC_MAGNIFIER, -1,
795 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
800 EL_EMC_MAGIC_BALL, -1,
801 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
805 EL_EMC_MAGIC_BALL, -1,
806 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
807 &li.ball_random, FALSE
810 EL_EMC_MAGIC_BALL, -1,
811 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
812 &li.ball_state_initial, FALSE
815 EL_EMC_MAGIC_BALL, -1,
816 TYPE_CONTENT_LIST, CONF_VALUE_BYTES(1),
817 &li.ball_content, EL_EMPTY, NULL,
818 &li.num_ball_contents, 4, MAX_ELEMENT_CONTENTS
822 EL_SOKOBAN_FIELD_EMPTY, -1,
823 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
824 &li.sb_fields_needed, TRUE
828 EL_SOKOBAN_OBJECT, -1,
829 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
830 &li.sb_objects_needed, TRUE
835 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
836 &li.mm_laser_red, FALSE
840 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
841 &li.mm_laser_green, FALSE
845 TYPE_BOOLEAN, CONF_VALUE_8_BIT(3),
846 &li.mm_laser_blue, TRUE
851 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
852 &li.df_laser_red, TRUE
856 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
857 &li.df_laser_green, TRUE
861 TYPE_BOOLEAN, CONF_VALUE_8_BIT(3),
862 &li.df_laser_blue, FALSE
866 EL_MM_FUSE_ACTIVE, -1,
867 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
872 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
877 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
881 EL_MM_STEEL_BLOCK, -1,
882 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
883 &li.mm_time_block, 75
887 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
888 &li.score[SC_ELEM_BONUS], 10
891 // ---------- unused values -------------------------------------------------
894 EL_UNKNOWN, SAVE_CONF_NEVER,
895 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
896 &li.score[SC_UNKNOWN_15], 10
906 static struct LevelFileConfigInfo chunk_config_NOTE[] =
910 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
911 &xx_envelope.xsize, MAX_ENVELOPE_XSIZE,
915 TYPE_INTEGER, CONF_VALUE_8_BIT(2),
916 &xx_envelope.ysize, MAX_ENVELOPE_YSIZE,
921 TYPE_BOOLEAN, CONF_VALUE_8_BIT(3),
922 &xx_envelope.autowrap, FALSE
926 TYPE_BOOLEAN, CONF_VALUE_8_BIT(4),
927 &xx_envelope.centered, FALSE
932 TYPE_STRING, CONF_VALUE_BYTES(1),
933 &xx_envelope.text, -1, NULL,
934 &xx_string_length_unused, -1, MAX_ENVELOPE_TEXT_LEN,
935 &xx_default_string_empty[0]
945 static struct LevelFileConfigInfo chunk_config_CUSX_base[] =
949 TYPE_STRING, CONF_VALUE_BYTES(1),
950 &xx_ei.description[0], -1,
951 &yy_ei.description[0],
952 &xx_string_length_unused, -1, MAX_ELEMENT_NAME_LEN,
953 &xx_default_description[0]
958 TYPE_BITFIELD, CONF_VALUE_32_BIT(1),
959 &xx_ei.properties[EP_BITFIELD_BASE_NR], EP_BITMASK_BASE_DEFAULT,
960 &yy_ei.properties[EP_BITFIELD_BASE_NR]
962 #if ENABLE_RESERVED_CODE
963 // (reserved for later use)
966 TYPE_BITFIELD, CONF_VALUE_32_BIT(2),
967 &xx_ei.properties[EP_BITFIELD_BASE_NR + 1], EP_BITMASK_DEFAULT,
968 &yy_ei.properties[EP_BITFIELD_BASE_NR + 1]
974 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
975 &xx_ei.use_gfx_element, FALSE,
976 &yy_ei.use_gfx_element
980 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
981 &xx_ei.gfx_element_initial, EL_EMPTY_SPACE,
982 &yy_ei.gfx_element_initial
987 TYPE_BITFIELD, CONF_VALUE_8_BIT(2),
988 &xx_ei.access_direction, MV_ALL_DIRECTIONS,
989 &yy_ei.access_direction
994 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
995 &xx_ei.collect_score_initial, 10,
996 &yy_ei.collect_score_initial
1000 TYPE_INTEGER, CONF_VALUE_16_BIT(3),
1001 &xx_ei.collect_count_initial, 1,
1002 &yy_ei.collect_count_initial
1007 TYPE_INTEGER, CONF_VALUE_16_BIT(4),
1008 &xx_ei.ce_value_fixed_initial, 0,
1009 &yy_ei.ce_value_fixed_initial
1013 TYPE_INTEGER, CONF_VALUE_16_BIT(5),
1014 &xx_ei.ce_value_random_initial, 0,
1015 &yy_ei.ce_value_random_initial
1019 TYPE_BOOLEAN, CONF_VALUE_8_BIT(3),
1020 &xx_ei.use_last_ce_value, FALSE,
1021 &yy_ei.use_last_ce_value
1026 TYPE_INTEGER, CONF_VALUE_16_BIT(6),
1027 &xx_ei.push_delay_fixed, 8,
1028 &yy_ei.push_delay_fixed
1032 TYPE_INTEGER, CONF_VALUE_16_BIT(7),
1033 &xx_ei.push_delay_random, 8,
1034 &yy_ei.push_delay_random
1038 TYPE_INTEGER, CONF_VALUE_16_BIT(8),
1039 &xx_ei.drop_delay_fixed, 0,
1040 &yy_ei.drop_delay_fixed
1044 TYPE_INTEGER, CONF_VALUE_16_BIT(9),
1045 &xx_ei.drop_delay_random, 0,
1046 &yy_ei.drop_delay_random
1050 TYPE_INTEGER, CONF_VALUE_16_BIT(10),
1051 &xx_ei.move_delay_fixed, 0,
1052 &yy_ei.move_delay_fixed
1056 TYPE_INTEGER, CONF_VALUE_16_BIT(11),
1057 &xx_ei.move_delay_random, 0,
1058 &yy_ei.move_delay_random
1063 TYPE_BITFIELD, CONF_VALUE_32_BIT(3),
1064 &xx_ei.move_pattern, MV_ALL_DIRECTIONS,
1069 TYPE_BITFIELD, CONF_VALUE_8_BIT(4),
1070 &xx_ei.move_direction_initial, MV_START_AUTOMATIC,
1071 &yy_ei.move_direction_initial
1075 TYPE_INTEGER, CONF_VALUE_8_BIT(5),
1076 &xx_ei.move_stepsize, TILEX / 8,
1077 &yy_ei.move_stepsize
1082 TYPE_ELEMENT, CONF_VALUE_16_BIT(12),
1083 &xx_ei.move_enter_element, EL_EMPTY_SPACE,
1084 &yy_ei.move_enter_element
1088 TYPE_ELEMENT, CONF_VALUE_16_BIT(13),
1089 &xx_ei.move_leave_element, EL_EMPTY_SPACE,
1090 &yy_ei.move_leave_element
1094 TYPE_INTEGER, CONF_VALUE_8_BIT(6),
1095 &xx_ei.move_leave_type, LEAVE_TYPE_UNLIMITED,
1096 &yy_ei.move_leave_type
1101 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
1102 &xx_ei.slippery_type, SLIPPERY_ANY_RANDOM,
1103 &yy_ei.slippery_type
1108 TYPE_INTEGER, CONF_VALUE_8_BIT(8),
1109 &xx_ei.explosion_type, EXPLODES_3X3,
1110 &yy_ei.explosion_type
1114 TYPE_INTEGER, CONF_VALUE_16_BIT(14),
1115 &xx_ei.explosion_delay, 16,
1116 &yy_ei.explosion_delay
1120 TYPE_INTEGER, CONF_VALUE_16_BIT(15),
1121 &xx_ei.ignition_delay, 8,
1122 &yy_ei.ignition_delay
1127 TYPE_CONTENT_LIST, CONF_VALUE_BYTES(2),
1128 &xx_ei.content, EL_EMPTY_SPACE,
1130 &xx_num_contents, 1, 1
1133 // ---------- "num_change_pages" must be the last entry ---------------------
1136 -1, SAVE_CONF_ALWAYS,
1137 TYPE_INTEGER, CONF_VALUE_8_BIT(9),
1138 &xx_ei.num_change_pages, 1,
1139 &yy_ei.num_change_pages
1150 static struct LevelFileConfigInfo chunk_config_CUSX_change[] =
1152 // ---------- "current_change_page" must be the first entry -----------------
1155 -1, SAVE_CONF_ALWAYS,
1156 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
1157 &xx_current_change_page, -1
1160 // ---------- (the remaining entries can be in any order) -------------------
1164 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
1165 &xx_change.can_change, FALSE
1170 TYPE_BITFIELD, CONF_VALUE_32_BIT(1),
1171 &xx_event_bits[0], 0
1175 TYPE_BITFIELD, CONF_VALUE_32_BIT(2),
1176 &xx_event_bits[1], 0
1181 TYPE_BITFIELD, CONF_VALUE_8_BIT(3),
1182 &xx_change.trigger_player, CH_PLAYER_ANY
1186 TYPE_BITFIELD, CONF_VALUE_8_BIT(4),
1187 &xx_change.trigger_side, CH_SIDE_ANY
1191 TYPE_BITFIELD, CONF_VALUE_32_BIT(3),
1192 &xx_change.trigger_page, CH_PAGE_ANY
1197 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
1198 &xx_change.target_element, EL_EMPTY_SPACE
1203 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
1204 &xx_change.delay_fixed, 0
1208 TYPE_INTEGER, CONF_VALUE_16_BIT(3),
1209 &xx_change.delay_random, 0
1213 TYPE_INTEGER, CONF_VALUE_16_BIT(4),
1214 &xx_change.delay_frames, FRAMES_PER_SECOND
1219 TYPE_ELEMENT, CONF_VALUE_16_BIT(5),
1220 &xx_change.initial_trigger_element, EL_EMPTY_SPACE
1225 TYPE_BOOLEAN, CONF_VALUE_8_BIT(6),
1226 &xx_change.explode, FALSE
1230 TYPE_BOOLEAN, CONF_VALUE_8_BIT(7),
1231 &xx_change.use_target_content, FALSE
1235 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
1236 &xx_change.only_if_complete, FALSE
1240 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
1241 &xx_change.use_random_replace, FALSE
1245 TYPE_INTEGER, CONF_VALUE_8_BIT(10),
1246 &xx_change.random_percentage, 100
1250 TYPE_INTEGER, CONF_VALUE_8_BIT(11),
1251 &xx_change.replace_when, CP_WHEN_EMPTY
1256 TYPE_BOOLEAN, CONF_VALUE_8_BIT(12),
1257 &xx_change.has_action, FALSE
1261 TYPE_INTEGER, CONF_VALUE_8_BIT(13),
1262 &xx_change.action_type, CA_NO_ACTION
1266 TYPE_INTEGER, CONF_VALUE_8_BIT(14),
1267 &xx_change.action_mode, CA_MODE_UNDEFINED
1271 TYPE_INTEGER, CONF_VALUE_16_BIT(6),
1272 &xx_change.action_arg, CA_ARG_UNDEFINED
1277 TYPE_ELEMENT, CONF_VALUE_16_BIT(7),
1278 &xx_change.action_element, EL_EMPTY_SPACE
1283 TYPE_CONTENT_LIST, CONF_VALUE_BYTES(1),
1284 &xx_change.target_content, EL_EMPTY_SPACE, NULL,
1285 &xx_num_contents, 1, 1
1295 static struct LevelFileConfigInfo chunk_config_GRPX[] =
1299 TYPE_STRING, CONF_VALUE_BYTES(1),
1300 &xx_ei.description[0], -1, NULL,
1301 &xx_string_length_unused, -1, MAX_ELEMENT_NAME_LEN,
1302 &xx_default_description[0]
1307 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
1308 &xx_ei.use_gfx_element, FALSE
1312 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
1313 &xx_ei.gfx_element_initial, EL_EMPTY_SPACE
1318 TYPE_INTEGER, CONF_VALUE_8_BIT(2),
1319 &xx_group.choice_mode, ANIM_RANDOM
1324 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(2),
1325 &xx_group.element[0], EL_EMPTY_SPACE, NULL,
1326 &xx_group.num_elements, 1, MAX_ELEMENTS_IN_GROUP
1336 static struct LevelFileConfigInfo chunk_config_CONF[] = // (OBSOLETE)
1340 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
1341 &li.block_snap_field, TRUE
1345 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
1346 &li.continuous_snapping, TRUE
1350 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
1351 &li.initial_player_stepsize[0], STEPSIZE_NORMAL
1355 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
1356 &li.use_start_element[0], FALSE
1360 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
1361 &li.start_element[0], EL_PLAYER_1
1365 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
1366 &li.use_artwork_element[0], FALSE
1370 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
1371 &li.artwork_element[0], EL_PLAYER_1
1375 TYPE_BOOLEAN, CONF_VALUE_8_BIT(12),
1376 &li.use_explosion_element[0], FALSE
1380 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
1381 &li.explosion_element[0], EL_PLAYER_1
1396 filetype_id_list[] =
1398 { LEVEL_FILE_TYPE_RND, "RND" },
1399 { LEVEL_FILE_TYPE_BD, "BD" },
1400 { LEVEL_FILE_TYPE_EM, "EM" },
1401 { LEVEL_FILE_TYPE_SP, "SP" },
1402 { LEVEL_FILE_TYPE_DX, "DX" },
1403 { LEVEL_FILE_TYPE_SB, "SB" },
1404 { LEVEL_FILE_TYPE_DC, "DC" },
1405 { LEVEL_FILE_TYPE_MM, "MM" },
1406 { LEVEL_FILE_TYPE_MM, "DF" },
1411 // ============================================================================
1412 // level file functions
1413 // ============================================================================
1415 static boolean check_special_flags(char *flag)
1417 if (strEqual(options.special_flags, flag) ||
1418 strEqual(leveldir_current->special_flags, flag))
1424 static struct DateInfo getCurrentDate(void)
1426 time_t epoch_seconds = time(NULL);
1427 struct tm *now = localtime(&epoch_seconds);
1428 struct DateInfo date;
1430 date.year = now->tm_year + 1900;
1431 date.month = now->tm_mon + 1;
1432 date.day = now->tm_mday;
1434 date.src = DATE_SRC_CLOCK;
1439 static void resetEventFlags(struct ElementChangeInfo *change)
1443 for (i = 0; i < NUM_CHANGE_EVENTS; i++)
1444 change->has_event[i] = FALSE;
1447 static void resetEventBits(void)
1451 for (i = 0; i < NUM_CE_BITFIELDS; i++)
1452 xx_event_bits[i] = 0;
1455 static void setEventFlagsFromEventBits(struct ElementChangeInfo *change)
1459 /* important: only change event flag if corresponding event bit is set
1460 (this is because all xx_event_bits[] values are loaded separately,
1461 and all xx_event_bits[] values are set back to zero before loading
1462 another value xx_event_bits[x] (each value representing 32 flags)) */
1464 for (i = 0; i < NUM_CHANGE_EVENTS; i++)
1465 if (xx_event_bits[CH_EVENT_BITFIELD_NR(i)] & CH_EVENT_BIT(i))
1466 change->has_event[i] = TRUE;
1469 static void setEventBitsFromEventFlags(struct ElementChangeInfo *change)
1473 /* in contrast to the above function setEventFlagsFromEventBits(), it
1474 would also be possible to set all bits in xx_event_bits[] to 0 or 1
1475 depending on the corresponding change->has_event[i] values here, as
1476 all xx_event_bits[] values are reset in resetEventBits() before */
1478 for (i = 0; i < NUM_CHANGE_EVENTS; i++)
1479 if (change->has_event[i])
1480 xx_event_bits[CH_EVENT_BITFIELD_NR(i)] |= CH_EVENT_BIT(i);
1483 static char *getDefaultElementDescription(struct ElementInfo *ei)
1485 static char description[MAX_ELEMENT_NAME_LEN + 1];
1486 char *default_description = (ei->custom_description != NULL ?
1487 ei->custom_description :
1488 ei->editor_description);
1491 // always start with reliable default values
1492 for (i = 0; i < MAX_ELEMENT_NAME_LEN + 1; i++)
1493 description[i] = '\0';
1495 // truncate element description to MAX_ELEMENT_NAME_LEN bytes
1496 strncpy(description, default_description, MAX_ELEMENT_NAME_LEN);
1498 return &description[0];
1501 static void setElementDescriptionToDefault(struct ElementInfo *ei)
1503 char *default_description = getDefaultElementDescription(ei);
1506 for (i = 0; i < MAX_ELEMENT_NAME_LEN + 1; i++)
1507 ei->description[i] = default_description[i];
1510 static void setConfigToDefaultsFromConfigList(struct LevelFileConfigInfo *conf)
1514 for (i = 0; conf[i].data_type != -1; i++)
1516 int default_value = conf[i].default_value;
1517 int data_type = conf[i].data_type;
1518 int conf_type = conf[i].conf_type;
1519 int byte_mask = conf_type & CONF_MASK_BYTES;
1521 if (byte_mask == CONF_MASK_MULTI_BYTES)
1523 int default_num_entities = conf[i].default_num_entities;
1524 int max_num_entities = conf[i].max_num_entities;
1526 *(int *)(conf[i].num_entities) = default_num_entities;
1528 if (data_type == TYPE_STRING)
1530 char *default_string = conf[i].default_string;
1531 char *string = (char *)(conf[i].value);
1533 strncpy(string, default_string, max_num_entities);
1535 else if (data_type == TYPE_ELEMENT_LIST)
1537 int *element_array = (int *)(conf[i].value);
1540 for (j = 0; j < max_num_entities; j++)
1541 element_array[j] = default_value;
1543 else if (data_type == TYPE_CONTENT_LIST)
1545 struct Content *content = (struct Content *)(conf[i].value);
1548 for (c = 0; c < max_num_entities; c++)
1549 for (y = 0; y < 3; y++)
1550 for (x = 0; x < 3; x++)
1551 content[c].e[x][y] = default_value;
1554 else // constant size configuration data (1, 2 or 4 bytes)
1556 if (data_type == TYPE_BOOLEAN)
1557 *(boolean *)(conf[i].value) = default_value;
1559 *(int *) (conf[i].value) = default_value;
1564 static void copyConfigFromConfigList(struct LevelFileConfigInfo *conf)
1568 for (i = 0; conf[i].data_type != -1; i++)
1570 int data_type = conf[i].data_type;
1571 int conf_type = conf[i].conf_type;
1572 int byte_mask = conf_type & CONF_MASK_BYTES;
1574 if (byte_mask == CONF_MASK_MULTI_BYTES)
1576 int max_num_entities = conf[i].max_num_entities;
1578 if (data_type == TYPE_STRING)
1580 char *string = (char *)(conf[i].value);
1581 char *string_copy = (char *)(conf[i].value_copy);
1583 strncpy(string_copy, string, max_num_entities);
1585 else if (data_type == TYPE_ELEMENT_LIST)
1587 int *element_array = (int *)(conf[i].value);
1588 int *element_array_copy = (int *)(conf[i].value_copy);
1591 for (j = 0; j < max_num_entities; j++)
1592 element_array_copy[j] = element_array[j];
1594 else if (data_type == TYPE_CONTENT_LIST)
1596 struct Content *content = (struct Content *)(conf[i].value);
1597 struct Content *content_copy = (struct Content *)(conf[i].value_copy);
1600 for (c = 0; c < max_num_entities; c++)
1601 for (y = 0; y < 3; y++)
1602 for (x = 0; x < 3; x++)
1603 content_copy[c].e[x][y] = content[c].e[x][y];
1606 else // constant size configuration data (1, 2 or 4 bytes)
1608 if (data_type == TYPE_BOOLEAN)
1609 *(boolean *)(conf[i].value_copy) = *(boolean *)(conf[i].value);
1611 *(int *) (conf[i].value_copy) = *(int *) (conf[i].value);
1616 void copyElementInfo(struct ElementInfo *ei_from, struct ElementInfo *ei_to)
1620 xx_ei = *ei_from; // copy element data into temporary buffer
1621 yy_ei = *ei_to; // copy element data into temporary buffer
1623 copyConfigFromConfigList(chunk_config_CUSX_base);
1628 // ---------- reinitialize and copy change pages ----------
1630 ei_to->num_change_pages = ei_from->num_change_pages;
1631 ei_to->current_change_page = ei_from->current_change_page;
1633 setElementChangePages(ei_to, ei_to->num_change_pages);
1635 for (i = 0; i < ei_to->num_change_pages; i++)
1636 ei_to->change_page[i] = ei_from->change_page[i];
1638 // ---------- copy group element info ----------
1639 if (ei_from->group != NULL && ei_to->group != NULL) // group or internal
1640 *ei_to->group = *ei_from->group;
1642 // mark this custom element as modified
1643 ei_to->modified_settings = TRUE;
1646 void setElementChangePages(struct ElementInfo *ei, int change_pages)
1648 int change_page_size = sizeof(struct ElementChangeInfo);
1650 ei->num_change_pages = MAX(1, change_pages);
1653 checked_realloc(ei->change_page, ei->num_change_pages * change_page_size);
1655 if (ei->current_change_page >= ei->num_change_pages)
1656 ei->current_change_page = ei->num_change_pages - 1;
1658 ei->change = &ei->change_page[ei->current_change_page];
1661 void setElementChangeInfoToDefaults(struct ElementChangeInfo *change)
1663 xx_change = *change; // copy change data into temporary buffer
1665 setConfigToDefaultsFromConfigList(chunk_config_CUSX_change);
1667 *change = xx_change;
1669 resetEventFlags(change);
1671 change->direct_action = 0;
1672 change->other_action = 0;
1674 change->pre_change_function = NULL;
1675 change->change_function = NULL;
1676 change->post_change_function = NULL;
1679 static void setLevelInfoToDefaults_Level(struct LevelInfo *level)
1683 li = *level; // copy level data into temporary buffer
1684 setConfigToDefaultsFromConfigList(chunk_config_INFO);
1685 *level = li; // copy temporary buffer back to level data
1687 setLevelInfoToDefaults_EM();
1688 setLevelInfoToDefaults_SP();
1689 setLevelInfoToDefaults_MM();
1691 level->native_em_level = &native_em_level;
1692 level->native_sp_level = &native_sp_level;
1693 level->native_mm_level = &native_mm_level;
1695 level->file_version = FILE_VERSION_ACTUAL;
1696 level->game_version = GAME_VERSION_ACTUAL;
1698 level->creation_date = getCurrentDate();
1700 level->encoding_16bit_field = TRUE;
1701 level->encoding_16bit_yamyam = TRUE;
1702 level->encoding_16bit_amoeba = TRUE;
1704 // clear level name and level author string buffers
1705 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
1706 level->name[i] = '\0';
1707 for (i = 0; i < MAX_LEVEL_AUTHOR_LEN; i++)
1708 level->author[i] = '\0';
1710 // set level name and level author to default values
1711 strcpy(level->name, NAMELESS_LEVEL_NAME);
1712 strcpy(level->author, ANONYMOUS_NAME);
1714 // set level playfield to playable default level with player and exit
1715 for (x = 0; x < MAX_LEV_FIELDX; x++)
1716 for (y = 0; y < MAX_LEV_FIELDY; y++)
1717 level->field[x][y] = EL_SAND;
1719 level->field[0][0] = EL_PLAYER_1;
1720 level->field[STD_LEV_FIELDX - 1][STD_LEV_FIELDY - 1] = EL_EXIT_CLOSED;
1722 BorderElement = EL_STEELWALL;
1724 // detect custom elements when loading them
1725 level->file_has_custom_elements = FALSE;
1727 // set all bug compatibility flags to "false" => do not emulate this bug
1728 level->use_action_after_change_bug = FALSE;
1730 if (leveldir_current)
1732 // try to determine better author name than 'anonymous'
1733 if (!strEqual(leveldir_current->author, ANONYMOUS_NAME))
1735 strncpy(level->author, leveldir_current->author, MAX_LEVEL_AUTHOR_LEN);
1736 level->author[MAX_LEVEL_AUTHOR_LEN] = '\0';
1740 switch (LEVELCLASS(leveldir_current))
1742 case LEVELCLASS_TUTORIAL:
1743 strcpy(level->author, PROGRAM_AUTHOR_STRING);
1746 case LEVELCLASS_CONTRIB:
1747 strncpy(level->author, leveldir_current->name, MAX_LEVEL_AUTHOR_LEN);
1748 level->author[MAX_LEVEL_AUTHOR_LEN] = '\0';
1751 case LEVELCLASS_PRIVATE:
1752 strncpy(level->author, getRealName(), MAX_LEVEL_AUTHOR_LEN);
1753 level->author[MAX_LEVEL_AUTHOR_LEN] = '\0';
1757 // keep default value
1764 static void setLevelInfoToDefaults_Elements(struct LevelInfo *level)
1766 static boolean clipboard_elements_initialized = FALSE;
1769 InitElementPropertiesStatic();
1771 li = *level; // copy level data into temporary buffer
1772 setConfigToDefaultsFromConfigList(chunk_config_ELEM);
1773 *level = li; // copy temporary buffer back to level data
1775 for (i = 0; i < MAX_NUM_ELEMENTS; i++)
1778 struct ElementInfo *ei = &element_info[element];
1780 // never initialize clipboard elements after the very first time
1781 // (to be able to use clipboard elements between several levels)
1782 if (IS_CLIPBOARD_ELEMENT(element) && clipboard_elements_initialized)
1785 if (IS_ENVELOPE(element))
1787 int envelope_nr = element - EL_ENVELOPE_1;
1789 setConfigToDefaultsFromConfigList(chunk_config_NOTE);
1791 level->envelope[envelope_nr] = xx_envelope;
1794 if (IS_CUSTOM_ELEMENT(element) ||
1795 IS_GROUP_ELEMENT(element) ||
1796 IS_INTERNAL_ELEMENT(element))
1798 xx_ei = *ei; // copy element data into temporary buffer
1800 setConfigToDefaultsFromConfigList(chunk_config_CUSX_base);
1805 setElementChangePages(ei, 1);
1806 setElementChangeInfoToDefaults(ei->change);
1808 if (IS_CUSTOM_ELEMENT(element) ||
1809 IS_GROUP_ELEMENT(element) ||
1810 IS_INTERNAL_ELEMENT(element))
1812 setElementDescriptionToDefault(ei);
1814 ei->modified_settings = FALSE;
1817 if (IS_CUSTOM_ELEMENT(element) ||
1818 IS_INTERNAL_ELEMENT(element))
1820 // internal values used in level editor
1822 ei->access_type = 0;
1823 ei->access_layer = 0;
1824 ei->access_protected = 0;
1825 ei->walk_to_action = 0;
1826 ei->smash_targets = 0;
1829 ei->can_explode_by_fire = FALSE;
1830 ei->can_explode_smashed = FALSE;
1831 ei->can_explode_impact = FALSE;
1833 ei->current_change_page = 0;
1836 if (IS_GROUP_ELEMENT(element) ||
1837 IS_INTERNAL_ELEMENT(element))
1839 struct ElementGroupInfo *group;
1841 // initialize memory for list of elements in group
1842 if (ei->group == NULL)
1843 ei->group = checked_malloc(sizeof(struct ElementGroupInfo));
1847 xx_group = *group; // copy group data into temporary buffer
1849 setConfigToDefaultsFromConfigList(chunk_config_GRPX);
1855 clipboard_elements_initialized = TRUE;
1858 static void setLevelInfoToDefaults(struct LevelInfo *level,
1859 boolean level_info_only,
1860 boolean reset_file_status)
1862 setLevelInfoToDefaults_Level(level);
1864 if (!level_info_only)
1865 setLevelInfoToDefaults_Elements(level);
1867 if (reset_file_status)
1869 level->no_valid_file = FALSE;
1870 level->no_level_file = FALSE;
1873 level->changed = FALSE;
1876 static void setFileInfoToDefaults(struct LevelFileInfo *level_file_info)
1878 level_file_info->nr = 0;
1879 level_file_info->type = LEVEL_FILE_TYPE_UNKNOWN;
1880 level_file_info->packed = FALSE;
1882 setString(&level_file_info->basename, NULL);
1883 setString(&level_file_info->filename, NULL);
1886 int getMappedElement_SB(int, boolean);
1888 static void ActivateLevelTemplate(void)
1892 if (check_special_flags("load_xsb_to_ces"))
1894 // fill smaller playfields with padding "beyond border wall" elements
1895 if (level.fieldx < level_template.fieldx ||
1896 level.fieldy < level_template.fieldy)
1898 short field[level.fieldx][level.fieldy];
1899 int new_fieldx = MAX(level.fieldx, level_template.fieldx);
1900 int new_fieldy = MAX(level.fieldy, level_template.fieldy);
1901 int pos_fieldx = (new_fieldx - level.fieldx) / 2;
1902 int pos_fieldy = (new_fieldy - level.fieldy) / 2;
1904 // copy old playfield (which is smaller than the visible area)
1905 for (y = 0; y < level.fieldy; y++) for (x = 0; x < level.fieldx; x++)
1906 field[x][y] = level.field[x][y];
1908 // fill new, larger playfield with "beyond border wall" elements
1909 for (y = 0; y < new_fieldy; y++) for (x = 0; x < new_fieldx; x++)
1910 level.field[x][y] = getMappedElement_SB('_', TRUE);
1912 // copy the old playfield to the middle of the new playfield
1913 for (y = 0; y < level.fieldy; y++) for (x = 0; x < level.fieldx; x++)
1914 level.field[pos_fieldx + x][pos_fieldy + y] = field[x][y];
1916 level.fieldx = new_fieldx;
1917 level.fieldy = new_fieldy;
1921 // Currently there is no special action needed to activate the template
1922 // data, because 'element_info' property settings overwrite the original
1923 // level data, while all other variables do not change.
1925 // Exception: 'from_level_template' elements in the original level playfield
1926 // are overwritten with the corresponding elements at the same position in
1927 // playfield from the level template.
1929 for (x = 0; x < level.fieldx; x++)
1930 for (y = 0; y < level.fieldy; y++)
1931 if (level.field[x][y] == EL_FROM_LEVEL_TEMPLATE)
1932 level.field[x][y] = level_template.field[x][y];
1934 if (check_special_flags("load_xsb_to_ces"))
1936 struct LevelInfo level_backup = level;
1938 // overwrite all individual level settings from template level settings
1939 level = level_template;
1941 // restore level file info
1942 level.file_info = level_backup.file_info;
1944 // restore playfield size
1945 level.fieldx = level_backup.fieldx;
1946 level.fieldy = level_backup.fieldy;
1948 // restore playfield content
1949 for (x = 0; x < level.fieldx; x++)
1950 for (y = 0; y < level.fieldy; y++)
1951 level.field[x][y] = level_backup.field[x][y];
1953 // restore name and author from individual level
1954 strcpy(level.name, level_backup.name);
1955 strcpy(level.author, level_backup.author);
1957 // restore flag "use_custom_template"
1958 level.use_custom_template = level_backup.use_custom_template;
1962 static char *getLevelFilenameFromBasename(char *basename)
1964 static char *filename = NULL;
1966 checked_free(filename);
1968 filename = getPath2(getCurrentLevelDir(), basename);
1973 static int getFileTypeFromBasename(char *basename)
1975 // !!! ALSO SEE COMMENT IN checkForPackageFromBasename() !!!
1977 static char *filename = NULL;
1978 struct stat file_status;
1980 // ---------- try to determine file type from filename ----------
1982 // check for typical filename of a Supaplex level package file
1983 if (strlen(basename) == 10 && strPrefixLower(basename, "levels.d"))
1984 return LEVEL_FILE_TYPE_SP;
1986 // check for typical filename of a Diamond Caves II level package file
1987 if (strSuffixLower(basename, ".dc") ||
1988 strSuffixLower(basename, ".dc2"))
1989 return LEVEL_FILE_TYPE_DC;
1991 // check for typical filename of a Sokoban level package file
1992 if (strSuffixLower(basename, ".xsb") &&
1993 strchr(basename, '%') == NULL)
1994 return LEVEL_FILE_TYPE_SB;
1996 // ---------- try to determine file type from filesize ----------
1998 checked_free(filename);
1999 filename = getPath2(getCurrentLevelDir(), basename);
2001 if (stat(filename, &file_status) == 0)
2003 // check for typical filesize of a Supaplex level package file
2004 if (file_status.st_size == 170496)
2005 return LEVEL_FILE_TYPE_SP;
2008 return LEVEL_FILE_TYPE_UNKNOWN;
2011 static int getFileTypeFromMagicBytes(char *filename, int type)
2015 if ((file = openFile(filename, MODE_READ)))
2017 char chunk_name[CHUNK_ID_LEN + 1];
2019 getFileChunkBE(file, chunk_name, NULL);
2021 if (strEqual(chunk_name, "MMII") ||
2022 strEqual(chunk_name, "MIRR"))
2023 type = LEVEL_FILE_TYPE_MM;
2031 static boolean checkForPackageFromBasename(char *basename)
2033 // !!! WON'T WORK ANYMORE IF getFileTypeFromBasename() ALSO DETECTS !!!
2034 // !!! SINGLE LEVELS (CURRENTLY ONLY DETECTS LEVEL PACKAGES !!!
2036 return (getFileTypeFromBasename(basename) != LEVEL_FILE_TYPE_UNKNOWN);
2039 static char *getSingleLevelBasenameExt(int nr, char *extension)
2041 static char basename[MAX_FILENAME_LEN];
2044 sprintf(basename, "%s", LEVELTEMPLATE_FILENAME);
2046 sprintf(basename, "%03d.%s", nr, extension);
2051 static char *getSingleLevelBasename(int nr)
2053 return getSingleLevelBasenameExt(nr, LEVELFILE_EXTENSION);
2056 static char *getPackedLevelBasename(int type)
2058 static char basename[MAX_FILENAME_LEN];
2059 char *directory = getCurrentLevelDir();
2061 DirectoryEntry *dir_entry;
2063 strcpy(basename, UNDEFINED_FILENAME); // default: undefined file
2065 if ((dir = openDirectory(directory)) == NULL)
2067 Error(ERR_WARN, "cannot read current level directory '%s'", directory);
2072 while ((dir_entry = readDirectory(dir)) != NULL) // loop all entries
2074 char *entry_basename = dir_entry->basename;
2075 int entry_type = getFileTypeFromBasename(entry_basename);
2077 if (entry_type != LEVEL_FILE_TYPE_UNKNOWN) // found valid level package
2079 if (type == LEVEL_FILE_TYPE_UNKNOWN ||
2082 strcpy(basename, entry_basename);
2089 closeDirectory(dir);
2094 static char *getSingleLevelFilename(int nr)
2096 return getLevelFilenameFromBasename(getSingleLevelBasename(nr));
2099 #if ENABLE_UNUSED_CODE
2100 static char *getPackedLevelFilename(int type)
2102 return getLevelFilenameFromBasename(getPackedLevelBasename(type));
2106 char *getDefaultLevelFilename(int nr)
2108 return getSingleLevelFilename(nr);
2111 #if ENABLE_UNUSED_CODE
2112 static void setLevelFileInfo_SingleLevelFilename(struct LevelFileInfo *lfi,
2116 lfi->packed = FALSE;
2118 setString(&lfi->basename, getSingleLevelBasename(lfi->nr, lfi->type));
2119 setString(&lfi->filename, getLevelFilenameFromBasename(lfi->basename));
2123 static void setLevelFileInfo_FormatLevelFilename(struct LevelFileInfo *lfi,
2124 int type, char *format, ...)
2126 static char basename[MAX_FILENAME_LEN];
2129 va_start(ap, format);
2130 vsprintf(basename, format, ap);
2134 lfi->packed = FALSE;
2136 setString(&lfi->basename, basename);
2137 setString(&lfi->filename, getLevelFilenameFromBasename(lfi->basename));
2140 static void setLevelFileInfo_PackedLevelFilename(struct LevelFileInfo *lfi,
2146 setString(&lfi->basename, getPackedLevelBasename(lfi->type));
2147 setString(&lfi->filename, getLevelFilenameFromBasename(lfi->basename));
2150 static int getFiletypeFromID(char *filetype_id)
2152 char *filetype_id_lower;
2153 int filetype = LEVEL_FILE_TYPE_UNKNOWN;
2156 if (filetype_id == NULL)
2157 return LEVEL_FILE_TYPE_UNKNOWN;
2159 filetype_id_lower = getStringToLower(filetype_id);
2161 for (i = 0; filetype_id_list[i].id != NULL; i++)
2163 char *id_lower = getStringToLower(filetype_id_list[i].id);
2165 if (strEqual(filetype_id_lower, id_lower))
2166 filetype = filetype_id_list[i].filetype;
2170 if (filetype != LEVEL_FILE_TYPE_UNKNOWN)
2174 free(filetype_id_lower);
2179 char *getLocalLevelTemplateFilename(void)
2181 return getDefaultLevelFilename(-1);
2184 char *getGlobalLevelTemplateFilename(void)
2186 // global variable "leveldir_current" must be modified in the loop below
2187 LevelDirTree *leveldir_current_last = leveldir_current;
2188 char *filename = NULL;
2190 // check for template level in path from current to topmost tree node
2192 while (leveldir_current != NULL)
2194 filename = getDefaultLevelFilename(-1);
2196 if (fileExists(filename))
2199 leveldir_current = leveldir_current->node_parent;
2202 // restore global variable "leveldir_current" modified in above loop
2203 leveldir_current = leveldir_current_last;
2208 static void determineLevelFileInfo_Filename(struct LevelFileInfo *lfi)
2212 // special case: level number is negative => check for level template file
2215 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_RND,
2216 getSingleLevelBasename(-1));
2218 // replace local level template filename with global template filename
2219 setString(&lfi->filename, getGlobalLevelTemplateFilename());
2221 // no fallback if template file not existing
2225 // special case: check for file name/pattern specified in "levelinfo.conf"
2226 if (leveldir_current->level_filename != NULL)
2228 int filetype = getFiletypeFromID(leveldir_current->level_filetype);
2230 setLevelFileInfo_FormatLevelFilename(lfi, filetype,
2231 leveldir_current->level_filename, nr);
2233 lfi->packed = checkForPackageFromBasename(leveldir_current->level_filename);
2235 if (fileExists(lfi->filename))
2238 else if (leveldir_current->level_filetype != NULL)
2240 int filetype = getFiletypeFromID(leveldir_current->level_filetype);
2242 // check for specified native level file with standard file name
2243 setLevelFileInfo_FormatLevelFilename(lfi, filetype,
2244 "%03d.%s", nr, LEVELFILE_EXTENSION);
2245 if (fileExists(lfi->filename))
2249 // check for native Rocks'n'Diamonds level file
2250 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_RND,
2251 "%03d.%s", nr, LEVELFILE_EXTENSION);
2252 if (fileExists(lfi->filename))
2255 // check for Emerald Mine level file (V1)
2256 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "a%c%c",
2257 'a' + (nr / 10) % 26, '0' + nr % 10);
2258 if (fileExists(lfi->filename))
2260 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "A%c%c",
2261 'A' + (nr / 10) % 26, '0' + nr % 10);
2262 if (fileExists(lfi->filename))
2265 // check for Emerald Mine level file (V2 to V5)
2266 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%d", nr);
2267 if (fileExists(lfi->filename))
2270 // check for Emerald Mine level file (V6 / single mode)
2271 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02ds", nr);
2272 if (fileExists(lfi->filename))
2274 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02dS", nr);
2275 if (fileExists(lfi->filename))
2278 // check for Emerald Mine level file (V6 / teamwork mode)
2279 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02dt", nr);
2280 if (fileExists(lfi->filename))
2282 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02dT", nr);
2283 if (fileExists(lfi->filename))
2286 // check for various packed level file formats
2287 setLevelFileInfo_PackedLevelFilename(lfi, LEVEL_FILE_TYPE_UNKNOWN);
2288 if (fileExists(lfi->filename))
2291 // no known level file found -- use default values (and fail later)
2292 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_RND,
2293 "%03d.%s", nr, LEVELFILE_EXTENSION);
2296 static void determineLevelFileInfo_Filetype(struct LevelFileInfo *lfi)
2298 if (lfi->type == LEVEL_FILE_TYPE_UNKNOWN)
2299 lfi->type = getFileTypeFromBasename(lfi->basename);
2301 if (lfi->type == LEVEL_FILE_TYPE_RND)
2302 lfi->type = getFileTypeFromMagicBytes(lfi->filename, lfi->type);
2305 static void setLevelFileInfo(struct LevelFileInfo *level_file_info, int nr)
2307 // always start with reliable default values
2308 setFileInfoToDefaults(level_file_info);
2310 level_file_info->nr = nr; // set requested level number
2312 determineLevelFileInfo_Filename(level_file_info);
2313 determineLevelFileInfo_Filetype(level_file_info);
2316 static void copyLevelFileInfo(struct LevelFileInfo *lfi_from,
2317 struct LevelFileInfo *lfi_to)
2319 lfi_to->nr = lfi_from->nr;
2320 lfi_to->type = lfi_from->type;
2321 lfi_to->packed = lfi_from->packed;
2323 setString(&lfi_to->basename, lfi_from->basename);
2324 setString(&lfi_to->filename, lfi_from->filename);
2327 // ----------------------------------------------------------------------------
2328 // functions for loading R'n'D level
2329 // ----------------------------------------------------------------------------
2331 static int getMappedElement(int element)
2333 // remap some (historic, now obsolete) elements
2337 case EL_PLAYER_OBSOLETE:
2338 element = EL_PLAYER_1;
2341 case EL_KEY_OBSOLETE:
2345 case EL_EM_KEY_1_FILE_OBSOLETE:
2346 element = EL_EM_KEY_1;
2349 case EL_EM_KEY_2_FILE_OBSOLETE:
2350 element = EL_EM_KEY_2;
2353 case EL_EM_KEY_3_FILE_OBSOLETE:
2354 element = EL_EM_KEY_3;
2357 case EL_EM_KEY_4_FILE_OBSOLETE:
2358 element = EL_EM_KEY_4;
2361 case EL_ENVELOPE_OBSOLETE:
2362 element = EL_ENVELOPE_1;
2370 if (element >= NUM_FILE_ELEMENTS)
2372 Error(ERR_WARN, "invalid level element %d", element);
2374 element = EL_UNKNOWN;
2382 static int getMappedElementByVersion(int element, int game_version)
2384 // remap some elements due to certain game version
2386 if (game_version <= VERSION_IDENT(2,2,0,0))
2388 // map game font elements
2389 element = (element == EL_CHAR('[') ? EL_CHAR_AUMLAUT :
2390 element == EL_CHAR('\\') ? EL_CHAR_OUMLAUT :
2391 element == EL_CHAR(']') ? EL_CHAR_UUMLAUT :
2392 element == EL_CHAR('^') ? EL_CHAR_COPYRIGHT : element);
2395 if (game_version < VERSION_IDENT(3,0,0,0))
2397 // map Supaplex gravity tube elements
2398 element = (element == EL_SP_GRAVITY_PORT_LEFT ? EL_SP_PORT_LEFT :
2399 element == EL_SP_GRAVITY_PORT_RIGHT ? EL_SP_PORT_RIGHT :
2400 element == EL_SP_GRAVITY_PORT_UP ? EL_SP_PORT_UP :
2401 element == EL_SP_GRAVITY_PORT_DOWN ? EL_SP_PORT_DOWN :
2408 static int LoadLevel_VERS(File *file, int chunk_size, struct LevelInfo *level)
2410 level->file_version = getFileVersion(file);
2411 level->game_version = getFileVersion(file);
2416 static int LoadLevel_DATE(File *file, int chunk_size, struct LevelInfo *level)
2418 level->creation_date.year = getFile16BitBE(file);
2419 level->creation_date.month = getFile8Bit(file);
2420 level->creation_date.day = getFile8Bit(file);
2422 level->creation_date.src = DATE_SRC_LEVELFILE;
2427 static int LoadLevel_HEAD(File *file, int chunk_size, struct LevelInfo *level)
2429 int initial_player_stepsize;
2430 int initial_player_gravity;
2433 level->fieldx = getFile8Bit(file);
2434 level->fieldy = getFile8Bit(file);
2436 level->time = getFile16BitBE(file);
2437 level->gems_needed = getFile16BitBE(file);
2439 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
2440 level->name[i] = getFile8Bit(file);
2441 level->name[MAX_LEVEL_NAME_LEN] = 0;
2443 for (i = 0; i < LEVEL_SCORE_ELEMENTS; i++)
2444 level->score[i] = getFile8Bit(file);
2446 level->num_yamyam_contents = STD_ELEMENT_CONTENTS;
2447 for (i = 0; i < STD_ELEMENT_CONTENTS; i++)
2448 for (y = 0; y < 3; y++)
2449 for (x = 0; x < 3; x++)
2450 level->yamyam_content[i].e[x][y] = getMappedElement(getFile8Bit(file));
2452 level->amoeba_speed = getFile8Bit(file);
2453 level->time_magic_wall = getFile8Bit(file);
2454 level->time_wheel = getFile8Bit(file);
2455 level->amoeba_content = getMappedElement(getFile8Bit(file));
2457 initial_player_stepsize = (getFile8Bit(file) == 1 ? STEPSIZE_FAST :
2460 for (i = 0; i < MAX_PLAYERS; i++)
2461 level->initial_player_stepsize[i] = initial_player_stepsize;
2463 initial_player_gravity = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2465 for (i = 0; i < MAX_PLAYERS; i++)
2466 level->initial_player_gravity[i] = initial_player_gravity;
2468 level->encoding_16bit_field = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2469 level->em_slippery_gems = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2471 level->use_custom_template = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2473 level->block_last_field = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2474 level->sp_block_last_field = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2475 level->can_move_into_acid_bits = getFile32BitBE(file);
2476 level->dont_collide_with_bits = getFile8Bit(file);
2478 level->use_spring_bug = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2479 level->use_step_counter = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2481 level->instant_relocation = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2482 level->can_pass_to_walkable = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2483 level->grow_into_diggable = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2485 level->game_engine_type = getFile8Bit(file);
2487 ReadUnusedBytesFromFile(file, LEVEL_CHUNK_HEAD_UNUSED);
2492 static int LoadLevel_NAME(File *file, int chunk_size, struct LevelInfo *level)
2496 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
2497 level->name[i] = getFile8Bit(file);
2498 level->name[MAX_LEVEL_NAME_LEN] = 0;
2503 static int LoadLevel_AUTH(File *file, int chunk_size, struct LevelInfo *level)
2507 for (i = 0; i < MAX_LEVEL_AUTHOR_LEN; i++)
2508 level->author[i] = getFile8Bit(file);
2509 level->author[MAX_LEVEL_AUTHOR_LEN] = 0;
2514 static int LoadLevel_BODY(File *file, int chunk_size, struct LevelInfo *level)
2517 int chunk_size_expected = level->fieldx * level->fieldy;
2519 /* Note: "chunk_size" was wrong before version 2.0 when elements are
2520 stored with 16-bit encoding (and should be twice as big then).
2521 Even worse, playfield data was stored 16-bit when only yamyam content
2522 contained 16-bit elements and vice versa. */
2524 if (level->encoding_16bit_field && level->file_version >= FILE_VERSION_2_0)
2525 chunk_size_expected *= 2;
2527 if (chunk_size_expected != chunk_size)
2529 ReadUnusedBytesFromFile(file, chunk_size);
2530 return chunk_size_expected;
2533 for (y = 0; y < level->fieldy; y++)
2534 for (x = 0; x < level->fieldx; x++)
2535 level->field[x][y] =
2536 getMappedElement(level->encoding_16bit_field ? getFile16BitBE(file) :
2541 static int LoadLevel_CONT(File *file, int chunk_size, struct LevelInfo *level)
2544 int header_size = 4;
2545 int content_size = MAX_ELEMENT_CONTENTS * 3 * 3;
2546 int chunk_size_expected = header_size + content_size;
2548 /* Note: "chunk_size" was wrong before version 2.0 when elements are
2549 stored with 16-bit encoding (and should be twice as big then).
2550 Even worse, playfield data was stored 16-bit when only yamyam content
2551 contained 16-bit elements and vice versa. */
2553 if (level->encoding_16bit_field && level->file_version >= FILE_VERSION_2_0)
2554 chunk_size_expected += content_size;
2556 if (chunk_size_expected != chunk_size)
2558 ReadUnusedBytesFromFile(file, chunk_size);
2559 return chunk_size_expected;
2563 level->num_yamyam_contents = getFile8Bit(file);
2567 // correct invalid number of content fields -- should never happen
2568 if (level->num_yamyam_contents < 1 ||
2569 level->num_yamyam_contents > MAX_ELEMENT_CONTENTS)
2570 level->num_yamyam_contents = STD_ELEMENT_CONTENTS;
2572 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
2573 for (y = 0; y < 3; y++)
2574 for (x = 0; x < 3; x++)
2575 level->yamyam_content[i].e[x][y] =
2576 getMappedElement(level->encoding_16bit_field ?
2577 getFile16BitBE(file) : getFile8Bit(file));
2581 static int LoadLevel_CNT2(File *file, int chunk_size, struct LevelInfo *level)
2586 int content_array[MAX_ELEMENT_CONTENTS][3][3];
2588 element = getMappedElement(getFile16BitBE(file));
2589 num_contents = getFile8Bit(file);
2591 getFile8Bit(file); // content x size (unused)
2592 getFile8Bit(file); // content y size (unused)
2594 ReadUnusedBytesFromFile(file, LEVEL_CHUNK_CNT2_UNUSED);
2596 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
2597 for (y = 0; y < 3; y++)
2598 for (x = 0; x < 3; x++)
2599 content_array[i][x][y] = getMappedElement(getFile16BitBE(file));
2601 // correct invalid number of content fields -- should never happen
2602 if (num_contents < 1 || num_contents > MAX_ELEMENT_CONTENTS)
2603 num_contents = STD_ELEMENT_CONTENTS;
2605 if (element == EL_YAMYAM)
2607 level->num_yamyam_contents = num_contents;
2609 for (i = 0; i < num_contents; i++)
2610 for (y = 0; y < 3; y++)
2611 for (x = 0; x < 3; x++)
2612 level->yamyam_content[i].e[x][y] = content_array[i][x][y];
2614 else if (element == EL_BD_AMOEBA)
2616 level->amoeba_content = content_array[0][0][0];
2620 Error(ERR_WARN, "cannot load content for element '%d'", element);
2626 static int LoadLevel_CNT3(File *file, int chunk_size, struct LevelInfo *level)
2632 int chunk_size_expected;
2634 element = getMappedElement(getFile16BitBE(file));
2635 if (!IS_ENVELOPE(element))
2636 element = EL_ENVELOPE_1;
2638 envelope_nr = element - EL_ENVELOPE_1;
2640 envelope_len = getFile16BitBE(file);
2642 level->envelope[envelope_nr].xsize = getFile8Bit(file);
2643 level->envelope[envelope_nr].ysize = getFile8Bit(file);
2645 ReadUnusedBytesFromFile(file, LEVEL_CHUNK_CNT3_UNUSED);
2647 chunk_size_expected = LEVEL_CHUNK_CNT3_SIZE(envelope_len);
2648 if (chunk_size_expected != chunk_size)
2650 ReadUnusedBytesFromFile(file, chunk_size - LEVEL_CHUNK_CNT3_HEADER);
2651 return chunk_size_expected;
2654 for (i = 0; i < envelope_len; i++)
2655 level->envelope[envelope_nr].text[i] = getFile8Bit(file);
2660 static int LoadLevel_CUS1(File *file, int chunk_size, struct LevelInfo *level)
2662 int num_changed_custom_elements = getFile16BitBE(file);
2663 int chunk_size_expected = 2 + num_changed_custom_elements * 6;
2666 if (chunk_size_expected != chunk_size)
2668 ReadUnusedBytesFromFile(file, chunk_size - 2);
2669 return chunk_size_expected;
2672 for (i = 0; i < num_changed_custom_elements; i++)
2674 int element = getMappedElement(getFile16BitBE(file));
2675 int properties = getFile32BitBE(file);
2677 if (IS_CUSTOM_ELEMENT(element))
2678 element_info[element].properties[EP_BITFIELD_BASE_NR] = properties;
2680 Error(ERR_WARN, "invalid custom element number %d", element);
2682 // older game versions that wrote level files with CUS1 chunks used
2683 // different default push delay values (not yet stored in level file)
2684 element_info[element].push_delay_fixed = 2;
2685 element_info[element].push_delay_random = 8;
2688 level->file_has_custom_elements = TRUE;
2693 static int LoadLevel_CUS2(File *file, int chunk_size, struct LevelInfo *level)
2695 int num_changed_custom_elements = getFile16BitBE(file);
2696 int chunk_size_expected = 2 + num_changed_custom_elements * 4;
2699 if (chunk_size_expected != chunk_size)
2701 ReadUnusedBytesFromFile(file, chunk_size - 2);
2702 return chunk_size_expected;
2705 for (i = 0; i < num_changed_custom_elements; i++)
2707 int element = getMappedElement(getFile16BitBE(file));
2708 int custom_target_element = getMappedElement(getFile16BitBE(file));
2710 if (IS_CUSTOM_ELEMENT(element))
2711 element_info[element].change->target_element = custom_target_element;
2713 Error(ERR_WARN, "invalid custom element number %d", element);
2716 level->file_has_custom_elements = TRUE;
2721 static int LoadLevel_CUS3(File *file, int chunk_size, struct LevelInfo *level)
2723 int num_changed_custom_elements = getFile16BitBE(file);
2724 int chunk_size_expected = LEVEL_CHUNK_CUS3_SIZE(num_changed_custom_elements);
2727 if (chunk_size_expected != chunk_size)
2729 ReadUnusedBytesFromFile(file, chunk_size - 2);
2730 return chunk_size_expected;
2733 for (i = 0; i < num_changed_custom_elements; i++)
2735 int element = getMappedElement(getFile16BitBE(file));
2736 struct ElementInfo *ei = &element_info[element];
2737 unsigned int event_bits;
2739 if (!IS_CUSTOM_ELEMENT(element))
2741 Error(ERR_WARN, "invalid custom element number %d", element);
2743 element = EL_INTERNAL_DUMMY;
2746 for (j = 0; j < MAX_ELEMENT_NAME_LEN; j++)
2747 ei->description[j] = getFile8Bit(file);
2748 ei->description[MAX_ELEMENT_NAME_LEN] = 0;
2750 ei->properties[EP_BITFIELD_BASE_NR] = getFile32BitBE(file);
2752 // some free bytes for future properties and padding
2753 ReadUnusedBytesFromFile(file, 7);
2755 ei->use_gfx_element = getFile8Bit(file);
2756 ei->gfx_element_initial = getMappedElement(getFile16BitBE(file));
2758 ei->collect_score_initial = getFile8Bit(file);
2759 ei->collect_count_initial = getFile8Bit(file);
2761 ei->push_delay_fixed = getFile16BitBE(file);
2762 ei->push_delay_random = getFile16BitBE(file);
2763 ei->move_delay_fixed = getFile16BitBE(file);
2764 ei->move_delay_random = getFile16BitBE(file);
2766 ei->move_pattern = getFile16BitBE(file);
2767 ei->move_direction_initial = getFile8Bit(file);
2768 ei->move_stepsize = getFile8Bit(file);
2770 for (y = 0; y < 3; y++)
2771 for (x = 0; x < 3; x++)
2772 ei->content.e[x][y] = getMappedElement(getFile16BitBE(file));
2774 event_bits = getFile32BitBE(file);
2775 for (j = 0; j < NUM_CHANGE_EVENTS; j++)
2776 if (event_bits & (1 << j))
2777 ei->change->has_event[j] = TRUE;
2779 ei->change->target_element = getMappedElement(getFile16BitBE(file));
2781 ei->change->delay_fixed = getFile16BitBE(file);
2782 ei->change->delay_random = getFile16BitBE(file);
2783 ei->change->delay_frames = getFile16BitBE(file);
2785 ei->change->initial_trigger_element= getMappedElement(getFile16BitBE(file));
2787 ei->change->explode = getFile8Bit(file);
2788 ei->change->use_target_content = getFile8Bit(file);
2789 ei->change->only_if_complete = getFile8Bit(file);
2790 ei->change->use_random_replace = getFile8Bit(file);
2792 ei->change->random_percentage = getFile8Bit(file);
2793 ei->change->replace_when = getFile8Bit(file);
2795 for (y = 0; y < 3; y++)
2796 for (x = 0; x < 3; x++)
2797 ei->change->target_content.e[x][y] =
2798 getMappedElement(getFile16BitBE(file));
2800 ei->slippery_type = getFile8Bit(file);
2802 // some free bytes for future properties and padding
2803 ReadUnusedBytesFromFile(file, LEVEL_CPART_CUS3_UNUSED);
2805 // mark that this custom element has been modified
2806 ei->modified_settings = TRUE;
2809 level->file_has_custom_elements = TRUE;
2814 static int LoadLevel_CUS4(File *file, int chunk_size, struct LevelInfo *level)
2816 struct ElementInfo *ei;
2817 int chunk_size_expected;
2821 // ---------- custom element base property values (96 bytes) ----------------
2823 element = getMappedElement(getFile16BitBE(file));
2825 if (!IS_CUSTOM_ELEMENT(element))
2827 Error(ERR_WARN, "invalid custom element number %d", element);
2829 ReadUnusedBytesFromFile(file, chunk_size - 2);
2833 ei = &element_info[element];
2835 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
2836 ei->description[i] = getFile8Bit(file);
2837 ei->description[MAX_ELEMENT_NAME_LEN] = 0;
2839 ei->properties[EP_BITFIELD_BASE_NR] = getFile32BitBE(file);
2841 ReadUnusedBytesFromFile(file, 4); // reserved for more base properties
2843 ei->num_change_pages = getFile8Bit(file);
2845 chunk_size_expected = LEVEL_CHUNK_CUS4_SIZE(ei->num_change_pages);
2846 if (chunk_size_expected != chunk_size)
2848 ReadUnusedBytesFromFile(file, chunk_size - 43);
2849 return chunk_size_expected;
2852 ei->ce_value_fixed_initial = getFile16BitBE(file);
2853 ei->ce_value_random_initial = getFile16BitBE(file);
2854 ei->use_last_ce_value = getFile8Bit(file);
2856 ei->use_gfx_element = getFile8Bit(file);
2857 ei->gfx_element_initial = getMappedElement(getFile16BitBE(file));
2859 ei->collect_score_initial = getFile8Bit(file);
2860 ei->collect_count_initial = getFile8Bit(file);
2862 ei->drop_delay_fixed = getFile8Bit(file);
2863 ei->push_delay_fixed = getFile8Bit(file);
2864 ei->drop_delay_random = getFile8Bit(file);
2865 ei->push_delay_random = getFile8Bit(file);
2866 ei->move_delay_fixed = getFile16BitBE(file);
2867 ei->move_delay_random = getFile16BitBE(file);
2869 // bits 0 - 15 of "move_pattern" ...
2870 ei->move_pattern = getFile16BitBE(file);
2871 ei->move_direction_initial = getFile8Bit(file);
2872 ei->move_stepsize = getFile8Bit(file);
2874 ei->slippery_type = getFile8Bit(file);
2876 for (y = 0; y < 3; y++)
2877 for (x = 0; x < 3; x++)
2878 ei->content.e[x][y] = getMappedElement(getFile16BitBE(file));
2880 ei->move_enter_element = getMappedElement(getFile16BitBE(file));
2881 ei->move_leave_element = getMappedElement(getFile16BitBE(file));
2882 ei->move_leave_type = getFile8Bit(file);
2884 // ... bits 16 - 31 of "move_pattern" (not nice, but downward compatible)
2885 ei->move_pattern |= (getFile16BitBE(file) << 16);
2887 ei->access_direction = getFile8Bit(file);
2889 ei->explosion_delay = getFile8Bit(file);
2890 ei->ignition_delay = getFile8Bit(file);
2891 ei->explosion_type = getFile8Bit(file);
2893 // some free bytes for future custom property values and padding
2894 ReadUnusedBytesFromFile(file, 1);
2896 // ---------- change page property values (48 bytes) ------------------------
2898 setElementChangePages(ei, ei->num_change_pages);
2900 for (i = 0; i < ei->num_change_pages; i++)
2902 struct ElementChangeInfo *change = &ei->change_page[i];
2903 unsigned int event_bits;
2905 // always start with reliable default values
2906 setElementChangeInfoToDefaults(change);
2908 // bits 0 - 31 of "has_event[]" ...
2909 event_bits = getFile32BitBE(file);
2910 for (j = 0; j < MIN(NUM_CHANGE_EVENTS, 32); j++)
2911 if (event_bits & (1 << j))
2912 change->has_event[j] = TRUE;
2914 change->target_element = getMappedElement(getFile16BitBE(file));
2916 change->delay_fixed = getFile16BitBE(file);
2917 change->delay_random = getFile16BitBE(file);
2918 change->delay_frames = getFile16BitBE(file);
2920 change->initial_trigger_element = getMappedElement(getFile16BitBE(file));
2922 change->explode = getFile8Bit(file);
2923 change->use_target_content = getFile8Bit(file);
2924 change->only_if_complete = getFile8Bit(file);
2925 change->use_random_replace = getFile8Bit(file);
2927 change->random_percentage = getFile8Bit(file);
2928 change->replace_when = getFile8Bit(file);
2930 for (y = 0; y < 3; y++)
2931 for (x = 0; x < 3; x++)
2932 change->target_content.e[x][y]= getMappedElement(getFile16BitBE(file));
2934 change->can_change = getFile8Bit(file);
2936 change->trigger_side = getFile8Bit(file);
2938 change->trigger_player = getFile8Bit(file);
2939 change->trigger_page = getFile8Bit(file);
2941 change->trigger_page = (change->trigger_page == CH_PAGE_ANY_FILE ?
2942 CH_PAGE_ANY : (1 << change->trigger_page));
2944 change->has_action = getFile8Bit(file);
2945 change->action_type = getFile8Bit(file);
2946 change->action_mode = getFile8Bit(file);
2947 change->action_arg = getFile16BitBE(file);
2949 // ... bits 32 - 39 of "has_event[]" (not nice, but downward compatible)
2950 event_bits = getFile8Bit(file);
2951 for (j = 32; j < NUM_CHANGE_EVENTS; j++)
2952 if (event_bits & (1 << (j - 32)))
2953 change->has_event[j] = TRUE;
2956 // mark this custom element as modified
2957 ei->modified_settings = TRUE;
2959 level->file_has_custom_elements = TRUE;
2964 static int LoadLevel_GRP1(File *file, int chunk_size, struct LevelInfo *level)
2966 struct ElementInfo *ei;
2967 struct ElementGroupInfo *group;
2971 element = getMappedElement(getFile16BitBE(file));
2973 if (!IS_GROUP_ELEMENT(element))
2975 Error(ERR_WARN, "invalid group element number %d", element);
2977 ReadUnusedBytesFromFile(file, chunk_size - 2);
2981 ei = &element_info[element];
2983 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
2984 ei->description[i] = getFile8Bit(file);
2985 ei->description[MAX_ELEMENT_NAME_LEN] = 0;
2987 group = element_info[element].group;
2989 group->num_elements = getFile8Bit(file);
2991 ei->use_gfx_element = getFile8Bit(file);
2992 ei->gfx_element_initial = getMappedElement(getFile16BitBE(file));
2994 group->choice_mode = getFile8Bit(file);
2996 // some free bytes for future values and padding
2997 ReadUnusedBytesFromFile(file, 3);
2999 for (i = 0; i < MAX_ELEMENTS_IN_GROUP; i++)
3000 group->element[i] = getMappedElement(getFile16BitBE(file));
3002 // mark this group element as modified
3003 element_info[element].modified_settings = TRUE;
3005 level->file_has_custom_elements = TRUE;
3010 static int LoadLevel_MicroChunk(File *file, struct LevelFileConfigInfo *conf,
3011 int element, int real_element)
3013 int micro_chunk_size = 0;
3014 int conf_type = getFile8Bit(file);
3015 int byte_mask = conf_type & CONF_MASK_BYTES;
3016 boolean element_found = FALSE;
3019 micro_chunk_size += 1;
3021 if (byte_mask == CONF_MASK_MULTI_BYTES)
3023 int num_bytes = getFile16BitBE(file);
3024 byte *buffer = checked_malloc(num_bytes);
3026 ReadBytesFromFile(file, buffer, num_bytes);
3028 for (i = 0; conf[i].data_type != -1; i++)
3030 if (conf[i].element == element &&
3031 conf[i].conf_type == conf_type)
3033 int data_type = conf[i].data_type;
3034 int num_entities = num_bytes / CONF_ENTITY_NUM_BYTES(data_type);
3035 int max_num_entities = conf[i].max_num_entities;
3037 if (num_entities > max_num_entities)
3040 "truncating number of entities for element %d from %d to %d",
3041 element, num_entities, max_num_entities);
3043 num_entities = max_num_entities;
3046 if (num_entities == 0 && (data_type == TYPE_ELEMENT_LIST ||
3047 data_type == TYPE_CONTENT_LIST))
3049 // for element and content lists, zero entities are not allowed
3050 Error(ERR_WARN, "found empty list of entities for element %d",
3053 // do not set "num_entities" here to prevent reading behind buffer
3055 *(int *)(conf[i].num_entities) = 1; // at least one is required
3059 *(int *)(conf[i].num_entities) = num_entities;
3062 element_found = TRUE;
3064 if (data_type == TYPE_STRING)
3066 char *string = (char *)(conf[i].value);
3069 for (j = 0; j < max_num_entities; j++)
3070 string[j] = (j < num_entities ? buffer[j] : '\0');
3072 else if (data_type == TYPE_ELEMENT_LIST)
3074 int *element_array = (int *)(conf[i].value);
3077 for (j = 0; j < num_entities; j++)
3079 getMappedElement(CONF_ELEMENTS_ELEMENT(buffer, j));
3081 else if (data_type == TYPE_CONTENT_LIST)
3083 struct Content *content= (struct Content *)(conf[i].value);
3086 for (c = 0; c < num_entities; c++)
3087 for (y = 0; y < 3; y++)
3088 for (x = 0; x < 3; x++)
3089 content[c].e[x][y] =
3090 getMappedElement(CONF_CONTENTS_ELEMENT(buffer, c, x, y));
3093 element_found = FALSE;
3099 checked_free(buffer);
3101 micro_chunk_size += 2 + num_bytes;
3103 else // constant size configuration data (1, 2 or 4 bytes)
3105 int value = (byte_mask == CONF_MASK_1_BYTE ? getFile8Bit (file) :
3106 byte_mask == CONF_MASK_2_BYTE ? getFile16BitBE(file) :
3107 byte_mask == CONF_MASK_4_BYTE ? getFile32BitBE(file) : 0);
3109 for (i = 0; conf[i].data_type != -1; i++)
3111 if (conf[i].element == element &&
3112 conf[i].conf_type == conf_type)
3114 int data_type = conf[i].data_type;
3116 if (data_type == TYPE_ELEMENT)
3117 value = getMappedElement(value);
3119 if (data_type == TYPE_BOOLEAN)
3120 *(boolean *)(conf[i].value) = value;
3122 *(int *) (conf[i].value) = value;
3124 element_found = TRUE;
3130 micro_chunk_size += CONF_VALUE_NUM_BYTES(byte_mask);
3135 char *error_conf_chunk_bytes =
3136 (byte_mask == CONF_MASK_1_BYTE ? "CONF_VALUE_8_BIT" :
3137 byte_mask == CONF_MASK_2_BYTE ? "CONF_VALUE_16_BIT" :
3138 byte_mask == CONF_MASK_4_BYTE ? "CONF_VALUE_32_BIT" :"CONF_VALUE_BYTES");
3139 int error_conf_chunk_token = conf_type & CONF_MASK_TOKEN;
3140 int error_element = real_element;
3142 Error(ERR_WARN, "cannot load micro chunk '%s(%d)' value for element %d ['%s']",
3143 error_conf_chunk_bytes, error_conf_chunk_token,
3144 error_element, EL_NAME(error_element));
3147 return micro_chunk_size;
3150 static int LoadLevel_INFO(File *file, int chunk_size, struct LevelInfo *level)
3152 int real_chunk_size = 0;
3154 li = *level; // copy level data into temporary buffer
3156 while (!checkEndOfFile(file))
3158 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_INFO, -1, -1);
3160 if (real_chunk_size >= chunk_size)
3164 *level = li; // copy temporary buffer back to level data
3166 return real_chunk_size;
3169 static int LoadLevel_CONF(File *file, int chunk_size, struct LevelInfo *level)
3171 int real_chunk_size = 0;
3173 li = *level; // copy level data into temporary buffer
3175 while (!checkEndOfFile(file))
3177 int element = getMappedElement(getFile16BitBE(file));
3179 real_chunk_size += 2;
3180 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_CONF,
3182 if (real_chunk_size >= chunk_size)
3186 *level = li; // copy temporary buffer back to level data
3188 return real_chunk_size;
3191 static int LoadLevel_ELEM(File *file, int chunk_size, struct LevelInfo *level)
3193 int real_chunk_size = 0;
3195 li = *level; // copy level data into temporary buffer
3197 while (!checkEndOfFile(file))
3199 int element = getMappedElement(getFile16BitBE(file));
3201 real_chunk_size += 2;
3202 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_ELEM,
3204 if (real_chunk_size >= chunk_size)
3208 *level = li; // copy temporary buffer back to level data
3210 return real_chunk_size;
3213 static int LoadLevel_NOTE(File *file, int chunk_size, struct LevelInfo *level)
3215 int element = getMappedElement(getFile16BitBE(file));
3216 int envelope_nr = element - EL_ENVELOPE_1;
3217 int real_chunk_size = 2;
3219 xx_envelope = level->envelope[envelope_nr]; // copy into temporary buffer
3221 while (!checkEndOfFile(file))
3223 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_NOTE,
3226 if (real_chunk_size >= chunk_size)
3230 level->envelope[envelope_nr] = xx_envelope; // copy from temporary buffer
3232 return real_chunk_size;
3235 static int LoadLevel_CUSX(File *file, int chunk_size, struct LevelInfo *level)
3237 int element = getMappedElement(getFile16BitBE(file));
3238 int real_chunk_size = 2;
3239 struct ElementInfo *ei = &element_info[element];
3242 xx_ei = *ei; // copy element data into temporary buffer
3244 xx_ei.num_change_pages = -1;
3246 while (!checkEndOfFile(file))
3248 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_CUSX_base,
3250 if (xx_ei.num_change_pages != -1)
3253 if (real_chunk_size >= chunk_size)
3259 if (ei->num_change_pages == -1)
3261 Error(ERR_WARN, "LoadLevel_CUSX(): missing 'num_change_pages' for '%s'",
3264 ei->num_change_pages = 1;
3266 setElementChangePages(ei, 1);
3267 setElementChangeInfoToDefaults(ei->change);
3269 return real_chunk_size;
3272 // initialize number of change pages stored for this custom element
3273 setElementChangePages(ei, ei->num_change_pages);
3274 for (i = 0; i < ei->num_change_pages; i++)
3275 setElementChangeInfoToDefaults(&ei->change_page[i]);
3277 // start with reading properties for the first change page
3278 xx_current_change_page = 0;
3280 while (!checkEndOfFile(file))
3282 struct ElementChangeInfo *change = &ei->change_page[xx_current_change_page];
3284 xx_change = *change; // copy change data into temporary buffer
3286 resetEventBits(); // reset bits; change page might have changed
3288 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_CUSX_change,
3291 *change = xx_change;
3293 setEventFlagsFromEventBits(change);
3295 if (real_chunk_size >= chunk_size)
3299 level->file_has_custom_elements = TRUE;
3301 return real_chunk_size;
3304 static int LoadLevel_GRPX(File *file, int chunk_size, struct LevelInfo *level)
3306 int element = getMappedElement(getFile16BitBE(file));
3307 int real_chunk_size = 2;
3308 struct ElementInfo *ei = &element_info[element];
3309 struct ElementGroupInfo *group = ei->group;
3311 xx_ei = *ei; // copy element data into temporary buffer
3312 xx_group = *group; // copy group data into temporary buffer
3314 while (!checkEndOfFile(file))
3316 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_GRPX,
3319 if (real_chunk_size >= chunk_size)
3326 level->file_has_custom_elements = TRUE;
3328 return real_chunk_size;
3331 static void LoadLevelFromFileInfo_RND(struct LevelInfo *level,
3332 struct LevelFileInfo *level_file_info,
3333 boolean level_info_only)
3335 char *filename = level_file_info->filename;
3336 char cookie[MAX_LINE_LEN];
3337 char chunk_name[CHUNK_ID_LEN + 1];
3341 if (!(file = openFile(filename, MODE_READ)))
3343 level->no_valid_file = TRUE;
3344 level->no_level_file = TRUE;
3346 if (level_info_only)
3349 Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
3351 if (!setup.editor.use_template_for_new_levels)
3354 // if level file not found, try to initialize level data from template
3355 filename = getGlobalLevelTemplateFilename();
3357 if (!(file = openFile(filename, MODE_READ)))
3360 // default: for empty levels, use level template for custom elements
3361 level->use_custom_template = TRUE;
3363 level->no_valid_file = FALSE;
3366 getFileChunkBE(file, chunk_name, NULL);
3367 if (strEqual(chunk_name, "RND1"))
3369 getFile32BitBE(file); // not used
3371 getFileChunkBE(file, chunk_name, NULL);
3372 if (!strEqual(chunk_name, "CAVE"))
3374 level->no_valid_file = TRUE;
3376 Error(ERR_WARN, "unknown format of level file '%s'", filename);
3383 else // check for pre-2.0 file format with cookie string
3385 strcpy(cookie, chunk_name);
3386 if (getStringFromFile(file, &cookie[4], MAX_LINE_LEN - 4) == NULL)
3388 if (strlen(cookie) > 0 && cookie[strlen(cookie) - 1] == '\n')
3389 cookie[strlen(cookie) - 1] = '\0';
3391 if (!checkCookieString(cookie, LEVEL_COOKIE_TMPL))
3393 level->no_valid_file = TRUE;
3395 Error(ERR_WARN, "unknown format of level file '%s'", filename);
3402 if ((level->file_version = getFileVersionFromCookieString(cookie)) == -1)
3404 level->no_valid_file = TRUE;
3406 Error(ERR_WARN, "unsupported version of level file '%s'", filename);
3413 // pre-2.0 level files have no game version, so use file version here
3414 level->game_version = level->file_version;
3417 if (level->file_version < FILE_VERSION_1_2)
3419 // level files from versions before 1.2.0 without chunk structure
3420 LoadLevel_HEAD(file, LEVEL_CHUNK_HEAD_SIZE, level);
3421 LoadLevel_BODY(file, level->fieldx * level->fieldy, level);
3429 int (*loader)(File *, int, struct LevelInfo *);
3433 { "VERS", LEVEL_CHUNK_VERS_SIZE, LoadLevel_VERS },
3434 { "DATE", LEVEL_CHUNK_DATE_SIZE, LoadLevel_DATE },
3435 { "HEAD", LEVEL_CHUNK_HEAD_SIZE, LoadLevel_HEAD },
3436 { "NAME", LEVEL_CHUNK_NAME_SIZE, LoadLevel_NAME },
3437 { "AUTH", LEVEL_CHUNK_AUTH_SIZE, LoadLevel_AUTH },
3438 { "INFO", -1, LoadLevel_INFO },
3439 { "BODY", -1, LoadLevel_BODY },
3440 { "CONT", -1, LoadLevel_CONT },
3441 { "CNT2", LEVEL_CHUNK_CNT2_SIZE, LoadLevel_CNT2 },
3442 { "CNT3", -1, LoadLevel_CNT3 },
3443 { "CUS1", -1, LoadLevel_CUS1 },
3444 { "CUS2", -1, LoadLevel_CUS2 },
3445 { "CUS3", -1, LoadLevel_CUS3 },
3446 { "CUS4", -1, LoadLevel_CUS4 },
3447 { "GRP1", -1, LoadLevel_GRP1 },
3448 { "CONF", -1, LoadLevel_CONF },
3449 { "ELEM", -1, LoadLevel_ELEM },
3450 { "NOTE", -1, LoadLevel_NOTE },
3451 { "CUSX", -1, LoadLevel_CUSX },
3452 { "GRPX", -1, LoadLevel_GRPX },
3457 while (getFileChunkBE(file, chunk_name, &chunk_size))
3461 while (chunk_info[i].name != NULL &&
3462 !strEqual(chunk_name, chunk_info[i].name))
3465 if (chunk_info[i].name == NULL)
3467 Error(ERR_WARN, "unknown chunk '%s' in level file '%s'",
3468 chunk_name, filename);
3469 ReadUnusedBytesFromFile(file, chunk_size);
3471 else if (chunk_info[i].size != -1 &&
3472 chunk_info[i].size != chunk_size)
3474 Error(ERR_WARN, "wrong size (%d) of chunk '%s' in level file '%s'",
3475 chunk_size, chunk_name, filename);
3476 ReadUnusedBytesFromFile(file, chunk_size);
3480 // call function to load this level chunk
3481 int chunk_size_expected =
3482 (chunk_info[i].loader)(file, chunk_size, level);
3484 // the size of some chunks cannot be checked before reading other
3485 // chunks first (like "HEAD" and "BODY") that contain some header
3486 // information, so check them here
3487 if (chunk_size_expected != chunk_size)
3489 Error(ERR_WARN, "wrong size (%d) of chunk '%s' in level file '%s'",
3490 chunk_size, chunk_name, filename);
3500 // ----------------------------------------------------------------------------
3501 // functions for loading EM level
3502 // ----------------------------------------------------------------------------
3504 static void CopyNativeLevel_RND_to_EM(struct LevelInfo *level)
3506 static int ball_xy[8][2] =
3517 struct LevelInfo_EM *level_em = level->native_em_level;
3518 struct LEVEL *lev = level_em->lev;
3519 struct PLAYER **ply = level_em->ply;
3522 lev->width = MIN(level->fieldx, EM_MAX_CAVE_WIDTH);
3523 lev->height = MIN(level->fieldy, EM_MAX_CAVE_HEIGHT);
3525 lev->time_seconds = level->time;
3526 lev->required_initial = level->gems_needed;
3528 lev->emerald_score = level->score[SC_EMERALD];
3529 lev->diamond_score = level->score[SC_DIAMOND];
3530 lev->alien_score = level->score[SC_ROBOT];
3531 lev->tank_score = level->score[SC_SPACESHIP];
3532 lev->bug_score = level->score[SC_BUG];
3533 lev->eater_score = level->score[SC_YAMYAM];
3534 lev->nut_score = level->score[SC_NUT];
3535 lev->dynamite_score = level->score[SC_DYNAMITE];
3536 lev->key_score = level->score[SC_KEY];
3537 lev->exit_score = level->score[SC_TIME_BONUS];
3539 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
3540 for (y = 0; y < 3; y++)
3541 for (x = 0; x < 3; x++)
3542 lev->eater_array[i][y * 3 + x] =
3543 map_element_RND_to_EM(level->yamyam_content[i].e[x][y]);
3545 lev->amoeba_time = level->amoeba_speed;
3546 lev->wonderwall_time_initial = level->time_magic_wall;
3547 lev->wheel_time = level->time_wheel;
3549 lev->android_move_time = level->android_move_time;
3550 lev->android_clone_time = level->android_clone_time;
3551 lev->ball_random = level->ball_random;
3552 lev->ball_state_initial = level->ball_state_initial;
3553 lev->ball_time = level->ball_time;
3554 lev->num_ball_arrays = level->num_ball_contents;
3556 lev->lenses_score = level->lenses_score;
3557 lev->magnify_score = level->magnify_score;
3558 lev->slurp_score = level->slurp_score;
3560 lev->lenses_time = level->lenses_time;
3561 lev->magnify_time = level->magnify_time;
3563 lev->wind_direction_initial =
3564 map_direction_RND_to_EM(level->wind_direction_initial);
3565 lev->wind_cnt_initial = (level->wind_direction_initial != MV_NONE ?
3566 lev->wind_time : 0);
3568 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
3569 for (j = 0; j < 8; j++)
3570 lev->ball_array[i][j] =
3571 map_element_RND_to_EM(level->
3572 ball_content[i].e[ball_xy[j][0]][ball_xy[j][1]]);
3574 map_android_clone_elements_RND_to_EM(level);
3576 // first fill the complete playfield with the default border element
3577 for (y = 0; y < EM_MAX_CAVE_HEIGHT; y++)
3578 for (x = 0; x < EM_MAX_CAVE_WIDTH; x++)
3579 level_em->cave[x][y] = ZBORDER;
3581 if (BorderElement == EL_STEELWALL)
3583 for (y = 0; y < lev->height + 2; y++)
3584 for (x = 0; x < lev->width + 2; x++)
3585 level_em->cave[x + 1][y + 1] = map_element_RND_to_EM(EL_STEELWALL);
3588 // then copy the real level contents from level file into the playfield
3589 for (y = 0; y < lev->height; y++) for (x = 0; x < lev->width; x++)
3591 int new_element = map_element_RND_to_EM(level->field[x][y]);
3592 int offset = (BorderElement == EL_STEELWALL ? 1 : 0);
3593 int xx = x + 1 + offset;
3594 int yy = y + 1 + offset;
3596 if (level->field[x][y] == EL_AMOEBA_DEAD)
3597 new_element = map_element_RND_to_EM(EL_AMOEBA_WET);
3599 level_em->cave[xx][yy] = new_element;
3602 for (i = 0; i < MAX_PLAYERS; i++)
3604 ply[i]->x_initial = 0;
3605 ply[i]->y_initial = 0;
3608 // initialize player positions and delete players from the playfield
3609 for (y = 0; y < lev->height; y++) for (x = 0; x < lev->width; x++)
3611 if (ELEM_IS_PLAYER(level->field[x][y]))
3613 int player_nr = GET_PLAYER_NR(level->field[x][y]);
3614 int offset = (BorderElement == EL_STEELWALL ? 1 : 0);
3615 int xx = x + 1 + offset;
3616 int yy = y + 1 + offset;
3618 ply[player_nr]->x_initial = xx;
3619 ply[player_nr]->y_initial = yy;
3621 level_em->cave[xx][yy] = map_element_RND_to_EM(EL_EMPTY);
3625 if (BorderElement == EL_STEELWALL)
3632 static void CopyNativeLevel_EM_to_RND(struct LevelInfo *level)
3634 static int ball_xy[8][2] =
3645 struct LevelInfo_EM *level_em = level->native_em_level;
3646 struct LEVEL *lev = level_em->lev;
3647 struct PLAYER **ply = level_em->ply;
3650 level->fieldx = MIN(lev->width, MAX_LEV_FIELDX);
3651 level->fieldy = MIN(lev->height, MAX_LEV_FIELDY);
3653 level->time = lev->time_seconds;
3654 level->gems_needed = lev->required_initial;
3656 sprintf(level->name, "Level %d", level->file_info.nr);
3658 level->score[SC_EMERALD] = lev->emerald_score;
3659 level->score[SC_DIAMOND] = lev->diamond_score;
3660 level->score[SC_ROBOT] = lev->alien_score;
3661 level->score[SC_SPACESHIP] = lev->tank_score;
3662 level->score[SC_BUG] = lev->bug_score;
3663 level->score[SC_YAMYAM] = lev->eater_score;
3664 level->score[SC_NUT] = lev->nut_score;
3665 level->score[SC_DYNAMITE] = lev->dynamite_score;
3666 level->score[SC_KEY] = lev->key_score;
3667 level->score[SC_TIME_BONUS] = lev->exit_score;
3669 level->num_yamyam_contents = MAX_ELEMENT_CONTENTS;
3671 for (i = 0; i < level->num_yamyam_contents; i++)
3672 for (y = 0; y < 3; y++)
3673 for (x = 0; x < 3; x++)
3674 level->yamyam_content[i].e[x][y] =
3675 map_element_EM_to_RND(lev->eater_array[i][y * 3 + x]);
3677 level->amoeba_speed = lev->amoeba_time;
3678 level->time_magic_wall = lev->wonderwall_time_initial;
3679 level->time_wheel = lev->wheel_time;
3681 level->android_move_time = lev->android_move_time;
3682 level->android_clone_time = lev->android_clone_time;
3683 level->ball_random = lev->ball_random;
3684 level->ball_state_initial = lev->ball_state_initial;
3685 level->ball_time = lev->ball_time;
3686 level->num_ball_contents = lev->num_ball_arrays;
3688 level->lenses_score = lev->lenses_score;
3689 level->magnify_score = lev->magnify_score;
3690 level->slurp_score = lev->slurp_score;
3692 level->lenses_time = lev->lenses_time;
3693 level->magnify_time = lev->magnify_time;
3695 level->wind_direction_initial =
3696 map_direction_EM_to_RND(lev->wind_direction_initial);
3698 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
3699 for (j = 0; j < 8; j++)
3700 level->ball_content[i].e[ball_xy[j][0]][ball_xy[j][1]] =
3701 map_element_EM_to_RND(lev->ball_array[i][j]);
3703 map_android_clone_elements_EM_to_RND(level);
3705 // convert the playfield (some elements need special treatment)
3706 for (y = 0; y < level->fieldy; y++) for (x = 0; x < level->fieldx; x++)
3708 int new_element = map_element_EM_to_RND(level_em->cave[x + 1][y + 1]);
3710 if (new_element == EL_AMOEBA_WET && level->amoeba_speed == 0)
3711 new_element = EL_AMOEBA_DEAD;
3713 level->field[x][y] = new_element;
3716 for (i = 0; i < MAX_PLAYERS; i++)
3718 // in case of all players set to the same field, use the first player
3719 int nr = MAX_PLAYERS - i - 1;
3720 int jx = ply[nr]->x_initial - 1;
3721 int jy = ply[nr]->y_initial - 1;
3723 if (jx != -1 && jy != -1)
3724 level->field[jx][jy] = EL_PLAYER_1 + nr;
3729 // ----------------------------------------------------------------------------
3730 // functions for loading SP level
3731 // ----------------------------------------------------------------------------
3733 static void CopyNativeLevel_RND_to_SP(struct LevelInfo *level)
3735 struct LevelInfo_SP *level_sp = level->native_sp_level;
3736 LevelInfoType *header = &level_sp->header;
3739 level_sp->width = level->fieldx;
3740 level_sp->height = level->fieldy;
3742 for (x = 0; x < level->fieldx; x++)
3743 for (y = 0; y < level->fieldy; y++)
3744 level_sp->playfield[x][y] = map_element_RND_to_SP(level->field[x][y]);
3746 header->InitialGravity = (level->initial_player_gravity[0] ? 1 : 0);
3748 for (i = 0; i < SP_LEVEL_NAME_LEN; i++)
3749 header->LevelTitle[i] = level->name[i];
3750 // !!! NO STRING TERMINATION IN SUPAPLEX VB CODE YET -- FIX THIS !!!
3752 header->InfotronsNeeded = level->gems_needed;
3754 header->SpecialPortCount = 0;
3756 for (x = 0; x < level->fieldx; x++) for (y = 0; y < level->fieldy; y++)
3758 boolean gravity_port_found = FALSE;
3759 boolean gravity_port_valid = FALSE;
3760 int gravity_port_flag;
3761 int gravity_port_base_element;
3762 int element = level->field[x][y];
3764 if (element >= EL_SP_GRAVITY_ON_PORT_RIGHT &&
3765 element <= EL_SP_GRAVITY_ON_PORT_UP)
3767 gravity_port_found = TRUE;
3768 gravity_port_valid = TRUE;
3769 gravity_port_flag = 1;
3770 gravity_port_base_element = EL_SP_GRAVITY_ON_PORT_RIGHT;
3772 else if (element >= EL_SP_GRAVITY_OFF_PORT_RIGHT &&
3773 element <= EL_SP_GRAVITY_OFF_PORT_UP)
3775 gravity_port_found = TRUE;
3776 gravity_port_valid = TRUE;
3777 gravity_port_flag = 0;
3778 gravity_port_base_element = EL_SP_GRAVITY_OFF_PORT_RIGHT;
3780 else if (element >= EL_SP_GRAVITY_PORT_RIGHT &&
3781 element <= EL_SP_GRAVITY_PORT_UP)
3783 // change R'n'D style gravity inverting special port to normal port
3784 // (there are no gravity inverting ports in native Supaplex engine)
3786 gravity_port_found = TRUE;
3787 gravity_port_valid = FALSE;
3788 gravity_port_base_element = EL_SP_GRAVITY_PORT_RIGHT;
3791 if (gravity_port_found)
3793 if (gravity_port_valid &&
3794 header->SpecialPortCount < SP_MAX_SPECIAL_PORTS)
3796 SpecialPortType *port = &header->SpecialPort[header->SpecialPortCount];
3798 port->PortLocation = (y * level->fieldx + x) * 2;
3799 port->Gravity = gravity_port_flag;
3801 element += EL_SP_GRAVITY_PORT_RIGHT - gravity_port_base_element;
3803 header->SpecialPortCount++;
3807 // change special gravity port to normal port
3809 element += EL_SP_PORT_RIGHT - gravity_port_base_element;
3812 level_sp->playfield[x][y] = element - EL_SP_START;
3817 static void CopyNativeLevel_SP_to_RND(struct LevelInfo *level)
3819 struct LevelInfo_SP *level_sp = level->native_sp_level;
3820 LevelInfoType *header = &level_sp->header;
3821 boolean num_invalid_elements = 0;
3824 level->fieldx = level_sp->width;
3825 level->fieldy = level_sp->height;
3827 for (x = 0; x < level->fieldx; x++)
3829 for (y = 0; y < level->fieldy; y++)
3831 int element_old = level_sp->playfield[x][y];
3832 int element_new = getMappedElement(map_element_SP_to_RND(element_old));
3834 if (element_new == EL_UNKNOWN)
3836 num_invalid_elements++;
3838 Error(ERR_DEBUG, "invalid element %d at position %d, %d",
3842 level->field[x][y] = element_new;
3846 if (num_invalid_elements > 0)
3847 Error(ERR_WARN, "found %d invalid elements%s", num_invalid_elements,
3848 (!options.debug ? " (use '--debug' for more details)" : ""));
3850 for (i = 0; i < MAX_PLAYERS; i++)
3851 level->initial_player_gravity[i] =
3852 (header->InitialGravity == 1 ? TRUE : FALSE);
3854 // skip leading spaces
3855 for (i = 0; i < SP_LEVEL_NAME_LEN; i++)
3856 if (header->LevelTitle[i] != ' ')
3860 for (j = 0; i < SP_LEVEL_NAME_LEN; i++, j++)
3861 level->name[j] = header->LevelTitle[i];
3862 level->name[j] = '\0';
3864 // cut trailing spaces
3866 if (level->name[j - 1] == ' ' && level->name[j] == '\0')
3867 level->name[j - 1] = '\0';
3869 level->gems_needed = header->InfotronsNeeded;
3871 for (i = 0; i < header->SpecialPortCount; i++)
3873 SpecialPortType *port = &header->SpecialPort[i];
3874 int port_location = port->PortLocation;
3875 int gravity = port->Gravity;
3876 int port_x, port_y, port_element;
3878 port_x = (port_location / 2) % level->fieldx;
3879 port_y = (port_location / 2) / level->fieldx;
3881 if (port_x < 0 || port_x >= level->fieldx ||
3882 port_y < 0 || port_y >= level->fieldy)
3884 Error(ERR_WARN, "special port position (%d, %d) out of bounds",
3890 port_element = level->field[port_x][port_y];
3892 if (port_element < EL_SP_GRAVITY_PORT_RIGHT ||
3893 port_element > EL_SP_GRAVITY_PORT_UP)
3895 Error(ERR_WARN, "no special port at position (%d, %d)", port_x, port_y);
3900 // change previous (wrong) gravity inverting special port to either
3901 // gravity enabling special port or gravity disabling special port
3902 level->field[port_x][port_y] +=
3903 (gravity == 1 ? EL_SP_GRAVITY_ON_PORT_RIGHT :
3904 EL_SP_GRAVITY_OFF_PORT_RIGHT) - EL_SP_GRAVITY_PORT_RIGHT;
3907 // change special gravity ports without database entries to normal ports
3908 for (x = 0; x < level->fieldx; x++)
3909 for (y = 0; y < level->fieldy; y++)
3910 if (level->field[x][y] >= EL_SP_GRAVITY_PORT_RIGHT &&
3911 level->field[x][y] <= EL_SP_GRAVITY_PORT_UP)
3912 level->field[x][y] += EL_SP_PORT_RIGHT - EL_SP_GRAVITY_PORT_RIGHT;
3914 level->time = 0; // no time limit
3915 level->amoeba_speed = 0;
3916 level->time_magic_wall = 0;
3917 level->time_wheel = 0;
3918 level->amoeba_content = EL_EMPTY;
3921 // original Supaplex does not use score values -- use default values
3923 for (i = 0; i < LEVEL_SCORE_ELEMENTS; i++)
3924 level->score[i] = 0;
3927 // there are no yamyams in supaplex levels
3928 for (i = 0; i < level->num_yamyam_contents; i++)
3929 for (x = 0; x < 3; x++)
3930 for (y = 0; y < 3; y++)
3931 level->yamyam_content[i].e[x][y] = EL_EMPTY;
3934 static void CopyNativeTape_RND_to_SP(struct LevelInfo *level)
3936 struct LevelInfo_SP *level_sp = level->native_sp_level;
3937 struct DemoInfo_SP *demo = &level_sp->demo;
3940 // always start with reliable default values
3941 demo->is_available = FALSE;
3944 if (TAPE_IS_EMPTY(tape))
3947 demo->level_nr = tape.level_nr; // (currently not used)
3949 level_sp->header.DemoRandomSeed = tape.random_seed;
3953 for (i = 0; i < tape.length; i++)
3955 int demo_action = map_key_RND_to_SP(tape.pos[i].action[0]);
3956 int demo_repeat = tape.pos[i].delay;
3957 int demo_entries = (demo_repeat + 15) / 16;
3959 if (demo->length + demo_entries >= SP_MAX_TAPE_LEN)
3961 Error(ERR_WARN, "tape truncated: size exceeds maximum SP demo size %d",
3967 for (j = 0; j < demo_repeat / 16; j++)
3968 demo->data[demo->length++] = 0xf0 | demo_action;
3970 if (demo_repeat % 16)
3971 demo->data[demo->length++] = ((demo_repeat % 16 - 1) << 4) | demo_action;
3974 demo->is_available = TRUE;
3977 static void setTapeInfoToDefaults(void);
3979 static void CopyNativeTape_SP_to_RND(struct LevelInfo *level)
3981 struct LevelInfo_SP *level_sp = level->native_sp_level;
3982 struct DemoInfo_SP *demo = &level_sp->demo;
3983 char *filename = level->file_info.filename;
3986 // always start with reliable default values
3987 setTapeInfoToDefaults();
3989 if (!demo->is_available)
3992 tape.level_nr = demo->level_nr; // (currently not used)
3993 tape.random_seed = level_sp->header.DemoRandomSeed;
3995 TapeSetDateFromEpochSeconds(getFileTimestampEpochSeconds(filename));
3998 tape.pos[tape.counter].delay = 0;
4000 for (i = 0; i < demo->length; i++)
4002 int demo_action = demo->data[i] & 0x0f;
4003 int demo_repeat = (demo->data[i] & 0xf0) >> 4;
4004 int tape_action = map_key_SP_to_RND(demo_action);
4005 int tape_repeat = demo_repeat + 1;
4006 byte action[MAX_PLAYERS] = { tape_action, 0, 0, 0 };
4007 boolean success = 0;
4010 for (j = 0; j < tape_repeat; j++)
4011 success = TapeAddAction(action);
4015 Error(ERR_WARN, "SP demo truncated: size exceeds maximum tape size %d",
4022 TapeHaltRecording();
4026 // ----------------------------------------------------------------------------
4027 // functions for loading MM level
4028 // ----------------------------------------------------------------------------
4030 static void CopyNativeLevel_RND_to_MM(struct LevelInfo *level)
4032 struct LevelInfo_MM *level_mm = level->native_mm_level;
4035 level_mm->fieldx = MIN(level->fieldx, MM_MAX_PLAYFIELD_WIDTH);
4036 level_mm->fieldy = MIN(level->fieldy, MM_MAX_PLAYFIELD_HEIGHT);
4038 level_mm->time = level->time;
4039 level_mm->kettles_needed = level->gems_needed;
4040 level_mm->auto_count_kettles = level->auto_count_gems;
4042 level_mm->laser_red = level->mm_laser_red;
4043 level_mm->laser_green = level->mm_laser_green;
4044 level_mm->laser_blue = level->mm_laser_blue;
4046 strcpy(level_mm->name, level->name);
4047 strcpy(level_mm->author, level->author);
4049 level_mm->score[SC_EMERALD] = level->score[SC_EMERALD];
4050 level_mm->score[SC_PACMAN] = level->score[SC_PACMAN];
4051 level_mm->score[SC_KEY] = level->score[SC_KEY];
4052 level_mm->score[SC_TIME_BONUS] = level->score[SC_TIME_BONUS];
4053 level_mm->score[SC_ELEM_BONUS] = level->score[SC_ELEM_BONUS];
4055 level_mm->amoeba_speed = level->amoeba_speed;
4056 level_mm->time_fuse = level->mm_time_fuse;
4057 level_mm->time_bomb = level->mm_time_bomb;
4058 level_mm->time_ball = level->mm_time_ball;
4059 level_mm->time_block = level->mm_time_block;
4061 for (x = 0; x < level->fieldx; x++)
4062 for (y = 0; y < level->fieldy; y++)
4064 level_mm->field[x][y] = map_element_RND_to_MM(level->field[x][y]);
4067 static void CopyNativeLevel_MM_to_RND(struct LevelInfo *level)
4069 struct LevelInfo_MM *level_mm = level->native_mm_level;
4072 level->fieldx = MIN(level_mm->fieldx, MAX_LEV_FIELDX);
4073 level->fieldy = MIN(level_mm->fieldy, MAX_LEV_FIELDY);
4075 level->time = level_mm->time;
4076 level->gems_needed = level_mm->kettles_needed;
4077 level->auto_count_gems = level_mm->auto_count_kettles;
4079 level->mm_laser_red = level_mm->laser_red;
4080 level->mm_laser_green = level_mm->laser_green;
4081 level->mm_laser_blue = level_mm->laser_blue;
4083 strcpy(level->name, level_mm->name);
4085 // only overwrite author from 'levelinfo.conf' if author defined in level
4086 if (!strEqual(level_mm->author, ANONYMOUS_NAME))
4087 strcpy(level->author, level_mm->author);
4089 level->score[SC_EMERALD] = level_mm->score[SC_EMERALD];
4090 level->score[SC_PACMAN] = level_mm->score[SC_PACMAN];
4091 level->score[SC_KEY] = level_mm->score[SC_KEY];
4092 level->score[SC_TIME_BONUS] = level_mm->score[SC_TIME_BONUS];
4093 level->score[SC_ELEM_BONUS] = level_mm->score[SC_ELEM_BONUS];
4095 level->amoeba_speed = level_mm->amoeba_speed;
4096 level->mm_time_fuse = level_mm->time_fuse;
4097 level->mm_time_bomb = level_mm->time_bomb;
4098 level->mm_time_ball = level_mm->time_ball;
4099 level->mm_time_block = level_mm->time_block;
4101 for (x = 0; x < level->fieldx; x++)
4102 for (y = 0; y < level->fieldy; y++)
4103 level->field[x][y] = map_element_MM_to_RND(level_mm->field[x][y]);
4107 // ----------------------------------------------------------------------------
4108 // functions for loading DC level
4109 // ----------------------------------------------------------------------------
4111 #define DC_LEVEL_HEADER_SIZE 344
4113 static unsigned short getDecodedWord_DC(unsigned short data_encoded,
4116 static int last_data_encoded;
4120 int diff_hi, diff_lo;
4121 int data_hi, data_lo;
4122 unsigned short data_decoded;
4126 last_data_encoded = 0;
4133 diff = data_encoded - last_data_encoded;
4134 diff_hi = diff & ~0xff;
4135 diff_lo = diff & 0xff;
4139 data_hi = diff_hi - (offset1 << 8) + (offset2 & 0xff00);
4140 data_lo = (diff_lo + (data_hi >> 16)) & 0x00ff;
4141 data_hi = data_hi & 0xff00;
4143 data_decoded = data_hi | data_lo;
4145 last_data_encoded = data_encoded;
4147 offset1 = (offset1 + 1) % 31;
4148 offset2 = offset2 & 0xff;
4150 return data_decoded;
4153 static int getMappedElement_DC(int element)
4161 // 0x0117 - 0x036e: (?)
4164 // 0x042d - 0x0684: (?)
4180 element = EL_CRYSTAL;
4183 case 0x0e77: // quicksand (boulder)
4184 element = EL_QUICKSAND_FAST_FULL;
4187 case 0x0e99: // slow quicksand (boulder)
4188 element = EL_QUICKSAND_FULL;
4192 element = EL_EM_EXIT_OPEN;
4196 element = EL_EM_EXIT_CLOSED;
4200 element = EL_EM_STEEL_EXIT_OPEN;
4204 element = EL_EM_STEEL_EXIT_CLOSED;
4207 case 0x0f4f: // dynamite (lit 1)
4208 element = EL_EM_DYNAMITE_ACTIVE;
4211 case 0x0f57: // dynamite (lit 2)
4212 element = EL_EM_DYNAMITE_ACTIVE;
4215 case 0x0f5f: // dynamite (lit 3)
4216 element = EL_EM_DYNAMITE_ACTIVE;
4219 case 0x0f67: // dynamite (lit 4)
4220 element = EL_EM_DYNAMITE_ACTIVE;
4227 element = EL_AMOEBA_WET;
4231 element = EL_AMOEBA_DROP;
4235 element = EL_DC_MAGIC_WALL;
4239 element = EL_SPACESHIP_UP;
4243 element = EL_SPACESHIP_DOWN;
4247 element = EL_SPACESHIP_LEFT;
4251 element = EL_SPACESHIP_RIGHT;
4255 element = EL_BUG_UP;
4259 element = EL_BUG_DOWN;
4263 element = EL_BUG_LEFT;
4267 element = EL_BUG_RIGHT;
4271 element = EL_MOLE_UP;
4275 element = EL_MOLE_DOWN;
4279 element = EL_MOLE_LEFT;
4283 element = EL_MOLE_RIGHT;
4291 element = EL_YAMYAM;
4295 element = EL_SWITCHGATE_OPEN;
4299 element = EL_SWITCHGATE_CLOSED;
4303 element = EL_DC_SWITCHGATE_SWITCH_UP;
4307 element = EL_TIMEGATE_CLOSED;
4310 case 0x144c: // conveyor belt switch (green)
4311 element = EL_CONVEYOR_BELT_3_SWITCH_MIDDLE;
4314 case 0x144f: // conveyor belt switch (red)
4315 element = EL_CONVEYOR_BELT_1_SWITCH_MIDDLE;
4318 case 0x1452: // conveyor belt switch (blue)
4319 element = EL_CONVEYOR_BELT_4_SWITCH_MIDDLE;
4323 element = EL_CONVEYOR_BELT_3_MIDDLE;
4327 element = EL_CONVEYOR_BELT_3_LEFT;
4331 element = EL_CONVEYOR_BELT_3_RIGHT;
4335 element = EL_CONVEYOR_BELT_1_MIDDLE;
4339 element = EL_CONVEYOR_BELT_1_LEFT;
4343 element = EL_CONVEYOR_BELT_1_RIGHT;
4347 element = EL_CONVEYOR_BELT_4_MIDDLE;
4351 element = EL_CONVEYOR_BELT_4_LEFT;
4355 element = EL_CONVEYOR_BELT_4_RIGHT;
4359 element = EL_EXPANDABLE_WALL_HORIZONTAL;
4363 element = EL_EXPANDABLE_WALL_VERTICAL;
4367 element = EL_EXPANDABLE_WALL_ANY;
4370 case 0x14ce: // growing steel wall (left/right)
4371 element = EL_EXPANDABLE_STEELWALL_HORIZONTAL;
4374 case 0x14df: // growing steel wall (up/down)
4375 element = EL_EXPANDABLE_STEELWALL_VERTICAL;
4378 case 0x14e8: // growing steel wall (up/down/left/right)
4379 element = EL_EXPANDABLE_STEELWALL_ANY;
4383 element = EL_SHIELD_DEADLY;
4387 element = EL_EXTRA_TIME;
4395 element = EL_EMPTY_SPACE;
4398 case 0x1578: // quicksand (empty)
4399 element = EL_QUICKSAND_FAST_EMPTY;
4402 case 0x1579: // slow quicksand (empty)
4403 element = EL_QUICKSAND_EMPTY;
4413 element = EL_EM_DYNAMITE;
4416 case 0x15a1: // key (red)
4417 element = EL_EM_KEY_1;
4420 case 0x15a2: // key (yellow)
4421 element = EL_EM_KEY_2;
4424 case 0x15a3: // key (blue)
4425 element = EL_EM_KEY_4;
4428 case 0x15a4: // key (green)
4429 element = EL_EM_KEY_3;
4432 case 0x15a5: // key (white)
4433 element = EL_DC_KEY_WHITE;
4437 element = EL_WALL_SLIPPERY;
4444 case 0x15a8: // wall (not round)
4448 case 0x15a9: // (blue)
4449 element = EL_CHAR_A;
4452 case 0x15aa: // (blue)
4453 element = EL_CHAR_B;
4456 case 0x15ab: // (blue)
4457 element = EL_CHAR_C;
4460 case 0x15ac: // (blue)
4461 element = EL_CHAR_D;
4464 case 0x15ad: // (blue)
4465 element = EL_CHAR_E;
4468 case 0x15ae: // (blue)
4469 element = EL_CHAR_F;
4472 case 0x15af: // (blue)
4473 element = EL_CHAR_G;
4476 case 0x15b0: // (blue)
4477 element = EL_CHAR_H;
4480 case 0x15b1: // (blue)
4481 element = EL_CHAR_I;
4484 case 0x15b2: // (blue)
4485 element = EL_CHAR_J;
4488 case 0x15b3: // (blue)
4489 element = EL_CHAR_K;
4492 case 0x15b4: // (blue)
4493 element = EL_CHAR_L;
4496 case 0x15b5: // (blue)
4497 element = EL_CHAR_M;
4500 case 0x15b6: // (blue)
4501 element = EL_CHAR_N;
4504 case 0x15b7: // (blue)
4505 element = EL_CHAR_O;
4508 case 0x15b8: // (blue)
4509 element = EL_CHAR_P;
4512 case 0x15b9: // (blue)
4513 element = EL_CHAR_Q;
4516 case 0x15ba: // (blue)
4517 element = EL_CHAR_R;
4520 case 0x15bb: // (blue)
4521 element = EL_CHAR_S;
4524 case 0x15bc: // (blue)
4525 element = EL_CHAR_T;
4528 case 0x15bd: // (blue)
4529 element = EL_CHAR_U;
4532 case 0x15be: // (blue)
4533 element = EL_CHAR_V;
4536 case 0x15bf: // (blue)
4537 element = EL_CHAR_W;
4540 case 0x15c0: // (blue)
4541 element = EL_CHAR_X;
4544 case 0x15c1: // (blue)
4545 element = EL_CHAR_Y;
4548 case 0x15c2: // (blue)
4549 element = EL_CHAR_Z;
4552 case 0x15c3: // (blue)
4553 element = EL_CHAR_AUMLAUT;
4556 case 0x15c4: // (blue)
4557 element = EL_CHAR_OUMLAUT;
4560 case 0x15c5: // (blue)
4561 element = EL_CHAR_UUMLAUT;
4564 case 0x15c6: // (blue)
4565 element = EL_CHAR_0;
4568 case 0x15c7: // (blue)
4569 element = EL_CHAR_1;
4572 case 0x15c8: // (blue)
4573 element = EL_CHAR_2;
4576 case 0x15c9: // (blue)
4577 element = EL_CHAR_3;
4580 case 0x15ca: // (blue)
4581 element = EL_CHAR_4;
4584 case 0x15cb: // (blue)
4585 element = EL_CHAR_5;
4588 case 0x15cc: // (blue)
4589 element = EL_CHAR_6;
4592 case 0x15cd: // (blue)
4593 element = EL_CHAR_7;
4596 case 0x15ce: // (blue)
4597 element = EL_CHAR_8;
4600 case 0x15cf: // (blue)
4601 element = EL_CHAR_9;
4604 case 0x15d0: // (blue)
4605 element = EL_CHAR_PERIOD;
4608 case 0x15d1: // (blue)
4609 element = EL_CHAR_EXCLAM;
4612 case 0x15d2: // (blue)
4613 element = EL_CHAR_COLON;
4616 case 0x15d3: // (blue)
4617 element = EL_CHAR_LESS;
4620 case 0x15d4: // (blue)
4621 element = EL_CHAR_GREATER;
4624 case 0x15d5: // (blue)
4625 element = EL_CHAR_QUESTION;
4628 case 0x15d6: // (blue)
4629 element = EL_CHAR_COPYRIGHT;
4632 case 0x15d7: // (blue)
4633 element = EL_CHAR_UP;
4636 case 0x15d8: // (blue)
4637 element = EL_CHAR_DOWN;
4640 case 0x15d9: // (blue)
4641 element = EL_CHAR_BUTTON;
4644 case 0x15da: // (blue)
4645 element = EL_CHAR_PLUS;
4648 case 0x15db: // (blue)
4649 element = EL_CHAR_MINUS;
4652 case 0x15dc: // (blue)
4653 element = EL_CHAR_APOSTROPHE;
4656 case 0x15dd: // (blue)
4657 element = EL_CHAR_PARENLEFT;
4660 case 0x15de: // (blue)
4661 element = EL_CHAR_PARENRIGHT;
4664 case 0x15df: // (green)
4665 element = EL_CHAR_A;
4668 case 0x15e0: // (green)
4669 element = EL_CHAR_B;
4672 case 0x15e1: // (green)
4673 element = EL_CHAR_C;
4676 case 0x15e2: // (green)
4677 element = EL_CHAR_D;
4680 case 0x15e3: // (green)
4681 element = EL_CHAR_E;
4684 case 0x15e4: // (green)
4685 element = EL_CHAR_F;
4688 case 0x15e5: // (green)
4689 element = EL_CHAR_G;
4692 case 0x15e6: // (green)
4693 element = EL_CHAR_H;
4696 case 0x15e7: // (green)
4697 element = EL_CHAR_I;
4700 case 0x15e8: // (green)
4701 element = EL_CHAR_J;
4704 case 0x15e9: // (green)
4705 element = EL_CHAR_K;
4708 case 0x15ea: // (green)
4709 element = EL_CHAR_L;
4712 case 0x15eb: // (green)
4713 element = EL_CHAR_M;
4716 case 0x15ec: // (green)
4717 element = EL_CHAR_N;
4720 case 0x15ed: // (green)
4721 element = EL_CHAR_O;
4724 case 0x15ee: // (green)
4725 element = EL_CHAR_P;
4728 case 0x15ef: // (green)
4729 element = EL_CHAR_Q;
4732 case 0x15f0: // (green)
4733 element = EL_CHAR_R;
4736 case 0x15f1: // (green)
4737 element = EL_CHAR_S;
4740 case 0x15f2: // (green)
4741 element = EL_CHAR_T;
4744 case 0x15f3: // (green)
4745 element = EL_CHAR_U;
4748 case 0x15f4: // (green)
4749 element = EL_CHAR_V;
4752 case 0x15f5: // (green)
4753 element = EL_CHAR_W;
4756 case 0x15f6: // (green)
4757 element = EL_CHAR_X;
4760 case 0x15f7: // (green)
4761 element = EL_CHAR_Y;
4764 case 0x15f8: // (green)
4765 element = EL_CHAR_Z;
4768 case 0x15f9: // (green)
4769 element = EL_CHAR_AUMLAUT;
4772 case 0x15fa: // (green)
4773 element = EL_CHAR_OUMLAUT;
4776 case 0x15fb: // (green)
4777 element = EL_CHAR_UUMLAUT;
4780 case 0x15fc: // (green)
4781 element = EL_CHAR_0;
4784 case 0x15fd: // (green)
4785 element = EL_CHAR_1;
4788 case 0x15fe: // (green)
4789 element = EL_CHAR_2;
4792 case 0x15ff: // (green)
4793 element = EL_CHAR_3;
4796 case 0x1600: // (green)
4797 element = EL_CHAR_4;
4800 case 0x1601: // (green)
4801 element = EL_CHAR_5;
4804 case 0x1602: // (green)
4805 element = EL_CHAR_6;
4808 case 0x1603: // (green)
4809 element = EL_CHAR_7;
4812 case 0x1604: // (green)
4813 element = EL_CHAR_8;
4816 case 0x1605: // (green)
4817 element = EL_CHAR_9;
4820 case 0x1606: // (green)
4821 element = EL_CHAR_PERIOD;
4824 case 0x1607: // (green)
4825 element = EL_CHAR_EXCLAM;
4828 case 0x1608: // (green)
4829 element = EL_CHAR_COLON;
4832 case 0x1609: // (green)
4833 element = EL_CHAR_LESS;
4836 case 0x160a: // (green)
4837 element = EL_CHAR_GREATER;
4840 case 0x160b: // (green)
4841 element = EL_CHAR_QUESTION;
4844 case 0x160c: // (green)
4845 element = EL_CHAR_COPYRIGHT;
4848 case 0x160d: // (green)
4849 element = EL_CHAR_UP;
4852 case 0x160e: // (green)
4853 element = EL_CHAR_DOWN;
4856 case 0x160f: // (green)
4857 element = EL_CHAR_BUTTON;
4860 case 0x1610: // (green)
4861 element = EL_CHAR_PLUS;
4864 case 0x1611: // (green)
4865 element = EL_CHAR_MINUS;
4868 case 0x1612: // (green)
4869 element = EL_CHAR_APOSTROPHE;
4872 case 0x1613: // (green)
4873 element = EL_CHAR_PARENLEFT;
4876 case 0x1614: // (green)
4877 element = EL_CHAR_PARENRIGHT;
4880 case 0x1615: // (blue steel)
4881 element = EL_STEEL_CHAR_A;
4884 case 0x1616: // (blue steel)
4885 element = EL_STEEL_CHAR_B;
4888 case 0x1617: // (blue steel)
4889 element = EL_STEEL_CHAR_C;
4892 case 0x1618: // (blue steel)
4893 element = EL_STEEL_CHAR_D;
4896 case 0x1619: // (blue steel)
4897 element = EL_STEEL_CHAR_E;
4900 case 0x161a: // (blue steel)
4901 element = EL_STEEL_CHAR_F;
4904 case 0x161b: // (blue steel)
4905 element = EL_STEEL_CHAR_G;
4908 case 0x161c: // (blue steel)
4909 element = EL_STEEL_CHAR_H;
4912 case 0x161d: // (blue steel)
4913 element = EL_STEEL_CHAR_I;
4916 case 0x161e: // (blue steel)
4917 element = EL_STEEL_CHAR_J;
4920 case 0x161f: // (blue steel)
4921 element = EL_STEEL_CHAR_K;
4924 case 0x1620: // (blue steel)
4925 element = EL_STEEL_CHAR_L;
4928 case 0x1621: // (blue steel)
4929 element = EL_STEEL_CHAR_M;
4932 case 0x1622: // (blue steel)
4933 element = EL_STEEL_CHAR_N;
4936 case 0x1623: // (blue steel)
4937 element = EL_STEEL_CHAR_O;
4940 case 0x1624: // (blue steel)
4941 element = EL_STEEL_CHAR_P;
4944 case 0x1625: // (blue steel)
4945 element = EL_STEEL_CHAR_Q;
4948 case 0x1626: // (blue steel)
4949 element = EL_STEEL_CHAR_R;
4952 case 0x1627: // (blue steel)
4953 element = EL_STEEL_CHAR_S;
4956 case 0x1628: // (blue steel)
4957 element = EL_STEEL_CHAR_T;
4960 case 0x1629: // (blue steel)
4961 element = EL_STEEL_CHAR_U;
4964 case 0x162a: // (blue steel)
4965 element = EL_STEEL_CHAR_V;
4968 case 0x162b: // (blue steel)
4969 element = EL_STEEL_CHAR_W;
4972 case 0x162c: // (blue steel)
4973 element = EL_STEEL_CHAR_X;
4976 case 0x162d: // (blue steel)
4977 element = EL_STEEL_CHAR_Y;
4980 case 0x162e: // (blue steel)
4981 element = EL_STEEL_CHAR_Z;
4984 case 0x162f: // (blue steel)
4985 element = EL_STEEL_CHAR_AUMLAUT;
4988 case 0x1630: // (blue steel)
4989 element = EL_STEEL_CHAR_OUMLAUT;
4992 case 0x1631: // (blue steel)
4993 element = EL_STEEL_CHAR_UUMLAUT;
4996 case 0x1632: // (blue steel)
4997 element = EL_STEEL_CHAR_0;
5000 case 0x1633: // (blue steel)
5001 element = EL_STEEL_CHAR_1;
5004 case 0x1634: // (blue steel)
5005 element = EL_STEEL_CHAR_2;
5008 case 0x1635: // (blue steel)
5009 element = EL_STEEL_CHAR_3;
5012 case 0x1636: // (blue steel)
5013 element = EL_STEEL_CHAR_4;
5016 case 0x1637: // (blue steel)
5017 element = EL_STEEL_CHAR_5;
5020 case 0x1638: // (blue steel)
5021 element = EL_STEEL_CHAR_6;
5024 case 0x1639: // (blue steel)
5025 element = EL_STEEL_CHAR_7;
5028 case 0x163a: // (blue steel)
5029 element = EL_STEEL_CHAR_8;
5032 case 0x163b: // (blue steel)
5033 element = EL_STEEL_CHAR_9;
5036 case 0x163c: // (blue steel)
5037 element = EL_STEEL_CHAR_PERIOD;
5040 case 0x163d: // (blue steel)
5041 element = EL_STEEL_CHAR_EXCLAM;
5044 case 0x163e: // (blue steel)
5045 element = EL_STEEL_CHAR_COLON;
5048 case 0x163f: // (blue steel)
5049 element = EL_STEEL_CHAR_LESS;
5052 case 0x1640: // (blue steel)
5053 element = EL_STEEL_CHAR_GREATER;
5056 case 0x1641: // (blue steel)
5057 element = EL_STEEL_CHAR_QUESTION;
5060 case 0x1642: // (blue steel)
5061 element = EL_STEEL_CHAR_COPYRIGHT;
5064 case 0x1643: // (blue steel)
5065 element = EL_STEEL_CHAR_UP;
5068 case 0x1644: // (blue steel)
5069 element = EL_STEEL_CHAR_DOWN;
5072 case 0x1645: // (blue steel)
5073 element = EL_STEEL_CHAR_BUTTON;
5076 case 0x1646: // (blue steel)
5077 element = EL_STEEL_CHAR_PLUS;
5080 case 0x1647: // (blue steel)
5081 element = EL_STEEL_CHAR_MINUS;
5084 case 0x1648: // (blue steel)
5085 element = EL_STEEL_CHAR_APOSTROPHE;
5088 case 0x1649: // (blue steel)
5089 element = EL_STEEL_CHAR_PARENLEFT;
5092 case 0x164a: // (blue steel)
5093 element = EL_STEEL_CHAR_PARENRIGHT;
5096 case 0x164b: // (green steel)
5097 element = EL_STEEL_CHAR_A;
5100 case 0x164c: // (green steel)
5101 element = EL_STEEL_CHAR_B;
5104 case 0x164d: // (green steel)
5105 element = EL_STEEL_CHAR_C;
5108 case 0x164e: // (green steel)
5109 element = EL_STEEL_CHAR_D;
5112 case 0x164f: // (green steel)
5113 element = EL_STEEL_CHAR_E;
5116 case 0x1650: // (green steel)
5117 element = EL_STEEL_CHAR_F;
5120 case 0x1651: // (green steel)
5121 element = EL_STEEL_CHAR_G;
5124 case 0x1652: // (green steel)
5125 element = EL_STEEL_CHAR_H;
5128 case 0x1653: // (green steel)
5129 element = EL_STEEL_CHAR_I;
5132 case 0x1654: // (green steel)
5133 element = EL_STEEL_CHAR_J;
5136 case 0x1655: // (green steel)
5137 element = EL_STEEL_CHAR_K;
5140 case 0x1656: // (green steel)
5141 element = EL_STEEL_CHAR_L;
5144 case 0x1657: // (green steel)
5145 element = EL_STEEL_CHAR_M;
5148 case 0x1658: // (green steel)
5149 element = EL_STEEL_CHAR_N;
5152 case 0x1659: // (green steel)
5153 element = EL_STEEL_CHAR_O;
5156 case 0x165a: // (green steel)
5157 element = EL_STEEL_CHAR_P;
5160 case 0x165b: // (green steel)
5161 element = EL_STEEL_CHAR_Q;
5164 case 0x165c: // (green steel)
5165 element = EL_STEEL_CHAR_R;
5168 case 0x165d: // (green steel)
5169 element = EL_STEEL_CHAR_S;
5172 case 0x165e: // (green steel)
5173 element = EL_STEEL_CHAR_T;
5176 case 0x165f: // (green steel)
5177 element = EL_STEEL_CHAR_U;
5180 case 0x1660: // (green steel)
5181 element = EL_STEEL_CHAR_V;
5184 case 0x1661: // (green steel)
5185 element = EL_STEEL_CHAR_W;
5188 case 0x1662: // (green steel)
5189 element = EL_STEEL_CHAR_X;
5192 case 0x1663: // (green steel)
5193 element = EL_STEEL_CHAR_Y;
5196 case 0x1664: // (green steel)
5197 element = EL_STEEL_CHAR_Z;
5200 case 0x1665: // (green steel)
5201 element = EL_STEEL_CHAR_AUMLAUT;
5204 case 0x1666: // (green steel)
5205 element = EL_STEEL_CHAR_OUMLAUT;
5208 case 0x1667: // (green steel)
5209 element = EL_STEEL_CHAR_UUMLAUT;
5212 case 0x1668: // (green steel)
5213 element = EL_STEEL_CHAR_0;
5216 case 0x1669: // (green steel)
5217 element = EL_STEEL_CHAR_1;
5220 case 0x166a: // (green steel)
5221 element = EL_STEEL_CHAR_2;
5224 case 0x166b: // (green steel)
5225 element = EL_STEEL_CHAR_3;
5228 case 0x166c: // (green steel)
5229 element = EL_STEEL_CHAR_4;
5232 case 0x166d: // (green steel)
5233 element = EL_STEEL_CHAR_5;
5236 case 0x166e: // (green steel)
5237 element = EL_STEEL_CHAR_6;
5240 case 0x166f: // (green steel)
5241 element = EL_STEEL_CHAR_7;
5244 case 0x1670: // (green steel)
5245 element = EL_STEEL_CHAR_8;
5248 case 0x1671: // (green steel)
5249 element = EL_STEEL_CHAR_9;
5252 case 0x1672: // (green steel)
5253 element = EL_STEEL_CHAR_PERIOD;
5256 case 0x1673: // (green steel)
5257 element = EL_STEEL_CHAR_EXCLAM;
5260 case 0x1674: // (green steel)
5261 element = EL_STEEL_CHAR_COLON;
5264 case 0x1675: // (green steel)
5265 element = EL_STEEL_CHAR_LESS;
5268 case 0x1676: // (green steel)
5269 element = EL_STEEL_CHAR_GREATER;
5272 case 0x1677: // (green steel)
5273 element = EL_STEEL_CHAR_QUESTION;
5276 case 0x1678: // (green steel)
5277 element = EL_STEEL_CHAR_COPYRIGHT;
5280 case 0x1679: // (green steel)
5281 element = EL_STEEL_CHAR_UP;
5284 case 0x167a: // (green steel)
5285 element = EL_STEEL_CHAR_DOWN;
5288 case 0x167b: // (green steel)
5289 element = EL_STEEL_CHAR_BUTTON;
5292 case 0x167c: // (green steel)
5293 element = EL_STEEL_CHAR_PLUS;
5296 case 0x167d: // (green steel)
5297 element = EL_STEEL_CHAR_MINUS;
5300 case 0x167e: // (green steel)
5301 element = EL_STEEL_CHAR_APOSTROPHE;
5304 case 0x167f: // (green steel)
5305 element = EL_STEEL_CHAR_PARENLEFT;
5308 case 0x1680: // (green steel)
5309 element = EL_STEEL_CHAR_PARENRIGHT;
5312 case 0x1681: // gate (red)
5313 element = EL_EM_GATE_1;
5316 case 0x1682: // secret gate (red)
5317 element = EL_GATE_1_GRAY;
5320 case 0x1683: // gate (yellow)
5321 element = EL_EM_GATE_2;
5324 case 0x1684: // secret gate (yellow)
5325 element = EL_GATE_2_GRAY;
5328 case 0x1685: // gate (blue)
5329 element = EL_EM_GATE_4;
5332 case 0x1686: // secret gate (blue)
5333 element = EL_GATE_4_GRAY;
5336 case 0x1687: // gate (green)
5337 element = EL_EM_GATE_3;
5340 case 0x1688: // secret gate (green)
5341 element = EL_GATE_3_GRAY;
5344 case 0x1689: // gate (white)
5345 element = EL_DC_GATE_WHITE;
5348 case 0x168a: // secret gate (white)
5349 element = EL_DC_GATE_WHITE_GRAY;
5352 case 0x168b: // secret gate (no key)
5353 element = EL_DC_GATE_FAKE_GRAY;
5357 element = EL_ROBOT_WHEEL;
5361 element = EL_DC_TIMEGATE_SWITCH;
5365 element = EL_ACID_POOL_BOTTOM;
5369 element = EL_ACID_POOL_TOPLEFT;
5373 element = EL_ACID_POOL_TOPRIGHT;
5377 element = EL_ACID_POOL_BOTTOMLEFT;
5381 element = EL_ACID_POOL_BOTTOMRIGHT;
5385 element = EL_STEELWALL;
5389 element = EL_STEELWALL_SLIPPERY;
5392 case 0x1695: // steel wall (not round)
5393 element = EL_STEELWALL;
5396 case 0x1696: // steel wall (left)
5397 element = EL_DC_STEELWALL_1_LEFT;
5400 case 0x1697: // steel wall (bottom)
5401 element = EL_DC_STEELWALL_1_BOTTOM;
5404 case 0x1698: // steel wall (right)
5405 element = EL_DC_STEELWALL_1_RIGHT;
5408 case 0x1699: // steel wall (top)
5409 element = EL_DC_STEELWALL_1_TOP;
5412 case 0x169a: // steel wall (left/bottom)
5413 element = EL_DC_STEELWALL_1_BOTTOMLEFT;
5416 case 0x169b: // steel wall (right/bottom)
5417 element = EL_DC_STEELWALL_1_BOTTOMRIGHT;
5420 case 0x169c: // steel wall (right/top)
5421 element = EL_DC_STEELWALL_1_TOPRIGHT;
5424 case 0x169d: // steel wall (left/top)
5425 element = EL_DC_STEELWALL_1_TOPLEFT;
5428 case 0x169e: // steel wall (right/bottom small)
5429 element = EL_DC_STEELWALL_1_BOTTOMRIGHT_2;
5432 case 0x169f: // steel wall (left/bottom small)
5433 element = EL_DC_STEELWALL_1_BOTTOMLEFT_2;
5436 case 0x16a0: // steel wall (right/top small)
5437 element = EL_DC_STEELWALL_1_TOPRIGHT_2;
5440 case 0x16a1: // steel wall (left/top small)
5441 element = EL_DC_STEELWALL_1_TOPLEFT_2;
5444 case 0x16a2: // steel wall (left/right)
5445 element = EL_DC_STEELWALL_1_VERTICAL;
5448 case 0x16a3: // steel wall (top/bottom)
5449 element = EL_DC_STEELWALL_1_HORIZONTAL;
5452 case 0x16a4: // steel wall 2 (left end)
5453 element = EL_DC_STEELWALL_2_LEFT;
5456 case 0x16a5: // steel wall 2 (right end)
5457 element = EL_DC_STEELWALL_2_RIGHT;
5460 case 0x16a6: // steel wall 2 (top end)
5461 element = EL_DC_STEELWALL_2_TOP;
5464 case 0x16a7: // steel wall 2 (bottom end)
5465 element = EL_DC_STEELWALL_2_BOTTOM;
5468 case 0x16a8: // steel wall 2 (left/right)
5469 element = EL_DC_STEELWALL_2_HORIZONTAL;
5472 case 0x16a9: // steel wall 2 (up/down)
5473 element = EL_DC_STEELWALL_2_VERTICAL;
5476 case 0x16aa: // steel wall 2 (mid)
5477 element = EL_DC_STEELWALL_2_MIDDLE;
5481 element = EL_SIGN_EXCLAMATION;
5485 element = EL_SIGN_RADIOACTIVITY;
5489 element = EL_SIGN_STOP;
5493 element = EL_SIGN_WHEELCHAIR;
5497 element = EL_SIGN_PARKING;
5501 element = EL_SIGN_NO_ENTRY;
5505 element = EL_SIGN_HEART;
5509 element = EL_SIGN_GIVE_WAY;
5513 element = EL_SIGN_ENTRY_FORBIDDEN;
5517 element = EL_SIGN_EMERGENCY_EXIT;
5521 element = EL_SIGN_YIN_YANG;
5525 element = EL_WALL_EMERALD;
5529 element = EL_WALL_DIAMOND;
5533 element = EL_WALL_PEARL;
5537 element = EL_WALL_CRYSTAL;
5541 element = EL_INVISIBLE_WALL;
5545 element = EL_INVISIBLE_STEELWALL;
5549 // EL_INVISIBLE_SAND
5552 element = EL_LIGHT_SWITCH;
5556 element = EL_ENVELOPE_1;
5560 if (element >= 0x0117 && element <= 0x036e) // (?)
5561 element = EL_DIAMOND;
5562 else if (element >= 0x042d && element <= 0x0684) // (?)
5563 element = EL_EMERALD;
5564 else if (element >= 0x157c && element <= 0x158b)
5566 else if (element >= 0x1590 && element <= 0x159f)
5567 element = EL_DC_LANDMINE;
5568 else if (element >= 0x16bc && element <= 0x16cb)
5569 element = EL_INVISIBLE_SAND;
5572 Error(ERR_WARN, "unknown Diamond Caves element 0x%04x", element);
5573 element = EL_UNKNOWN;
5578 return getMappedElement(element);
5581 static void LoadLevelFromFileStream_DC(File *file, struct LevelInfo *level,
5584 byte header[DC_LEVEL_HEADER_SIZE];
5586 int envelope_header_pos = 62;
5587 int envelope_content_pos = 94;
5588 int level_name_pos = 251;
5589 int level_author_pos = 292;
5590 int envelope_header_len;
5591 int envelope_content_len;
5593 int level_author_len;
5595 int num_yamyam_contents;
5598 getDecodedWord_DC(0, TRUE); // initialize DC2 decoding engine
5600 for (i = 0; i < DC_LEVEL_HEADER_SIZE / 2; i++)
5602 unsigned short header_word = getDecodedWord_DC(getFile16BitBE(file), FALSE);
5604 header[i * 2 + 0] = header_word >> 8;
5605 header[i * 2 + 1] = header_word & 0xff;
5608 // read some values from level header to check level decoding integrity
5609 fieldx = header[6] | (header[7] << 8);
5610 fieldy = header[8] | (header[9] << 8);
5611 num_yamyam_contents = header[60] | (header[61] << 8);
5613 // do some simple sanity checks to ensure that level was correctly decoded
5614 if (fieldx < 1 || fieldx > 256 ||
5615 fieldy < 1 || fieldy > 256 ||
5616 num_yamyam_contents < 1 || num_yamyam_contents > 8)
5618 level->no_valid_file = TRUE;
5620 Error(ERR_WARN, "cannot decode level from stream -- using empty level");
5625 // maximum envelope header size is 31 bytes
5626 envelope_header_len = header[envelope_header_pos];
5627 // maximum envelope content size is 110 (156?) bytes
5628 envelope_content_len = header[envelope_content_pos];
5630 // maximum level title size is 40 bytes
5631 level_name_len = MIN(header[level_name_pos], MAX_LEVEL_NAME_LEN);
5632 // maximum level author size is 30 (51?) bytes
5633 level_author_len = MIN(header[level_author_pos], MAX_LEVEL_AUTHOR_LEN);
5637 for (i = 0; i < envelope_header_len; i++)
5638 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5639 level->envelope[0].text[envelope_size++] =
5640 header[envelope_header_pos + 1 + i];
5642 if (envelope_header_len > 0 && envelope_content_len > 0)
5644 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5645 level->envelope[0].text[envelope_size++] = '\n';
5646 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5647 level->envelope[0].text[envelope_size++] = '\n';
5650 for (i = 0; i < envelope_content_len; i++)
5651 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5652 level->envelope[0].text[envelope_size++] =
5653 header[envelope_content_pos + 1 + i];
5655 level->envelope[0].text[envelope_size] = '\0';
5657 level->envelope[0].xsize = MAX_ENVELOPE_XSIZE;
5658 level->envelope[0].ysize = 10;
5659 level->envelope[0].autowrap = TRUE;
5660 level->envelope[0].centered = TRUE;
5662 for (i = 0; i < level_name_len; i++)
5663 level->name[i] = header[level_name_pos + 1 + i];
5664 level->name[level_name_len] = '\0';
5666 for (i = 0; i < level_author_len; i++)
5667 level->author[i] = header[level_author_pos + 1 + i];
5668 level->author[level_author_len] = '\0';
5670 num_yamyam_contents = header[60] | (header[61] << 8);
5671 level->num_yamyam_contents =
5672 MIN(MAX(MIN_ELEMENT_CONTENTS, num_yamyam_contents), MAX_ELEMENT_CONTENTS);
5674 for (i = 0; i < num_yamyam_contents; i++)
5676 for (y = 0; y < 3; y++) for (x = 0; x < 3; x++)
5678 unsigned short word = getDecodedWord_DC(getFile16BitBE(file), FALSE);
5679 int element_dc = ((word & 0xff) << 8) | ((word >> 8) & 0xff);
5681 if (i < MAX_ELEMENT_CONTENTS)
5682 level->yamyam_content[i].e[x][y] = getMappedElement_DC(element_dc);
5686 fieldx = header[6] | (header[7] << 8);
5687 fieldy = header[8] | (header[9] << 8);
5688 level->fieldx = MIN(MAX(MIN_LEV_FIELDX, fieldx), MAX_LEV_FIELDX);
5689 level->fieldy = MIN(MAX(MIN_LEV_FIELDY, fieldy), MAX_LEV_FIELDY);
5691 for (y = 0; y < fieldy; y++) for (x = 0; x < fieldx; x++)
5693 unsigned short word = getDecodedWord_DC(getFile16BitBE(file), FALSE);
5694 int element_dc = ((word & 0xff) << 8) | ((word >> 8) & 0xff);
5696 if (x < MAX_LEV_FIELDX && y < MAX_LEV_FIELDY)
5697 level->field[x][y] = getMappedElement_DC(element_dc);
5700 x = MIN(MAX(0, (header[10] | (header[11] << 8)) - 1), MAX_LEV_FIELDX - 1);
5701 y = MIN(MAX(0, (header[12] | (header[13] << 8)) - 1), MAX_LEV_FIELDY - 1);
5702 level->field[x][y] = EL_PLAYER_1;
5704 x = MIN(MAX(0, (header[14] | (header[15] << 8)) - 1), MAX_LEV_FIELDX - 1);
5705 y = MIN(MAX(0, (header[16] | (header[17] << 8)) - 1), MAX_LEV_FIELDY - 1);
5706 level->field[x][y] = EL_PLAYER_2;
5708 level->gems_needed = header[18] | (header[19] << 8);
5710 level->score[SC_EMERALD] = header[20] | (header[21] << 8);
5711 level->score[SC_DIAMOND] = header[22] | (header[23] << 8);
5712 level->score[SC_PEARL] = header[24] | (header[25] << 8);
5713 level->score[SC_CRYSTAL] = header[26] | (header[27] << 8);
5714 level->score[SC_NUT] = header[28] | (header[29] << 8);
5715 level->score[SC_ROBOT] = header[30] | (header[31] << 8);
5716 level->score[SC_SPACESHIP] = header[32] | (header[33] << 8);
5717 level->score[SC_BUG] = header[34] | (header[35] << 8);
5718 level->score[SC_YAMYAM] = header[36] | (header[37] << 8);
5719 level->score[SC_DYNAMITE] = header[38] | (header[39] << 8);
5720 level->score[SC_KEY] = header[40] | (header[41] << 8);
5721 level->score[SC_TIME_BONUS] = header[42] | (header[43] << 8);
5723 level->time = header[44] | (header[45] << 8);
5725 level->amoeba_speed = header[46] | (header[47] << 8);
5726 level->time_light = header[48] | (header[49] << 8);
5727 level->time_timegate = header[50] | (header[51] << 8);
5728 level->time_wheel = header[52] | (header[53] << 8);
5729 level->time_magic_wall = header[54] | (header[55] << 8);
5730 level->extra_time = header[56] | (header[57] << 8);
5731 level->shield_normal_time = header[58] | (header[59] << 8);
5733 // Diamond Caves has the same (strange) behaviour as Emerald Mine that gems
5734 // can slip down from flat walls, like normal walls and steel walls
5735 level->em_slippery_gems = TRUE;
5738 static void LoadLevelFromFileInfo_DC(struct LevelInfo *level,
5739 struct LevelFileInfo *level_file_info,
5740 boolean level_info_only)
5742 char *filename = level_file_info->filename;
5744 int num_magic_bytes = 8;
5745 char magic_bytes[num_magic_bytes + 1];
5746 int num_levels_to_skip = level_file_info->nr - leveldir_current->first_level;
5748 if (!(file = openFile(filename, MODE_READ)))
5750 level->no_valid_file = TRUE;
5752 if (!level_info_only)
5753 Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
5758 // fseek(file, 0x0000, SEEK_SET);
5760 if (level_file_info->packed)
5762 // read "magic bytes" from start of file
5763 if (getStringFromFile(file, magic_bytes, num_magic_bytes + 1) == NULL)
5764 magic_bytes[0] = '\0';
5766 // check "magic bytes" for correct file format
5767 if (!strPrefix(magic_bytes, "DC2"))
5769 level->no_valid_file = TRUE;
5771 Error(ERR_WARN, "unknown DC level file '%s' -- using empty level",
5777 if (strPrefix(magic_bytes, "DC2Win95") ||
5778 strPrefix(magic_bytes, "DC2Win98"))
5780 int position_first_level = 0x00fa;
5781 int extra_bytes = 4;
5784 // advance file stream to first level inside the level package
5785 skip_bytes = position_first_level - num_magic_bytes - extra_bytes;
5787 // each block of level data is followed by block of non-level data
5788 num_levels_to_skip *= 2;
5790 // at least skip header bytes, therefore use ">= 0" instead of "> 0"
5791 while (num_levels_to_skip >= 0)
5793 // advance file stream to next level inside the level package
5794 if (seekFile(file, skip_bytes, SEEK_CUR) != 0)
5796 level->no_valid_file = TRUE;
5798 Error(ERR_WARN, "cannot fseek in file '%s' -- using empty level",
5804 // skip apparently unused extra bytes following each level
5805 ReadUnusedBytesFromFile(file, extra_bytes);
5807 // read size of next level in level package
5808 skip_bytes = getFile32BitLE(file);
5810 num_levels_to_skip--;
5815 level->no_valid_file = TRUE;
5817 Error(ERR_WARN, "unknown DC2 level file '%s' -- using empty level",
5824 LoadLevelFromFileStream_DC(file, level, level_file_info->nr);
5830 // ----------------------------------------------------------------------------
5831 // functions for loading SB level
5832 // ----------------------------------------------------------------------------
5834 int getMappedElement_SB(int element_ascii, boolean use_ces)
5842 sb_element_mapping[] =
5844 { ' ', EL_EMPTY, EL_CUSTOM_1 }, // floor (space)
5845 { '#', EL_STEELWALL, EL_CUSTOM_2 }, // wall
5846 { '@', EL_PLAYER_1, EL_CUSTOM_3 }, // player
5847 { '$', EL_SOKOBAN_OBJECT, EL_CUSTOM_4 }, // box
5848 { '.', EL_SOKOBAN_FIELD_EMPTY, EL_CUSTOM_5 }, // goal square
5849 { '*', EL_SOKOBAN_FIELD_FULL, EL_CUSTOM_6 }, // box on goal square
5850 { '+', EL_SOKOBAN_FIELD_PLAYER, EL_CUSTOM_7 }, // player on goal square
5851 { '_', EL_INVISIBLE_STEELWALL, EL_FROM_LEVEL_TEMPLATE }, // floor beyond border
5858 for (i = 0; sb_element_mapping[i].ascii != 0; i++)
5859 if (element_ascii == sb_element_mapping[i].ascii)
5860 return (use_ces ? sb_element_mapping[i].ce : sb_element_mapping[i].sb);
5862 return EL_UNDEFINED;
5865 static void LoadLevelFromFileInfo_SB(struct LevelInfo *level,
5866 struct LevelFileInfo *level_file_info,
5867 boolean level_info_only)
5869 char *filename = level_file_info->filename;
5870 char line[MAX_LINE_LEN], line_raw[MAX_LINE_LEN], previous_line[MAX_LINE_LEN];
5871 char last_comment[MAX_LINE_LEN];
5872 char level_name[MAX_LINE_LEN];
5875 int num_levels_to_skip = level_file_info->nr - leveldir_current->first_level;
5876 boolean read_continued_line = FALSE;
5877 boolean reading_playfield = FALSE;
5878 boolean got_valid_playfield_line = FALSE;
5879 boolean invalid_playfield_char = FALSE;
5880 boolean load_xsb_to_ces = check_special_flags("load_xsb_to_ces");
5881 int file_level_nr = 0;
5883 int x = 0, y = 0; // initialized to make compilers happy
5885 last_comment[0] = '\0';
5886 level_name[0] = '\0';
5888 if (!(file = openFile(filename, MODE_READ)))
5890 level->no_valid_file = TRUE;
5892 if (!level_info_only)
5893 Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
5898 while (!checkEndOfFile(file))
5900 // level successfully read, but next level may follow here
5901 if (!got_valid_playfield_line && reading_playfield)
5903 // read playfield from single level file -- skip remaining file
5904 if (!level_file_info->packed)
5907 if (file_level_nr >= num_levels_to_skip)
5912 last_comment[0] = '\0';
5913 level_name[0] = '\0';
5915 reading_playfield = FALSE;
5918 got_valid_playfield_line = FALSE;
5920 // read next line of input file
5921 if (!getStringFromFile(file, line, MAX_LINE_LEN))
5924 // check if line was completely read and is terminated by line break
5925 if (strlen(line) > 0 && line[strlen(line) - 1] == '\n')
5928 // cut trailing line break (this can be newline and/or carriage return)
5929 for (line_ptr = &line[strlen(line)]; line_ptr >= line; line_ptr--)
5930 if ((*line_ptr == '\n' || *line_ptr == '\r') && *(line_ptr + 1) == '\0')
5933 // copy raw input line for later use (mainly debugging output)
5934 strcpy(line_raw, line);
5936 if (read_continued_line)
5938 // append new line to existing line, if there is enough space
5939 if (strlen(previous_line) + strlen(line_ptr) < MAX_LINE_LEN)
5940 strcat(previous_line, line_ptr);
5942 strcpy(line, previous_line); // copy storage buffer to line
5944 read_continued_line = FALSE;
5947 // if the last character is '\', continue at next line
5948 if (strlen(line) > 0 && line[strlen(line) - 1] == '\\')
5950 line[strlen(line) - 1] = '\0'; // cut off trailing backslash
5951 strcpy(previous_line, line); // copy line to storage buffer
5953 read_continued_line = TRUE;
5959 if (line[0] == '\0')
5962 // extract comment text from comment line
5965 for (line_ptr = line; *line_ptr; line_ptr++)
5966 if (*line_ptr != ' ' && *line_ptr != '\t' && *line_ptr != ';')
5969 strcpy(last_comment, line_ptr);
5974 // extract level title text from line containing level title
5975 if (line[0] == '\'')
5977 strcpy(level_name, &line[1]);
5979 if (strlen(level_name) > 0 && level_name[strlen(level_name) - 1] == '\'')
5980 level_name[strlen(level_name) - 1] = '\0';
5985 // skip lines containing only spaces (or empty lines)
5986 for (line_ptr = line; *line_ptr; line_ptr++)
5987 if (*line_ptr != ' ')
5989 if (*line_ptr == '\0')
5992 // at this point, we have found a line containing part of a playfield
5994 got_valid_playfield_line = TRUE;
5996 if (!reading_playfield)
5998 reading_playfield = TRUE;
5999 invalid_playfield_char = FALSE;
6001 for (x = 0; x < MAX_LEV_FIELDX; x++)
6002 for (y = 0; y < MAX_LEV_FIELDY; y++)
6003 level->field[x][y] = getMappedElement_SB(' ', load_xsb_to_ces);
6008 // start with topmost tile row
6012 // skip playfield line if larger row than allowed
6013 if (y >= MAX_LEV_FIELDY)
6016 // start with leftmost tile column
6019 // read playfield elements from line
6020 for (line_ptr = line; *line_ptr; line_ptr++)
6022 int mapped_sb_element = getMappedElement_SB(*line_ptr, load_xsb_to_ces);
6024 // stop parsing playfield line if larger column than allowed
6025 if (x >= MAX_LEV_FIELDX)
6028 if (mapped_sb_element == EL_UNDEFINED)
6030 invalid_playfield_char = TRUE;
6035 level->field[x][y] = mapped_sb_element;
6037 // continue with next tile column
6040 level->fieldx = MAX(x, level->fieldx);
6043 if (invalid_playfield_char)
6045 // if first playfield line, treat invalid lines as comment lines
6047 reading_playfield = FALSE;
6052 // continue with next tile row
6060 level->fieldx = MIN(MAX(MIN_LEV_FIELDX, level->fieldx), MAX_LEV_FIELDX);
6061 level->fieldy = MIN(MAX(MIN_LEV_FIELDY, level->fieldy), MAX_LEV_FIELDY);
6063 if (!reading_playfield)
6065 level->no_valid_file = TRUE;
6067 Error(ERR_WARN, "cannot read level '%s' -- using empty level", filename);
6072 if (*level_name != '\0')
6074 strncpy(level->name, level_name, MAX_LEVEL_NAME_LEN);
6075 level->name[MAX_LEVEL_NAME_LEN] = '\0';
6077 else if (*last_comment != '\0')
6079 strncpy(level->name, last_comment, MAX_LEVEL_NAME_LEN);
6080 level->name[MAX_LEVEL_NAME_LEN] = '\0';
6084 sprintf(level->name, "--> Level %d <--", level_file_info->nr);
6087 // set all empty fields beyond the border walls to invisible steel wall
6088 for (y = 0; y < level->fieldy; y++) for (x = 0; x < level->fieldx; x++)
6090 if ((x == 0 || x == level->fieldx - 1 ||
6091 y == 0 || y == level->fieldy - 1) &&
6092 level->field[x][y] == getMappedElement_SB(' ', load_xsb_to_ces))
6093 FloodFillLevel(x, y, getMappedElement_SB('_', load_xsb_to_ces),
6094 level->field, level->fieldx, level->fieldy);
6097 // set special level settings for Sokoban levels
6100 level->use_step_counter = TRUE;
6102 if (load_xsb_to_ces)
6104 // special global settings can now be set in level template
6106 level->use_custom_template = TRUE;
6111 // -------------------------------------------------------------------------
6112 // functions for handling native levels
6113 // -------------------------------------------------------------------------
6115 static void LoadLevelFromFileInfo_EM(struct LevelInfo *level,
6116 struct LevelFileInfo *level_file_info,
6117 boolean level_info_only)
6119 if (!LoadNativeLevel_EM(level_file_info->filename, level_info_only))
6120 level->no_valid_file = TRUE;
6123 static void LoadLevelFromFileInfo_SP(struct LevelInfo *level,
6124 struct LevelFileInfo *level_file_info,
6125 boolean level_info_only)
6129 // determine position of requested level inside level package
6130 if (level_file_info->packed)
6131 pos = level_file_info->nr - leveldir_current->first_level;
6133 if (!LoadNativeLevel_SP(level_file_info->filename, pos, level_info_only))
6134 level->no_valid_file = TRUE;
6137 static void LoadLevelFromFileInfo_MM(struct LevelInfo *level,
6138 struct LevelFileInfo *level_file_info,
6139 boolean level_info_only)
6141 if (!LoadNativeLevel_MM(level_file_info->filename, level_info_only))
6142 level->no_valid_file = TRUE;
6145 void CopyNativeLevel_RND_to_Native(struct LevelInfo *level)
6147 if (level->game_engine_type == GAME_ENGINE_TYPE_EM)
6148 CopyNativeLevel_RND_to_EM(level);
6149 else if (level->game_engine_type == GAME_ENGINE_TYPE_SP)
6150 CopyNativeLevel_RND_to_SP(level);
6151 else if (level->game_engine_type == GAME_ENGINE_TYPE_MM)
6152 CopyNativeLevel_RND_to_MM(level);
6155 void CopyNativeLevel_Native_to_RND(struct LevelInfo *level)
6157 if (level->game_engine_type == GAME_ENGINE_TYPE_EM)
6158 CopyNativeLevel_EM_to_RND(level);
6159 else if (level->game_engine_type == GAME_ENGINE_TYPE_SP)
6160 CopyNativeLevel_SP_to_RND(level);
6161 else if (level->game_engine_type == GAME_ENGINE_TYPE_MM)
6162 CopyNativeLevel_MM_to_RND(level);
6165 void SaveNativeLevel(struct LevelInfo *level)
6167 if (level->game_engine_type == GAME_ENGINE_TYPE_SP)
6169 char *basename = getSingleLevelBasenameExt(level->file_info.nr, "sp");
6170 char *filename = getLevelFilenameFromBasename(basename);
6172 CopyNativeLevel_RND_to_SP(level);
6173 CopyNativeTape_RND_to_SP(level);
6175 SaveNativeLevel_SP(filename);
6180 // ----------------------------------------------------------------------------
6181 // functions for loading generic level
6182 // ----------------------------------------------------------------------------
6184 static void LoadLevelFromFileInfo(struct LevelInfo *level,
6185 struct LevelFileInfo *level_file_info,
6186 boolean level_info_only)
6188 // always start with reliable default values
6189 setLevelInfoToDefaults(level, level_info_only, TRUE);
6191 switch (level_file_info->type)
6193 case LEVEL_FILE_TYPE_RND:
6194 LoadLevelFromFileInfo_RND(level, level_file_info, level_info_only);
6197 case LEVEL_FILE_TYPE_EM:
6198 LoadLevelFromFileInfo_EM(level, level_file_info, level_info_only);
6199 level->game_engine_type = GAME_ENGINE_TYPE_EM;
6202 case LEVEL_FILE_TYPE_SP:
6203 LoadLevelFromFileInfo_SP(level, level_file_info, level_info_only);
6204 level->game_engine_type = GAME_ENGINE_TYPE_SP;
6207 case LEVEL_FILE_TYPE_MM:
6208 LoadLevelFromFileInfo_MM(level, level_file_info, level_info_only);
6209 level->game_engine_type = GAME_ENGINE_TYPE_MM;
6212 case LEVEL_FILE_TYPE_DC:
6213 LoadLevelFromFileInfo_DC(level, level_file_info, level_info_only);
6216 case LEVEL_FILE_TYPE_SB:
6217 LoadLevelFromFileInfo_SB(level, level_file_info, level_info_only);
6221 LoadLevelFromFileInfo_RND(level, level_file_info, level_info_only);
6225 // if level file is invalid, restore level structure to default values
6226 if (level->no_valid_file)
6227 setLevelInfoToDefaults(level, level_info_only, FALSE);
6229 if (level->game_engine_type == GAME_ENGINE_TYPE_UNKNOWN)
6230 level->game_engine_type = GAME_ENGINE_TYPE_RND;
6232 if (level_file_info->type != LEVEL_FILE_TYPE_RND)
6233 CopyNativeLevel_Native_to_RND(level);
6236 void LoadLevelFromFilename(struct LevelInfo *level, char *filename)
6238 static struct LevelFileInfo level_file_info;
6240 // always start with reliable default values
6241 setFileInfoToDefaults(&level_file_info);
6243 level_file_info.nr = 0; // unknown level number
6244 level_file_info.type = LEVEL_FILE_TYPE_RND; // no others supported yet
6246 setString(&level_file_info.filename, filename);
6248 LoadLevelFromFileInfo(level, &level_file_info, FALSE);
6251 static void LoadLevel_InitVersion(struct LevelInfo *level)
6255 if (leveldir_current == NULL) // only when dumping level
6258 // all engine modifications also valid for levels which use latest engine
6259 if (level->game_version < VERSION_IDENT(3,2,0,5))
6261 // time bonus score was given for 10 s instead of 1 s before 3.2.0-5
6262 level->score[SC_TIME_BONUS] /= 10;
6265 if (leveldir_current->latest_engine)
6267 // ---------- use latest game engine --------------------------------------
6269 /* For all levels which are forced to use the latest game engine version
6270 (normally all but user contributed, private and undefined levels), set
6271 the game engine version to the actual version; this allows for actual
6272 corrections in the game engine to take effect for existing, converted
6273 levels (from "classic" or other existing games) to make the emulation
6274 of the corresponding game more accurate, while (hopefully) not breaking
6275 existing levels created from other players. */
6277 level->game_version = GAME_VERSION_ACTUAL;
6279 /* Set special EM style gems behaviour: EM style gems slip down from
6280 normal, steel and growing wall. As this is a more fundamental change,
6281 it seems better to set the default behaviour to "off" (as it is more
6282 natural) and make it configurable in the level editor (as a property
6283 of gem style elements). Already existing converted levels (neither
6284 private nor contributed levels) are changed to the new behaviour. */
6286 if (level->file_version < FILE_VERSION_2_0)
6287 level->em_slippery_gems = TRUE;
6292 // ---------- use game engine the level was created with --------------------
6294 /* For all levels which are not forced to use the latest game engine
6295 version (normally user contributed, private and undefined levels),
6296 use the version of the game engine the levels were created for.
6298 Since 2.0.1, the game engine version is now directly stored
6299 in the level file (chunk "VERS"), so there is no need anymore
6300 to set the game version from the file version (except for old,
6301 pre-2.0 levels, where the game version is still taken from the
6302 file format version used to store the level -- see above). */
6304 // player was faster than enemies in 1.0.0 and before
6305 if (level->file_version == FILE_VERSION_1_0)
6306 for (i = 0; i < MAX_PLAYERS; i++)
6307 level->initial_player_stepsize[i] = STEPSIZE_FAST;
6309 // default behaviour for EM style gems was "slippery" only in 2.0.1
6310 if (level->game_version == VERSION_IDENT(2,0,1,0))
6311 level->em_slippery_gems = TRUE;
6313 // springs could be pushed over pits before (pre-release version) 2.2.0
6314 if (level->game_version < VERSION_IDENT(2,2,0,0))
6315 level->use_spring_bug = TRUE;
6317 if (level->game_version < VERSION_IDENT(3,2,0,5))
6319 // time orb caused limited time in endless time levels before 3.2.0-5
6320 level->use_time_orb_bug = TRUE;
6322 // default behaviour for snapping was "no snap delay" before 3.2.0-5
6323 level->block_snap_field = FALSE;
6325 // extra time score was same value as time left score before 3.2.0-5
6326 level->extra_time_score = level->score[SC_TIME_BONUS];
6329 if (level->game_version < VERSION_IDENT(3,2,0,7))
6331 // default behaviour for snapping was "not continuous" before 3.2.0-7
6332 level->continuous_snapping = FALSE;
6335 // only few elements were able to actively move into acid before 3.1.0
6336 // trigger settings did not exist before 3.1.0; set to default "any"
6337 if (level->game_version < VERSION_IDENT(3,1,0,0))
6339 // correct "can move into acid" settings (all zero in old levels)
6341 level->can_move_into_acid_bits = 0; // nothing can move into acid
6342 level->dont_collide_with_bits = 0; // nothing is deadly when colliding
6344 setMoveIntoAcidProperty(level, EL_ROBOT, TRUE);
6345 setMoveIntoAcidProperty(level, EL_SATELLITE, TRUE);
6346 setMoveIntoAcidProperty(level, EL_PENGUIN, TRUE);
6347 setMoveIntoAcidProperty(level, EL_BALLOON, TRUE);
6349 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6350 SET_PROPERTY(EL_CUSTOM_START + i, EP_CAN_MOVE_INTO_ACID, TRUE);
6352 // correct trigger settings (stored as zero == "none" in old levels)
6354 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6356 int element = EL_CUSTOM_START + i;
6357 struct ElementInfo *ei = &element_info[element];
6359 for (j = 0; j < ei->num_change_pages; j++)
6361 struct ElementChangeInfo *change = &ei->change_page[j];
6363 change->trigger_player = CH_PLAYER_ANY;
6364 change->trigger_page = CH_PAGE_ANY;
6369 // try to detect and fix "Snake Bite" levels, which are broken with 3.2.0
6371 int element = EL_CUSTOM_256;
6372 struct ElementInfo *ei = &element_info[element];
6373 struct ElementChangeInfo *change = &ei->change_page[0];
6375 /* This is needed to fix a problem that was caused by a bugfix in function
6376 game.c/CreateFieldExt() introduced with 3.2.0 that corrects the behaviour
6377 when a custom element changes to EL_SOKOBAN_FIELD_PLAYER (before, it did
6378 not replace walkable elements, but instead just placed the player on it,
6379 without placing the Sokoban field under the player). Unfortunately, this
6380 breaks "Snake Bite" style levels when the snake is halfway through a door
6381 that just closes (the snake head is still alive and can be moved in this
6382 case). This can be fixed by replacing the EL_SOKOBAN_FIELD_PLAYER by the
6383 player (without Sokoban element) which then gets killed as designed). */
6385 if ((strncmp(leveldir_current->identifier, "snake_bite", 10) == 0 ||
6386 strncmp(ei->description, "pause b4 death", 14) == 0) &&
6387 change->target_element == EL_SOKOBAN_FIELD_PLAYER)
6388 change->target_element = EL_PLAYER_1;
6391 // try to detect and fix "Zelda" style levels, which are broken with 3.2.5
6392 if (level->game_version < VERSION_IDENT(3,2,5,0))
6394 /* This is needed to fix a problem that was caused by a bugfix in function
6395 game.c/CheckTriggeredElementChangeExt() introduced with 3.2.5 that
6396 corrects the behaviour when a custom element changes to another custom
6397 element with a higher element number that has change actions defined.
6398 Normally, only one change per frame is allowed for custom elements.
6399 Therefore, it is checked if a custom element already changed in the
6400 current frame; if it did, subsequent changes are suppressed.
6401 Unfortunately, this is only checked for element changes, but not for
6402 change actions, which are still executed. As the function above loops
6403 through all custom elements from lower to higher, an element change
6404 resulting in a lower CE number won't be checked again, while a target
6405 element with a higher number will also be checked, and potential change
6406 actions will get executed for this CE, too (which is wrong), while
6407 further changes are ignored (which is correct). As this bugfix breaks
6408 Zelda II (and introduces graphical bugs to Zelda I, and also breaks a
6409 few other levels like Alan Bond's "FMV"), allow the previous, incorrect
6410 behaviour for existing levels and tapes that make use of this bug */
6412 level->use_action_after_change_bug = TRUE;
6415 // not centering level after relocating player was default only in 3.2.3
6416 if (level->game_version == VERSION_IDENT(3,2,3,0)) // (no pre-releases)
6417 level->shifted_relocation = TRUE;
6419 // EM style elements always chain-exploded in R'n'D engine before 3.2.6
6420 if (level->game_version < VERSION_IDENT(3,2,6,0))
6421 level->em_explodes_by_fire = TRUE;
6423 // levels were solved by the first player entering an exit up to 4.1.0.0
6424 if (level->game_version <= VERSION_IDENT(4,1,0,0))
6425 level->solved_by_one_player = TRUE;
6427 // game logic of "game of life" and "biomaze" was buggy before 4.1.1.1
6428 if (level->game_version < VERSION_IDENT(4,1,1,1))
6429 level->use_life_bugs = TRUE;
6431 // only Sokoban fields (but not objects) had to be solved before 4.1.1.1
6432 if (level->game_version < VERSION_IDENT(4,1,1,1))
6433 level->sb_objects_needed = FALSE;
6436 static void LoadLevel_InitStandardElements(struct LevelInfo *level)
6440 // map elements that have changed in newer versions
6441 level->amoeba_content = getMappedElementByVersion(level->amoeba_content,
6442 level->game_version);
6443 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6444 for (x = 0; x < 3; x++)
6445 for (y = 0; y < 3; y++)
6446 level->yamyam_content[i].e[x][y] =
6447 getMappedElementByVersion(level->yamyam_content[i].e[x][y],
6448 level->game_version);
6452 static void LoadLevel_InitCustomElements(struct LevelInfo *level)
6456 // map custom element change events that have changed in newer versions
6457 // (these following values were accidentally changed in version 3.0.1)
6458 // (this seems to be needed only for 'ab_levelset3' and 'ab_levelset4')
6459 if (level->game_version <= VERSION_IDENT(3,0,0,0))
6461 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6463 int element = EL_CUSTOM_START + i;
6465 // order of checking and copying events to be mapped is important
6466 // (do not change the start and end value -- they are constant)
6467 for (j = CE_BY_OTHER_ACTION; j >= CE_VALUE_GETS_ZERO; j--)
6469 if (HAS_CHANGE_EVENT(element, j - 2))
6471 SET_CHANGE_EVENT(element, j - 2, FALSE);
6472 SET_CHANGE_EVENT(element, j, TRUE);
6476 // order of checking and copying events to be mapped is important
6477 // (do not change the start and end value -- they are constant)
6478 for (j = CE_PLAYER_COLLECTS_X; j >= CE_HITTING_SOMETHING; j--)
6480 if (HAS_CHANGE_EVENT(element, j - 1))
6482 SET_CHANGE_EVENT(element, j - 1, FALSE);
6483 SET_CHANGE_EVENT(element, j, TRUE);
6489 // initialize "can_change" field for old levels with only one change page
6490 if (level->game_version <= VERSION_IDENT(3,0,2,0))
6492 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6494 int element = EL_CUSTOM_START + i;
6496 if (CAN_CHANGE(element))
6497 element_info[element].change->can_change = TRUE;
6501 // correct custom element values (for old levels without these options)
6502 if (level->game_version < VERSION_IDENT(3,1,1,0))
6504 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6506 int element = EL_CUSTOM_START + i;
6507 struct ElementInfo *ei = &element_info[element];
6509 if (ei->access_direction == MV_NO_DIRECTION)
6510 ei->access_direction = MV_ALL_DIRECTIONS;
6514 // correct custom element values (fix invalid values for all versions)
6517 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6519 int element = EL_CUSTOM_START + i;
6520 struct ElementInfo *ei = &element_info[element];
6522 for (j = 0; j < ei->num_change_pages; j++)
6524 struct ElementChangeInfo *change = &ei->change_page[j];
6526 if (change->trigger_player == CH_PLAYER_NONE)
6527 change->trigger_player = CH_PLAYER_ANY;
6529 if (change->trigger_side == CH_SIDE_NONE)
6530 change->trigger_side = CH_SIDE_ANY;
6535 // initialize "can_explode" field for old levels which did not store this
6536 // !!! CHECK THIS -- "<= 3,1,0,0" IS PROBABLY WRONG !!!
6537 if (level->game_version <= VERSION_IDENT(3,1,0,0))
6539 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6541 int element = EL_CUSTOM_START + i;
6543 if (EXPLODES_1X1_OLD(element))
6544 element_info[element].explosion_type = EXPLODES_1X1;
6546 SET_PROPERTY(element, EP_CAN_EXPLODE, (EXPLODES_BY_FIRE(element) ||
6547 EXPLODES_SMASHED(element) ||
6548 EXPLODES_IMPACT(element)));
6552 // correct previously hard-coded move delay values for maze runner style
6553 if (level->game_version < VERSION_IDENT(3,1,1,0))
6555 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6557 int element = EL_CUSTOM_START + i;
6559 if (element_info[element].move_pattern & MV_MAZE_RUNNER_STYLE)
6561 // previously hard-coded and therefore ignored
6562 element_info[element].move_delay_fixed = 9;
6563 element_info[element].move_delay_random = 0;
6568 // set some other uninitialized values of custom elements in older levels
6569 if (level->game_version < VERSION_IDENT(3,1,0,0))
6571 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6573 int element = EL_CUSTOM_START + i;
6575 element_info[element].access_direction = MV_ALL_DIRECTIONS;
6577 element_info[element].explosion_delay = 17;
6578 element_info[element].ignition_delay = 8;
6583 static void LoadLevel_InitElements(struct LevelInfo *level)
6585 LoadLevel_InitStandardElements(level);
6587 if (level->file_has_custom_elements)
6588 LoadLevel_InitCustomElements(level);
6590 // initialize element properties for level editor etc.
6591 InitElementPropertiesEngine(level->game_version);
6592 InitElementPropertiesGfxElement();
6595 static void LoadLevel_InitPlayfield(struct LevelInfo *level)
6599 // map elements that have changed in newer versions
6600 for (y = 0; y < level->fieldy; y++)
6601 for (x = 0; x < level->fieldx; x++)
6602 level->field[x][y] = getMappedElementByVersion(level->field[x][y],
6603 level->game_version);
6605 // clear unused playfield data (nicer if level gets resized in editor)
6606 for (x = 0; x < MAX_LEV_FIELDX; x++)
6607 for (y = 0; y < MAX_LEV_FIELDY; y++)
6608 if (x >= level->fieldx || y >= level->fieldy)
6609 level->field[x][y] = EL_EMPTY;
6611 // copy elements to runtime playfield array
6612 for (x = 0; x < MAX_LEV_FIELDX; x++)
6613 for (y = 0; y < MAX_LEV_FIELDY; y++)
6614 Feld[x][y] = level->field[x][y];
6616 // initialize level size variables for faster access
6617 lev_fieldx = level->fieldx;
6618 lev_fieldy = level->fieldy;
6620 // determine border element for this level
6621 if (level->file_info.type == LEVEL_FILE_TYPE_DC)
6622 BorderElement = EL_EMPTY; // (in editor, SetBorderElement() is used)
6627 static void LoadLevel_InitNativeEngines(struct LevelInfo *level)
6629 struct LevelFileInfo *level_file_info = &level->file_info;
6631 if (level_file_info->type == LEVEL_FILE_TYPE_RND)
6632 CopyNativeLevel_RND_to_Native(level);
6635 static void LoadLevelTemplate_LoadAndInit(void)
6637 LoadLevelFromFileInfo(&level_template, &level_template.file_info, FALSE);
6639 LoadLevel_InitVersion(&level_template);
6640 LoadLevel_InitElements(&level_template);
6642 ActivateLevelTemplate();
6645 void LoadLevelTemplate(int nr)
6647 if (!fileExists(getGlobalLevelTemplateFilename()))
6649 Error(ERR_WARN, "no level template found for this level");
6654 setLevelFileInfo(&level_template.file_info, nr);
6656 LoadLevelTemplate_LoadAndInit();
6659 static void LoadNetworkLevelTemplate(struct NetworkLevelInfo *network_level)
6661 copyLevelFileInfo(&network_level->tmpl_info, &level_template.file_info);
6663 LoadLevelTemplate_LoadAndInit();
6666 static void LoadLevel_LoadAndInit(struct NetworkLevelInfo *network_level)
6668 LoadLevelFromFileInfo(&level, &level.file_info, FALSE);
6670 if (level.use_custom_template)
6672 if (network_level != NULL)
6673 LoadNetworkLevelTemplate(network_level);
6675 LoadLevelTemplate(-1);
6678 LoadLevel_InitVersion(&level);
6679 LoadLevel_InitElements(&level);
6680 LoadLevel_InitPlayfield(&level);
6682 LoadLevel_InitNativeEngines(&level);
6685 void LoadLevel(int nr)
6687 SetLevelSetInfo(leveldir_current->identifier, nr);
6689 setLevelFileInfo(&level.file_info, nr);
6691 LoadLevel_LoadAndInit(NULL);
6694 void LoadLevelInfoOnly(int nr)
6696 setLevelFileInfo(&level.file_info, nr);
6698 LoadLevelFromFileInfo(&level, &level.file_info, TRUE);
6701 void LoadNetworkLevel(struct NetworkLevelInfo *network_level)
6703 SetLevelSetInfo(network_level->leveldir_identifier,
6704 network_level->file_info.nr);
6706 copyLevelFileInfo(&network_level->file_info, &level.file_info);
6708 LoadLevel_LoadAndInit(network_level);
6711 static int SaveLevel_VERS(FILE *file, struct LevelInfo *level)
6715 chunk_size += putFileVersion(file, level->file_version);
6716 chunk_size += putFileVersion(file, level->game_version);
6721 static int SaveLevel_DATE(FILE *file, struct LevelInfo *level)
6725 chunk_size += putFile16BitBE(file, level->creation_date.year);
6726 chunk_size += putFile8Bit(file, level->creation_date.month);
6727 chunk_size += putFile8Bit(file, level->creation_date.day);
6732 #if ENABLE_HISTORIC_CHUNKS
6733 static void SaveLevel_HEAD(FILE *file, struct LevelInfo *level)
6737 putFile8Bit(file, level->fieldx);
6738 putFile8Bit(file, level->fieldy);
6740 putFile16BitBE(file, level->time);
6741 putFile16BitBE(file, level->gems_needed);
6743 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
6744 putFile8Bit(file, level->name[i]);
6746 for (i = 0; i < LEVEL_SCORE_ELEMENTS; i++)
6747 putFile8Bit(file, level->score[i]);
6749 for (i = 0; i < STD_ELEMENT_CONTENTS; i++)
6750 for (y = 0; y < 3; y++)
6751 for (x = 0; x < 3; x++)
6752 putFile8Bit(file, (level->encoding_16bit_yamyam ? EL_EMPTY :
6753 level->yamyam_content[i].e[x][y]));
6754 putFile8Bit(file, level->amoeba_speed);
6755 putFile8Bit(file, level->time_magic_wall);
6756 putFile8Bit(file, level->time_wheel);
6757 putFile8Bit(file, (level->encoding_16bit_amoeba ? EL_EMPTY :
6758 level->amoeba_content));
6759 putFile8Bit(file, (level->initial_player_stepsize == STEPSIZE_FAST ? 1 : 0));
6760 putFile8Bit(file, (level->initial_gravity ? 1 : 0));
6761 putFile8Bit(file, (level->encoding_16bit_field ? 1 : 0));
6762 putFile8Bit(file, (level->em_slippery_gems ? 1 : 0));
6764 putFile8Bit(file, (level->use_custom_template ? 1 : 0));
6766 putFile8Bit(file, (level->block_last_field ? 1 : 0));
6767 putFile8Bit(file, (level->sp_block_last_field ? 1 : 0));
6768 putFile32BitBE(file, level->can_move_into_acid_bits);
6769 putFile8Bit(file, level->dont_collide_with_bits);
6771 putFile8Bit(file, (level->use_spring_bug ? 1 : 0));
6772 putFile8Bit(file, (level->use_step_counter ? 1 : 0));
6774 putFile8Bit(file, (level->instant_relocation ? 1 : 0));
6775 putFile8Bit(file, (level->can_pass_to_walkable ? 1 : 0));
6776 putFile8Bit(file, (level->grow_into_diggable ? 1 : 0));
6778 putFile8Bit(file, level->game_engine_type);
6780 WriteUnusedBytesToFile(file, LEVEL_CHUNK_HEAD_UNUSED);
6784 static int SaveLevel_NAME(FILE *file, struct LevelInfo *level)
6789 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
6790 chunk_size += putFile8Bit(file, level->name[i]);
6795 static int SaveLevel_AUTH(FILE *file, struct LevelInfo *level)
6800 for (i = 0; i < MAX_LEVEL_AUTHOR_LEN; i++)
6801 chunk_size += putFile8Bit(file, level->author[i]);
6806 #if ENABLE_HISTORIC_CHUNKS
6807 static int SaveLevel_BODY(FILE *file, struct LevelInfo *level)
6812 for (y = 0; y < level->fieldy; y++)
6813 for (x = 0; x < level->fieldx; x++)
6814 if (level->encoding_16bit_field)
6815 chunk_size += putFile16BitBE(file, level->field[x][y]);
6817 chunk_size += putFile8Bit(file, level->field[x][y]);
6823 static int SaveLevel_BODY(FILE *file, struct LevelInfo *level)
6828 for (y = 0; y < level->fieldy; y++)
6829 for (x = 0; x < level->fieldx; x++)
6830 chunk_size += putFile16BitBE(file, level->field[x][y]);
6835 #if ENABLE_HISTORIC_CHUNKS
6836 static void SaveLevel_CONT(FILE *file, struct LevelInfo *level)
6840 putFile8Bit(file, EL_YAMYAM);
6841 putFile8Bit(file, level->num_yamyam_contents);
6842 putFile8Bit(file, 0);
6843 putFile8Bit(file, 0);
6845 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6846 for (y = 0; y < 3; y++)
6847 for (x = 0; x < 3; x++)
6848 if (level->encoding_16bit_field)
6849 putFile16BitBE(file, level->yamyam_content[i].e[x][y]);
6851 putFile8Bit(file, level->yamyam_content[i].e[x][y]);
6855 #if ENABLE_HISTORIC_CHUNKS
6856 static void SaveLevel_CNT2(FILE *file, struct LevelInfo *level, int element)
6859 int num_contents, content_xsize, content_ysize;
6860 int content_array[MAX_ELEMENT_CONTENTS][3][3];
6862 if (element == EL_YAMYAM)
6864 num_contents = level->num_yamyam_contents;
6868 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6869 for (y = 0; y < 3; y++)
6870 for (x = 0; x < 3; x++)
6871 content_array[i][x][y] = level->yamyam_content[i].e[x][y];
6873 else if (element == EL_BD_AMOEBA)
6879 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6880 for (y = 0; y < 3; y++)
6881 for (x = 0; x < 3; x++)
6882 content_array[i][x][y] = EL_EMPTY;
6883 content_array[0][0][0] = level->amoeba_content;
6887 // chunk header already written -- write empty chunk data
6888 WriteUnusedBytesToFile(file, LEVEL_CHUNK_CNT2_SIZE);
6890 Error(ERR_WARN, "cannot save content for element '%d'", element);
6894 putFile16BitBE(file, element);
6895 putFile8Bit(file, num_contents);
6896 putFile8Bit(file, content_xsize);
6897 putFile8Bit(file, content_ysize);
6899 WriteUnusedBytesToFile(file, LEVEL_CHUNK_CNT2_UNUSED);
6901 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6902 for (y = 0; y < 3; y++)
6903 for (x = 0; x < 3; x++)
6904 putFile16BitBE(file, content_array[i][x][y]);
6908 #if ENABLE_HISTORIC_CHUNKS
6909 static int SaveLevel_CNT3(FILE *file, struct LevelInfo *level, int element)
6911 int envelope_nr = element - EL_ENVELOPE_1;
6912 int envelope_len = strlen(level->envelope_text[envelope_nr]) + 1;
6916 chunk_size += putFile16BitBE(file, element);
6917 chunk_size += putFile16BitBE(file, envelope_len);
6918 chunk_size += putFile8Bit(file, level->envelope_xsize[envelope_nr]);
6919 chunk_size += putFile8Bit(file, level->envelope_ysize[envelope_nr]);
6921 WriteUnusedBytesToFile(file, LEVEL_CHUNK_CNT3_UNUSED);
6922 chunk_size += LEVEL_CHUNK_CNT3_UNUSED;
6924 for (i = 0; i < envelope_len; i++)
6925 chunk_size += putFile8Bit(file, level->envelope_text[envelope_nr][i]);
6931 #if ENABLE_HISTORIC_CHUNKS
6932 static void SaveLevel_CUS1(FILE *file, struct LevelInfo *level,
6933 int num_changed_custom_elements)
6937 putFile16BitBE(file, num_changed_custom_elements);
6939 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6941 int element = EL_CUSTOM_START + i;
6943 struct ElementInfo *ei = &element_info[element];
6945 if (ei->properties[EP_BITFIELD_BASE_NR] != EP_BITMASK_DEFAULT)
6947 if (check < num_changed_custom_elements)
6949 putFile16BitBE(file, element);
6950 putFile32BitBE(file, ei->properties[EP_BITFIELD_BASE_NR]);
6957 if (check != num_changed_custom_elements) // should not happen
6958 Error(ERR_WARN, "inconsistent number of custom element properties");
6962 #if ENABLE_HISTORIC_CHUNKS
6963 static void SaveLevel_CUS2(FILE *file, struct LevelInfo *level,
6964 int num_changed_custom_elements)
6968 putFile16BitBE(file, num_changed_custom_elements);
6970 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6972 int element = EL_CUSTOM_START + i;
6974 if (element_info[element].change->target_element != EL_EMPTY_SPACE)
6976 if (check < num_changed_custom_elements)
6978 putFile16BitBE(file, element);
6979 putFile16BitBE(file, element_info[element].change->target_element);
6986 if (check != num_changed_custom_elements) // should not happen
6987 Error(ERR_WARN, "inconsistent number of custom target elements");
6991 #if ENABLE_HISTORIC_CHUNKS
6992 static void SaveLevel_CUS3(FILE *file, struct LevelInfo *level,
6993 int num_changed_custom_elements)
6995 int i, j, x, y, check = 0;
6997 putFile16BitBE(file, num_changed_custom_elements);
6999 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
7001 int element = EL_CUSTOM_START + i;
7002 struct ElementInfo *ei = &element_info[element];
7004 if (ei->modified_settings)
7006 if (check < num_changed_custom_elements)
7008 putFile16BitBE(file, element);
7010 for (j = 0; j < MAX_ELEMENT_NAME_LEN; j++)
7011 putFile8Bit(file, ei->description[j]);
7013 putFile32BitBE(file, ei->properties[EP_BITFIELD_BASE_NR]);
7015 // some free bytes for future properties and padding
7016 WriteUnusedBytesToFile(file, 7);
7018 putFile8Bit(file, ei->use_gfx_element);
7019 putFile16BitBE(file, ei->gfx_element_initial);
7021 putFile8Bit(file, ei->collect_score_initial);
7022 putFile8Bit(file, ei->collect_count_initial);
7024 putFile16BitBE(file, ei->push_delay_fixed);
7025 putFile16BitBE(file, ei->push_delay_random);
7026 putFile16BitBE(file, ei->move_delay_fixed);
7027 putFile16BitBE(file, ei->move_delay_random);
7029 putFile16BitBE(file, ei->move_pattern);
7030 putFile8Bit(file, ei->move_direction_initial);
7031 putFile8Bit(file, ei->move_stepsize);
7033 for (y = 0; y < 3; y++)
7034 for (x = 0; x < 3; x++)
7035 putFile16BitBE(file, ei->content.e[x][y]);
7037 putFile32BitBE(file, ei->change->events);
7039 putFile16BitBE(file, ei->change->target_element);
7041 putFile16BitBE(file, ei->change->delay_fixed);
7042 putFile16BitBE(file, ei->change->delay_random);
7043 putFile16BitBE(file, ei->change->delay_frames);
7045 putFile16BitBE(file, ei->change->initial_trigger_element);
7047 putFile8Bit(file, ei->change->explode);
7048 putFile8Bit(file, ei->change->use_target_content);
7049 putFile8Bit(file, ei->change->only_if_complete);
7050 putFile8Bit(file, ei->change->use_random_replace);
7052 putFile8Bit(file, ei->change->random_percentage);
7053 putFile8Bit(file, ei->change->replace_when);
7055 for (y = 0; y < 3; y++)
7056 for (x = 0; x < 3; x++)
7057 putFile16BitBE(file, ei->change->content.e[x][y]);
7059 putFile8Bit(file, ei->slippery_type);
7061 // some free bytes for future properties and padding
7062 WriteUnusedBytesToFile(file, LEVEL_CPART_CUS3_UNUSED);
7069 if (check != num_changed_custom_elements) // should not happen
7070 Error(ERR_WARN, "inconsistent number of custom element properties");
7074 #if ENABLE_HISTORIC_CHUNKS
7075 static void SaveLevel_CUS4(FILE *file, struct LevelInfo *level, int element)
7077 struct ElementInfo *ei = &element_info[element];
7080 // ---------- custom element base property values (96 bytes) ----------------
7082 putFile16BitBE(file, element);
7084 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
7085 putFile8Bit(file, ei->description[i]);
7087 putFile32BitBE(file, ei->properties[EP_BITFIELD_BASE_NR]);
7089 WriteUnusedBytesToFile(file, 4); // reserved for more base properties
7091 putFile8Bit(file, ei->num_change_pages);
7093 putFile16BitBE(file, ei->ce_value_fixed_initial);
7094 putFile16BitBE(file, ei->ce_value_random_initial);
7095 putFile8Bit(file, ei->use_last_ce_value);
7097 putFile8Bit(file, ei->use_gfx_element);
7098 putFile16BitBE(file, ei->gfx_element_initial);
7100 putFile8Bit(file, ei->collect_score_initial);
7101 putFile8Bit(file, ei->collect_count_initial);
7103 putFile8Bit(file, ei->drop_delay_fixed);
7104 putFile8Bit(file, ei->push_delay_fixed);
7105 putFile8Bit(file, ei->drop_delay_random);
7106 putFile8Bit(file, ei->push_delay_random);
7107 putFile16BitBE(file, ei->move_delay_fixed);
7108 putFile16BitBE(file, ei->move_delay_random);
7110 // bits 0 - 15 of "move_pattern" ...
7111 putFile16BitBE(file, ei->move_pattern & 0xffff);
7112 putFile8Bit(file, ei->move_direction_initial);
7113 putFile8Bit(file, ei->move_stepsize);
7115 putFile8Bit(file, ei->slippery_type);
7117 for (y = 0; y < 3; y++)
7118 for (x = 0; x < 3; x++)
7119 putFile16BitBE(file, ei->content.e[x][y]);
7121 putFile16BitBE(file, ei->move_enter_element);
7122 putFile16BitBE(file, ei->move_leave_element);
7123 putFile8Bit(file, ei->move_leave_type);
7125 // ... bits 16 - 31 of "move_pattern" (not nice, but downward compatible)
7126 putFile16BitBE(file, (ei->move_pattern >> 16) & 0xffff);
7128 putFile8Bit(file, ei->access_direction);
7130 putFile8Bit(file, ei->explosion_delay);
7131 putFile8Bit(file, ei->ignition_delay);
7132 putFile8Bit(file, ei->explosion_type);
7134 // some free bytes for future custom property values and padding
7135 WriteUnusedBytesToFile(file, 1);
7137 // ---------- change page property values (48 bytes) ------------------------
7139 for (i = 0; i < ei->num_change_pages; i++)
7141 struct ElementChangeInfo *change = &ei->change_page[i];
7142 unsigned int event_bits;
7144 // bits 0 - 31 of "has_event[]" ...
7146 for (j = 0; j < MIN(NUM_CHANGE_EVENTS, 32); j++)
7147 if (change->has_event[j])
7148 event_bits |= (1 << j);
7149 putFile32BitBE(file, event_bits);
7151 putFile16BitBE(file, change->target_element);
7153 putFile16BitBE(file, change->delay_fixed);
7154 putFile16BitBE(file, change->delay_random);
7155 putFile16BitBE(file, change->delay_frames);
7157 putFile16BitBE(file, change->initial_trigger_element);
7159 putFile8Bit(file, change->explode);
7160 putFile8Bit(file, change->use_target_content);
7161 putFile8Bit(file, change->only_if_complete);
7162 putFile8Bit(file, change->use_random_replace);
7164 putFile8Bit(file, change->random_percentage);
7165 putFile8Bit(file, change->replace_when);
7167 for (y = 0; y < 3; y++)
7168 for (x = 0; x < 3; x++)
7169 putFile16BitBE(file, change->target_content.e[x][y]);
7171 putFile8Bit(file, change->can_change);
7173 putFile8Bit(file, change->trigger_side);
7175 putFile8Bit(file, change->trigger_player);
7176 putFile8Bit(file, (change->trigger_page == CH_PAGE_ANY ? CH_PAGE_ANY_FILE :
7177 log_2(change->trigger_page)));
7179 putFile8Bit(file, change->has_action);
7180 putFile8Bit(file, change->action_type);
7181 putFile8Bit(file, change->action_mode);
7182 putFile16BitBE(file, change->action_arg);
7184 // ... bits 32 - 39 of "has_event[]" (not nice, but downward compatible)
7186 for (j = 32; j < NUM_CHANGE_EVENTS; j++)
7187 if (change->has_event[j])
7188 event_bits |= (1 << (j - 32));
7189 putFile8Bit(file, event_bits);
7194 #if ENABLE_HISTORIC_CHUNKS
7195 static void SaveLevel_GRP1(FILE *file, struct LevelInfo *level, int element)
7197 struct ElementInfo *ei = &element_info[element];
7198 struct ElementGroupInfo *group = ei->group;
7201 putFile16BitBE(file, element);
7203 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
7204 putFile8Bit(file, ei->description[i]);
7206 putFile8Bit(file, group->num_elements);
7208 putFile8Bit(file, ei->use_gfx_element);
7209 putFile16BitBE(file, ei->gfx_element_initial);
7211 putFile8Bit(file, group->choice_mode);
7213 // some free bytes for future values and padding
7214 WriteUnusedBytesToFile(file, 3);
7216 for (i = 0; i < MAX_ELEMENTS_IN_GROUP; i++)
7217 putFile16BitBE(file, group->element[i]);
7221 static int SaveLevel_MicroChunk(FILE *file, struct LevelFileConfigInfo *entry,
7222 boolean write_element)
7224 int save_type = entry->save_type;
7225 int data_type = entry->data_type;
7226 int conf_type = entry->conf_type;
7227 int byte_mask = conf_type & CONF_MASK_BYTES;
7228 int element = entry->element;
7229 int default_value = entry->default_value;
7231 boolean modified = FALSE;
7233 if (byte_mask != CONF_MASK_MULTI_BYTES)
7235 void *value_ptr = entry->value;
7236 int value = (data_type == TYPE_BOOLEAN ? *(boolean *)value_ptr :
7239 // check if any settings have been modified before saving them
7240 if (value != default_value)
7243 // do not save if explicitly told or if unmodified default settings
7244 if ((save_type == SAVE_CONF_NEVER) ||
7245 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
7249 num_bytes += putFile16BitBE(file, element);
7251 num_bytes += putFile8Bit(file, conf_type);
7252 num_bytes += (byte_mask == CONF_MASK_1_BYTE ? putFile8Bit (file, value) :
7253 byte_mask == CONF_MASK_2_BYTE ? putFile16BitBE(file, value) :
7254 byte_mask == CONF_MASK_4_BYTE ? putFile32BitBE(file, value) :
7257 else if (data_type == TYPE_STRING)
7259 char *default_string = entry->default_string;
7260 char *string = (char *)(entry->value);
7261 int string_length = strlen(string);
7264 // check if any settings have been modified before saving them
7265 if (!strEqual(string, default_string))
7268 // do not save if explicitly told or if unmodified default settings
7269 if ((save_type == SAVE_CONF_NEVER) ||
7270 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
7274 num_bytes += putFile16BitBE(file, element);
7276 num_bytes += putFile8Bit(file, conf_type);
7277 num_bytes += putFile16BitBE(file, string_length);
7279 for (i = 0; i < string_length; i++)
7280 num_bytes += putFile8Bit(file, string[i]);
7282 else if (data_type == TYPE_ELEMENT_LIST)
7284 int *element_array = (int *)(entry->value);
7285 int num_elements = *(int *)(entry->num_entities);
7288 // check if any settings have been modified before saving them
7289 for (i = 0; i < num_elements; i++)
7290 if (element_array[i] != default_value)
7293 // do not save if explicitly told or if unmodified default settings
7294 if ((save_type == SAVE_CONF_NEVER) ||
7295 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
7299 num_bytes += putFile16BitBE(file, element);
7301 num_bytes += putFile8Bit(file, conf_type);
7302 num_bytes += putFile16BitBE(file, num_elements * CONF_ELEMENT_NUM_BYTES);
7304 for (i = 0; i < num_elements; i++)
7305 num_bytes += putFile16BitBE(file, element_array[i]);
7307 else if (data_type == TYPE_CONTENT_LIST)
7309 struct Content *content = (struct Content *)(entry->value);
7310 int num_contents = *(int *)(entry->num_entities);
7313 // check if any settings have been modified before saving them
7314 for (i = 0; i < num_contents; i++)
7315 for (y = 0; y < 3; y++)
7316 for (x = 0; x < 3; x++)
7317 if (content[i].e[x][y] != default_value)
7320 // do not save if explicitly told or if unmodified default settings
7321 if ((save_type == SAVE_CONF_NEVER) ||
7322 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
7326 num_bytes += putFile16BitBE(file, element);
7328 num_bytes += putFile8Bit(file, conf_type);
7329 num_bytes += putFile16BitBE(file, num_contents * CONF_CONTENT_NUM_BYTES);
7331 for (i = 0; i < num_contents; i++)
7332 for (y = 0; y < 3; y++)
7333 for (x = 0; x < 3; x++)
7334 num_bytes += putFile16BitBE(file, content[i].e[x][y]);
7340 static int SaveLevel_INFO(FILE *file, struct LevelInfo *level)
7345 li = *level; // copy level data into temporary buffer
7347 for (i = 0; chunk_config_INFO[i].data_type != -1; i++)
7348 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_INFO[i], FALSE);
7353 static int SaveLevel_ELEM(FILE *file, struct LevelInfo *level)
7358 li = *level; // copy level data into temporary buffer
7360 for (i = 0; chunk_config_ELEM[i].data_type != -1; i++)
7361 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_ELEM[i], TRUE);
7366 static int SaveLevel_NOTE(FILE *file, struct LevelInfo *level, int element)
7368 int envelope_nr = element - EL_ENVELOPE_1;
7372 chunk_size += putFile16BitBE(file, element);
7374 // copy envelope data into temporary buffer
7375 xx_envelope = level->envelope[envelope_nr];
7377 for (i = 0; chunk_config_NOTE[i].data_type != -1; i++)
7378 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_NOTE[i], FALSE);
7383 static int SaveLevel_CUSX(FILE *file, struct LevelInfo *level, int element)
7385 struct ElementInfo *ei = &element_info[element];
7389 chunk_size += putFile16BitBE(file, element);
7391 xx_ei = *ei; // copy element data into temporary buffer
7393 // set default description string for this specific element
7394 strcpy(xx_default_description, getDefaultElementDescription(ei));
7396 for (i = 0; chunk_config_CUSX_base[i].data_type != -1; i++)
7397 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_CUSX_base[i], FALSE);
7399 for (i = 0; i < ei->num_change_pages; i++)
7401 struct ElementChangeInfo *change = &ei->change_page[i];
7403 xx_current_change_page = i;
7405 xx_change = *change; // copy change data into temporary buffer
7408 setEventBitsFromEventFlags(change);
7410 for (j = 0; chunk_config_CUSX_change[j].data_type != -1; j++)
7411 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_CUSX_change[j],
7418 static int SaveLevel_GRPX(FILE *file, struct LevelInfo *level, int element)
7420 struct ElementInfo *ei = &element_info[element];
7421 struct ElementGroupInfo *group = ei->group;
7425 chunk_size += putFile16BitBE(file, element);
7427 xx_ei = *ei; // copy element data into temporary buffer
7428 xx_group = *group; // copy group data into temporary buffer
7430 // set default description string for this specific element
7431 strcpy(xx_default_description, getDefaultElementDescription(ei));
7433 for (i = 0; chunk_config_GRPX[i].data_type != -1; i++)
7434 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_GRPX[i], FALSE);
7439 static void SaveLevelFromFilename(struct LevelInfo *level, char *filename,
7440 boolean save_as_template)
7446 if (!(file = fopen(filename, MODE_WRITE)))
7448 Error(ERR_WARN, "cannot save level file '%s'", filename);
7452 level->file_version = FILE_VERSION_ACTUAL;
7453 level->game_version = GAME_VERSION_ACTUAL;
7455 level->creation_date = getCurrentDate();
7457 putFileChunkBE(file, "RND1", CHUNK_SIZE_UNDEFINED);
7458 putFileChunkBE(file, "CAVE", CHUNK_SIZE_NONE);
7460 chunk_size = SaveLevel_VERS(NULL, level);
7461 putFileChunkBE(file, "VERS", chunk_size);
7462 SaveLevel_VERS(file, level);
7464 chunk_size = SaveLevel_DATE(NULL, level);
7465 putFileChunkBE(file, "DATE", chunk_size);
7466 SaveLevel_DATE(file, level);
7468 chunk_size = SaveLevel_NAME(NULL, level);
7469 putFileChunkBE(file, "NAME", chunk_size);
7470 SaveLevel_NAME(file, level);
7472 chunk_size = SaveLevel_AUTH(NULL, level);
7473 putFileChunkBE(file, "AUTH", chunk_size);
7474 SaveLevel_AUTH(file, level);
7476 chunk_size = SaveLevel_INFO(NULL, level);
7477 putFileChunkBE(file, "INFO", chunk_size);
7478 SaveLevel_INFO(file, level);
7480 chunk_size = SaveLevel_BODY(NULL, level);
7481 putFileChunkBE(file, "BODY", chunk_size);
7482 SaveLevel_BODY(file, level);
7484 chunk_size = SaveLevel_ELEM(NULL, level);
7485 if (chunk_size > LEVEL_CHUNK_ELEM_UNCHANGED) // save if changed
7487 putFileChunkBE(file, "ELEM", chunk_size);
7488 SaveLevel_ELEM(file, level);
7491 for (i = 0; i < NUM_ENVELOPES; i++)
7493 int element = EL_ENVELOPE_1 + i;
7495 chunk_size = SaveLevel_NOTE(NULL, level, element);
7496 if (chunk_size > LEVEL_CHUNK_NOTE_UNCHANGED) // save if changed
7498 putFileChunkBE(file, "NOTE", chunk_size);
7499 SaveLevel_NOTE(file, level, element);
7503 // if not using template level, check for non-default custom/group elements
7504 if (!level->use_custom_template || save_as_template)
7506 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
7508 int element = EL_CUSTOM_START + i;
7510 chunk_size = SaveLevel_CUSX(NULL, level, element);
7511 if (chunk_size > LEVEL_CHUNK_CUSX_UNCHANGED) // save if changed
7513 putFileChunkBE(file, "CUSX", chunk_size);
7514 SaveLevel_CUSX(file, level, element);
7518 for (i = 0; i < NUM_GROUP_ELEMENTS; i++)
7520 int element = EL_GROUP_START + i;
7522 chunk_size = SaveLevel_GRPX(NULL, level, element);
7523 if (chunk_size > LEVEL_CHUNK_GRPX_UNCHANGED) // save if changed
7525 putFileChunkBE(file, "GRPX", chunk_size);
7526 SaveLevel_GRPX(file, level, element);
7533 SetFilePermissions(filename, PERMS_PRIVATE);
7536 void SaveLevel(int nr)
7538 char *filename = getDefaultLevelFilename(nr);
7540 SaveLevelFromFilename(&level, filename, FALSE);
7543 void SaveLevelTemplate(void)
7545 char *filename = getLocalLevelTemplateFilename();
7547 SaveLevelFromFilename(&level, filename, TRUE);
7550 boolean SaveLevelChecked(int nr)
7552 char *filename = getDefaultLevelFilename(nr);
7553 boolean new_level = !fileExists(filename);
7554 boolean level_saved = FALSE;
7556 if (new_level || Request("Save this level and kill the old?", REQ_ASK))
7561 Request("Level saved!", REQ_CONFIRM);
7569 void DumpLevel(struct LevelInfo *level)
7571 if (level->no_level_file || level->no_valid_file)
7573 Error(ERR_WARN, "cannot dump -- no valid level file found");
7579 Print("Level xxx (file version %08d, game version %08d)\n",
7580 level->file_version, level->game_version);
7583 Print("Level author: '%s'\n", level->author);
7584 Print("Level title: '%s'\n", level->name);
7586 Print("Playfield size: %d x %d\n", level->fieldx, level->fieldy);
7588 Print("Level time: %d seconds\n", level->time);
7589 Print("Gems needed: %d\n", level->gems_needed);
7591 Print("Time for magic wall: %d seconds\n", level->time_magic_wall);
7592 Print("Time for wheel: %d seconds\n", level->time_wheel);
7593 Print("Time for light: %d seconds\n", level->time_light);
7594 Print("Time for timegate: %d seconds\n", level->time_timegate);
7596 Print("Amoeba speed: %d\n", level->amoeba_speed);
7599 Print("EM style slippery gems: %s\n", (level->em_slippery_gems ? "yes" : "no"));
7600 Print("Player blocks last field: %s\n", (level->block_last_field ? "yes" : "no"));
7601 Print("SP player blocks last field: %s\n", (level->sp_block_last_field ? "yes" : "no"));
7602 Print("use spring bug: %s\n", (level->use_spring_bug ? "yes" : "no"));
7603 Print("use step counter: %s\n", (level->use_step_counter ? "yes" : "no"));
7609 // ============================================================================
7610 // tape file functions
7611 // ============================================================================
7613 static void setTapeInfoToDefaults(void)
7617 // always start with reliable default values (empty tape)
7620 // default values (also for pre-1.2 tapes) with only the first player
7621 tape.player_participates[0] = TRUE;
7622 for (i = 1; i < MAX_PLAYERS; i++)
7623 tape.player_participates[i] = FALSE;
7625 // at least one (default: the first) player participates in every tape
7626 tape.num_participating_players = 1;
7628 tape.level_nr = level_nr;
7630 tape.changed = FALSE;
7632 tape.recording = FALSE;
7633 tape.playing = FALSE;
7634 tape.pausing = FALSE;
7636 tape.no_valid_file = FALSE;
7639 static int LoadTape_VERS(File *file, int chunk_size, struct TapeInfo *tape)
7641 tape->file_version = getFileVersion(file);
7642 tape->game_version = getFileVersion(file);
7647 static int LoadTape_HEAD(File *file, int chunk_size, struct TapeInfo *tape)
7651 tape->random_seed = getFile32BitBE(file);
7652 tape->date = getFile32BitBE(file);
7653 tape->length = getFile32BitBE(file);
7655 // read header fields that are new since version 1.2
7656 if (tape->file_version >= FILE_VERSION_1_2)
7658 byte store_participating_players = getFile8Bit(file);
7661 // since version 1.2, tapes store which players participate in the tape
7662 tape->num_participating_players = 0;
7663 for (i = 0; i < MAX_PLAYERS; i++)
7665 tape->player_participates[i] = FALSE;
7667 if (store_participating_players & (1 << i))
7669 tape->player_participates[i] = TRUE;
7670 tape->num_participating_players++;
7674 tape->use_mouse = (getFile8Bit(file) == 1 ? TRUE : FALSE);
7676 ReadUnusedBytesFromFile(file, TAPE_CHUNK_HEAD_UNUSED);
7678 engine_version = getFileVersion(file);
7679 if (engine_version > 0)
7680 tape->engine_version = engine_version;
7682 tape->engine_version = tape->game_version;
7688 static int LoadTape_INFO(File *file, int chunk_size, struct TapeInfo *tape)
7690 int level_identifier_size;
7693 level_identifier_size = getFile16BitBE(file);
7695 tape->level_identifier =
7696 checked_realloc(tape->level_identifier, level_identifier_size);
7698 for (i = 0; i < level_identifier_size; i++)
7699 tape->level_identifier[i] = getFile8Bit(file);
7701 tape->level_nr = getFile16BitBE(file);
7703 chunk_size = 2 + level_identifier_size + 2;
7708 static int LoadTape_BODY(File *file, int chunk_size, struct TapeInfo *tape)
7712 (tape->use_mouse ? 3 : tape->num_participating_players) + 1;
7713 int chunk_size_expected = tape_pos_size * tape->length;
7715 if (chunk_size_expected != chunk_size)
7717 ReadUnusedBytesFromFile(file, chunk_size);
7718 return chunk_size_expected;
7721 for (i = 0; i < tape->length; i++)
7723 if (i >= MAX_TAPE_LEN)
7725 Error(ERR_WARN, "tape truncated -- size exceeds maximum tape size %d",
7728 // tape too large; read and ignore remaining tape data from this chunk
7729 for (;i < tape->length; i++)
7730 ReadUnusedBytesFromFile(file, tape->num_participating_players + 1);
7735 if (tape->use_mouse)
7737 tape->pos[i].action[TAPE_ACTION_LX] = getFile8Bit(file);
7738 tape->pos[i].action[TAPE_ACTION_LY] = getFile8Bit(file);
7739 tape->pos[i].action[TAPE_ACTION_BUTTON] = getFile8Bit(file);
7741 tape->pos[i].action[TAPE_ACTION_UNUSED] = 0;
7745 for (j = 0; j < MAX_PLAYERS; j++)
7747 tape->pos[i].action[j] = MV_NONE;
7749 if (tape->player_participates[j])
7750 tape->pos[i].action[j] = getFile8Bit(file);
7754 tape->pos[i].delay = getFile8Bit(file);
7756 if (tape->file_version == FILE_VERSION_1_0)
7758 // eliminate possible diagonal moves in old tapes
7759 // this is only for backward compatibility
7761 byte joy_dir[4] = { JOY_LEFT, JOY_RIGHT, JOY_UP, JOY_DOWN };
7762 byte action = tape->pos[i].action[0];
7763 int k, num_moves = 0;
7765 for (k = 0; k<4; k++)
7767 if (action & joy_dir[k])
7769 tape->pos[i + num_moves].action[0] = joy_dir[k];
7771 tape->pos[i + num_moves].delay = 0;
7780 tape->length += num_moves;
7783 else if (tape->file_version < FILE_VERSION_2_0)
7785 // convert pre-2.0 tapes to new tape format
7787 if (tape->pos[i].delay > 1)
7790 tape->pos[i + 1] = tape->pos[i];
7791 tape->pos[i + 1].delay = 1;
7794 for (j = 0; j < MAX_PLAYERS; j++)
7795 tape->pos[i].action[j] = MV_NONE;
7796 tape->pos[i].delay--;
7803 if (checkEndOfFile(file))
7807 if (i != tape->length)
7808 chunk_size = tape_pos_size * i;
7813 static void LoadTape_SokobanSolution(char *filename)
7816 int move_delay = TILESIZE / level.initial_player_stepsize[0];
7818 if (!(file = openFile(filename, MODE_READ)))
7820 tape.no_valid_file = TRUE;
7825 while (!checkEndOfFile(file))
7827 unsigned char c = getByteFromFile(file);
7829 if (checkEndOfFile(file))
7836 tape.pos[tape.length].action[0] = MV_UP;
7837 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
7843 tape.pos[tape.length].action[0] = MV_DOWN;
7844 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
7850 tape.pos[tape.length].action[0] = MV_LEFT;
7851 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
7857 tape.pos[tape.length].action[0] = MV_RIGHT;
7858 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
7866 // ignore white-space characters
7870 tape.no_valid_file = TRUE;
7872 Error(ERR_WARN, "unsupported Sokoban solution file '%s' ['%d']", filename, c);
7880 if (tape.no_valid_file)
7883 tape.length_frames = GetTapeLengthFrames();
7884 tape.length_seconds = GetTapeLengthSeconds();
7887 void LoadTapeFromFilename(char *filename)
7889 char cookie[MAX_LINE_LEN];
7890 char chunk_name[CHUNK_ID_LEN + 1];
7894 // always start with reliable default values
7895 setTapeInfoToDefaults();
7897 if (strSuffix(filename, ".sln"))
7899 LoadTape_SokobanSolution(filename);
7904 if (!(file = openFile(filename, MODE_READ)))
7906 tape.no_valid_file = TRUE;
7911 getFileChunkBE(file, chunk_name, NULL);
7912 if (strEqual(chunk_name, "RND1"))
7914 getFile32BitBE(file); // not used
7916 getFileChunkBE(file, chunk_name, NULL);
7917 if (!strEqual(chunk_name, "TAPE"))
7919 tape.no_valid_file = TRUE;
7921 Error(ERR_WARN, "unknown format of tape file '%s'", filename);
7928 else // check for pre-2.0 file format with cookie string
7930 strcpy(cookie, chunk_name);
7931 if (getStringFromFile(file, &cookie[4], MAX_LINE_LEN - 4) == NULL)
7933 if (strlen(cookie) > 0 && cookie[strlen(cookie) - 1] == '\n')
7934 cookie[strlen(cookie) - 1] = '\0';
7936 if (!checkCookieString(cookie, TAPE_COOKIE_TMPL))
7938 tape.no_valid_file = TRUE;
7940 Error(ERR_WARN, "unknown format of tape file '%s'", filename);
7947 if ((tape.file_version = getFileVersionFromCookieString(cookie)) == -1)
7949 tape.no_valid_file = TRUE;
7951 Error(ERR_WARN, "unsupported version of tape file '%s'", filename);
7958 // pre-2.0 tape files have no game version, so use file version here
7959 tape.game_version = tape.file_version;
7962 if (tape.file_version < FILE_VERSION_1_2)
7964 // tape files from versions before 1.2.0 without chunk structure
7965 LoadTape_HEAD(file, TAPE_CHUNK_HEAD_SIZE, &tape);
7966 LoadTape_BODY(file, 2 * tape.length, &tape);
7974 int (*loader)(File *, int, struct TapeInfo *);
7978 { "VERS", TAPE_CHUNK_VERS_SIZE, LoadTape_VERS },
7979 { "HEAD", TAPE_CHUNK_HEAD_SIZE, LoadTape_HEAD },
7980 { "INFO", -1, LoadTape_INFO },
7981 { "BODY", -1, LoadTape_BODY },
7985 while (getFileChunkBE(file, chunk_name, &chunk_size))
7989 while (chunk_info[i].name != NULL &&
7990 !strEqual(chunk_name, chunk_info[i].name))
7993 if (chunk_info[i].name == NULL)
7995 Error(ERR_WARN, "unknown chunk '%s' in tape file '%s'",
7996 chunk_name, filename);
7997 ReadUnusedBytesFromFile(file, chunk_size);
7999 else if (chunk_info[i].size != -1 &&
8000 chunk_info[i].size != chunk_size)
8002 Error(ERR_WARN, "wrong size (%d) of chunk '%s' in tape file '%s'",
8003 chunk_size, chunk_name, filename);
8004 ReadUnusedBytesFromFile(file, chunk_size);
8008 // call function to load this tape chunk
8009 int chunk_size_expected =
8010 (chunk_info[i].loader)(file, chunk_size, &tape);
8012 // the size of some chunks cannot be checked before reading other
8013 // chunks first (like "HEAD" and "BODY") that contain some header
8014 // information, so check them here
8015 if (chunk_size_expected != chunk_size)
8017 Error(ERR_WARN, "wrong size (%d) of chunk '%s' in tape file '%s'",
8018 chunk_size, chunk_name, filename);
8026 tape.length_frames = GetTapeLengthFrames();
8027 tape.length_seconds = GetTapeLengthSeconds();
8030 printf("::: tape file version: %d\n", tape.file_version);
8031 printf("::: tape game version: %d\n", tape.game_version);
8032 printf("::: tape engine version: %d\n", tape.engine_version);
8036 void LoadTape(int nr)
8038 char *filename = getTapeFilename(nr);
8040 LoadTapeFromFilename(filename);
8043 void LoadSolutionTape(int nr)
8045 char *filename = getSolutionTapeFilename(nr);
8047 LoadTapeFromFilename(filename);
8049 if (TAPE_IS_EMPTY(tape) &&
8050 level.game_engine_type == GAME_ENGINE_TYPE_SP &&
8051 level.native_sp_level->demo.is_available)
8052 CopyNativeTape_SP_to_RND(&level);
8055 static void SaveTape_VERS(FILE *file, struct TapeInfo *tape)
8057 putFileVersion(file, tape->file_version);
8058 putFileVersion(file, tape->game_version);
8061 static void SaveTape_HEAD(FILE *file, struct TapeInfo *tape)
8064 byte store_participating_players = 0;
8066 // set bits for participating players for compact storage
8067 for (i = 0; i < MAX_PLAYERS; i++)
8068 if (tape->player_participates[i])
8069 store_participating_players |= (1 << i);
8071 putFile32BitBE(file, tape->random_seed);
8072 putFile32BitBE(file, tape->date);
8073 putFile32BitBE(file, tape->length);
8075 putFile8Bit(file, store_participating_players);
8077 putFile8Bit(file, (tape->use_mouse ? 1 : 0));
8079 // unused bytes not at the end here for 4-byte alignment of engine_version
8080 WriteUnusedBytesToFile(file, TAPE_CHUNK_HEAD_UNUSED);
8082 putFileVersion(file, tape->engine_version);
8085 static void SaveTape_INFO(FILE *file, struct TapeInfo *tape)
8087 int level_identifier_size = strlen(tape->level_identifier) + 1;
8090 putFile16BitBE(file, level_identifier_size);
8092 for (i = 0; i < level_identifier_size; i++)
8093 putFile8Bit(file, tape->level_identifier[i]);
8095 putFile16BitBE(file, tape->level_nr);
8098 static void SaveTape_BODY(FILE *file, struct TapeInfo *tape)
8102 for (i = 0; i < tape->length; i++)
8104 if (tape->use_mouse)
8106 putFile8Bit(file, tape->pos[i].action[TAPE_ACTION_LX]);
8107 putFile8Bit(file, tape->pos[i].action[TAPE_ACTION_LY]);
8108 putFile8Bit(file, tape->pos[i].action[TAPE_ACTION_BUTTON]);
8112 for (j = 0; j < MAX_PLAYERS; j++)
8113 if (tape->player_participates[j])
8114 putFile8Bit(file, tape->pos[i].action[j]);
8117 putFile8Bit(file, tape->pos[i].delay);
8121 void SaveTape(int nr)
8123 char *filename = getTapeFilename(nr);
8125 int num_participating_players = 0;
8127 int info_chunk_size;
8128 int body_chunk_size;
8131 InitTapeDirectory(leveldir_current->subdir);
8133 if (!(file = fopen(filename, MODE_WRITE)))
8135 Error(ERR_WARN, "cannot save level recording file '%s'", filename);
8139 tape.file_version = FILE_VERSION_ACTUAL;
8140 tape.game_version = GAME_VERSION_ACTUAL;
8142 // count number of participating players
8143 for (i = 0; i < MAX_PLAYERS; i++)
8144 if (tape.player_participates[i])
8145 num_participating_players++;
8147 tape_pos_size = (tape.use_mouse ? 3 : num_participating_players) + 1;
8149 info_chunk_size = 2 + (strlen(tape.level_identifier) + 1) + 2;
8150 body_chunk_size = tape_pos_size * tape.length;
8152 putFileChunkBE(file, "RND1", CHUNK_SIZE_UNDEFINED);
8153 putFileChunkBE(file, "TAPE", CHUNK_SIZE_NONE);
8155 putFileChunkBE(file, "VERS", TAPE_CHUNK_VERS_SIZE);
8156 SaveTape_VERS(file, &tape);
8158 putFileChunkBE(file, "HEAD", TAPE_CHUNK_HEAD_SIZE);
8159 SaveTape_HEAD(file, &tape);
8161 putFileChunkBE(file, "INFO", info_chunk_size);
8162 SaveTape_INFO(file, &tape);
8164 putFileChunkBE(file, "BODY", body_chunk_size);
8165 SaveTape_BODY(file, &tape);
8169 SetFilePermissions(filename, PERMS_PRIVATE);
8171 tape.changed = FALSE;
8174 static boolean SaveTapeCheckedExt(int nr, char *msg_replace, char *msg_saved,
8175 unsigned int req_state_added)
8177 char *filename = getTapeFilename(nr);
8178 boolean new_tape = !fileExists(filename);
8179 boolean tape_saved = FALSE;
8181 if (new_tape || Request(msg_replace, REQ_ASK | req_state_added))
8186 Request(msg_saved, REQ_CONFIRM | req_state_added);
8194 boolean SaveTapeChecked(int nr)
8196 return SaveTapeCheckedExt(nr, "Replace old tape?", "Tape saved!", 0);
8199 boolean SaveTapeChecked_LevelSolved(int nr)
8201 return SaveTapeCheckedExt(nr, "Level solved! Replace old tape?",
8202 "Level solved! Tape saved!", REQ_STAY_OPEN);
8205 void DumpTape(struct TapeInfo *tape)
8207 int tape_frame_counter;
8210 if (tape->no_valid_file)
8212 Error(ERR_WARN, "cannot dump -- no valid tape file found");
8218 Print("Tape of Level %03d (file version %08d, game version %08d)\n",
8219 tape->level_nr, tape->file_version, tape->game_version);
8220 Print(" (effective engine version %08d)\n",
8221 tape->engine_version);
8222 Print("Level series identifier: '%s'\n", tape->level_identifier);
8225 tape_frame_counter = 0;
8227 for (i = 0; i < tape->length; i++)
8229 if (i >= MAX_TAPE_LEN)
8234 for (j = 0; j < MAX_PLAYERS; j++)
8236 if (tape->player_participates[j])
8238 int action = tape->pos[i].action[j];
8240 Print("%d:%02x ", j, action);
8241 Print("[%c%c%c%c|%c%c] - ",
8242 (action & JOY_LEFT ? '<' : ' '),
8243 (action & JOY_RIGHT ? '>' : ' '),
8244 (action & JOY_UP ? '^' : ' '),
8245 (action & JOY_DOWN ? 'v' : ' '),
8246 (action & JOY_BUTTON_1 ? '1' : ' '),
8247 (action & JOY_BUTTON_2 ? '2' : ' '));
8251 Print("(%03d) ", tape->pos[i].delay);
8252 Print("[%05d]\n", tape_frame_counter);
8254 tape_frame_counter += tape->pos[i].delay;
8261 // ============================================================================
8262 // score file functions
8263 // ============================================================================
8265 void LoadScore(int nr)
8268 char *filename = getScoreFilename(nr);
8269 char cookie[MAX_LINE_LEN];
8270 char line[MAX_LINE_LEN];
8274 // always start with reliable default values
8275 for (i = 0; i < MAX_SCORE_ENTRIES; i++)
8277 strcpy(highscore[i].Name, EMPTY_PLAYER_NAME);
8278 highscore[i].Score = 0;
8281 if (!(file = fopen(filename, MODE_READ)))
8284 // check file identifier
8285 if (fgets(cookie, MAX_LINE_LEN, file) == NULL)
8287 if (strlen(cookie) > 0 && cookie[strlen(cookie) - 1] == '\n')
8288 cookie[strlen(cookie) - 1] = '\0';
8290 if (!checkCookieString(cookie, SCORE_COOKIE))
8292 Error(ERR_WARN, "unknown format of score file '%s'", filename);
8297 for (i = 0; i < MAX_SCORE_ENTRIES; i++)
8299 if (fscanf(file, "%d", &highscore[i].Score) == EOF)
8300 Error(ERR_WARN, "fscanf() failed; %s", strerror(errno));
8301 if (fgets(line, MAX_LINE_LEN, file) == NULL)
8304 if (strlen(line) > 0 && line[strlen(line) - 1] == '\n')
8305 line[strlen(line) - 1] = '\0';
8307 for (line_ptr = line; *line_ptr; line_ptr++)
8309 if (*line_ptr != ' ' && *line_ptr != '\t' && *line_ptr != '\0')
8311 strncpy(highscore[i].Name, line_ptr, MAX_PLAYER_NAME_LEN);
8312 highscore[i].Name[MAX_PLAYER_NAME_LEN] = '\0';
8321 void SaveScore(int nr)
8324 int permissions = (program.global_scores ? PERMS_PUBLIC : PERMS_PRIVATE);
8325 char *filename = getScoreFilename(nr);
8328 // used instead of "leveldir_current->subdir" (for network games)
8329 InitScoreDirectory(levelset.identifier);
8331 if (!(file = fopen(filename, MODE_WRITE)))
8333 Error(ERR_WARN, "cannot save score for level %d", nr);
8337 fprintf(file, "%s\n\n", SCORE_COOKIE);
8339 for (i = 0; i < MAX_SCORE_ENTRIES; i++)
8340 fprintf(file, "%d %s\n", highscore[i].Score, highscore[i].Name);
8344 SetFilePermissions(filename, permissions);
8348 // ============================================================================
8349 // setup file functions
8350 // ============================================================================
8352 #define TOKEN_STR_PLAYER_PREFIX "player_"
8355 static struct SetupInfo si;
8356 static struct SetupAutoSetupInfo sasi;
8357 static struct SetupEditorInfo sei;
8358 static struct SetupEditorCascadeInfo seci;
8359 static struct SetupShortcutInfo ssi;
8360 static struct SetupInputInfo sii;
8361 static struct SetupSystemInfo syi;
8362 static struct SetupInternalInfo sxi;
8363 static struct SetupDebugInfo sdi;
8364 static struct OptionInfo soi;
8366 static struct TokenInfo global_setup_tokens[] =
8368 { TYPE_STRING, &si.player_name, "player_name" },
8369 { TYPE_SWITCH, &si.sound, "sound" },
8370 { TYPE_SWITCH, &si.sound_loops, "repeating_sound_loops" },
8371 { TYPE_SWITCH, &si.sound_music, "background_music" },
8372 { TYPE_SWITCH, &si.sound_simple, "simple_sound_effects" },
8373 { TYPE_SWITCH, &si.toons, "toons" },
8374 { TYPE_SWITCH, &si.scroll_delay, "scroll_delay" },
8375 { TYPE_INTEGER,&si.scroll_delay_value, "scroll_delay_value" },
8376 { TYPE_STRING, &si.engine_snapshot_mode, "engine_snapshot_mode" },
8377 { TYPE_INTEGER,&si.engine_snapshot_memory, "engine_snapshot_memory" },
8378 { TYPE_SWITCH, &si.fade_screens, "fade_screens" },
8379 { TYPE_SWITCH, &si.autorecord, "automatic_tape_recording"},
8380 { TYPE_SWITCH, &si.show_titlescreen, "show_titlescreen" },
8381 { TYPE_SWITCH, &si.quick_doors, "quick_doors" },
8382 { TYPE_SWITCH, &si.team_mode, "team_mode" },
8383 { TYPE_SWITCH, &si.handicap, "handicap" },
8384 { TYPE_SWITCH, &si.skip_levels, "skip_levels" },
8385 { TYPE_SWITCH, &si.increment_levels, "increment_levels" },
8386 { TYPE_SWITCH, &si.auto_play_next_level, "auto_play_next_level" },
8387 { TYPE_SWITCH, &si.skip_scores_after_game, "skip_scores_after_game" },
8388 { TYPE_SWITCH, &si.time_limit, "time_limit" },
8389 { TYPE_SWITCH, &si.fullscreen, "fullscreen" },
8390 { TYPE_INTEGER,&si.window_scaling_percent, "window_scaling_percent" },
8391 { TYPE_STRING, &si.window_scaling_quality, "window_scaling_quality" },
8392 { TYPE_STRING, &si.screen_rendering_mode, "screen_rendering_mode" },
8393 { TYPE_STRING, &si.vsync_mode, "vsync_mode" },
8394 { TYPE_SWITCH, &si.ask_on_escape, "ask_on_escape" },
8395 { TYPE_SWITCH, &si.ask_on_escape_editor, "ask_on_escape_editor" },
8396 { TYPE_SWITCH, &si.ask_on_game_over, "ask_on_game_over" },
8397 { TYPE_SWITCH, &si.quick_switch, "quick_player_switch" },
8398 { TYPE_SWITCH, &si.input_on_focus, "input_on_focus" },
8399 { TYPE_SWITCH, &si.prefer_aga_graphics, "prefer_aga_graphics" },
8400 { TYPE_SWITCH, &si.game_speed_extended, "game_speed_extended" },
8401 { TYPE_INTEGER,&si.game_frame_delay, "game_frame_delay" },
8402 { TYPE_SWITCH, &si.sp_show_border_elements, "sp_show_border_elements" },
8403 { TYPE_SWITCH, &si.small_game_graphics, "small_game_graphics" },
8404 { TYPE_SWITCH, &si.show_snapshot_buttons, "show_snapshot_buttons" },
8405 { TYPE_STRING, &si.graphics_set, "graphics_set" },
8406 { TYPE_STRING, &si.sounds_set, "sounds_set" },
8407 { TYPE_STRING, &si.music_set, "music_set" },
8408 { TYPE_SWITCH3,&si.override_level_graphics, "override_level_graphics" },
8409 { TYPE_SWITCH3,&si.override_level_sounds, "override_level_sounds" },
8410 { TYPE_SWITCH3,&si.override_level_music, "override_level_music" },
8411 { TYPE_INTEGER,&si.volume_simple, "volume_simple" },
8412 { TYPE_INTEGER,&si.volume_loops, "volume_loops" },
8413 { TYPE_INTEGER,&si.volume_music, "volume_music" },
8414 { TYPE_SWITCH, &si.network_mode, "network_mode" },
8415 { TYPE_PLAYER, &si.network_player_nr, "network_player" },
8416 { TYPE_STRING, &si.network_server_hostname, "network_server_hostname" },
8417 { TYPE_STRING, &si.touch.control_type, "touch.control_type" },
8418 { TYPE_INTEGER,&si.touch.move_distance, "touch.move_distance" },
8419 { TYPE_INTEGER,&si.touch.drop_distance, "touch.drop_distance" },
8420 { TYPE_INTEGER,&si.touch.transparency, "touch.transparency" },
8421 { TYPE_INTEGER,&si.touch.draw_outlined, "touch.draw_outlined" },
8422 { TYPE_INTEGER,&si.touch.draw_pressed, "touch.draw_pressed" },
8423 { TYPE_INTEGER,&si.touch.grid_xsize[0], "touch.virtual_buttons.0.xsize" },
8424 { TYPE_INTEGER,&si.touch.grid_ysize[0], "touch.virtual_buttons.0.ysize" },
8425 { TYPE_INTEGER,&si.touch.grid_xsize[1], "touch.virtual_buttons.1.xsize" },
8426 { TYPE_INTEGER,&si.touch.grid_ysize[1], "touch.virtual_buttons.1.ysize" },
8429 static struct TokenInfo auto_setup_tokens[] =
8431 { TYPE_INTEGER,&sasi.editor_zoom_tilesize, "editor.zoom_tilesize" },
8434 static struct TokenInfo editor_setup_tokens[] =
8436 { TYPE_SWITCH, &sei.el_classic, "editor.el_classic" },
8437 { TYPE_SWITCH, &sei.el_custom, "editor.el_custom" },
8438 { TYPE_SWITCH, &sei.el_user_defined, "editor.el_user_defined" },
8439 { TYPE_SWITCH, &sei.el_dynamic, "editor.el_dynamic" },
8440 { TYPE_SWITCH, &sei.el_headlines, "editor.el_headlines" },
8441 { TYPE_SWITCH, &sei.show_element_token,"editor.show_element_token" },
8444 static struct TokenInfo editor_cascade_setup_tokens[] =
8446 { TYPE_SWITCH, &seci.el_bd, "editor.cascade.el_bd" },
8447 { TYPE_SWITCH, &seci.el_em, "editor.cascade.el_em" },
8448 { TYPE_SWITCH, &seci.el_emc, "editor.cascade.el_emc" },
8449 { TYPE_SWITCH, &seci.el_rnd, "editor.cascade.el_rnd" },
8450 { TYPE_SWITCH, &seci.el_sb, "editor.cascade.el_sb" },
8451 { TYPE_SWITCH, &seci.el_sp, "editor.cascade.el_sp" },
8452 { TYPE_SWITCH, &seci.el_dc, "editor.cascade.el_dc" },
8453 { TYPE_SWITCH, &seci.el_dx, "editor.cascade.el_dx" },
8454 { TYPE_SWITCH, &seci.el_mm, "editor.cascade.el_mm" },
8455 { TYPE_SWITCH, &seci.el_df, "editor.cascade.el_df" },
8456 { TYPE_SWITCH, &seci.el_chars, "editor.cascade.el_chars" },
8457 { TYPE_SWITCH, &seci.el_steel_chars, "editor.cascade.el_steel_chars" },
8458 { TYPE_SWITCH, &seci.el_ce, "editor.cascade.el_ce" },
8459 { TYPE_SWITCH, &seci.el_ge, "editor.cascade.el_ge" },
8460 { TYPE_SWITCH, &seci.el_ref, "editor.cascade.el_ref" },
8461 { TYPE_SWITCH, &seci.el_user, "editor.cascade.el_user" },
8462 { TYPE_SWITCH, &seci.el_dynamic, "editor.cascade.el_dynamic" },
8465 static struct TokenInfo shortcut_setup_tokens[] =
8467 { TYPE_KEY_X11, &ssi.save_game, "shortcut.save_game" },
8468 { TYPE_KEY_X11, &ssi.load_game, "shortcut.load_game" },
8469 { TYPE_KEY_X11, &ssi.toggle_pause, "shortcut.toggle_pause" },
8470 { TYPE_KEY_X11, &ssi.focus_player[0], "shortcut.focus_player_1" },
8471 { TYPE_KEY_X11, &ssi.focus_player[1], "shortcut.focus_player_2" },
8472 { TYPE_KEY_X11, &ssi.focus_player[2], "shortcut.focus_player_3" },
8473 { TYPE_KEY_X11, &ssi.focus_player[3], "shortcut.focus_player_4" },
8474 { TYPE_KEY_X11, &ssi.focus_player_all,"shortcut.focus_player_all" },
8475 { TYPE_KEY_X11, &ssi.tape_eject, "shortcut.tape_eject" },
8476 { TYPE_KEY_X11, &ssi.tape_extra, "shortcut.tape_extra" },
8477 { TYPE_KEY_X11, &ssi.tape_stop, "shortcut.tape_stop" },
8478 { TYPE_KEY_X11, &ssi.tape_pause, "shortcut.tape_pause" },
8479 { TYPE_KEY_X11, &ssi.tape_record, "shortcut.tape_record" },
8480 { TYPE_KEY_X11, &ssi.tape_play, "shortcut.tape_play" },
8481 { TYPE_KEY_X11, &ssi.sound_simple, "shortcut.sound_simple" },
8482 { TYPE_KEY_X11, &ssi.sound_loops, "shortcut.sound_loops" },
8483 { TYPE_KEY_X11, &ssi.sound_music, "shortcut.sound_music" },
8484 { TYPE_KEY_X11, &ssi.snap_left, "shortcut.snap_left" },
8485 { TYPE_KEY_X11, &ssi.snap_right, "shortcut.snap_right" },
8486 { TYPE_KEY_X11, &ssi.snap_up, "shortcut.snap_up" },
8487 { TYPE_KEY_X11, &ssi.snap_down, "shortcut.snap_down" },
8490 static struct TokenInfo player_setup_tokens[] =
8492 { TYPE_BOOLEAN, &sii.use_joystick, ".use_joystick" },
8493 { TYPE_STRING, &sii.joy.device_name, ".joy.device_name" },
8494 { TYPE_INTEGER, &sii.joy.xleft, ".joy.xleft" },
8495 { TYPE_INTEGER, &sii.joy.xmiddle, ".joy.xmiddle" },
8496 { TYPE_INTEGER, &sii.joy.xright, ".joy.xright" },
8497 { TYPE_INTEGER, &sii.joy.yupper, ".joy.yupper" },
8498 { TYPE_INTEGER, &sii.joy.ymiddle, ".joy.ymiddle" },
8499 { TYPE_INTEGER, &sii.joy.ylower, ".joy.ylower" },
8500 { TYPE_INTEGER, &sii.joy.snap, ".joy.snap_field" },
8501 { TYPE_INTEGER, &sii.joy.drop, ".joy.place_bomb" },
8502 { TYPE_KEY_X11, &sii.key.left, ".key.move_left" },
8503 { TYPE_KEY_X11, &sii.key.right, ".key.move_right" },
8504 { TYPE_KEY_X11, &sii.key.up, ".key.move_up" },
8505 { TYPE_KEY_X11, &sii.key.down, ".key.move_down" },
8506 { TYPE_KEY_X11, &sii.key.snap, ".key.snap_field" },
8507 { TYPE_KEY_X11, &sii.key.drop, ".key.place_bomb" },
8510 static struct TokenInfo system_setup_tokens[] =
8512 { TYPE_STRING, &syi.sdl_videodriver, "system.sdl_videodriver" },
8513 { TYPE_STRING, &syi.sdl_audiodriver, "system.sdl_audiodriver" },
8514 { TYPE_INTEGER, &syi.audio_fragment_size,"system.audio_fragment_size" },
8517 static struct TokenInfo internal_setup_tokens[] =
8519 { TYPE_STRING, &sxi.program_title, "program_title" },
8520 { TYPE_STRING, &sxi.program_version, "program_version" },
8521 { TYPE_STRING, &sxi.program_author, "program_author" },
8522 { TYPE_STRING, &sxi.program_email, "program_email" },
8523 { TYPE_STRING, &sxi.program_website, "program_website" },
8524 { TYPE_STRING, &sxi.program_copyright, "program_copyright" },
8525 { TYPE_STRING, &sxi.program_company, "program_company" },
8526 { TYPE_STRING, &sxi.program_icon_file, "program_icon_file" },
8527 { TYPE_STRING, &sxi.default_graphics_set, "default_graphics_set" },
8528 { TYPE_STRING, &sxi.default_sounds_set, "default_sounds_set" },
8529 { TYPE_STRING, &sxi.default_music_set, "default_music_set" },
8530 { TYPE_STRING, &sxi.fallback_graphics_file, "fallback_graphics_file"},
8531 { TYPE_STRING, &sxi.fallback_sounds_file, "fallback_sounds_file" },
8532 { TYPE_STRING, &sxi.fallback_music_file, "fallback_music_file" },
8533 { TYPE_STRING, &sxi.default_level_series, "default_level_series" },
8534 { TYPE_BOOLEAN,&sxi.choose_from_top_leveldir, "choose_from_top_leveldir" },
8535 { TYPE_BOOLEAN,&sxi.show_scaling_in_title, "show_scaling_in_title" },
8536 { TYPE_INTEGER,&sxi.default_window_width, "default_window_width" },
8537 { TYPE_INTEGER,&sxi.default_window_height, "default_window_height" },
8540 static struct TokenInfo debug_setup_tokens[] =
8542 { TYPE_INTEGER, &sdi.frame_delay[0], "debug.frame_delay_0" },
8543 { TYPE_INTEGER, &sdi.frame_delay[1], "debug.frame_delay_1" },
8544 { TYPE_INTEGER, &sdi.frame_delay[2], "debug.frame_delay_2" },
8545 { TYPE_INTEGER, &sdi.frame_delay[3], "debug.frame_delay_3" },
8546 { TYPE_INTEGER, &sdi.frame_delay[4], "debug.frame_delay_4" },
8547 { TYPE_INTEGER, &sdi.frame_delay[5], "debug.frame_delay_5" },
8548 { TYPE_INTEGER, &sdi.frame_delay[6], "debug.frame_delay_6" },
8549 { TYPE_INTEGER, &sdi.frame_delay[7], "debug.frame_delay_7" },
8550 { TYPE_INTEGER, &sdi.frame_delay[8], "debug.frame_delay_8" },
8551 { TYPE_INTEGER, &sdi.frame_delay[9], "debug.frame_delay_9" },
8552 { TYPE_KEY_X11, &sdi.frame_delay_key[0], "debug.key.frame_delay_0" },
8553 { TYPE_KEY_X11, &sdi.frame_delay_key[1], "debug.key.frame_delay_1" },
8554 { TYPE_KEY_X11, &sdi.frame_delay_key[2], "debug.key.frame_delay_2" },
8555 { TYPE_KEY_X11, &sdi.frame_delay_key[3], "debug.key.frame_delay_3" },
8556 { TYPE_KEY_X11, &sdi.frame_delay_key[4], "debug.key.frame_delay_4" },
8557 { TYPE_KEY_X11, &sdi.frame_delay_key[5], "debug.key.frame_delay_5" },
8558 { TYPE_KEY_X11, &sdi.frame_delay_key[6], "debug.key.frame_delay_6" },
8559 { TYPE_KEY_X11, &sdi.frame_delay_key[7], "debug.key.frame_delay_7" },
8560 { TYPE_KEY_X11, &sdi.frame_delay_key[8], "debug.key.frame_delay_8" },
8561 { TYPE_KEY_X11, &sdi.frame_delay_key[9], "debug.key.frame_delay_9" },
8562 { TYPE_BOOLEAN, &sdi.frame_delay_use_mod_key,"debug.frame_delay.use_mod_key"},
8563 { TYPE_BOOLEAN, &sdi.frame_delay_game_only, "debug.frame_delay.game_only" },
8564 { TYPE_BOOLEAN, &sdi.show_frames_per_second, "debug.show_frames_per_second" },
8567 static struct TokenInfo options_setup_tokens[] =
8569 { TYPE_BOOLEAN, &soi.verbose, "options.verbose" },
8572 static char *get_corrected_login_name(char *login_name)
8574 // needed because player name must be a fixed length string
8575 char *login_name_new = checked_malloc(MAX_PLAYER_NAME_LEN + 1);
8577 strncpy(login_name_new, login_name, MAX_PLAYER_NAME_LEN);
8578 login_name_new[MAX_PLAYER_NAME_LEN] = '\0';
8580 if (strlen(login_name) > MAX_PLAYER_NAME_LEN) // name has been cut
8581 if (strchr(login_name_new, ' '))
8582 *strchr(login_name_new, ' ') = '\0';
8584 return login_name_new;
8587 static void setSetupInfoToDefaults(struct SetupInfo *si)
8591 si->player_name = get_corrected_login_name(getLoginName());
8594 si->sound_loops = TRUE;
8595 si->sound_music = TRUE;
8596 si->sound_simple = TRUE;
8598 si->scroll_delay = TRUE;
8599 si->scroll_delay_value = STD_SCROLL_DELAY;
8600 si->engine_snapshot_mode = getStringCopy(STR_SNAPSHOT_MODE_DEFAULT);
8601 si->engine_snapshot_memory = SNAPSHOT_MEMORY_DEFAULT;
8602 si->fade_screens = TRUE;
8603 si->autorecord = TRUE;
8604 si->show_titlescreen = TRUE;
8605 si->quick_doors = FALSE;
8606 si->team_mode = FALSE;
8607 si->handicap = TRUE;
8608 si->skip_levels = TRUE;
8609 si->increment_levels = TRUE;
8610 si->auto_play_next_level = TRUE;
8611 si->skip_scores_after_game = FALSE;
8612 si->time_limit = TRUE;
8613 si->fullscreen = FALSE;
8614 si->window_scaling_percent = STD_WINDOW_SCALING_PERCENT;
8615 si->window_scaling_quality = getStringCopy(SCALING_QUALITY_DEFAULT);
8616 si->screen_rendering_mode = getStringCopy(STR_SPECIAL_RENDERING_DEFAULT);
8617 si->vsync_mode = getStringCopy(STR_VSYNC_MODE_DEFAULT);
8618 si->ask_on_escape = TRUE;
8619 si->ask_on_escape_editor = TRUE;
8620 si->ask_on_game_over = TRUE;
8621 si->quick_switch = FALSE;
8622 si->input_on_focus = FALSE;
8623 si->prefer_aga_graphics = TRUE;
8624 si->game_speed_extended = FALSE;
8625 si->game_frame_delay = GAME_FRAME_DELAY;
8626 si->sp_show_border_elements = FALSE;
8627 si->small_game_graphics = FALSE;
8628 si->show_snapshot_buttons = FALSE;
8630 si->graphics_set = getStringCopy(GFX_CLASSIC_SUBDIR);
8631 si->sounds_set = getStringCopy(SND_CLASSIC_SUBDIR);
8632 si->music_set = getStringCopy(MUS_CLASSIC_SUBDIR);
8634 si->override_level_graphics = FALSE;
8635 si->override_level_sounds = FALSE;
8636 si->override_level_music = FALSE;
8638 si->volume_simple = 100; // percent
8639 si->volume_loops = 100; // percent
8640 si->volume_music = 100; // percent
8642 si->network_mode = FALSE;
8643 si->network_player_nr = 0; // first player
8644 si->network_server_hostname = getStringCopy(STR_NETWORK_AUTO_DETECT);
8646 si->touch.control_type = getStringCopy(TOUCH_CONTROL_DEFAULT);
8647 si->touch.move_distance = TOUCH_MOVE_DISTANCE_DEFAULT; // percent
8648 si->touch.drop_distance = TOUCH_DROP_DISTANCE_DEFAULT; // percent
8649 si->touch.transparency = TOUCH_TRANSPARENCY_DEFAULT; // percent
8650 si->touch.draw_outlined = TRUE;
8651 si->touch.draw_pressed = TRUE;
8653 for (i = 0; i < 2; i++)
8655 char *default_grid_button[6][2] =
8661 { "111222", " vv " },
8662 { "111222", " vv " }
8664 int grid_xsize = DEFAULT_GRID_XSIZE(i);
8665 int grid_ysize = DEFAULT_GRID_YSIZE(i);
8666 int min_xsize = MIN(6, grid_xsize);
8667 int min_ysize = MIN(6, grid_ysize);
8668 int startx = grid_xsize - min_xsize;
8669 int starty = grid_ysize - min_ysize;
8672 // virtual buttons grid can only be set to defaults if video is initialized
8673 // (this will be repeated if virtual buttons are not loaded from setup file)
8674 if (video.initialized)
8676 si->touch.grid_xsize[i] = grid_xsize;
8677 si->touch.grid_ysize[i] = grid_ysize;
8681 si->touch.grid_xsize[i] = -1;
8682 si->touch.grid_ysize[i] = -1;
8685 for (x = 0; x < MAX_GRID_XSIZE; x++)
8686 for (y = 0; y < MAX_GRID_YSIZE; y++)
8687 si->touch.grid_button[i][x][y] = CHAR_GRID_BUTTON_NONE;
8689 for (x = 0; x < min_xsize; x++)
8690 for (y = 0; y < min_ysize; y++)
8691 si->touch.grid_button[i][x][starty + y] =
8692 default_grid_button[y][0][x];
8694 for (x = 0; x < min_xsize; x++)
8695 for (y = 0; y < min_ysize; y++)
8696 si->touch.grid_button[i][startx + x][starty + y] =
8697 default_grid_button[y][1][x];
8700 si->touch.grid_initialized = video.initialized;
8702 si->editor.el_boulderdash = TRUE;
8703 si->editor.el_emerald_mine = TRUE;
8704 si->editor.el_emerald_mine_club = TRUE;
8705 si->editor.el_more = TRUE;
8706 si->editor.el_sokoban = TRUE;
8707 si->editor.el_supaplex = TRUE;
8708 si->editor.el_diamond_caves = TRUE;
8709 si->editor.el_dx_boulderdash = TRUE;
8711 si->editor.el_mirror_magic = TRUE;
8712 si->editor.el_deflektor = TRUE;
8714 si->editor.el_chars = TRUE;
8715 si->editor.el_steel_chars = TRUE;
8717 si->editor.el_classic = TRUE;
8718 si->editor.el_custom = TRUE;
8720 si->editor.el_user_defined = FALSE;
8721 si->editor.el_dynamic = TRUE;
8723 si->editor.el_headlines = TRUE;
8725 si->editor.show_element_token = FALSE;
8727 si->editor.use_template_for_new_levels = TRUE;
8729 si->shortcut.save_game = DEFAULT_KEY_SAVE_GAME;
8730 si->shortcut.load_game = DEFAULT_KEY_LOAD_GAME;
8731 si->shortcut.toggle_pause = DEFAULT_KEY_TOGGLE_PAUSE;
8733 si->shortcut.focus_player[0] = DEFAULT_KEY_FOCUS_PLAYER_1;
8734 si->shortcut.focus_player[1] = DEFAULT_KEY_FOCUS_PLAYER_2;
8735 si->shortcut.focus_player[2] = DEFAULT_KEY_FOCUS_PLAYER_3;
8736 si->shortcut.focus_player[3] = DEFAULT_KEY_FOCUS_PLAYER_4;
8737 si->shortcut.focus_player_all = DEFAULT_KEY_FOCUS_PLAYER_ALL;
8739 si->shortcut.tape_eject = DEFAULT_KEY_TAPE_EJECT;
8740 si->shortcut.tape_extra = DEFAULT_KEY_TAPE_EXTRA;
8741 si->shortcut.tape_stop = DEFAULT_KEY_TAPE_STOP;
8742 si->shortcut.tape_pause = DEFAULT_KEY_TAPE_PAUSE;
8743 si->shortcut.tape_record = DEFAULT_KEY_TAPE_RECORD;
8744 si->shortcut.tape_play = DEFAULT_KEY_TAPE_PLAY;
8746 si->shortcut.sound_simple = DEFAULT_KEY_SOUND_SIMPLE;
8747 si->shortcut.sound_loops = DEFAULT_KEY_SOUND_LOOPS;
8748 si->shortcut.sound_music = DEFAULT_KEY_SOUND_MUSIC;
8750 si->shortcut.snap_left = DEFAULT_KEY_SNAP_LEFT;
8751 si->shortcut.snap_right = DEFAULT_KEY_SNAP_RIGHT;
8752 si->shortcut.snap_up = DEFAULT_KEY_SNAP_UP;
8753 si->shortcut.snap_down = DEFAULT_KEY_SNAP_DOWN;
8755 for (i = 0; i < MAX_PLAYERS; i++)
8757 si->input[i].use_joystick = FALSE;
8758 si->input[i].joy.device_name=getStringCopy(getDeviceNameFromJoystickNr(i));
8759 si->input[i].joy.xleft = JOYSTICK_XLEFT;
8760 si->input[i].joy.xmiddle = JOYSTICK_XMIDDLE;
8761 si->input[i].joy.xright = JOYSTICK_XRIGHT;
8762 si->input[i].joy.yupper = JOYSTICK_YUPPER;
8763 si->input[i].joy.ymiddle = JOYSTICK_YMIDDLE;
8764 si->input[i].joy.ylower = JOYSTICK_YLOWER;
8765 si->input[i].joy.snap = (i == 0 ? JOY_BUTTON_1 : 0);
8766 si->input[i].joy.drop = (i == 0 ? JOY_BUTTON_2 : 0);
8767 si->input[i].key.left = (i == 0 ? DEFAULT_KEY_LEFT : KSYM_UNDEFINED);
8768 si->input[i].key.right = (i == 0 ? DEFAULT_KEY_RIGHT : KSYM_UNDEFINED);
8769 si->input[i].key.up = (i == 0 ? DEFAULT_KEY_UP : KSYM_UNDEFINED);
8770 si->input[i].key.down = (i == 0 ? DEFAULT_KEY_DOWN : KSYM_UNDEFINED);
8771 si->input[i].key.snap = (i == 0 ? DEFAULT_KEY_SNAP : KSYM_UNDEFINED);
8772 si->input[i].key.drop = (i == 0 ? DEFAULT_KEY_DROP : KSYM_UNDEFINED);
8775 si->system.sdl_videodriver = getStringCopy(ARG_DEFAULT);
8776 si->system.sdl_audiodriver = getStringCopy(ARG_DEFAULT);
8777 si->system.audio_fragment_size = DEFAULT_AUDIO_FRAGMENT_SIZE;
8779 si->internal.program_title = getStringCopy(PROGRAM_TITLE_STRING);
8780 si->internal.program_version = getStringCopy(getProgramRealVersionString());
8781 si->internal.program_author = getStringCopy(PROGRAM_AUTHOR_STRING);
8782 si->internal.program_email = getStringCopy(PROGRAM_EMAIL_STRING);
8783 si->internal.program_website = getStringCopy(PROGRAM_WEBSITE_STRING);
8784 si->internal.program_copyright = getStringCopy(PROGRAM_COPYRIGHT_STRING);
8785 si->internal.program_company = getStringCopy(PROGRAM_COMPANY_STRING);
8787 si->internal.program_icon_file = getStringCopy(PROGRAM_ICON_FILENAME);
8789 si->internal.default_graphics_set = getStringCopy(GFX_CLASSIC_SUBDIR);
8790 si->internal.default_sounds_set = getStringCopy(SND_CLASSIC_SUBDIR);
8791 si->internal.default_music_set = getStringCopy(MUS_CLASSIC_SUBDIR);
8793 si->internal.fallback_graphics_file = getStringCopy(UNDEFINED_FILENAME);
8794 si->internal.fallback_sounds_file = getStringCopy(UNDEFINED_FILENAME);
8795 si->internal.fallback_music_file = getStringCopy(UNDEFINED_FILENAME);
8797 si->internal.default_level_series = getStringCopy(UNDEFINED_LEVELSET);
8798 si->internal.choose_from_top_leveldir = FALSE;
8799 si->internal.show_scaling_in_title = TRUE;
8801 si->internal.default_window_width = WIN_XSIZE_DEFAULT;
8802 si->internal.default_window_height = WIN_YSIZE_DEFAULT;
8804 si->debug.frame_delay[0] = DEFAULT_FRAME_DELAY_0;
8805 si->debug.frame_delay[1] = DEFAULT_FRAME_DELAY_1;
8806 si->debug.frame_delay[2] = DEFAULT_FRAME_DELAY_2;
8807 si->debug.frame_delay[3] = DEFAULT_FRAME_DELAY_3;
8808 si->debug.frame_delay[4] = DEFAULT_FRAME_DELAY_4;
8809 si->debug.frame_delay[5] = DEFAULT_FRAME_DELAY_5;
8810 si->debug.frame_delay[6] = DEFAULT_FRAME_DELAY_6;
8811 si->debug.frame_delay[7] = DEFAULT_FRAME_DELAY_7;
8812 si->debug.frame_delay[8] = DEFAULT_FRAME_DELAY_8;
8813 si->debug.frame_delay[9] = DEFAULT_FRAME_DELAY_9;
8815 si->debug.frame_delay_key[0] = DEFAULT_KEY_FRAME_DELAY_0;
8816 si->debug.frame_delay_key[1] = DEFAULT_KEY_FRAME_DELAY_1;
8817 si->debug.frame_delay_key[2] = DEFAULT_KEY_FRAME_DELAY_2;
8818 si->debug.frame_delay_key[3] = DEFAULT_KEY_FRAME_DELAY_3;
8819 si->debug.frame_delay_key[4] = DEFAULT_KEY_FRAME_DELAY_4;
8820 si->debug.frame_delay_key[5] = DEFAULT_KEY_FRAME_DELAY_5;
8821 si->debug.frame_delay_key[6] = DEFAULT_KEY_FRAME_DELAY_6;
8822 si->debug.frame_delay_key[7] = DEFAULT_KEY_FRAME_DELAY_7;
8823 si->debug.frame_delay_key[8] = DEFAULT_KEY_FRAME_DELAY_8;
8824 si->debug.frame_delay_key[9] = DEFAULT_KEY_FRAME_DELAY_9;
8826 si->debug.frame_delay_use_mod_key = DEFAULT_FRAME_DELAY_USE_MOD_KEY;
8827 si->debug.frame_delay_game_only = DEFAULT_FRAME_DELAY_GAME_ONLY;
8829 si->debug.show_frames_per_second = FALSE;
8831 si->options.verbose = FALSE;
8833 #if defined(PLATFORM_ANDROID)
8834 si->fullscreen = TRUE;
8838 static void setSetupInfoToDefaults_AutoSetup(struct SetupInfo *si)
8840 si->auto_setup.editor_zoom_tilesize = MINI_TILESIZE;
8843 static void setSetupInfoToDefaults_EditorCascade(struct SetupInfo *si)
8845 si->editor_cascade.el_bd = TRUE;
8846 si->editor_cascade.el_em = TRUE;
8847 si->editor_cascade.el_emc = TRUE;
8848 si->editor_cascade.el_rnd = TRUE;
8849 si->editor_cascade.el_sb = TRUE;
8850 si->editor_cascade.el_sp = TRUE;
8851 si->editor_cascade.el_dc = TRUE;
8852 si->editor_cascade.el_dx = TRUE;
8854 si->editor_cascade.el_mm = TRUE;
8855 si->editor_cascade.el_df = TRUE;
8857 si->editor_cascade.el_chars = FALSE;
8858 si->editor_cascade.el_steel_chars = FALSE;
8859 si->editor_cascade.el_ce = FALSE;
8860 si->editor_cascade.el_ge = FALSE;
8861 si->editor_cascade.el_ref = FALSE;
8862 si->editor_cascade.el_user = FALSE;
8863 si->editor_cascade.el_dynamic = FALSE;
8866 #define MAX_HIDE_SETUP_TOKEN_SIZE 20
8868 static char *getHideSetupToken(void *setup_value)
8870 static char hide_setup_token[MAX_HIDE_SETUP_TOKEN_SIZE];
8872 if (setup_value != NULL)
8873 snprintf(hide_setup_token, MAX_HIDE_SETUP_TOKEN_SIZE, "%p", setup_value);
8875 return hide_setup_token;
8878 void setHideSetupEntry(void *setup_value)
8880 char *hide_setup_token = getHideSetupToken(setup_value);
8882 if (setup_value != NULL)
8883 setHashEntry(hide_setup_hash, hide_setup_token, "");
8886 static void setHideSetupEntryRaw(char *token_text, void *setup_value_raw)
8888 // !!! DIRTY WORKAROUND; TO BE FIXED AFTER THE MM ENGINE RELEASE !!!
8889 void *setup_value = setup_value_raw - (void *)&si + (void *)&setup;
8891 setHideSetupEntry(setup_value);
8894 boolean hideSetupEntry(void *setup_value)
8896 char *hide_setup_token = getHideSetupToken(setup_value);
8898 return (setup_value != NULL &&
8899 getHashEntry(hide_setup_hash, hide_setup_token) != NULL);
8902 static void setSetupInfoFromTokenText(SetupFileHash *setup_file_hash,
8903 struct TokenInfo *token_info,
8904 int token_nr, char *token_text)
8906 char *token_hide_text = getStringCat2(token_text, ".hide");
8907 char *token_hide_value = getHashEntry(setup_file_hash, token_hide_text);
8909 // set the value of this setup option in the setup option structure
8910 setSetupInfo(token_info, token_nr, getHashEntry(setup_file_hash, token_text));
8912 // check if this setup option should be hidden in the setup menu
8913 if (token_hide_value != NULL && get_boolean_from_string(token_hide_value))
8914 setHideSetupEntryRaw(token_text, token_info[token_nr].value);
8917 static void setSetupInfoFromTokenInfo(SetupFileHash *setup_file_hash,
8918 struct TokenInfo *token_info,
8921 setSetupInfoFromTokenText(setup_file_hash, token_info, token_nr,
8922 token_info[token_nr].text);
8925 static void decodeSetupFileHash(SetupFileHash *setup_file_hash)
8929 if (!setup_file_hash)
8932 if (hide_setup_hash == NULL)
8933 hide_setup_hash = newSetupFileHash();
8937 for (i = 0; i < ARRAY_SIZE(global_setup_tokens); i++)
8938 setSetupInfoFromTokenInfo(setup_file_hash, global_setup_tokens, i);
8941 // virtual buttons setup
8942 setup.touch.grid_initialized = TRUE;
8943 for (i = 0; i < 2; i++)
8945 int grid_xsize = setup.touch.grid_xsize[i];
8946 int grid_ysize = setup.touch.grid_ysize[i];
8949 // if virtual buttons are not loaded from setup file, repeat initializing
8950 // virtual buttons grid with default values later when video is initialized
8951 if (grid_xsize == -1 ||
8954 setup.touch.grid_initialized = FALSE;
8959 for (y = 0; y < grid_ysize; y++)
8961 char token_string[MAX_LINE_LEN];
8963 sprintf(token_string, "touch.virtual_buttons.%d.%02d", i, y);
8965 char *value_string = getHashEntry(setup_file_hash, token_string);
8967 if (value_string == NULL)
8970 for (x = 0; x < grid_xsize; x++)
8972 char c = value_string[x];
8974 setup.touch.grid_button[i][x][y] =
8975 (c == '.' ? CHAR_GRID_BUTTON_NONE : c);
8982 for (i = 0; i < ARRAY_SIZE(editor_setup_tokens); i++)
8983 setSetupInfoFromTokenInfo(setup_file_hash, editor_setup_tokens, i);
8987 ssi = setup.shortcut;
8988 for (i = 0; i < ARRAY_SIZE(shortcut_setup_tokens); i++)
8989 setSetupInfoFromTokenInfo(setup_file_hash, shortcut_setup_tokens, i);
8990 setup.shortcut = ssi;
8993 for (pnr = 0; pnr < MAX_PLAYERS; pnr++)
8997 sprintf(prefix, "%s%d", TOKEN_STR_PLAYER_PREFIX, pnr + 1);
8999 sii = setup.input[pnr];
9000 for (i = 0; i < ARRAY_SIZE(player_setup_tokens); i++)
9002 char full_token[100];
9004 sprintf(full_token, "%s%s", prefix, player_setup_tokens[i].text);
9005 setSetupInfoFromTokenText(setup_file_hash, player_setup_tokens, i,
9008 setup.input[pnr] = sii;
9013 for (i = 0; i < ARRAY_SIZE(system_setup_tokens); i++)
9014 setSetupInfoFromTokenInfo(setup_file_hash, system_setup_tokens, i);
9018 sxi = setup.internal;
9019 for (i = 0; i < ARRAY_SIZE(internal_setup_tokens); i++)
9020 setSetupInfoFromTokenInfo(setup_file_hash, internal_setup_tokens, i);
9021 setup.internal = sxi;
9025 for (i = 0; i < ARRAY_SIZE(debug_setup_tokens); i++)
9026 setSetupInfoFromTokenInfo(setup_file_hash, debug_setup_tokens, i);
9030 soi = setup.options;
9031 for (i = 0; i < ARRAY_SIZE(options_setup_tokens); i++)
9032 setSetupInfoFromTokenInfo(setup_file_hash, options_setup_tokens, i);
9033 setup.options = soi;
9035 setHideRelatedSetupEntries();
9038 static void decodeSetupFileHash_AutoSetup(SetupFileHash *setup_file_hash)
9042 if (!setup_file_hash)
9046 sasi = setup.auto_setup;
9047 for (i = 0; i < ARRAY_SIZE(auto_setup_tokens); i++)
9048 setSetupInfo(auto_setup_tokens, i,
9049 getHashEntry(setup_file_hash,
9050 auto_setup_tokens[i].text));
9051 setup.auto_setup = sasi;
9054 static void decodeSetupFileHash_EditorCascade(SetupFileHash *setup_file_hash)
9058 if (!setup_file_hash)
9061 // editor cascade setup
9062 seci = setup.editor_cascade;
9063 for (i = 0; i < ARRAY_SIZE(editor_cascade_setup_tokens); i++)
9064 setSetupInfo(editor_cascade_setup_tokens, i,
9065 getHashEntry(setup_file_hash,
9066 editor_cascade_setup_tokens[i].text));
9067 setup.editor_cascade = seci;
9070 void LoadSetupFromFilename(char *filename)
9072 SetupFileHash *setup_file_hash = loadSetupFileHash(filename);
9074 if (setup_file_hash)
9076 decodeSetupFileHash(setup_file_hash);
9078 freeSetupFileHash(setup_file_hash);
9082 Error(ERR_DEBUG, "using default setup values");
9086 static void LoadSetup_SpecialPostProcessing(void)
9088 char *player_name_new;
9090 // needed to work around problems with fixed length strings
9091 player_name_new = get_corrected_login_name(setup.player_name);
9092 free(setup.player_name);
9093 setup.player_name = player_name_new;
9095 // "scroll_delay: on(3) / off(0)" was replaced by scroll delay value
9096 if (setup.scroll_delay == FALSE)
9098 setup.scroll_delay_value = MIN_SCROLL_DELAY;
9099 setup.scroll_delay = TRUE; // now always "on"
9102 // make sure that scroll delay value stays inside valid range
9103 setup.scroll_delay_value =
9104 MIN(MAX(MIN_SCROLL_DELAY, setup.scroll_delay_value), MAX_SCROLL_DELAY);
9107 void LoadSetup(void)
9111 // always start with reliable default values
9112 setSetupInfoToDefaults(&setup);
9114 // try to load setup values from default setup file
9115 filename = getDefaultSetupFilename();
9117 if (fileExists(filename))
9118 LoadSetupFromFilename(filename);
9120 // try to load setup values from user setup file
9121 filename = getSetupFilename();
9123 LoadSetupFromFilename(filename);
9125 LoadSetup_SpecialPostProcessing();
9128 void LoadSetup_AutoSetup(void)
9130 char *filename = getPath2(getSetupDir(), AUTOSETUP_FILENAME);
9131 SetupFileHash *setup_file_hash = NULL;
9133 // always start with reliable default values
9134 setSetupInfoToDefaults_AutoSetup(&setup);
9136 setup_file_hash = loadSetupFileHash(filename);
9138 if (setup_file_hash)
9140 decodeSetupFileHash_AutoSetup(setup_file_hash);
9142 freeSetupFileHash(setup_file_hash);
9148 void LoadSetup_EditorCascade(void)
9150 char *filename = getPath2(getSetupDir(), EDITORCASCADE_FILENAME);
9151 SetupFileHash *setup_file_hash = NULL;
9153 // always start with reliable default values
9154 setSetupInfoToDefaults_EditorCascade(&setup);
9156 setup_file_hash = loadSetupFileHash(filename);
9158 if (setup_file_hash)
9160 decodeSetupFileHash_EditorCascade(setup_file_hash);
9162 freeSetupFileHash(setup_file_hash);
9168 static void addGameControllerMappingToHash(SetupFileHash *mappings_hash,
9171 char mapping_guid[MAX_LINE_LEN];
9172 char *mapping_start, *mapping_end;
9174 // get GUID from game controller mapping line: copy complete line
9175 strncpy(mapping_guid, mapping_line, MAX_LINE_LEN - 1);
9176 mapping_guid[MAX_LINE_LEN - 1] = '\0';
9178 // get GUID from game controller mapping line: cut after GUID part
9179 mapping_start = strchr(mapping_guid, ',');
9180 if (mapping_start != NULL)
9181 *mapping_start = '\0';
9183 // cut newline from game controller mapping line
9184 mapping_end = strchr(mapping_line, '\n');
9185 if (mapping_end != NULL)
9186 *mapping_end = '\0';
9188 // add mapping entry to game controller mappings hash
9189 setHashEntry(mappings_hash, mapping_guid, mapping_line);
9192 static void LoadSetup_ReadGameControllerMappings(SetupFileHash *mappings_hash,
9197 if (!(file = fopen(filename, MODE_READ)))
9199 Error(ERR_WARN, "cannot read game controller mappings file '%s'", filename);
9206 char line[MAX_LINE_LEN];
9208 if (!fgets(line, MAX_LINE_LEN, file))
9211 addGameControllerMappingToHash(mappings_hash, line);
9217 void SaveSetup(void)
9219 char *filename = getSetupFilename();
9223 InitUserDataDirectory();
9225 if (!(file = fopen(filename, MODE_WRITE)))
9227 Error(ERR_WARN, "cannot write setup file '%s'", filename);
9231 fprintFileHeader(file, SETUP_FILENAME);
9235 for (i = 0; i < ARRAY_SIZE(global_setup_tokens); i++)
9237 // just to make things nicer :)
9238 if (global_setup_tokens[i].value == &si.sound ||
9239 global_setup_tokens[i].value == &si.graphics_set ||
9240 global_setup_tokens[i].value == &si.volume_simple ||
9241 global_setup_tokens[i].value == &si.network_mode ||
9242 global_setup_tokens[i].value == &si.touch.control_type ||
9243 global_setup_tokens[i].value == &si.touch.grid_xsize[0] ||
9244 global_setup_tokens[i].value == &si.touch.grid_xsize[1])
9245 fprintf(file, "\n");
9247 fprintf(file, "%s\n", getSetupLine(global_setup_tokens, "", i));
9250 // virtual buttons setup
9251 for (i = 0; i < 2; i++)
9253 int grid_xsize = setup.touch.grid_xsize[i];
9254 int grid_ysize = setup.touch.grid_ysize[i];
9257 fprintf(file, "\n");
9259 for (y = 0; y < grid_ysize; y++)
9261 char token_string[MAX_LINE_LEN];
9262 char value_string[MAX_LINE_LEN];
9264 sprintf(token_string, "touch.virtual_buttons.%d.%02d", i, y);
9266 for (x = 0; x < grid_xsize; x++)
9268 char c = setup.touch.grid_button[i][x][y];
9270 value_string[x] = (c == CHAR_GRID_BUTTON_NONE ? '.' : c);
9273 value_string[grid_xsize] = '\0';
9275 fprintf(file, "%s\n", getFormattedSetupEntry(token_string, value_string));
9281 fprintf(file, "\n");
9282 for (i = 0; i < ARRAY_SIZE(editor_setup_tokens); i++)
9283 fprintf(file, "%s\n", getSetupLine(editor_setup_tokens, "", i));
9286 ssi = setup.shortcut;
9287 fprintf(file, "\n");
9288 for (i = 0; i < ARRAY_SIZE(shortcut_setup_tokens); i++)
9289 fprintf(file, "%s\n", getSetupLine(shortcut_setup_tokens, "", i));
9292 for (pnr = 0; pnr < MAX_PLAYERS; pnr++)
9296 sprintf(prefix, "%s%d", TOKEN_STR_PLAYER_PREFIX, pnr + 1);
9297 fprintf(file, "\n");
9299 sii = setup.input[pnr];
9300 for (i = 0; i < ARRAY_SIZE(player_setup_tokens); i++)
9301 fprintf(file, "%s\n", getSetupLine(player_setup_tokens, prefix, i));
9306 fprintf(file, "\n");
9307 for (i = 0; i < ARRAY_SIZE(system_setup_tokens); i++)
9308 fprintf(file, "%s\n", getSetupLine(system_setup_tokens, "", i));
9311 // (internal setup values not saved to user setup file)
9315 fprintf(file, "\n");
9316 for (i = 0; i < ARRAY_SIZE(debug_setup_tokens); i++)
9317 fprintf(file, "%s\n", getSetupLine(debug_setup_tokens, "", i));
9320 soi = setup.options;
9321 fprintf(file, "\n");
9322 for (i = 0; i < ARRAY_SIZE(options_setup_tokens); i++)
9323 fprintf(file, "%s\n", getSetupLine(options_setup_tokens, "", i));
9327 SetFilePermissions(filename, PERMS_PRIVATE);
9330 void SaveSetup_AutoSetup(void)
9332 char *filename = getPath2(getSetupDir(), AUTOSETUP_FILENAME);
9336 InitUserDataDirectory();
9338 if (!(file = fopen(filename, MODE_WRITE)))
9340 Error(ERR_WARN, "cannot write auto setup file '%s'", filename);
9345 fprintFileHeader(file, AUTOSETUP_FILENAME);
9347 sasi = setup.auto_setup;
9348 for (i = 0; i < ARRAY_SIZE(auto_setup_tokens); i++)
9349 fprintf(file, "%s\n", getSetupLine(auto_setup_tokens, "", i));
9353 SetFilePermissions(filename, PERMS_PRIVATE);
9358 void SaveSetup_EditorCascade(void)
9360 char *filename = getPath2(getSetupDir(), EDITORCASCADE_FILENAME);
9364 InitUserDataDirectory();
9366 if (!(file = fopen(filename, MODE_WRITE)))
9368 Error(ERR_WARN, "cannot write editor cascade state file '%s'", filename);
9373 fprintFileHeader(file, EDITORCASCADE_FILENAME);
9375 seci = setup.editor_cascade;
9376 for (i = 0; i < ARRAY_SIZE(editor_cascade_setup_tokens); i++)
9377 fprintf(file, "%s\n", getSetupLine(editor_cascade_setup_tokens, "", i));
9381 SetFilePermissions(filename, PERMS_PRIVATE);
9386 static void SaveSetup_WriteGameControllerMappings(SetupFileHash *mappings_hash,
9391 if (!(file = fopen(filename, MODE_WRITE)))
9393 Error(ERR_WARN, "cannot write game controller mappings file '%s'",filename);
9398 BEGIN_HASH_ITERATION(mappings_hash, itr)
9400 fprintf(file, "%s\n", HASH_ITERATION_VALUE(itr));
9402 END_HASH_ITERATION(mappings_hash, itr)
9407 void SaveSetup_AddGameControllerMapping(char *mapping)
9409 char *filename = getPath2(getSetupDir(), GAMECONTROLLER_BASENAME);
9410 SetupFileHash *mappings_hash = newSetupFileHash();
9412 InitUserDataDirectory();
9414 // load existing personal game controller mappings
9415 LoadSetup_ReadGameControllerMappings(mappings_hash, filename);
9417 // add new mapping to personal game controller mappings
9418 addGameControllerMappingToHash(mappings_hash, mapping);
9420 // save updated personal game controller mappings
9421 SaveSetup_WriteGameControllerMappings(mappings_hash, filename);
9423 freeSetupFileHash(mappings_hash);
9427 void LoadCustomElementDescriptions(void)
9429 char *filename = getCustomArtworkConfigFilename(ARTWORK_TYPE_GRAPHICS);
9430 SetupFileHash *setup_file_hash;
9433 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
9435 if (element_info[i].custom_description != NULL)
9437 free(element_info[i].custom_description);
9438 element_info[i].custom_description = NULL;
9442 if ((setup_file_hash = loadSetupFileHash(filename)) == NULL)
9445 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
9447 char *token = getStringCat2(element_info[i].token_name, ".name");
9448 char *value = getHashEntry(setup_file_hash, token);
9451 element_info[i].custom_description = getStringCopy(value);
9456 freeSetupFileHash(setup_file_hash);
9459 static int getElementFromToken(char *token)
9461 char *value = getHashEntry(element_token_hash, token);
9466 Error(ERR_WARN, "unknown element token '%s'", token);
9468 return EL_UNDEFINED;
9471 static int get_token_parameter_value(char *token, char *value_raw)
9475 if (token == NULL || value_raw == NULL)
9476 return ARG_UNDEFINED_VALUE;
9478 suffix = strrchr(token, '.');
9482 if (strEqual(suffix, ".element"))
9483 return getElementFromToken(value_raw);
9485 // !!! USE CORRECT VALUE TYPE (currently works also for TYPE_BOOLEAN) !!!
9486 return get_parameter_value(value_raw, suffix, TYPE_INTEGER);
9489 void InitMenuDesignSettings_Static(void)
9493 // always start with reliable default values from static default config
9494 for (i = 0; image_config_vars[i].token != NULL; i++)
9496 char *value = getHashEntry(image_config_hash, image_config_vars[i].token);
9499 *image_config_vars[i].value =
9500 get_token_parameter_value(image_config_vars[i].token, value);
9504 static void InitMenuDesignSettings_SpecialPreProcessing(void)
9508 // the following initializes hierarchical values from static configuration
9510 // special case: initialize "ARG_DEFAULT" values in static default config
9511 // (e.g., initialize "[titlemessage].fade_mode" from "[title].fade_mode")
9512 titlescreen_initial_first_default.fade_mode =
9513 title_initial_first_default.fade_mode;
9514 titlescreen_initial_first_default.fade_delay =
9515 title_initial_first_default.fade_delay;
9516 titlescreen_initial_first_default.post_delay =
9517 title_initial_first_default.post_delay;
9518 titlescreen_initial_first_default.auto_delay =
9519 title_initial_first_default.auto_delay;
9520 titlescreen_first_default.fade_mode = title_first_default.fade_mode;
9521 titlescreen_first_default.fade_delay = title_first_default.fade_delay;
9522 titlescreen_first_default.post_delay = title_first_default.post_delay;
9523 titlescreen_first_default.auto_delay = title_first_default.auto_delay;
9524 titlemessage_initial_first_default.fade_mode =
9525 title_initial_first_default.fade_mode;
9526 titlemessage_initial_first_default.fade_delay =
9527 title_initial_first_default.fade_delay;
9528 titlemessage_initial_first_default.post_delay =
9529 title_initial_first_default.post_delay;
9530 titlemessage_initial_first_default.auto_delay =
9531 title_initial_first_default.auto_delay;
9532 titlemessage_first_default.fade_mode = title_first_default.fade_mode;
9533 titlemessage_first_default.fade_delay = title_first_default.fade_delay;
9534 titlemessage_first_default.post_delay = title_first_default.post_delay;
9535 titlemessage_first_default.auto_delay = title_first_default.auto_delay;
9537 titlescreen_initial_default.fade_mode = title_initial_default.fade_mode;
9538 titlescreen_initial_default.fade_delay = title_initial_default.fade_delay;
9539 titlescreen_initial_default.post_delay = title_initial_default.post_delay;
9540 titlescreen_initial_default.auto_delay = title_initial_default.auto_delay;
9541 titlescreen_default.fade_mode = title_default.fade_mode;
9542 titlescreen_default.fade_delay = title_default.fade_delay;
9543 titlescreen_default.post_delay = title_default.post_delay;
9544 titlescreen_default.auto_delay = title_default.auto_delay;
9545 titlemessage_initial_default.fade_mode = title_initial_default.fade_mode;
9546 titlemessage_initial_default.fade_delay = title_initial_default.fade_delay;
9547 titlemessage_initial_default.post_delay = title_initial_default.post_delay;
9548 titlemessage_initial_default.auto_delay = title_initial_default.auto_delay;
9549 titlemessage_default.fade_mode = title_default.fade_mode;
9550 titlemessage_default.fade_delay = title_default.fade_delay;
9551 titlemessage_default.post_delay = title_default.post_delay;
9552 titlemessage_default.auto_delay = title_default.auto_delay;
9554 // special case: initialize "ARG_DEFAULT" values in static default config
9555 // (e.g., init "titlemessage_1.fade_mode" from "[titlemessage].fade_mode")
9556 for (i = 0; i < MAX_NUM_TITLE_MESSAGES; i++)
9558 titlescreen_initial_first[i] = titlescreen_initial_first_default;
9559 titlescreen_first[i] = titlescreen_first_default;
9560 titlemessage_initial_first[i] = titlemessage_initial_first_default;
9561 titlemessage_first[i] = titlemessage_first_default;
9563 titlescreen_initial[i] = titlescreen_initial_default;
9564 titlescreen[i] = titlescreen_default;
9565 titlemessage_initial[i] = titlemessage_initial_default;
9566 titlemessage[i] = titlemessage_default;
9569 // special case: initialize "ARG_DEFAULT" values in static default config
9570 // (eg, init "menu.enter_screen.SCORES.xyz" from "menu.enter_screen.xyz")
9571 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
9573 if (i == GFX_SPECIAL_ARG_TITLE) // title values already initialized
9576 menu.enter_screen[i] = menu.enter_screen[GFX_SPECIAL_ARG_DEFAULT];
9577 menu.leave_screen[i] = menu.leave_screen[GFX_SPECIAL_ARG_DEFAULT];
9578 menu.next_screen[i] = menu.next_screen[GFX_SPECIAL_ARG_DEFAULT];
9581 // special case: initialize "ARG_DEFAULT" values in static default config
9582 // (eg, init "viewport.door_1.MAIN.xyz" from "viewport.door_1.xyz")
9583 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
9585 viewport.window[i] = viewport.window[GFX_SPECIAL_ARG_DEFAULT];
9586 viewport.playfield[i] = viewport.playfield[GFX_SPECIAL_ARG_DEFAULT];
9587 viewport.door_1[i] = viewport.door_1[GFX_SPECIAL_ARG_DEFAULT];
9589 if (i == GFX_SPECIAL_ARG_EDITOR) // editor values already initialized
9592 viewport.door_2[i] = viewport.door_2[GFX_SPECIAL_ARG_DEFAULT];
9596 static void InitMenuDesignSettings_SpecialPostProcessing(void)
9600 struct XY *dst, *src;
9604 { &game.button.save, &game.button.stop },
9605 { &game.button.pause2, &game.button.pause },
9606 { &game.button.load, &game.button.play },
9607 { &game.button.undo, &game.button.stop },
9608 { &game.button.redo, &game.button.play },
9614 // special case: initialize later added SETUP list size from LEVELS value
9615 if (menu.list_size[GAME_MODE_SETUP] == -1)
9616 menu.list_size[GAME_MODE_SETUP] = menu.list_size[GAME_MODE_LEVELS];
9618 // set default position for snapshot buttons to stop/pause/play buttons
9619 for (i = 0; game_buttons_xy[i].dst != NULL; i++)
9620 if ((*game_buttons_xy[i].dst).x == -1 &&
9621 (*game_buttons_xy[i].dst).y == -1)
9622 *game_buttons_xy[i].dst = *game_buttons_xy[i].src;
9624 // --------------------------------------------------------------------------
9625 // dynamic viewports (including playfield margins, borders and alignments)
9626 // --------------------------------------------------------------------------
9628 // dynamic viewports currently only supported for landscape mode
9629 int display_width = MAX(video.display_width, video.display_height);
9630 int display_height = MIN(video.display_width, video.display_height);
9632 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
9634 struct RectWithBorder *vp_window = &viewport.window[i];
9635 struct RectWithBorder *vp_playfield = &viewport.playfield[i];
9636 struct RectWithBorder *vp_door_1 = &viewport.door_1[i];
9637 struct RectWithBorder *vp_door_2 = &viewport.door_2[i];
9638 boolean dynamic_window_width = (vp_window->min_width != -1);
9639 boolean dynamic_window_height = (vp_window->min_height != -1);
9640 boolean dynamic_playfield_width = (vp_playfield->min_width != -1);
9641 boolean dynamic_playfield_height = (vp_playfield->min_height != -1);
9643 // adjust window size if min/max width/height is specified
9645 if (vp_window->min_width != -1)
9647 int window_width = display_width;
9649 // when using static window height, use aspect ratio of display
9650 if (vp_window->min_height == -1)
9651 window_width = vp_window->height * display_width / display_height;
9653 vp_window->width = MAX(vp_window->min_width, window_width);
9656 if (vp_window->min_height != -1)
9658 int window_height = display_height;
9660 // when using static window width, use aspect ratio of display
9661 if (vp_window->min_width == -1)
9662 window_height = vp_window->width * display_height / display_width;
9664 vp_window->height = MAX(vp_window->min_height, window_height);
9667 if (vp_window->max_width != -1)
9668 vp_window->width = MIN(vp_window->width, vp_window->max_width);
9670 if (vp_window->max_height != -1)
9671 vp_window->height = MIN(vp_window->height, vp_window->max_height);
9673 int playfield_width = vp_window->width;
9674 int playfield_height = vp_window->height;
9676 // adjust playfield size and position according to specified margins
9678 playfield_width -= vp_playfield->margin_left;
9679 playfield_width -= vp_playfield->margin_right;
9681 playfield_height -= vp_playfield->margin_top;
9682 playfield_height -= vp_playfield->margin_bottom;
9684 // adjust playfield size if min/max width/height is specified
9686 if (vp_playfield->min_width != -1)
9687 vp_playfield->width = MAX(vp_playfield->min_width, playfield_width);
9689 if (vp_playfield->min_height != -1)
9690 vp_playfield->height = MAX(vp_playfield->min_height, playfield_height);
9692 if (vp_playfield->max_width != -1)
9693 vp_playfield->width = MIN(vp_playfield->width, vp_playfield->max_width);
9695 if (vp_playfield->max_height != -1)
9696 vp_playfield->height = MIN(vp_playfield->height,vp_playfield->max_height);
9698 // adjust playfield position according to specified alignment
9700 if (vp_playfield->align == ALIGN_LEFT || vp_playfield->x > 0)
9701 vp_playfield->x = ALIGNED_VP_XPOS(vp_playfield);
9702 else if (vp_playfield->align == ALIGN_CENTER)
9703 vp_playfield->x = playfield_width / 2 - vp_playfield->width / 2;
9704 else if (vp_playfield->align == ALIGN_RIGHT)
9705 vp_playfield->x += playfield_width - vp_playfield->width;
9707 if (vp_playfield->valign == VALIGN_TOP || vp_playfield->y > 0)
9708 vp_playfield->y = ALIGNED_VP_YPOS(vp_playfield);
9709 else if (vp_playfield->valign == VALIGN_MIDDLE)
9710 vp_playfield->y = playfield_height / 2 - vp_playfield->height / 2;
9711 else if (vp_playfield->valign == VALIGN_BOTTOM)
9712 vp_playfield->y += playfield_height - vp_playfield->height;
9714 vp_playfield->x += vp_playfield->margin_left;
9715 vp_playfield->y += vp_playfield->margin_top;
9717 // adjust individual playfield borders if only default border is specified
9719 if (vp_playfield->border_left == -1)
9720 vp_playfield->border_left = vp_playfield->border_size;
9721 if (vp_playfield->border_right == -1)
9722 vp_playfield->border_right = vp_playfield->border_size;
9723 if (vp_playfield->border_top == -1)
9724 vp_playfield->border_top = vp_playfield->border_size;
9725 if (vp_playfield->border_bottom == -1)
9726 vp_playfield->border_bottom = vp_playfield->border_size;
9728 // set dynamic playfield borders if borders are specified as undefined
9729 // (but only if window size was dynamic and playfield size was static)
9731 if (dynamic_window_width && !dynamic_playfield_width)
9733 if (vp_playfield->border_left == -1)
9735 vp_playfield->border_left = (vp_playfield->x -
9736 vp_playfield->margin_left);
9737 vp_playfield->x -= vp_playfield->border_left;
9738 vp_playfield->width += vp_playfield->border_left;
9741 if (vp_playfield->border_right == -1)
9743 vp_playfield->border_right = (vp_window->width -
9745 vp_playfield->width -
9746 vp_playfield->margin_right);
9747 vp_playfield->width += vp_playfield->border_right;
9751 if (dynamic_window_height && !dynamic_playfield_height)
9753 if (vp_playfield->border_top == -1)
9755 vp_playfield->border_top = (vp_playfield->y -
9756 vp_playfield->margin_top);
9757 vp_playfield->y -= vp_playfield->border_top;
9758 vp_playfield->height += vp_playfield->border_top;
9761 if (vp_playfield->border_bottom == -1)
9763 vp_playfield->border_bottom = (vp_window->height -
9765 vp_playfield->height -
9766 vp_playfield->margin_bottom);
9767 vp_playfield->height += vp_playfield->border_bottom;
9771 // adjust playfield size to be a multiple of a defined alignment tile size
9773 int align_size = vp_playfield->align_size;
9774 int playfield_xtiles = vp_playfield->width / align_size;
9775 int playfield_ytiles = vp_playfield->height / align_size;
9776 int playfield_width_corrected = playfield_xtiles * align_size;
9777 int playfield_height_corrected = playfield_ytiles * align_size;
9778 boolean is_playfield_mode = (i == GFX_SPECIAL_ARG_PLAYING ||
9779 i == GFX_SPECIAL_ARG_EDITOR);
9781 if (is_playfield_mode &&
9782 dynamic_playfield_width &&
9783 vp_playfield->width != playfield_width_corrected)
9785 int playfield_xdiff = vp_playfield->width - playfield_width_corrected;
9787 vp_playfield->width = playfield_width_corrected;
9789 if (vp_playfield->align == ALIGN_LEFT)
9791 vp_playfield->border_left += playfield_xdiff;
9793 else if (vp_playfield->align == ALIGN_RIGHT)
9795 vp_playfield->border_right += playfield_xdiff;
9797 else if (vp_playfield->align == ALIGN_CENTER)
9799 int border_left_diff = playfield_xdiff / 2;
9800 int border_right_diff = playfield_xdiff - border_left_diff;
9802 vp_playfield->border_left += border_left_diff;
9803 vp_playfield->border_right += border_right_diff;
9807 if (is_playfield_mode &&
9808 dynamic_playfield_height &&
9809 vp_playfield->height != playfield_height_corrected)
9811 int playfield_ydiff = vp_playfield->height - playfield_height_corrected;
9813 vp_playfield->height = playfield_height_corrected;
9815 if (vp_playfield->valign == VALIGN_TOP)
9817 vp_playfield->border_top += playfield_ydiff;
9819 else if (vp_playfield->align == VALIGN_BOTTOM)
9821 vp_playfield->border_right += playfield_ydiff;
9823 else if (vp_playfield->align == VALIGN_MIDDLE)
9825 int border_top_diff = playfield_ydiff / 2;
9826 int border_bottom_diff = playfield_ydiff - border_top_diff;
9828 vp_playfield->border_top += border_top_diff;
9829 vp_playfield->border_bottom += border_bottom_diff;
9833 // adjust door positions according to specified alignment
9835 for (j = 0; j < 2; j++)
9837 struct RectWithBorder *vp_door = (j == 0 ? vp_door_1 : vp_door_2);
9839 if (vp_door->align == ALIGN_LEFT || vp_door->x > 0)
9840 vp_door->x = ALIGNED_VP_XPOS(vp_door);
9841 else if (vp_door->align == ALIGN_CENTER)
9842 vp_door->x = vp_window->width / 2 - vp_door->width / 2;
9843 else if (vp_door->align == ALIGN_RIGHT)
9844 vp_door->x += vp_window->width - vp_door->width;
9846 if (vp_door->valign == VALIGN_TOP || vp_door->y > 0)
9847 vp_door->y = ALIGNED_VP_YPOS(vp_door);
9848 else if (vp_door->valign == VALIGN_MIDDLE)
9849 vp_door->y = vp_window->height / 2 - vp_door->height / 2;
9850 else if (vp_door->valign == VALIGN_BOTTOM)
9851 vp_door->y += vp_window->height - vp_door->height;
9856 static void InitMenuDesignSettings_SpecialPostProcessing_AfterGraphics(void)
9860 struct XYTileSize *dst, *src;
9863 editor_buttons_xy[] =
9866 &editor.button.element_left, &editor.palette.element_left,
9867 IMG_GFX_EDITOR_BUTTON_ELEMENT_LEFT
9870 &editor.button.element_middle, &editor.palette.element_middle,
9871 IMG_GFX_EDITOR_BUTTON_ELEMENT_MIDDLE
9874 &editor.button.element_right, &editor.palette.element_right,
9875 IMG_GFX_EDITOR_BUTTON_ELEMENT_RIGHT
9882 // set default position for element buttons to element graphics
9883 for (i = 0; editor_buttons_xy[i].dst != NULL; i++)
9885 if ((*editor_buttons_xy[i].dst).x == -1 &&
9886 (*editor_buttons_xy[i].dst).y == -1)
9888 struct GraphicInfo *gd = &graphic_info[editor_buttons_xy[i].graphic];
9890 gd->width = gd->height = editor_buttons_xy[i].src->tile_size;
9892 *editor_buttons_xy[i].dst = *editor_buttons_xy[i].src;
9896 // adjust editor palette rows and columns if specified to be dynamic
9898 if (editor.palette.cols == -1)
9900 int vp_width = viewport.playfield[GFX_SPECIAL_ARG_EDITOR].width;
9901 int bt_width = graphic_info[IMG_EDITOR_PALETTE_BUTTON].width;
9902 int sc_width = graphic_info[IMG_EDITOR_PALETTE_SCROLLBAR].width;
9904 editor.palette.cols = (vp_width - sc_width) / bt_width;
9906 if (editor.palette.x == -1)
9908 int palette_width = editor.palette.cols * bt_width + sc_width;
9910 editor.palette.x = (vp_width - palette_width) / 2;
9914 if (editor.palette.rows == -1)
9916 int vp_height = viewport.playfield[GFX_SPECIAL_ARG_EDITOR].height;
9917 int bt_height = graphic_info[IMG_EDITOR_PALETTE_BUTTON].height;
9918 int tx_height = getFontHeight(FONT_TEXT_2);
9920 editor.palette.rows = (vp_height - tx_height) / bt_height;
9922 if (editor.palette.y == -1)
9924 int palette_height = editor.palette.rows * bt_height + tx_height;
9926 editor.palette.y = (vp_height - palette_height) / 2;
9931 static void LoadMenuDesignSettingsFromFilename(char *filename)
9933 static struct TitleFadingInfo tfi;
9934 static struct TitleMessageInfo tmi;
9935 static struct TokenInfo title_tokens[] =
9937 { TYPE_INTEGER, &tfi.fade_mode, ".fade_mode" },
9938 { TYPE_INTEGER, &tfi.fade_delay, ".fade_delay" },
9939 { TYPE_INTEGER, &tfi.post_delay, ".post_delay" },
9940 { TYPE_INTEGER, &tfi.auto_delay, ".auto_delay" },
9944 static struct TokenInfo titlemessage_tokens[] =
9946 { TYPE_INTEGER, &tmi.x, ".x" },
9947 { TYPE_INTEGER, &tmi.y, ".y" },
9948 { TYPE_INTEGER, &tmi.width, ".width" },
9949 { TYPE_INTEGER, &tmi.height, ".height" },
9950 { TYPE_INTEGER, &tmi.chars, ".chars" },
9951 { TYPE_INTEGER, &tmi.lines, ".lines" },
9952 { TYPE_INTEGER, &tmi.align, ".align" },
9953 { TYPE_INTEGER, &tmi.valign, ".valign" },
9954 { TYPE_INTEGER, &tmi.font, ".font" },
9955 { TYPE_BOOLEAN, &tmi.autowrap, ".autowrap" },
9956 { TYPE_BOOLEAN, &tmi.centered, ".centered" },
9957 { TYPE_BOOLEAN, &tmi.parse_comments, ".parse_comments" },
9958 { TYPE_INTEGER, &tmi.sort_priority, ".sort_priority" },
9959 { TYPE_INTEGER, &tmi.fade_mode, ".fade_mode" },
9960 { TYPE_INTEGER, &tmi.fade_delay, ".fade_delay" },
9961 { TYPE_INTEGER, &tmi.post_delay, ".post_delay" },
9962 { TYPE_INTEGER, &tmi.auto_delay, ".auto_delay" },
9968 struct TitleFadingInfo *info;
9973 // initialize first titles from "enter screen" definitions, if defined
9974 { &title_initial_first_default, "menu.enter_screen.TITLE" },
9975 { &title_first_default, "menu.enter_screen.TITLE" },
9977 // initialize title screens from "next screen" definitions, if defined
9978 { &title_initial_default, "menu.next_screen.TITLE" },
9979 { &title_default, "menu.next_screen.TITLE" },
9985 struct TitleMessageInfo *array;
9988 titlemessage_arrays[] =
9990 // initialize first titles from "enter screen" definitions, if defined
9991 { titlescreen_initial_first, "menu.enter_screen.TITLE" },
9992 { titlescreen_first, "menu.enter_screen.TITLE" },
9993 { titlemessage_initial_first, "menu.enter_screen.TITLE" },
9994 { titlemessage_first, "menu.enter_screen.TITLE" },
9996 // initialize titles from "next screen" definitions, if defined
9997 { titlescreen_initial, "menu.next_screen.TITLE" },
9998 { titlescreen, "menu.next_screen.TITLE" },
9999 { titlemessage_initial, "menu.next_screen.TITLE" },
10000 { titlemessage, "menu.next_screen.TITLE" },
10002 // overwrite titles with title definitions, if defined
10003 { titlescreen_initial_first, "[title_initial]" },
10004 { titlescreen_first, "[title]" },
10005 { titlemessage_initial_first, "[title_initial]" },
10006 { titlemessage_first, "[title]" },
10008 { titlescreen_initial, "[title_initial]" },
10009 { titlescreen, "[title]" },
10010 { titlemessage_initial, "[title_initial]" },
10011 { titlemessage, "[title]" },
10013 // overwrite titles with title screen/message definitions, if defined
10014 { titlescreen_initial_first, "[titlescreen_initial]" },
10015 { titlescreen_first, "[titlescreen]" },
10016 { titlemessage_initial_first, "[titlemessage_initial]" },
10017 { titlemessage_first, "[titlemessage]" },
10019 { titlescreen_initial, "[titlescreen_initial]" },
10020 { titlescreen, "[titlescreen]" },
10021 { titlemessage_initial, "[titlemessage_initial]" },
10022 { titlemessage, "[titlemessage]" },
10026 SetupFileHash *setup_file_hash;
10029 if ((setup_file_hash = loadSetupFileHash(filename)) == NULL)
10032 // the following initializes hierarchical values from dynamic configuration
10034 // special case: initialize with default values that may be overwritten
10035 // (e.g., init "menu.draw_xoffset.INFO" from "menu.draw_xoffset")
10036 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
10038 struct TokenIntPtrInfo menu_config[] =
10040 { "menu.draw_xoffset", &menu.draw_xoffset[i] },
10041 { "menu.draw_yoffset", &menu.draw_yoffset[i] },
10042 { "menu.list_size", &menu.list_size[i] }
10045 for (j = 0; j < ARRAY_SIZE(menu_config); j++)
10047 char *token = menu_config[j].token;
10048 char *value = getHashEntry(setup_file_hash, token);
10051 *menu_config[j].value = get_integer_from_string(value);
10055 // special case: initialize with default values that may be overwritten
10056 // (eg, init "menu.draw_xoffset.INFO[XXX]" from "menu.draw_xoffset.INFO")
10057 for (i = 0; i < NUM_SPECIAL_GFX_INFO_ARGS; i++)
10059 struct TokenIntPtrInfo menu_config[] =
10061 { "menu.draw_xoffset.INFO", &menu.draw_xoffset_info[i] },
10062 { "menu.draw_yoffset.INFO", &menu.draw_yoffset_info[i] },
10063 { "menu.list_size.INFO", &menu.list_size_info[i] }
10066 for (j = 0; j < ARRAY_SIZE(menu_config); j++)
10068 char *token = menu_config[j].token;
10069 char *value = getHashEntry(setup_file_hash, token);
10072 *menu_config[j].value = get_integer_from_string(value);
10076 // special case: initialize with default values that may be overwritten
10077 // (eg, init "menu.draw_xoffset.SETUP[XXX]" from "menu.draw_xoffset.SETUP")
10078 for (i = 0; i < NUM_SPECIAL_GFX_SETUP_ARGS; i++)
10080 struct TokenIntPtrInfo menu_config[] =
10082 { "menu.draw_xoffset.SETUP", &menu.draw_xoffset_setup[i] },
10083 { "menu.draw_yoffset.SETUP", &menu.draw_yoffset_setup[i] }
10086 for (j = 0; j < ARRAY_SIZE(menu_config); j++)
10088 char *token = menu_config[j].token;
10089 char *value = getHashEntry(setup_file_hash, token);
10092 *menu_config[j].value = get_integer_from_string(value);
10096 // special case: initialize with default values that may be overwritten
10097 // (eg, init "menu.line_spacing.INFO[XXX]" from "menu.line_spacing.INFO")
10098 for (i = 0; i < NUM_SPECIAL_GFX_INFO_ARGS; i++)
10100 struct TokenIntPtrInfo menu_config[] =
10102 { "menu.left_spacing.INFO", &menu.left_spacing_info[i] },
10103 { "menu.right_spacing.INFO", &menu.right_spacing_info[i] },
10104 { "menu.top_spacing.INFO", &menu.top_spacing_info[i] },
10105 { "menu.bottom_spacing.INFO", &menu.bottom_spacing_info[i] },
10106 { "menu.paragraph_spacing.INFO", &menu.paragraph_spacing_info[i] },
10107 { "menu.headline1_spacing.INFO", &menu.headline1_spacing_info[i] },
10108 { "menu.headline2_spacing.INFO", &menu.headline2_spacing_info[i] },
10109 { "menu.line_spacing.INFO", &menu.line_spacing_info[i] },
10110 { "menu.extra_spacing.INFO", &menu.extra_spacing_info[i] },
10113 for (j = 0; j < ARRAY_SIZE(menu_config); j++)
10115 char *token = menu_config[j].token;
10116 char *value = getHashEntry(setup_file_hash, token);
10119 *menu_config[j].value = get_integer_from_string(value);
10123 // special case: initialize with default values that may be overwritten
10124 // (eg, init "menu.enter_screen.SCORES.xyz" from "menu.enter_screen.xyz")
10125 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
10127 struct TokenIntPtrInfo menu_config[] =
10129 { "menu.enter_screen.fade_mode", &menu.enter_screen[i].fade_mode },
10130 { "menu.enter_screen.fade_delay", &menu.enter_screen[i].fade_delay },
10131 { "menu.enter_screen.post_delay", &menu.enter_screen[i].post_delay },
10132 { "menu.leave_screen.fade_mode", &menu.leave_screen[i].fade_mode },
10133 { "menu.leave_screen.fade_delay", &menu.leave_screen[i].fade_delay },
10134 { "menu.leave_screen.post_delay", &menu.leave_screen[i].post_delay },
10135 { "menu.next_screen.fade_mode", &menu.next_screen[i].fade_mode },
10136 { "menu.next_screen.fade_delay", &menu.next_screen[i].fade_delay },
10137 { "menu.next_screen.post_delay", &menu.next_screen[i].post_delay }
10140 for (j = 0; j < ARRAY_SIZE(menu_config); j++)
10142 char *token = menu_config[j].token;
10143 char *value = getHashEntry(setup_file_hash, token);
10146 *menu_config[j].value = get_token_parameter_value(token, value);
10150 // special case: initialize with default values that may be overwritten
10151 // (eg, init "viewport.door_1.MAIN.xyz" from "viewport.door_1.xyz")
10152 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
10156 char *token_prefix;
10157 struct RectWithBorder *struct_ptr;
10161 { "viewport.window", &viewport.window[i] },
10162 { "viewport.playfield", &viewport.playfield[i] },
10163 { "viewport.door_1", &viewport.door_1[i] },
10164 { "viewport.door_2", &viewport.door_2[i] }
10167 for (j = 0; j < ARRAY_SIZE(vp_struct); j++)
10169 struct TokenIntPtrInfo vp_config[] =
10171 { ".x", &vp_struct[j].struct_ptr->x },
10172 { ".y", &vp_struct[j].struct_ptr->y },
10173 { ".width", &vp_struct[j].struct_ptr->width },
10174 { ".height", &vp_struct[j].struct_ptr->height },
10175 { ".min_width", &vp_struct[j].struct_ptr->min_width },
10176 { ".min_height", &vp_struct[j].struct_ptr->min_height },
10177 { ".max_width", &vp_struct[j].struct_ptr->max_width },
10178 { ".max_height", &vp_struct[j].struct_ptr->max_height },
10179 { ".margin_left", &vp_struct[j].struct_ptr->margin_left },
10180 { ".margin_right", &vp_struct[j].struct_ptr->margin_right },
10181 { ".margin_top", &vp_struct[j].struct_ptr->margin_top },
10182 { ".margin_bottom", &vp_struct[j].struct_ptr->margin_bottom },
10183 { ".border_left", &vp_struct[j].struct_ptr->border_left },
10184 { ".border_right", &vp_struct[j].struct_ptr->border_right },
10185 { ".border_top", &vp_struct[j].struct_ptr->border_top },
10186 { ".border_bottom", &vp_struct[j].struct_ptr->border_bottom },
10187 { ".border_size", &vp_struct[j].struct_ptr->border_size },
10188 { ".align_size", &vp_struct[j].struct_ptr->align_size },
10189 { ".align", &vp_struct[j].struct_ptr->align },
10190 { ".valign", &vp_struct[j].struct_ptr->valign }
10193 for (k = 0; k < ARRAY_SIZE(vp_config); k++)
10195 char *token = getStringCat2(vp_struct[j].token_prefix,
10196 vp_config[k].token);
10197 char *value = getHashEntry(setup_file_hash, token);
10200 *vp_config[k].value = get_token_parameter_value(token, value);
10207 // special case: initialize with default values that may be overwritten
10208 // (e.g., init "[title].fade_mode" from "menu.next_screen.TITLE.fade_mode")
10209 for (i = 0; title_info[i].info != NULL; i++)
10211 struct TitleFadingInfo *info = title_info[i].info;
10212 char *base_token = title_info[i].text;
10214 for (j = 0; title_tokens[j].type != -1; j++)
10216 char *token = getStringCat2(base_token, title_tokens[j].text);
10217 char *value = getHashEntry(setup_file_hash, token);
10221 int parameter_value = get_token_parameter_value(token, value);
10225 *(int *)title_tokens[j].value = (int)parameter_value;
10234 // special case: initialize with default values that may be overwritten
10235 // (e.g., init "titlemessage_1.fade_mode" from "[titlemessage].fade_mode")
10236 for (i = 0; titlemessage_arrays[i].array != NULL; i++)
10238 struct TitleMessageInfo *array = titlemessage_arrays[i].array;
10239 char *base_token = titlemessage_arrays[i].text;
10241 for (j = 0; titlemessage_tokens[j].type != -1; j++)
10243 char *token = getStringCat2(base_token, titlemessage_tokens[j].text);
10244 char *value = getHashEntry(setup_file_hash, token);
10248 int parameter_value = get_token_parameter_value(token, value);
10250 for (k = 0; k < MAX_NUM_TITLE_MESSAGES; k++)
10254 if (titlemessage_tokens[j].type == TYPE_INTEGER)
10255 *(int *)titlemessage_tokens[j].value = (int)parameter_value;
10257 *(boolean *)titlemessage_tokens[j].value = (boolean)parameter_value;
10267 // read (and overwrite with) values that may be specified in config file
10268 for (i = 0; image_config_vars[i].token != NULL; i++)
10270 char *value = getHashEntry(setup_file_hash, image_config_vars[i].token);
10272 // (ignore definitions set to "[DEFAULT]" which are already initialized)
10273 if (value != NULL && !strEqual(value, ARG_DEFAULT))
10274 *image_config_vars[i].value =
10275 get_token_parameter_value(image_config_vars[i].token, value);
10278 freeSetupFileHash(setup_file_hash);
10281 void LoadMenuDesignSettings(void)
10283 char *filename_base = UNDEFINED_FILENAME, *filename_local;
10285 InitMenuDesignSettings_Static();
10286 InitMenuDesignSettings_SpecialPreProcessing();
10288 if (!GFX_OVERRIDE_ARTWORK(ARTWORK_TYPE_GRAPHICS))
10290 // first look for special settings configured in level series config
10291 filename_base = getCustomArtworkLevelConfigFilename(ARTWORK_TYPE_GRAPHICS);
10293 if (fileExists(filename_base))
10294 LoadMenuDesignSettingsFromFilename(filename_base);
10297 filename_local = getCustomArtworkConfigFilename(ARTWORK_TYPE_GRAPHICS);
10299 if (filename_local != NULL && !strEqual(filename_base, filename_local))
10300 LoadMenuDesignSettingsFromFilename(filename_local);
10302 InitMenuDesignSettings_SpecialPostProcessing();
10305 void LoadMenuDesignSettings_AfterGraphics(void)
10307 InitMenuDesignSettings_SpecialPostProcessing_AfterGraphics();
10310 void LoadUserDefinedEditorElementList(int **elements, int *num_elements)
10312 char *filename = getEditorSetupFilename();
10313 SetupFileList *setup_file_list, *list;
10314 SetupFileHash *element_hash;
10315 int num_unknown_tokens = 0;
10318 if ((setup_file_list = loadSetupFileList(filename)) == NULL)
10321 element_hash = newSetupFileHash();
10323 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
10324 setHashEntry(element_hash, element_info[i].token_name, i_to_a(i));
10326 // determined size may be larger than needed (due to unknown elements)
10328 for (list = setup_file_list; list != NULL; list = list->next)
10331 // add space for up to 3 more elements for padding that may be needed
10332 *num_elements += 3;
10334 // free memory for old list of elements, if needed
10335 checked_free(*elements);
10337 // allocate memory for new list of elements
10338 *elements = checked_malloc(*num_elements * sizeof(int));
10341 for (list = setup_file_list; list != NULL; list = list->next)
10343 char *value = getHashEntry(element_hash, list->token);
10345 if (value == NULL) // try to find obsolete token mapping
10347 char *mapped_token = get_mapped_token(list->token);
10349 if (mapped_token != NULL)
10351 value = getHashEntry(element_hash, mapped_token);
10353 free(mapped_token);
10359 (*elements)[(*num_elements)++] = atoi(value);
10363 if (num_unknown_tokens == 0)
10365 Error(ERR_INFO_LINE, "-");
10366 Error(ERR_INFO, "warning: unknown token(s) found in config file:");
10367 Error(ERR_INFO, "- config file: '%s'", filename);
10369 num_unknown_tokens++;
10372 Error(ERR_INFO, "- token: '%s'", list->token);
10376 if (num_unknown_tokens > 0)
10377 Error(ERR_INFO_LINE, "-");
10379 while (*num_elements % 4) // pad with empty elements, if needed
10380 (*elements)[(*num_elements)++] = EL_EMPTY;
10382 freeSetupFileList(setup_file_list);
10383 freeSetupFileHash(element_hash);
10386 for (i = 0; i < *num_elements; i++)
10387 printf("editor: element '%s' [%d]\n",
10388 element_info[(*elements)[i]].token_name, (*elements)[i]);
10392 static struct MusicFileInfo *get_music_file_info_ext(char *basename, int music,
10395 SetupFileHash *setup_file_hash = NULL;
10396 struct MusicFileInfo tmp_music_file_info, *new_music_file_info;
10397 char *filename_music, *filename_prefix, *filename_info;
10403 token_to_value_ptr[] =
10405 { "title_header", &tmp_music_file_info.title_header },
10406 { "artist_header", &tmp_music_file_info.artist_header },
10407 { "album_header", &tmp_music_file_info.album_header },
10408 { "year_header", &tmp_music_file_info.year_header },
10410 { "title", &tmp_music_file_info.title },
10411 { "artist", &tmp_music_file_info.artist },
10412 { "album", &tmp_music_file_info.album },
10413 { "year", &tmp_music_file_info.year },
10419 filename_music = (is_sound ? getCustomSoundFilename(basename) :
10420 getCustomMusicFilename(basename));
10422 if (filename_music == NULL)
10425 // ---------- try to replace file extension ----------
10427 filename_prefix = getStringCopy(filename_music);
10428 if (strrchr(filename_prefix, '.') != NULL)
10429 *strrchr(filename_prefix, '.') = '\0';
10430 filename_info = getStringCat2(filename_prefix, ".txt");
10432 if (fileExists(filename_info))
10433 setup_file_hash = loadSetupFileHash(filename_info);
10435 free(filename_prefix);
10436 free(filename_info);
10438 if (setup_file_hash == NULL)
10440 // ---------- try to add file extension ----------
10442 filename_prefix = getStringCopy(filename_music);
10443 filename_info = getStringCat2(filename_prefix, ".txt");
10445 if (fileExists(filename_info))
10446 setup_file_hash = loadSetupFileHash(filename_info);
10448 free(filename_prefix);
10449 free(filename_info);
10452 if (setup_file_hash == NULL)
10455 // ---------- music file info found ----------
10457 clear_mem(&tmp_music_file_info, sizeof(struct MusicFileInfo));
10459 for (i = 0; token_to_value_ptr[i].token != NULL; i++)
10461 char *value = getHashEntry(setup_file_hash, token_to_value_ptr[i].token);
10463 *token_to_value_ptr[i].value_ptr =
10464 getStringCopy(value != NULL && *value != '\0' ? value : UNKNOWN_NAME);
10467 tmp_music_file_info.basename = getStringCopy(basename);
10468 tmp_music_file_info.music = music;
10469 tmp_music_file_info.is_sound = is_sound;
10471 new_music_file_info = checked_malloc(sizeof(struct MusicFileInfo));
10472 *new_music_file_info = tmp_music_file_info;
10474 return new_music_file_info;
10477 static struct MusicFileInfo *get_music_file_info(char *basename, int music)
10479 return get_music_file_info_ext(basename, music, FALSE);
10482 static struct MusicFileInfo *get_sound_file_info(char *basename, int sound)
10484 return get_music_file_info_ext(basename, sound, TRUE);
10487 static boolean music_info_listed_ext(struct MusicFileInfo *list,
10488 char *basename, boolean is_sound)
10490 for (; list != NULL; list = list->next)
10491 if (list->is_sound == is_sound && strEqual(list->basename, basename))
10497 static boolean music_info_listed(struct MusicFileInfo *list, char *basename)
10499 return music_info_listed_ext(list, basename, FALSE);
10502 static boolean sound_info_listed(struct MusicFileInfo *list, char *basename)
10504 return music_info_listed_ext(list, basename, TRUE);
10507 void LoadMusicInfo(void)
10509 char *music_directory = getCustomMusicDirectory();
10510 int num_music = getMusicListSize();
10511 int num_music_noconf = 0;
10512 int num_sounds = getSoundListSize();
10514 DirectoryEntry *dir_entry;
10515 struct FileInfo *music, *sound;
10516 struct MusicFileInfo *next, **new;
10519 while (music_file_info != NULL)
10521 next = music_file_info->next;
10523 checked_free(music_file_info->basename);
10525 checked_free(music_file_info->title_header);
10526 checked_free(music_file_info->artist_header);
10527 checked_free(music_file_info->album_header);
10528 checked_free(music_file_info->year_header);
10530 checked_free(music_file_info->title);
10531 checked_free(music_file_info->artist);
10532 checked_free(music_file_info->album);
10533 checked_free(music_file_info->year);
10535 free(music_file_info);
10537 music_file_info = next;
10540 new = &music_file_info;
10542 for (i = 0; i < num_music; i++)
10544 music = getMusicListEntry(i);
10546 if (music->filename == NULL)
10549 if (strEqual(music->filename, UNDEFINED_FILENAME))
10552 // a configured file may be not recognized as music
10553 if (!FileIsMusic(music->filename))
10556 if (!music_info_listed(music_file_info, music->filename))
10558 *new = get_music_file_info(music->filename, i);
10561 new = &(*new)->next;
10565 if ((dir = openDirectory(music_directory)) == NULL)
10567 Error(ERR_WARN, "cannot read music directory '%s'", music_directory);
10571 while ((dir_entry = readDirectory(dir)) != NULL) // loop all entries
10573 char *basename = dir_entry->basename;
10574 boolean music_already_used = FALSE;
10577 // skip all music files that are configured in music config file
10578 for (i = 0; i < num_music; i++)
10580 music = getMusicListEntry(i);
10582 if (music->filename == NULL)
10585 if (strEqual(basename, music->filename))
10587 music_already_used = TRUE;
10592 if (music_already_used)
10595 if (!FileIsMusic(dir_entry->filename))
10598 if (!music_info_listed(music_file_info, basename))
10600 *new = get_music_file_info(basename, MAP_NOCONF_MUSIC(num_music_noconf));
10603 new = &(*new)->next;
10606 num_music_noconf++;
10609 closeDirectory(dir);
10611 for (i = 0; i < num_sounds; i++)
10613 sound = getSoundListEntry(i);
10615 if (sound->filename == NULL)
10618 if (strEqual(sound->filename, UNDEFINED_FILENAME))
10621 // a configured file may be not recognized as sound
10622 if (!FileIsSound(sound->filename))
10625 if (!sound_info_listed(music_file_info, sound->filename))
10627 *new = get_sound_file_info(sound->filename, i);
10629 new = &(*new)->next;
10634 static void add_helpanim_entry(int element, int action, int direction,
10635 int delay, int *num_list_entries)
10637 struct HelpAnimInfo *new_list_entry;
10638 (*num_list_entries)++;
10641 checked_realloc(helpanim_info,
10642 *num_list_entries * sizeof(struct HelpAnimInfo));
10643 new_list_entry = &helpanim_info[*num_list_entries - 1];
10645 new_list_entry->element = element;
10646 new_list_entry->action = action;
10647 new_list_entry->direction = direction;
10648 new_list_entry->delay = delay;
10651 static void print_unknown_token(char *filename, char *token, int token_nr)
10655 Error(ERR_INFO_LINE, "-");
10656 Error(ERR_INFO, "warning: unknown token(s) found in config file:");
10657 Error(ERR_INFO, "- config file: '%s'", filename);
10660 Error(ERR_INFO, "- token: '%s'", token);
10663 static void print_unknown_token_end(int token_nr)
10666 Error(ERR_INFO_LINE, "-");
10669 void LoadHelpAnimInfo(void)
10671 char *filename = getHelpAnimFilename();
10672 SetupFileList *setup_file_list = NULL, *list;
10673 SetupFileHash *element_hash, *action_hash, *direction_hash;
10674 int num_list_entries = 0;
10675 int num_unknown_tokens = 0;
10678 if (fileExists(filename))
10679 setup_file_list = loadSetupFileList(filename);
10681 if (setup_file_list == NULL)
10683 // use reliable default values from static configuration
10684 SetupFileList *insert_ptr;
10686 insert_ptr = setup_file_list =
10687 newSetupFileList(helpanim_config[0].token,
10688 helpanim_config[0].value);
10690 for (i = 1; helpanim_config[i].token; i++)
10691 insert_ptr = addListEntry(insert_ptr,
10692 helpanim_config[i].token,
10693 helpanim_config[i].value);
10696 element_hash = newSetupFileHash();
10697 action_hash = newSetupFileHash();
10698 direction_hash = newSetupFileHash();
10700 for (i = 0; i < MAX_NUM_ELEMENTS; i++)
10701 setHashEntry(element_hash, element_info[i].token_name, i_to_a(i));
10703 for (i = 0; i < NUM_ACTIONS; i++)
10704 setHashEntry(action_hash, element_action_info[i].suffix,
10705 i_to_a(element_action_info[i].value));
10707 // do not store direction index (bit) here, but direction value!
10708 for (i = 0; i < NUM_DIRECTIONS_FULL; i++)
10709 setHashEntry(direction_hash, element_direction_info[i].suffix,
10710 i_to_a(1 << element_direction_info[i].value));
10712 for (list = setup_file_list; list != NULL; list = list->next)
10714 char *element_token, *action_token, *direction_token;
10715 char *element_value, *action_value, *direction_value;
10716 int delay = atoi(list->value);
10718 if (strEqual(list->token, "end"))
10720 add_helpanim_entry(HELPANIM_LIST_NEXT, -1, -1, -1, &num_list_entries);
10725 /* first try to break element into element/action/direction parts;
10726 if this does not work, also accept combined "element[.act][.dir]"
10727 elements (like "dynamite.active"), which are unique elements */
10729 if (strchr(list->token, '.') == NULL) // token contains no '.'
10731 element_value = getHashEntry(element_hash, list->token);
10732 if (element_value != NULL) // element found
10733 add_helpanim_entry(atoi(element_value), -1, -1, delay,
10734 &num_list_entries);
10737 // no further suffixes found -- this is not an element
10738 print_unknown_token(filename, list->token, num_unknown_tokens++);
10744 // token has format "<prefix>.<something>"
10746 action_token = strchr(list->token, '.'); // suffix may be action ...
10747 direction_token = action_token; // ... or direction
10749 element_token = getStringCopy(list->token);
10750 *strchr(element_token, '.') = '\0';
10752 element_value = getHashEntry(element_hash, element_token);
10754 if (element_value == NULL) // this is no element
10756 element_value = getHashEntry(element_hash, list->token);
10757 if (element_value != NULL) // combined element found
10758 add_helpanim_entry(atoi(element_value), -1, -1, delay,
10759 &num_list_entries);
10761 print_unknown_token(filename, list->token, num_unknown_tokens++);
10763 free(element_token);
10768 action_value = getHashEntry(action_hash, action_token);
10770 if (action_value != NULL) // action found
10772 add_helpanim_entry(atoi(element_value), atoi(action_value), -1, delay,
10773 &num_list_entries);
10775 free(element_token);
10780 direction_value = getHashEntry(direction_hash, direction_token);
10782 if (direction_value != NULL) // direction found
10784 add_helpanim_entry(atoi(element_value), -1, atoi(direction_value), delay,
10785 &num_list_entries);
10787 free(element_token);
10792 if (strchr(action_token + 1, '.') == NULL)
10794 // no further suffixes found -- this is not an action nor direction
10796 element_value = getHashEntry(element_hash, list->token);
10797 if (element_value != NULL) // combined element found
10798 add_helpanim_entry(atoi(element_value), -1, -1, delay,
10799 &num_list_entries);
10801 print_unknown_token(filename, list->token, num_unknown_tokens++);
10803 free(element_token);
10808 // token has format "<prefix>.<suffix>.<something>"
10810 direction_token = strchr(action_token + 1, '.');
10812 action_token = getStringCopy(action_token);
10813 *strchr(action_token + 1, '.') = '\0';
10815 action_value = getHashEntry(action_hash, action_token);
10817 if (action_value == NULL) // this is no action
10819 element_value = getHashEntry(element_hash, list->token);
10820 if (element_value != NULL) // combined element found
10821 add_helpanim_entry(atoi(element_value), -1, -1, delay,
10822 &num_list_entries);
10824 print_unknown_token(filename, list->token, num_unknown_tokens++);
10826 free(element_token);
10827 free(action_token);
10832 direction_value = getHashEntry(direction_hash, direction_token);
10834 if (direction_value != NULL) // direction found
10836 add_helpanim_entry(atoi(element_value), atoi(action_value),
10837 atoi(direction_value), delay, &num_list_entries);
10839 free(element_token);
10840 free(action_token);
10845 // this is no direction
10847 element_value = getHashEntry(element_hash, list->token);
10848 if (element_value != NULL) // combined element found
10849 add_helpanim_entry(atoi(element_value), -1, -1, delay,
10850 &num_list_entries);
10852 print_unknown_token(filename, list->token, num_unknown_tokens++);
10854 free(element_token);
10855 free(action_token);
10858 print_unknown_token_end(num_unknown_tokens);
10860 add_helpanim_entry(HELPANIM_LIST_NEXT, -1, -1, -1, &num_list_entries);
10861 add_helpanim_entry(HELPANIM_LIST_END, -1, -1, -1, &num_list_entries);
10863 freeSetupFileList(setup_file_list);
10864 freeSetupFileHash(element_hash);
10865 freeSetupFileHash(action_hash);
10866 freeSetupFileHash(direction_hash);
10869 for (i = 0; i < num_list_entries; i++)
10870 printf("::: '%s': %d, %d, %d => %d\n",
10871 EL_NAME(helpanim_info[i].element),
10872 helpanim_info[i].element,
10873 helpanim_info[i].action,
10874 helpanim_info[i].direction,
10875 helpanim_info[i].delay);
10879 void LoadHelpTextInfo(void)
10881 char *filename = getHelpTextFilename();
10884 if (helptext_info != NULL)
10886 freeSetupFileHash(helptext_info);
10887 helptext_info = NULL;
10890 if (fileExists(filename))
10891 helptext_info = loadSetupFileHash(filename);
10893 if (helptext_info == NULL)
10895 // use reliable default values from static configuration
10896 helptext_info = newSetupFileHash();
10898 for (i = 0; helptext_config[i].token; i++)
10899 setHashEntry(helptext_info,
10900 helptext_config[i].token,
10901 helptext_config[i].value);
10905 BEGIN_HASH_ITERATION(helptext_info, itr)
10907 printf("::: '%s' => '%s'\n",
10908 HASH_ITERATION_TOKEN(itr), HASH_ITERATION_VALUE(itr));
10910 END_HASH_ITERATION(hash, itr)
10915 // ----------------------------------------------------------------------------
10917 // ----------------------------------------------------------------------------
10919 #define MAX_NUM_CONVERT_LEVELS 1000
10921 void ConvertLevels(void)
10923 static LevelDirTree *convert_leveldir = NULL;
10924 static int convert_level_nr = -1;
10925 static int num_levels_handled = 0;
10926 static int num_levels_converted = 0;
10927 static boolean levels_failed[MAX_NUM_CONVERT_LEVELS];
10930 convert_leveldir = getTreeInfoFromIdentifier(leveldir_first,
10931 global.convert_leveldir);
10933 if (convert_leveldir == NULL)
10934 Error(ERR_EXIT, "no such level identifier: '%s'",
10935 global.convert_leveldir);
10937 leveldir_current = convert_leveldir;
10939 if (global.convert_level_nr != -1)
10941 convert_leveldir->first_level = global.convert_level_nr;
10942 convert_leveldir->last_level = global.convert_level_nr;
10945 convert_level_nr = convert_leveldir->first_level;
10947 PrintLine("=", 79);
10948 Print("Converting levels\n");
10949 PrintLine("-", 79);
10950 Print("Level series identifier: '%s'\n", convert_leveldir->identifier);
10951 Print("Level series name: '%s'\n", convert_leveldir->name);
10952 Print("Level series author: '%s'\n", convert_leveldir->author);
10953 Print("Number of levels: %d\n", convert_leveldir->levels);
10954 PrintLine("=", 79);
10957 for (i = 0; i < MAX_NUM_CONVERT_LEVELS; i++)
10958 levels_failed[i] = FALSE;
10960 while (convert_level_nr <= convert_leveldir->last_level)
10962 char *level_filename;
10965 level_nr = convert_level_nr++;
10967 Print("Level %03d: ", level_nr);
10969 LoadLevel(level_nr);
10970 if (level.no_level_file || level.no_valid_file)
10972 Print("(no level)\n");
10976 Print("converting level ... ");
10978 level_filename = getDefaultLevelFilename(level_nr);
10979 new_level = !fileExists(level_filename);
10983 SaveLevel(level_nr);
10985 num_levels_converted++;
10987 Print("converted.\n");
10991 if (level_nr >= 0 && level_nr < MAX_NUM_CONVERT_LEVELS)
10992 levels_failed[level_nr] = TRUE;
10994 Print("NOT CONVERTED -- LEVEL ALREADY EXISTS.\n");
10997 num_levels_handled++;
11001 PrintLine("=", 79);
11002 Print("Number of levels handled: %d\n", num_levels_handled);
11003 Print("Number of levels converted: %d (%d%%)\n", num_levels_converted,
11004 (num_levels_handled ?
11005 num_levels_converted * 100 / num_levels_handled : 0));
11006 PrintLine("-", 79);
11007 Print("Summary (for automatic parsing by scripts):\n");
11008 Print("LEVELDIR '%s', CONVERTED %d/%d (%d%%)",
11009 convert_leveldir->identifier, num_levels_converted,
11010 num_levels_handled,
11011 (num_levels_handled ?
11012 num_levels_converted * 100 / num_levels_handled : 0));
11014 if (num_levels_handled != num_levels_converted)
11016 Print(", FAILED:");
11017 for (i = 0; i < MAX_NUM_CONVERT_LEVELS; i++)
11018 if (levels_failed[i])
11023 PrintLine("=", 79);
11025 CloseAllAndExit(0);
11029 // ----------------------------------------------------------------------------
11030 // create and save images for use in level sketches (raw BMP format)
11031 // ----------------------------------------------------------------------------
11033 void CreateLevelSketchImages(void)
11039 InitElementPropertiesGfxElement();
11041 bitmap1 = CreateBitmap(TILEX, TILEY, DEFAULT_DEPTH);
11042 bitmap2 = CreateBitmap(MINI_TILEX, MINI_TILEY, DEFAULT_DEPTH);
11044 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
11046 Bitmap *src_bitmap;
11048 int element = getMappedElement(i);
11049 int graphic = el2edimg(element);
11050 char basename1[16];
11051 char basename2[16];
11055 sprintf(basename1, "%03d.bmp", i);
11056 sprintf(basename2, "%03ds.bmp", i);
11058 filename1 = getPath2(global.create_images_dir, basename1);
11059 filename2 = getPath2(global.create_images_dir, basename2);
11061 getFixedGraphicSource(graphic, 0, &src_bitmap, &src_x, &src_y);
11062 BlitBitmap(src_bitmap, bitmap1, src_x, src_y, TILEX, TILEY,
11065 if (SDL_SaveBMP(bitmap1->surface, filename1) != 0)
11066 Error(ERR_EXIT, "cannot save level sketch image file '%s'", filename1);
11068 getMiniGraphicSource(graphic, &src_bitmap, &src_x, &src_y);
11069 BlitBitmap(src_bitmap, bitmap2, src_x, src_y, MINI_TILEX, MINI_TILEY, 0, 0);
11071 if (SDL_SaveBMP(bitmap2->surface, filename2) != 0)
11072 Error(ERR_EXIT, "cannot save level sketch image file '%s'", filename2);
11078 printf("%03d `%03d%c", i, i, (i % 10 < 9 ? ' ' : '\n'));
11081 FreeBitmap(bitmap1);
11082 FreeBitmap(bitmap2);
11087 Error(ERR_INFO, "%d normal and small images created", NUM_FILE_ELEMENTS);
11089 CloseAllAndExit(0);
11093 // ----------------------------------------------------------------------------
11094 // create and save images for custom and group elements (raw BMP format)
11095 // ----------------------------------------------------------------------------
11097 void CreateCustomElementImages(char *directory)
11099 char *src_basename = "RocksCE-template.ilbm";
11100 char *dst_basename = "RocksCE.bmp";
11101 char *src_filename = getPath2(directory, src_basename);
11102 char *dst_filename = getPath2(directory, dst_basename);
11103 Bitmap *src_bitmap;
11105 int yoffset_ce = 0;
11106 int yoffset_ge = (TILEY * NUM_CUSTOM_ELEMENTS / 16);
11109 SDLInitVideoDisplay();
11111 ReCreateBitmap(&backbuffer, video.width, video.height);
11113 src_bitmap = LoadImage(src_filename);
11115 bitmap = CreateBitmap(TILEX * 16 * 2,
11116 TILEY * (NUM_CUSTOM_ELEMENTS + NUM_GROUP_ELEMENTS) / 16,
11119 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
11126 BlitBitmap(src_bitmap, bitmap, 0, 0, TILEX, TILEY,
11127 TILEX * x, TILEY * y + yoffset_ce);
11129 BlitBitmap(src_bitmap, bitmap, 0, TILEY,
11131 TILEX * x + TILEX * 16,
11132 TILEY * y + yoffset_ce);
11134 for (j = 2; j >= 0; j--)
11138 BlitBitmap(src_bitmap, bitmap,
11139 TILEX + c * 7, 0, 6, 10,
11140 TILEX * x + 6 + j * 7,
11141 TILEY * y + 11 + yoffset_ce);
11143 BlitBitmap(src_bitmap, bitmap,
11144 TILEX + c * 8, TILEY, 6, 10,
11145 TILEX * 16 + TILEX * x + 6 + j * 8,
11146 TILEY * y + 10 + yoffset_ce);
11152 for (i = 0; i < NUM_GROUP_ELEMENTS; i++)
11159 BlitBitmap(src_bitmap, bitmap, 0, 0, TILEX, TILEY,
11160 TILEX * x, TILEY * y + yoffset_ge);
11162 BlitBitmap(src_bitmap, bitmap, 0, TILEY,
11164 TILEX * x + TILEX * 16,
11165 TILEY * y + yoffset_ge);
11167 for (j = 1; j >= 0; j--)
11171 BlitBitmap(src_bitmap, bitmap, TILEX + c * 10, 11, 10, 10,
11172 TILEX * x + 6 + j * 10,
11173 TILEY * y + 11 + yoffset_ge);
11175 BlitBitmap(src_bitmap, bitmap,
11176 TILEX + c * 8, TILEY + 12, 6, 10,
11177 TILEX * 16 + TILEX * x + 10 + j * 8,
11178 TILEY * y + 10 + yoffset_ge);
11184 if (SDL_SaveBMP(bitmap->surface, dst_filename) != 0)
11185 Error(ERR_EXIT, "cannot save CE graphics file '%s'", dst_filename);
11187 FreeBitmap(bitmap);
11189 CloseAllAndExit(0);