1 // ============================================================================
2 // Rocks'n'Diamonds - McDuffin Strikes Back!
3 // ----------------------------------------------------------------------------
4 // (c) 1995-2014 by Artsoft Entertainment
7 // https://www.artsoft.org/
8 // ----------------------------------------------------------------------------
10 // ============================================================================
17 #include "libgame/libgame.h"
26 #define ENABLE_UNUSED_CODE 0 // currently unused functions
27 #define ENABLE_HISTORIC_CHUNKS 0 // only for historic reference
28 #define ENABLE_RESERVED_CODE 0 // reserved for later use
30 #define CHUNK_ID_LEN 4 // IFF style chunk id length
31 #define CHUNK_SIZE_UNDEFINED 0 // undefined chunk size == 0
32 #define CHUNK_SIZE_NONE -1 // do not write chunk size
34 #define LEVEL_CHUNK_NAME_SIZE MAX_LEVEL_NAME_LEN
35 #define LEVEL_CHUNK_AUTH_SIZE MAX_LEVEL_AUTHOR_LEN
37 #define LEVEL_CHUNK_VERS_SIZE 8 // size of file version chunk
38 #define LEVEL_CHUNK_DATE_SIZE 4 // size of file date chunk
39 #define LEVEL_CHUNK_HEAD_SIZE 80 // size of level file header
40 #define LEVEL_CHUNK_HEAD_UNUSED 0 // unused level header bytes
41 #define LEVEL_CHUNK_CNT2_SIZE 160 // size of level CNT2 chunk
42 #define LEVEL_CHUNK_CNT2_UNUSED 11 // unused CNT2 chunk bytes
43 #define LEVEL_CHUNK_CNT3_HEADER 16 // size of level CNT3 header
44 #define LEVEL_CHUNK_CNT3_UNUSED 10 // unused CNT3 chunk bytes
45 #define LEVEL_CPART_CUS3_SIZE 134 // size of CUS3 chunk part
46 #define LEVEL_CPART_CUS3_UNUSED 15 // unused CUS3 bytes / part
47 #define LEVEL_CHUNK_GRP1_SIZE 74 // size of level GRP1 chunk
49 // (element number, number of change pages, change page number)
50 #define LEVEL_CHUNK_CUSX_UNCHANGED (2 + (1 + 1) + (1 + 1))
52 // (element number only)
53 #define LEVEL_CHUNK_GRPX_UNCHANGED 2
54 #define LEVEL_CHUNK_NOTE_UNCHANGED 2
56 // (nothing at all if unchanged)
57 #define LEVEL_CHUNK_ELEM_UNCHANGED 0
59 #define TAPE_CHUNK_VERS_SIZE 8 // size of file version chunk
60 #define TAPE_CHUNK_HEAD_SIZE 20 // size of tape file header
61 #define TAPE_CHUNK_HEAD_UNUSED 1 // unused tape header bytes
62 #define TAPE_CHUNK_SCRN_SIZE 2 // size of screen size chunk
64 #define SCORE_CHUNK_VERS_SIZE 8 // size of file version chunk
66 #define LEVEL_CHUNK_CNT3_SIZE(x) (LEVEL_CHUNK_CNT3_HEADER + (x))
67 #define LEVEL_CHUNK_CUS3_SIZE(x) (2 + (x) * LEVEL_CPART_CUS3_SIZE)
68 #define LEVEL_CHUNK_CUS4_SIZE(x) (96 + (x) * 48)
70 // file identifier strings
71 #define LEVEL_COOKIE_TMPL "ROCKSNDIAMONDS_LEVEL_FILE_VERSION_x.x"
72 #define TAPE_COOKIE_TMPL "ROCKSNDIAMONDS_TAPE_FILE_VERSION_x.x"
73 #define SCORE_COOKIE_TMPL "ROCKSNDIAMONDS_SCORE_FILE_VERSION_x.x"
75 // values for deciding when (not) to save configuration data
76 #define SAVE_CONF_NEVER 0
77 #define SAVE_CONF_ALWAYS 1
78 #define SAVE_CONF_WHEN_CHANGED -1
80 // values for chunks using micro chunks
81 #define CONF_MASK_1_BYTE 0x00
82 #define CONF_MASK_2_BYTE 0x40
83 #define CONF_MASK_4_BYTE 0x80
84 #define CONF_MASK_MULTI_BYTES 0xc0
86 #define CONF_MASK_BYTES 0xc0
87 #define CONF_MASK_TOKEN 0x3f
89 #define CONF_VALUE_1_BYTE(x) (CONF_MASK_1_BYTE | (x))
90 #define CONF_VALUE_2_BYTE(x) (CONF_MASK_2_BYTE | (x))
91 #define CONF_VALUE_4_BYTE(x) (CONF_MASK_4_BYTE | (x))
92 #define CONF_VALUE_MULTI_BYTES(x) (CONF_MASK_MULTI_BYTES | (x))
94 // these definitions are just for convenience of use and readability
95 #define CONF_VALUE_8_BIT(x) CONF_VALUE_1_BYTE(x)
96 #define CONF_VALUE_16_BIT(x) CONF_VALUE_2_BYTE(x)
97 #define CONF_VALUE_32_BIT(x) CONF_VALUE_4_BYTE(x)
98 #define CONF_VALUE_BYTES(x) CONF_VALUE_MULTI_BYTES(x)
100 #define CONF_VALUE_NUM_BYTES(x) ((x) == CONF_MASK_1_BYTE ? 1 : \
101 (x) == CONF_MASK_2_BYTE ? 2 : \
102 (x) == CONF_MASK_4_BYTE ? 4 : 0)
104 #define CONF_CONTENT_NUM_ELEMENTS (3 * 3)
105 #define CONF_CONTENT_NUM_BYTES (CONF_CONTENT_NUM_ELEMENTS * 2)
106 #define CONF_ELEMENT_NUM_BYTES (2)
108 #define CONF_ENTITY_NUM_BYTES(t) ((t) == TYPE_ELEMENT || \
109 (t) == TYPE_ELEMENT_LIST ? \
110 CONF_ELEMENT_NUM_BYTES : \
111 (t) == TYPE_CONTENT || \
112 (t) == TYPE_CONTENT_LIST ? \
113 CONF_CONTENT_NUM_BYTES : 1)
115 #define CONF_ELEMENT_BYTE_POS(i) ((i) * CONF_ELEMENT_NUM_BYTES)
116 #define CONF_ELEMENTS_ELEMENT(b,i) ((b[CONF_ELEMENT_BYTE_POS(i)] << 8) | \
117 (b[CONF_ELEMENT_BYTE_POS(i) + 1]))
119 #define CONF_CONTENT_ELEMENT_POS(c,x,y) ((c) * CONF_CONTENT_NUM_ELEMENTS + \
121 #define CONF_CONTENT_BYTE_POS(c,x,y) (CONF_CONTENT_ELEMENT_POS(c,x,y) * \
122 CONF_ELEMENT_NUM_BYTES)
123 #define CONF_CONTENTS_ELEMENT(b,c,x,y) ((b[CONF_CONTENT_BYTE_POS(c,x,y)]<< 8)|\
124 (b[CONF_CONTENT_BYTE_POS(c,x,y) + 1]))
126 // temporary variables used to store pointers to structure members
127 static struct LevelInfo li;
128 static struct ElementInfo xx_ei, yy_ei;
129 static struct ElementChangeInfo xx_change;
130 static struct ElementGroupInfo xx_group;
131 static struct EnvelopeInfo xx_envelope;
132 static unsigned int xx_event_bits[NUM_CE_BITFIELDS];
133 static char xx_default_description[MAX_ELEMENT_NAME_LEN + 1];
134 static int xx_num_contents;
135 static int xx_current_change_page;
136 static char xx_default_string_empty[1] = "";
137 static int xx_string_length_unused;
139 struct LevelFileConfigInfo
141 int element; // element for which data is to be stored
142 int save_type; // save data always, never or when changed
143 int data_type; // data type (used internally, not stored)
144 int conf_type; // micro chunk identifier (stored in file)
147 void *value; // variable that holds the data to be stored
148 int default_value; // initial default value for this variable
151 void *value_copy; // variable that holds the data to be copied
152 void *num_entities; // number of entities for multi-byte data
153 int default_num_entities; // default number of entities for this data
154 int max_num_entities; // maximal number of entities for this data
155 char *default_string; // optional default string for string data
158 static struct LevelFileConfigInfo chunk_config_INFO[] =
160 // ---------- values not related to single elements -------------------------
163 -1, SAVE_CONF_ALWAYS,
164 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
165 &li.game_engine_type, GAME_ENGINE_TYPE_RND
169 -1, SAVE_CONF_ALWAYS,
170 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
171 &li.fieldx, STD_LEV_FIELDX
174 -1, SAVE_CONF_ALWAYS,
175 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
176 &li.fieldy, STD_LEV_FIELDY
180 -1, SAVE_CONF_ALWAYS,
181 TYPE_INTEGER, CONF_VALUE_16_BIT(3),
186 -1, SAVE_CONF_ALWAYS,
187 TYPE_INTEGER, CONF_VALUE_16_BIT(4),
193 TYPE_INTEGER, CONF_VALUE_32_BIT(2),
199 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
200 &li.use_step_counter, FALSE
205 TYPE_BITFIELD, CONF_VALUE_8_BIT(4),
206 &li.wind_direction_initial, MV_NONE
211 TYPE_BOOLEAN, CONF_VALUE_8_BIT(5),
212 &li.em_slippery_gems, FALSE
217 TYPE_BOOLEAN, CONF_VALUE_8_BIT(6),
218 &li.use_custom_template, FALSE
223 TYPE_BITFIELD, CONF_VALUE_32_BIT(1),
224 &li.can_move_into_acid_bits, ~0 // default: everything can
229 TYPE_BITFIELD, CONF_VALUE_8_BIT(7),
230 &li.dont_collide_with_bits, ~0 // default: always deadly
235 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
236 &li.em_explodes_by_fire, FALSE
241 TYPE_INTEGER, CONF_VALUE_16_BIT(5),
242 &li.score[SC_TIME_BONUS], 1
247 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
248 &li.auto_exit_sokoban, FALSE
253 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
254 &li.auto_count_gems, FALSE
259 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
260 &li.solved_by_one_player, FALSE
265 TYPE_INTEGER, CONF_VALUE_8_BIT(12),
266 &li.time_score_base, 1
271 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
272 &li.rate_time_over_score, FALSE
282 static struct LevelFileConfigInfo chunk_config_ELEM[] =
284 // (these values are the same for each player)
287 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
288 &li.block_last_field, FALSE // default case for EM levels
292 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
293 &li.sp_block_last_field, TRUE // default case for SP levels
297 TYPE_BOOLEAN, CONF_VALUE_8_BIT(3),
298 &li.instant_relocation, FALSE
302 TYPE_BOOLEAN, CONF_VALUE_8_BIT(4),
303 &li.can_pass_to_walkable, FALSE
307 TYPE_BOOLEAN, CONF_VALUE_8_BIT(5),
308 &li.block_snap_field, TRUE
312 TYPE_BOOLEAN, CONF_VALUE_8_BIT(6),
313 &li.continuous_snapping, TRUE
317 TYPE_BOOLEAN, CONF_VALUE_8_BIT(12),
318 &li.shifted_relocation, FALSE
322 TYPE_BOOLEAN, CONF_VALUE_8_BIT(15),
323 &li.lazy_relocation, FALSE
327 TYPE_BOOLEAN, CONF_VALUE_8_BIT(16),
328 &li.finish_dig_collect, TRUE
332 TYPE_BOOLEAN, CONF_VALUE_8_BIT(17),
333 &li.keep_walkable_ce, FALSE
336 // (these values are different for each player)
339 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
340 &li.initial_player_stepsize[0], STEPSIZE_NORMAL
344 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
345 &li.initial_player_gravity[0], FALSE
349 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
350 &li.use_start_element[0], FALSE
354 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
355 &li.start_element[0], EL_PLAYER_1
359 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
360 &li.use_artwork_element[0], FALSE
364 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
365 &li.artwork_element[0], EL_PLAYER_1
369 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
370 &li.use_explosion_element[0], FALSE
374 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
375 &li.explosion_element[0], EL_PLAYER_1
379 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
380 &li.use_initial_inventory[0], FALSE
384 TYPE_BOOLEAN, CONF_VALUE_8_BIT(14),
385 &li.initial_inventory_size[0], 1
389 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
390 &li.initial_inventory_content[0][0],EL_EMPTY, NULL,
391 &li.initial_inventory_size[0], 1, MAX_INITIAL_INVENTORY_SIZE
396 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
397 &li.initial_player_stepsize[1], STEPSIZE_NORMAL
401 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
402 &li.initial_player_gravity[1], FALSE
406 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
407 &li.use_start_element[1], FALSE
411 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
412 &li.start_element[1], EL_PLAYER_2
416 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
417 &li.use_artwork_element[1], FALSE
421 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
422 &li.artwork_element[1], EL_PLAYER_2
426 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
427 &li.use_explosion_element[1], FALSE
431 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
432 &li.explosion_element[1], EL_PLAYER_2
436 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
437 &li.use_initial_inventory[1], FALSE
441 TYPE_BOOLEAN, CONF_VALUE_8_BIT(14),
442 &li.initial_inventory_size[1], 1
446 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
447 &li.initial_inventory_content[1][0],EL_EMPTY, NULL,
448 &li.initial_inventory_size[1], 1, MAX_INITIAL_INVENTORY_SIZE
453 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
454 &li.initial_player_stepsize[2], STEPSIZE_NORMAL
458 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
459 &li.initial_player_gravity[2], FALSE
463 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
464 &li.use_start_element[2], FALSE
468 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
469 &li.start_element[2], EL_PLAYER_3
473 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
474 &li.use_artwork_element[2], FALSE
478 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
479 &li.artwork_element[2], EL_PLAYER_3
483 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
484 &li.use_explosion_element[2], FALSE
488 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
489 &li.explosion_element[2], EL_PLAYER_3
493 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
494 &li.use_initial_inventory[2], FALSE
498 TYPE_BOOLEAN, CONF_VALUE_8_BIT(14),
499 &li.initial_inventory_size[2], 1
503 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
504 &li.initial_inventory_content[2][0],EL_EMPTY, NULL,
505 &li.initial_inventory_size[2], 1, MAX_INITIAL_INVENTORY_SIZE
510 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
511 &li.initial_player_stepsize[3], STEPSIZE_NORMAL
515 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
516 &li.initial_player_gravity[3], FALSE
520 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
521 &li.use_start_element[3], FALSE
525 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
526 &li.start_element[3], EL_PLAYER_4
530 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
531 &li.use_artwork_element[3], FALSE
535 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
536 &li.artwork_element[3], EL_PLAYER_4
540 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
541 &li.use_explosion_element[3], FALSE
545 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
546 &li.explosion_element[3], EL_PLAYER_4
550 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
551 &li.use_initial_inventory[3], FALSE
555 TYPE_BOOLEAN, CONF_VALUE_8_BIT(14),
556 &li.initial_inventory_size[3], 1
560 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
561 &li.initial_inventory_content[3][0],EL_EMPTY, NULL,
562 &li.initial_inventory_size[3], 1, MAX_INITIAL_INVENTORY_SIZE
567 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
568 &li.score[SC_EMERALD], 10
573 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
574 &li.score[SC_DIAMOND], 10
579 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
580 &li.score[SC_BUG], 10
585 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
586 &li.score[SC_SPACESHIP], 10
591 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
592 &li.score[SC_PACMAN], 10
597 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
598 &li.score[SC_NUT], 10
603 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
604 &li.score[SC_DYNAMITE], 10
609 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
610 &li.score[SC_KEY], 10
615 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
616 &li.score[SC_PEARL], 10
621 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
622 &li.score[SC_CRYSTAL], 10
627 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
628 &li.amoeba_content, EL_DIAMOND
632 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
637 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
638 &li.grow_into_diggable, TRUE
643 TYPE_CONTENT_LIST, CONF_VALUE_BYTES(1),
644 &li.yamyam_content, EL_ROCK, NULL,
645 &li.num_yamyam_contents, 4, MAX_ELEMENT_CONTENTS
649 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
650 &li.score[SC_YAMYAM], 10
655 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
656 &li.score[SC_ROBOT], 10
660 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
666 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
672 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
673 &li.time_magic_wall, 10
678 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
679 &li.game_of_life[0], 2
683 TYPE_INTEGER, CONF_VALUE_8_BIT(2),
684 &li.game_of_life[1], 3
688 TYPE_INTEGER, CONF_VALUE_8_BIT(3),
689 &li.game_of_life[2], 3
693 TYPE_INTEGER, CONF_VALUE_8_BIT(4),
694 &li.game_of_life[3], 3
698 TYPE_BOOLEAN, CONF_VALUE_8_BIT(5),
699 &li.use_life_bugs, FALSE
704 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
709 TYPE_INTEGER, CONF_VALUE_8_BIT(2),
714 TYPE_INTEGER, CONF_VALUE_8_BIT(3),
719 TYPE_INTEGER, CONF_VALUE_8_BIT(4),
724 EL_TIMEGATE_SWITCH, -1,
725 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
726 &li.time_timegate, 10
730 EL_LIGHT_SWITCH_ACTIVE, -1,
731 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
736 EL_SHIELD_NORMAL, -1,
737 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
738 &li.shield_normal_time, 10
741 EL_SHIELD_NORMAL, -1,
742 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
743 &li.score[SC_SHIELD], 10
747 EL_SHIELD_DEADLY, -1,
748 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
749 &li.shield_deadly_time, 10
752 EL_SHIELD_DEADLY, -1,
753 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
754 &li.score[SC_SHIELD], 10
759 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
764 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
765 &li.extra_time_score, 10
769 EL_TIME_ORB_FULL, -1,
770 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
771 &li.time_orb_time, 10
774 EL_TIME_ORB_FULL, -1,
775 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
776 &li.use_time_orb_bug, FALSE
781 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
782 &li.use_spring_bug, FALSE
787 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
788 &li.android_move_time, 10
792 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
793 &li.android_clone_time, 10
796 EL_EMC_ANDROID, SAVE_CONF_NEVER,
797 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(1),
798 &li.android_clone_element[0], EL_EMPTY, NULL,
799 &li.num_android_clone_elements, 1, MAX_ANDROID_ELEMENTS_OLD
803 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(2),
804 &li.android_clone_element[0], EL_EMPTY, NULL,
805 &li.num_android_clone_elements, 1, MAX_ANDROID_ELEMENTS
810 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
815 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
820 EL_EMC_MAGNIFIER, -1,
821 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
822 &li.magnify_score, 10
825 EL_EMC_MAGNIFIER, -1,
826 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
831 EL_EMC_MAGIC_BALL, -1,
832 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
836 EL_EMC_MAGIC_BALL, -1,
837 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
838 &li.ball_random, FALSE
841 EL_EMC_MAGIC_BALL, -1,
842 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
843 &li.ball_active_initial, FALSE
846 EL_EMC_MAGIC_BALL, -1,
847 TYPE_CONTENT_LIST, CONF_VALUE_BYTES(1),
848 &li.ball_content, EL_EMPTY, NULL,
849 &li.num_ball_contents, 4, MAX_ELEMENT_CONTENTS
853 EL_SOKOBAN_FIELD_EMPTY, -1,
854 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
855 &li.sb_fields_needed, TRUE
859 EL_SOKOBAN_OBJECT, -1,
860 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
861 &li.sb_objects_needed, TRUE
866 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
867 &li.mm_laser_red, FALSE
871 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
872 &li.mm_laser_green, FALSE
876 TYPE_BOOLEAN, CONF_VALUE_8_BIT(3),
877 &li.mm_laser_blue, TRUE
882 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
883 &li.df_laser_red, TRUE
887 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
888 &li.df_laser_green, TRUE
892 TYPE_BOOLEAN, CONF_VALUE_8_BIT(3),
893 &li.df_laser_blue, FALSE
897 EL_MM_FUSE_ACTIVE, -1,
898 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
903 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
908 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
912 EL_MM_STEEL_BLOCK, -1,
913 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
914 &li.mm_time_block, 75
918 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
919 &li.score[SC_ELEM_BONUS], 10
922 // ---------- unused values -------------------------------------------------
925 EL_UNKNOWN, SAVE_CONF_NEVER,
926 TYPE_INTEGER, CONF_VALUE_16_BIT(1),
927 &li.score[SC_UNKNOWN_15], 10
937 static struct LevelFileConfigInfo chunk_config_NOTE[] =
941 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
942 &xx_envelope.xsize, MAX_ENVELOPE_XSIZE,
946 TYPE_INTEGER, CONF_VALUE_8_BIT(2),
947 &xx_envelope.ysize, MAX_ENVELOPE_YSIZE,
952 TYPE_BOOLEAN, CONF_VALUE_8_BIT(3),
953 &xx_envelope.autowrap, FALSE
957 TYPE_BOOLEAN, CONF_VALUE_8_BIT(4),
958 &xx_envelope.centered, FALSE
963 TYPE_STRING, CONF_VALUE_BYTES(1),
964 &xx_envelope.text, -1, NULL,
965 &xx_string_length_unused, -1, MAX_ENVELOPE_TEXT_LEN,
966 &xx_default_string_empty[0]
976 static struct LevelFileConfigInfo chunk_config_CUSX_base[] =
980 TYPE_STRING, CONF_VALUE_BYTES(1),
981 &xx_ei.description[0], -1,
982 &yy_ei.description[0],
983 &xx_string_length_unused, -1, MAX_ELEMENT_NAME_LEN,
984 &xx_default_description[0]
989 TYPE_BITFIELD, CONF_VALUE_32_BIT(1),
990 &xx_ei.properties[EP_BITFIELD_BASE_NR], EP_BITMASK_BASE_DEFAULT,
991 &yy_ei.properties[EP_BITFIELD_BASE_NR]
993 #if ENABLE_RESERVED_CODE
994 // (reserved for later use)
997 TYPE_BITFIELD, CONF_VALUE_32_BIT(2),
998 &xx_ei.properties[EP_BITFIELD_BASE_NR + 1], EP_BITMASK_DEFAULT,
999 &yy_ei.properties[EP_BITFIELD_BASE_NR + 1]
1005 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
1006 &xx_ei.use_gfx_element, FALSE,
1007 &yy_ei.use_gfx_element
1011 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
1012 &xx_ei.gfx_element_initial, EL_EMPTY_SPACE,
1013 &yy_ei.gfx_element_initial
1018 TYPE_BITFIELD, CONF_VALUE_8_BIT(2),
1019 &xx_ei.access_direction, MV_ALL_DIRECTIONS,
1020 &yy_ei.access_direction
1025 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
1026 &xx_ei.collect_score_initial, 10,
1027 &yy_ei.collect_score_initial
1031 TYPE_INTEGER, CONF_VALUE_16_BIT(3),
1032 &xx_ei.collect_count_initial, 1,
1033 &yy_ei.collect_count_initial
1038 TYPE_INTEGER, CONF_VALUE_16_BIT(4),
1039 &xx_ei.ce_value_fixed_initial, 0,
1040 &yy_ei.ce_value_fixed_initial
1044 TYPE_INTEGER, CONF_VALUE_16_BIT(5),
1045 &xx_ei.ce_value_random_initial, 0,
1046 &yy_ei.ce_value_random_initial
1050 TYPE_BOOLEAN, CONF_VALUE_8_BIT(3),
1051 &xx_ei.use_last_ce_value, FALSE,
1052 &yy_ei.use_last_ce_value
1057 TYPE_INTEGER, CONF_VALUE_16_BIT(6),
1058 &xx_ei.push_delay_fixed, 8,
1059 &yy_ei.push_delay_fixed
1063 TYPE_INTEGER, CONF_VALUE_16_BIT(7),
1064 &xx_ei.push_delay_random, 8,
1065 &yy_ei.push_delay_random
1069 TYPE_INTEGER, CONF_VALUE_16_BIT(8),
1070 &xx_ei.drop_delay_fixed, 0,
1071 &yy_ei.drop_delay_fixed
1075 TYPE_INTEGER, CONF_VALUE_16_BIT(9),
1076 &xx_ei.drop_delay_random, 0,
1077 &yy_ei.drop_delay_random
1081 TYPE_INTEGER, CONF_VALUE_16_BIT(10),
1082 &xx_ei.move_delay_fixed, 0,
1083 &yy_ei.move_delay_fixed
1087 TYPE_INTEGER, CONF_VALUE_16_BIT(11),
1088 &xx_ei.move_delay_random, 0,
1089 &yy_ei.move_delay_random
1093 TYPE_INTEGER, CONF_VALUE_16_BIT(16),
1094 &xx_ei.step_delay_fixed, 0,
1095 &yy_ei.step_delay_fixed
1099 TYPE_INTEGER, CONF_VALUE_16_BIT(17),
1100 &xx_ei.step_delay_random, 0,
1101 &yy_ei.step_delay_random
1106 TYPE_BITFIELD, CONF_VALUE_32_BIT(3),
1107 &xx_ei.move_pattern, MV_ALL_DIRECTIONS,
1112 TYPE_BITFIELD, CONF_VALUE_8_BIT(4),
1113 &xx_ei.move_direction_initial, MV_START_AUTOMATIC,
1114 &yy_ei.move_direction_initial
1118 TYPE_INTEGER, CONF_VALUE_8_BIT(5),
1119 &xx_ei.move_stepsize, TILEX / 8,
1120 &yy_ei.move_stepsize
1125 TYPE_ELEMENT, CONF_VALUE_16_BIT(12),
1126 &xx_ei.move_enter_element, EL_EMPTY_SPACE,
1127 &yy_ei.move_enter_element
1131 TYPE_ELEMENT, CONF_VALUE_16_BIT(13),
1132 &xx_ei.move_leave_element, EL_EMPTY_SPACE,
1133 &yy_ei.move_leave_element
1137 TYPE_INTEGER, CONF_VALUE_8_BIT(6),
1138 &xx_ei.move_leave_type, LEAVE_TYPE_UNLIMITED,
1139 &yy_ei.move_leave_type
1144 TYPE_INTEGER, CONF_VALUE_8_BIT(7),
1145 &xx_ei.slippery_type, SLIPPERY_ANY_RANDOM,
1146 &yy_ei.slippery_type
1151 TYPE_INTEGER, CONF_VALUE_8_BIT(8),
1152 &xx_ei.explosion_type, EXPLODES_3X3,
1153 &yy_ei.explosion_type
1157 TYPE_INTEGER, CONF_VALUE_16_BIT(14),
1158 &xx_ei.explosion_delay, 16,
1159 &yy_ei.explosion_delay
1163 TYPE_INTEGER, CONF_VALUE_16_BIT(15),
1164 &xx_ei.ignition_delay, 8,
1165 &yy_ei.ignition_delay
1170 TYPE_CONTENT_LIST, CONF_VALUE_BYTES(2),
1171 &xx_ei.content, EL_EMPTY_SPACE,
1173 &xx_num_contents, 1, 1
1176 // ---------- "num_change_pages" must be the last entry ---------------------
1179 -1, SAVE_CONF_ALWAYS,
1180 TYPE_INTEGER, CONF_VALUE_8_BIT(9),
1181 &xx_ei.num_change_pages, 1,
1182 &yy_ei.num_change_pages
1193 static struct LevelFileConfigInfo chunk_config_CUSX_change[] =
1195 // ---------- "current_change_page" must be the first entry -----------------
1198 -1, SAVE_CONF_ALWAYS,
1199 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
1200 &xx_current_change_page, -1
1203 // ---------- (the remaining entries can be in any order) -------------------
1207 TYPE_BOOLEAN, CONF_VALUE_8_BIT(2),
1208 &xx_change.can_change, FALSE
1213 TYPE_BITFIELD, CONF_VALUE_32_BIT(1),
1214 &xx_event_bits[0], 0
1218 TYPE_BITFIELD, CONF_VALUE_32_BIT(2),
1219 &xx_event_bits[1], 0
1224 TYPE_BITFIELD, CONF_VALUE_8_BIT(3),
1225 &xx_change.trigger_player, CH_PLAYER_ANY
1229 TYPE_BITFIELD, CONF_VALUE_8_BIT(4),
1230 &xx_change.trigger_side, CH_SIDE_ANY
1234 TYPE_BITFIELD, CONF_VALUE_32_BIT(3),
1235 &xx_change.trigger_page, CH_PAGE_ANY
1240 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
1241 &xx_change.target_element, EL_EMPTY_SPACE
1246 TYPE_INTEGER, CONF_VALUE_16_BIT(2),
1247 &xx_change.delay_fixed, 0
1251 TYPE_INTEGER, CONF_VALUE_16_BIT(3),
1252 &xx_change.delay_random, 0
1256 TYPE_INTEGER, CONF_VALUE_16_BIT(4),
1257 &xx_change.delay_frames, FRAMES_PER_SECOND
1262 TYPE_ELEMENT, CONF_VALUE_16_BIT(5),
1263 &xx_change.initial_trigger_element, EL_EMPTY_SPACE
1268 TYPE_BOOLEAN, CONF_VALUE_8_BIT(6),
1269 &xx_change.explode, FALSE
1273 TYPE_BOOLEAN, CONF_VALUE_8_BIT(7),
1274 &xx_change.use_target_content, FALSE
1278 TYPE_BOOLEAN, CONF_VALUE_8_BIT(8),
1279 &xx_change.only_if_complete, FALSE
1283 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
1284 &xx_change.use_random_replace, FALSE
1288 TYPE_INTEGER, CONF_VALUE_8_BIT(10),
1289 &xx_change.random_percentage, 100
1293 TYPE_INTEGER, CONF_VALUE_8_BIT(11),
1294 &xx_change.replace_when, CP_WHEN_EMPTY
1299 TYPE_BOOLEAN, CONF_VALUE_8_BIT(12),
1300 &xx_change.has_action, FALSE
1304 TYPE_INTEGER, CONF_VALUE_8_BIT(13),
1305 &xx_change.action_type, CA_NO_ACTION
1309 TYPE_INTEGER, CONF_VALUE_8_BIT(14),
1310 &xx_change.action_mode, CA_MODE_UNDEFINED
1314 TYPE_INTEGER, CONF_VALUE_16_BIT(6),
1315 &xx_change.action_arg, CA_ARG_UNDEFINED
1320 TYPE_ELEMENT, CONF_VALUE_16_BIT(7),
1321 &xx_change.action_element, EL_EMPTY_SPACE
1326 TYPE_CONTENT_LIST, CONF_VALUE_BYTES(1),
1327 &xx_change.target_content, EL_EMPTY_SPACE, NULL,
1328 &xx_num_contents, 1, 1
1338 static struct LevelFileConfigInfo chunk_config_GRPX[] =
1342 TYPE_STRING, CONF_VALUE_BYTES(1),
1343 &xx_ei.description[0], -1, NULL,
1344 &xx_string_length_unused, -1, MAX_ELEMENT_NAME_LEN,
1345 &xx_default_description[0]
1350 TYPE_BOOLEAN, CONF_VALUE_8_BIT(1),
1351 &xx_ei.use_gfx_element, FALSE
1355 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
1356 &xx_ei.gfx_element_initial, EL_EMPTY_SPACE
1361 TYPE_INTEGER, CONF_VALUE_8_BIT(2),
1362 &xx_group.choice_mode, ANIM_RANDOM
1367 TYPE_ELEMENT_LIST, CONF_VALUE_BYTES(2),
1368 &xx_group.element[0], EL_EMPTY_SPACE, NULL,
1369 &xx_group.num_elements, 1, MAX_ELEMENTS_IN_GROUP
1379 static struct LevelFileConfigInfo chunk_config_CONF[] = // (OBSOLETE)
1383 TYPE_BOOLEAN, CONF_VALUE_8_BIT(9),
1384 &li.block_snap_field, TRUE
1388 TYPE_BOOLEAN, CONF_VALUE_8_BIT(13),
1389 &li.continuous_snapping, TRUE
1393 TYPE_INTEGER, CONF_VALUE_8_BIT(1),
1394 &li.initial_player_stepsize[0], STEPSIZE_NORMAL
1398 TYPE_BOOLEAN, CONF_VALUE_8_BIT(10),
1399 &li.use_start_element[0], FALSE
1403 TYPE_ELEMENT, CONF_VALUE_16_BIT(1),
1404 &li.start_element[0], EL_PLAYER_1
1408 TYPE_BOOLEAN, CONF_VALUE_8_BIT(11),
1409 &li.use_artwork_element[0], FALSE
1413 TYPE_ELEMENT, CONF_VALUE_16_BIT(2),
1414 &li.artwork_element[0], EL_PLAYER_1
1418 TYPE_BOOLEAN, CONF_VALUE_8_BIT(12),
1419 &li.use_explosion_element[0], FALSE
1423 TYPE_ELEMENT, CONF_VALUE_16_BIT(3),
1424 &li.explosion_element[0], EL_PLAYER_1
1439 filetype_id_list[] =
1441 { LEVEL_FILE_TYPE_RND, "RND" },
1442 { LEVEL_FILE_TYPE_BD, "BD" },
1443 { LEVEL_FILE_TYPE_EM, "EM" },
1444 { LEVEL_FILE_TYPE_SP, "SP" },
1445 { LEVEL_FILE_TYPE_DX, "DX" },
1446 { LEVEL_FILE_TYPE_SB, "SB" },
1447 { LEVEL_FILE_TYPE_DC, "DC" },
1448 { LEVEL_FILE_TYPE_MM, "MM" },
1449 { LEVEL_FILE_TYPE_MM, "DF" },
1454 // ============================================================================
1455 // level file functions
1456 // ============================================================================
1458 static boolean check_special_flags(char *flag)
1460 if (strEqual(options.special_flags, flag) ||
1461 strEqual(leveldir_current->special_flags, flag))
1467 static struct DateInfo getCurrentDate(void)
1469 time_t epoch_seconds = time(NULL);
1470 struct tm *now = localtime(&epoch_seconds);
1471 struct DateInfo date;
1473 date.year = now->tm_year + 1900;
1474 date.month = now->tm_mon + 1;
1475 date.day = now->tm_mday;
1477 date.src = DATE_SRC_CLOCK;
1482 static void resetEventFlags(struct ElementChangeInfo *change)
1486 for (i = 0; i < NUM_CHANGE_EVENTS; i++)
1487 change->has_event[i] = FALSE;
1490 static void resetEventBits(void)
1494 for (i = 0; i < NUM_CE_BITFIELDS; i++)
1495 xx_event_bits[i] = 0;
1498 static void setEventFlagsFromEventBits(struct ElementChangeInfo *change)
1502 /* important: only change event flag if corresponding event bit is set
1503 (this is because all xx_event_bits[] values are loaded separately,
1504 and all xx_event_bits[] values are set back to zero before loading
1505 another value xx_event_bits[x] (each value representing 32 flags)) */
1507 for (i = 0; i < NUM_CHANGE_EVENTS; i++)
1508 if (xx_event_bits[CH_EVENT_BITFIELD_NR(i)] & CH_EVENT_BIT(i))
1509 change->has_event[i] = TRUE;
1512 static void setEventBitsFromEventFlags(struct ElementChangeInfo *change)
1516 /* in contrast to the above function setEventFlagsFromEventBits(), it
1517 would also be possible to set all bits in xx_event_bits[] to 0 or 1
1518 depending on the corresponding change->has_event[i] values here, as
1519 all xx_event_bits[] values are reset in resetEventBits() before */
1521 for (i = 0; i < NUM_CHANGE_EVENTS; i++)
1522 if (change->has_event[i])
1523 xx_event_bits[CH_EVENT_BITFIELD_NR(i)] |= CH_EVENT_BIT(i);
1526 static char *getDefaultElementDescription(struct ElementInfo *ei)
1528 static char description[MAX_ELEMENT_NAME_LEN + 1];
1529 char *default_description = (ei->custom_description != NULL ?
1530 ei->custom_description :
1531 ei->editor_description);
1534 // always start with reliable default values
1535 for (i = 0; i < MAX_ELEMENT_NAME_LEN + 1; i++)
1536 description[i] = '\0';
1538 // truncate element description to MAX_ELEMENT_NAME_LEN bytes
1539 strncpy(description, default_description, MAX_ELEMENT_NAME_LEN);
1541 return &description[0];
1544 static void setElementDescriptionToDefault(struct ElementInfo *ei)
1546 char *default_description = getDefaultElementDescription(ei);
1549 for (i = 0; i < MAX_ELEMENT_NAME_LEN + 1; i++)
1550 ei->description[i] = default_description[i];
1553 static void setConfigToDefaultsFromConfigList(struct LevelFileConfigInfo *conf)
1557 for (i = 0; conf[i].data_type != -1; i++)
1559 int default_value = conf[i].default_value;
1560 int data_type = conf[i].data_type;
1561 int conf_type = conf[i].conf_type;
1562 int byte_mask = conf_type & CONF_MASK_BYTES;
1564 if (byte_mask == CONF_MASK_MULTI_BYTES)
1566 int default_num_entities = conf[i].default_num_entities;
1567 int max_num_entities = conf[i].max_num_entities;
1569 *(int *)(conf[i].num_entities) = default_num_entities;
1571 if (data_type == TYPE_STRING)
1573 char *default_string = conf[i].default_string;
1574 char *string = (char *)(conf[i].value);
1576 strncpy(string, default_string, max_num_entities);
1578 else if (data_type == TYPE_ELEMENT_LIST)
1580 int *element_array = (int *)(conf[i].value);
1583 for (j = 0; j < max_num_entities; j++)
1584 element_array[j] = default_value;
1586 else if (data_type == TYPE_CONTENT_LIST)
1588 struct Content *content = (struct Content *)(conf[i].value);
1591 for (c = 0; c < max_num_entities; c++)
1592 for (y = 0; y < 3; y++)
1593 for (x = 0; x < 3; x++)
1594 content[c].e[x][y] = default_value;
1597 else // constant size configuration data (1, 2 or 4 bytes)
1599 if (data_type == TYPE_BOOLEAN)
1600 *(boolean *)(conf[i].value) = default_value;
1602 *(int *) (conf[i].value) = default_value;
1607 static void copyConfigFromConfigList(struct LevelFileConfigInfo *conf)
1611 for (i = 0; conf[i].data_type != -1; i++)
1613 int data_type = conf[i].data_type;
1614 int conf_type = conf[i].conf_type;
1615 int byte_mask = conf_type & CONF_MASK_BYTES;
1617 if (byte_mask == CONF_MASK_MULTI_BYTES)
1619 int max_num_entities = conf[i].max_num_entities;
1621 if (data_type == TYPE_STRING)
1623 char *string = (char *)(conf[i].value);
1624 char *string_copy = (char *)(conf[i].value_copy);
1626 strncpy(string_copy, string, max_num_entities);
1628 else if (data_type == TYPE_ELEMENT_LIST)
1630 int *element_array = (int *)(conf[i].value);
1631 int *element_array_copy = (int *)(conf[i].value_copy);
1634 for (j = 0; j < max_num_entities; j++)
1635 element_array_copy[j] = element_array[j];
1637 else if (data_type == TYPE_CONTENT_LIST)
1639 struct Content *content = (struct Content *)(conf[i].value);
1640 struct Content *content_copy = (struct Content *)(conf[i].value_copy);
1643 for (c = 0; c < max_num_entities; c++)
1644 for (y = 0; y < 3; y++)
1645 for (x = 0; x < 3; x++)
1646 content_copy[c].e[x][y] = content[c].e[x][y];
1649 else // constant size configuration data (1, 2 or 4 bytes)
1651 if (data_type == TYPE_BOOLEAN)
1652 *(boolean *)(conf[i].value_copy) = *(boolean *)(conf[i].value);
1654 *(int *) (conf[i].value_copy) = *(int *) (conf[i].value);
1659 void copyElementInfo(struct ElementInfo *ei_from, struct ElementInfo *ei_to)
1663 xx_ei = *ei_from; // copy element data into temporary buffer
1664 yy_ei = *ei_to; // copy element data into temporary buffer
1666 copyConfigFromConfigList(chunk_config_CUSX_base);
1671 // ---------- reinitialize and copy change pages ----------
1673 ei_to->num_change_pages = ei_from->num_change_pages;
1674 ei_to->current_change_page = ei_from->current_change_page;
1676 setElementChangePages(ei_to, ei_to->num_change_pages);
1678 for (i = 0; i < ei_to->num_change_pages; i++)
1679 ei_to->change_page[i] = ei_from->change_page[i];
1681 // ---------- copy group element info ----------
1682 if (ei_from->group != NULL && ei_to->group != NULL) // group or internal
1683 *ei_to->group = *ei_from->group;
1685 // mark this custom element as modified
1686 ei_to->modified_settings = TRUE;
1689 void setElementChangePages(struct ElementInfo *ei, int change_pages)
1691 int change_page_size = sizeof(struct ElementChangeInfo);
1693 ei->num_change_pages = MAX(1, change_pages);
1696 checked_realloc(ei->change_page, ei->num_change_pages * change_page_size);
1698 if (ei->current_change_page >= ei->num_change_pages)
1699 ei->current_change_page = ei->num_change_pages - 1;
1701 ei->change = &ei->change_page[ei->current_change_page];
1704 void setElementChangeInfoToDefaults(struct ElementChangeInfo *change)
1706 xx_change = *change; // copy change data into temporary buffer
1708 setConfigToDefaultsFromConfigList(chunk_config_CUSX_change);
1710 *change = xx_change;
1712 resetEventFlags(change);
1714 change->direct_action = 0;
1715 change->other_action = 0;
1717 change->pre_change_function = NULL;
1718 change->change_function = NULL;
1719 change->post_change_function = NULL;
1722 static void setLevelInfoToDefaults_Level(struct LevelInfo *level)
1726 li = *level; // copy level data into temporary buffer
1727 setConfigToDefaultsFromConfigList(chunk_config_INFO);
1728 *level = li; // copy temporary buffer back to level data
1730 setLevelInfoToDefaults_EM();
1731 setLevelInfoToDefaults_SP();
1732 setLevelInfoToDefaults_MM();
1734 level->native_em_level = &native_em_level;
1735 level->native_sp_level = &native_sp_level;
1736 level->native_mm_level = &native_mm_level;
1738 level->file_version = FILE_VERSION_ACTUAL;
1739 level->game_version = GAME_VERSION_ACTUAL;
1741 level->creation_date = getCurrentDate();
1743 level->encoding_16bit_field = TRUE;
1744 level->encoding_16bit_yamyam = TRUE;
1745 level->encoding_16bit_amoeba = TRUE;
1747 // clear level name and level author string buffers
1748 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
1749 level->name[i] = '\0';
1750 for (i = 0; i < MAX_LEVEL_AUTHOR_LEN; i++)
1751 level->author[i] = '\0';
1753 // set level name and level author to default values
1754 strcpy(level->name, NAMELESS_LEVEL_NAME);
1755 strcpy(level->author, ANONYMOUS_NAME);
1757 // set level playfield to playable default level with player and exit
1758 for (x = 0; x < MAX_LEV_FIELDX; x++)
1759 for (y = 0; y < MAX_LEV_FIELDY; y++)
1760 level->field[x][y] = EL_SAND;
1762 level->field[0][0] = EL_PLAYER_1;
1763 level->field[STD_LEV_FIELDX - 1][STD_LEV_FIELDY - 1] = EL_EXIT_CLOSED;
1765 BorderElement = EL_STEELWALL;
1767 // detect custom elements when loading them
1768 level->file_has_custom_elements = FALSE;
1770 // set all bug compatibility flags to "false" => do not emulate this bug
1771 level->use_action_after_change_bug = FALSE;
1773 if (leveldir_current)
1775 // try to determine better author name than 'anonymous'
1776 if (!strEqual(leveldir_current->author, ANONYMOUS_NAME))
1778 strncpy(level->author, leveldir_current->author, MAX_LEVEL_AUTHOR_LEN);
1779 level->author[MAX_LEVEL_AUTHOR_LEN] = '\0';
1783 switch (LEVELCLASS(leveldir_current))
1785 case LEVELCLASS_TUTORIAL:
1786 strcpy(level->author, PROGRAM_AUTHOR_STRING);
1789 case LEVELCLASS_CONTRIB:
1790 strncpy(level->author, leveldir_current->name, MAX_LEVEL_AUTHOR_LEN);
1791 level->author[MAX_LEVEL_AUTHOR_LEN] = '\0';
1794 case LEVELCLASS_PRIVATE:
1795 strncpy(level->author, getRealName(), MAX_LEVEL_AUTHOR_LEN);
1796 level->author[MAX_LEVEL_AUTHOR_LEN] = '\0';
1800 // keep default value
1807 static void setLevelInfoToDefaults_Elements(struct LevelInfo *level)
1809 static boolean clipboard_elements_initialized = FALSE;
1812 InitElementPropertiesStatic();
1814 li = *level; // copy level data into temporary buffer
1815 setConfigToDefaultsFromConfigList(chunk_config_ELEM);
1816 *level = li; // copy temporary buffer back to level data
1818 for (i = 0; i < MAX_NUM_ELEMENTS; i++)
1821 struct ElementInfo *ei = &element_info[element];
1823 // never initialize clipboard elements after the very first time
1824 // (to be able to use clipboard elements between several levels)
1825 if (IS_CLIPBOARD_ELEMENT(element) && clipboard_elements_initialized)
1828 if (IS_ENVELOPE(element))
1830 int envelope_nr = element - EL_ENVELOPE_1;
1832 setConfigToDefaultsFromConfigList(chunk_config_NOTE);
1834 level->envelope[envelope_nr] = xx_envelope;
1837 if (IS_CUSTOM_ELEMENT(element) ||
1838 IS_GROUP_ELEMENT(element) ||
1839 IS_INTERNAL_ELEMENT(element))
1841 xx_ei = *ei; // copy element data into temporary buffer
1843 setConfigToDefaultsFromConfigList(chunk_config_CUSX_base);
1848 setElementChangePages(ei, 1);
1849 setElementChangeInfoToDefaults(ei->change);
1851 if (IS_CUSTOM_ELEMENT(element) ||
1852 IS_GROUP_ELEMENT(element) ||
1853 IS_INTERNAL_ELEMENT(element))
1855 setElementDescriptionToDefault(ei);
1857 ei->modified_settings = FALSE;
1860 if (IS_CUSTOM_ELEMENT(element) ||
1861 IS_INTERNAL_ELEMENT(element))
1863 // internal values used in level editor
1865 ei->access_type = 0;
1866 ei->access_layer = 0;
1867 ei->access_protected = 0;
1868 ei->walk_to_action = 0;
1869 ei->smash_targets = 0;
1872 ei->can_explode_by_fire = FALSE;
1873 ei->can_explode_smashed = FALSE;
1874 ei->can_explode_impact = FALSE;
1876 ei->current_change_page = 0;
1879 if (IS_GROUP_ELEMENT(element) ||
1880 IS_INTERNAL_ELEMENT(element))
1882 struct ElementGroupInfo *group;
1884 // initialize memory for list of elements in group
1885 if (ei->group == NULL)
1886 ei->group = checked_malloc(sizeof(struct ElementGroupInfo));
1890 xx_group = *group; // copy group data into temporary buffer
1892 setConfigToDefaultsFromConfigList(chunk_config_GRPX);
1898 clipboard_elements_initialized = TRUE;
1901 static void setLevelInfoToDefaults(struct LevelInfo *level,
1902 boolean level_info_only,
1903 boolean reset_file_status)
1905 setLevelInfoToDefaults_Level(level);
1907 if (!level_info_only)
1908 setLevelInfoToDefaults_Elements(level);
1910 if (reset_file_status)
1912 level->no_valid_file = FALSE;
1913 level->no_level_file = FALSE;
1916 level->changed = FALSE;
1919 static void setFileInfoToDefaults(struct LevelFileInfo *level_file_info)
1921 level_file_info->nr = 0;
1922 level_file_info->type = LEVEL_FILE_TYPE_UNKNOWN;
1923 level_file_info->packed = FALSE;
1925 setString(&level_file_info->basename, NULL);
1926 setString(&level_file_info->filename, NULL);
1929 int getMappedElement_SB(int, boolean);
1931 static void ActivateLevelTemplate(void)
1935 if (check_special_flags("load_xsb_to_ces"))
1937 // fill smaller playfields with padding "beyond border wall" elements
1938 if (level.fieldx < level_template.fieldx ||
1939 level.fieldy < level_template.fieldy)
1941 short field[level.fieldx][level.fieldy];
1942 int new_fieldx = MAX(level.fieldx, level_template.fieldx);
1943 int new_fieldy = MAX(level.fieldy, level_template.fieldy);
1944 int pos_fieldx = (new_fieldx - level.fieldx) / 2;
1945 int pos_fieldy = (new_fieldy - level.fieldy) / 2;
1947 // copy old playfield (which is smaller than the visible area)
1948 for (y = 0; y < level.fieldy; y++) for (x = 0; x < level.fieldx; x++)
1949 field[x][y] = level.field[x][y];
1951 // fill new, larger playfield with "beyond border wall" elements
1952 for (y = 0; y < new_fieldy; y++) for (x = 0; x < new_fieldx; x++)
1953 level.field[x][y] = getMappedElement_SB('_', TRUE);
1955 // copy the old playfield to the middle of the new playfield
1956 for (y = 0; y < level.fieldy; y++) for (x = 0; x < level.fieldx; x++)
1957 level.field[pos_fieldx + x][pos_fieldy + y] = field[x][y];
1959 level.fieldx = new_fieldx;
1960 level.fieldy = new_fieldy;
1964 // Currently there is no special action needed to activate the template
1965 // data, because 'element_info' property settings overwrite the original
1966 // level data, while all other variables do not change.
1968 // Exception: 'from_level_template' elements in the original level playfield
1969 // are overwritten with the corresponding elements at the same position in
1970 // playfield from the level template.
1972 for (x = 0; x < level.fieldx; x++)
1973 for (y = 0; y < level.fieldy; y++)
1974 if (level.field[x][y] == EL_FROM_LEVEL_TEMPLATE)
1975 level.field[x][y] = level_template.field[x][y];
1977 if (check_special_flags("load_xsb_to_ces"))
1979 struct LevelInfo level_backup = level;
1981 // overwrite all individual level settings from template level settings
1982 level = level_template;
1984 // restore level file info
1985 level.file_info = level_backup.file_info;
1987 // restore playfield size
1988 level.fieldx = level_backup.fieldx;
1989 level.fieldy = level_backup.fieldy;
1991 // restore playfield content
1992 for (x = 0; x < level.fieldx; x++)
1993 for (y = 0; y < level.fieldy; y++)
1994 level.field[x][y] = level_backup.field[x][y];
1996 // restore name and author from individual level
1997 strcpy(level.name, level_backup.name);
1998 strcpy(level.author, level_backup.author);
2000 // restore flag "use_custom_template"
2001 level.use_custom_template = level_backup.use_custom_template;
2005 static char *getLevelFilenameFromBasename(char *basename)
2007 static char *filename = NULL;
2009 checked_free(filename);
2011 filename = getPath2(getCurrentLevelDir(), basename);
2016 static int getFileTypeFromBasename(char *basename)
2018 // !!! ALSO SEE COMMENT IN checkForPackageFromBasename() !!!
2020 static char *filename = NULL;
2021 struct stat file_status;
2023 // ---------- try to determine file type from filename ----------
2025 // check for typical filename of a Supaplex level package file
2026 if (strlen(basename) == 10 && strPrefixLower(basename, "levels.d"))
2027 return LEVEL_FILE_TYPE_SP;
2029 // check for typical filename of a Diamond Caves II level package file
2030 if (strSuffixLower(basename, ".dc") ||
2031 strSuffixLower(basename, ".dc2"))
2032 return LEVEL_FILE_TYPE_DC;
2034 // check for typical filename of a Sokoban level package file
2035 if (strSuffixLower(basename, ".xsb") &&
2036 strchr(basename, '%') == NULL)
2037 return LEVEL_FILE_TYPE_SB;
2039 // ---------- try to determine file type from filesize ----------
2041 checked_free(filename);
2042 filename = getPath2(getCurrentLevelDir(), basename);
2044 if (stat(filename, &file_status) == 0)
2046 // check for typical filesize of a Supaplex level package file
2047 if (file_status.st_size == 170496)
2048 return LEVEL_FILE_TYPE_SP;
2051 return LEVEL_FILE_TYPE_UNKNOWN;
2054 static int getFileTypeFromMagicBytes(char *filename, int type)
2058 if ((file = openFile(filename, MODE_READ)))
2060 char chunk_name[CHUNK_ID_LEN + 1];
2062 getFileChunkBE(file, chunk_name, NULL);
2064 if (strEqual(chunk_name, "MMII") ||
2065 strEqual(chunk_name, "MIRR"))
2066 type = LEVEL_FILE_TYPE_MM;
2074 static boolean checkForPackageFromBasename(char *basename)
2076 // !!! WON'T WORK ANYMORE IF getFileTypeFromBasename() ALSO DETECTS !!!
2077 // !!! SINGLE LEVELS (CURRENTLY ONLY DETECTS LEVEL PACKAGES !!!
2079 return (getFileTypeFromBasename(basename) != LEVEL_FILE_TYPE_UNKNOWN);
2082 static char *getSingleLevelBasenameExt(int nr, char *extension)
2084 static char basename[MAX_FILENAME_LEN];
2087 sprintf(basename, "%s", LEVELTEMPLATE_FILENAME);
2089 sprintf(basename, "%03d.%s", nr, extension);
2094 static char *getSingleLevelBasename(int nr)
2096 return getSingleLevelBasenameExt(nr, LEVELFILE_EXTENSION);
2099 static char *getPackedLevelBasename(int type)
2101 static char basename[MAX_FILENAME_LEN];
2102 char *directory = getCurrentLevelDir();
2104 DirectoryEntry *dir_entry;
2106 strcpy(basename, UNDEFINED_FILENAME); // default: undefined file
2108 if ((dir = openDirectory(directory)) == NULL)
2110 Warn("cannot read current level directory '%s'", directory);
2115 while ((dir_entry = readDirectory(dir)) != NULL) // loop all entries
2117 char *entry_basename = dir_entry->basename;
2118 int entry_type = getFileTypeFromBasename(entry_basename);
2120 if (entry_type != LEVEL_FILE_TYPE_UNKNOWN) // found valid level package
2122 if (type == LEVEL_FILE_TYPE_UNKNOWN ||
2125 strcpy(basename, entry_basename);
2132 closeDirectory(dir);
2137 static char *getSingleLevelFilename(int nr)
2139 return getLevelFilenameFromBasename(getSingleLevelBasename(nr));
2142 #if ENABLE_UNUSED_CODE
2143 static char *getPackedLevelFilename(int type)
2145 return getLevelFilenameFromBasename(getPackedLevelBasename(type));
2149 char *getDefaultLevelFilename(int nr)
2151 return getSingleLevelFilename(nr);
2154 #if ENABLE_UNUSED_CODE
2155 static void setLevelFileInfo_SingleLevelFilename(struct LevelFileInfo *lfi,
2159 lfi->packed = FALSE;
2161 setString(&lfi->basename, getSingleLevelBasename(lfi->nr, lfi->type));
2162 setString(&lfi->filename, getLevelFilenameFromBasename(lfi->basename));
2166 static void setLevelFileInfo_FormatLevelFilename(struct LevelFileInfo *lfi,
2167 int type, char *format, ...)
2169 static char basename[MAX_FILENAME_LEN];
2172 va_start(ap, format);
2173 vsprintf(basename, format, ap);
2177 lfi->packed = FALSE;
2179 setString(&lfi->basename, basename);
2180 setString(&lfi->filename, getLevelFilenameFromBasename(lfi->basename));
2183 static void setLevelFileInfo_PackedLevelFilename(struct LevelFileInfo *lfi,
2189 setString(&lfi->basename, getPackedLevelBasename(lfi->type));
2190 setString(&lfi->filename, getLevelFilenameFromBasename(lfi->basename));
2193 static int getFiletypeFromID(char *filetype_id)
2195 char *filetype_id_lower;
2196 int filetype = LEVEL_FILE_TYPE_UNKNOWN;
2199 if (filetype_id == NULL)
2200 return LEVEL_FILE_TYPE_UNKNOWN;
2202 filetype_id_lower = getStringToLower(filetype_id);
2204 for (i = 0; filetype_id_list[i].id != NULL; i++)
2206 char *id_lower = getStringToLower(filetype_id_list[i].id);
2208 if (strEqual(filetype_id_lower, id_lower))
2209 filetype = filetype_id_list[i].filetype;
2213 if (filetype != LEVEL_FILE_TYPE_UNKNOWN)
2217 free(filetype_id_lower);
2222 char *getLocalLevelTemplateFilename(void)
2224 return getDefaultLevelFilename(-1);
2227 char *getGlobalLevelTemplateFilename(void)
2229 // global variable "leveldir_current" must be modified in the loop below
2230 LevelDirTree *leveldir_current_last = leveldir_current;
2231 char *filename = NULL;
2233 // check for template level in path from current to topmost tree node
2235 while (leveldir_current != NULL)
2237 filename = getDefaultLevelFilename(-1);
2239 if (fileExists(filename))
2242 leveldir_current = leveldir_current->node_parent;
2245 // restore global variable "leveldir_current" modified in above loop
2246 leveldir_current = leveldir_current_last;
2251 static void determineLevelFileInfo_Filename(struct LevelFileInfo *lfi)
2255 // special case: level number is negative => check for level template file
2258 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_RND,
2259 getSingleLevelBasename(-1));
2261 // replace local level template filename with global template filename
2262 setString(&lfi->filename, getGlobalLevelTemplateFilename());
2264 // no fallback if template file not existing
2268 // special case: check for file name/pattern specified in "levelinfo.conf"
2269 if (leveldir_current->level_filename != NULL)
2271 int filetype = getFiletypeFromID(leveldir_current->level_filetype);
2273 setLevelFileInfo_FormatLevelFilename(lfi, filetype,
2274 leveldir_current->level_filename, nr);
2276 lfi->packed = checkForPackageFromBasename(leveldir_current->level_filename);
2278 if (fileExists(lfi->filename))
2281 else if (leveldir_current->level_filetype != NULL)
2283 int filetype = getFiletypeFromID(leveldir_current->level_filetype);
2285 // check for specified native level file with standard file name
2286 setLevelFileInfo_FormatLevelFilename(lfi, filetype,
2287 "%03d.%s", nr, LEVELFILE_EXTENSION);
2288 if (fileExists(lfi->filename))
2292 // check for native Rocks'n'Diamonds level file
2293 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_RND,
2294 "%03d.%s", nr, LEVELFILE_EXTENSION);
2295 if (fileExists(lfi->filename))
2298 // check for Emerald Mine level file (V1)
2299 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "a%c%c",
2300 'a' + (nr / 10) % 26, '0' + nr % 10);
2301 if (fileExists(lfi->filename))
2303 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "A%c%c",
2304 'A' + (nr / 10) % 26, '0' + nr % 10);
2305 if (fileExists(lfi->filename))
2308 // check for Emerald Mine level file (V2 to V5)
2309 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%d", nr);
2310 if (fileExists(lfi->filename))
2313 // check for Emerald Mine level file (V6 / single mode)
2314 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02ds", nr);
2315 if (fileExists(lfi->filename))
2317 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02dS", nr);
2318 if (fileExists(lfi->filename))
2321 // check for Emerald Mine level file (V6 / teamwork mode)
2322 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02dt", nr);
2323 if (fileExists(lfi->filename))
2325 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_EM, "%02dT", nr);
2326 if (fileExists(lfi->filename))
2329 // check for various packed level file formats
2330 setLevelFileInfo_PackedLevelFilename(lfi, LEVEL_FILE_TYPE_UNKNOWN);
2331 if (fileExists(lfi->filename))
2334 // no known level file found -- use default values (and fail later)
2335 setLevelFileInfo_FormatLevelFilename(lfi, LEVEL_FILE_TYPE_RND,
2336 "%03d.%s", nr, LEVELFILE_EXTENSION);
2339 static void determineLevelFileInfo_Filetype(struct LevelFileInfo *lfi)
2341 if (lfi->type == LEVEL_FILE_TYPE_UNKNOWN)
2342 lfi->type = getFileTypeFromBasename(lfi->basename);
2344 if (lfi->type == LEVEL_FILE_TYPE_RND)
2345 lfi->type = getFileTypeFromMagicBytes(lfi->filename, lfi->type);
2348 static void setLevelFileInfo(struct LevelFileInfo *level_file_info, int nr)
2350 // always start with reliable default values
2351 setFileInfoToDefaults(level_file_info);
2353 level_file_info->nr = nr; // set requested level number
2355 determineLevelFileInfo_Filename(level_file_info);
2356 determineLevelFileInfo_Filetype(level_file_info);
2359 static void copyLevelFileInfo(struct LevelFileInfo *lfi_from,
2360 struct LevelFileInfo *lfi_to)
2362 lfi_to->nr = lfi_from->nr;
2363 lfi_to->type = lfi_from->type;
2364 lfi_to->packed = lfi_from->packed;
2366 setString(&lfi_to->basename, lfi_from->basename);
2367 setString(&lfi_to->filename, lfi_from->filename);
2370 // ----------------------------------------------------------------------------
2371 // functions for loading R'n'D level
2372 // ----------------------------------------------------------------------------
2374 int getMappedElement(int element)
2376 // remap some (historic, now obsolete) elements
2380 case EL_PLAYER_OBSOLETE:
2381 element = EL_PLAYER_1;
2384 case EL_KEY_OBSOLETE:
2388 case EL_EM_KEY_1_FILE_OBSOLETE:
2389 element = EL_EM_KEY_1;
2392 case EL_EM_KEY_2_FILE_OBSOLETE:
2393 element = EL_EM_KEY_2;
2396 case EL_EM_KEY_3_FILE_OBSOLETE:
2397 element = EL_EM_KEY_3;
2400 case EL_EM_KEY_4_FILE_OBSOLETE:
2401 element = EL_EM_KEY_4;
2404 case EL_ENVELOPE_OBSOLETE:
2405 element = EL_ENVELOPE_1;
2413 if (element >= NUM_FILE_ELEMENTS)
2415 Warn("invalid level element %d", element);
2417 element = EL_UNKNOWN;
2425 static int getMappedElementByVersion(int element, int game_version)
2427 // remap some elements due to certain game version
2429 if (game_version <= VERSION_IDENT(2,2,0,0))
2431 // map game font elements
2432 element = (element == EL_CHAR('[') ? EL_CHAR_AUMLAUT :
2433 element == EL_CHAR('\\') ? EL_CHAR_OUMLAUT :
2434 element == EL_CHAR(']') ? EL_CHAR_UUMLAUT :
2435 element == EL_CHAR('^') ? EL_CHAR_COPYRIGHT : element);
2438 if (game_version < VERSION_IDENT(3,0,0,0))
2440 // map Supaplex gravity tube elements
2441 element = (element == EL_SP_GRAVITY_PORT_LEFT ? EL_SP_PORT_LEFT :
2442 element == EL_SP_GRAVITY_PORT_RIGHT ? EL_SP_PORT_RIGHT :
2443 element == EL_SP_GRAVITY_PORT_UP ? EL_SP_PORT_UP :
2444 element == EL_SP_GRAVITY_PORT_DOWN ? EL_SP_PORT_DOWN :
2451 static int LoadLevel_VERS(File *file, int chunk_size, struct LevelInfo *level)
2453 level->file_version = getFileVersion(file);
2454 level->game_version = getFileVersion(file);
2459 static int LoadLevel_DATE(File *file, int chunk_size, struct LevelInfo *level)
2461 level->creation_date.year = getFile16BitBE(file);
2462 level->creation_date.month = getFile8Bit(file);
2463 level->creation_date.day = getFile8Bit(file);
2465 level->creation_date.src = DATE_SRC_LEVELFILE;
2470 static int LoadLevel_HEAD(File *file, int chunk_size, struct LevelInfo *level)
2472 int initial_player_stepsize;
2473 int initial_player_gravity;
2476 level->fieldx = getFile8Bit(file);
2477 level->fieldy = getFile8Bit(file);
2479 level->time = getFile16BitBE(file);
2480 level->gems_needed = getFile16BitBE(file);
2482 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
2483 level->name[i] = getFile8Bit(file);
2484 level->name[MAX_LEVEL_NAME_LEN] = 0;
2486 for (i = 0; i < LEVEL_SCORE_ELEMENTS; i++)
2487 level->score[i] = getFile8Bit(file);
2489 level->num_yamyam_contents = STD_ELEMENT_CONTENTS;
2490 for (i = 0; i < STD_ELEMENT_CONTENTS; i++)
2491 for (y = 0; y < 3; y++)
2492 for (x = 0; x < 3; x++)
2493 level->yamyam_content[i].e[x][y] = getMappedElement(getFile8Bit(file));
2495 level->amoeba_speed = getFile8Bit(file);
2496 level->time_magic_wall = getFile8Bit(file);
2497 level->time_wheel = getFile8Bit(file);
2498 level->amoeba_content = getMappedElement(getFile8Bit(file));
2500 initial_player_stepsize = (getFile8Bit(file) == 1 ? STEPSIZE_FAST :
2503 for (i = 0; i < MAX_PLAYERS; i++)
2504 level->initial_player_stepsize[i] = initial_player_stepsize;
2506 initial_player_gravity = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2508 for (i = 0; i < MAX_PLAYERS; i++)
2509 level->initial_player_gravity[i] = initial_player_gravity;
2511 level->encoding_16bit_field = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2512 level->em_slippery_gems = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2514 level->use_custom_template = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2516 level->block_last_field = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2517 level->sp_block_last_field = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2518 level->can_move_into_acid_bits = getFile32BitBE(file);
2519 level->dont_collide_with_bits = getFile8Bit(file);
2521 level->use_spring_bug = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2522 level->use_step_counter = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2524 level->instant_relocation = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2525 level->can_pass_to_walkable = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2526 level->grow_into_diggable = (getFile8Bit(file) == 1 ? TRUE : FALSE);
2528 level->game_engine_type = getFile8Bit(file);
2530 ReadUnusedBytesFromFile(file, LEVEL_CHUNK_HEAD_UNUSED);
2535 static int LoadLevel_NAME(File *file, int chunk_size, struct LevelInfo *level)
2539 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
2540 level->name[i] = getFile8Bit(file);
2541 level->name[MAX_LEVEL_NAME_LEN] = 0;
2546 static int LoadLevel_AUTH(File *file, int chunk_size, struct LevelInfo *level)
2550 for (i = 0; i < MAX_LEVEL_AUTHOR_LEN; i++)
2551 level->author[i] = getFile8Bit(file);
2552 level->author[MAX_LEVEL_AUTHOR_LEN] = 0;
2557 static int LoadLevel_BODY(File *file, int chunk_size, struct LevelInfo *level)
2560 int chunk_size_expected = level->fieldx * level->fieldy;
2562 /* Note: "chunk_size" was wrong before version 2.0 when elements are
2563 stored with 16-bit encoding (and should be twice as big then).
2564 Even worse, playfield data was stored 16-bit when only yamyam content
2565 contained 16-bit elements and vice versa. */
2567 if (level->encoding_16bit_field && level->file_version >= FILE_VERSION_2_0)
2568 chunk_size_expected *= 2;
2570 if (chunk_size_expected != chunk_size)
2572 ReadUnusedBytesFromFile(file, chunk_size);
2573 return chunk_size_expected;
2576 for (y = 0; y < level->fieldy; y++)
2577 for (x = 0; x < level->fieldx; x++)
2578 level->field[x][y] =
2579 getMappedElement(level->encoding_16bit_field ? getFile16BitBE(file) :
2584 static int LoadLevel_CONT(File *file, int chunk_size, struct LevelInfo *level)
2587 int header_size = 4;
2588 int content_size = MAX_ELEMENT_CONTENTS * 3 * 3;
2589 int chunk_size_expected = header_size + content_size;
2591 /* Note: "chunk_size" was wrong before version 2.0 when elements are
2592 stored with 16-bit encoding (and should be twice as big then).
2593 Even worse, playfield data was stored 16-bit when only yamyam content
2594 contained 16-bit elements and vice versa. */
2596 if (level->encoding_16bit_field && level->file_version >= FILE_VERSION_2_0)
2597 chunk_size_expected += content_size;
2599 if (chunk_size_expected != chunk_size)
2601 ReadUnusedBytesFromFile(file, chunk_size);
2602 return chunk_size_expected;
2606 level->num_yamyam_contents = getFile8Bit(file);
2610 // correct invalid number of content fields -- should never happen
2611 if (level->num_yamyam_contents < 1 ||
2612 level->num_yamyam_contents > MAX_ELEMENT_CONTENTS)
2613 level->num_yamyam_contents = STD_ELEMENT_CONTENTS;
2615 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
2616 for (y = 0; y < 3; y++)
2617 for (x = 0; x < 3; x++)
2618 level->yamyam_content[i].e[x][y] =
2619 getMappedElement(level->encoding_16bit_field ?
2620 getFile16BitBE(file) : getFile8Bit(file));
2624 static int LoadLevel_CNT2(File *file, int chunk_size, struct LevelInfo *level)
2629 int content_array[MAX_ELEMENT_CONTENTS][3][3];
2631 element = getMappedElement(getFile16BitBE(file));
2632 num_contents = getFile8Bit(file);
2634 getFile8Bit(file); // content x size (unused)
2635 getFile8Bit(file); // content y size (unused)
2637 ReadUnusedBytesFromFile(file, LEVEL_CHUNK_CNT2_UNUSED);
2639 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
2640 for (y = 0; y < 3; y++)
2641 for (x = 0; x < 3; x++)
2642 content_array[i][x][y] = getMappedElement(getFile16BitBE(file));
2644 // correct invalid number of content fields -- should never happen
2645 if (num_contents < 1 || num_contents > MAX_ELEMENT_CONTENTS)
2646 num_contents = STD_ELEMENT_CONTENTS;
2648 if (element == EL_YAMYAM)
2650 level->num_yamyam_contents = num_contents;
2652 for (i = 0; i < num_contents; i++)
2653 for (y = 0; y < 3; y++)
2654 for (x = 0; x < 3; x++)
2655 level->yamyam_content[i].e[x][y] = content_array[i][x][y];
2657 else if (element == EL_BD_AMOEBA)
2659 level->amoeba_content = content_array[0][0][0];
2663 Warn("cannot load content for element '%d'", element);
2669 static int LoadLevel_CNT3(File *file, int chunk_size, struct LevelInfo *level)
2675 int chunk_size_expected;
2677 element = getMappedElement(getFile16BitBE(file));
2678 if (!IS_ENVELOPE(element))
2679 element = EL_ENVELOPE_1;
2681 envelope_nr = element - EL_ENVELOPE_1;
2683 envelope_len = getFile16BitBE(file);
2685 level->envelope[envelope_nr].xsize = getFile8Bit(file);
2686 level->envelope[envelope_nr].ysize = getFile8Bit(file);
2688 ReadUnusedBytesFromFile(file, LEVEL_CHUNK_CNT3_UNUSED);
2690 chunk_size_expected = LEVEL_CHUNK_CNT3_SIZE(envelope_len);
2691 if (chunk_size_expected != chunk_size)
2693 ReadUnusedBytesFromFile(file, chunk_size - LEVEL_CHUNK_CNT3_HEADER);
2694 return chunk_size_expected;
2697 for (i = 0; i < envelope_len; i++)
2698 level->envelope[envelope_nr].text[i] = getFile8Bit(file);
2703 static int LoadLevel_CUS1(File *file, int chunk_size, struct LevelInfo *level)
2705 int num_changed_custom_elements = getFile16BitBE(file);
2706 int chunk_size_expected = 2 + num_changed_custom_elements * 6;
2709 if (chunk_size_expected != chunk_size)
2711 ReadUnusedBytesFromFile(file, chunk_size - 2);
2712 return chunk_size_expected;
2715 for (i = 0; i < num_changed_custom_elements; i++)
2717 int element = getMappedElement(getFile16BitBE(file));
2718 int properties = getFile32BitBE(file);
2720 if (IS_CUSTOM_ELEMENT(element))
2721 element_info[element].properties[EP_BITFIELD_BASE_NR] = properties;
2723 Warn("invalid custom element number %d", element);
2725 // older game versions that wrote level files with CUS1 chunks used
2726 // different default push delay values (not yet stored in level file)
2727 element_info[element].push_delay_fixed = 2;
2728 element_info[element].push_delay_random = 8;
2731 level->file_has_custom_elements = TRUE;
2736 static int LoadLevel_CUS2(File *file, int chunk_size, struct LevelInfo *level)
2738 int num_changed_custom_elements = getFile16BitBE(file);
2739 int chunk_size_expected = 2 + num_changed_custom_elements * 4;
2742 if (chunk_size_expected != chunk_size)
2744 ReadUnusedBytesFromFile(file, chunk_size - 2);
2745 return chunk_size_expected;
2748 for (i = 0; i < num_changed_custom_elements; i++)
2750 int element = getMappedElement(getFile16BitBE(file));
2751 int custom_target_element = getMappedElement(getFile16BitBE(file));
2753 if (IS_CUSTOM_ELEMENT(element))
2754 element_info[element].change->target_element = custom_target_element;
2756 Warn("invalid custom element number %d", element);
2759 level->file_has_custom_elements = TRUE;
2764 static int LoadLevel_CUS3(File *file, int chunk_size, struct LevelInfo *level)
2766 int num_changed_custom_elements = getFile16BitBE(file);
2767 int chunk_size_expected = LEVEL_CHUNK_CUS3_SIZE(num_changed_custom_elements);
2770 if (chunk_size_expected != chunk_size)
2772 ReadUnusedBytesFromFile(file, chunk_size - 2);
2773 return chunk_size_expected;
2776 for (i = 0; i < num_changed_custom_elements; i++)
2778 int element = getMappedElement(getFile16BitBE(file));
2779 struct ElementInfo *ei = &element_info[element];
2780 unsigned int event_bits;
2782 if (!IS_CUSTOM_ELEMENT(element))
2784 Warn("invalid custom element number %d", element);
2786 element = EL_INTERNAL_DUMMY;
2789 for (j = 0; j < MAX_ELEMENT_NAME_LEN; j++)
2790 ei->description[j] = getFile8Bit(file);
2791 ei->description[MAX_ELEMENT_NAME_LEN] = 0;
2793 ei->properties[EP_BITFIELD_BASE_NR] = getFile32BitBE(file);
2795 // some free bytes for future properties and padding
2796 ReadUnusedBytesFromFile(file, 7);
2798 ei->use_gfx_element = getFile8Bit(file);
2799 ei->gfx_element_initial = getMappedElement(getFile16BitBE(file));
2801 ei->collect_score_initial = getFile8Bit(file);
2802 ei->collect_count_initial = getFile8Bit(file);
2804 ei->push_delay_fixed = getFile16BitBE(file);
2805 ei->push_delay_random = getFile16BitBE(file);
2806 ei->move_delay_fixed = getFile16BitBE(file);
2807 ei->move_delay_random = getFile16BitBE(file);
2809 ei->move_pattern = getFile16BitBE(file);
2810 ei->move_direction_initial = getFile8Bit(file);
2811 ei->move_stepsize = getFile8Bit(file);
2813 for (y = 0; y < 3; y++)
2814 for (x = 0; x < 3; x++)
2815 ei->content.e[x][y] = getMappedElement(getFile16BitBE(file));
2817 event_bits = getFile32BitBE(file);
2818 for (j = 0; j < NUM_CHANGE_EVENTS; j++)
2819 if (event_bits & (1 << j))
2820 ei->change->has_event[j] = TRUE;
2822 ei->change->target_element = getMappedElement(getFile16BitBE(file));
2824 ei->change->delay_fixed = getFile16BitBE(file);
2825 ei->change->delay_random = getFile16BitBE(file);
2826 ei->change->delay_frames = getFile16BitBE(file);
2828 ei->change->initial_trigger_element= getMappedElement(getFile16BitBE(file));
2830 ei->change->explode = getFile8Bit(file);
2831 ei->change->use_target_content = getFile8Bit(file);
2832 ei->change->only_if_complete = getFile8Bit(file);
2833 ei->change->use_random_replace = getFile8Bit(file);
2835 ei->change->random_percentage = getFile8Bit(file);
2836 ei->change->replace_when = getFile8Bit(file);
2838 for (y = 0; y < 3; y++)
2839 for (x = 0; x < 3; x++)
2840 ei->change->target_content.e[x][y] =
2841 getMappedElement(getFile16BitBE(file));
2843 ei->slippery_type = getFile8Bit(file);
2845 // some free bytes for future properties and padding
2846 ReadUnusedBytesFromFile(file, LEVEL_CPART_CUS3_UNUSED);
2848 // mark that this custom element has been modified
2849 ei->modified_settings = TRUE;
2852 level->file_has_custom_elements = TRUE;
2857 static int LoadLevel_CUS4(File *file, int chunk_size, struct LevelInfo *level)
2859 struct ElementInfo *ei;
2860 int chunk_size_expected;
2864 // ---------- custom element base property values (96 bytes) ----------------
2866 element = getMappedElement(getFile16BitBE(file));
2868 if (!IS_CUSTOM_ELEMENT(element))
2870 Warn("invalid custom element number %d", element);
2872 ReadUnusedBytesFromFile(file, chunk_size - 2);
2877 ei = &element_info[element];
2879 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
2880 ei->description[i] = getFile8Bit(file);
2881 ei->description[MAX_ELEMENT_NAME_LEN] = 0;
2883 ei->properties[EP_BITFIELD_BASE_NR] = getFile32BitBE(file);
2885 ReadUnusedBytesFromFile(file, 4); // reserved for more base properties
2887 ei->num_change_pages = getFile8Bit(file);
2889 chunk_size_expected = LEVEL_CHUNK_CUS4_SIZE(ei->num_change_pages);
2890 if (chunk_size_expected != chunk_size)
2892 ReadUnusedBytesFromFile(file, chunk_size - 43);
2893 return chunk_size_expected;
2896 ei->ce_value_fixed_initial = getFile16BitBE(file);
2897 ei->ce_value_random_initial = getFile16BitBE(file);
2898 ei->use_last_ce_value = getFile8Bit(file);
2900 ei->use_gfx_element = getFile8Bit(file);
2901 ei->gfx_element_initial = getMappedElement(getFile16BitBE(file));
2903 ei->collect_score_initial = getFile8Bit(file);
2904 ei->collect_count_initial = getFile8Bit(file);
2906 ei->drop_delay_fixed = getFile8Bit(file);
2907 ei->push_delay_fixed = getFile8Bit(file);
2908 ei->drop_delay_random = getFile8Bit(file);
2909 ei->push_delay_random = getFile8Bit(file);
2910 ei->move_delay_fixed = getFile16BitBE(file);
2911 ei->move_delay_random = getFile16BitBE(file);
2913 // bits 0 - 15 of "move_pattern" ...
2914 ei->move_pattern = getFile16BitBE(file);
2915 ei->move_direction_initial = getFile8Bit(file);
2916 ei->move_stepsize = getFile8Bit(file);
2918 ei->slippery_type = getFile8Bit(file);
2920 for (y = 0; y < 3; y++)
2921 for (x = 0; x < 3; x++)
2922 ei->content.e[x][y] = getMappedElement(getFile16BitBE(file));
2924 ei->move_enter_element = getMappedElement(getFile16BitBE(file));
2925 ei->move_leave_element = getMappedElement(getFile16BitBE(file));
2926 ei->move_leave_type = getFile8Bit(file);
2928 // ... bits 16 - 31 of "move_pattern" (not nice, but downward compatible)
2929 ei->move_pattern |= (getFile16BitBE(file) << 16);
2931 ei->access_direction = getFile8Bit(file);
2933 ei->explosion_delay = getFile8Bit(file);
2934 ei->ignition_delay = getFile8Bit(file);
2935 ei->explosion_type = getFile8Bit(file);
2937 // some free bytes for future custom property values and padding
2938 ReadUnusedBytesFromFile(file, 1);
2940 // ---------- change page property values (48 bytes) ------------------------
2942 setElementChangePages(ei, ei->num_change_pages);
2944 for (i = 0; i < ei->num_change_pages; i++)
2946 struct ElementChangeInfo *change = &ei->change_page[i];
2947 unsigned int event_bits;
2949 // always start with reliable default values
2950 setElementChangeInfoToDefaults(change);
2952 // bits 0 - 31 of "has_event[]" ...
2953 event_bits = getFile32BitBE(file);
2954 for (j = 0; j < MIN(NUM_CHANGE_EVENTS, 32); j++)
2955 if (event_bits & (1 << j))
2956 change->has_event[j] = TRUE;
2958 change->target_element = getMappedElement(getFile16BitBE(file));
2960 change->delay_fixed = getFile16BitBE(file);
2961 change->delay_random = getFile16BitBE(file);
2962 change->delay_frames = getFile16BitBE(file);
2964 change->initial_trigger_element = getMappedElement(getFile16BitBE(file));
2966 change->explode = getFile8Bit(file);
2967 change->use_target_content = getFile8Bit(file);
2968 change->only_if_complete = getFile8Bit(file);
2969 change->use_random_replace = getFile8Bit(file);
2971 change->random_percentage = getFile8Bit(file);
2972 change->replace_when = getFile8Bit(file);
2974 for (y = 0; y < 3; y++)
2975 for (x = 0; x < 3; x++)
2976 change->target_content.e[x][y]= getMappedElement(getFile16BitBE(file));
2978 change->can_change = getFile8Bit(file);
2980 change->trigger_side = getFile8Bit(file);
2982 change->trigger_player = getFile8Bit(file);
2983 change->trigger_page = getFile8Bit(file);
2985 change->trigger_page = (change->trigger_page == CH_PAGE_ANY_FILE ?
2986 CH_PAGE_ANY : (1 << change->trigger_page));
2988 change->has_action = getFile8Bit(file);
2989 change->action_type = getFile8Bit(file);
2990 change->action_mode = getFile8Bit(file);
2991 change->action_arg = getFile16BitBE(file);
2993 // ... bits 32 - 39 of "has_event[]" (not nice, but downward compatible)
2994 event_bits = getFile8Bit(file);
2995 for (j = 32; j < NUM_CHANGE_EVENTS; j++)
2996 if (event_bits & (1 << (j - 32)))
2997 change->has_event[j] = TRUE;
3000 // mark this custom element as modified
3001 ei->modified_settings = TRUE;
3003 level->file_has_custom_elements = TRUE;
3008 static int LoadLevel_GRP1(File *file, int chunk_size, struct LevelInfo *level)
3010 struct ElementInfo *ei;
3011 struct ElementGroupInfo *group;
3015 element = getMappedElement(getFile16BitBE(file));
3017 if (!IS_GROUP_ELEMENT(element))
3019 Warn("invalid group element number %d", element);
3021 ReadUnusedBytesFromFile(file, chunk_size - 2);
3026 ei = &element_info[element];
3028 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
3029 ei->description[i] = getFile8Bit(file);
3030 ei->description[MAX_ELEMENT_NAME_LEN] = 0;
3032 group = element_info[element].group;
3034 group->num_elements = getFile8Bit(file);
3036 ei->use_gfx_element = getFile8Bit(file);
3037 ei->gfx_element_initial = getMappedElement(getFile16BitBE(file));
3039 group->choice_mode = getFile8Bit(file);
3041 // some free bytes for future values and padding
3042 ReadUnusedBytesFromFile(file, 3);
3044 for (i = 0; i < MAX_ELEMENTS_IN_GROUP; i++)
3045 group->element[i] = getMappedElement(getFile16BitBE(file));
3047 // mark this group element as modified
3048 element_info[element].modified_settings = TRUE;
3050 level->file_has_custom_elements = TRUE;
3055 static int LoadLevel_MicroChunk(File *file, struct LevelFileConfigInfo *conf,
3056 int element, int real_element)
3058 int micro_chunk_size = 0;
3059 int conf_type = getFile8Bit(file);
3060 int byte_mask = conf_type & CONF_MASK_BYTES;
3061 boolean element_found = FALSE;
3064 micro_chunk_size += 1;
3066 if (byte_mask == CONF_MASK_MULTI_BYTES)
3068 int num_bytes = getFile16BitBE(file);
3069 byte *buffer = checked_malloc(num_bytes);
3071 ReadBytesFromFile(file, buffer, num_bytes);
3073 for (i = 0; conf[i].data_type != -1; i++)
3075 if (conf[i].element == element &&
3076 conf[i].conf_type == conf_type)
3078 int data_type = conf[i].data_type;
3079 int num_entities = num_bytes / CONF_ENTITY_NUM_BYTES(data_type);
3080 int max_num_entities = conf[i].max_num_entities;
3082 if (num_entities > max_num_entities)
3084 Warn("truncating number of entities for element %d from %d to %d",
3085 element, num_entities, max_num_entities);
3087 num_entities = max_num_entities;
3090 if (num_entities == 0 && (data_type == TYPE_ELEMENT_LIST ||
3091 data_type == TYPE_CONTENT_LIST))
3093 // for element and content lists, zero entities are not allowed
3094 Warn("found empty list of entities for element %d", element);
3096 // do not set "num_entities" here to prevent reading behind buffer
3098 *(int *)(conf[i].num_entities) = 1; // at least one is required
3102 *(int *)(conf[i].num_entities) = num_entities;
3105 element_found = TRUE;
3107 if (data_type == TYPE_STRING)
3109 char *string = (char *)(conf[i].value);
3112 for (j = 0; j < max_num_entities; j++)
3113 string[j] = (j < num_entities ? buffer[j] : '\0');
3115 else if (data_type == TYPE_ELEMENT_LIST)
3117 int *element_array = (int *)(conf[i].value);
3120 for (j = 0; j < num_entities; j++)
3122 getMappedElement(CONF_ELEMENTS_ELEMENT(buffer, j));
3124 else if (data_type == TYPE_CONTENT_LIST)
3126 struct Content *content= (struct Content *)(conf[i].value);
3129 for (c = 0; c < num_entities; c++)
3130 for (y = 0; y < 3; y++)
3131 for (x = 0; x < 3; x++)
3132 content[c].e[x][y] =
3133 getMappedElement(CONF_CONTENTS_ELEMENT(buffer, c, x, y));
3136 element_found = FALSE;
3142 checked_free(buffer);
3144 micro_chunk_size += 2 + num_bytes;
3146 else // constant size configuration data (1, 2 or 4 bytes)
3148 int value = (byte_mask == CONF_MASK_1_BYTE ? getFile8Bit (file) :
3149 byte_mask == CONF_MASK_2_BYTE ? getFile16BitBE(file) :
3150 byte_mask == CONF_MASK_4_BYTE ? getFile32BitBE(file) : 0);
3152 for (i = 0; conf[i].data_type != -1; i++)
3154 if (conf[i].element == element &&
3155 conf[i].conf_type == conf_type)
3157 int data_type = conf[i].data_type;
3159 if (data_type == TYPE_ELEMENT)
3160 value = getMappedElement(value);
3162 if (data_type == TYPE_BOOLEAN)
3163 *(boolean *)(conf[i].value) = value;
3165 *(int *) (conf[i].value) = value;
3167 element_found = TRUE;
3173 micro_chunk_size += CONF_VALUE_NUM_BYTES(byte_mask);
3178 char *error_conf_chunk_bytes =
3179 (byte_mask == CONF_MASK_1_BYTE ? "CONF_VALUE_8_BIT" :
3180 byte_mask == CONF_MASK_2_BYTE ? "CONF_VALUE_16_BIT" :
3181 byte_mask == CONF_MASK_4_BYTE ? "CONF_VALUE_32_BIT" :"CONF_VALUE_BYTES");
3182 int error_conf_chunk_token = conf_type & CONF_MASK_TOKEN;
3183 int error_element = real_element;
3185 Warn("cannot load micro chunk '%s(%d)' value for element %d ['%s']",
3186 error_conf_chunk_bytes, error_conf_chunk_token,
3187 error_element, EL_NAME(error_element));
3190 return micro_chunk_size;
3193 static int LoadLevel_INFO(File *file, int chunk_size, struct LevelInfo *level)
3195 int real_chunk_size = 0;
3197 li = *level; // copy level data into temporary buffer
3199 while (!checkEndOfFile(file))
3201 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_INFO, -1, -1);
3203 if (real_chunk_size >= chunk_size)
3207 *level = li; // copy temporary buffer back to level data
3209 return real_chunk_size;
3212 static int LoadLevel_CONF(File *file, int chunk_size, struct LevelInfo *level)
3214 int real_chunk_size = 0;
3216 li = *level; // copy level data into temporary buffer
3218 while (!checkEndOfFile(file))
3220 int element = getMappedElement(getFile16BitBE(file));
3222 real_chunk_size += 2;
3223 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_CONF,
3225 if (real_chunk_size >= chunk_size)
3229 *level = li; // copy temporary buffer back to level data
3231 return real_chunk_size;
3234 static int LoadLevel_ELEM(File *file, int chunk_size, struct LevelInfo *level)
3236 int real_chunk_size = 0;
3238 li = *level; // copy level data into temporary buffer
3240 while (!checkEndOfFile(file))
3242 int element = getMappedElement(getFile16BitBE(file));
3244 real_chunk_size += 2;
3245 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_ELEM,
3247 if (real_chunk_size >= chunk_size)
3251 *level = li; // copy temporary buffer back to level data
3253 return real_chunk_size;
3256 static int LoadLevel_NOTE(File *file, int chunk_size, struct LevelInfo *level)
3258 int element = getMappedElement(getFile16BitBE(file));
3259 int envelope_nr = element - EL_ENVELOPE_1;
3260 int real_chunk_size = 2;
3262 xx_envelope = level->envelope[envelope_nr]; // copy into temporary buffer
3264 while (!checkEndOfFile(file))
3266 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_NOTE,
3269 if (real_chunk_size >= chunk_size)
3273 level->envelope[envelope_nr] = xx_envelope; // copy from temporary buffer
3275 return real_chunk_size;
3278 static int LoadLevel_CUSX(File *file, int chunk_size, struct LevelInfo *level)
3280 int element = getMappedElement(getFile16BitBE(file));
3281 int real_chunk_size = 2;
3282 struct ElementInfo *ei = &element_info[element];
3285 xx_ei = *ei; // copy element data into temporary buffer
3287 xx_ei.num_change_pages = -1;
3289 while (!checkEndOfFile(file))
3291 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_CUSX_base,
3293 if (xx_ei.num_change_pages != -1)
3296 if (real_chunk_size >= chunk_size)
3302 if (ei->num_change_pages == -1)
3304 Warn("LoadLevel_CUSX(): missing 'num_change_pages' for '%s'",
3307 ei->num_change_pages = 1;
3309 setElementChangePages(ei, 1);
3310 setElementChangeInfoToDefaults(ei->change);
3312 return real_chunk_size;
3315 // initialize number of change pages stored for this custom element
3316 setElementChangePages(ei, ei->num_change_pages);
3317 for (i = 0; i < ei->num_change_pages; i++)
3318 setElementChangeInfoToDefaults(&ei->change_page[i]);
3320 // start with reading properties for the first change page
3321 xx_current_change_page = 0;
3323 while (!checkEndOfFile(file))
3325 struct ElementChangeInfo *change = &ei->change_page[xx_current_change_page];
3327 xx_change = *change; // copy change data into temporary buffer
3329 resetEventBits(); // reset bits; change page might have changed
3331 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_CUSX_change,
3334 *change = xx_change;
3336 setEventFlagsFromEventBits(change);
3338 if (real_chunk_size >= chunk_size)
3342 level->file_has_custom_elements = TRUE;
3344 return real_chunk_size;
3347 static int LoadLevel_GRPX(File *file, int chunk_size, struct LevelInfo *level)
3349 int element = getMappedElement(getFile16BitBE(file));
3350 int real_chunk_size = 2;
3351 struct ElementInfo *ei = &element_info[element];
3352 struct ElementGroupInfo *group = ei->group;
3354 xx_ei = *ei; // copy element data into temporary buffer
3355 xx_group = *group; // copy group data into temporary buffer
3357 while (!checkEndOfFile(file))
3359 real_chunk_size += LoadLevel_MicroChunk(file, chunk_config_GRPX,
3362 if (real_chunk_size >= chunk_size)
3369 level->file_has_custom_elements = TRUE;
3371 return real_chunk_size;
3374 static void LoadLevelFromFileInfo_RND(struct LevelInfo *level,
3375 struct LevelFileInfo *level_file_info,
3376 boolean level_info_only)
3378 char *filename = level_file_info->filename;
3379 char cookie[MAX_LINE_LEN];
3380 char chunk_name[CHUNK_ID_LEN + 1];
3384 if (!(file = openFile(filename, MODE_READ)))
3386 level->no_valid_file = TRUE;
3387 level->no_level_file = TRUE;
3389 if (level_info_only)
3392 Warn("cannot read level '%s' -- using empty level", filename);
3394 if (!setup.editor.use_template_for_new_levels)
3397 // if level file not found, try to initialize level data from template
3398 filename = getGlobalLevelTemplateFilename();
3400 if (!(file = openFile(filename, MODE_READ)))
3403 // default: for empty levels, use level template for custom elements
3404 level->use_custom_template = TRUE;
3406 level->no_valid_file = FALSE;
3409 getFileChunkBE(file, chunk_name, NULL);
3410 if (strEqual(chunk_name, "RND1"))
3412 getFile32BitBE(file); // not used
3414 getFileChunkBE(file, chunk_name, NULL);
3415 if (!strEqual(chunk_name, "CAVE"))
3417 level->no_valid_file = TRUE;
3419 Warn("unknown format of level file '%s'", filename);
3426 else // check for pre-2.0 file format with cookie string
3428 strcpy(cookie, chunk_name);
3429 if (getStringFromFile(file, &cookie[4], MAX_LINE_LEN - 4) == NULL)
3431 if (strlen(cookie) > 0 && cookie[strlen(cookie) - 1] == '\n')
3432 cookie[strlen(cookie) - 1] = '\0';
3434 if (!checkCookieString(cookie, LEVEL_COOKIE_TMPL))
3436 level->no_valid_file = TRUE;
3438 Warn("unknown format of level file '%s'", filename);
3445 if ((level->file_version = getFileVersionFromCookieString(cookie)) == -1)
3447 level->no_valid_file = TRUE;
3449 Warn("unsupported version of level file '%s'", filename);
3456 // pre-2.0 level files have no game version, so use file version here
3457 level->game_version = level->file_version;
3460 if (level->file_version < FILE_VERSION_1_2)
3462 // level files from versions before 1.2.0 without chunk structure
3463 LoadLevel_HEAD(file, LEVEL_CHUNK_HEAD_SIZE, level);
3464 LoadLevel_BODY(file, level->fieldx * level->fieldy, level);
3472 int (*loader)(File *, int, struct LevelInfo *);
3476 { "VERS", LEVEL_CHUNK_VERS_SIZE, LoadLevel_VERS },
3477 { "DATE", LEVEL_CHUNK_DATE_SIZE, LoadLevel_DATE },
3478 { "HEAD", LEVEL_CHUNK_HEAD_SIZE, LoadLevel_HEAD },
3479 { "NAME", LEVEL_CHUNK_NAME_SIZE, LoadLevel_NAME },
3480 { "AUTH", LEVEL_CHUNK_AUTH_SIZE, LoadLevel_AUTH },
3481 { "INFO", -1, LoadLevel_INFO },
3482 { "BODY", -1, LoadLevel_BODY },
3483 { "CONT", -1, LoadLevel_CONT },
3484 { "CNT2", LEVEL_CHUNK_CNT2_SIZE, LoadLevel_CNT2 },
3485 { "CNT3", -1, LoadLevel_CNT3 },
3486 { "CUS1", -1, LoadLevel_CUS1 },
3487 { "CUS2", -1, LoadLevel_CUS2 },
3488 { "CUS3", -1, LoadLevel_CUS3 },
3489 { "CUS4", -1, LoadLevel_CUS4 },
3490 { "GRP1", -1, LoadLevel_GRP1 },
3491 { "CONF", -1, LoadLevel_CONF },
3492 { "ELEM", -1, LoadLevel_ELEM },
3493 { "NOTE", -1, LoadLevel_NOTE },
3494 { "CUSX", -1, LoadLevel_CUSX },
3495 { "GRPX", -1, LoadLevel_GRPX },
3500 while (getFileChunkBE(file, chunk_name, &chunk_size))
3504 while (chunk_info[i].name != NULL &&
3505 !strEqual(chunk_name, chunk_info[i].name))
3508 if (chunk_info[i].name == NULL)
3510 Warn("unknown chunk '%s' in level file '%s'",
3511 chunk_name, filename);
3513 ReadUnusedBytesFromFile(file, chunk_size);
3515 else if (chunk_info[i].size != -1 &&
3516 chunk_info[i].size != chunk_size)
3518 Warn("wrong size (%d) of chunk '%s' in level file '%s'",
3519 chunk_size, chunk_name, filename);
3521 ReadUnusedBytesFromFile(file, chunk_size);
3525 // call function to load this level chunk
3526 int chunk_size_expected =
3527 (chunk_info[i].loader)(file, chunk_size, level);
3529 // the size of some chunks cannot be checked before reading other
3530 // chunks first (like "HEAD" and "BODY") that contain some header
3531 // information, so check them here
3532 if (chunk_size_expected != chunk_size)
3534 Warn("wrong size (%d) of chunk '%s' in level file '%s'",
3535 chunk_size, chunk_name, filename);
3545 // ----------------------------------------------------------------------------
3546 // functions for loading EM level
3547 // ----------------------------------------------------------------------------
3549 static void CopyNativeLevel_RND_to_EM(struct LevelInfo *level)
3551 static int ball_xy[8][2] =
3562 struct LevelInfo_EM *level_em = level->native_em_level;
3563 struct CAVE *cav = level_em->cav;
3566 cav->width = MIN(level->fieldx, MAX_PLAYFIELD_WIDTH);
3567 cav->height = MIN(level->fieldy, MAX_PLAYFIELD_HEIGHT);
3569 cav->time_seconds = level->time;
3570 cav->gems_needed = level->gems_needed;
3572 cav->emerald_score = level->score[SC_EMERALD];
3573 cav->diamond_score = level->score[SC_DIAMOND];
3574 cav->alien_score = level->score[SC_ROBOT];
3575 cav->tank_score = level->score[SC_SPACESHIP];
3576 cav->bug_score = level->score[SC_BUG];
3577 cav->eater_score = level->score[SC_YAMYAM];
3578 cav->nut_score = level->score[SC_NUT];
3579 cav->dynamite_score = level->score[SC_DYNAMITE];
3580 cav->key_score = level->score[SC_KEY];
3581 cav->exit_score = level->score[SC_TIME_BONUS];
3583 cav->num_eater_arrays = level->num_yamyam_contents;
3585 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
3586 for (y = 0; y < 3; y++)
3587 for (x = 0; x < 3; x++)
3588 cav->eater_array[i][y * 3 + x] =
3589 map_element_RND_to_EM_cave(level->yamyam_content[i].e[x][y]);
3591 cav->amoeba_time = level->amoeba_speed;
3592 cav->wonderwall_time = level->time_magic_wall;
3593 cav->wheel_time = level->time_wheel;
3595 cav->android_move_time = level->android_move_time;
3596 cav->android_clone_time = level->android_clone_time;
3597 cav->ball_random = level->ball_random;
3598 cav->ball_active = level->ball_active_initial;
3599 cav->ball_time = level->ball_time;
3600 cav->num_ball_arrays = level->num_ball_contents;
3602 cav->lenses_score = level->lenses_score;
3603 cav->magnify_score = level->magnify_score;
3604 cav->slurp_score = level->slurp_score;
3606 cav->lenses_time = level->lenses_time;
3607 cav->magnify_time = level->magnify_time;
3609 cav->wind_direction =
3610 map_direction_RND_to_EM(level->wind_direction_initial);
3612 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
3613 for (j = 0; j < 8; j++)
3614 cav->ball_array[i][j] =
3615 map_element_RND_to_EM_cave(level->ball_content[i].
3616 e[ball_xy[j][0]][ball_xy[j][1]]);
3618 map_android_clone_elements_RND_to_EM(level);
3620 // first fill the complete playfield with the empty space element
3621 for (y = 0; y < EM_MAX_CAVE_HEIGHT; y++)
3622 for (x = 0; x < EM_MAX_CAVE_WIDTH; x++)
3623 cav->cave[x][y] = Cblank;
3625 // then copy the real level contents from level file into the playfield
3626 for (y = 0; y < cav->height; y++) for (x = 0; x < cav->width; x++)
3628 int new_element = map_element_RND_to_EM_cave(level->field[x][y]);
3630 if (level->field[x][y] == EL_AMOEBA_DEAD)
3631 new_element = map_element_RND_to_EM_cave(EL_AMOEBA_WET);
3633 cav->cave[x][y] = new_element;
3636 for (i = 0; i < MAX_PLAYERS; i++)
3638 cav->player_x[i] = -1;
3639 cav->player_y[i] = -1;
3642 // initialize player positions and delete players from the playfield
3643 for (y = 0; y < cav->height; y++) for (x = 0; x < cav->width; x++)
3645 if (IS_PLAYER_ELEMENT(level->field[x][y]))
3647 int player_nr = GET_PLAYER_NR(level->field[x][y]);
3649 cav->player_x[player_nr] = x;
3650 cav->player_y[player_nr] = y;
3652 cav->cave[x][y] = map_element_RND_to_EM_cave(EL_EMPTY);
3657 static void CopyNativeLevel_EM_to_RND(struct LevelInfo *level)
3659 static int ball_xy[8][2] =
3670 struct LevelInfo_EM *level_em = level->native_em_level;
3671 struct CAVE *cav = level_em->cav;
3674 level->fieldx = MIN(cav->width, MAX_LEV_FIELDX);
3675 level->fieldy = MIN(cav->height, MAX_LEV_FIELDY);
3677 level->time = cav->time_seconds;
3678 level->gems_needed = cav->gems_needed;
3680 sprintf(level->name, "Level %d", level->file_info.nr);
3682 level->score[SC_EMERALD] = cav->emerald_score;
3683 level->score[SC_DIAMOND] = cav->diamond_score;
3684 level->score[SC_ROBOT] = cav->alien_score;
3685 level->score[SC_SPACESHIP] = cav->tank_score;
3686 level->score[SC_BUG] = cav->bug_score;
3687 level->score[SC_YAMYAM] = cav->eater_score;
3688 level->score[SC_NUT] = cav->nut_score;
3689 level->score[SC_DYNAMITE] = cav->dynamite_score;
3690 level->score[SC_KEY] = cav->key_score;
3691 level->score[SC_TIME_BONUS] = cav->exit_score;
3693 level->num_yamyam_contents = cav->num_eater_arrays;
3695 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
3696 for (y = 0; y < 3; y++)
3697 for (x = 0; x < 3; x++)
3698 level->yamyam_content[i].e[x][y] =
3699 map_element_EM_to_RND_cave(cav->eater_array[i][y * 3 + x]);
3701 level->amoeba_speed = cav->amoeba_time;
3702 level->time_magic_wall = cav->wonderwall_time;
3703 level->time_wheel = cav->wheel_time;
3705 level->android_move_time = cav->android_move_time;
3706 level->android_clone_time = cav->android_clone_time;
3707 level->ball_random = cav->ball_random;
3708 level->ball_active_initial = cav->ball_active;
3709 level->ball_time = cav->ball_time;
3710 level->num_ball_contents = cav->num_ball_arrays;
3712 level->lenses_score = cav->lenses_score;
3713 level->magnify_score = cav->magnify_score;
3714 level->slurp_score = cav->slurp_score;
3716 level->lenses_time = cav->lenses_time;
3717 level->magnify_time = cav->magnify_time;
3719 level->wind_direction_initial =
3720 map_direction_EM_to_RND(cav->wind_direction);
3722 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
3723 for (j = 0; j < 8; j++)
3724 level->ball_content[i].e[ball_xy[j][0]][ball_xy[j][1]] =
3725 map_element_EM_to_RND_cave(cav->ball_array[i][j]);
3727 map_android_clone_elements_EM_to_RND(level);
3729 // convert the playfield (some elements need special treatment)
3730 for (y = 0; y < level->fieldy; y++) for (x = 0; x < level->fieldx; x++)
3732 int new_element = map_element_EM_to_RND_cave(cav->cave[x][y]);
3734 if (new_element == EL_AMOEBA_WET && level->amoeba_speed == 0)
3735 new_element = EL_AMOEBA_DEAD;
3737 level->field[x][y] = new_element;
3740 for (i = 0; i < MAX_PLAYERS; i++)
3742 // in case of all players set to the same field, use the first player
3743 int nr = MAX_PLAYERS - i - 1;
3744 int jx = cav->player_x[nr];
3745 int jy = cav->player_y[nr];
3747 if (jx != -1 && jy != -1)
3748 level->field[jx][jy] = EL_PLAYER_1 + nr;
3751 // time score is counted for each 10 seconds left in Emerald Mine levels
3752 level->time_score_base = 10;
3756 // ----------------------------------------------------------------------------
3757 // functions for loading SP level
3758 // ----------------------------------------------------------------------------
3760 static void CopyNativeLevel_RND_to_SP(struct LevelInfo *level)
3762 struct LevelInfo_SP *level_sp = level->native_sp_level;
3763 LevelInfoType *header = &level_sp->header;
3766 level_sp->width = level->fieldx;
3767 level_sp->height = level->fieldy;
3769 for (x = 0; x < level->fieldx; x++)
3770 for (y = 0; y < level->fieldy; y++)
3771 level_sp->playfield[x][y] = map_element_RND_to_SP(level->field[x][y]);
3773 header->InitialGravity = (level->initial_player_gravity[0] ? 1 : 0);
3775 for (i = 0; i < SP_LEVEL_NAME_LEN; i++)
3776 header->LevelTitle[i] = level->name[i];
3777 // !!! NO STRING TERMINATION IN SUPAPLEX VB CODE YET -- FIX THIS !!!
3779 header->InfotronsNeeded = level->gems_needed;
3781 header->SpecialPortCount = 0;
3783 for (x = 0; x < level->fieldx; x++) for (y = 0; y < level->fieldy; y++)
3785 boolean gravity_port_found = FALSE;
3786 boolean gravity_port_valid = FALSE;
3787 int gravity_port_flag;
3788 int gravity_port_base_element;
3789 int element = level->field[x][y];
3791 if (element >= EL_SP_GRAVITY_ON_PORT_RIGHT &&
3792 element <= EL_SP_GRAVITY_ON_PORT_UP)
3794 gravity_port_found = TRUE;
3795 gravity_port_valid = TRUE;
3796 gravity_port_flag = 1;
3797 gravity_port_base_element = EL_SP_GRAVITY_ON_PORT_RIGHT;
3799 else if (element >= EL_SP_GRAVITY_OFF_PORT_RIGHT &&
3800 element <= EL_SP_GRAVITY_OFF_PORT_UP)
3802 gravity_port_found = TRUE;
3803 gravity_port_valid = TRUE;
3804 gravity_port_flag = 0;
3805 gravity_port_base_element = EL_SP_GRAVITY_OFF_PORT_RIGHT;
3807 else if (element >= EL_SP_GRAVITY_PORT_RIGHT &&
3808 element <= EL_SP_GRAVITY_PORT_UP)
3810 // change R'n'D style gravity inverting special port to normal port
3811 // (there are no gravity inverting ports in native Supaplex engine)
3813 gravity_port_found = TRUE;
3814 gravity_port_valid = FALSE;
3815 gravity_port_base_element = EL_SP_GRAVITY_PORT_RIGHT;
3818 if (gravity_port_found)
3820 if (gravity_port_valid &&
3821 header->SpecialPortCount < SP_MAX_SPECIAL_PORTS)
3823 SpecialPortType *port = &header->SpecialPort[header->SpecialPortCount];
3825 port->PortLocation = (y * level->fieldx + x) * 2;
3826 port->Gravity = gravity_port_flag;
3828 element += EL_SP_GRAVITY_PORT_RIGHT - gravity_port_base_element;
3830 header->SpecialPortCount++;
3834 // change special gravity port to normal port
3836 element += EL_SP_PORT_RIGHT - gravity_port_base_element;
3839 level_sp->playfield[x][y] = element - EL_SP_START;
3844 static void CopyNativeLevel_SP_to_RND(struct LevelInfo *level)
3846 struct LevelInfo_SP *level_sp = level->native_sp_level;
3847 LevelInfoType *header = &level_sp->header;
3848 boolean num_invalid_elements = 0;
3851 level->fieldx = level_sp->width;
3852 level->fieldy = level_sp->height;
3854 for (x = 0; x < level->fieldx; x++)
3856 for (y = 0; y < level->fieldy; y++)
3858 int element_old = level_sp->playfield[x][y];
3859 int element_new = getMappedElement(map_element_SP_to_RND(element_old));
3861 if (element_new == EL_UNKNOWN)
3863 num_invalid_elements++;
3865 Debug("level:native:SP", "invalid element %d at position %d, %d",
3869 level->field[x][y] = element_new;
3873 if (num_invalid_elements > 0)
3874 Warn("found %d invalid elements%s", num_invalid_elements,
3875 (!options.debug ? " (use '--debug' for more details)" : ""));
3877 for (i = 0; i < MAX_PLAYERS; i++)
3878 level->initial_player_gravity[i] =
3879 (header->InitialGravity == 1 ? TRUE : FALSE);
3881 // skip leading spaces
3882 for (i = 0; i < SP_LEVEL_NAME_LEN; i++)
3883 if (header->LevelTitle[i] != ' ')
3887 for (j = 0; i < SP_LEVEL_NAME_LEN; i++, j++)
3888 level->name[j] = header->LevelTitle[i];
3889 level->name[j] = '\0';
3891 // cut trailing spaces
3893 if (level->name[j - 1] == ' ' && level->name[j] == '\0')
3894 level->name[j - 1] = '\0';
3896 level->gems_needed = header->InfotronsNeeded;
3898 for (i = 0; i < header->SpecialPortCount; i++)
3900 SpecialPortType *port = &header->SpecialPort[i];
3901 int port_location = port->PortLocation;
3902 int gravity = port->Gravity;
3903 int port_x, port_y, port_element;
3905 port_x = (port_location / 2) % level->fieldx;
3906 port_y = (port_location / 2) / level->fieldx;
3908 if (port_x < 0 || port_x >= level->fieldx ||
3909 port_y < 0 || port_y >= level->fieldy)
3911 Warn("special port position (%d, %d) out of bounds", port_x, port_y);
3916 port_element = level->field[port_x][port_y];
3918 if (port_element < EL_SP_GRAVITY_PORT_RIGHT ||
3919 port_element > EL_SP_GRAVITY_PORT_UP)
3921 Warn("no special port at position (%d, %d)", port_x, port_y);
3926 // change previous (wrong) gravity inverting special port to either
3927 // gravity enabling special port or gravity disabling special port
3928 level->field[port_x][port_y] +=
3929 (gravity == 1 ? EL_SP_GRAVITY_ON_PORT_RIGHT :
3930 EL_SP_GRAVITY_OFF_PORT_RIGHT) - EL_SP_GRAVITY_PORT_RIGHT;
3933 // change special gravity ports without database entries to normal ports
3934 for (x = 0; x < level->fieldx; x++)
3935 for (y = 0; y < level->fieldy; y++)
3936 if (level->field[x][y] >= EL_SP_GRAVITY_PORT_RIGHT &&
3937 level->field[x][y] <= EL_SP_GRAVITY_PORT_UP)
3938 level->field[x][y] += EL_SP_PORT_RIGHT - EL_SP_GRAVITY_PORT_RIGHT;
3940 level->time = 0; // no time limit
3941 level->amoeba_speed = 0;
3942 level->time_magic_wall = 0;
3943 level->time_wheel = 0;
3944 level->amoeba_content = EL_EMPTY;
3946 // original Supaplex does not use score values -- rate by playing time
3947 for (i = 0; i < LEVEL_SCORE_ELEMENTS; i++)
3948 level->score[i] = 0;
3950 level->rate_time_over_score = TRUE;
3952 // there are no yamyams in supaplex levels
3953 for (i = 0; i < level->num_yamyam_contents; i++)
3954 for (x = 0; x < 3; x++)
3955 for (y = 0; y < 3; y++)
3956 level->yamyam_content[i].e[x][y] = EL_EMPTY;
3959 static void CopyNativeTape_RND_to_SP(struct LevelInfo *level)
3961 struct LevelInfo_SP *level_sp = level->native_sp_level;
3962 struct DemoInfo_SP *demo = &level_sp->demo;
3965 // always start with reliable default values
3966 demo->is_available = FALSE;
3969 if (TAPE_IS_EMPTY(tape))
3972 demo->level_nr = tape.level_nr; // (currently not used)
3974 level_sp->header.DemoRandomSeed = tape.random_seed;
3978 for (i = 0; i < tape.length; i++)
3980 int demo_action = map_key_RND_to_SP(tape.pos[i].action[0]);
3981 int demo_repeat = tape.pos[i].delay;
3982 int demo_entries = (demo_repeat + 15) / 16;
3984 if (demo->length + demo_entries >= SP_MAX_TAPE_LEN)
3986 Warn("tape truncated: size exceeds maximum SP demo size %d",
3992 for (j = 0; j < demo_repeat / 16; j++)
3993 demo->data[demo->length++] = 0xf0 | demo_action;
3995 if (demo_repeat % 16)
3996 demo->data[demo->length++] = ((demo_repeat % 16 - 1) << 4) | demo_action;
3999 demo->is_available = TRUE;
4002 static void setTapeInfoToDefaults(void);
4004 static void CopyNativeTape_SP_to_RND(struct LevelInfo *level)
4006 struct LevelInfo_SP *level_sp = level->native_sp_level;
4007 struct DemoInfo_SP *demo = &level_sp->demo;
4008 char *filename = level->file_info.filename;
4011 // always start with reliable default values
4012 setTapeInfoToDefaults();
4014 if (!demo->is_available)
4017 tape.level_nr = demo->level_nr; // (currently not used)
4018 tape.random_seed = level_sp->header.DemoRandomSeed;
4020 TapeSetDateFromEpochSeconds(getFileTimestampEpochSeconds(filename));
4023 tape.pos[tape.counter].delay = 0;
4025 for (i = 0; i < demo->length; i++)
4027 int demo_action = demo->data[i] & 0x0f;
4028 int demo_repeat = (demo->data[i] & 0xf0) >> 4;
4029 int tape_action = map_key_SP_to_RND(demo_action);
4030 int tape_repeat = demo_repeat + 1;
4031 byte action[MAX_TAPE_ACTIONS] = { tape_action };
4032 boolean success = 0;
4035 for (j = 0; j < tape_repeat; j++)
4036 success = TapeAddAction(action);
4040 Warn("SP demo truncated: size exceeds maximum tape size %d",
4047 TapeHaltRecording();
4051 // ----------------------------------------------------------------------------
4052 // functions for loading MM level
4053 // ----------------------------------------------------------------------------
4055 static void CopyNativeLevel_RND_to_MM(struct LevelInfo *level)
4057 struct LevelInfo_MM *level_mm = level->native_mm_level;
4060 level_mm->fieldx = MIN(level->fieldx, MM_MAX_PLAYFIELD_WIDTH);
4061 level_mm->fieldy = MIN(level->fieldy, MM_MAX_PLAYFIELD_HEIGHT);
4063 level_mm->time = level->time;
4064 level_mm->kettles_needed = level->gems_needed;
4065 level_mm->auto_count_kettles = level->auto_count_gems;
4067 level_mm->laser_red = level->mm_laser_red;
4068 level_mm->laser_green = level->mm_laser_green;
4069 level_mm->laser_blue = level->mm_laser_blue;
4071 strcpy(level_mm->name, level->name);
4072 strcpy(level_mm->author, level->author);
4074 level_mm->score[SC_EMERALD] = level->score[SC_EMERALD];
4075 level_mm->score[SC_PACMAN] = level->score[SC_PACMAN];
4076 level_mm->score[SC_KEY] = level->score[SC_KEY];
4077 level_mm->score[SC_TIME_BONUS] = level->score[SC_TIME_BONUS];
4078 level_mm->score[SC_ELEM_BONUS] = level->score[SC_ELEM_BONUS];
4080 level_mm->amoeba_speed = level->amoeba_speed;
4081 level_mm->time_fuse = level->mm_time_fuse;
4082 level_mm->time_bomb = level->mm_time_bomb;
4083 level_mm->time_ball = level->mm_time_ball;
4084 level_mm->time_block = level->mm_time_block;
4086 for (x = 0; x < level->fieldx; x++)
4087 for (y = 0; y < level->fieldy; y++)
4089 level_mm->field[x][y] = map_element_RND_to_MM(level->field[x][y]);
4092 static void CopyNativeLevel_MM_to_RND(struct LevelInfo *level)
4094 struct LevelInfo_MM *level_mm = level->native_mm_level;
4097 level->fieldx = MIN(level_mm->fieldx, MAX_LEV_FIELDX);
4098 level->fieldy = MIN(level_mm->fieldy, MAX_LEV_FIELDY);
4100 level->time = level_mm->time;
4101 level->gems_needed = level_mm->kettles_needed;
4102 level->auto_count_gems = level_mm->auto_count_kettles;
4104 level->mm_laser_red = level_mm->laser_red;
4105 level->mm_laser_green = level_mm->laser_green;
4106 level->mm_laser_blue = level_mm->laser_blue;
4108 strcpy(level->name, level_mm->name);
4110 // only overwrite author from 'levelinfo.conf' if author defined in level
4111 if (!strEqual(level_mm->author, ANONYMOUS_NAME))
4112 strcpy(level->author, level_mm->author);
4114 level->score[SC_EMERALD] = level_mm->score[SC_EMERALD];
4115 level->score[SC_PACMAN] = level_mm->score[SC_PACMAN];
4116 level->score[SC_KEY] = level_mm->score[SC_KEY];
4117 level->score[SC_TIME_BONUS] = level_mm->score[SC_TIME_BONUS];
4118 level->score[SC_ELEM_BONUS] = level_mm->score[SC_ELEM_BONUS];
4120 level->amoeba_speed = level_mm->amoeba_speed;
4121 level->mm_time_fuse = level_mm->time_fuse;
4122 level->mm_time_bomb = level_mm->time_bomb;
4123 level->mm_time_ball = level_mm->time_ball;
4124 level->mm_time_block = level_mm->time_block;
4126 for (x = 0; x < level->fieldx; x++)
4127 for (y = 0; y < level->fieldy; y++)
4128 level->field[x][y] = map_element_MM_to_RND(level_mm->field[x][y]);
4132 // ----------------------------------------------------------------------------
4133 // functions for loading DC level
4134 // ----------------------------------------------------------------------------
4136 #define DC_LEVEL_HEADER_SIZE 344
4138 static unsigned short getDecodedWord_DC(unsigned short data_encoded,
4141 static int last_data_encoded;
4145 int diff_hi, diff_lo;
4146 int data_hi, data_lo;
4147 unsigned short data_decoded;
4151 last_data_encoded = 0;
4158 diff = data_encoded - last_data_encoded;
4159 diff_hi = diff & ~0xff;
4160 diff_lo = diff & 0xff;
4164 data_hi = diff_hi - (offset1 << 8) + (offset2 & 0xff00);
4165 data_lo = (diff_lo + (data_hi >> 16)) & 0x00ff;
4166 data_hi = data_hi & 0xff00;
4168 data_decoded = data_hi | data_lo;
4170 last_data_encoded = data_encoded;
4172 offset1 = (offset1 + 1) % 31;
4173 offset2 = offset2 & 0xff;
4175 return data_decoded;
4178 static int getMappedElement_DC(int element)
4186 // 0x0117 - 0x036e: (?)
4189 // 0x042d - 0x0684: (?)
4205 element = EL_CRYSTAL;
4208 case 0x0e77: // quicksand (boulder)
4209 element = EL_QUICKSAND_FAST_FULL;
4212 case 0x0e99: // slow quicksand (boulder)
4213 element = EL_QUICKSAND_FULL;
4217 element = EL_EM_EXIT_OPEN;
4221 element = EL_EM_EXIT_CLOSED;
4225 element = EL_EM_STEEL_EXIT_OPEN;
4229 element = EL_EM_STEEL_EXIT_CLOSED;
4232 case 0x0f4f: // dynamite (lit 1)
4233 element = EL_EM_DYNAMITE_ACTIVE;
4236 case 0x0f57: // dynamite (lit 2)
4237 element = EL_EM_DYNAMITE_ACTIVE;
4240 case 0x0f5f: // dynamite (lit 3)
4241 element = EL_EM_DYNAMITE_ACTIVE;
4244 case 0x0f67: // dynamite (lit 4)
4245 element = EL_EM_DYNAMITE_ACTIVE;
4252 element = EL_AMOEBA_WET;
4256 element = EL_AMOEBA_DROP;
4260 element = EL_DC_MAGIC_WALL;
4264 element = EL_SPACESHIP_UP;
4268 element = EL_SPACESHIP_DOWN;
4272 element = EL_SPACESHIP_LEFT;
4276 element = EL_SPACESHIP_RIGHT;
4280 element = EL_BUG_UP;
4284 element = EL_BUG_DOWN;
4288 element = EL_BUG_LEFT;
4292 element = EL_BUG_RIGHT;
4296 element = EL_MOLE_UP;
4300 element = EL_MOLE_DOWN;
4304 element = EL_MOLE_LEFT;
4308 element = EL_MOLE_RIGHT;
4316 element = EL_YAMYAM_UP;
4320 element = EL_SWITCHGATE_OPEN;
4324 element = EL_SWITCHGATE_CLOSED;
4328 element = EL_DC_SWITCHGATE_SWITCH_UP;
4332 element = EL_TIMEGATE_CLOSED;
4335 case 0x144c: // conveyor belt switch (green)
4336 element = EL_CONVEYOR_BELT_3_SWITCH_MIDDLE;
4339 case 0x144f: // conveyor belt switch (red)
4340 element = EL_CONVEYOR_BELT_1_SWITCH_MIDDLE;
4343 case 0x1452: // conveyor belt switch (blue)
4344 element = EL_CONVEYOR_BELT_4_SWITCH_MIDDLE;
4348 element = EL_CONVEYOR_BELT_3_MIDDLE;
4352 element = EL_CONVEYOR_BELT_3_LEFT;
4356 element = EL_CONVEYOR_BELT_3_RIGHT;
4360 element = EL_CONVEYOR_BELT_1_MIDDLE;
4364 element = EL_CONVEYOR_BELT_1_LEFT;
4368 element = EL_CONVEYOR_BELT_1_RIGHT;
4372 element = EL_CONVEYOR_BELT_4_MIDDLE;
4376 element = EL_CONVEYOR_BELT_4_LEFT;
4380 element = EL_CONVEYOR_BELT_4_RIGHT;
4384 element = EL_EXPANDABLE_WALL_HORIZONTAL;
4388 element = EL_EXPANDABLE_WALL_VERTICAL;
4392 element = EL_EXPANDABLE_WALL_ANY;
4395 case 0x14ce: // growing steel wall (left/right)
4396 element = EL_EXPANDABLE_STEELWALL_HORIZONTAL;
4399 case 0x14df: // growing steel wall (up/down)
4400 element = EL_EXPANDABLE_STEELWALL_VERTICAL;
4403 case 0x14e8: // growing steel wall (up/down/left/right)
4404 element = EL_EXPANDABLE_STEELWALL_ANY;
4408 element = EL_SHIELD_DEADLY;
4412 element = EL_EXTRA_TIME;
4420 element = EL_EMPTY_SPACE;
4423 case 0x1578: // quicksand (empty)
4424 element = EL_QUICKSAND_FAST_EMPTY;
4427 case 0x1579: // slow quicksand (empty)
4428 element = EL_QUICKSAND_EMPTY;
4438 element = EL_EM_DYNAMITE;
4441 case 0x15a1: // key (red)
4442 element = EL_EM_KEY_1;
4445 case 0x15a2: // key (yellow)
4446 element = EL_EM_KEY_2;
4449 case 0x15a3: // key (blue)
4450 element = EL_EM_KEY_4;
4453 case 0x15a4: // key (green)
4454 element = EL_EM_KEY_3;
4457 case 0x15a5: // key (white)
4458 element = EL_DC_KEY_WHITE;
4462 element = EL_WALL_SLIPPERY;
4469 case 0x15a8: // wall (not round)
4473 case 0x15a9: // (blue)
4474 element = EL_CHAR_A;
4477 case 0x15aa: // (blue)
4478 element = EL_CHAR_B;
4481 case 0x15ab: // (blue)
4482 element = EL_CHAR_C;
4485 case 0x15ac: // (blue)
4486 element = EL_CHAR_D;
4489 case 0x15ad: // (blue)
4490 element = EL_CHAR_E;
4493 case 0x15ae: // (blue)
4494 element = EL_CHAR_F;
4497 case 0x15af: // (blue)
4498 element = EL_CHAR_G;
4501 case 0x15b0: // (blue)
4502 element = EL_CHAR_H;
4505 case 0x15b1: // (blue)
4506 element = EL_CHAR_I;
4509 case 0x15b2: // (blue)
4510 element = EL_CHAR_J;
4513 case 0x15b3: // (blue)
4514 element = EL_CHAR_K;
4517 case 0x15b4: // (blue)
4518 element = EL_CHAR_L;
4521 case 0x15b5: // (blue)
4522 element = EL_CHAR_M;
4525 case 0x15b6: // (blue)
4526 element = EL_CHAR_N;
4529 case 0x15b7: // (blue)
4530 element = EL_CHAR_O;
4533 case 0x15b8: // (blue)
4534 element = EL_CHAR_P;
4537 case 0x15b9: // (blue)
4538 element = EL_CHAR_Q;
4541 case 0x15ba: // (blue)
4542 element = EL_CHAR_R;
4545 case 0x15bb: // (blue)
4546 element = EL_CHAR_S;
4549 case 0x15bc: // (blue)
4550 element = EL_CHAR_T;
4553 case 0x15bd: // (blue)
4554 element = EL_CHAR_U;
4557 case 0x15be: // (blue)
4558 element = EL_CHAR_V;
4561 case 0x15bf: // (blue)
4562 element = EL_CHAR_W;
4565 case 0x15c0: // (blue)
4566 element = EL_CHAR_X;
4569 case 0x15c1: // (blue)
4570 element = EL_CHAR_Y;
4573 case 0x15c2: // (blue)
4574 element = EL_CHAR_Z;
4577 case 0x15c3: // (blue)
4578 element = EL_CHAR_AUMLAUT;
4581 case 0x15c4: // (blue)
4582 element = EL_CHAR_OUMLAUT;
4585 case 0x15c5: // (blue)
4586 element = EL_CHAR_UUMLAUT;
4589 case 0x15c6: // (blue)
4590 element = EL_CHAR_0;
4593 case 0x15c7: // (blue)
4594 element = EL_CHAR_1;
4597 case 0x15c8: // (blue)
4598 element = EL_CHAR_2;
4601 case 0x15c9: // (blue)
4602 element = EL_CHAR_3;
4605 case 0x15ca: // (blue)
4606 element = EL_CHAR_4;
4609 case 0x15cb: // (blue)
4610 element = EL_CHAR_5;
4613 case 0x15cc: // (blue)
4614 element = EL_CHAR_6;
4617 case 0x15cd: // (blue)
4618 element = EL_CHAR_7;
4621 case 0x15ce: // (blue)
4622 element = EL_CHAR_8;
4625 case 0x15cf: // (blue)
4626 element = EL_CHAR_9;
4629 case 0x15d0: // (blue)
4630 element = EL_CHAR_PERIOD;
4633 case 0x15d1: // (blue)
4634 element = EL_CHAR_EXCLAM;
4637 case 0x15d2: // (blue)
4638 element = EL_CHAR_COLON;
4641 case 0x15d3: // (blue)
4642 element = EL_CHAR_LESS;
4645 case 0x15d4: // (blue)
4646 element = EL_CHAR_GREATER;
4649 case 0x15d5: // (blue)
4650 element = EL_CHAR_QUESTION;
4653 case 0x15d6: // (blue)
4654 element = EL_CHAR_COPYRIGHT;
4657 case 0x15d7: // (blue)
4658 element = EL_CHAR_UP;
4661 case 0x15d8: // (blue)
4662 element = EL_CHAR_DOWN;
4665 case 0x15d9: // (blue)
4666 element = EL_CHAR_BUTTON;
4669 case 0x15da: // (blue)
4670 element = EL_CHAR_PLUS;
4673 case 0x15db: // (blue)
4674 element = EL_CHAR_MINUS;
4677 case 0x15dc: // (blue)
4678 element = EL_CHAR_APOSTROPHE;
4681 case 0x15dd: // (blue)
4682 element = EL_CHAR_PARENLEFT;
4685 case 0x15de: // (blue)
4686 element = EL_CHAR_PARENRIGHT;
4689 case 0x15df: // (green)
4690 element = EL_CHAR_A;
4693 case 0x15e0: // (green)
4694 element = EL_CHAR_B;
4697 case 0x15e1: // (green)
4698 element = EL_CHAR_C;
4701 case 0x15e2: // (green)
4702 element = EL_CHAR_D;
4705 case 0x15e3: // (green)
4706 element = EL_CHAR_E;
4709 case 0x15e4: // (green)
4710 element = EL_CHAR_F;
4713 case 0x15e5: // (green)
4714 element = EL_CHAR_G;
4717 case 0x15e6: // (green)
4718 element = EL_CHAR_H;
4721 case 0x15e7: // (green)
4722 element = EL_CHAR_I;
4725 case 0x15e8: // (green)
4726 element = EL_CHAR_J;
4729 case 0x15e9: // (green)
4730 element = EL_CHAR_K;
4733 case 0x15ea: // (green)
4734 element = EL_CHAR_L;
4737 case 0x15eb: // (green)
4738 element = EL_CHAR_M;
4741 case 0x15ec: // (green)
4742 element = EL_CHAR_N;
4745 case 0x15ed: // (green)
4746 element = EL_CHAR_O;
4749 case 0x15ee: // (green)
4750 element = EL_CHAR_P;
4753 case 0x15ef: // (green)
4754 element = EL_CHAR_Q;
4757 case 0x15f0: // (green)
4758 element = EL_CHAR_R;
4761 case 0x15f1: // (green)
4762 element = EL_CHAR_S;
4765 case 0x15f2: // (green)
4766 element = EL_CHAR_T;
4769 case 0x15f3: // (green)
4770 element = EL_CHAR_U;
4773 case 0x15f4: // (green)
4774 element = EL_CHAR_V;
4777 case 0x15f5: // (green)
4778 element = EL_CHAR_W;
4781 case 0x15f6: // (green)
4782 element = EL_CHAR_X;
4785 case 0x15f7: // (green)
4786 element = EL_CHAR_Y;
4789 case 0x15f8: // (green)
4790 element = EL_CHAR_Z;
4793 case 0x15f9: // (green)
4794 element = EL_CHAR_AUMLAUT;
4797 case 0x15fa: // (green)
4798 element = EL_CHAR_OUMLAUT;
4801 case 0x15fb: // (green)
4802 element = EL_CHAR_UUMLAUT;
4805 case 0x15fc: // (green)
4806 element = EL_CHAR_0;
4809 case 0x15fd: // (green)
4810 element = EL_CHAR_1;
4813 case 0x15fe: // (green)
4814 element = EL_CHAR_2;
4817 case 0x15ff: // (green)
4818 element = EL_CHAR_3;
4821 case 0x1600: // (green)
4822 element = EL_CHAR_4;
4825 case 0x1601: // (green)
4826 element = EL_CHAR_5;
4829 case 0x1602: // (green)
4830 element = EL_CHAR_6;
4833 case 0x1603: // (green)
4834 element = EL_CHAR_7;
4837 case 0x1604: // (green)
4838 element = EL_CHAR_8;
4841 case 0x1605: // (green)
4842 element = EL_CHAR_9;
4845 case 0x1606: // (green)
4846 element = EL_CHAR_PERIOD;
4849 case 0x1607: // (green)
4850 element = EL_CHAR_EXCLAM;
4853 case 0x1608: // (green)
4854 element = EL_CHAR_COLON;
4857 case 0x1609: // (green)
4858 element = EL_CHAR_LESS;
4861 case 0x160a: // (green)
4862 element = EL_CHAR_GREATER;
4865 case 0x160b: // (green)
4866 element = EL_CHAR_QUESTION;
4869 case 0x160c: // (green)
4870 element = EL_CHAR_COPYRIGHT;
4873 case 0x160d: // (green)
4874 element = EL_CHAR_UP;
4877 case 0x160e: // (green)
4878 element = EL_CHAR_DOWN;
4881 case 0x160f: // (green)
4882 element = EL_CHAR_BUTTON;
4885 case 0x1610: // (green)
4886 element = EL_CHAR_PLUS;
4889 case 0x1611: // (green)
4890 element = EL_CHAR_MINUS;
4893 case 0x1612: // (green)
4894 element = EL_CHAR_APOSTROPHE;
4897 case 0x1613: // (green)
4898 element = EL_CHAR_PARENLEFT;
4901 case 0x1614: // (green)
4902 element = EL_CHAR_PARENRIGHT;
4905 case 0x1615: // (blue steel)
4906 element = EL_STEEL_CHAR_A;
4909 case 0x1616: // (blue steel)
4910 element = EL_STEEL_CHAR_B;
4913 case 0x1617: // (blue steel)
4914 element = EL_STEEL_CHAR_C;
4917 case 0x1618: // (blue steel)
4918 element = EL_STEEL_CHAR_D;
4921 case 0x1619: // (blue steel)
4922 element = EL_STEEL_CHAR_E;
4925 case 0x161a: // (blue steel)
4926 element = EL_STEEL_CHAR_F;
4929 case 0x161b: // (blue steel)
4930 element = EL_STEEL_CHAR_G;
4933 case 0x161c: // (blue steel)
4934 element = EL_STEEL_CHAR_H;
4937 case 0x161d: // (blue steel)
4938 element = EL_STEEL_CHAR_I;
4941 case 0x161e: // (blue steel)
4942 element = EL_STEEL_CHAR_J;
4945 case 0x161f: // (blue steel)
4946 element = EL_STEEL_CHAR_K;
4949 case 0x1620: // (blue steel)
4950 element = EL_STEEL_CHAR_L;
4953 case 0x1621: // (blue steel)
4954 element = EL_STEEL_CHAR_M;
4957 case 0x1622: // (blue steel)
4958 element = EL_STEEL_CHAR_N;
4961 case 0x1623: // (blue steel)
4962 element = EL_STEEL_CHAR_O;
4965 case 0x1624: // (blue steel)
4966 element = EL_STEEL_CHAR_P;
4969 case 0x1625: // (blue steel)
4970 element = EL_STEEL_CHAR_Q;
4973 case 0x1626: // (blue steel)
4974 element = EL_STEEL_CHAR_R;
4977 case 0x1627: // (blue steel)
4978 element = EL_STEEL_CHAR_S;
4981 case 0x1628: // (blue steel)
4982 element = EL_STEEL_CHAR_T;
4985 case 0x1629: // (blue steel)
4986 element = EL_STEEL_CHAR_U;
4989 case 0x162a: // (blue steel)
4990 element = EL_STEEL_CHAR_V;
4993 case 0x162b: // (blue steel)
4994 element = EL_STEEL_CHAR_W;
4997 case 0x162c: // (blue steel)
4998 element = EL_STEEL_CHAR_X;
5001 case 0x162d: // (blue steel)
5002 element = EL_STEEL_CHAR_Y;
5005 case 0x162e: // (blue steel)
5006 element = EL_STEEL_CHAR_Z;
5009 case 0x162f: // (blue steel)
5010 element = EL_STEEL_CHAR_AUMLAUT;
5013 case 0x1630: // (blue steel)
5014 element = EL_STEEL_CHAR_OUMLAUT;
5017 case 0x1631: // (blue steel)
5018 element = EL_STEEL_CHAR_UUMLAUT;
5021 case 0x1632: // (blue steel)
5022 element = EL_STEEL_CHAR_0;
5025 case 0x1633: // (blue steel)
5026 element = EL_STEEL_CHAR_1;
5029 case 0x1634: // (blue steel)
5030 element = EL_STEEL_CHAR_2;
5033 case 0x1635: // (blue steel)
5034 element = EL_STEEL_CHAR_3;
5037 case 0x1636: // (blue steel)
5038 element = EL_STEEL_CHAR_4;
5041 case 0x1637: // (blue steel)
5042 element = EL_STEEL_CHAR_5;
5045 case 0x1638: // (blue steel)
5046 element = EL_STEEL_CHAR_6;
5049 case 0x1639: // (blue steel)
5050 element = EL_STEEL_CHAR_7;
5053 case 0x163a: // (blue steel)
5054 element = EL_STEEL_CHAR_8;
5057 case 0x163b: // (blue steel)
5058 element = EL_STEEL_CHAR_9;
5061 case 0x163c: // (blue steel)
5062 element = EL_STEEL_CHAR_PERIOD;
5065 case 0x163d: // (blue steel)
5066 element = EL_STEEL_CHAR_EXCLAM;
5069 case 0x163e: // (blue steel)
5070 element = EL_STEEL_CHAR_COLON;
5073 case 0x163f: // (blue steel)
5074 element = EL_STEEL_CHAR_LESS;
5077 case 0x1640: // (blue steel)
5078 element = EL_STEEL_CHAR_GREATER;
5081 case 0x1641: // (blue steel)
5082 element = EL_STEEL_CHAR_QUESTION;
5085 case 0x1642: // (blue steel)
5086 element = EL_STEEL_CHAR_COPYRIGHT;
5089 case 0x1643: // (blue steel)
5090 element = EL_STEEL_CHAR_UP;
5093 case 0x1644: // (blue steel)
5094 element = EL_STEEL_CHAR_DOWN;
5097 case 0x1645: // (blue steel)
5098 element = EL_STEEL_CHAR_BUTTON;
5101 case 0x1646: // (blue steel)
5102 element = EL_STEEL_CHAR_PLUS;
5105 case 0x1647: // (blue steel)
5106 element = EL_STEEL_CHAR_MINUS;
5109 case 0x1648: // (blue steel)
5110 element = EL_STEEL_CHAR_APOSTROPHE;
5113 case 0x1649: // (blue steel)
5114 element = EL_STEEL_CHAR_PARENLEFT;
5117 case 0x164a: // (blue steel)
5118 element = EL_STEEL_CHAR_PARENRIGHT;
5121 case 0x164b: // (green steel)
5122 element = EL_STEEL_CHAR_A;
5125 case 0x164c: // (green steel)
5126 element = EL_STEEL_CHAR_B;
5129 case 0x164d: // (green steel)
5130 element = EL_STEEL_CHAR_C;
5133 case 0x164e: // (green steel)
5134 element = EL_STEEL_CHAR_D;
5137 case 0x164f: // (green steel)
5138 element = EL_STEEL_CHAR_E;
5141 case 0x1650: // (green steel)
5142 element = EL_STEEL_CHAR_F;
5145 case 0x1651: // (green steel)
5146 element = EL_STEEL_CHAR_G;
5149 case 0x1652: // (green steel)
5150 element = EL_STEEL_CHAR_H;
5153 case 0x1653: // (green steel)
5154 element = EL_STEEL_CHAR_I;
5157 case 0x1654: // (green steel)
5158 element = EL_STEEL_CHAR_J;
5161 case 0x1655: // (green steel)
5162 element = EL_STEEL_CHAR_K;
5165 case 0x1656: // (green steel)
5166 element = EL_STEEL_CHAR_L;
5169 case 0x1657: // (green steel)
5170 element = EL_STEEL_CHAR_M;
5173 case 0x1658: // (green steel)
5174 element = EL_STEEL_CHAR_N;
5177 case 0x1659: // (green steel)
5178 element = EL_STEEL_CHAR_O;
5181 case 0x165a: // (green steel)
5182 element = EL_STEEL_CHAR_P;
5185 case 0x165b: // (green steel)
5186 element = EL_STEEL_CHAR_Q;
5189 case 0x165c: // (green steel)
5190 element = EL_STEEL_CHAR_R;
5193 case 0x165d: // (green steel)
5194 element = EL_STEEL_CHAR_S;
5197 case 0x165e: // (green steel)
5198 element = EL_STEEL_CHAR_T;
5201 case 0x165f: // (green steel)
5202 element = EL_STEEL_CHAR_U;
5205 case 0x1660: // (green steel)
5206 element = EL_STEEL_CHAR_V;
5209 case 0x1661: // (green steel)
5210 element = EL_STEEL_CHAR_W;
5213 case 0x1662: // (green steel)
5214 element = EL_STEEL_CHAR_X;
5217 case 0x1663: // (green steel)
5218 element = EL_STEEL_CHAR_Y;
5221 case 0x1664: // (green steel)
5222 element = EL_STEEL_CHAR_Z;
5225 case 0x1665: // (green steel)
5226 element = EL_STEEL_CHAR_AUMLAUT;
5229 case 0x1666: // (green steel)
5230 element = EL_STEEL_CHAR_OUMLAUT;
5233 case 0x1667: // (green steel)
5234 element = EL_STEEL_CHAR_UUMLAUT;
5237 case 0x1668: // (green steel)
5238 element = EL_STEEL_CHAR_0;
5241 case 0x1669: // (green steel)
5242 element = EL_STEEL_CHAR_1;
5245 case 0x166a: // (green steel)
5246 element = EL_STEEL_CHAR_2;
5249 case 0x166b: // (green steel)
5250 element = EL_STEEL_CHAR_3;
5253 case 0x166c: // (green steel)
5254 element = EL_STEEL_CHAR_4;
5257 case 0x166d: // (green steel)
5258 element = EL_STEEL_CHAR_5;
5261 case 0x166e: // (green steel)
5262 element = EL_STEEL_CHAR_6;
5265 case 0x166f: // (green steel)
5266 element = EL_STEEL_CHAR_7;
5269 case 0x1670: // (green steel)
5270 element = EL_STEEL_CHAR_8;
5273 case 0x1671: // (green steel)
5274 element = EL_STEEL_CHAR_9;
5277 case 0x1672: // (green steel)
5278 element = EL_STEEL_CHAR_PERIOD;
5281 case 0x1673: // (green steel)
5282 element = EL_STEEL_CHAR_EXCLAM;
5285 case 0x1674: // (green steel)
5286 element = EL_STEEL_CHAR_COLON;
5289 case 0x1675: // (green steel)
5290 element = EL_STEEL_CHAR_LESS;
5293 case 0x1676: // (green steel)
5294 element = EL_STEEL_CHAR_GREATER;
5297 case 0x1677: // (green steel)
5298 element = EL_STEEL_CHAR_QUESTION;
5301 case 0x1678: // (green steel)
5302 element = EL_STEEL_CHAR_COPYRIGHT;
5305 case 0x1679: // (green steel)
5306 element = EL_STEEL_CHAR_UP;
5309 case 0x167a: // (green steel)
5310 element = EL_STEEL_CHAR_DOWN;
5313 case 0x167b: // (green steel)
5314 element = EL_STEEL_CHAR_BUTTON;
5317 case 0x167c: // (green steel)
5318 element = EL_STEEL_CHAR_PLUS;
5321 case 0x167d: // (green steel)
5322 element = EL_STEEL_CHAR_MINUS;
5325 case 0x167e: // (green steel)
5326 element = EL_STEEL_CHAR_APOSTROPHE;
5329 case 0x167f: // (green steel)
5330 element = EL_STEEL_CHAR_PARENLEFT;
5333 case 0x1680: // (green steel)
5334 element = EL_STEEL_CHAR_PARENRIGHT;
5337 case 0x1681: // gate (red)
5338 element = EL_EM_GATE_1;
5341 case 0x1682: // secret gate (red)
5342 element = EL_EM_GATE_1_GRAY;
5345 case 0x1683: // gate (yellow)
5346 element = EL_EM_GATE_2;
5349 case 0x1684: // secret gate (yellow)
5350 element = EL_EM_GATE_2_GRAY;
5353 case 0x1685: // gate (blue)
5354 element = EL_EM_GATE_4;
5357 case 0x1686: // secret gate (blue)
5358 element = EL_EM_GATE_4_GRAY;
5361 case 0x1687: // gate (green)
5362 element = EL_EM_GATE_3;
5365 case 0x1688: // secret gate (green)
5366 element = EL_EM_GATE_3_GRAY;
5369 case 0x1689: // gate (white)
5370 element = EL_DC_GATE_WHITE;
5373 case 0x168a: // secret gate (white)
5374 element = EL_DC_GATE_WHITE_GRAY;
5377 case 0x168b: // secret gate (no key)
5378 element = EL_DC_GATE_FAKE_GRAY;
5382 element = EL_ROBOT_WHEEL;
5386 element = EL_DC_TIMEGATE_SWITCH;
5390 element = EL_ACID_POOL_BOTTOM;
5394 element = EL_ACID_POOL_TOPLEFT;
5398 element = EL_ACID_POOL_TOPRIGHT;
5402 element = EL_ACID_POOL_BOTTOMLEFT;
5406 element = EL_ACID_POOL_BOTTOMRIGHT;
5410 element = EL_STEELWALL;
5414 element = EL_STEELWALL_SLIPPERY;
5417 case 0x1695: // steel wall (not round)
5418 element = EL_STEELWALL;
5421 case 0x1696: // steel wall (left)
5422 element = EL_DC_STEELWALL_1_LEFT;
5425 case 0x1697: // steel wall (bottom)
5426 element = EL_DC_STEELWALL_1_BOTTOM;
5429 case 0x1698: // steel wall (right)
5430 element = EL_DC_STEELWALL_1_RIGHT;
5433 case 0x1699: // steel wall (top)
5434 element = EL_DC_STEELWALL_1_TOP;
5437 case 0x169a: // steel wall (left/bottom)
5438 element = EL_DC_STEELWALL_1_BOTTOMLEFT;
5441 case 0x169b: // steel wall (right/bottom)
5442 element = EL_DC_STEELWALL_1_BOTTOMRIGHT;
5445 case 0x169c: // steel wall (right/top)
5446 element = EL_DC_STEELWALL_1_TOPRIGHT;
5449 case 0x169d: // steel wall (left/top)
5450 element = EL_DC_STEELWALL_1_TOPLEFT;
5453 case 0x169e: // steel wall (right/bottom small)
5454 element = EL_DC_STEELWALL_1_BOTTOMRIGHT_2;
5457 case 0x169f: // steel wall (left/bottom small)
5458 element = EL_DC_STEELWALL_1_BOTTOMLEFT_2;
5461 case 0x16a0: // steel wall (right/top small)
5462 element = EL_DC_STEELWALL_1_TOPRIGHT_2;
5465 case 0x16a1: // steel wall (left/top small)
5466 element = EL_DC_STEELWALL_1_TOPLEFT_2;
5469 case 0x16a2: // steel wall (left/right)
5470 element = EL_DC_STEELWALL_1_VERTICAL;
5473 case 0x16a3: // steel wall (top/bottom)
5474 element = EL_DC_STEELWALL_1_HORIZONTAL;
5477 case 0x16a4: // steel wall 2 (left end)
5478 element = EL_DC_STEELWALL_2_LEFT;
5481 case 0x16a5: // steel wall 2 (right end)
5482 element = EL_DC_STEELWALL_2_RIGHT;
5485 case 0x16a6: // steel wall 2 (top end)
5486 element = EL_DC_STEELWALL_2_TOP;
5489 case 0x16a7: // steel wall 2 (bottom end)
5490 element = EL_DC_STEELWALL_2_BOTTOM;
5493 case 0x16a8: // steel wall 2 (left/right)
5494 element = EL_DC_STEELWALL_2_HORIZONTAL;
5497 case 0x16a9: // steel wall 2 (up/down)
5498 element = EL_DC_STEELWALL_2_VERTICAL;
5501 case 0x16aa: // steel wall 2 (mid)
5502 element = EL_DC_STEELWALL_2_MIDDLE;
5506 element = EL_SIGN_EXCLAMATION;
5510 element = EL_SIGN_RADIOACTIVITY;
5514 element = EL_SIGN_STOP;
5518 element = EL_SIGN_WHEELCHAIR;
5522 element = EL_SIGN_PARKING;
5526 element = EL_SIGN_NO_ENTRY;
5530 element = EL_SIGN_HEART;
5534 element = EL_SIGN_GIVE_WAY;
5538 element = EL_SIGN_ENTRY_FORBIDDEN;
5542 element = EL_SIGN_EMERGENCY_EXIT;
5546 element = EL_SIGN_YIN_YANG;
5550 element = EL_WALL_EMERALD;
5554 element = EL_WALL_DIAMOND;
5558 element = EL_WALL_PEARL;
5562 element = EL_WALL_CRYSTAL;
5566 element = EL_INVISIBLE_WALL;
5570 element = EL_INVISIBLE_STEELWALL;
5574 // EL_INVISIBLE_SAND
5577 element = EL_LIGHT_SWITCH;
5581 element = EL_ENVELOPE_1;
5585 if (element >= 0x0117 && element <= 0x036e) // (?)
5586 element = EL_DIAMOND;
5587 else if (element >= 0x042d && element <= 0x0684) // (?)
5588 element = EL_EMERALD;
5589 else if (element >= 0x157c && element <= 0x158b)
5591 else if (element >= 0x1590 && element <= 0x159f)
5592 element = EL_DC_LANDMINE;
5593 else if (element >= 0x16bc && element <= 0x16cb)
5594 element = EL_INVISIBLE_SAND;
5597 Warn("unknown Diamond Caves element 0x%04x", element);
5599 element = EL_UNKNOWN;
5604 return getMappedElement(element);
5607 static void LoadLevelFromFileStream_DC(File *file, struct LevelInfo *level,
5610 byte header[DC_LEVEL_HEADER_SIZE];
5612 int envelope_header_pos = 62;
5613 int envelope_content_pos = 94;
5614 int level_name_pos = 251;
5615 int level_author_pos = 292;
5616 int envelope_header_len;
5617 int envelope_content_len;
5619 int level_author_len;
5621 int num_yamyam_contents;
5624 getDecodedWord_DC(0, TRUE); // initialize DC2 decoding engine
5626 for (i = 0; i < DC_LEVEL_HEADER_SIZE / 2; i++)
5628 unsigned short header_word = getDecodedWord_DC(getFile16BitBE(file), FALSE);
5630 header[i * 2 + 0] = header_word >> 8;
5631 header[i * 2 + 1] = header_word & 0xff;
5634 // read some values from level header to check level decoding integrity
5635 fieldx = header[6] | (header[7] << 8);
5636 fieldy = header[8] | (header[9] << 8);
5637 num_yamyam_contents = header[60] | (header[61] << 8);
5639 // do some simple sanity checks to ensure that level was correctly decoded
5640 if (fieldx < 1 || fieldx > 256 ||
5641 fieldy < 1 || fieldy > 256 ||
5642 num_yamyam_contents < 1 || num_yamyam_contents > 8)
5644 level->no_valid_file = TRUE;
5646 Warn("cannot decode level from stream -- using empty level");
5651 // maximum envelope header size is 31 bytes
5652 envelope_header_len = header[envelope_header_pos];
5653 // maximum envelope content size is 110 (156?) bytes
5654 envelope_content_len = header[envelope_content_pos];
5656 // maximum level title size is 40 bytes
5657 level_name_len = MIN(header[level_name_pos], MAX_LEVEL_NAME_LEN);
5658 // maximum level author size is 30 (51?) bytes
5659 level_author_len = MIN(header[level_author_pos], MAX_LEVEL_AUTHOR_LEN);
5663 for (i = 0; i < envelope_header_len; i++)
5664 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5665 level->envelope[0].text[envelope_size++] =
5666 header[envelope_header_pos + 1 + i];
5668 if (envelope_header_len > 0 && envelope_content_len > 0)
5670 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5671 level->envelope[0].text[envelope_size++] = '\n';
5672 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5673 level->envelope[0].text[envelope_size++] = '\n';
5676 for (i = 0; i < envelope_content_len; i++)
5677 if (envelope_size < MAX_ENVELOPE_TEXT_LEN)
5678 level->envelope[0].text[envelope_size++] =
5679 header[envelope_content_pos + 1 + i];
5681 level->envelope[0].text[envelope_size] = '\0';
5683 level->envelope[0].xsize = MAX_ENVELOPE_XSIZE;
5684 level->envelope[0].ysize = 10;
5685 level->envelope[0].autowrap = TRUE;
5686 level->envelope[0].centered = TRUE;
5688 for (i = 0; i < level_name_len; i++)
5689 level->name[i] = header[level_name_pos + 1 + i];
5690 level->name[level_name_len] = '\0';
5692 for (i = 0; i < level_author_len; i++)
5693 level->author[i] = header[level_author_pos + 1 + i];
5694 level->author[level_author_len] = '\0';
5696 num_yamyam_contents = header[60] | (header[61] << 8);
5697 level->num_yamyam_contents =
5698 MIN(MAX(MIN_ELEMENT_CONTENTS, num_yamyam_contents), MAX_ELEMENT_CONTENTS);
5700 for (i = 0; i < num_yamyam_contents; i++)
5702 for (y = 0; y < 3; y++) for (x = 0; x < 3; x++)
5704 unsigned short word = getDecodedWord_DC(getFile16BitBE(file), FALSE);
5705 int element_dc = ((word & 0xff) << 8) | ((word >> 8) & 0xff);
5707 if (i < MAX_ELEMENT_CONTENTS)
5708 level->yamyam_content[i].e[x][y] = getMappedElement_DC(element_dc);
5712 fieldx = header[6] | (header[7] << 8);
5713 fieldy = header[8] | (header[9] << 8);
5714 level->fieldx = MIN(MAX(MIN_LEV_FIELDX, fieldx), MAX_LEV_FIELDX);
5715 level->fieldy = MIN(MAX(MIN_LEV_FIELDY, fieldy), MAX_LEV_FIELDY);
5717 for (y = 0; y < fieldy; y++) for (x = 0; x < fieldx; x++)
5719 unsigned short word = getDecodedWord_DC(getFile16BitBE(file), FALSE);
5720 int element_dc = ((word & 0xff) << 8) | ((word >> 8) & 0xff);
5722 if (x < MAX_LEV_FIELDX && y < MAX_LEV_FIELDY)
5723 level->field[x][y] = getMappedElement_DC(element_dc);
5726 x = MIN(MAX(0, (header[10] | (header[11] << 8)) - 1), MAX_LEV_FIELDX - 1);
5727 y = MIN(MAX(0, (header[12] | (header[13] << 8)) - 1), MAX_LEV_FIELDY - 1);
5728 level->field[x][y] = EL_PLAYER_1;
5730 x = MIN(MAX(0, (header[14] | (header[15] << 8)) - 1), MAX_LEV_FIELDX - 1);
5731 y = MIN(MAX(0, (header[16] | (header[17] << 8)) - 1), MAX_LEV_FIELDY - 1);
5732 level->field[x][y] = EL_PLAYER_2;
5734 level->gems_needed = header[18] | (header[19] << 8);
5736 level->score[SC_EMERALD] = header[20] | (header[21] << 8);
5737 level->score[SC_DIAMOND] = header[22] | (header[23] << 8);
5738 level->score[SC_PEARL] = header[24] | (header[25] << 8);
5739 level->score[SC_CRYSTAL] = header[26] | (header[27] << 8);
5740 level->score[SC_NUT] = header[28] | (header[29] << 8);
5741 level->score[SC_ROBOT] = header[30] | (header[31] << 8);
5742 level->score[SC_SPACESHIP] = header[32] | (header[33] << 8);
5743 level->score[SC_BUG] = header[34] | (header[35] << 8);
5744 level->score[SC_YAMYAM] = header[36] | (header[37] << 8);
5745 level->score[SC_DYNAMITE] = header[38] | (header[39] << 8);
5746 level->score[SC_KEY] = header[40] | (header[41] << 8);
5747 level->score[SC_TIME_BONUS] = header[42] | (header[43] << 8);
5749 level->time = header[44] | (header[45] << 8);
5751 level->amoeba_speed = header[46] | (header[47] << 8);
5752 level->time_light = header[48] | (header[49] << 8);
5753 level->time_timegate = header[50] | (header[51] << 8);
5754 level->time_wheel = header[52] | (header[53] << 8);
5755 level->time_magic_wall = header[54] | (header[55] << 8);
5756 level->extra_time = header[56] | (header[57] << 8);
5757 level->shield_normal_time = header[58] | (header[59] << 8);
5759 // shield and extra time elements do not have a score
5760 level->score[SC_SHIELD] = 0;
5761 level->extra_time_score = 0;
5763 // set time for normal and deadly shields to the same value
5764 level->shield_deadly_time = level->shield_normal_time;
5766 // Diamond Caves has the same (strange) behaviour as Emerald Mine that gems
5767 // can slip down from flat walls, like normal walls and steel walls
5768 level->em_slippery_gems = TRUE;
5770 // time score is counted for each 10 seconds left in Diamond Caves levels
5771 level->time_score_base = 10;
5774 static void LoadLevelFromFileInfo_DC(struct LevelInfo *level,
5775 struct LevelFileInfo *level_file_info,
5776 boolean level_info_only)
5778 char *filename = level_file_info->filename;
5780 int num_magic_bytes = 8;
5781 char magic_bytes[num_magic_bytes + 1];
5782 int num_levels_to_skip = level_file_info->nr - leveldir_current->first_level;
5784 if (!(file = openFile(filename, MODE_READ)))
5786 level->no_valid_file = TRUE;
5788 if (!level_info_only)
5789 Warn("cannot read level '%s' -- using empty level", filename);
5794 // fseek(file, 0x0000, SEEK_SET);
5796 if (level_file_info->packed)
5798 // read "magic bytes" from start of file
5799 if (getStringFromFile(file, magic_bytes, num_magic_bytes + 1) == NULL)
5800 magic_bytes[0] = '\0';
5802 // check "magic bytes" for correct file format
5803 if (!strPrefix(magic_bytes, "DC2"))
5805 level->no_valid_file = TRUE;
5807 Warn("unknown DC level file '%s' -- using empty level", filename);
5812 if (strPrefix(magic_bytes, "DC2Win95") ||
5813 strPrefix(magic_bytes, "DC2Win98"))
5815 int position_first_level = 0x00fa;
5816 int extra_bytes = 4;
5819 // advance file stream to first level inside the level package
5820 skip_bytes = position_first_level - num_magic_bytes - extra_bytes;
5822 // each block of level data is followed by block of non-level data
5823 num_levels_to_skip *= 2;
5825 // at least skip header bytes, therefore use ">= 0" instead of "> 0"
5826 while (num_levels_to_skip >= 0)
5828 // advance file stream to next level inside the level package
5829 if (seekFile(file, skip_bytes, SEEK_CUR) != 0)
5831 level->no_valid_file = TRUE;
5833 Warn("cannot fseek in file '%s' -- using empty level", filename);
5838 // skip apparently unused extra bytes following each level
5839 ReadUnusedBytesFromFile(file, extra_bytes);
5841 // read size of next level in level package
5842 skip_bytes = getFile32BitLE(file);
5844 num_levels_to_skip--;
5849 level->no_valid_file = TRUE;
5851 Warn("unknown DC2 level file '%s' -- using empty level", filename);
5857 LoadLevelFromFileStream_DC(file, level, level_file_info->nr);
5863 // ----------------------------------------------------------------------------
5864 // functions for loading SB level
5865 // ----------------------------------------------------------------------------
5867 int getMappedElement_SB(int element_ascii, boolean use_ces)
5875 sb_element_mapping[] =
5877 { ' ', EL_EMPTY, EL_CUSTOM_1 }, // floor (space)
5878 { '#', EL_STEELWALL, EL_CUSTOM_2 }, // wall
5879 { '@', EL_PLAYER_1, EL_CUSTOM_3 }, // player
5880 { '$', EL_SOKOBAN_OBJECT, EL_CUSTOM_4 }, // box
5881 { '.', EL_SOKOBAN_FIELD_EMPTY, EL_CUSTOM_5 }, // goal square
5882 { '*', EL_SOKOBAN_FIELD_FULL, EL_CUSTOM_6 }, // box on goal square
5883 { '+', EL_SOKOBAN_FIELD_PLAYER, EL_CUSTOM_7 }, // player on goal square
5884 { '_', EL_INVISIBLE_STEELWALL, EL_FROM_LEVEL_TEMPLATE }, // floor beyond border
5891 for (i = 0; sb_element_mapping[i].ascii != 0; i++)
5892 if (element_ascii == sb_element_mapping[i].ascii)
5893 return (use_ces ? sb_element_mapping[i].ce : sb_element_mapping[i].sb);
5895 return EL_UNDEFINED;
5898 static void LoadLevelFromFileInfo_SB(struct LevelInfo *level,
5899 struct LevelFileInfo *level_file_info,
5900 boolean level_info_only)
5902 char *filename = level_file_info->filename;
5903 char line[MAX_LINE_LEN], line_raw[MAX_LINE_LEN], previous_line[MAX_LINE_LEN];
5904 char last_comment[MAX_LINE_LEN];
5905 char level_name[MAX_LINE_LEN];
5908 int num_levels_to_skip = level_file_info->nr - leveldir_current->first_level;
5909 boolean read_continued_line = FALSE;
5910 boolean reading_playfield = FALSE;
5911 boolean got_valid_playfield_line = FALSE;
5912 boolean invalid_playfield_char = FALSE;
5913 boolean load_xsb_to_ces = check_special_flags("load_xsb_to_ces");
5914 int file_level_nr = 0;
5916 int x = 0, y = 0; // initialized to make compilers happy
5918 last_comment[0] = '\0';
5919 level_name[0] = '\0';
5921 if (!(file = openFile(filename, MODE_READ)))
5923 level->no_valid_file = TRUE;
5925 if (!level_info_only)
5926 Warn("cannot read level '%s' -- using empty level", filename);
5931 while (!checkEndOfFile(file))
5933 // level successfully read, but next level may follow here
5934 if (!got_valid_playfield_line && reading_playfield)
5936 // read playfield from single level file -- skip remaining file
5937 if (!level_file_info->packed)
5940 if (file_level_nr >= num_levels_to_skip)
5945 last_comment[0] = '\0';
5946 level_name[0] = '\0';
5948 reading_playfield = FALSE;
5951 got_valid_playfield_line = FALSE;
5953 // read next line of input file
5954 if (!getStringFromFile(file, line, MAX_LINE_LEN))
5957 // check if line was completely read and is terminated by line break
5958 if (strlen(line) > 0 && line[strlen(line) - 1] == '\n')
5961 // cut trailing line break (this can be newline and/or carriage return)
5962 for (line_ptr = &line[strlen(line)]; line_ptr >= line; line_ptr--)
5963 if ((*line_ptr == '\n' || *line_ptr == '\r') && *(line_ptr + 1) == '\0')
5966 // copy raw input line for later use (mainly debugging output)
5967 strcpy(line_raw, line);
5969 if (read_continued_line)
5971 // append new line to existing line, if there is enough space
5972 if (strlen(previous_line) + strlen(line_ptr) < MAX_LINE_LEN)
5973 strcat(previous_line, line_ptr);
5975 strcpy(line, previous_line); // copy storage buffer to line
5977 read_continued_line = FALSE;
5980 // if the last character is '\', continue at next line
5981 if (strlen(line) > 0 && line[strlen(line) - 1] == '\\')
5983 line[strlen(line) - 1] = '\0'; // cut off trailing backslash
5984 strcpy(previous_line, line); // copy line to storage buffer
5986 read_continued_line = TRUE;
5992 if (line[0] == '\0')
5995 // extract comment text from comment line
5998 for (line_ptr = line; *line_ptr; line_ptr++)
5999 if (*line_ptr != ' ' && *line_ptr != '\t' && *line_ptr != ';')
6002 strcpy(last_comment, line_ptr);
6007 // extract level title text from line containing level title
6008 if (line[0] == '\'')
6010 strcpy(level_name, &line[1]);
6012 if (strlen(level_name) > 0 && level_name[strlen(level_name) - 1] == '\'')
6013 level_name[strlen(level_name) - 1] = '\0';
6018 // skip lines containing only spaces (or empty lines)
6019 for (line_ptr = line; *line_ptr; line_ptr++)
6020 if (*line_ptr != ' ')
6022 if (*line_ptr == '\0')
6025 // at this point, we have found a line containing part of a playfield
6027 got_valid_playfield_line = TRUE;
6029 if (!reading_playfield)
6031 reading_playfield = TRUE;
6032 invalid_playfield_char = FALSE;
6034 for (x = 0; x < MAX_LEV_FIELDX; x++)
6035 for (y = 0; y < MAX_LEV_FIELDY; y++)
6036 level->field[x][y] = getMappedElement_SB(' ', load_xsb_to_ces);
6041 // start with topmost tile row
6045 // skip playfield line if larger row than allowed
6046 if (y >= MAX_LEV_FIELDY)
6049 // start with leftmost tile column
6052 // read playfield elements from line
6053 for (line_ptr = line; *line_ptr; line_ptr++)
6055 int mapped_sb_element = getMappedElement_SB(*line_ptr, load_xsb_to_ces);
6057 // stop parsing playfield line if larger column than allowed
6058 if (x >= MAX_LEV_FIELDX)
6061 if (mapped_sb_element == EL_UNDEFINED)
6063 invalid_playfield_char = TRUE;
6068 level->field[x][y] = mapped_sb_element;
6070 // continue with next tile column
6073 level->fieldx = MAX(x, level->fieldx);
6076 if (invalid_playfield_char)
6078 // if first playfield line, treat invalid lines as comment lines
6080 reading_playfield = FALSE;
6085 // continue with next tile row
6093 level->fieldx = MIN(MAX(MIN_LEV_FIELDX, level->fieldx), MAX_LEV_FIELDX);
6094 level->fieldy = MIN(MAX(MIN_LEV_FIELDY, level->fieldy), MAX_LEV_FIELDY);
6096 if (!reading_playfield)
6098 level->no_valid_file = TRUE;
6100 Warn("cannot read level '%s' -- using empty level", filename);
6105 if (*level_name != '\0')
6107 strncpy(level->name, level_name, MAX_LEVEL_NAME_LEN);
6108 level->name[MAX_LEVEL_NAME_LEN] = '\0';
6110 else if (*last_comment != '\0')
6112 strncpy(level->name, last_comment, MAX_LEVEL_NAME_LEN);
6113 level->name[MAX_LEVEL_NAME_LEN] = '\0';
6117 sprintf(level->name, "--> Level %d <--", level_file_info->nr);
6120 // set all empty fields beyond the border walls to invisible steel wall
6121 for (y = 0; y < level->fieldy; y++) for (x = 0; x < level->fieldx; x++)
6123 if ((x == 0 || x == level->fieldx - 1 ||
6124 y == 0 || y == level->fieldy - 1) &&
6125 level->field[x][y] == getMappedElement_SB(' ', load_xsb_to_ces))
6126 FloodFillLevel(x, y, getMappedElement_SB('_', load_xsb_to_ces),
6127 level->field, level->fieldx, level->fieldy);
6130 // set special level settings for Sokoban levels
6133 level->use_step_counter = TRUE;
6135 if (load_xsb_to_ces)
6137 // special global settings can now be set in level template
6139 level->use_custom_template = TRUE;
6144 // -------------------------------------------------------------------------
6145 // functions for handling native levels
6146 // -------------------------------------------------------------------------
6148 static void LoadLevelFromFileInfo_EM(struct LevelInfo *level,
6149 struct LevelFileInfo *level_file_info,
6150 boolean level_info_only)
6152 if (!LoadNativeLevel_EM(level_file_info->filename, level_info_only))
6153 level->no_valid_file = TRUE;
6156 static void LoadLevelFromFileInfo_SP(struct LevelInfo *level,
6157 struct LevelFileInfo *level_file_info,
6158 boolean level_info_only)
6162 // determine position of requested level inside level package
6163 if (level_file_info->packed)
6164 pos = level_file_info->nr - leveldir_current->first_level;
6166 if (!LoadNativeLevel_SP(level_file_info->filename, pos, level_info_only))
6167 level->no_valid_file = TRUE;
6170 static void LoadLevelFromFileInfo_MM(struct LevelInfo *level,
6171 struct LevelFileInfo *level_file_info,
6172 boolean level_info_only)
6174 if (!LoadNativeLevel_MM(level_file_info->filename, level_info_only))
6175 level->no_valid_file = TRUE;
6178 void CopyNativeLevel_RND_to_Native(struct LevelInfo *level)
6180 if (level->game_engine_type == GAME_ENGINE_TYPE_EM)
6181 CopyNativeLevel_RND_to_EM(level);
6182 else if (level->game_engine_type == GAME_ENGINE_TYPE_SP)
6183 CopyNativeLevel_RND_to_SP(level);
6184 else if (level->game_engine_type == GAME_ENGINE_TYPE_MM)
6185 CopyNativeLevel_RND_to_MM(level);
6188 void CopyNativeLevel_Native_to_RND(struct LevelInfo *level)
6190 if (level->game_engine_type == GAME_ENGINE_TYPE_EM)
6191 CopyNativeLevel_EM_to_RND(level);
6192 else if (level->game_engine_type == GAME_ENGINE_TYPE_SP)
6193 CopyNativeLevel_SP_to_RND(level);
6194 else if (level->game_engine_type == GAME_ENGINE_TYPE_MM)
6195 CopyNativeLevel_MM_to_RND(level);
6198 void SaveNativeLevel(struct LevelInfo *level)
6200 if (level->game_engine_type == GAME_ENGINE_TYPE_SP)
6202 char *basename = getSingleLevelBasenameExt(level->file_info.nr, "sp");
6203 char *filename = getLevelFilenameFromBasename(basename);
6205 CopyNativeLevel_RND_to_SP(level);
6206 CopyNativeTape_RND_to_SP(level);
6208 SaveNativeLevel_SP(filename);
6213 // ----------------------------------------------------------------------------
6214 // functions for loading generic level
6215 // ----------------------------------------------------------------------------
6217 static void LoadLevelFromFileInfo(struct LevelInfo *level,
6218 struct LevelFileInfo *level_file_info,
6219 boolean level_info_only)
6221 // always start with reliable default values
6222 setLevelInfoToDefaults(level, level_info_only, TRUE);
6224 switch (level_file_info->type)
6226 case LEVEL_FILE_TYPE_RND:
6227 LoadLevelFromFileInfo_RND(level, level_file_info, level_info_only);
6230 case LEVEL_FILE_TYPE_EM:
6231 LoadLevelFromFileInfo_EM(level, level_file_info, level_info_only);
6232 level->game_engine_type = GAME_ENGINE_TYPE_EM;
6235 case LEVEL_FILE_TYPE_SP:
6236 LoadLevelFromFileInfo_SP(level, level_file_info, level_info_only);
6237 level->game_engine_type = GAME_ENGINE_TYPE_SP;
6240 case LEVEL_FILE_TYPE_MM:
6241 LoadLevelFromFileInfo_MM(level, level_file_info, level_info_only);
6242 level->game_engine_type = GAME_ENGINE_TYPE_MM;
6245 case LEVEL_FILE_TYPE_DC:
6246 LoadLevelFromFileInfo_DC(level, level_file_info, level_info_only);
6249 case LEVEL_FILE_TYPE_SB:
6250 LoadLevelFromFileInfo_SB(level, level_file_info, level_info_only);
6254 LoadLevelFromFileInfo_RND(level, level_file_info, level_info_only);
6258 // if level file is invalid, restore level structure to default values
6259 if (level->no_valid_file)
6260 setLevelInfoToDefaults(level, level_info_only, FALSE);
6262 if (level->game_engine_type == GAME_ENGINE_TYPE_UNKNOWN)
6263 level->game_engine_type = GAME_ENGINE_TYPE_RND;
6265 if (level_file_info->type != LEVEL_FILE_TYPE_RND)
6266 CopyNativeLevel_Native_to_RND(level);
6269 void LoadLevelFromFilename(struct LevelInfo *level, char *filename)
6271 static struct LevelFileInfo level_file_info;
6273 // always start with reliable default values
6274 setFileInfoToDefaults(&level_file_info);
6276 level_file_info.nr = 0; // unknown level number
6277 level_file_info.type = LEVEL_FILE_TYPE_RND; // no others supported yet
6279 setString(&level_file_info.filename, filename);
6281 LoadLevelFromFileInfo(level, &level_file_info, FALSE);
6284 static void LoadLevel_InitVersion(struct LevelInfo *level)
6288 if (leveldir_current == NULL) // only when dumping level
6291 // all engine modifications also valid for levels which use latest engine
6292 if (level->game_version < VERSION_IDENT(3,2,0,5))
6294 // time bonus score was given for 10 s instead of 1 s before 3.2.0-5
6295 level->time_score_base = 10;
6298 if (leveldir_current->latest_engine)
6300 // ---------- use latest game engine --------------------------------------
6302 /* For all levels which are forced to use the latest game engine version
6303 (normally all but user contributed, private and undefined levels), set
6304 the game engine version to the actual version; this allows for actual
6305 corrections in the game engine to take effect for existing, converted
6306 levels (from "classic" or other existing games) to make the emulation
6307 of the corresponding game more accurate, while (hopefully) not breaking
6308 existing levels created from other players. */
6310 level->game_version = GAME_VERSION_ACTUAL;
6312 /* Set special EM style gems behaviour: EM style gems slip down from
6313 normal, steel and growing wall. As this is a more fundamental change,
6314 it seems better to set the default behaviour to "off" (as it is more
6315 natural) and make it configurable in the level editor (as a property
6316 of gem style elements). Already existing converted levels (neither
6317 private nor contributed levels) are changed to the new behaviour. */
6319 if (level->file_version < FILE_VERSION_2_0)
6320 level->em_slippery_gems = TRUE;
6325 // ---------- use game engine the level was created with --------------------
6327 /* For all levels which are not forced to use the latest game engine
6328 version (normally user contributed, private and undefined levels),
6329 use the version of the game engine the levels were created for.
6331 Since 2.0.1, the game engine version is now directly stored
6332 in the level file (chunk "VERS"), so there is no need anymore
6333 to set the game version from the file version (except for old,
6334 pre-2.0 levels, where the game version is still taken from the
6335 file format version used to store the level -- see above). */
6337 // player was faster than enemies in 1.0.0 and before
6338 if (level->file_version == FILE_VERSION_1_0)
6339 for (i = 0; i < MAX_PLAYERS; i++)
6340 level->initial_player_stepsize[i] = STEPSIZE_FAST;
6342 // default behaviour for EM style gems was "slippery" only in 2.0.1
6343 if (level->game_version == VERSION_IDENT(2,0,1,0))
6344 level->em_slippery_gems = TRUE;
6346 // springs could be pushed over pits before (pre-release version) 2.2.0
6347 if (level->game_version < VERSION_IDENT(2,2,0,0))
6348 level->use_spring_bug = TRUE;
6350 if (level->game_version < VERSION_IDENT(3,2,0,5))
6352 // time orb caused limited time in endless time levels before 3.2.0-5
6353 level->use_time_orb_bug = TRUE;
6355 // default behaviour for snapping was "no snap delay" before 3.2.0-5
6356 level->block_snap_field = FALSE;
6358 // extra time score was same value as time left score before 3.2.0-5
6359 level->extra_time_score = level->score[SC_TIME_BONUS];
6362 if (level->game_version < VERSION_IDENT(3,2,0,7))
6364 // default behaviour for snapping was "not continuous" before 3.2.0-7
6365 level->continuous_snapping = FALSE;
6368 // only few elements were able to actively move into acid before 3.1.0
6369 // trigger settings did not exist before 3.1.0; set to default "any"
6370 if (level->game_version < VERSION_IDENT(3,1,0,0))
6372 // correct "can move into acid" settings (all zero in old levels)
6374 level->can_move_into_acid_bits = 0; // nothing can move into acid
6375 level->dont_collide_with_bits = 0; // nothing is deadly when colliding
6377 setMoveIntoAcidProperty(level, EL_ROBOT, TRUE);
6378 setMoveIntoAcidProperty(level, EL_SATELLITE, TRUE);
6379 setMoveIntoAcidProperty(level, EL_PENGUIN, TRUE);
6380 setMoveIntoAcidProperty(level, EL_BALLOON, TRUE);
6382 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6383 SET_PROPERTY(EL_CUSTOM_START + i, EP_CAN_MOVE_INTO_ACID, TRUE);
6385 // correct trigger settings (stored as zero == "none" in old levels)
6387 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6389 int element = EL_CUSTOM_START + i;
6390 struct ElementInfo *ei = &element_info[element];
6392 for (j = 0; j < ei->num_change_pages; j++)
6394 struct ElementChangeInfo *change = &ei->change_page[j];
6396 change->trigger_player = CH_PLAYER_ANY;
6397 change->trigger_page = CH_PAGE_ANY;
6402 // try to detect and fix "Snake Bite" levels, which are broken with 3.2.0
6404 int element = EL_CUSTOM_256;
6405 struct ElementInfo *ei = &element_info[element];
6406 struct ElementChangeInfo *change = &ei->change_page[0];
6408 /* This is needed to fix a problem that was caused by a bugfix in function
6409 game.c/CreateFieldExt() introduced with 3.2.0 that corrects the behaviour
6410 when a custom element changes to EL_SOKOBAN_FIELD_PLAYER (before, it did
6411 not replace walkable elements, but instead just placed the player on it,
6412 without placing the Sokoban field under the player). Unfortunately, this
6413 breaks "Snake Bite" style levels when the snake is halfway through a door
6414 that just closes (the snake head is still alive and can be moved in this
6415 case). This can be fixed by replacing the EL_SOKOBAN_FIELD_PLAYER by the
6416 player (without Sokoban element) which then gets killed as designed). */
6418 if ((strncmp(leveldir_current->identifier, "snake_bite", 10) == 0 ||
6419 strncmp(ei->description, "pause b4 death", 14) == 0) &&
6420 change->target_element == EL_SOKOBAN_FIELD_PLAYER)
6421 change->target_element = EL_PLAYER_1;
6424 // try to detect and fix "Zelda" style levels, which are broken with 3.2.5
6425 if (level->game_version < VERSION_IDENT(3,2,5,0))
6427 /* This is needed to fix a problem that was caused by a bugfix in function
6428 game.c/CheckTriggeredElementChangeExt() introduced with 3.2.5 that
6429 corrects the behaviour when a custom element changes to another custom
6430 element with a higher element number that has change actions defined.
6431 Normally, only one change per frame is allowed for custom elements.
6432 Therefore, it is checked if a custom element already changed in the
6433 current frame; if it did, subsequent changes are suppressed.
6434 Unfortunately, this is only checked for element changes, but not for
6435 change actions, which are still executed. As the function above loops
6436 through all custom elements from lower to higher, an element change
6437 resulting in a lower CE number won't be checked again, while a target
6438 element with a higher number will also be checked, and potential change
6439 actions will get executed for this CE, too (which is wrong), while
6440 further changes are ignored (which is correct). As this bugfix breaks
6441 Zelda II (and introduces graphical bugs to Zelda I, and also breaks a
6442 few other levels like Alan Bond's "FMV"), allow the previous, incorrect
6443 behaviour for existing levels and tapes that make use of this bug */
6445 level->use_action_after_change_bug = TRUE;
6448 // not centering level after relocating player was default only in 3.2.3
6449 if (level->game_version == VERSION_IDENT(3,2,3,0)) // (no pre-releases)
6450 level->shifted_relocation = TRUE;
6452 // EM style elements always chain-exploded in R'n'D engine before 3.2.6
6453 if (level->game_version < VERSION_IDENT(3,2,6,0))
6454 level->em_explodes_by_fire = TRUE;
6456 // levels were solved by the first player entering an exit up to 4.1.0.0
6457 if (level->game_version <= VERSION_IDENT(4,1,0,0))
6458 level->solved_by_one_player = TRUE;
6460 // game logic of "game of life" and "biomaze" was buggy before 4.1.1.1
6461 if (level->game_version < VERSION_IDENT(4,1,1,1))
6462 level->use_life_bugs = TRUE;
6464 // only Sokoban fields (but not objects) had to be solved before 4.1.1.1
6465 if (level->game_version < VERSION_IDENT(4,1,1,1))
6466 level->sb_objects_needed = FALSE;
6468 // CE actions were triggered by unfinished digging/collecting up to 4.2.2.0
6469 if (level->game_version <= VERSION_IDENT(4,2,2,0))
6470 level->finish_dig_collect = FALSE;
6472 // CE changing to player was kept under the player if walkable up to 4.2.3.1
6473 if (level->game_version <= VERSION_IDENT(4,2,3,1))
6474 level->keep_walkable_ce = TRUE;
6477 static void LoadLevel_InitSettings(struct LevelInfo *level)
6481 static void LoadLevel_InitStandardElements(struct LevelInfo *level)
6485 // map elements that have changed in newer versions
6486 level->amoeba_content = getMappedElementByVersion(level->amoeba_content,
6487 level->game_version);
6488 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6489 for (x = 0; x < 3; x++)
6490 for (y = 0; y < 3; y++)
6491 level->yamyam_content[i].e[x][y] =
6492 getMappedElementByVersion(level->yamyam_content[i].e[x][y],
6493 level->game_version);
6497 static void LoadLevel_InitCustomElements(struct LevelInfo *level)
6501 // map custom element change events that have changed in newer versions
6502 // (these following values were accidentally changed in version 3.0.1)
6503 // (this seems to be needed only for 'ab_levelset3' and 'ab_levelset4')
6504 if (level->game_version <= VERSION_IDENT(3,0,0,0))
6506 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6508 int element = EL_CUSTOM_START + i;
6510 // order of checking and copying events to be mapped is important
6511 // (do not change the start and end value -- they are constant)
6512 for (j = CE_BY_OTHER_ACTION; j >= CE_VALUE_GETS_ZERO; j--)
6514 if (HAS_CHANGE_EVENT(element, j - 2))
6516 SET_CHANGE_EVENT(element, j - 2, FALSE);
6517 SET_CHANGE_EVENT(element, j, TRUE);
6521 // order of checking and copying events to be mapped is important
6522 // (do not change the start and end value -- they are constant)
6523 for (j = CE_PLAYER_COLLECTS_X; j >= CE_HITTING_SOMETHING; j--)
6525 if (HAS_CHANGE_EVENT(element, j - 1))
6527 SET_CHANGE_EVENT(element, j - 1, FALSE);
6528 SET_CHANGE_EVENT(element, j, TRUE);
6534 // initialize "can_change" field for old levels with only one change page
6535 if (level->game_version <= VERSION_IDENT(3,0,2,0))
6537 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6539 int element = EL_CUSTOM_START + i;
6541 if (CAN_CHANGE(element))
6542 element_info[element].change->can_change = TRUE;
6546 // correct custom element values (for old levels without these options)
6547 if (level->game_version < VERSION_IDENT(3,1,1,0))
6549 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6551 int element = EL_CUSTOM_START + i;
6552 struct ElementInfo *ei = &element_info[element];
6554 if (ei->access_direction == MV_NO_DIRECTION)
6555 ei->access_direction = MV_ALL_DIRECTIONS;
6559 // correct custom element values (fix invalid values for all versions)
6562 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6564 int element = EL_CUSTOM_START + i;
6565 struct ElementInfo *ei = &element_info[element];
6567 for (j = 0; j < ei->num_change_pages; j++)
6569 struct ElementChangeInfo *change = &ei->change_page[j];
6571 if (change->trigger_player == CH_PLAYER_NONE)
6572 change->trigger_player = CH_PLAYER_ANY;
6574 if (change->trigger_side == CH_SIDE_NONE)
6575 change->trigger_side = CH_SIDE_ANY;
6580 // initialize "can_explode" field for old levels which did not store this
6581 // !!! CHECK THIS -- "<= 3,1,0,0" IS PROBABLY WRONG !!!
6582 if (level->game_version <= VERSION_IDENT(3,1,0,0))
6584 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6586 int element = EL_CUSTOM_START + i;
6588 if (EXPLODES_1X1_OLD(element))
6589 element_info[element].explosion_type = EXPLODES_1X1;
6591 SET_PROPERTY(element, EP_CAN_EXPLODE, (EXPLODES_BY_FIRE(element) ||
6592 EXPLODES_SMASHED(element) ||
6593 EXPLODES_IMPACT(element)));
6597 // correct previously hard-coded move delay values for maze runner style
6598 if (level->game_version < VERSION_IDENT(3,1,1,0))
6600 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6602 int element = EL_CUSTOM_START + i;
6604 if (element_info[element].move_pattern & MV_MAZE_RUNNER_STYLE)
6606 // previously hard-coded and therefore ignored
6607 element_info[element].move_delay_fixed = 9;
6608 element_info[element].move_delay_random = 0;
6613 // set some other uninitialized values of custom elements in older levels
6614 if (level->game_version < VERSION_IDENT(3,1,0,0))
6616 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6618 int element = EL_CUSTOM_START + i;
6620 element_info[element].access_direction = MV_ALL_DIRECTIONS;
6622 element_info[element].explosion_delay = 17;
6623 element_info[element].ignition_delay = 8;
6627 // set mouse click change events to work for left/middle/right mouse button
6628 if (level->game_version < VERSION_IDENT(4,2,3,0))
6630 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
6632 int element = EL_CUSTOM_START + i;
6633 struct ElementInfo *ei = &element_info[element];
6635 for (j = 0; j < ei->num_change_pages; j++)
6637 struct ElementChangeInfo *change = &ei->change_page[j];
6639 if (change->has_event[CE_CLICKED_BY_MOUSE] ||
6640 change->has_event[CE_PRESSED_BY_MOUSE] ||
6641 change->has_event[CE_MOUSE_CLICKED_ON_X] ||
6642 change->has_event[CE_MOUSE_PRESSED_ON_X])
6643 change->trigger_side = CH_SIDE_ANY;
6649 static void LoadLevel_InitElements(struct LevelInfo *level)
6651 LoadLevel_InitStandardElements(level);
6653 if (level->file_has_custom_elements)
6654 LoadLevel_InitCustomElements(level);
6656 // initialize element properties for level editor etc.
6657 InitElementPropertiesEngine(level->game_version);
6658 InitElementPropertiesGfxElement();
6661 static void LoadLevel_InitPlayfield(struct LevelInfo *level)
6665 // map elements that have changed in newer versions
6666 for (y = 0; y < level->fieldy; y++)
6667 for (x = 0; x < level->fieldx; x++)
6668 level->field[x][y] = getMappedElementByVersion(level->field[x][y],
6669 level->game_version);
6671 // clear unused playfield data (nicer if level gets resized in editor)
6672 for (x = 0; x < MAX_LEV_FIELDX; x++)
6673 for (y = 0; y < MAX_LEV_FIELDY; y++)
6674 if (x >= level->fieldx || y >= level->fieldy)
6675 level->field[x][y] = EL_EMPTY;
6677 // copy elements to runtime playfield array
6678 for (x = 0; x < MAX_LEV_FIELDX; x++)
6679 for (y = 0; y < MAX_LEV_FIELDY; y++)
6680 Tile[x][y] = level->field[x][y];
6682 // initialize level size variables for faster access
6683 lev_fieldx = level->fieldx;
6684 lev_fieldy = level->fieldy;
6686 // determine border element for this level
6687 if (level->file_info.type == LEVEL_FILE_TYPE_DC)
6688 BorderElement = EL_EMPTY; // (in editor, SetBorderElement() is used)
6693 static void LoadLevel_InitNativeEngines(struct LevelInfo *level)
6695 struct LevelFileInfo *level_file_info = &level->file_info;
6697 if (level_file_info->type == LEVEL_FILE_TYPE_RND)
6698 CopyNativeLevel_RND_to_Native(level);
6701 static void LoadLevelTemplate_LoadAndInit(void)
6703 LoadLevelFromFileInfo(&level_template, &level_template.file_info, FALSE);
6705 LoadLevel_InitVersion(&level_template);
6706 LoadLevel_InitElements(&level_template);
6707 LoadLevel_InitSettings(&level_template);
6709 ActivateLevelTemplate();
6712 void LoadLevelTemplate(int nr)
6714 if (!fileExists(getGlobalLevelTemplateFilename()))
6716 Warn("no level template found for this level");
6721 setLevelFileInfo(&level_template.file_info, nr);
6723 LoadLevelTemplate_LoadAndInit();
6726 static void LoadNetworkLevelTemplate(struct NetworkLevelInfo *network_level)
6728 copyLevelFileInfo(&network_level->tmpl_info, &level_template.file_info);
6730 LoadLevelTemplate_LoadAndInit();
6733 static void LoadLevel_LoadAndInit(struct NetworkLevelInfo *network_level)
6735 LoadLevelFromFileInfo(&level, &level.file_info, FALSE);
6737 if (level.use_custom_template)
6739 if (network_level != NULL)
6740 LoadNetworkLevelTemplate(network_level);
6742 LoadLevelTemplate(-1);
6745 LoadLevel_InitVersion(&level);
6746 LoadLevel_InitElements(&level);
6747 LoadLevel_InitPlayfield(&level);
6748 LoadLevel_InitSettings(&level);
6750 LoadLevel_InitNativeEngines(&level);
6753 void LoadLevel(int nr)
6755 SetLevelSetInfo(leveldir_current->identifier, nr);
6757 setLevelFileInfo(&level.file_info, nr);
6759 LoadLevel_LoadAndInit(NULL);
6762 void LoadLevelInfoOnly(int nr)
6764 setLevelFileInfo(&level.file_info, nr);
6766 LoadLevelFromFileInfo(&level, &level.file_info, TRUE);
6769 void LoadNetworkLevel(struct NetworkLevelInfo *network_level)
6771 SetLevelSetInfo(network_level->leveldir_identifier,
6772 network_level->file_info.nr);
6774 copyLevelFileInfo(&network_level->file_info, &level.file_info);
6776 LoadLevel_LoadAndInit(network_level);
6779 static int SaveLevel_VERS(FILE *file, struct LevelInfo *level)
6783 chunk_size += putFileVersion(file, level->file_version);
6784 chunk_size += putFileVersion(file, level->game_version);
6789 static int SaveLevel_DATE(FILE *file, struct LevelInfo *level)
6793 chunk_size += putFile16BitBE(file, level->creation_date.year);
6794 chunk_size += putFile8Bit(file, level->creation_date.month);
6795 chunk_size += putFile8Bit(file, level->creation_date.day);
6800 #if ENABLE_HISTORIC_CHUNKS
6801 static void SaveLevel_HEAD(FILE *file, struct LevelInfo *level)
6805 putFile8Bit(file, level->fieldx);
6806 putFile8Bit(file, level->fieldy);
6808 putFile16BitBE(file, level->time);
6809 putFile16BitBE(file, level->gems_needed);
6811 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
6812 putFile8Bit(file, level->name[i]);
6814 for (i = 0; i < LEVEL_SCORE_ELEMENTS; i++)
6815 putFile8Bit(file, level->score[i]);
6817 for (i = 0; i < STD_ELEMENT_CONTENTS; i++)
6818 for (y = 0; y < 3; y++)
6819 for (x = 0; x < 3; x++)
6820 putFile8Bit(file, (level->encoding_16bit_yamyam ? EL_EMPTY :
6821 level->yamyam_content[i].e[x][y]));
6822 putFile8Bit(file, level->amoeba_speed);
6823 putFile8Bit(file, level->time_magic_wall);
6824 putFile8Bit(file, level->time_wheel);
6825 putFile8Bit(file, (level->encoding_16bit_amoeba ? EL_EMPTY :
6826 level->amoeba_content));
6827 putFile8Bit(file, (level->initial_player_stepsize == STEPSIZE_FAST ? 1 : 0));
6828 putFile8Bit(file, (level->initial_gravity ? 1 : 0));
6829 putFile8Bit(file, (level->encoding_16bit_field ? 1 : 0));
6830 putFile8Bit(file, (level->em_slippery_gems ? 1 : 0));
6832 putFile8Bit(file, (level->use_custom_template ? 1 : 0));
6834 putFile8Bit(file, (level->block_last_field ? 1 : 0));
6835 putFile8Bit(file, (level->sp_block_last_field ? 1 : 0));
6836 putFile32BitBE(file, level->can_move_into_acid_bits);
6837 putFile8Bit(file, level->dont_collide_with_bits);
6839 putFile8Bit(file, (level->use_spring_bug ? 1 : 0));
6840 putFile8Bit(file, (level->use_step_counter ? 1 : 0));
6842 putFile8Bit(file, (level->instant_relocation ? 1 : 0));
6843 putFile8Bit(file, (level->can_pass_to_walkable ? 1 : 0));
6844 putFile8Bit(file, (level->grow_into_diggable ? 1 : 0));
6846 putFile8Bit(file, level->game_engine_type);
6848 WriteUnusedBytesToFile(file, LEVEL_CHUNK_HEAD_UNUSED);
6852 static int SaveLevel_NAME(FILE *file, struct LevelInfo *level)
6857 for (i = 0; i < MAX_LEVEL_NAME_LEN; i++)
6858 chunk_size += putFile8Bit(file, level->name[i]);
6863 static int SaveLevel_AUTH(FILE *file, struct LevelInfo *level)
6868 for (i = 0; i < MAX_LEVEL_AUTHOR_LEN; i++)
6869 chunk_size += putFile8Bit(file, level->author[i]);
6874 #if ENABLE_HISTORIC_CHUNKS
6875 static int SaveLevel_BODY(FILE *file, struct LevelInfo *level)
6880 for (y = 0; y < level->fieldy; y++)
6881 for (x = 0; x < level->fieldx; x++)
6882 if (level->encoding_16bit_field)
6883 chunk_size += putFile16BitBE(file, level->field[x][y]);
6885 chunk_size += putFile8Bit(file, level->field[x][y]);
6891 static int SaveLevel_BODY(FILE *file, struct LevelInfo *level)
6896 for (y = 0; y < level->fieldy; y++)
6897 for (x = 0; x < level->fieldx; x++)
6898 chunk_size += putFile16BitBE(file, level->field[x][y]);
6903 #if ENABLE_HISTORIC_CHUNKS
6904 static void SaveLevel_CONT(FILE *file, struct LevelInfo *level)
6908 putFile8Bit(file, EL_YAMYAM);
6909 putFile8Bit(file, level->num_yamyam_contents);
6910 putFile8Bit(file, 0);
6911 putFile8Bit(file, 0);
6913 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6914 for (y = 0; y < 3; y++)
6915 for (x = 0; x < 3; x++)
6916 if (level->encoding_16bit_field)
6917 putFile16BitBE(file, level->yamyam_content[i].e[x][y]);
6919 putFile8Bit(file, level->yamyam_content[i].e[x][y]);
6923 #if ENABLE_HISTORIC_CHUNKS
6924 static void SaveLevel_CNT2(FILE *file, struct LevelInfo *level, int element)
6927 int num_contents, content_xsize, content_ysize;
6928 int content_array[MAX_ELEMENT_CONTENTS][3][3];
6930 if (element == EL_YAMYAM)
6932 num_contents = level->num_yamyam_contents;
6936 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6937 for (y = 0; y < 3; y++)
6938 for (x = 0; x < 3; x++)
6939 content_array[i][x][y] = level->yamyam_content[i].e[x][y];
6941 else if (element == EL_BD_AMOEBA)
6947 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6948 for (y = 0; y < 3; y++)
6949 for (x = 0; x < 3; x++)
6950 content_array[i][x][y] = EL_EMPTY;
6951 content_array[0][0][0] = level->amoeba_content;
6955 // chunk header already written -- write empty chunk data
6956 WriteUnusedBytesToFile(file, LEVEL_CHUNK_CNT2_SIZE);
6958 Warn("cannot save content for element '%d'", element);
6963 putFile16BitBE(file, element);
6964 putFile8Bit(file, num_contents);
6965 putFile8Bit(file, content_xsize);
6966 putFile8Bit(file, content_ysize);
6968 WriteUnusedBytesToFile(file, LEVEL_CHUNK_CNT2_UNUSED);
6970 for (i = 0; i < MAX_ELEMENT_CONTENTS; i++)
6971 for (y = 0; y < 3; y++)
6972 for (x = 0; x < 3; x++)
6973 putFile16BitBE(file, content_array[i][x][y]);
6977 #if ENABLE_HISTORIC_CHUNKS
6978 static int SaveLevel_CNT3(FILE *file, struct LevelInfo *level, int element)
6980 int envelope_nr = element - EL_ENVELOPE_1;
6981 int envelope_len = strlen(level->envelope_text[envelope_nr]) + 1;
6985 chunk_size += putFile16BitBE(file, element);
6986 chunk_size += putFile16BitBE(file, envelope_len);
6987 chunk_size += putFile8Bit(file, level->envelope_xsize[envelope_nr]);
6988 chunk_size += putFile8Bit(file, level->envelope_ysize[envelope_nr]);
6990 WriteUnusedBytesToFile(file, LEVEL_CHUNK_CNT3_UNUSED);
6991 chunk_size += LEVEL_CHUNK_CNT3_UNUSED;
6993 for (i = 0; i < envelope_len; i++)
6994 chunk_size += putFile8Bit(file, level->envelope_text[envelope_nr][i]);
7000 #if ENABLE_HISTORIC_CHUNKS
7001 static void SaveLevel_CUS1(FILE *file, struct LevelInfo *level,
7002 int num_changed_custom_elements)
7006 putFile16BitBE(file, num_changed_custom_elements);
7008 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
7010 int element = EL_CUSTOM_START + i;
7012 struct ElementInfo *ei = &element_info[element];
7014 if (ei->properties[EP_BITFIELD_BASE_NR] != EP_BITMASK_DEFAULT)
7016 if (check < num_changed_custom_elements)
7018 putFile16BitBE(file, element);
7019 putFile32BitBE(file, ei->properties[EP_BITFIELD_BASE_NR]);
7026 if (check != num_changed_custom_elements) // should not happen
7027 Warn("inconsistent number of custom element properties");
7031 #if ENABLE_HISTORIC_CHUNKS
7032 static void SaveLevel_CUS2(FILE *file, struct LevelInfo *level,
7033 int num_changed_custom_elements)
7037 putFile16BitBE(file, num_changed_custom_elements);
7039 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
7041 int element = EL_CUSTOM_START + i;
7043 if (element_info[element].change->target_element != EL_EMPTY_SPACE)
7045 if (check < num_changed_custom_elements)
7047 putFile16BitBE(file, element);
7048 putFile16BitBE(file, element_info[element].change->target_element);
7055 if (check != num_changed_custom_elements) // should not happen
7056 Warn("inconsistent number of custom target elements");
7060 #if ENABLE_HISTORIC_CHUNKS
7061 static void SaveLevel_CUS3(FILE *file, struct LevelInfo *level,
7062 int num_changed_custom_elements)
7064 int i, j, x, y, check = 0;
7066 putFile16BitBE(file, num_changed_custom_elements);
7068 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
7070 int element = EL_CUSTOM_START + i;
7071 struct ElementInfo *ei = &element_info[element];
7073 if (ei->modified_settings)
7075 if (check < num_changed_custom_elements)
7077 putFile16BitBE(file, element);
7079 for (j = 0; j < MAX_ELEMENT_NAME_LEN; j++)
7080 putFile8Bit(file, ei->description[j]);
7082 putFile32BitBE(file, ei->properties[EP_BITFIELD_BASE_NR]);
7084 // some free bytes for future properties and padding
7085 WriteUnusedBytesToFile(file, 7);
7087 putFile8Bit(file, ei->use_gfx_element);
7088 putFile16BitBE(file, ei->gfx_element_initial);
7090 putFile8Bit(file, ei->collect_score_initial);
7091 putFile8Bit(file, ei->collect_count_initial);
7093 putFile16BitBE(file, ei->push_delay_fixed);
7094 putFile16BitBE(file, ei->push_delay_random);
7095 putFile16BitBE(file, ei->move_delay_fixed);
7096 putFile16BitBE(file, ei->move_delay_random);
7098 putFile16BitBE(file, ei->move_pattern);
7099 putFile8Bit(file, ei->move_direction_initial);
7100 putFile8Bit(file, ei->move_stepsize);
7102 for (y = 0; y < 3; y++)
7103 for (x = 0; x < 3; x++)
7104 putFile16BitBE(file, ei->content.e[x][y]);
7106 putFile32BitBE(file, ei->change->events);
7108 putFile16BitBE(file, ei->change->target_element);
7110 putFile16BitBE(file, ei->change->delay_fixed);
7111 putFile16BitBE(file, ei->change->delay_random);
7112 putFile16BitBE(file, ei->change->delay_frames);
7114 putFile16BitBE(file, ei->change->initial_trigger_element);
7116 putFile8Bit(file, ei->change->explode);
7117 putFile8Bit(file, ei->change->use_target_content);
7118 putFile8Bit(file, ei->change->only_if_complete);
7119 putFile8Bit(file, ei->change->use_random_replace);
7121 putFile8Bit(file, ei->change->random_percentage);
7122 putFile8Bit(file, ei->change->replace_when);
7124 for (y = 0; y < 3; y++)
7125 for (x = 0; x < 3; x++)
7126 putFile16BitBE(file, ei->change->content.e[x][y]);
7128 putFile8Bit(file, ei->slippery_type);
7130 // some free bytes for future properties and padding
7131 WriteUnusedBytesToFile(file, LEVEL_CPART_CUS3_UNUSED);
7138 if (check != num_changed_custom_elements) // should not happen
7139 Warn("inconsistent number of custom element properties");
7143 #if ENABLE_HISTORIC_CHUNKS
7144 static void SaveLevel_CUS4(FILE *file, struct LevelInfo *level, int element)
7146 struct ElementInfo *ei = &element_info[element];
7149 // ---------- custom element base property values (96 bytes) ----------------
7151 putFile16BitBE(file, element);
7153 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
7154 putFile8Bit(file, ei->description[i]);
7156 putFile32BitBE(file, ei->properties[EP_BITFIELD_BASE_NR]);
7158 WriteUnusedBytesToFile(file, 4); // reserved for more base properties
7160 putFile8Bit(file, ei->num_change_pages);
7162 putFile16BitBE(file, ei->ce_value_fixed_initial);
7163 putFile16BitBE(file, ei->ce_value_random_initial);
7164 putFile8Bit(file, ei->use_last_ce_value);
7166 putFile8Bit(file, ei->use_gfx_element);
7167 putFile16BitBE(file, ei->gfx_element_initial);
7169 putFile8Bit(file, ei->collect_score_initial);
7170 putFile8Bit(file, ei->collect_count_initial);
7172 putFile8Bit(file, ei->drop_delay_fixed);
7173 putFile8Bit(file, ei->push_delay_fixed);
7174 putFile8Bit(file, ei->drop_delay_random);
7175 putFile8Bit(file, ei->push_delay_random);
7176 putFile16BitBE(file, ei->move_delay_fixed);
7177 putFile16BitBE(file, ei->move_delay_random);
7179 // bits 0 - 15 of "move_pattern" ...
7180 putFile16BitBE(file, ei->move_pattern & 0xffff);
7181 putFile8Bit(file, ei->move_direction_initial);
7182 putFile8Bit(file, ei->move_stepsize);
7184 putFile8Bit(file, ei->slippery_type);
7186 for (y = 0; y < 3; y++)
7187 for (x = 0; x < 3; x++)
7188 putFile16BitBE(file, ei->content.e[x][y]);
7190 putFile16BitBE(file, ei->move_enter_element);
7191 putFile16BitBE(file, ei->move_leave_element);
7192 putFile8Bit(file, ei->move_leave_type);
7194 // ... bits 16 - 31 of "move_pattern" (not nice, but downward compatible)
7195 putFile16BitBE(file, (ei->move_pattern >> 16) & 0xffff);
7197 putFile8Bit(file, ei->access_direction);
7199 putFile8Bit(file, ei->explosion_delay);
7200 putFile8Bit(file, ei->ignition_delay);
7201 putFile8Bit(file, ei->explosion_type);
7203 // some free bytes for future custom property values and padding
7204 WriteUnusedBytesToFile(file, 1);
7206 // ---------- change page property values (48 bytes) ------------------------
7208 for (i = 0; i < ei->num_change_pages; i++)
7210 struct ElementChangeInfo *change = &ei->change_page[i];
7211 unsigned int event_bits;
7213 // bits 0 - 31 of "has_event[]" ...
7215 for (j = 0; j < MIN(NUM_CHANGE_EVENTS, 32); j++)
7216 if (change->has_event[j])
7217 event_bits |= (1 << j);
7218 putFile32BitBE(file, event_bits);
7220 putFile16BitBE(file, change->target_element);
7222 putFile16BitBE(file, change->delay_fixed);
7223 putFile16BitBE(file, change->delay_random);
7224 putFile16BitBE(file, change->delay_frames);
7226 putFile16BitBE(file, change->initial_trigger_element);
7228 putFile8Bit(file, change->explode);
7229 putFile8Bit(file, change->use_target_content);
7230 putFile8Bit(file, change->only_if_complete);
7231 putFile8Bit(file, change->use_random_replace);
7233 putFile8Bit(file, change->random_percentage);
7234 putFile8Bit(file, change->replace_when);
7236 for (y = 0; y < 3; y++)
7237 for (x = 0; x < 3; x++)
7238 putFile16BitBE(file, change->target_content.e[x][y]);
7240 putFile8Bit(file, change->can_change);
7242 putFile8Bit(file, change->trigger_side);
7244 putFile8Bit(file, change->trigger_player);
7245 putFile8Bit(file, (change->trigger_page == CH_PAGE_ANY ? CH_PAGE_ANY_FILE :
7246 log_2(change->trigger_page)));
7248 putFile8Bit(file, change->has_action);
7249 putFile8Bit(file, change->action_type);
7250 putFile8Bit(file, change->action_mode);
7251 putFile16BitBE(file, change->action_arg);
7253 // ... bits 32 - 39 of "has_event[]" (not nice, but downward compatible)
7255 for (j = 32; j < NUM_CHANGE_EVENTS; j++)
7256 if (change->has_event[j])
7257 event_bits |= (1 << (j - 32));
7258 putFile8Bit(file, event_bits);
7263 #if ENABLE_HISTORIC_CHUNKS
7264 static void SaveLevel_GRP1(FILE *file, struct LevelInfo *level, int element)
7266 struct ElementInfo *ei = &element_info[element];
7267 struct ElementGroupInfo *group = ei->group;
7270 putFile16BitBE(file, element);
7272 for (i = 0; i < MAX_ELEMENT_NAME_LEN; i++)
7273 putFile8Bit(file, ei->description[i]);
7275 putFile8Bit(file, group->num_elements);
7277 putFile8Bit(file, ei->use_gfx_element);
7278 putFile16BitBE(file, ei->gfx_element_initial);
7280 putFile8Bit(file, group->choice_mode);
7282 // some free bytes for future values and padding
7283 WriteUnusedBytesToFile(file, 3);
7285 for (i = 0; i < MAX_ELEMENTS_IN_GROUP; i++)
7286 putFile16BitBE(file, group->element[i]);
7290 static int SaveLevel_MicroChunk(FILE *file, struct LevelFileConfigInfo *entry,
7291 boolean write_element)
7293 int save_type = entry->save_type;
7294 int data_type = entry->data_type;
7295 int conf_type = entry->conf_type;
7296 int byte_mask = conf_type & CONF_MASK_BYTES;
7297 int element = entry->element;
7298 int default_value = entry->default_value;
7300 boolean modified = FALSE;
7302 if (byte_mask != CONF_MASK_MULTI_BYTES)
7304 void *value_ptr = entry->value;
7305 int value = (data_type == TYPE_BOOLEAN ? *(boolean *)value_ptr :
7308 // check if any settings have been modified before saving them
7309 if (value != default_value)
7312 // do not save if explicitly told or if unmodified default settings
7313 if ((save_type == SAVE_CONF_NEVER) ||
7314 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
7318 num_bytes += putFile16BitBE(file, element);
7320 num_bytes += putFile8Bit(file, conf_type);
7321 num_bytes += (byte_mask == CONF_MASK_1_BYTE ? putFile8Bit (file, value) :
7322 byte_mask == CONF_MASK_2_BYTE ? putFile16BitBE(file, value) :
7323 byte_mask == CONF_MASK_4_BYTE ? putFile32BitBE(file, value) :
7326 else if (data_type == TYPE_STRING)
7328 char *default_string = entry->default_string;
7329 char *string = (char *)(entry->value);
7330 int string_length = strlen(string);
7333 // check if any settings have been modified before saving them
7334 if (!strEqual(string, default_string))
7337 // do not save if explicitly told or if unmodified default settings
7338 if ((save_type == SAVE_CONF_NEVER) ||
7339 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
7343 num_bytes += putFile16BitBE(file, element);
7345 num_bytes += putFile8Bit(file, conf_type);
7346 num_bytes += putFile16BitBE(file, string_length);
7348 for (i = 0; i < string_length; i++)
7349 num_bytes += putFile8Bit(file, string[i]);
7351 else if (data_type == TYPE_ELEMENT_LIST)
7353 int *element_array = (int *)(entry->value);
7354 int num_elements = *(int *)(entry->num_entities);
7357 // check if any settings have been modified before saving them
7358 for (i = 0; i < num_elements; i++)
7359 if (element_array[i] != default_value)
7362 // do not save if explicitly told or if unmodified default settings
7363 if ((save_type == SAVE_CONF_NEVER) ||
7364 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
7368 num_bytes += putFile16BitBE(file, element);
7370 num_bytes += putFile8Bit(file, conf_type);
7371 num_bytes += putFile16BitBE(file, num_elements * CONF_ELEMENT_NUM_BYTES);
7373 for (i = 0; i < num_elements; i++)
7374 num_bytes += putFile16BitBE(file, element_array[i]);
7376 else if (data_type == TYPE_CONTENT_LIST)
7378 struct Content *content = (struct Content *)(entry->value);
7379 int num_contents = *(int *)(entry->num_entities);
7382 // check if any settings have been modified before saving them
7383 for (i = 0; i < num_contents; i++)
7384 for (y = 0; y < 3; y++)
7385 for (x = 0; x < 3; x++)
7386 if (content[i].e[x][y] != default_value)
7389 // do not save if explicitly told or if unmodified default settings
7390 if ((save_type == SAVE_CONF_NEVER) ||
7391 (save_type == SAVE_CONF_WHEN_CHANGED && !modified))
7395 num_bytes += putFile16BitBE(file, element);
7397 num_bytes += putFile8Bit(file, conf_type);
7398 num_bytes += putFile16BitBE(file, num_contents * CONF_CONTENT_NUM_BYTES);
7400 for (i = 0; i < num_contents; i++)
7401 for (y = 0; y < 3; y++)
7402 for (x = 0; x < 3; x++)
7403 num_bytes += putFile16BitBE(file, content[i].e[x][y]);
7409 static int SaveLevel_INFO(FILE *file, struct LevelInfo *level)
7414 li = *level; // copy level data into temporary buffer
7416 for (i = 0; chunk_config_INFO[i].data_type != -1; i++)
7417 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_INFO[i], FALSE);
7422 static int SaveLevel_ELEM(FILE *file, struct LevelInfo *level)
7427 li = *level; // copy level data into temporary buffer
7429 for (i = 0; chunk_config_ELEM[i].data_type != -1; i++)
7430 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_ELEM[i], TRUE);
7435 static int SaveLevel_NOTE(FILE *file, struct LevelInfo *level, int element)
7437 int envelope_nr = element - EL_ENVELOPE_1;
7441 chunk_size += putFile16BitBE(file, element);
7443 // copy envelope data into temporary buffer
7444 xx_envelope = level->envelope[envelope_nr];
7446 for (i = 0; chunk_config_NOTE[i].data_type != -1; i++)
7447 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_NOTE[i], FALSE);
7452 static int SaveLevel_CUSX(FILE *file, struct LevelInfo *level, int element)
7454 struct ElementInfo *ei = &element_info[element];
7458 chunk_size += putFile16BitBE(file, element);
7460 xx_ei = *ei; // copy element data into temporary buffer
7462 // set default description string for this specific element
7463 strcpy(xx_default_description, getDefaultElementDescription(ei));
7465 for (i = 0; chunk_config_CUSX_base[i].data_type != -1; i++)
7466 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_CUSX_base[i], FALSE);
7468 for (i = 0; i < ei->num_change_pages; i++)
7470 struct ElementChangeInfo *change = &ei->change_page[i];
7472 xx_current_change_page = i;
7474 xx_change = *change; // copy change data into temporary buffer
7477 setEventBitsFromEventFlags(change);
7479 for (j = 0; chunk_config_CUSX_change[j].data_type != -1; j++)
7480 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_CUSX_change[j],
7487 static int SaveLevel_GRPX(FILE *file, struct LevelInfo *level, int element)
7489 struct ElementInfo *ei = &element_info[element];
7490 struct ElementGroupInfo *group = ei->group;
7494 chunk_size += putFile16BitBE(file, element);
7496 xx_ei = *ei; // copy element data into temporary buffer
7497 xx_group = *group; // copy group data into temporary buffer
7499 // set default description string for this specific element
7500 strcpy(xx_default_description, getDefaultElementDescription(ei));
7502 for (i = 0; chunk_config_GRPX[i].data_type != -1; i++)
7503 chunk_size += SaveLevel_MicroChunk(file, &chunk_config_GRPX[i], FALSE);
7508 static void SaveLevelFromFilename(struct LevelInfo *level, char *filename,
7509 boolean save_as_template)
7515 if (!(file = fopen(filename, MODE_WRITE)))
7517 Warn("cannot save level file '%s'", filename);
7522 level->file_version = FILE_VERSION_ACTUAL;
7523 level->game_version = GAME_VERSION_ACTUAL;
7525 level->creation_date = getCurrentDate();
7527 putFileChunkBE(file, "RND1", CHUNK_SIZE_UNDEFINED);
7528 putFileChunkBE(file, "CAVE", CHUNK_SIZE_NONE);
7530 chunk_size = SaveLevel_VERS(NULL, level);
7531 putFileChunkBE(file, "VERS", chunk_size);
7532 SaveLevel_VERS(file, level);
7534 chunk_size = SaveLevel_DATE(NULL, level);
7535 putFileChunkBE(file, "DATE", chunk_size);
7536 SaveLevel_DATE(file, level);
7538 chunk_size = SaveLevel_NAME(NULL, level);
7539 putFileChunkBE(file, "NAME", chunk_size);
7540 SaveLevel_NAME(file, level);
7542 chunk_size = SaveLevel_AUTH(NULL, level);
7543 putFileChunkBE(file, "AUTH", chunk_size);
7544 SaveLevel_AUTH(file, level);
7546 chunk_size = SaveLevel_INFO(NULL, level);
7547 putFileChunkBE(file, "INFO", chunk_size);
7548 SaveLevel_INFO(file, level);
7550 chunk_size = SaveLevel_BODY(NULL, level);
7551 putFileChunkBE(file, "BODY", chunk_size);
7552 SaveLevel_BODY(file, level);
7554 chunk_size = SaveLevel_ELEM(NULL, level);
7555 if (chunk_size > LEVEL_CHUNK_ELEM_UNCHANGED) // save if changed
7557 putFileChunkBE(file, "ELEM", chunk_size);
7558 SaveLevel_ELEM(file, level);
7561 for (i = 0; i < NUM_ENVELOPES; i++)
7563 int element = EL_ENVELOPE_1 + i;
7565 chunk_size = SaveLevel_NOTE(NULL, level, element);
7566 if (chunk_size > LEVEL_CHUNK_NOTE_UNCHANGED) // save if changed
7568 putFileChunkBE(file, "NOTE", chunk_size);
7569 SaveLevel_NOTE(file, level, element);
7573 // if not using template level, check for non-default custom/group elements
7574 if (!level->use_custom_template || save_as_template)
7576 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
7578 int element = EL_CUSTOM_START + i;
7580 chunk_size = SaveLevel_CUSX(NULL, level, element);
7581 if (chunk_size > LEVEL_CHUNK_CUSX_UNCHANGED) // save if changed
7583 putFileChunkBE(file, "CUSX", chunk_size);
7584 SaveLevel_CUSX(file, level, element);
7588 for (i = 0; i < NUM_GROUP_ELEMENTS; i++)
7590 int element = EL_GROUP_START + i;
7592 chunk_size = SaveLevel_GRPX(NULL, level, element);
7593 if (chunk_size > LEVEL_CHUNK_GRPX_UNCHANGED) // save if changed
7595 putFileChunkBE(file, "GRPX", chunk_size);
7596 SaveLevel_GRPX(file, level, element);
7603 SetFilePermissions(filename, PERMS_PRIVATE);
7606 void SaveLevel(int nr)
7608 char *filename = getDefaultLevelFilename(nr);
7610 SaveLevelFromFilename(&level, filename, FALSE);
7613 void SaveLevelTemplate(void)
7615 char *filename = getLocalLevelTemplateFilename();
7617 SaveLevelFromFilename(&level, filename, TRUE);
7620 boolean SaveLevelChecked(int nr)
7622 char *filename = getDefaultLevelFilename(nr);
7623 boolean new_level = !fileExists(filename);
7624 boolean level_saved = FALSE;
7626 if (new_level || Request("Save this level and kill the old?", REQ_ASK))
7631 Request("Level saved!", REQ_CONFIRM);
7639 void DumpLevel(struct LevelInfo *level)
7641 if (level->no_level_file || level->no_valid_file)
7643 Warn("cannot dump -- no valid level file found");
7649 Print("Level xxx (file version %08d, game version %08d)\n",
7650 level->file_version, level->game_version);
7653 Print("Level author: '%s'\n", level->author);
7654 Print("Level title: '%s'\n", level->name);
7656 Print("Playfield size: %d x %d\n", level->fieldx, level->fieldy);
7658 Print("Level time: %d seconds\n", level->time);
7659 Print("Gems needed: %d\n", level->gems_needed);
7661 Print("Time for magic wall: %d seconds\n", level->time_magic_wall);
7662 Print("Time for wheel: %d seconds\n", level->time_wheel);
7663 Print("Time for light: %d seconds\n", level->time_light);
7664 Print("Time for timegate: %d seconds\n", level->time_timegate);
7666 Print("Amoeba speed: %d\n", level->amoeba_speed);
7669 Print("EM style slippery gems: %s\n", (level->em_slippery_gems ? "yes" : "no"));
7670 Print("Player blocks last field: %s\n", (level->block_last_field ? "yes" : "no"));
7671 Print("SP player blocks last field: %s\n", (level->sp_block_last_field ? "yes" : "no"));
7672 Print("use spring bug: %s\n", (level->use_spring_bug ? "yes" : "no"));
7673 Print("use step counter: %s\n", (level->use_step_counter ? "yes" : "no"));
7674 Print("rate time over score: %s\n", (level->rate_time_over_score ? "yes" : "no"));
7679 void DumpLevels(void)
7681 static LevelDirTree *dumplevel_leveldir = NULL;
7683 dumplevel_leveldir = getTreeInfoFromIdentifier(leveldir_first,
7684 global.dumplevel_leveldir);
7686 if (dumplevel_leveldir == NULL)
7687 Fail("no such level identifier: '%s'", global.dumplevel_leveldir);
7689 if (global.dumplevel_level_nr < dumplevel_leveldir->first_level ||
7690 global.dumplevel_level_nr > dumplevel_leveldir->last_level)
7691 Fail("no such level number: %d", global.dumplevel_level_nr);
7693 leveldir_current = dumplevel_leveldir;
7695 LoadLevel(global.dumplevel_level_nr);
7702 // ============================================================================
7703 // tape file functions
7704 // ============================================================================
7706 static void setTapeInfoToDefaults(void)
7710 // always start with reliable default values (empty tape)
7713 // default values (also for pre-1.2 tapes) with only the first player
7714 tape.player_participates[0] = TRUE;
7715 for (i = 1; i < MAX_PLAYERS; i++)
7716 tape.player_participates[i] = FALSE;
7718 // at least one (default: the first) player participates in every tape
7719 tape.num_participating_players = 1;
7721 tape.property_bits = TAPE_PROPERTY_NONE;
7723 tape.level_nr = level_nr;
7725 tape.changed = FALSE;
7727 tape.recording = FALSE;
7728 tape.playing = FALSE;
7729 tape.pausing = FALSE;
7731 tape.scr_fieldx = SCR_FIELDX_DEFAULT;
7732 tape.scr_fieldy = SCR_FIELDY_DEFAULT;
7734 tape.no_valid_file = FALSE;
7737 static int getTapePosSize(struct TapeInfo *tape)
7739 int tape_pos_size = 0;
7741 if (tape->use_key_actions)
7742 tape_pos_size += tape->num_participating_players;
7744 if (tape->use_mouse_actions)
7745 tape_pos_size += 3; // x and y position and mouse button mask
7747 tape_pos_size += 1; // tape action delay value
7749 return tape_pos_size;
7752 static void setTapeActionFlags(struct TapeInfo *tape, int value)
7754 tape->use_key_actions = FALSE;
7755 tape->use_mouse_actions = FALSE;
7757 if (value != TAPE_USE_MOUSE_ACTIONS_ONLY)
7758 tape->use_key_actions = TRUE;
7760 if (value != TAPE_USE_KEY_ACTIONS_ONLY)
7761 tape->use_mouse_actions = TRUE;
7764 static int getTapeActionValue(struct TapeInfo *tape)
7766 return (tape->use_key_actions &&
7767 tape->use_mouse_actions ? TAPE_USE_KEY_AND_MOUSE_ACTIONS :
7768 tape->use_key_actions ? TAPE_USE_KEY_ACTIONS_ONLY :
7769 tape->use_mouse_actions ? TAPE_USE_MOUSE_ACTIONS_ONLY :
7770 TAPE_ACTIONS_DEFAULT);
7773 static int LoadTape_VERS(File *file, int chunk_size, struct TapeInfo *tape)
7775 tape->file_version = getFileVersion(file);
7776 tape->game_version = getFileVersion(file);
7781 static int LoadTape_HEAD(File *file, int chunk_size, struct TapeInfo *tape)
7785 tape->random_seed = getFile32BitBE(file);
7786 tape->date = getFile32BitBE(file);
7787 tape->length = getFile32BitBE(file);
7789 // read header fields that are new since version 1.2
7790 if (tape->file_version >= FILE_VERSION_1_2)
7792 byte store_participating_players = getFile8Bit(file);
7795 // since version 1.2, tapes store which players participate in the tape
7796 tape->num_participating_players = 0;
7797 for (i = 0; i < MAX_PLAYERS; i++)
7799 tape->player_participates[i] = FALSE;
7801 if (store_participating_players & (1 << i))
7803 tape->player_participates[i] = TRUE;
7804 tape->num_participating_players++;
7808 setTapeActionFlags(tape, getFile8Bit(file));
7810 tape->property_bits = getFile8Bit(file);
7812 ReadUnusedBytesFromFile(file, TAPE_CHUNK_HEAD_UNUSED);
7814 engine_version = getFileVersion(file);
7815 if (engine_version > 0)
7816 tape->engine_version = engine_version;
7818 tape->engine_version = tape->game_version;
7824 static int LoadTape_SCRN(File *file, int chunk_size, struct TapeInfo *tape)
7826 tape->scr_fieldx = getFile8Bit(file);
7827 tape->scr_fieldy = getFile8Bit(file);
7832 static int LoadTape_INFO(File *file, int chunk_size, struct TapeInfo *tape)
7834 char *level_identifier = NULL;
7835 int level_identifier_size;
7838 level_identifier_size = getFile16BitBE(file);
7840 level_identifier = checked_malloc(level_identifier_size);
7842 for (i = 0; i < level_identifier_size; i++)
7843 level_identifier[i] = getFile8Bit(file);
7845 strncpy(tape->level_identifier, level_identifier, MAX_FILENAME_LEN);
7846 tape->level_identifier[MAX_FILENAME_LEN] = '\0';
7848 checked_free(level_identifier);
7850 tape->level_nr = getFile16BitBE(file);
7852 chunk_size = 2 + level_identifier_size + 2;
7857 static int LoadTape_BODY(File *file, int chunk_size, struct TapeInfo *tape)
7860 int tape_pos_size = getTapePosSize(tape);
7861 int chunk_size_expected = tape_pos_size * tape->length;
7863 if (chunk_size_expected != chunk_size)
7865 ReadUnusedBytesFromFile(file, chunk_size);
7866 return chunk_size_expected;
7869 for (i = 0; i < tape->length; i++)
7871 if (i >= MAX_TAPE_LEN)
7873 Warn("tape truncated -- size exceeds maximum tape size %d",
7876 // tape too large; read and ignore remaining tape data from this chunk
7877 for (;i < tape->length; i++)
7878 ReadUnusedBytesFromFile(file, tape_pos_size);
7883 if (tape->use_key_actions)
7885 for (j = 0; j < MAX_PLAYERS; j++)
7887 tape->pos[i].action[j] = MV_NONE;
7889 if (tape->player_participates[j])
7890 tape->pos[i].action[j] = getFile8Bit(file);
7894 if (tape->use_mouse_actions)
7896 tape->pos[i].action[TAPE_ACTION_LX] = getFile8Bit(file);
7897 tape->pos[i].action[TAPE_ACTION_LY] = getFile8Bit(file);
7898 tape->pos[i].action[TAPE_ACTION_BUTTON] = getFile8Bit(file);
7901 tape->pos[i].delay = getFile8Bit(file);
7903 if (tape->file_version == FILE_VERSION_1_0)
7905 // eliminate possible diagonal moves in old tapes
7906 // this is only for backward compatibility
7908 byte joy_dir[4] = { JOY_LEFT, JOY_RIGHT, JOY_UP, JOY_DOWN };
7909 byte action = tape->pos[i].action[0];
7910 int k, num_moves = 0;
7912 for (k = 0; k<4; k++)
7914 if (action & joy_dir[k])
7916 tape->pos[i + num_moves].action[0] = joy_dir[k];
7918 tape->pos[i + num_moves].delay = 0;
7927 tape->length += num_moves;
7930 else if (tape->file_version < FILE_VERSION_2_0)
7932 // convert pre-2.0 tapes to new tape format
7934 if (tape->pos[i].delay > 1)
7937 tape->pos[i + 1] = tape->pos[i];
7938 tape->pos[i + 1].delay = 1;
7941 for (j = 0; j < MAX_PLAYERS; j++)
7942 tape->pos[i].action[j] = MV_NONE;
7943 tape->pos[i].delay--;
7950 if (checkEndOfFile(file))
7954 if (i != tape->length)
7955 chunk_size = tape_pos_size * i;
7960 static void LoadTape_SokobanSolution(char *filename)
7963 int move_delay = TILESIZE / level.initial_player_stepsize[0];
7965 if (!(file = openFile(filename, MODE_READ)))
7967 tape.no_valid_file = TRUE;
7972 while (!checkEndOfFile(file))
7974 unsigned char c = getByteFromFile(file);
7976 if (checkEndOfFile(file))
7983 tape.pos[tape.length].action[0] = MV_UP;
7984 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
7990 tape.pos[tape.length].action[0] = MV_DOWN;
7991 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
7997 tape.pos[tape.length].action[0] = MV_LEFT;
7998 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
8004 tape.pos[tape.length].action[0] = MV_RIGHT;
8005 tape.pos[tape.length].delay = move_delay + (c < 'a' ? 2 : 0);
8013 // ignore white-space characters
8017 tape.no_valid_file = TRUE;
8019 Warn("unsupported Sokoban solution file '%s' ['%d']", filename, c);
8027 if (tape.no_valid_file)
8030 tape.length_frames = GetTapeLengthFrames();
8031 tape.length_seconds = GetTapeLengthSeconds();
8034 void LoadTapeFromFilename(char *filename)
8036 char cookie[MAX_LINE_LEN];
8037 char chunk_name[CHUNK_ID_LEN + 1];
8041 // always start with reliable default values
8042 setTapeInfoToDefaults();
8044 if (strSuffix(filename, ".sln"))
8046 LoadTape_SokobanSolution(filename);
8051 if (!(file = openFile(filename, MODE_READ)))
8053 tape.no_valid_file = TRUE;
8058 getFileChunkBE(file, chunk_name, NULL);
8059 if (strEqual(chunk_name, "RND1"))
8061 getFile32BitBE(file); // not used
8063 getFileChunkBE(file, chunk_name, NULL);
8064 if (!strEqual(chunk_name, "TAPE"))
8066 tape.no_valid_file = TRUE;
8068 Warn("unknown format of tape file '%s'", filename);
8075 else // check for pre-2.0 file format with cookie string
8077 strcpy(cookie, chunk_name);
8078 if (getStringFromFile(file, &cookie[4], MAX_LINE_LEN - 4) == NULL)
8080 if (strlen(cookie) > 0 && cookie[strlen(cookie) - 1] == '\n')
8081 cookie[strlen(cookie) - 1] = '\0';
8083 if (!checkCookieString(cookie, TAPE_COOKIE_TMPL))
8085 tape.no_valid_file = TRUE;
8087 Warn("unknown format of tape file '%s'", filename);
8094 if ((tape.file_version = getFileVersionFromCookieString(cookie)) == -1)
8096 tape.no_valid_file = TRUE;
8098 Warn("unsupported version of tape file '%s'", filename);
8105 // pre-2.0 tape files have no game version, so use file version here
8106 tape.game_version = tape.file_version;
8109 if (tape.file_version < FILE_VERSION_1_2)
8111 // tape files from versions before 1.2.0 without chunk structure
8112 LoadTape_HEAD(file, TAPE_CHUNK_HEAD_SIZE, &tape);
8113 LoadTape_BODY(file, 2 * tape.length, &tape);
8121 int (*loader)(File *, int, struct TapeInfo *);
8125 { "VERS", TAPE_CHUNK_VERS_SIZE, LoadTape_VERS },
8126 { "HEAD", TAPE_CHUNK_HEAD_SIZE, LoadTape_HEAD },
8127 { "SCRN", TAPE_CHUNK_SCRN_SIZE, LoadTape_SCRN },
8128 { "INFO", -1, LoadTape_INFO },
8129 { "BODY", -1, LoadTape_BODY },
8133 while (getFileChunkBE(file, chunk_name, &chunk_size))
8137 while (chunk_info[i].name != NULL &&
8138 !strEqual(chunk_name, chunk_info[i].name))
8141 if (chunk_info[i].name == NULL)
8143 Warn("unknown chunk '%s' in tape file '%s'",
8144 chunk_name, filename);
8146 ReadUnusedBytesFromFile(file, chunk_size);
8148 else if (chunk_info[i].size != -1 &&
8149 chunk_info[i].size != chunk_size)
8151 Warn("wrong size (%d) of chunk '%s' in tape file '%s'",
8152 chunk_size, chunk_name, filename);
8154 ReadUnusedBytesFromFile(file, chunk_size);
8158 // call function to load this tape chunk
8159 int chunk_size_expected =
8160 (chunk_info[i].loader)(file, chunk_size, &tape);
8162 // the size of some chunks cannot be checked before reading other
8163 // chunks first (like "HEAD" and "BODY") that contain some header
8164 // information, so check them here
8165 if (chunk_size_expected != chunk_size)
8167 Warn("wrong size (%d) of chunk '%s' in tape file '%s'",
8168 chunk_size, chunk_name, filename);
8176 tape.length_frames = GetTapeLengthFrames();
8177 tape.length_seconds = GetTapeLengthSeconds();
8180 Debug("files:LoadTapeFromFilename", "tape file version: %d",
8182 Debug("files:LoadTapeFromFilename", "tape game version: %d",
8184 Debug("files:LoadTapeFromFilename", "tape engine version: %d",
8185 tape.engine_version);
8189 void LoadTape(int nr)
8191 char *filename = getTapeFilename(nr);
8193 LoadTapeFromFilename(filename);
8196 void LoadSolutionTape(int nr)
8198 char *filename = getSolutionTapeFilename(nr);
8200 LoadTapeFromFilename(filename);
8202 if (TAPE_IS_EMPTY(tape) &&
8203 level.game_engine_type == GAME_ENGINE_TYPE_SP &&
8204 level.native_sp_level->demo.is_available)
8205 CopyNativeTape_SP_to_RND(&level);
8208 static boolean checkSaveTape_SCRN(struct TapeInfo *tape)
8210 // chunk required for team mode tapes with non-default screen size
8211 return (tape->num_participating_players > 1 &&
8212 (tape->scr_fieldx != SCR_FIELDX_DEFAULT ||
8213 tape->scr_fieldy != SCR_FIELDY_DEFAULT));
8216 static void SaveTape_VERS(FILE *file, struct TapeInfo *tape)
8218 putFileVersion(file, tape->file_version);
8219 putFileVersion(file, tape->game_version);
8222 static void SaveTape_HEAD(FILE *file, struct TapeInfo *tape)
8225 byte store_participating_players = 0;
8227 // set bits for participating players for compact storage
8228 for (i = 0; i < MAX_PLAYERS; i++)
8229 if (tape->player_participates[i])
8230 store_participating_players |= (1 << i);
8232 putFile32BitBE(file, tape->random_seed);
8233 putFile32BitBE(file, tape->date);
8234 putFile32BitBE(file, tape->length);
8236 putFile8Bit(file, store_participating_players);
8238 putFile8Bit(file, getTapeActionValue(tape));
8240 putFile8Bit(file, tape->property_bits);
8242 // unused bytes not at the end here for 4-byte alignment of engine_version
8243 WriteUnusedBytesToFile(file, TAPE_CHUNK_HEAD_UNUSED);
8245 putFileVersion(file, tape->engine_version);
8248 static void SaveTape_SCRN(FILE *file, struct TapeInfo *tape)
8250 putFile8Bit(file, tape->scr_fieldx);
8251 putFile8Bit(file, tape->scr_fieldy);
8254 static void SaveTape_INFO(FILE *file, struct TapeInfo *tape)
8256 int level_identifier_size = strlen(tape->level_identifier) + 1;
8259 putFile16BitBE(file, level_identifier_size);
8261 for (i = 0; i < level_identifier_size; i++)
8262 putFile8Bit(file, tape->level_identifier[i]);
8264 putFile16BitBE(file, tape->level_nr);
8267 static void SaveTape_BODY(FILE *file, struct TapeInfo *tape)
8271 for (i = 0; i < tape->length; i++)
8273 if (tape->use_key_actions)
8275 for (j = 0; j < MAX_PLAYERS; j++)
8276 if (tape->player_participates[j])
8277 putFile8Bit(file, tape->pos[i].action[j]);
8280 if (tape->use_mouse_actions)
8282 putFile8Bit(file, tape->pos[i].action[TAPE_ACTION_LX]);
8283 putFile8Bit(file, tape->pos[i].action[TAPE_ACTION_LY]);
8284 putFile8Bit(file, tape->pos[i].action[TAPE_ACTION_BUTTON]);
8287 putFile8Bit(file, tape->pos[i].delay);
8291 void SaveTapeToFilename(char *filename)
8295 int info_chunk_size;
8296 int body_chunk_size;
8298 if (!(file = fopen(filename, MODE_WRITE)))
8300 Warn("cannot save level recording file '%s'", filename);
8305 tape_pos_size = getTapePosSize(&tape);
8307 info_chunk_size = 2 + (strlen(tape.level_identifier) + 1) + 2;
8308 body_chunk_size = tape_pos_size * tape.length;
8310 putFileChunkBE(file, "RND1", CHUNK_SIZE_UNDEFINED);
8311 putFileChunkBE(file, "TAPE", CHUNK_SIZE_NONE);
8313 putFileChunkBE(file, "VERS", TAPE_CHUNK_VERS_SIZE);
8314 SaveTape_VERS(file, &tape);
8316 putFileChunkBE(file, "HEAD", TAPE_CHUNK_HEAD_SIZE);
8317 SaveTape_HEAD(file, &tape);
8319 if (checkSaveTape_SCRN(&tape))
8321 putFileChunkBE(file, "SCRN", TAPE_CHUNK_SCRN_SIZE);
8322 SaveTape_SCRN(file, &tape);
8325 putFileChunkBE(file, "INFO", info_chunk_size);
8326 SaveTape_INFO(file, &tape);
8328 putFileChunkBE(file, "BODY", body_chunk_size);
8329 SaveTape_BODY(file, &tape);
8333 SetFilePermissions(filename, PERMS_PRIVATE);
8336 static void SaveTapeExt(char *filename)
8340 tape.file_version = FILE_VERSION_ACTUAL;
8341 tape.game_version = GAME_VERSION_ACTUAL;
8343 tape.num_participating_players = 0;
8345 // count number of participating players
8346 for (i = 0; i < MAX_PLAYERS; i++)
8347 if (tape.player_participates[i])
8348 tape.num_participating_players++;
8350 SaveTapeToFilename(filename);
8352 tape.changed = FALSE;
8355 void SaveTape(int nr)
8357 char *filename = getTapeFilename(nr);
8359 InitTapeDirectory(leveldir_current->subdir);
8361 SaveTapeExt(filename);
8364 void SaveScoreTape(int nr)
8366 char *filename = getScoreTapeFilename(tape.score_tape_basename, nr);
8368 // used instead of "leveldir_current->subdir" (for network games)
8369 InitScoreTapeDirectory(levelset.identifier, nr);
8371 SaveTapeExt(filename);
8374 static boolean SaveTapeCheckedExt(int nr, char *msg_replace, char *msg_saved,
8375 unsigned int req_state_added)
8377 char *filename = getTapeFilename(nr);
8378 boolean new_tape = !fileExists(filename);
8379 boolean tape_saved = FALSE;
8381 if (new_tape || Request(msg_replace, REQ_ASK | req_state_added))
8386 Request(msg_saved, REQ_CONFIRM | req_state_added);
8394 boolean SaveTapeChecked(int nr)
8396 return SaveTapeCheckedExt(nr, "Replace old tape?", "Tape saved!", 0);
8399 boolean SaveTapeChecked_LevelSolved(int nr)
8401 return SaveTapeCheckedExt(nr, "Level solved! Replace old tape?",
8402 "Level solved! Tape saved!", REQ_STAY_OPEN);
8405 void DumpTape(struct TapeInfo *tape)
8407 int tape_frame_counter;
8410 if (tape->no_valid_file)
8412 Warn("cannot dump -- no valid tape file found");
8418 Print("Tape of Level %03d (file version %08d, game version %08d)\n",
8419 tape->level_nr, tape->file_version, tape->game_version);
8420 Print(" (effective engine version %08d)\n",
8421 tape->engine_version);
8422 Print("Level series identifier: '%s'\n", tape->level_identifier);
8425 tape_frame_counter = 0;
8427 for (i = 0; i < tape->length; i++)
8429 if (i >= MAX_TAPE_LEN)
8434 for (j = 0; j < MAX_PLAYERS; j++)
8436 if (tape->player_participates[j])
8438 int action = tape->pos[i].action[j];
8440 Print("%d:%02x ", j, action);
8441 Print("[%c%c%c%c|%c%c] - ",
8442 (action & JOY_LEFT ? '<' : ' '),
8443 (action & JOY_RIGHT ? '>' : ' '),
8444 (action & JOY_UP ? '^' : ' '),
8445 (action & JOY_DOWN ? 'v' : ' '),
8446 (action & JOY_BUTTON_1 ? '1' : ' '),
8447 (action & JOY_BUTTON_2 ? '2' : ' '));
8451 Print("(%03d) ", tape->pos[i].delay);
8452 Print("[%05d]\n", tape_frame_counter);
8454 tape_frame_counter += tape->pos[i].delay;
8460 void DumpTapes(void)
8462 static LevelDirTree *dumptape_leveldir = NULL;
8464 dumptape_leveldir = getTreeInfoFromIdentifier(leveldir_first,
8465 global.dumptape_leveldir);
8467 if (dumptape_leveldir == NULL)
8468 Fail("no such level identifier: '%s'", global.dumptape_leveldir);
8470 if (global.dumptape_level_nr < dumptape_leveldir->first_level ||
8471 global.dumptape_level_nr > dumptape_leveldir->last_level)
8472 Fail("no such level number: %d", global.dumptape_level_nr);
8474 leveldir_current = dumptape_leveldir;
8476 if (options.mytapes)
8477 LoadTape(global.dumptape_level_nr);
8479 LoadSolutionTape(global.dumptape_level_nr);
8487 // ============================================================================
8488 // score file functions
8489 // ============================================================================
8491 static void setScoreInfoToDefaultsExt(struct ScoreInfo *scores)
8495 for (i = 0; i < MAX_SCORE_ENTRIES; i++)
8497 strcpy(scores->entry[i].tape_basename, UNDEFINED_FILENAME);
8498 strcpy(scores->entry[i].name, EMPTY_PLAYER_NAME);
8499 scores->entry[i].score = 0;
8500 scores->entry[i].time = 0;
8503 scores->num_entries = 0;
8504 scores->last_added = -1;
8505 scores->last_added_local = -1;
8507 scores->updated = FALSE;
8508 scores->force_last_added = FALSE;
8511 static void setScoreInfoToDefaults(void)
8513 setScoreInfoToDefaultsExt(&scores);
8516 static void setServerScoreInfoToDefaults(void)
8518 setScoreInfoToDefaultsExt(&server_scores);
8521 static void LoadScore_OLD(int nr)
8524 char *filename = getScoreFilename(nr);
8525 char cookie[MAX_LINE_LEN];
8526 char line[MAX_LINE_LEN];
8530 if (!(file = fopen(filename, MODE_READ)))
8533 // check file identifier
8534 if (fgets(cookie, MAX_LINE_LEN, file) == NULL)
8536 if (strlen(cookie) > 0 && cookie[strlen(cookie) - 1] == '\n')
8537 cookie[strlen(cookie) - 1] = '\0';
8539 if (!checkCookieString(cookie, SCORE_COOKIE_TMPL))
8541 Warn("unknown format of score file '%s'", filename);
8548 for (i = 0; i < MAX_SCORE_ENTRIES; i++)
8550 if (fscanf(file, "%d", &scores.entry[i].score) == EOF)
8551 Warn("fscanf() failed; %s", strerror(errno));
8553 if (fgets(line, MAX_LINE_LEN, file) == NULL)
8556 if (strlen(line) > 0 && line[strlen(line) - 1] == '\n')
8557 line[strlen(line) - 1] = '\0';
8559 for (line_ptr = line; *line_ptr; line_ptr++)
8561 if (*line_ptr != ' ' && *line_ptr != '\t' && *line_ptr != '\0')
8563 strncpy(scores.entry[i].name, line_ptr, MAX_PLAYER_NAME_LEN);
8564 scores.entry[i].name[MAX_PLAYER_NAME_LEN] = '\0';
8573 static void ConvertScore_OLD(void)
8575 // only convert score to time for levels that rate playing time over score
8576 if (!level.rate_time_over_score)
8579 // convert old score to playing time for score-less levels (like Supaplex)
8580 int time_final_max = 999;
8583 for (i = 0; i < MAX_SCORE_ENTRIES; i++)
8585 int score = scores.entry[i].score;
8587 if (score > 0 && score < time_final_max)
8588 scores.entry[i].time = (time_final_max - score - 1) * FRAMES_PER_SECOND;
8592 static int LoadScore_VERS(File *file, int chunk_size, struct ScoreInfo *scores)
8594 scores->file_version = getFileVersion(file);
8595 scores->game_version = getFileVersion(file);
8600 static int LoadScore_INFO(File *file, int chunk_size, struct ScoreInfo *scores)
8602 char *level_identifier = NULL;
8603 int level_identifier_size;
8606 level_identifier_size = getFile16BitBE(file);
8608 level_identifier = checked_malloc(level_identifier_size);
8610 for (i = 0; i < level_identifier_size; i++)
8611 level_identifier[i] = getFile8Bit(file);
8613 strncpy(scores->level_identifier, level_identifier, MAX_FILENAME_LEN);
8614 scores->level_identifier[MAX_FILENAME_LEN] = '\0';
8616 checked_free(level_identifier);
8618 scores->level_nr = getFile16BitBE(file);
8619 scores->num_entries = getFile16BitBE(file);
8621 chunk_size = 2 + level_identifier_size + 2 + 2;
8626 static int LoadScore_NAME(File *file, int chunk_size, struct ScoreInfo *scores)
8630 for (i = 0; i < scores->num_entries; i++)
8632 for (j = 0; j < MAX_PLAYER_NAME_LEN; j++)
8633 scores->entry[i].name[j] = getFile8Bit(file);
8635 scores->entry[i].name[MAX_PLAYER_NAME_LEN] = '\0';
8638 chunk_size = scores->num_entries * MAX_PLAYER_NAME_LEN;
8643 static int LoadScore_SCOR(File *file, int chunk_size, struct ScoreInfo *scores)
8647 for (i = 0; i < scores->num_entries; i++)
8648 scores->entry[i].score = getFile16BitBE(file);
8650 chunk_size = scores->num_entries * 2;
8655 static int LoadScore_TIME(File *file, int chunk_size, struct ScoreInfo *scores)
8659 for (i = 0; i < scores->num_entries; i++)
8660 scores->entry[i].time = getFile32BitBE(file);
8662 chunk_size = scores->num_entries * 4;
8667 static int LoadScore_TAPE(File *file, int chunk_size, struct ScoreInfo *scores)
8671 for (i = 0; i < scores->num_entries; i++)
8673 for (j = 0; j < MAX_SCORE_TAPE_BASENAME_LEN; j++)
8674 scores->entry[i].tape_basename[j] = getFile8Bit(file);
8676 scores->entry[i].tape_basename[MAX_SCORE_TAPE_BASENAME_LEN] = '\0';
8679 chunk_size = scores->num_entries * MAX_SCORE_TAPE_BASENAME_LEN;
8684 void LoadScore(int nr)
8686 char *filename = getScoreFilename(nr);
8687 char cookie[MAX_LINE_LEN];
8688 char chunk_name[CHUNK_ID_LEN + 1];
8690 boolean old_score_file_format = FALSE;
8693 // always start with reliable default values
8694 setScoreInfoToDefaults();
8696 if (!(file = openFile(filename, MODE_READ)))
8699 getFileChunkBE(file, chunk_name, NULL);
8700 if (strEqual(chunk_name, "RND1"))
8702 getFile32BitBE(file); // not used
8704 getFileChunkBE(file, chunk_name, NULL);
8705 if (!strEqual(chunk_name, "SCOR"))
8707 Warn("unknown format of score file '%s'", filename);
8714 else // check for old file format with cookie string
8716 strcpy(cookie, chunk_name);
8717 if (getStringFromFile(file, &cookie[4], MAX_LINE_LEN - 4) == NULL)
8719 if (strlen(cookie) > 0 && cookie[strlen(cookie) - 1] == '\n')
8720 cookie[strlen(cookie) - 1] = '\0';
8722 if (!checkCookieString(cookie, SCORE_COOKIE_TMPL))
8724 Warn("unknown format of score file '%s'", filename);
8731 old_score_file_format = TRUE;
8734 if (old_score_file_format)
8736 // score files from versions before 4.2.4.0 without chunk structure
8739 // convert score to time, if possible (mainly for Supaplex levels)
8748 int (*loader)(File *, int, struct ScoreInfo *);
8752 { "VERS", SCORE_CHUNK_VERS_SIZE, LoadScore_VERS },
8753 { "INFO", -1, LoadScore_INFO },
8754 { "NAME", -1, LoadScore_NAME },
8755 { "SCOR", -1, LoadScore_SCOR },
8756 { "TIME", -1, LoadScore_TIME },
8757 { "TAPE", -1, LoadScore_TAPE },
8762 while (getFileChunkBE(file, chunk_name, &chunk_size))
8766 while (chunk_info[i].name != NULL &&
8767 !strEqual(chunk_name, chunk_info[i].name))
8770 if (chunk_info[i].name == NULL)
8772 Warn("unknown chunk '%s' in score file '%s'",
8773 chunk_name, filename);
8775 ReadUnusedBytesFromFile(file, chunk_size);
8777 else if (chunk_info[i].size != -1 &&
8778 chunk_info[i].size != chunk_size)
8780 Warn("wrong size (%d) of chunk '%s' in score file '%s'",
8781 chunk_size, chunk_name, filename);
8783 ReadUnusedBytesFromFile(file, chunk_size);
8787 // call function to load this score chunk
8788 int chunk_size_expected =
8789 (chunk_info[i].loader)(file, chunk_size, &scores);
8791 // the size of some chunks cannot be checked before reading other
8792 // chunks first (like "HEAD" and "BODY") that contain some header
8793 // information, so check them here
8794 if (chunk_size_expected != chunk_size)
8796 Warn("wrong size (%d) of chunk '%s' in score file '%s'",
8797 chunk_size, chunk_name, filename);
8806 #if ENABLE_HISTORIC_CHUNKS
8807 void SaveScore_OLD(int nr)
8810 char *filename = getScoreFilename(nr);
8813 // used instead of "leveldir_current->subdir" (for network games)
8814 InitScoreDirectory(levelset.identifier);
8816 if (!(file = fopen(filename, MODE_WRITE)))
8818 Warn("cannot save score for level %d", nr);
8823 fprintf(file, "%s\n\n", SCORE_COOKIE);
8825 for (i = 0; i < MAX_SCORE_ENTRIES; i++)
8826 fprintf(file, "%d %s\n", scores.entry[i].score, scores.entry[i].name);
8830 SetFilePermissions(filename, PERMS_PRIVATE);
8834 static void SaveScore_VERS(FILE *file, struct ScoreInfo *scores)
8836 putFileVersion(file, scores->file_version);
8837 putFileVersion(file, scores->game_version);
8840 static void SaveScore_INFO(FILE *file, struct ScoreInfo *scores)
8842 int level_identifier_size = strlen(scores->level_identifier) + 1;
8845 putFile16BitBE(file, level_identifier_size);
8847 for (i = 0; i < level_identifier_size; i++)
8848 putFile8Bit(file, scores->level_identifier[i]);
8850 putFile16BitBE(file, scores->level_nr);
8851 putFile16BitBE(file, scores->num_entries);
8854 static void SaveScore_NAME(FILE *file, struct ScoreInfo *scores)
8858 for (i = 0; i < scores->num_entries; i++)
8860 int name_size = strlen(scores->entry[i].name);
8862 for (j = 0; j < MAX_PLAYER_NAME_LEN; j++)
8863 putFile8Bit(file, (j < name_size ? scores->entry[i].name[j] : 0));
8867 static void SaveScore_SCOR(FILE *file, struct ScoreInfo *scores)
8871 for (i = 0; i < scores->num_entries; i++)
8872 putFile16BitBE(file, scores->entry[i].score);
8875 static void SaveScore_TIME(FILE *file, struct ScoreInfo *scores)
8879 for (i = 0; i < scores->num_entries; i++)
8880 putFile32BitBE(file, scores->entry[i].time);
8883 static void SaveScore_TAPE(FILE *file, struct ScoreInfo *scores)
8887 for (i = 0; i < scores->num_entries; i++)
8889 int size = strlen(scores->entry[i].tape_basename);
8891 for (j = 0; j < MAX_SCORE_TAPE_BASENAME_LEN; j++)
8892 putFile8Bit(file, (j < size ? scores->entry[i].tape_basename[j] : 0));
8896 static void SaveScoreToFilename(char *filename)
8899 int info_chunk_size;
8900 int name_chunk_size;
8901 int scor_chunk_size;
8902 int time_chunk_size;
8903 int tape_chunk_size;
8905 if (!(file = fopen(filename, MODE_WRITE)))
8907 Warn("cannot save score file '%s'", filename);
8912 info_chunk_size = 2 + (strlen(scores.level_identifier) + 1) + 2 + 2;
8913 name_chunk_size = scores.num_entries * MAX_PLAYER_NAME_LEN;
8914 scor_chunk_size = scores.num_entries * 2;
8915 time_chunk_size = scores.num_entries * 4;
8916 tape_chunk_size = scores.num_entries * MAX_SCORE_TAPE_BASENAME_LEN;
8918 putFileChunkBE(file, "RND1", CHUNK_SIZE_UNDEFINED);
8919 putFileChunkBE(file, "SCOR", CHUNK_SIZE_NONE);
8921 putFileChunkBE(file, "VERS", SCORE_CHUNK_VERS_SIZE);
8922 SaveScore_VERS(file, &scores);
8924 putFileChunkBE(file, "INFO", info_chunk_size);
8925 SaveScore_INFO(file, &scores);
8927 putFileChunkBE(file, "NAME", name_chunk_size);
8928 SaveScore_NAME(file, &scores);
8930 putFileChunkBE(file, "SCOR", scor_chunk_size);
8931 SaveScore_SCOR(file, &scores);
8933 putFileChunkBE(file, "TIME", time_chunk_size);
8934 SaveScore_TIME(file, &scores);
8936 putFileChunkBE(file, "TAPE", tape_chunk_size);
8937 SaveScore_TAPE(file, &scores);
8941 SetFilePermissions(filename, PERMS_PRIVATE);
8944 void SaveScore(int nr)
8946 char *filename = getScoreFilename(nr);
8949 // used instead of "leveldir_current->subdir" (for network games)
8950 InitScoreDirectory(levelset.identifier);
8952 scores.file_version = FILE_VERSION_ACTUAL;
8953 scores.game_version = GAME_VERSION_ACTUAL;
8955 strncpy(scores.level_identifier, levelset.identifier, MAX_FILENAME_LEN);
8956 scores.level_identifier[MAX_FILENAME_LEN] = '\0';
8957 scores.level_nr = level_nr;
8959 for (i = 0; i < MAX_SCORE_ENTRIES; i++)
8960 if (scores.entry[i].score == 0 &&
8961 scores.entry[i].time == 0 &&
8962 strEqual(scores.entry[i].name, EMPTY_PLAYER_NAME))
8965 scores.num_entries = i;
8967 if (scores.num_entries == 0)
8970 SaveScoreToFilename(filename);
8973 static void ExecuteAsThread(SDL_ThreadFunction function, char *name, int data,
8976 static int data_static;
8980 SDL_Thread *thread = SDL_CreateThread(function, name, &data_static);
8983 SDL_DetachThread(thread);
8985 Error("Cannot create thread to %s!", error);
8987 // nasty kludge to lower probability of intermingled thread error messages
8991 static void DownloadServerScoreToCacheExt(struct HttpRequest *request,
8992 struct HttpResponse *response,
8995 request->hostname = setup.api_server_hostname;
8996 request->port = API_SERVER_PORT;
8997 request->method = API_SERVER_METHOD;
8998 request->uri = API_SERVER_URI_GET;
9000 snprintf(request->body, MAX_HTTP_BODY_SIZE,
9002 " \"levelset_identifier\": \"%s\",\n"
9003 " \"level_nr\": \"%d\",\n"
9004 " \"rate_time_over_score\": \"%d\"\n"
9006 levelset.identifier, nr, level.rate_time_over_score);
9008 if (!DoHttpRequest(request, response))
9010 Error("HTTP request failed: %s", GetHttpError());
9015 if (!HTTP_SUCCESS(response->status_code))
9017 Error("server failed to handle request: %d %s",
9018 response->status_code,
9019 response->status_text);
9024 if (response->body_size == 0)
9026 // no scores available for this level
9031 ConvertHttpResponseBodyToClientEncoding(response);
9033 char *filename = getScoreCacheFilename(nr);
9037 // used instead of "leveldir_current->subdir" (for network games)
9038 InitScoreCacheDirectory(levelset.identifier);
9040 if (!(file = fopen(filename, MODE_WRITE)))
9042 Warn("cannot save score cache file '%s'", filename);
9047 for (i = 0; i < response->body_size; i++)
9048 fputc(response->body[i], file);
9052 SetFilePermissions(filename, PERMS_PRIVATE);
9054 server_scores.updated = TRUE;
9057 static void DownloadServerScoreToCache(int nr)
9059 struct HttpRequest *request = checked_calloc(sizeof(struct HttpRequest));
9060 struct HttpResponse *response = checked_calloc(sizeof(struct HttpResponse));
9062 DownloadServerScoreToCacheExt(request, response, nr);
9064 checked_free(request);
9065 checked_free(response);
9068 static int DownloadServerScoreToCacheThread(void *data)
9070 DownloadServerScoreToCache(*(int *)data);
9075 static void DownloadServerScoreToCacheAsThread(int nr)
9077 ExecuteAsThread(DownloadServerScoreToCacheThread,
9078 "DownloadServerScoreToCache", nr,
9079 "download scores from server");
9082 static void LoadServerScoreFromCache(int nr)
9084 struct ScoreEntry score_entry;
9093 { &score_entry.score, FALSE, 0 },
9094 { &score_entry.time, FALSE, 0 },
9095 { score_entry.name, TRUE, MAX_PLAYER_NAME_LEN },
9096 { score_entry.tape_basename, TRUE, MAX_FILENAME_LEN },
9100 char *filename = getScoreCacheFilename(nr);
9101 SetupFileHash *score_hash = loadSetupFileHash(filename);
9104 server_scores.num_entries = 0;
9106 if (score_hash == NULL)
9109 for (i = 0; i < MAX_SCORE_ENTRIES; i++)
9111 score_entry = server_scores.entry[i];
9113 for (j = 0; score_mapping[j].value != NULL; j++)
9117 sprintf(token, "%02d.%d", i, j);
9119 char *value = getHashEntry(score_hash, token);
9124 if (score_mapping[j].is_string)
9126 char *score_value = (char *)score_mapping[j].value;
9127 int value_size = score_mapping[j].string_size;
9129 strncpy(score_value, value, value_size);
9130 score_value[value_size] = '\0';
9134 int *score_value = (int *)score_mapping[j].value;
9136 *score_value = atoi(value);
9139 server_scores.num_entries = i + 1;
9142 server_scores.entry[i] = score_entry;
9145 freeSetupFileHash(score_hash);
9148 void LoadServerScore(int nr, boolean download_score)
9150 if (!setup.api_server)
9153 // always start with reliable default values
9154 setServerScoreInfoToDefaults();
9156 // 1st step: load server scores from cache file (which may not exist)
9157 // (this should prevent reading it while the thread is writing to it)
9158 LoadServerScoreFromCache(nr);
9160 if (download_score && runtime.api_server)
9162 // 2nd step: download server scores from score server to cache file
9163 // (as thread, as it might time out if the server is not reachable)
9164 DownloadServerScoreToCacheAsThread(nr);
9168 static char *get_file_base64(char *filename)
9170 struct stat file_status;
9172 if (stat(filename, &file_status) != 0)
9174 Error("cannot stat file '%s'\n", filename);
9179 int buffer_size = file_status.st_size;
9180 byte *buffer = checked_malloc(buffer_size);
9184 if (!(file = fopen(filename, MODE_READ)))
9186 Error("cannot open file '%s'\n", filename);
9188 checked_free(buffer);
9193 for (i = 0; i < buffer_size; i++)
9195 int c = fgetc(file);
9199 Error("cannot read from input file '%s'\n", filename);
9202 checked_free(buffer);
9207 buffer[i] = (byte)c;
9212 int buffer_encoded_size = base64_encoded_size(buffer_size);
9213 char *buffer_encoded = checked_malloc(buffer_encoded_size);
9215 base64_encode(buffer_encoded, buffer, buffer_size);
9217 checked_free(buffer);
9219 return buffer_encoded;
9222 static void UploadScoreToServerExt(struct HttpRequest *request,
9223 struct HttpResponse *response,
9226 struct ScoreEntry *score_entry = &scores.entry[scores.last_added];
9228 request->hostname = setup.api_server_hostname;
9229 request->port = API_SERVER_PORT;
9230 request->method = API_SERVER_METHOD;
9231 request->uri = API_SERVER_URI_ADD;
9233 char *tape_filename = getScoreTapeFilename(score_entry->tape_basename, nr);
9234 char *tape_base64 = get_file_base64(tape_filename);
9236 if (tape_base64 == NULL)
9238 Error("loading and base64 encoding score tape file failed");
9243 snprintf(request->body, MAX_HTTP_BODY_SIZE,
9245 " \"game_version\": \"%s\",\n"
9246 " \"levelset_identifier\": \"%s\",\n"
9247 " \"levelset_name\": \"%s\",\n"
9248 " \"levelset_author\": \"%s\",\n"
9249 " \"levelset_num_levels\": \"%d\",\n"
9250 " \"levelset_first_level\": \"%d\",\n"
9251 " \"level_nr\": \"%d\",\n"
9252 " \"player_name\": \"%s\",\n"
9253 " \"score\": \"%d\",\n"
9254 " \"time\": \"%d\",\n"
9255 " \"tape_basename\": \"%s\",\n"
9256 " \"tape\": \"%s\"\n"
9258 getProgramRealVersionString(),
9259 leveldir_current->identifier,
9260 leveldir_current->name,
9261 leveldir_current->author,
9262 leveldir_current->levels,
9263 leveldir_current->first_level,
9268 score_entry->tape_basename,
9271 checked_free(tape_base64);
9273 ConvertHttpRequestBodyToServerEncoding(request);
9275 if (!DoHttpRequest(request, response))
9277 Error("HTTP request failed: %s", GetHttpError());
9282 if (!HTTP_SUCCESS(response->status_code))
9284 Error("server failed to handle request: %d %s",
9285 response->status_code,
9286 response->status_text);
9292 static void UploadScoreToServer(int nr)
9294 struct HttpRequest *request = checked_calloc(sizeof(struct HttpRequest));
9295 struct HttpResponse *response = checked_calloc(sizeof(struct HttpResponse));
9297 UploadScoreToServerExt(request, response, nr);
9299 checked_free(request);
9300 checked_free(response);
9303 static int UploadScoreToServerThread(void *data)
9305 UploadScoreToServer(*(int *)data);
9310 static void UploadScoreToServerAsThread(int nr)
9312 ExecuteAsThread(UploadScoreToServerThread,
9313 "UploadScoreToServer", nr,
9314 "upload score to server");
9317 void SaveServerScore(int nr)
9319 if (!runtime.api_server)
9322 UploadScoreToServerAsThread(nr);
9325 void LoadLocalAndServerScore(int nr, boolean download_score)
9327 int last_added_local = scores.last_added_local;
9331 // restore last added local score entry (before merging server scores)
9332 scores.last_added = scores.last_added_local = last_added_local;
9334 if (setup.api_server && !setup.only_show_local_scores)
9336 // load server scores from cache file and trigger update from server
9337 LoadServerScore(nr, download_score);
9339 // merge local scores with scores from server
9345 // ============================================================================
9346 // setup file functions
9347 // ============================================================================
9349 #define TOKEN_STR_PLAYER_PREFIX "player_"
9352 static struct TokenInfo global_setup_tokens[] =
9356 &setup.player_name, "player_name"
9360 &setup.multiple_users, "multiple_users"
9364 &setup.sound, "sound"
9368 &setup.sound_loops, "repeating_sound_loops"
9372 &setup.sound_music, "background_music"
9376 &setup.sound_simple, "simple_sound_effects"
9380 &setup.toons, "toons"
9384 &setup.scroll_delay, "scroll_delay"
9388 &setup.forced_scroll_delay, "forced_scroll_delay"
9392 &setup.scroll_delay_value, "scroll_delay_value"
9396 &setup.engine_snapshot_mode, "engine_snapshot_mode"
9400 &setup.engine_snapshot_memory, "engine_snapshot_memory"
9404 &setup.fade_screens, "fade_screens"
9408 &setup.autorecord, "automatic_tape_recording"
9412 &setup.show_titlescreen, "show_titlescreen"
9416 &setup.quick_doors, "quick_doors"
9420 &setup.team_mode, "team_mode"
9424 &setup.handicap, "handicap"
9428 &setup.skip_levels, "skip_levels"
9432 &setup.increment_levels, "increment_levels"
9436 &setup.auto_play_next_level, "auto_play_next_level"
9440 &setup.count_score_after_game, "count_score_after_game"
9444 &setup.show_scores_after_game, "show_scores_after_game"
9448 &setup.time_limit, "time_limit"
9452 &setup.fullscreen, "fullscreen"
9456 &setup.window_scaling_percent, "window_scaling_percent"
9460 &setup.window_scaling_quality, "window_scaling_quality"
9464 &setup.screen_rendering_mode, "screen_rendering_mode"
9468 &setup.vsync_mode, "vsync_mode"
9472 &setup.ask_on_escape, "ask_on_escape"
9476 &setup.ask_on_escape_editor, "ask_on_escape_editor"
9480 &setup.ask_on_game_over, "ask_on_game_over"
9484 &setup.ask_on_quit_game, "ask_on_quit_game"
9488 &setup.ask_on_quit_program, "ask_on_quit_program"
9492 &setup.quick_switch, "quick_player_switch"
9496 &setup.input_on_focus, "input_on_focus"
9500 &setup.prefer_aga_graphics, "prefer_aga_graphics"
9504 &setup.prefer_lowpass_sounds, "prefer_lowpass_sounds"
9508 &setup.prefer_extra_panel_items, "prefer_extra_panel_items"
9512 &setup.game_speed_extended, "game_speed_extended"
9516 &setup.game_frame_delay, "game_frame_delay"
9520 &setup.sp_show_border_elements, "sp_show_border_elements"
9524 &setup.small_game_graphics, "small_game_graphics"
9528 &setup.show_snapshot_buttons, "show_snapshot_buttons"
9532 &setup.only_show_local_scores, "only_show_local_scores"
9536 &setup.graphics_set, "graphics_set"
9540 &setup.sounds_set, "sounds_set"
9544 &setup.music_set, "music_set"
9548 &setup.override_level_graphics, "override_level_graphics"
9552 &setup.override_level_sounds, "override_level_sounds"
9556 &setup.override_level_music, "override_level_music"
9560 &setup.volume_simple, "volume_simple"
9564 &setup.volume_loops, "volume_loops"
9568 &setup.volume_music, "volume_music"
9572 &setup.network_mode, "network_mode"
9576 &setup.network_player_nr, "network_player"
9580 &setup.network_server_hostname, "network_server_hostname"
9584 &setup.api_server, "api_server"
9588 &setup.api_server_hostname, "api_server_hostname"
9592 &setup.touch.control_type, "touch.control_type"
9596 &setup.touch.move_distance, "touch.move_distance"
9600 &setup.touch.drop_distance, "touch.drop_distance"
9604 &setup.touch.transparency, "touch.transparency"
9608 &setup.touch.draw_outlined, "touch.draw_outlined"
9612 &setup.touch.draw_pressed, "touch.draw_pressed"
9616 &setup.touch.grid_xsize[0], "touch.virtual_buttons.0.xsize"
9620 &setup.touch.grid_ysize[0], "touch.virtual_buttons.0.ysize"
9624 &setup.touch.grid_xsize[1], "touch.virtual_buttons.1.xsize"
9628 &setup.touch.grid_ysize[1], "touch.virtual_buttons.1.ysize"
9632 static struct TokenInfo auto_setup_tokens[] =
9636 &setup.auto_setup.editor_zoom_tilesize, "editor.zoom_tilesize"
9640 static struct TokenInfo editor_setup_tokens[] =
9644 &setup.editor.el_classic, "editor.el_classic"
9648 &setup.editor.el_custom, "editor.el_custom"
9652 &setup.editor.el_user_defined, "editor.el_user_defined"
9656 &setup.editor.el_dynamic, "editor.el_dynamic"
9660 &setup.editor.el_headlines, "editor.el_headlines"
9664 &setup.editor.show_element_token, "editor.show_element_token"
9668 &setup.editor.show_read_only_warning, "editor.show_read_only_warning"
9672 static struct TokenInfo editor_cascade_setup_tokens[] =
9676 &setup.editor_cascade.el_bd, "editor.cascade.el_bd"
9680 &setup.editor_cascade.el_em, "editor.cascade.el_em"
9684 &setup.editor_cascade.el_emc, "editor.cascade.el_emc"
9688 &setup.editor_cascade.el_rnd, "editor.cascade.el_rnd"
9692 &setup.editor_cascade.el_sb, "editor.cascade.el_sb"
9696 &setup.editor_cascade.el_sp, "editor.cascade.el_sp"
9700 &setup.editor_cascade.el_dc, "editor.cascade.el_dc"
9704 &setup.editor_cascade.el_dx, "editor.cascade.el_dx"
9708 &setup.editor_cascade.el_mm, "editor.cascade.el_mm"
9712 &setup.editor_cascade.el_df, "editor.cascade.el_df"
9716 &setup.editor_cascade.el_chars, "editor.cascade.el_chars"
9720 &setup.editor_cascade.el_steel_chars, "editor.cascade.el_steel_chars"
9724 &setup.editor_cascade.el_ce, "editor.cascade.el_ce"
9728 &setup.editor_cascade.el_ge, "editor.cascade.el_ge"
9732 &setup.editor_cascade.el_ref, "editor.cascade.el_ref"
9736 &setup.editor_cascade.el_user, "editor.cascade.el_user"
9740 &setup.editor_cascade.el_dynamic, "editor.cascade.el_dynamic"
9744 static struct TokenInfo shortcut_setup_tokens[] =
9748 &setup.shortcut.save_game, "shortcut.save_game"
9752 &setup.shortcut.load_game, "shortcut.load_game"
9756 &setup.shortcut.toggle_pause, "shortcut.toggle_pause"
9760 &setup.shortcut.focus_player[0], "shortcut.focus_player_1"
9764 &setup.shortcut.focus_player[1], "shortcut.focus_player_2"
9768 &setup.shortcut.focus_player[2], "shortcut.focus_player_3"
9772 &setup.shortcut.focus_player[3], "shortcut.focus_player_4"
9776 &setup.shortcut.focus_player_all, "shortcut.focus_player_all"
9780 &setup.shortcut.tape_eject, "shortcut.tape_eject"
9784 &setup.shortcut.tape_extra, "shortcut.tape_extra"
9788 &setup.shortcut.tape_stop, "shortcut.tape_stop"
9792 &setup.shortcut.tape_pause, "shortcut.tape_pause"
9796 &setup.shortcut.tape_record, "shortcut.tape_record"
9800 &setup.shortcut.tape_play, "shortcut.tape_play"
9804 &setup.shortcut.sound_simple, "shortcut.sound_simple"
9808 &setup.shortcut.sound_loops, "shortcut.sound_loops"
9812 &setup.shortcut.sound_music, "shortcut.sound_music"
9816 &setup.shortcut.snap_left, "shortcut.snap_left"
9820 &setup.shortcut.snap_right, "shortcut.snap_right"
9824 &setup.shortcut.snap_up, "shortcut.snap_up"
9828 &setup.shortcut.snap_down, "shortcut.snap_down"
9832 static struct SetupInputInfo setup_input;
9833 static struct TokenInfo player_setup_tokens[] =
9837 &setup_input.use_joystick, ".use_joystick"
9841 &setup_input.joy.device_name, ".joy.device_name"
9845 &setup_input.joy.xleft, ".joy.xleft"
9849 &setup_input.joy.xmiddle, ".joy.xmiddle"
9853 &setup_input.joy.xright, ".joy.xright"
9857 &setup_input.joy.yupper, ".joy.yupper"
9861 &setup_input.joy.ymiddle, ".joy.ymiddle"
9865 &setup_input.joy.ylower, ".joy.ylower"
9869 &setup_input.joy.snap, ".joy.snap_field"
9873 &setup_input.joy.drop, ".joy.place_bomb"
9877 &setup_input.key.left, ".key.move_left"
9881 &setup_input.key.right, ".key.move_right"
9885 &setup_input.key.up, ".key.move_up"
9889 &setup_input.key.down, ".key.move_down"
9893 &setup_input.key.snap, ".key.snap_field"
9897 &setup_input.key.drop, ".key.place_bomb"
9901 static struct TokenInfo system_setup_tokens[] =
9905 &setup.system.sdl_renderdriver, "system.sdl_renderdriver"
9909 &setup.system.sdl_videodriver, "system.sdl_videodriver"
9913 &setup.system.sdl_audiodriver, "system.sdl_audiodriver"
9917 &setup.system.audio_fragment_size, "system.audio_fragment_size"
9921 static struct TokenInfo internal_setup_tokens[] =
9925 &setup.internal.program_title, "program_title"
9929 &setup.internal.program_version, "program_version"
9933 &setup.internal.program_author, "program_author"
9937 &setup.internal.program_email, "program_email"
9941 &setup.internal.program_website, "program_website"
9945 &setup.internal.program_copyright, "program_copyright"
9949 &setup.internal.program_company, "program_company"
9953 &setup.internal.program_icon_file, "program_icon_file"
9957 &setup.internal.default_graphics_set, "default_graphics_set"
9961 &setup.internal.default_sounds_set, "default_sounds_set"
9965 &setup.internal.default_music_set, "default_music_set"
9969 &setup.internal.fallback_graphics_file, "fallback_graphics_file"
9973 &setup.internal.fallback_sounds_file, "fallback_sounds_file"
9977 &setup.internal.fallback_music_file, "fallback_music_file"
9981 &setup.internal.default_level_series, "default_level_series"
9985 &setup.internal.default_window_width, "default_window_width"
9989 &setup.internal.default_window_height, "default_window_height"
9993 &setup.internal.choose_from_top_leveldir, "choose_from_top_leveldir"
9997 &setup.internal.show_scaling_in_title, "show_scaling_in_title"
10001 &setup.internal.create_user_levelset, "create_user_levelset"
10005 &setup.internal.menu_game, "menu_game"
10009 &setup.internal.menu_editor, "menu_editor"
10013 &setup.internal.menu_graphics, "menu_graphics"
10017 &setup.internal.menu_sound, "menu_sound"
10021 &setup.internal.menu_artwork, "menu_artwork"
10025 &setup.internal.menu_input, "menu_input"
10029 &setup.internal.menu_touch, "menu_touch"
10033 &setup.internal.menu_shortcuts, "menu_shortcuts"
10037 &setup.internal.menu_exit, "menu_exit"
10041 &setup.internal.menu_save_and_exit, "menu_save_and_exit"
10045 static struct TokenInfo debug_setup_tokens[] =
10049 &setup.debug.frame_delay[0], "debug.frame_delay_0"
10053 &setup.debug.frame_delay[1], "debug.frame_delay_1"
10057 &setup.debug.frame_delay[2], "debug.frame_delay_2"
10061 &setup.debug.frame_delay[3], "debug.frame_delay_3"
10065 &setup.debug.frame_delay[4], "debug.frame_delay_4"
10069 &setup.debug.frame_delay[5], "debug.frame_delay_5"
10073 &setup.debug.frame_delay[6], "debug.frame_delay_6"
10077 &setup.debug.frame_delay[7], "debug.frame_delay_7"
10081 &setup.debug.frame_delay[8], "debug.frame_delay_8"
10085 &setup.debug.frame_delay[9], "debug.frame_delay_9"
10089 &setup.debug.frame_delay_key[0], "debug.key.frame_delay_0"
10093 &setup.debug.frame_delay_key[1], "debug.key.frame_delay_1"
10097 &setup.debug.frame_delay_key[2], "debug.key.frame_delay_2"
10101 &setup.debug.frame_delay_key[3], "debug.key.frame_delay_3"
10105 &setup.debug.frame_delay_key[4], "debug.key.frame_delay_4"
10109 &setup.debug.frame_delay_key[5], "debug.key.frame_delay_5"
10113 &setup.debug.frame_delay_key[6], "debug.key.frame_delay_6"
10117 &setup.debug.frame_delay_key[7], "debug.key.frame_delay_7"
10121 &setup.debug.frame_delay_key[8], "debug.key.frame_delay_8"
10125 &setup.debug.frame_delay_key[9], "debug.key.frame_delay_9"
10129 &setup.debug.frame_delay_use_mod_key, "debug.frame_delay.use_mod_key"},
10132 &setup.debug.frame_delay_game_only, "debug.frame_delay.game_only"
10136 &setup.debug.show_frames_per_second, "debug.show_frames_per_second"
10140 &setup.debug.xsn_mode, "debug.xsn_mode"
10144 &setup.debug.xsn_percent, "debug.xsn_percent"
10148 static struct TokenInfo options_setup_tokens[] =
10152 &setup.options.verbose, "options.verbose"
10156 static void setSetupInfoToDefaults(struct SetupInfo *si)
10160 si->player_name = getStringCopy(getDefaultUserName(user.nr));
10162 si->multiple_users = TRUE;
10165 si->sound_loops = TRUE;
10166 si->sound_music = TRUE;
10167 si->sound_simple = TRUE;
10169 si->scroll_delay = TRUE;
10170 si->forced_scroll_delay = FALSE;
10171 si->scroll_delay_value = STD_SCROLL_DELAY;
10172 si->engine_snapshot_mode = getStringCopy(STR_SNAPSHOT_MODE_DEFAULT);
10173 si->engine_snapshot_memory = SNAPSHOT_MEMORY_DEFAULT;
10174 si->fade_screens = TRUE;
10175 si->autorecord = TRUE;
10176 si->show_titlescreen = TRUE;
10177 si->quick_doors = FALSE;
10178 si->team_mode = FALSE;
10179 si->handicap = TRUE;
10180 si->skip_levels = TRUE;
10181 si->increment_levels = TRUE;
10182 si->auto_play_next_level = TRUE;
10183 si->count_score_after_game = TRUE;
10184 si->show_scores_after_game = TRUE;
10185 si->time_limit = TRUE;
10186 si->fullscreen = FALSE;
10187 si->window_scaling_percent = STD_WINDOW_SCALING_PERCENT;
10188 si->window_scaling_quality = getStringCopy(SCALING_QUALITY_DEFAULT);
10189 si->screen_rendering_mode = getStringCopy(STR_SPECIAL_RENDERING_DEFAULT);
10190 si->vsync_mode = getStringCopy(STR_VSYNC_MODE_DEFAULT);
10191 si->ask_on_escape = TRUE;
10192 si->ask_on_escape_editor = TRUE;
10193 si->ask_on_game_over = TRUE;
10194 si->ask_on_quit_game = TRUE;
10195 si->ask_on_quit_program = TRUE;
10196 si->quick_switch = FALSE;
10197 si->input_on_focus = FALSE;
10198 si->prefer_aga_graphics = TRUE;
10199 si->prefer_lowpass_sounds = FALSE;
10200 si->prefer_extra_panel_items = TRUE;
10201 si->game_speed_extended = FALSE;
10202 si->game_frame_delay = GAME_FRAME_DELAY;
10203 si->sp_show_border_elements = FALSE;
10204 si->small_game_graphics = FALSE;
10205 si->show_snapshot_buttons = FALSE;
10206 si->only_show_local_scores = FALSE;
10208 si->graphics_set = getStringCopy(GFX_CLASSIC_SUBDIR);
10209 si->sounds_set = getStringCopy(SND_CLASSIC_SUBDIR);
10210 si->music_set = getStringCopy(MUS_CLASSIC_SUBDIR);
10212 si->override_level_graphics = FALSE;
10213 si->override_level_sounds = FALSE;
10214 si->override_level_music = FALSE;
10216 si->volume_simple = 100; // percent
10217 si->volume_loops = 100; // percent
10218 si->volume_music = 100; // percent
10220 si->network_mode = FALSE;
10221 si->network_player_nr = 0; // first player
10222 si->network_server_hostname = getStringCopy(STR_NETWORK_AUTO_DETECT);
10224 si->api_server = TRUE;
10225 si->api_server_hostname = getStringCopy(API_SERVER_HOSTNAME);
10227 si->touch.control_type = getStringCopy(TOUCH_CONTROL_DEFAULT);
10228 si->touch.move_distance = TOUCH_MOVE_DISTANCE_DEFAULT; // percent
10229 si->touch.drop_distance = TOUCH_DROP_DISTANCE_DEFAULT; // percent
10230 si->touch.transparency = TOUCH_TRANSPARENCY_DEFAULT; // percent
10231 si->touch.draw_outlined = TRUE;
10232 si->touch.draw_pressed = TRUE;
10234 for (i = 0; i < 2; i++)
10236 char *default_grid_button[6][2] =
10242 { "111222", " vv " },
10243 { "111222", " vv " }
10245 int grid_xsize = DEFAULT_GRID_XSIZE(i);
10246 int grid_ysize = DEFAULT_GRID_YSIZE(i);
10247 int min_xsize = MIN(6, grid_xsize);
10248 int min_ysize = MIN(6, grid_ysize);
10249 int startx = grid_xsize - min_xsize;
10250 int starty = grid_ysize - min_ysize;
10253 // virtual buttons grid can only be set to defaults if video is initialized
10254 // (this will be repeated if virtual buttons are not loaded from setup file)
10255 if (video.initialized)
10257 si->touch.grid_xsize[i] = grid_xsize;
10258 si->touch.grid_ysize[i] = grid_ysize;
10262 si->touch.grid_xsize[i] = -1;
10263 si->touch.grid_ysize[i] = -1;
10266 for (x = 0; x < MAX_GRID_XSIZE; x++)
10267 for (y = 0; y < MAX_GRID_YSIZE; y++)
10268 si->touch.grid_button[i][x][y] = CHAR_GRID_BUTTON_NONE;
10270 for (x = 0; x < min_xsize; x++)
10271 for (y = 0; y < min_ysize; y++)
10272 si->touch.grid_button[i][x][starty + y] =
10273 default_grid_button[y][0][x];
10275 for (x = 0; x < min_xsize; x++)
10276 for (y = 0; y < min_ysize; y++)
10277 si->touch.grid_button[i][startx + x][starty + y] =
10278 default_grid_button[y][1][x];
10281 si->touch.grid_initialized = video.initialized;
10283 si->editor.el_boulderdash = TRUE;
10284 si->editor.el_emerald_mine = TRUE;
10285 si->editor.el_emerald_mine_club = TRUE;
10286 si->editor.el_more = TRUE;
10287 si->editor.el_sokoban = TRUE;
10288 si->editor.el_supaplex = TRUE;
10289 si->editor.el_diamond_caves = TRUE;
10290 si->editor.el_dx_boulderdash = TRUE;
10292 si->editor.el_mirror_magic = TRUE;
10293 si->editor.el_deflektor = TRUE;
10295 si->editor.el_chars = TRUE;
10296 si->editor.el_steel_chars = TRUE;
10298 si->editor.el_classic = TRUE;
10299 si->editor.el_custom = TRUE;
10301 si->editor.el_user_defined = FALSE;
10302 si->editor.el_dynamic = TRUE;
10304 si->editor.el_headlines = TRUE;
10306 si->editor.show_element_token = FALSE;
10308 si->editor.show_read_only_warning = TRUE;
10310 si->editor.use_template_for_new_levels = TRUE;
10312 si->shortcut.save_game = DEFAULT_KEY_SAVE_GAME;
10313 si->shortcut.load_game = DEFAULT_KEY_LOAD_GAME;
10314 si->shortcut.toggle_pause = DEFAULT_KEY_TOGGLE_PAUSE;
10316 si->shortcut.focus_player[0] = DEFAULT_KEY_FOCUS_PLAYER_1;
10317 si->shortcut.focus_player[1] = DEFAULT_KEY_FOCUS_PLAYER_2;
10318 si->shortcut.focus_player[2] = DEFAULT_KEY_FOCUS_PLAYER_3;
10319 si->shortcut.focus_player[3] = DEFAULT_KEY_FOCUS_PLAYER_4;
10320 si->shortcut.focus_player_all = DEFAULT_KEY_FOCUS_PLAYER_ALL;
10322 si->shortcut.tape_eject = DEFAULT_KEY_TAPE_EJECT;
10323 si->shortcut.tape_extra = DEFAULT_KEY_TAPE_EXTRA;
10324 si->shortcut.tape_stop = DEFAULT_KEY_TAPE_STOP;
10325 si->shortcut.tape_pause = DEFAULT_KEY_TAPE_PAUSE;
10326 si->shortcut.tape_record = DEFAULT_KEY_TAPE_RECORD;
10327 si->shortcut.tape_play = DEFAULT_KEY_TAPE_PLAY;
10329 si->shortcut.sound_simple = DEFAULT_KEY_SOUND_SIMPLE;
10330 si->shortcut.sound_loops = DEFAULT_KEY_SOUND_LOOPS;
10331 si->shortcut.sound_music = DEFAULT_KEY_SOUND_MUSIC;
10333 si->shortcut.snap_left = DEFAULT_KEY_SNAP_LEFT;
10334 si->shortcut.snap_right = DEFAULT_KEY_SNAP_RIGHT;
10335 si->shortcut.snap_up = DEFAULT_KEY_SNAP_UP;
10336 si->shortcut.snap_down = DEFAULT_KEY_SNAP_DOWN;
10338 for (i = 0; i < MAX_PLAYERS; i++)
10340 si->input[i].use_joystick = FALSE;
10341 si->input[i].joy.device_name=getStringCopy(getDeviceNameFromJoystickNr(i));
10342 si->input[i].joy.xleft = JOYSTICK_XLEFT;
10343 si->input[i].joy.xmiddle = JOYSTICK_XMIDDLE;
10344 si->input[i].joy.xright = JOYSTICK_XRIGHT;
10345 si->input[i].joy.yupper = JOYSTICK_YUPPER;
10346 si->input[i].joy.ymiddle = JOYSTICK_YMIDDLE;
10347 si->input[i].joy.ylower = JOYSTICK_YLOWER;
10348 si->input[i].joy.snap = (i == 0 ? JOY_BUTTON_1 : 0);
10349 si->input[i].joy.drop = (i == 0 ? JOY_BUTTON_2 : 0);
10350 si->input[i].key.left = (i == 0 ? DEFAULT_KEY_LEFT : KSYM_UNDEFINED);
10351 si->input[i].key.right = (i == 0 ? DEFAULT_KEY_RIGHT : KSYM_UNDEFINED);
10352 si->input[i].key.up = (i == 0 ? DEFAULT_KEY_UP : KSYM_UNDEFINED);
10353 si->input[i].key.down = (i == 0 ? DEFAULT_KEY_DOWN : KSYM_UNDEFINED);
10354 si->input[i].key.snap = (i == 0 ? DEFAULT_KEY_SNAP : KSYM_UNDEFINED);
10355 si->input[i].key.drop = (i == 0 ? DEFAULT_KEY_DROP : KSYM_UNDEFINED);
10358 si->system.sdl_renderdriver = getStringCopy(ARG_DEFAULT);
10359 si->system.sdl_videodriver = getStringCopy(ARG_DEFAULT);
10360 si->system.sdl_audiodriver = getStringCopy(ARG_DEFAULT);
10361 si->system.audio_fragment_size = DEFAULT_AUDIO_FRAGMENT_SIZE;
10363 si->internal.program_title = getStringCopy(PROGRAM_TITLE_STRING);
10364 si->internal.program_version = getStringCopy(getProgramRealVersionString());
10365 si->internal.program_author = getStringCopy(PROGRAM_AUTHOR_STRING);
10366 si->internal.program_email = getStringCopy(PROGRAM_EMAIL_STRING);
10367 si->internal.program_website = getStringCopy(PROGRAM_WEBSITE_STRING);
10368 si->internal.program_copyright = getStringCopy(PROGRAM_COPYRIGHT_STRING);
10369 si->internal.program_company = getStringCopy(PROGRAM_COMPANY_STRING);
10371 si->internal.program_icon_file = getStringCopy(PROGRAM_ICON_FILENAME);
10373 si->internal.default_graphics_set = getStringCopy(GFX_CLASSIC_SUBDIR);
10374 si->internal.default_sounds_set = getStringCopy(SND_CLASSIC_SUBDIR);
10375 si->internal.default_music_set = getStringCopy(MUS_CLASSIC_SUBDIR);
10377 si->internal.fallback_graphics_file = getStringCopy(UNDEFINED_FILENAME);
10378 si->internal.fallback_sounds_file = getStringCopy(UNDEFINED_FILENAME);
10379 si->internal.fallback_music_file = getStringCopy(UNDEFINED_FILENAME);
10381 si->internal.default_level_series = getStringCopy(UNDEFINED_LEVELSET);
10382 si->internal.choose_from_top_leveldir = FALSE;
10383 si->internal.show_scaling_in_title = TRUE;
10384 si->internal.create_user_levelset = TRUE;
10386 si->internal.default_window_width = WIN_XSIZE_DEFAULT;
10387 si->internal.default_window_height = WIN_YSIZE_DEFAULT;
10389 si->debug.frame_delay[0] = DEFAULT_FRAME_DELAY_0;
10390 si->debug.frame_delay[1] = DEFAULT_FRAME_DELAY_1;
10391 si->debug.frame_delay[2] = DEFAULT_FRAME_DELAY_2;
10392 si->debug.frame_delay[3] = DEFAULT_FRAME_DELAY_3;
10393 si->debug.frame_delay[4] = DEFAULT_FRAME_DELAY_4;
10394 si->debug.frame_delay[5] = DEFAULT_FRAME_DELAY_5;
10395 si->debug.frame_delay[6] = DEFAULT_FRAME_DELAY_6;
10396 si->debug.frame_delay[7] = DEFAULT_FRAME_DELAY_7;
10397 si->debug.frame_delay[8] = DEFAULT_FRAME_DELAY_8;
10398 si->debug.frame_delay[9] = DEFAULT_FRAME_DELAY_9;
10400 si->debug.frame_delay_key[0] = DEFAULT_KEY_FRAME_DELAY_0;
10401 si->debug.frame_delay_key[1] = DEFAULT_KEY_FRAME_DELAY_1;
10402 si->debug.frame_delay_key[2] = DEFAULT_KEY_FRAME_DELAY_2;
10403 si->debug.frame_delay_key[3] = DEFAULT_KEY_FRAME_DELAY_3;
10404 si->debug.frame_delay_key[4] = DEFAULT_KEY_FRAME_DELAY_4;
10405 si->debug.frame_delay_key[5] = DEFAULT_KEY_FRAME_DELAY_5;
10406 si->debug.frame_delay_key[6] = DEFAULT_KEY_FRAME_DELAY_6;
10407 si->debug.frame_delay_key[7] = DEFAULT_KEY_FRAME_DELAY_7;
10408 si->debug.frame_delay_key[8] = DEFAULT_KEY_FRAME_DELAY_8;
10409 si->debug.frame_delay_key[9] = DEFAULT_KEY_FRAME_DELAY_9;
10411 si->debug.frame_delay_use_mod_key = DEFAULT_FRAME_DELAY_USE_MOD_KEY;
10412 si->debug.frame_delay_game_only = DEFAULT_FRAME_DELAY_GAME_ONLY;
10414 si->debug.show_frames_per_second = FALSE;
10416 si->debug.xsn_mode = AUTO;
10417 si->debug.xsn_percent = 0;
10419 si->options.verbose = FALSE;
10421 #if defined(PLATFORM_ANDROID)
10422 si->fullscreen = TRUE;
10425 setHideSetupEntry(&setup.debug.xsn_mode);
10428 static void setSetupInfoToDefaults_AutoSetup(struct SetupInfo *si)
10430 si->auto_setup.editor_zoom_tilesize = MINI_TILESIZE;
10433 static void setSetupInfoToDefaults_EditorCascade(struct SetupInfo *si)
10435 si->editor_cascade.el_bd = TRUE;
10436 si->editor_cascade.el_em = TRUE;
10437 si->editor_cascade.el_emc = TRUE;
10438 si->editor_cascade.el_rnd = TRUE;
10439 si->editor_cascade.el_sb = TRUE;
10440 si->editor_cascade.el_sp = TRUE;
10441 si->editor_cascade.el_dc = TRUE;
10442 si->editor_cascade.el_dx = TRUE;
10444 si->editor_cascade.el_mm = TRUE;
10445 si->editor_cascade.el_df = TRUE;
10447 si->editor_cascade.el_chars = FALSE;
10448 si->editor_cascade.el_steel_chars = FALSE;
10449 si->editor_cascade.el_ce = FALSE;
10450 si->editor_cascade.el_ge = FALSE;
10451 si->editor_cascade.el_ref = FALSE;
10452 si->editor_cascade.el_user = FALSE;
10453 si->editor_cascade.el_dynamic = FALSE;
10456 #define MAX_HIDE_SETUP_TOKEN_SIZE 20
10458 static char *getHideSetupToken(void *setup_value)
10460 static char hide_setup_token[MAX_HIDE_SETUP_TOKEN_SIZE];
10462 if (setup_value != NULL)
10463 snprintf(hide_setup_token, MAX_HIDE_SETUP_TOKEN_SIZE, "%p", setup_value);
10465 return hide_setup_token;
10468 void setHideSetupEntry(void *setup_value)
10470 char *hide_setup_token = getHideSetupToken(setup_value);
10472 if (hide_setup_hash == NULL)
10473 hide_setup_hash = newSetupFileHash();
10475 if (setup_value != NULL)
10476 setHashEntry(hide_setup_hash, hide_setup_token, "");
10479 void removeHideSetupEntry(void *setup_value)
10481 char *hide_setup_token = getHideSetupToken(setup_value);
10483 if (setup_value != NULL)
10484 removeHashEntry(hide_setup_hash, hide_setup_token);
10487 boolean hideSetupEntry(void *setup_value)
10489 char *hide_setup_token = getHideSetupToken(setup_value);
10491 return (setup_value != NULL &&
10492 getHashEntry(hide_setup_hash, hide_setup_token) != NULL);
10495 static void setSetupInfoFromTokenText(SetupFileHash *setup_file_hash,
10496 struct TokenInfo *token_info,
10497 int token_nr, char *token_text)
10499 char *token_hide_text = getStringCat2(token_text, ".hide");
10500 char *token_hide_value = getHashEntry(setup_file_hash, token_hide_text);
10502 // set the value of this setup option in the setup option structure
10503 setSetupInfo(token_info, token_nr, getHashEntry(setup_file_hash, token_text));
10505 // check if this setup option should be hidden in the setup menu
10506 if (token_hide_value != NULL && get_boolean_from_string(token_hide_value))
10507 setHideSetupEntry(token_info[token_nr].value);
10509 free(token_hide_text);
10512 static void setSetupInfoFromTokenInfo(SetupFileHash *setup_file_hash,
10513 struct TokenInfo *token_info,
10516 setSetupInfoFromTokenText(setup_file_hash, token_info, token_nr,
10517 token_info[token_nr].text);
10520 static void decodeSetupFileHash(SetupFileHash *setup_file_hash)
10524 if (!setup_file_hash)
10527 for (i = 0; i < ARRAY_SIZE(global_setup_tokens); i++)
10528 setSetupInfoFromTokenInfo(setup_file_hash, global_setup_tokens, i);
10530 setup.touch.grid_initialized = TRUE;
10531 for (i = 0; i < 2; i++)
10533 int grid_xsize = setup.touch.grid_xsize[i];
10534 int grid_ysize = setup.touch.grid_ysize[i];
10537 // if virtual buttons are not loaded from setup file, repeat initializing
10538 // virtual buttons grid with default values later when video is initialized
10539 if (grid_xsize == -1 ||
10542 setup.touch.grid_initialized = FALSE;
10547 for (y = 0; y < grid_ysize; y++)
10549 char token_string[MAX_LINE_LEN];
10551 sprintf(token_string, "touch.virtual_buttons.%d.%02d", i, y);
10553 char *value_string = getHashEntry(setup_file_hash, token_string);
10555 if (value_string == NULL)
10558 for (x = 0; x < grid_xsize; x++)
10560 char c = value_string[x];
10562 setup.touch.grid_button[i][x][y] =
10563 (c == '.' ? CHAR_GRID_BUTTON_NONE : c);
10568 for (i = 0; i < ARRAY_SIZE(editor_setup_tokens); i++)
10569 setSetupInfoFromTokenInfo(setup_file_hash, editor_setup_tokens, i);
10571 for (i = 0; i < ARRAY_SIZE(shortcut_setup_tokens); i++)
10572 setSetupInfoFromTokenInfo(setup_file_hash, shortcut_setup_tokens, i);
10574 for (pnr = 0; pnr < MAX_PLAYERS; pnr++)
10578 sprintf(prefix, "%s%d", TOKEN_STR_PLAYER_PREFIX, pnr + 1);
10580 setup_input = setup.input[pnr];
10581 for (i = 0; i < ARRAY_SIZE(player_setup_tokens); i++)
10583 char full_token[100];
10585 sprintf(full_token, "%s%s", prefix, player_setup_tokens[i].text);
10586 setSetupInfoFromTokenText(setup_file_hash, player_setup_tokens, i,
10589 setup.input[pnr] = setup_input;
10592 for (i = 0; i < ARRAY_SIZE(system_setup_tokens); i++)
10593 setSetupInfoFromTokenInfo(setup_file_hash, system_setup_tokens, i);
10595 for (i = 0; i < ARRAY_SIZE(internal_setup_tokens); i++)
10596 setSetupInfoFromTokenInfo(setup_file_hash, internal_setup_tokens, i);
10598 for (i = 0; i < ARRAY_SIZE(debug_setup_tokens); i++)
10599 setSetupInfoFromTokenInfo(setup_file_hash, debug_setup_tokens, i);
10601 for (i = 0; i < ARRAY_SIZE(options_setup_tokens); i++)
10602 setSetupInfoFromTokenInfo(setup_file_hash, options_setup_tokens, i);
10604 setHideRelatedSetupEntries();
10607 static void decodeSetupFileHash_AutoSetup(SetupFileHash *setup_file_hash)
10611 if (!setup_file_hash)
10614 for (i = 0; i < ARRAY_SIZE(auto_setup_tokens); i++)
10615 setSetupInfo(auto_setup_tokens, i,
10616 getHashEntry(setup_file_hash,
10617 auto_setup_tokens[i].text));
10620 static void decodeSetupFileHash_EditorCascade(SetupFileHash *setup_file_hash)
10624 if (!setup_file_hash)
10627 for (i = 0; i < ARRAY_SIZE(editor_cascade_setup_tokens); i++)
10628 setSetupInfo(editor_cascade_setup_tokens, i,
10629 getHashEntry(setup_file_hash,
10630 editor_cascade_setup_tokens[i].text));
10633 void LoadUserNames(void)
10635 int last_user_nr = user.nr;
10638 if (global.user_names != NULL)
10640 for (i = 0; i < MAX_PLAYER_NAMES; i++)
10641 checked_free(global.user_names[i]);
10643 checked_free(global.user_names);
10646 global.user_names = checked_calloc(MAX_PLAYER_NAMES * sizeof(char *));
10648 for (i = 0; i < MAX_PLAYER_NAMES; i++)
10652 SetupFileHash *setup_file_hash = loadSetupFileHash(getSetupFilename());
10654 if (setup_file_hash)
10656 char *player_name = getHashEntry(setup_file_hash, "player_name");
10658 global.user_names[i] = getFixedUserName(player_name);
10660 freeSetupFileHash(setup_file_hash);
10663 if (global.user_names[i] == NULL)
10664 global.user_names[i] = getStringCopy(getDefaultUserName(i));
10667 user.nr = last_user_nr;
10670 void LoadSetupFromFilename(char *filename)
10672 SetupFileHash *setup_file_hash = loadSetupFileHash(filename);
10674 if (setup_file_hash)
10676 decodeSetupFileHash(setup_file_hash);
10678 freeSetupFileHash(setup_file_hash);
10682 Debug("setup", "using default setup values");
10686 static void LoadSetup_SpecialPostProcessing(void)
10688 char *player_name_new;
10690 // needed to work around problems with fixed length strings
10691 player_name_new = getFixedUserName(setup.player_name);
10692 free(setup.player_name);
10693 setup.player_name = player_name_new;
10695 // "scroll_delay: on(3) / off(0)" was replaced by scroll delay value
10696 if (setup.scroll_delay == FALSE)
10698 setup.scroll_delay_value = MIN_SCROLL_DELAY;
10699 setup.scroll_delay = TRUE; // now always "on"
10702 // make sure that scroll delay value stays inside valid range
10703 setup.scroll_delay_value =
10704 MIN(MAX(MIN_SCROLL_DELAY, setup.scroll_delay_value), MAX_SCROLL_DELAY);
10707 void LoadSetup(void)
10711 // always start with reliable default values
10712 setSetupInfoToDefaults(&setup);
10714 // try to load setup values from default setup file
10715 filename = getDefaultSetupFilename();
10717 if (fileExists(filename))
10718 LoadSetupFromFilename(filename);
10720 // try to load setup values from user setup file
10721 filename = getSetupFilename();
10723 LoadSetupFromFilename(filename);
10725 LoadSetup_SpecialPostProcessing();
10728 void LoadSetup_AutoSetup(void)
10730 char *filename = getPath2(getSetupDir(), AUTOSETUP_FILENAME);
10731 SetupFileHash *setup_file_hash = NULL;
10733 // always start with reliable default values
10734 setSetupInfoToDefaults_AutoSetup(&setup);
10736 setup_file_hash = loadSetupFileHash(filename);
10738 if (setup_file_hash)
10740 decodeSetupFileHash_AutoSetup(setup_file_hash);
10742 freeSetupFileHash(setup_file_hash);
10748 void LoadSetup_EditorCascade(void)
10750 char *filename = getPath2(getSetupDir(), EDITORCASCADE_FILENAME);
10751 SetupFileHash *setup_file_hash = NULL;
10753 // always start with reliable default values
10754 setSetupInfoToDefaults_EditorCascade(&setup);
10756 setup_file_hash = loadSetupFileHash(filename);
10758 if (setup_file_hash)
10760 decodeSetupFileHash_EditorCascade(setup_file_hash);
10762 freeSetupFileHash(setup_file_hash);
10768 static void addGameControllerMappingToHash(SetupFileHash *mappings_hash,
10769 char *mapping_line)
10771 char mapping_guid[MAX_LINE_LEN];
10772 char *mapping_start, *mapping_end;
10774 // get GUID from game controller mapping line: copy complete line
10775 strncpy(mapping_guid, mapping_line, MAX_LINE_LEN - 1);
10776 mapping_guid[MAX_LINE_LEN - 1] = '\0';
10778 // get GUID from game controller mapping line: cut after GUID part
10779 mapping_start = strchr(mapping_guid, ',');
10780 if (mapping_start != NULL)
10781 *mapping_start = '\0';
10783 // cut newline from game controller mapping line
10784 mapping_end = strchr(mapping_line, '\n');
10785 if (mapping_end != NULL)
10786 *mapping_end = '\0';
10788 // add mapping entry to game controller mappings hash
10789 setHashEntry(mappings_hash, mapping_guid, mapping_line);
10792 static void LoadSetup_ReadGameControllerMappings(SetupFileHash *mappings_hash,
10797 if (!(file = fopen(filename, MODE_READ)))
10799 Warn("cannot read game controller mappings file '%s'", filename);
10804 while (!feof(file))
10806 char line[MAX_LINE_LEN];
10808 if (!fgets(line, MAX_LINE_LEN, file))
10811 addGameControllerMappingToHash(mappings_hash, line);
10817 void SaveSetup(void)
10819 char *filename = getSetupFilename();
10823 InitUserDataDirectory();
10825 if (!(file = fopen(filename, MODE_WRITE)))
10827 Warn("cannot write setup file '%s'", filename);
10832 fprintFileHeader(file, SETUP_FILENAME);
10834 for (i = 0; i < ARRAY_SIZE(global_setup_tokens); i++)
10836 // just to make things nicer :)
10837 if (global_setup_tokens[i].value == &setup.multiple_users ||
10838 global_setup_tokens[i].value == &setup.sound ||
10839 global_setup_tokens[i].value == &setup.graphics_set ||
10840 global_setup_tokens[i].value == &setup.volume_simple ||
10841 global_setup_tokens[i].value == &setup.network_mode ||
10842 global_setup_tokens[i].value == &setup.api_server ||
10843 global_setup_tokens[i].value == &setup.touch.control_type ||
10844 global_setup_tokens[i].value == &setup.touch.grid_xsize[0] ||
10845 global_setup_tokens[i].value == &setup.touch.grid_xsize[1])
10846 fprintf(file, "\n");
10848 fprintf(file, "%s\n", getSetupLine(global_setup_tokens, "", i));
10851 for (i = 0; i < 2; i++)
10853 int grid_xsize = setup.touch.grid_xsize[i];
10854 int grid_ysize = setup.touch.grid_ysize[i];
10857 fprintf(file, "\n");
10859 for (y = 0; y < grid_ysize; y++)
10861 char token_string[MAX_LINE_LEN];
10862 char value_string[MAX_LINE_LEN];
10864 sprintf(token_string, "touch.virtual_buttons.%d.%02d", i, y);
10866 for (x = 0; x < grid_xsize; x++)
10868 char c = setup.touch.grid_button[i][x][y];
10870 value_string[x] = (c == CHAR_GRID_BUTTON_NONE ? '.' : c);
10873 value_string[grid_xsize] = '\0';
10875 fprintf(file, "%s\n", getFormattedSetupEntry(token_string, value_string));
10879 fprintf(file, "\n");
10880 for (i = 0; i < ARRAY_SIZE(editor_setup_tokens); i++)
10881 fprintf(file, "%s\n", getSetupLine(editor_setup_tokens, "", i));
10883 fprintf(file, "\n");
10884 for (i = 0; i < ARRAY_SIZE(shortcut_setup_tokens); i++)
10885 fprintf(file, "%s\n", getSetupLine(shortcut_setup_tokens, "", i));
10887 for (pnr = 0; pnr < MAX_PLAYERS; pnr++)
10891 sprintf(prefix, "%s%d", TOKEN_STR_PLAYER_PREFIX, pnr + 1);
10892 fprintf(file, "\n");
10894 setup_input = setup.input[pnr];
10895 for (i = 0; i < ARRAY_SIZE(player_setup_tokens); i++)
10896 fprintf(file, "%s\n", getSetupLine(player_setup_tokens, prefix, i));
10899 fprintf(file, "\n");
10900 for (i = 0; i < ARRAY_SIZE(system_setup_tokens); i++)
10901 fprintf(file, "%s\n", getSetupLine(system_setup_tokens, "", i));
10903 // (internal setup values not saved to user setup file)
10905 fprintf(file, "\n");
10906 for (i = 0; i < ARRAY_SIZE(debug_setup_tokens); i++)
10907 if (!strPrefix(debug_setup_tokens[i].text, "debug.xsn_") ||
10908 setup.debug.xsn_mode != AUTO)
10909 fprintf(file, "%s\n", getSetupLine(debug_setup_tokens, "", i));
10911 fprintf(file, "\n");
10912 for (i = 0; i < ARRAY_SIZE(options_setup_tokens); i++)
10913 fprintf(file, "%s\n", getSetupLine(options_setup_tokens, "", i));
10917 SetFilePermissions(filename, PERMS_PRIVATE);
10920 void SaveSetup_AutoSetup(void)
10922 char *filename = getPath2(getSetupDir(), AUTOSETUP_FILENAME);
10926 InitUserDataDirectory();
10928 if (!(file = fopen(filename, MODE_WRITE)))
10930 Warn("cannot write auto setup file '%s'", filename);
10937 fprintFileHeader(file, AUTOSETUP_FILENAME);
10939 for (i = 0; i < ARRAY_SIZE(auto_setup_tokens); i++)
10940 fprintf(file, "%s\n", getSetupLine(auto_setup_tokens, "", i));
10944 SetFilePermissions(filename, PERMS_PRIVATE);
10949 void SaveSetup_EditorCascade(void)
10951 char *filename = getPath2(getSetupDir(), EDITORCASCADE_FILENAME);
10955 InitUserDataDirectory();
10957 if (!(file = fopen(filename, MODE_WRITE)))
10959 Warn("cannot write editor cascade state file '%s'", filename);
10966 fprintFileHeader(file, EDITORCASCADE_FILENAME);
10968 for (i = 0; i < ARRAY_SIZE(editor_cascade_setup_tokens); i++)
10969 fprintf(file, "%s\n", getSetupLine(editor_cascade_setup_tokens, "", i));
10973 SetFilePermissions(filename, PERMS_PRIVATE);
10978 static void SaveSetup_WriteGameControllerMappings(SetupFileHash *mappings_hash,
10983 if (!(file = fopen(filename, MODE_WRITE)))
10985 Warn("cannot write game controller mappings file '%s'", filename);
10990 BEGIN_HASH_ITERATION(mappings_hash, itr)
10992 fprintf(file, "%s\n", HASH_ITERATION_VALUE(itr));
10994 END_HASH_ITERATION(mappings_hash, itr)
10999 void SaveSetup_AddGameControllerMapping(char *mapping)
11001 char *filename = getPath2(getSetupDir(), GAMECONTROLLER_BASENAME);
11002 SetupFileHash *mappings_hash = newSetupFileHash();
11004 InitUserDataDirectory();
11006 // load existing personal game controller mappings
11007 LoadSetup_ReadGameControllerMappings(mappings_hash, filename);
11009 // add new mapping to personal game controller mappings
11010 addGameControllerMappingToHash(mappings_hash, mapping);
11012 // save updated personal game controller mappings
11013 SaveSetup_WriteGameControllerMappings(mappings_hash, filename);
11015 freeSetupFileHash(mappings_hash);
11019 void LoadCustomElementDescriptions(void)
11021 char *filename = getCustomArtworkConfigFilename(ARTWORK_TYPE_GRAPHICS);
11022 SetupFileHash *setup_file_hash;
11025 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
11027 if (element_info[i].custom_description != NULL)
11029 free(element_info[i].custom_description);
11030 element_info[i].custom_description = NULL;
11034 if ((setup_file_hash = loadSetupFileHash(filename)) == NULL)
11037 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
11039 char *token = getStringCat2(element_info[i].token_name, ".name");
11040 char *value = getHashEntry(setup_file_hash, token);
11043 element_info[i].custom_description = getStringCopy(value);
11048 freeSetupFileHash(setup_file_hash);
11051 static int getElementFromToken(char *token)
11053 char *value = getHashEntry(element_token_hash, token);
11056 return atoi(value);
11058 Warn("unknown element token '%s'", token);
11060 return EL_UNDEFINED;
11063 void FreeGlobalAnimEventInfo(void)
11065 struct GlobalAnimEventInfo *gaei = &global_anim_event_info;
11067 if (gaei->event_list == NULL)
11072 for (i = 0; i < gaei->num_event_lists; i++)
11074 checked_free(gaei->event_list[i]->event_value);
11075 checked_free(gaei->event_list[i]);
11078 checked_free(gaei->event_list);
11080 gaei->event_list = NULL;
11081 gaei->num_event_lists = 0;
11084 static int AddGlobalAnimEventList(void)
11086 struct GlobalAnimEventInfo *gaei = &global_anim_event_info;
11087 int list_pos = gaei->num_event_lists++;
11089 gaei->event_list = checked_realloc(gaei->event_list, gaei->num_event_lists *
11090 sizeof(struct GlobalAnimEventListInfo *));
11092 gaei->event_list[list_pos] =
11093 checked_calloc(sizeof(struct GlobalAnimEventListInfo));
11095 struct GlobalAnimEventListInfo *gaeli = gaei->event_list[list_pos];
11097 gaeli->event_value = NULL;
11098 gaeli->num_event_values = 0;
11103 static int AddGlobalAnimEventValue(int list_pos, int event_value)
11105 // do not add empty global animation events
11106 if (event_value == ANIM_EVENT_NONE)
11109 // if list position is undefined, create new list
11110 if (list_pos == ANIM_EVENT_UNDEFINED)
11111 list_pos = AddGlobalAnimEventList();
11113 struct GlobalAnimEventInfo *gaei = &global_anim_event_info;
11114 struct GlobalAnimEventListInfo *gaeli = gaei->event_list[list_pos];
11115 int value_pos = gaeli->num_event_values++;
11117 gaeli->event_value = checked_realloc(gaeli->event_value,
11118 gaeli->num_event_values * sizeof(int *));
11120 gaeli->event_value[value_pos] = event_value;
11125 int GetGlobalAnimEventValue(int list_pos, int value_pos)
11127 if (list_pos == ANIM_EVENT_UNDEFINED)
11128 return ANIM_EVENT_NONE;
11130 struct GlobalAnimEventInfo *gaei = &global_anim_event_info;
11131 struct GlobalAnimEventListInfo *gaeli = gaei->event_list[list_pos];
11133 return gaeli->event_value[value_pos];
11136 int GetGlobalAnimEventValueCount(int list_pos)
11138 if (list_pos == ANIM_EVENT_UNDEFINED)
11141 struct GlobalAnimEventInfo *gaei = &global_anim_event_info;
11142 struct GlobalAnimEventListInfo *gaeli = gaei->event_list[list_pos];
11144 return gaeli->num_event_values;
11147 // This function checks if a string <s> of the format "string1, string2, ..."
11148 // exactly contains a string <s_contained>.
11150 static boolean string_has_parameter(char *s, char *s_contained)
11154 if (s == NULL || s_contained == NULL)
11157 if (strlen(s_contained) > strlen(s))
11160 if (strncmp(s, s_contained, strlen(s_contained)) == 0)
11162 char next_char = s[strlen(s_contained)];
11164 // check if next character is delimiter or whitespace
11165 return (next_char == ',' || next_char == '\0' ||
11166 next_char == ' ' || next_char == '\t' ? TRUE : FALSE);
11169 // check if string contains another parameter string after a comma
11170 substring = strchr(s, ',');
11171 if (substring == NULL) // string does not contain a comma
11174 // advance string pointer to next character after the comma
11177 // skip potential whitespaces after the comma
11178 while (*substring == ' ' || *substring == '\t')
11181 return string_has_parameter(substring, s_contained);
11184 static int get_anim_parameter_value(char *s)
11186 int event_value[] =
11194 char *pattern_1[] =
11202 char *pattern_2 = ".part_";
11203 char *matching_char = NULL;
11205 int pattern_1_len = 0;
11206 int result = ANIM_EVENT_NONE;
11209 for (i = 0; i < ARRAY_SIZE(event_value); i++)
11211 matching_char = strstr(s_ptr, pattern_1[i]);
11212 pattern_1_len = strlen(pattern_1[i]);
11213 result = event_value[i];
11215 if (matching_char != NULL)
11219 if (matching_char == NULL)
11220 return ANIM_EVENT_NONE;
11222 s_ptr = matching_char + pattern_1_len;
11224 // check for main animation number ("anim_X" or "anim_XX")
11225 if (*s_ptr >= '0' && *s_ptr <= '9')
11227 int gic_anim_nr = (*s_ptr++ - '0');
11229 if (*s_ptr >= '0' && *s_ptr <= '9')
11230 gic_anim_nr = 10 * gic_anim_nr + (*s_ptr++ - '0');
11232 if (gic_anim_nr < 1 || gic_anim_nr > MAX_GLOBAL_ANIMS)
11233 return ANIM_EVENT_NONE;
11235 result |= gic_anim_nr << ANIM_EVENT_ANIM_BIT;
11239 // invalid main animation number specified
11241 return ANIM_EVENT_NONE;
11244 // check for animation part number ("part_X" or "part_XX") (optional)
11245 if (strPrefix(s_ptr, pattern_2))
11247 s_ptr += strlen(pattern_2);
11249 if (*s_ptr >= '0' && *s_ptr <= '9')
11251 int gic_part_nr = (*s_ptr++ - '0');
11253 if (*s_ptr >= '0' && *s_ptr <= '9')
11254 gic_part_nr = 10 * gic_part_nr + (*s_ptr++ - '0');
11256 if (gic_part_nr < 1 || gic_part_nr > MAX_GLOBAL_ANIM_PARTS)
11257 return ANIM_EVENT_NONE;
11259 result |= gic_part_nr << ANIM_EVENT_PART_BIT;
11263 // invalid animation part number specified
11265 return ANIM_EVENT_NONE;
11269 // discard result if next character is neither delimiter nor whitespace
11270 if (!(*s_ptr == ',' || *s_ptr == '\0' ||
11271 *s_ptr == ' ' || *s_ptr == '\t'))
11272 return ANIM_EVENT_NONE;
11277 static int get_anim_parameter_values(char *s)
11279 int list_pos = ANIM_EVENT_UNDEFINED;
11280 int event_value = ANIM_EVENT_DEFAULT;
11282 if (string_has_parameter(s, "any"))
11283 event_value |= ANIM_EVENT_ANY;
11285 if (string_has_parameter(s, "click:self") ||
11286 string_has_parameter(s, "click") ||
11287 string_has_parameter(s, "self"))
11288 event_value |= ANIM_EVENT_SELF;
11290 if (string_has_parameter(s, "unclick:any"))
11291 event_value |= ANIM_EVENT_UNCLICK_ANY;
11293 // if animation event found, add it to global animation event list
11294 if (event_value != ANIM_EVENT_NONE)
11295 list_pos = AddGlobalAnimEventValue(list_pos, event_value);
11299 // add optional "click:anim_X" or "click:anim_X.part_X" parameter
11300 event_value = get_anim_parameter_value(s);
11302 // if animation event found, add it to global animation event list
11303 if (event_value != ANIM_EVENT_NONE)
11304 list_pos = AddGlobalAnimEventValue(list_pos, event_value);
11306 // continue with next part of the string, starting with next comma
11307 s = strchr(s + 1, ',');
11313 static int get_anim_action_parameter_value(char *token)
11315 // check most common default case first to massively speed things up
11316 if (strEqual(token, ARG_UNDEFINED))
11317 return ANIM_EVENT_ACTION_NONE;
11319 int result = getImageIDFromToken(token);
11323 char *gfx_token = getStringCat2("gfx.", token);
11325 result = getImageIDFromToken(gfx_token);
11327 checked_free(gfx_token);
11332 Key key = getKeyFromX11KeyName(token);
11334 if (key != KSYM_UNDEFINED)
11335 result = -(int)key;
11339 result = ANIM_EVENT_ACTION_NONE;
11344 int get_parameter_value(char *value_raw, char *suffix, int type)
11346 char *value = getStringToLower(value_raw);
11347 int result = 0; // probably a save default value
11349 if (strEqual(suffix, ".direction"))
11351 result = (strEqual(value, "left") ? MV_LEFT :
11352 strEqual(value, "right") ? MV_RIGHT :
11353 strEqual(value, "up") ? MV_UP :
11354 strEqual(value, "down") ? MV_DOWN : MV_NONE);
11356 else if (strEqual(suffix, ".position"))
11358 result = (strEqual(value, "left") ? POS_LEFT :
11359 strEqual(value, "right") ? POS_RIGHT :
11360 strEqual(value, "top") ? POS_TOP :
11361 strEqual(value, "upper") ? POS_UPPER :
11362 strEqual(value, "middle") ? POS_MIDDLE :
11363 strEqual(value, "lower") ? POS_LOWER :
11364 strEqual(value, "bottom") ? POS_BOTTOM :
11365 strEqual(value, "any") ? POS_ANY :
11366 strEqual(value, "last") ? POS_LAST : POS_UNDEFINED);
11368 else if (strEqual(suffix, ".align"))
11370 result = (strEqual(value, "left") ? ALIGN_LEFT :
11371 strEqual(value, "right") ? ALIGN_RIGHT :
11372 strEqual(value, "center") ? ALIGN_CENTER :
11373 strEqual(value, "middle") ? ALIGN_CENTER : ALIGN_DEFAULT);
11375 else if (strEqual(suffix, ".valign"))
11377 result = (strEqual(value, "top") ? VALIGN_TOP :
11378 strEqual(value, "bottom") ? VALIGN_BOTTOM :
11379 strEqual(value, "middle") ? VALIGN_MIDDLE :
11380 strEqual(value, "center") ? VALIGN_MIDDLE : VALIGN_DEFAULT);
11382 else if (strEqual(suffix, ".anim_mode"))
11384 result = (string_has_parameter(value, "none") ? ANIM_NONE :
11385 string_has_parameter(value, "loop") ? ANIM_LOOP :
11386 string_has_parameter(value, "linear") ? ANIM_LINEAR :
11387 string_has_parameter(value, "pingpong") ? ANIM_PINGPONG :
11388 string_has_parameter(value, "pingpong2") ? ANIM_PINGPONG2 :
11389 string_has_parameter(value, "random") ? ANIM_RANDOM :
11390 string_has_parameter(value, "ce_value") ? ANIM_CE_VALUE :
11391 string_has_parameter(value, "ce_score") ? ANIM_CE_SCORE :
11392 string_has_parameter(value, "ce_delay") ? ANIM_CE_DELAY :
11393 string_has_parameter(value, "horizontal") ? ANIM_HORIZONTAL :
11394 string_has_parameter(value, "vertical") ? ANIM_VERTICAL :
11395 string_has_parameter(value, "centered") ? ANIM_CENTERED :
11396 string_has_parameter(value, "all") ? ANIM_ALL :
11399 if (string_has_parameter(value, "once"))
11400 result |= ANIM_ONCE;
11402 if (string_has_parameter(value, "reverse"))
11403 result |= ANIM_REVERSE;
11405 if (string_has_parameter(value, "opaque_player"))
11406 result |= ANIM_OPAQUE_PLAYER;
11408 if (string_has_parameter(value, "static_panel"))
11409 result |= ANIM_STATIC_PANEL;
11411 else if (strEqual(suffix, ".init_event") ||
11412 strEqual(suffix, ".anim_event"))
11414 result = get_anim_parameter_values(value);
11416 else if (strEqual(suffix, ".init_delay_action") ||
11417 strEqual(suffix, ".anim_delay_action") ||
11418 strEqual(suffix, ".post_delay_action") ||
11419 strEqual(suffix, ".init_event_action") ||
11420 strEqual(suffix, ".anim_event_action"))
11422 result = get_anim_action_parameter_value(value_raw);
11424 else if (strEqual(suffix, ".class"))
11426 result = (strEqual(value, ARG_UNDEFINED) ? ARG_UNDEFINED_VALUE :
11427 get_hash_from_key(value));
11429 else if (strEqual(suffix, ".style"))
11431 result = STYLE_DEFAULT;
11433 if (string_has_parameter(value, "accurate_borders"))
11434 result |= STYLE_ACCURATE_BORDERS;
11436 if (string_has_parameter(value, "inner_corners"))
11437 result |= STYLE_INNER_CORNERS;
11439 if (string_has_parameter(value, "reverse"))
11440 result |= STYLE_REVERSE;
11442 if (string_has_parameter(value, "leftmost_position"))
11443 result |= STYLE_LEFTMOST_POSITION;
11445 if (string_has_parameter(value, "block_clicks"))
11446 result |= STYLE_BLOCK;
11448 if (string_has_parameter(value, "passthrough_clicks"))
11449 result |= STYLE_PASSTHROUGH;
11451 if (string_has_parameter(value, "multiple_actions"))
11452 result |= STYLE_MULTIPLE_ACTIONS;
11454 else if (strEqual(suffix, ".fade_mode"))
11456 result = (string_has_parameter(value, "none") ? FADE_MODE_NONE :
11457 string_has_parameter(value, "fade") ? FADE_MODE_FADE :
11458 string_has_parameter(value, "crossfade") ? FADE_MODE_CROSSFADE :
11459 string_has_parameter(value, "melt") ? FADE_MODE_MELT :
11460 string_has_parameter(value, "curtain") ? FADE_MODE_CURTAIN :
11461 FADE_MODE_DEFAULT);
11463 else if (strEqual(suffix, ".auto_delay_unit"))
11465 result = (string_has_parameter(value, "ms") ? AUTO_DELAY_UNIT_MS :
11466 string_has_parameter(value, "frames") ? AUTO_DELAY_UNIT_FRAMES :
11467 AUTO_DELAY_UNIT_DEFAULT);
11469 else if (strPrefix(suffix, ".font")) // (may also be ".font_xyz")
11471 result = gfx.get_font_from_token_function(value);
11473 else // generic parameter of type integer or boolean
11475 result = (strEqual(value, ARG_UNDEFINED) ? ARG_UNDEFINED_VALUE :
11476 type == TYPE_INTEGER ? get_integer_from_string(value) :
11477 type == TYPE_BOOLEAN ? get_boolean_from_string(value) :
11478 ARG_UNDEFINED_VALUE);
11486 static int get_token_parameter_value(char *token, char *value_raw)
11490 if (token == NULL || value_raw == NULL)
11491 return ARG_UNDEFINED_VALUE;
11493 suffix = strrchr(token, '.');
11494 if (suffix == NULL)
11497 if (strEqual(suffix, ".element"))
11498 return getElementFromToken(value_raw);
11500 // !!! USE CORRECT VALUE TYPE (currently works also for TYPE_BOOLEAN) !!!
11501 return get_parameter_value(value_raw, suffix, TYPE_INTEGER);
11504 void InitMenuDesignSettings_Static(void)
11508 // always start with reliable default values from static default config
11509 for (i = 0; image_config_vars[i].token != NULL; i++)
11511 char *value = getHashEntry(image_config_hash, image_config_vars[i].token);
11514 *image_config_vars[i].value =
11515 get_token_parameter_value(image_config_vars[i].token, value);
11519 static void InitMenuDesignSettings_SpecialPreProcessing(void)
11523 // the following initializes hierarchical values from static configuration
11525 // special case: initialize "ARG_DEFAULT" values in static default config
11526 // (e.g., initialize "[titlemessage].fade_mode" from "[title].fade_mode")
11527 titlescreen_initial_first_default.fade_mode =
11528 title_initial_first_default.fade_mode;
11529 titlescreen_initial_first_default.fade_delay =
11530 title_initial_first_default.fade_delay;
11531 titlescreen_initial_first_default.post_delay =
11532 title_initial_first_default.post_delay;
11533 titlescreen_initial_first_default.auto_delay =
11534 title_initial_first_default.auto_delay;
11535 titlescreen_initial_first_default.auto_delay_unit =
11536 title_initial_first_default.auto_delay_unit;
11537 titlescreen_first_default.fade_mode = title_first_default.fade_mode;
11538 titlescreen_first_default.fade_delay = title_first_default.fade_delay;
11539 titlescreen_first_default.post_delay = title_first_default.post_delay;
11540 titlescreen_first_default.auto_delay = title_first_default.auto_delay;
11541 titlescreen_first_default.auto_delay_unit =
11542 title_first_default.auto_delay_unit;
11543 titlemessage_initial_first_default.fade_mode =
11544 title_initial_first_default.fade_mode;
11545 titlemessage_initial_first_default.fade_delay =
11546 title_initial_first_default.fade_delay;
11547 titlemessage_initial_first_default.post_delay =
11548 title_initial_first_default.post_delay;
11549 titlemessage_initial_first_default.auto_delay =
11550 title_initial_first_default.auto_delay;
11551 titlemessage_initial_first_default.auto_delay_unit =
11552 title_initial_first_default.auto_delay_unit;
11553 titlemessage_first_default.fade_mode = title_first_default.fade_mode;
11554 titlemessage_first_default.fade_delay = title_first_default.fade_delay;
11555 titlemessage_first_default.post_delay = title_first_default.post_delay;
11556 titlemessage_first_default.auto_delay = title_first_default.auto_delay;
11557 titlemessage_first_default.auto_delay_unit =
11558 title_first_default.auto_delay_unit;
11560 titlescreen_initial_default.fade_mode = title_initial_default.fade_mode;
11561 titlescreen_initial_default.fade_delay = title_initial_default.fade_delay;
11562 titlescreen_initial_default.post_delay = title_initial_default.post_delay;
11563 titlescreen_initial_default.auto_delay = title_initial_default.auto_delay;
11564 titlescreen_initial_default.auto_delay_unit =
11565 title_initial_default.auto_delay_unit;
11566 titlescreen_default.fade_mode = title_default.fade_mode;
11567 titlescreen_default.fade_delay = title_default.fade_delay;
11568 titlescreen_default.post_delay = title_default.post_delay;
11569 titlescreen_default.auto_delay = title_default.auto_delay;
11570 titlescreen_default.auto_delay_unit = title_default.auto_delay_unit;
11571 titlemessage_initial_default.fade_mode = title_initial_default.fade_mode;
11572 titlemessage_initial_default.fade_delay = title_initial_default.fade_delay;
11573 titlemessage_initial_default.post_delay = title_initial_default.post_delay;
11574 titlemessage_initial_default.auto_delay_unit =
11575 title_initial_default.auto_delay_unit;
11576 titlemessage_default.fade_mode = title_default.fade_mode;
11577 titlemessage_default.fade_delay = title_default.fade_delay;
11578 titlemessage_default.post_delay = title_default.post_delay;
11579 titlemessage_default.auto_delay = title_default.auto_delay;
11580 titlemessage_default.auto_delay_unit = title_default.auto_delay_unit;
11582 // special case: initialize "ARG_DEFAULT" values in static default config
11583 // (e.g., init "titlemessage_1.fade_mode" from "[titlemessage].fade_mode")
11584 for (i = 0; i < MAX_NUM_TITLE_MESSAGES; i++)
11586 titlescreen_initial_first[i] = titlescreen_initial_first_default;
11587 titlescreen_first[i] = titlescreen_first_default;
11588 titlemessage_initial_first[i] = titlemessage_initial_first_default;
11589 titlemessage_first[i] = titlemessage_first_default;
11591 titlescreen_initial[i] = titlescreen_initial_default;
11592 titlescreen[i] = titlescreen_default;
11593 titlemessage_initial[i] = titlemessage_initial_default;
11594 titlemessage[i] = titlemessage_default;
11597 // special case: initialize "ARG_DEFAULT" values in static default config
11598 // (eg, init "menu.enter_screen.SCORES.xyz" from "menu.enter_screen.xyz")
11599 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
11601 if (i == GFX_SPECIAL_ARG_TITLE) // title values already initialized
11604 menu.enter_screen[i] = menu.enter_screen[GFX_SPECIAL_ARG_DEFAULT];
11605 menu.leave_screen[i] = menu.leave_screen[GFX_SPECIAL_ARG_DEFAULT];
11606 menu.next_screen[i] = menu.next_screen[GFX_SPECIAL_ARG_DEFAULT];
11609 // special case: initialize "ARG_DEFAULT" values in static default config
11610 // (eg, init "viewport.door_1.MAIN.xyz" from "viewport.door_1.xyz")
11611 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
11613 viewport.window[i] = viewport.window[GFX_SPECIAL_ARG_DEFAULT];
11614 viewport.playfield[i] = viewport.playfield[GFX_SPECIAL_ARG_DEFAULT];
11615 viewport.door_1[i] = viewport.door_1[GFX_SPECIAL_ARG_DEFAULT];
11617 if (i == GFX_SPECIAL_ARG_EDITOR) // editor values already initialized
11620 viewport.door_2[i] = viewport.door_2[GFX_SPECIAL_ARG_DEFAULT];
11624 static void InitMenuDesignSettings_SpecialPostProcessing(void)
11628 struct XY *dst, *src;
11630 game_buttons_xy[] =
11632 { &game.button.save, &game.button.stop },
11633 { &game.button.pause2, &game.button.pause },
11634 { &game.button.load, &game.button.play },
11635 { &game.button.undo, &game.button.stop },
11636 { &game.button.redo, &game.button.play },
11642 // special case: initialize later added SETUP list size from LEVELS value
11643 if (menu.list_size[GAME_MODE_SETUP] == -1)
11644 menu.list_size[GAME_MODE_SETUP] = menu.list_size[GAME_MODE_LEVELS];
11646 // set default position for snapshot buttons to stop/pause/play buttons
11647 for (i = 0; game_buttons_xy[i].dst != NULL; i++)
11648 if ((*game_buttons_xy[i].dst).x == -1 &&
11649 (*game_buttons_xy[i].dst).y == -1)
11650 *game_buttons_xy[i].dst = *game_buttons_xy[i].src;
11652 // --------------------------------------------------------------------------
11653 // dynamic viewports (including playfield margins, borders and alignments)
11654 // --------------------------------------------------------------------------
11656 // dynamic viewports currently only supported for landscape mode
11657 int display_width = MAX(video.display_width, video.display_height);
11658 int display_height = MIN(video.display_width, video.display_height);
11660 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
11662 struct RectWithBorder *vp_window = &viewport.window[i];
11663 struct RectWithBorder *vp_playfield = &viewport.playfield[i];
11664 struct RectWithBorder *vp_door_1 = &viewport.door_1[i];
11665 struct RectWithBorder *vp_door_2 = &viewport.door_2[i];
11666 boolean dynamic_window_width = (vp_window->min_width != -1);
11667 boolean dynamic_window_height = (vp_window->min_height != -1);
11668 boolean dynamic_playfield_width = (vp_playfield->min_width != -1);
11669 boolean dynamic_playfield_height = (vp_playfield->min_height != -1);
11671 // adjust window size if min/max width/height is specified
11673 if (vp_window->min_width != -1)
11675 int window_width = display_width;
11677 // when using static window height, use aspect ratio of display
11678 if (vp_window->min_height == -1)
11679 window_width = vp_window->height * display_width / display_height;
11681 vp_window->width = MAX(vp_window->min_width, window_width);
11684 if (vp_window->min_height != -1)
11686 int window_height = display_height;
11688 // when using static window width, use aspect ratio of display
11689 if (vp_window->min_width == -1)
11690 window_height = vp_window->width * display_height / display_width;
11692 vp_window->height = MAX(vp_window->min_height, window_height);
11695 if (vp_window->max_width != -1)
11696 vp_window->width = MIN(vp_window->width, vp_window->max_width);
11698 if (vp_window->max_height != -1)
11699 vp_window->height = MIN(vp_window->height, vp_window->max_height);
11701 int playfield_width = vp_window->width;
11702 int playfield_height = vp_window->height;
11704 // adjust playfield size and position according to specified margins
11706 playfield_width -= vp_playfield->margin_left;
11707 playfield_width -= vp_playfield->margin_right;
11709 playfield_height -= vp_playfield->margin_top;
11710 playfield_height -= vp_playfield->margin_bottom;
11712 // adjust playfield size if min/max width/height is specified
11714 if (vp_playfield->min_width != -1)
11715 vp_playfield->width = MAX(vp_playfield->min_width, playfield_width);
11717 if (vp_playfield->min_height != -1)
11718 vp_playfield->height = MAX(vp_playfield->min_height, playfield_height);
11720 if (vp_playfield->max_width != -1)
11721 vp_playfield->width = MIN(vp_playfield->width, vp_playfield->max_width);
11723 if (vp_playfield->max_height != -1)
11724 vp_playfield->height = MIN(vp_playfield->height,vp_playfield->max_height);
11726 // adjust playfield position according to specified alignment
11728 if (vp_playfield->align == ALIGN_LEFT || vp_playfield->x > 0)
11729 vp_playfield->x = ALIGNED_VP_XPOS(vp_playfield);
11730 else if (vp_playfield->align == ALIGN_CENTER)
11731 vp_playfield->x = playfield_width / 2 - vp_playfield->width / 2;
11732 else if (vp_playfield->align == ALIGN_RIGHT)
11733 vp_playfield->x += playfield_width - vp_playfield->width;
11735 if (vp_playfield->valign == VALIGN_TOP || vp_playfield->y > 0)
11736 vp_playfield->y = ALIGNED_VP_YPOS(vp_playfield);
11737 else if (vp_playfield->valign == VALIGN_MIDDLE)
11738 vp_playfield->y = playfield_height / 2 - vp_playfield->height / 2;
11739 else if (vp_playfield->valign == VALIGN_BOTTOM)
11740 vp_playfield->y += playfield_height - vp_playfield->height;
11742 vp_playfield->x += vp_playfield->margin_left;
11743 vp_playfield->y += vp_playfield->margin_top;
11745 // adjust individual playfield borders if only default border is specified
11747 if (vp_playfield->border_left == -1)
11748 vp_playfield->border_left = vp_playfield->border_size;
11749 if (vp_playfield->border_right == -1)
11750 vp_playfield->border_right = vp_playfield->border_size;
11751 if (vp_playfield->border_top == -1)
11752 vp_playfield->border_top = vp_playfield->border_size;
11753 if (vp_playfield->border_bottom == -1)
11754 vp_playfield->border_bottom = vp_playfield->border_size;
11756 // set dynamic playfield borders if borders are specified as undefined
11757 // (but only if window size was dynamic and playfield size was static)
11759 if (dynamic_window_width && !dynamic_playfield_width)
11761 if (vp_playfield->border_left == -1)
11763 vp_playfield->border_left = (vp_playfield->x -
11764 vp_playfield->margin_left);
11765 vp_playfield->x -= vp_playfield->border_left;
11766 vp_playfield->width += vp_playfield->border_left;
11769 if (vp_playfield->border_right == -1)
11771 vp_playfield->border_right = (vp_window->width -
11773 vp_playfield->width -
11774 vp_playfield->margin_right);
11775 vp_playfield->width += vp_playfield->border_right;
11779 if (dynamic_window_height && !dynamic_playfield_height)
11781 if (vp_playfield->border_top == -1)
11783 vp_playfield->border_top = (vp_playfield->y -
11784 vp_playfield->margin_top);
11785 vp_playfield->y -= vp_playfield->border_top;
11786 vp_playfield->height += vp_playfield->border_top;
11789 if (vp_playfield->border_bottom == -1)
11791 vp_playfield->border_bottom = (vp_window->height -
11793 vp_playfield->height -
11794 vp_playfield->margin_bottom);
11795 vp_playfield->height += vp_playfield->border_bottom;
11799 // adjust playfield size to be a multiple of a defined alignment tile size
11801 int align_size = vp_playfield->align_size;
11802 int playfield_xtiles = vp_playfield->width / align_size;
11803 int playfield_ytiles = vp_playfield->height / align_size;
11804 int playfield_width_corrected = playfield_xtiles * align_size;
11805 int playfield_height_corrected = playfield_ytiles * align_size;
11806 boolean is_playfield_mode = (i == GFX_SPECIAL_ARG_PLAYING ||
11807 i == GFX_SPECIAL_ARG_EDITOR);
11809 if (is_playfield_mode &&
11810 dynamic_playfield_width &&
11811 vp_playfield->width != playfield_width_corrected)
11813 int playfield_xdiff = vp_playfield->width - playfield_width_corrected;
11815 vp_playfield->width = playfield_width_corrected;
11817 if (vp_playfield->align == ALIGN_LEFT)
11819 vp_playfield->border_left += playfield_xdiff;
11821 else if (vp_playfield->align == ALIGN_RIGHT)
11823 vp_playfield->border_right += playfield_xdiff;
11825 else if (vp_playfield->align == ALIGN_CENTER)
11827 int border_left_diff = playfield_xdiff / 2;
11828 int border_right_diff = playfield_xdiff - border_left_diff;
11830 vp_playfield->border_left += border_left_diff;
11831 vp_playfield->border_right += border_right_diff;
11835 if (is_playfield_mode &&
11836 dynamic_playfield_height &&
11837 vp_playfield->height != playfield_height_corrected)
11839 int playfield_ydiff = vp_playfield->height - playfield_height_corrected;
11841 vp_playfield->height = playfield_height_corrected;
11843 if (vp_playfield->valign == VALIGN_TOP)
11845 vp_playfield->border_top += playfield_ydiff;
11847 else if (vp_playfield->align == VALIGN_BOTTOM)
11849 vp_playfield->border_right += playfield_ydiff;
11851 else if (vp_playfield->align == VALIGN_MIDDLE)
11853 int border_top_diff = playfield_ydiff / 2;
11854 int border_bottom_diff = playfield_ydiff - border_top_diff;
11856 vp_playfield->border_top += border_top_diff;
11857 vp_playfield->border_bottom += border_bottom_diff;
11861 // adjust door positions according to specified alignment
11863 for (j = 0; j < 2; j++)
11865 struct RectWithBorder *vp_door = (j == 0 ? vp_door_1 : vp_door_2);
11867 if (vp_door->align == ALIGN_LEFT || vp_door->x > 0)
11868 vp_door->x = ALIGNED_VP_XPOS(vp_door);
11869 else if (vp_door->align == ALIGN_CENTER)
11870 vp_door->x = vp_window->width / 2 - vp_door->width / 2;
11871 else if (vp_door->align == ALIGN_RIGHT)
11872 vp_door->x += vp_window->width - vp_door->width;
11874 if (vp_door->valign == VALIGN_TOP || vp_door->y > 0)
11875 vp_door->y = ALIGNED_VP_YPOS(vp_door);
11876 else if (vp_door->valign == VALIGN_MIDDLE)
11877 vp_door->y = vp_window->height / 2 - vp_door->height / 2;
11878 else if (vp_door->valign == VALIGN_BOTTOM)
11879 vp_door->y += vp_window->height - vp_door->height;
11884 static void InitMenuDesignSettings_SpecialPostProcessing_AfterGraphics(void)
11888 struct XYTileSize *dst, *src;
11891 editor_buttons_xy[] =
11894 &editor.button.element_left, &editor.palette.element_left,
11895 IMG_GFX_EDITOR_BUTTON_ELEMENT_LEFT
11898 &editor.button.element_middle, &editor.palette.element_middle,
11899 IMG_GFX_EDITOR_BUTTON_ELEMENT_MIDDLE
11902 &editor.button.element_right, &editor.palette.element_right,
11903 IMG_GFX_EDITOR_BUTTON_ELEMENT_RIGHT
11910 // set default position for element buttons to element graphics
11911 for (i = 0; editor_buttons_xy[i].dst != NULL; i++)
11913 if ((*editor_buttons_xy[i].dst).x == -1 &&
11914 (*editor_buttons_xy[i].dst).y == -1)
11916 struct GraphicInfo *gd = &graphic_info[editor_buttons_xy[i].graphic];
11918 gd->width = gd->height = editor_buttons_xy[i].src->tile_size;
11920 *editor_buttons_xy[i].dst = *editor_buttons_xy[i].src;
11924 // adjust editor palette rows and columns if specified to be dynamic
11926 if (editor.palette.cols == -1)
11928 int vp_width = viewport.playfield[GFX_SPECIAL_ARG_EDITOR].width;
11929 int bt_width = graphic_info[IMG_EDITOR_PALETTE_BUTTON].width;
11930 int sc_width = graphic_info[IMG_EDITOR_PALETTE_SCROLLBAR].width;
11932 editor.palette.cols = (vp_width - sc_width) / bt_width;
11934 if (editor.palette.x == -1)
11936 int palette_width = editor.palette.cols * bt_width + sc_width;
11938 editor.palette.x = (vp_width - palette_width) / 2;
11942 if (editor.palette.rows == -1)
11944 int vp_height = viewport.playfield[GFX_SPECIAL_ARG_EDITOR].height;
11945 int bt_height = graphic_info[IMG_EDITOR_PALETTE_BUTTON].height;
11946 int tx_height = getFontHeight(FONT_TEXT_2);
11948 editor.palette.rows = (vp_height - tx_height) / bt_height;
11950 if (editor.palette.y == -1)
11952 int palette_height = editor.palette.rows * bt_height + tx_height;
11954 editor.palette.y = (vp_height - palette_height) / 2;
11959 static void LoadMenuDesignSettingsFromFilename(char *filename)
11961 static struct TitleFadingInfo tfi;
11962 static struct TitleMessageInfo tmi;
11963 static struct TokenInfo title_tokens[] =
11965 { TYPE_INTEGER, &tfi.fade_mode, ".fade_mode" },
11966 { TYPE_INTEGER, &tfi.fade_delay, ".fade_delay" },
11967 { TYPE_INTEGER, &tfi.post_delay, ".post_delay" },
11968 { TYPE_INTEGER, &tfi.auto_delay, ".auto_delay" },
11969 { TYPE_INTEGER, &tfi.auto_delay_unit, ".auto_delay_unit" },
11973 static struct TokenInfo titlemessage_tokens[] =
11975 { TYPE_INTEGER, &tmi.x, ".x" },
11976 { TYPE_INTEGER, &tmi.y, ".y" },
11977 { TYPE_INTEGER, &tmi.width, ".width" },
11978 { TYPE_INTEGER, &tmi.height, ".height" },
11979 { TYPE_INTEGER, &tmi.chars, ".chars" },
11980 { TYPE_INTEGER, &tmi.lines, ".lines" },
11981 { TYPE_INTEGER, &tmi.align, ".align" },
11982 { TYPE_INTEGER, &tmi.valign, ".valign" },
11983 { TYPE_INTEGER, &tmi.font, ".font" },
11984 { TYPE_BOOLEAN, &tmi.autowrap, ".autowrap" },
11985 { TYPE_BOOLEAN, &tmi.centered, ".centered" },
11986 { TYPE_BOOLEAN, &tmi.parse_comments, ".parse_comments" },
11987 { TYPE_INTEGER, &tmi.sort_priority, ".sort_priority" },
11988 { TYPE_INTEGER, &tmi.fade_mode, ".fade_mode" },
11989 { TYPE_INTEGER, &tmi.fade_delay, ".fade_delay" },
11990 { TYPE_INTEGER, &tmi.post_delay, ".post_delay" },
11991 { TYPE_INTEGER, &tmi.auto_delay, ".auto_delay" },
11992 { TYPE_INTEGER, &tmi.auto_delay_unit, ".auto_delay_unit" },
11998 struct TitleFadingInfo *info;
12003 // initialize first titles from "enter screen" definitions, if defined
12004 { &title_initial_first_default, "menu.enter_screen.TITLE" },
12005 { &title_first_default, "menu.enter_screen.TITLE" },
12007 // initialize title screens from "next screen" definitions, if defined
12008 { &title_initial_default, "menu.next_screen.TITLE" },
12009 { &title_default, "menu.next_screen.TITLE" },
12015 struct TitleMessageInfo *array;
12018 titlemessage_arrays[] =
12020 // initialize first titles from "enter screen" definitions, if defined
12021 { titlescreen_initial_first, "menu.enter_screen.TITLE" },
12022 { titlescreen_first, "menu.enter_screen.TITLE" },
12023 { titlemessage_initial_first, "menu.enter_screen.TITLE" },
12024 { titlemessage_first, "menu.enter_screen.TITLE" },
12026 // initialize titles from "next screen" definitions, if defined
12027 { titlescreen_initial, "menu.next_screen.TITLE" },
12028 { titlescreen, "menu.next_screen.TITLE" },
12029 { titlemessage_initial, "menu.next_screen.TITLE" },
12030 { titlemessage, "menu.next_screen.TITLE" },
12032 // overwrite titles with title definitions, if defined
12033 { titlescreen_initial_first, "[title_initial]" },
12034 { titlescreen_first, "[title]" },
12035 { titlemessage_initial_first, "[title_initial]" },
12036 { titlemessage_first, "[title]" },
12038 { titlescreen_initial, "[title_initial]" },
12039 { titlescreen, "[title]" },
12040 { titlemessage_initial, "[title_initial]" },
12041 { titlemessage, "[title]" },
12043 // overwrite titles with title screen/message definitions, if defined
12044 { titlescreen_initial_first, "[titlescreen_initial]" },
12045 { titlescreen_first, "[titlescreen]" },
12046 { titlemessage_initial_first, "[titlemessage_initial]" },
12047 { titlemessage_first, "[titlemessage]" },
12049 { titlescreen_initial, "[titlescreen_initial]" },
12050 { titlescreen, "[titlescreen]" },
12051 { titlemessage_initial, "[titlemessage_initial]" },
12052 { titlemessage, "[titlemessage]" },
12056 SetupFileHash *setup_file_hash;
12059 if ((setup_file_hash = loadSetupFileHash(filename)) == NULL)
12062 // the following initializes hierarchical values from dynamic configuration
12064 // special case: initialize with default values that may be overwritten
12065 // (e.g., init "menu.draw_xoffset.INFO" from "menu.draw_xoffset")
12066 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
12068 struct TokenIntPtrInfo menu_config[] =
12070 { "menu.draw_xoffset", &menu.draw_xoffset[i] },
12071 { "menu.draw_yoffset", &menu.draw_yoffset[i] },
12072 { "menu.list_size", &menu.list_size[i] }
12075 for (j = 0; j < ARRAY_SIZE(menu_config); j++)
12077 char *token = menu_config[j].token;
12078 char *value = getHashEntry(setup_file_hash, token);
12081 *menu_config[j].value = get_integer_from_string(value);
12085 // special case: initialize with default values that may be overwritten
12086 // (eg, init "menu.draw_xoffset.INFO[XXX]" from "menu.draw_xoffset.INFO")
12087 for (i = 0; i < NUM_SPECIAL_GFX_INFO_ARGS; i++)
12089 struct TokenIntPtrInfo menu_config[] =
12091 { "menu.draw_xoffset.INFO", &menu.draw_xoffset_info[i] },
12092 { "menu.draw_yoffset.INFO", &menu.draw_yoffset_info[i] },
12093 { "menu.list_size.INFO", &menu.list_size_info[i] }
12096 for (j = 0; j < ARRAY_SIZE(menu_config); j++)
12098 char *token = menu_config[j].token;
12099 char *value = getHashEntry(setup_file_hash, token);
12102 *menu_config[j].value = get_integer_from_string(value);
12106 // special case: initialize with default values that may be overwritten
12107 // (eg, init "menu.draw_xoffset.SETUP[XXX]" from "menu.draw_xoffset.SETUP")
12108 for (i = 0; i < NUM_SPECIAL_GFX_SETUP_ARGS; i++)
12110 struct TokenIntPtrInfo menu_config[] =
12112 { "menu.draw_xoffset.SETUP", &menu.draw_xoffset_setup[i] },
12113 { "menu.draw_yoffset.SETUP", &menu.draw_yoffset_setup[i] }
12116 for (j = 0; j < ARRAY_SIZE(menu_config); j++)
12118 char *token = menu_config[j].token;
12119 char *value = getHashEntry(setup_file_hash, token);
12122 *menu_config[j].value = get_integer_from_string(value);
12126 // special case: initialize with default values that may be overwritten
12127 // (eg, init "menu.line_spacing.INFO[XXX]" from "menu.line_spacing.INFO")
12128 for (i = 0; i < NUM_SPECIAL_GFX_INFO_ARGS; i++)
12130 struct TokenIntPtrInfo menu_config[] =
12132 { "menu.left_spacing.INFO", &menu.left_spacing_info[i] },
12133 { "menu.right_spacing.INFO", &menu.right_spacing_info[i] },
12134 { "menu.top_spacing.INFO", &menu.top_spacing_info[i] },
12135 { "menu.bottom_spacing.INFO", &menu.bottom_spacing_info[i] },
12136 { "menu.paragraph_spacing.INFO", &menu.paragraph_spacing_info[i] },
12137 { "menu.headline1_spacing.INFO", &menu.headline1_spacing_info[i] },
12138 { "menu.headline2_spacing.INFO", &menu.headline2_spacing_info[i] },
12139 { "menu.line_spacing.INFO", &menu.line_spacing_info[i] },
12140 { "menu.extra_spacing.INFO", &menu.extra_spacing_info[i] },
12143 for (j = 0; j < ARRAY_SIZE(menu_config); j++)
12145 char *token = menu_config[j].token;
12146 char *value = getHashEntry(setup_file_hash, token);
12149 *menu_config[j].value = get_integer_from_string(value);
12153 // special case: initialize with default values that may be overwritten
12154 // (eg, init "menu.enter_screen.SCORES.xyz" from "menu.enter_screen.xyz")
12155 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
12157 struct TokenIntPtrInfo menu_config[] =
12159 { "menu.enter_screen.fade_mode", &menu.enter_screen[i].fade_mode },
12160 { "menu.enter_screen.fade_delay", &menu.enter_screen[i].fade_delay },
12161 { "menu.enter_screen.post_delay", &menu.enter_screen[i].post_delay },
12162 { "menu.leave_screen.fade_mode", &menu.leave_screen[i].fade_mode },
12163 { "menu.leave_screen.fade_delay", &menu.leave_screen[i].fade_delay },
12164 { "menu.leave_screen.post_delay", &menu.leave_screen[i].post_delay },
12165 { "menu.next_screen.fade_mode", &menu.next_screen[i].fade_mode },
12166 { "menu.next_screen.fade_delay", &menu.next_screen[i].fade_delay },
12167 { "menu.next_screen.post_delay", &menu.next_screen[i].post_delay }
12170 for (j = 0; j < ARRAY_SIZE(menu_config); j++)
12172 char *token = menu_config[j].token;
12173 char *value = getHashEntry(setup_file_hash, token);
12176 *menu_config[j].value = get_token_parameter_value(token, value);
12180 // special case: initialize with default values that may be overwritten
12181 // (eg, init "viewport.door_1.MAIN.xyz" from "viewport.door_1.xyz")
12182 for (i = 0; i < NUM_SPECIAL_GFX_ARGS; i++)
12186 char *token_prefix;
12187 struct RectWithBorder *struct_ptr;
12191 { "viewport.window", &viewport.window[i] },
12192 { "viewport.playfield", &viewport.playfield[i] },
12193 { "viewport.door_1", &viewport.door_1[i] },
12194 { "viewport.door_2", &viewport.door_2[i] }
12197 for (j = 0; j < ARRAY_SIZE(vp_struct); j++)
12199 struct TokenIntPtrInfo vp_config[] =
12201 { ".x", &vp_struct[j].struct_ptr->x },
12202 { ".y", &vp_struct[j].struct_ptr->y },
12203 { ".width", &vp_struct[j].struct_ptr->width },
12204 { ".height", &vp_struct[j].struct_ptr->height },
12205 { ".min_width", &vp_struct[j].struct_ptr->min_width },
12206 { ".min_height", &vp_struct[j].struct_ptr->min_height },
12207 { ".max_width", &vp_struct[j].struct_ptr->max_width },
12208 { ".max_height", &vp_struct[j].struct_ptr->max_height },
12209 { ".margin_left", &vp_struct[j].struct_ptr->margin_left },
12210 { ".margin_right", &vp_struct[j].struct_ptr->margin_right },
12211 { ".margin_top", &vp_struct[j].struct_ptr->margin_top },
12212 { ".margin_bottom", &vp_struct[j].struct_ptr->margin_bottom },
12213 { ".border_left", &vp_struct[j].struct_ptr->border_left },
12214 { ".border_right", &vp_struct[j].struct_ptr->border_right },
12215 { ".border_top", &vp_struct[j].struct_ptr->border_top },
12216 { ".border_bottom", &vp_struct[j].struct_ptr->border_bottom },
12217 { ".border_size", &vp_struct[j].struct_ptr->border_size },
12218 { ".align_size", &vp_struct[j].struct_ptr->align_size },
12219 { ".align", &vp_struct[j].struct_ptr->align },
12220 { ".valign", &vp_struct[j].struct_ptr->valign }
12223 for (k = 0; k < ARRAY_SIZE(vp_config); k++)
12225 char *token = getStringCat2(vp_struct[j].token_prefix,
12226 vp_config[k].token);
12227 char *value = getHashEntry(setup_file_hash, token);
12230 *vp_config[k].value = get_token_parameter_value(token, value);
12237 // special case: initialize with default values that may be overwritten
12238 // (e.g., init "[title].fade_mode" from "menu.next_screen.TITLE.fade_mode")
12239 for (i = 0; title_info[i].info != NULL; i++)
12241 struct TitleFadingInfo *info = title_info[i].info;
12242 char *base_token = title_info[i].text;
12244 for (j = 0; title_tokens[j].type != -1; j++)
12246 char *token = getStringCat2(base_token, title_tokens[j].text);
12247 char *value = getHashEntry(setup_file_hash, token);
12251 int parameter_value = get_token_parameter_value(token, value);
12255 *(int *)title_tokens[j].value = (int)parameter_value;
12264 // special case: initialize with default values that may be overwritten
12265 // (e.g., init "titlemessage_1.fade_mode" from "[titlemessage].fade_mode")
12266 for (i = 0; titlemessage_arrays[i].array != NULL; i++)
12268 struct TitleMessageInfo *array = titlemessage_arrays[i].array;
12269 char *base_token = titlemessage_arrays[i].text;
12271 for (j = 0; titlemessage_tokens[j].type != -1; j++)
12273 char *token = getStringCat2(base_token, titlemessage_tokens[j].text);
12274 char *value = getHashEntry(setup_file_hash, token);
12278 int parameter_value = get_token_parameter_value(token, value);
12280 for (k = 0; k < MAX_NUM_TITLE_MESSAGES; k++)
12284 if (titlemessage_tokens[j].type == TYPE_INTEGER)
12285 *(int *)titlemessage_tokens[j].value = (int)parameter_value;
12287 *(boolean *)titlemessage_tokens[j].value = (boolean)parameter_value;
12297 // special case: check if network and preview player positions are redefined,
12298 // to compare this later against the main menu level preview being redefined
12299 struct TokenIntPtrInfo menu_config_players[] =
12301 { "main.network_players.x", &menu.main.network_players.redefined },
12302 { "main.network_players.y", &menu.main.network_players.redefined },
12303 { "main.preview_players.x", &menu.main.preview_players.redefined },
12304 { "main.preview_players.y", &menu.main.preview_players.redefined },
12305 { "preview.x", &preview.redefined },
12306 { "preview.y", &preview.redefined }
12309 for (i = 0; i < ARRAY_SIZE(menu_config_players); i++)
12310 *menu_config_players[i].value = FALSE;
12312 for (i = 0; i < ARRAY_SIZE(menu_config_players); i++)
12313 if (getHashEntry(setup_file_hash, menu_config_players[i].token) != NULL)
12314 *menu_config_players[i].value = TRUE;
12316 // read (and overwrite with) values that may be specified in config file
12317 for (i = 0; image_config_vars[i].token != NULL; i++)
12319 char *value = getHashEntry(setup_file_hash, image_config_vars[i].token);
12321 // (ignore definitions set to "[DEFAULT]" which are already initialized)
12322 if (value != NULL && !strEqual(value, ARG_DEFAULT))
12323 *image_config_vars[i].value =
12324 get_token_parameter_value(image_config_vars[i].token, value);
12327 freeSetupFileHash(setup_file_hash);
12330 void LoadMenuDesignSettings(void)
12332 char *filename_base = UNDEFINED_FILENAME, *filename_local;
12334 InitMenuDesignSettings_Static();
12335 InitMenuDesignSettings_SpecialPreProcessing();
12337 if (!GFX_OVERRIDE_ARTWORK(ARTWORK_TYPE_GRAPHICS))
12339 // first look for special settings configured in level series config
12340 filename_base = getCustomArtworkLevelConfigFilename(ARTWORK_TYPE_GRAPHICS);
12342 if (fileExists(filename_base))
12343 LoadMenuDesignSettingsFromFilename(filename_base);
12346 filename_local = getCustomArtworkConfigFilename(ARTWORK_TYPE_GRAPHICS);
12348 if (filename_local != NULL && !strEqual(filename_base, filename_local))
12349 LoadMenuDesignSettingsFromFilename(filename_local);
12351 InitMenuDesignSettings_SpecialPostProcessing();
12354 void LoadMenuDesignSettings_AfterGraphics(void)
12356 InitMenuDesignSettings_SpecialPostProcessing_AfterGraphics();
12359 void LoadUserDefinedEditorElementList(int **elements, int *num_elements)
12361 char *filename = getEditorSetupFilename();
12362 SetupFileList *setup_file_list, *list;
12363 SetupFileHash *element_hash;
12364 int num_unknown_tokens = 0;
12367 if ((setup_file_list = loadSetupFileList(filename)) == NULL)
12370 element_hash = newSetupFileHash();
12372 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
12373 setHashEntry(element_hash, element_info[i].token_name, i_to_a(i));
12375 // determined size may be larger than needed (due to unknown elements)
12377 for (list = setup_file_list; list != NULL; list = list->next)
12380 // add space for up to 3 more elements for padding that may be needed
12381 *num_elements += 3;
12383 // free memory for old list of elements, if needed
12384 checked_free(*elements);
12386 // allocate memory for new list of elements
12387 *elements = checked_malloc(*num_elements * sizeof(int));
12390 for (list = setup_file_list; list != NULL; list = list->next)
12392 char *value = getHashEntry(element_hash, list->token);
12394 if (value == NULL) // try to find obsolete token mapping
12396 char *mapped_token = get_mapped_token(list->token);
12398 if (mapped_token != NULL)
12400 value = getHashEntry(element_hash, mapped_token);
12402 free(mapped_token);
12408 (*elements)[(*num_elements)++] = atoi(value);
12412 if (num_unknown_tokens == 0)
12415 Warn("unknown token(s) found in config file:");
12416 Warn("- config file: '%s'", filename);
12418 num_unknown_tokens++;
12421 Warn("- token: '%s'", list->token);
12425 if (num_unknown_tokens > 0)
12428 while (*num_elements % 4) // pad with empty elements, if needed
12429 (*elements)[(*num_elements)++] = EL_EMPTY;
12431 freeSetupFileList(setup_file_list);
12432 freeSetupFileHash(element_hash);
12435 for (i = 0; i < *num_elements; i++)
12436 Debug("editor", "element '%s' [%d]\n",
12437 element_info[(*elements)[i]].token_name, (*elements)[i]);
12441 static struct MusicFileInfo *get_music_file_info_ext(char *basename, int music,
12444 SetupFileHash *setup_file_hash = NULL;
12445 struct MusicFileInfo tmp_music_file_info, *new_music_file_info;
12446 char *filename_music, *filename_prefix, *filename_info;
12452 token_to_value_ptr[] =
12454 { "title_header", &tmp_music_file_info.title_header },
12455 { "artist_header", &tmp_music_file_info.artist_header },
12456 { "album_header", &tmp_music_file_info.album_header },
12457 { "year_header", &tmp_music_file_info.year_header },
12459 { "title", &tmp_music_file_info.title },
12460 { "artist", &tmp_music_file_info.artist },
12461 { "album", &tmp_music_file_info.album },
12462 { "year", &tmp_music_file_info.year },
12468 filename_music = (is_sound ? getCustomSoundFilename(basename) :
12469 getCustomMusicFilename(basename));
12471 if (filename_music == NULL)
12474 // ---------- try to replace file extension ----------
12476 filename_prefix = getStringCopy(filename_music);
12477 if (strrchr(filename_prefix, '.') != NULL)
12478 *strrchr(filename_prefix, '.') = '\0';
12479 filename_info = getStringCat2(filename_prefix, ".txt");
12481 if (fileExists(filename_info))
12482 setup_file_hash = loadSetupFileHash(filename_info);
12484 free(filename_prefix);
12485 free(filename_info);
12487 if (setup_file_hash == NULL)
12489 // ---------- try to add file extension ----------
12491 filename_prefix = getStringCopy(filename_music);
12492 filename_info = getStringCat2(filename_prefix, ".txt");
12494 if (fileExists(filename_info))
12495 setup_file_hash = loadSetupFileHash(filename_info);
12497 free(filename_prefix);
12498 free(filename_info);
12501 if (setup_file_hash == NULL)
12504 // ---------- music file info found ----------
12506 clear_mem(&tmp_music_file_info, sizeof(struct MusicFileInfo));
12508 for (i = 0; token_to_value_ptr[i].token != NULL; i++)
12510 char *value = getHashEntry(setup_file_hash, token_to_value_ptr[i].token);
12512 *token_to_value_ptr[i].value_ptr =
12513 getStringCopy(value != NULL && *value != '\0' ? value : UNKNOWN_NAME);
12516 tmp_music_file_info.basename = getStringCopy(basename);
12517 tmp_music_file_info.music = music;
12518 tmp_music_file_info.is_sound = is_sound;
12520 new_music_file_info = checked_malloc(sizeof(struct MusicFileInfo));
12521 *new_music_file_info = tmp_music_file_info;
12523 return new_music_file_info;
12526 static struct MusicFileInfo *get_music_file_info(char *basename, int music)
12528 return get_music_file_info_ext(basename, music, FALSE);
12531 static struct MusicFileInfo *get_sound_file_info(char *basename, int sound)
12533 return get_music_file_info_ext(basename, sound, TRUE);
12536 static boolean music_info_listed_ext(struct MusicFileInfo *list,
12537 char *basename, boolean is_sound)
12539 for (; list != NULL; list = list->next)
12540 if (list->is_sound == is_sound && strEqual(list->basename, basename))
12546 static boolean music_info_listed(struct MusicFileInfo *list, char *basename)
12548 return music_info_listed_ext(list, basename, FALSE);
12551 static boolean sound_info_listed(struct MusicFileInfo *list, char *basename)
12553 return music_info_listed_ext(list, basename, TRUE);
12556 void LoadMusicInfo(void)
12558 char *music_directory = getCustomMusicDirectory();
12559 int num_music = getMusicListSize();
12560 int num_music_noconf = 0;
12561 int num_sounds = getSoundListSize();
12563 DirectoryEntry *dir_entry;
12564 struct FileInfo *music, *sound;
12565 struct MusicFileInfo *next, **new;
12568 while (music_file_info != NULL)
12570 next = music_file_info->next;
12572 checked_free(music_file_info->basename);
12574 checked_free(music_file_info->title_header);
12575 checked_free(music_file_info->artist_header);
12576 checked_free(music_file_info->album_header);
12577 checked_free(music_file_info->year_header);
12579 checked_free(music_file_info->title);
12580 checked_free(music_file_info->artist);
12581 checked_free(music_file_info->album);
12582 checked_free(music_file_info->year);
12584 free(music_file_info);
12586 music_file_info = next;
12589 new = &music_file_info;
12591 for (i = 0; i < num_music; i++)
12593 music = getMusicListEntry(i);
12595 if (music->filename == NULL)
12598 if (strEqual(music->filename, UNDEFINED_FILENAME))
12601 // a configured file may be not recognized as music
12602 if (!FileIsMusic(music->filename))
12605 if (!music_info_listed(music_file_info, music->filename))
12607 *new = get_music_file_info(music->filename, i);
12610 new = &(*new)->next;
12614 if ((dir = openDirectory(music_directory)) == NULL)
12616 Warn("cannot read music directory '%s'", music_directory);
12621 while ((dir_entry = readDirectory(dir)) != NULL) // loop all entries
12623 char *basename = dir_entry->basename;
12624 boolean music_already_used = FALSE;
12627 // skip all music files that are configured in music config file
12628 for (i = 0; i < num_music; i++)
12630 music = getMusicListEntry(i);
12632 if (music->filename == NULL)
12635 if (strEqual(basename, music->filename))
12637 music_already_used = TRUE;
12642 if (music_already_used)
12645 if (!FileIsMusic(dir_entry->filename))
12648 if (!music_info_listed(music_file_info, basename))
12650 *new = get_music_file_info(basename, MAP_NOCONF_MUSIC(num_music_noconf));
12653 new = &(*new)->next;
12656 num_music_noconf++;
12659 closeDirectory(dir);
12661 for (i = 0; i < num_sounds; i++)
12663 sound = getSoundListEntry(i);
12665 if (sound->filename == NULL)
12668 if (strEqual(sound->filename, UNDEFINED_FILENAME))
12671 // a configured file may be not recognized as sound
12672 if (!FileIsSound(sound->filename))
12675 if (!sound_info_listed(music_file_info, sound->filename))
12677 *new = get_sound_file_info(sound->filename, i);
12679 new = &(*new)->next;
12684 static void add_helpanim_entry(int element, int action, int direction,
12685 int delay, int *num_list_entries)
12687 struct HelpAnimInfo *new_list_entry;
12688 (*num_list_entries)++;
12691 checked_realloc(helpanim_info,
12692 *num_list_entries * sizeof(struct HelpAnimInfo));
12693 new_list_entry = &helpanim_info[*num_list_entries - 1];
12695 new_list_entry->element = element;
12696 new_list_entry->action = action;
12697 new_list_entry->direction = direction;
12698 new_list_entry->delay = delay;
12701 static void print_unknown_token(char *filename, char *token, int token_nr)
12706 Warn("unknown token(s) found in config file:");
12707 Warn("- config file: '%s'", filename);
12710 Warn("- token: '%s'", token);
12713 static void print_unknown_token_end(int token_nr)
12719 void LoadHelpAnimInfo(void)
12721 char *filename = getHelpAnimFilename();
12722 SetupFileList *setup_file_list = NULL, *list;
12723 SetupFileHash *element_hash, *action_hash, *direction_hash;
12724 int num_list_entries = 0;
12725 int num_unknown_tokens = 0;
12728 if (fileExists(filename))
12729 setup_file_list = loadSetupFileList(filename);
12731 if (setup_file_list == NULL)
12733 // use reliable default values from static configuration
12734 SetupFileList *insert_ptr;
12736 insert_ptr = setup_file_list =
12737 newSetupFileList(helpanim_config[0].token,
12738 helpanim_config[0].value);
12740 for (i = 1; helpanim_config[i].token; i++)
12741 insert_ptr = addListEntry(insert_ptr,
12742 helpanim_config[i].token,
12743 helpanim_config[i].value);
12746 element_hash = newSetupFileHash();
12747 action_hash = newSetupFileHash();
12748 direction_hash = newSetupFileHash();
12750 for (i = 0; i < MAX_NUM_ELEMENTS; i++)
12751 setHashEntry(element_hash, element_info[i].token_name, i_to_a(i));
12753 for (i = 0; i < NUM_ACTIONS; i++)
12754 setHashEntry(action_hash, element_action_info[i].suffix,
12755 i_to_a(element_action_info[i].value));
12757 // do not store direction index (bit) here, but direction value!
12758 for (i = 0; i < NUM_DIRECTIONS_FULL; i++)
12759 setHashEntry(direction_hash, element_direction_info[i].suffix,
12760 i_to_a(1 << element_direction_info[i].value));
12762 for (list = setup_file_list; list != NULL; list = list->next)
12764 char *element_token, *action_token, *direction_token;
12765 char *element_value, *action_value, *direction_value;
12766 int delay = atoi(list->value);
12768 if (strEqual(list->token, "end"))
12770 add_helpanim_entry(HELPANIM_LIST_NEXT, -1, -1, -1, &num_list_entries);
12775 /* first try to break element into element/action/direction parts;
12776 if this does not work, also accept combined "element[.act][.dir]"
12777 elements (like "dynamite.active"), which are unique elements */
12779 if (strchr(list->token, '.') == NULL) // token contains no '.'
12781 element_value = getHashEntry(element_hash, list->token);
12782 if (element_value != NULL) // element found
12783 add_helpanim_entry(atoi(element_value), -1, -1, delay,
12784 &num_list_entries);
12787 // no further suffixes found -- this is not an element
12788 print_unknown_token(filename, list->token, num_unknown_tokens++);
12794 // token has format "<prefix>.<something>"
12796 action_token = strchr(list->token, '.'); // suffix may be action ...
12797 direction_token = action_token; // ... or direction
12799 element_token = getStringCopy(list->token);
12800 *strchr(element_token, '.') = '\0';
12802 element_value = getHashEntry(element_hash, element_token);
12804 if (element_value == NULL) // this is no element
12806 element_value = getHashEntry(element_hash, list->token);
12807 if (element_value != NULL) // combined element found
12808 add_helpanim_entry(atoi(element_value), -1, -1, delay,
12809 &num_list_entries);
12811 print_unknown_token(filename, list->token, num_unknown_tokens++);
12813 free(element_token);
12818 action_value = getHashEntry(action_hash, action_token);
12820 if (action_value != NULL) // action found
12822 add_helpanim_entry(atoi(element_value), atoi(action_value), -1, delay,
12823 &num_list_entries);
12825 free(element_token);
12830 direction_value = getHashEntry(direction_hash, direction_token);
12832 if (direction_value != NULL) // direction found
12834 add_helpanim_entry(atoi(element_value), -1, atoi(direction_value), delay,
12835 &num_list_entries);
12837 free(element_token);
12842 if (strchr(action_token + 1, '.') == NULL)
12844 // no further suffixes found -- this is not an action nor direction
12846 element_value = getHashEntry(element_hash, list->token);
12847 if (element_value != NULL) // combined element found
12848 add_helpanim_entry(atoi(element_value), -1, -1, delay,
12849 &num_list_entries);
12851 print_unknown_token(filename, list->token, num_unknown_tokens++);
12853 free(element_token);
12858 // token has format "<prefix>.<suffix>.<something>"
12860 direction_token = strchr(action_token + 1, '.');
12862 action_token = getStringCopy(action_token);
12863 *strchr(action_token + 1, '.') = '\0';
12865 action_value = getHashEntry(action_hash, action_token);
12867 if (action_value == NULL) // this is no action
12869 element_value = getHashEntry(element_hash, list->token);
12870 if (element_value != NULL) // combined element found
12871 add_helpanim_entry(atoi(element_value), -1, -1, delay,
12872 &num_list_entries);
12874 print_unknown_token(filename, list->token, num_unknown_tokens++);
12876 free(element_token);
12877 free(action_token);
12882 direction_value = getHashEntry(direction_hash, direction_token);
12884 if (direction_value != NULL) // direction found
12886 add_helpanim_entry(atoi(element_value), atoi(action_value),
12887 atoi(direction_value), delay, &num_list_entries);
12889 free(element_token);
12890 free(action_token);
12895 // this is no direction
12897 element_value = getHashEntry(element_hash, list->token);
12898 if (element_value != NULL) // combined element found
12899 add_helpanim_entry(atoi(element_value), -1, -1, delay,
12900 &num_list_entries);
12902 print_unknown_token(filename, list->token, num_unknown_tokens++);
12904 free(element_token);
12905 free(action_token);
12908 print_unknown_token_end(num_unknown_tokens);
12910 add_helpanim_entry(HELPANIM_LIST_NEXT, -1, -1, -1, &num_list_entries);
12911 add_helpanim_entry(HELPANIM_LIST_END, -1, -1, -1, &num_list_entries);
12913 freeSetupFileList(setup_file_list);
12914 freeSetupFileHash(element_hash);
12915 freeSetupFileHash(action_hash);
12916 freeSetupFileHash(direction_hash);
12919 for (i = 0; i < num_list_entries; i++)
12920 Debug("files:LoadHelpAnimInfo", "'%s': %d, %d, %d => %d",
12921 EL_NAME(helpanim_info[i].element),
12922 helpanim_info[i].element,
12923 helpanim_info[i].action,
12924 helpanim_info[i].direction,
12925 helpanim_info[i].delay);
12929 void LoadHelpTextInfo(void)
12931 char *filename = getHelpTextFilename();
12934 if (helptext_info != NULL)
12936 freeSetupFileHash(helptext_info);
12937 helptext_info = NULL;
12940 if (fileExists(filename))
12941 helptext_info = loadSetupFileHash(filename);
12943 if (helptext_info == NULL)
12945 // use reliable default values from static configuration
12946 helptext_info = newSetupFileHash();
12948 for (i = 0; helptext_config[i].token; i++)
12949 setHashEntry(helptext_info,
12950 helptext_config[i].token,
12951 helptext_config[i].value);
12955 BEGIN_HASH_ITERATION(helptext_info, itr)
12957 Debug("files:LoadHelpTextInfo", "'%s' => '%s'",
12958 HASH_ITERATION_TOKEN(itr), HASH_ITERATION_VALUE(itr));
12960 END_HASH_ITERATION(hash, itr)
12965 // ----------------------------------------------------------------------------
12967 // ----------------------------------------------------------------------------
12969 #define MAX_NUM_CONVERT_LEVELS 1000
12971 void ConvertLevels(void)
12973 static LevelDirTree *convert_leveldir = NULL;
12974 static int convert_level_nr = -1;
12975 static int num_levels_handled = 0;
12976 static int num_levels_converted = 0;
12977 static boolean levels_failed[MAX_NUM_CONVERT_LEVELS];
12980 convert_leveldir = getTreeInfoFromIdentifier(leveldir_first,
12981 global.convert_leveldir);
12983 if (convert_leveldir == NULL)
12984 Fail("no such level identifier: '%s'", global.convert_leveldir);
12986 leveldir_current = convert_leveldir;
12988 if (global.convert_level_nr != -1)
12990 convert_leveldir->first_level = global.convert_level_nr;
12991 convert_leveldir->last_level = global.convert_level_nr;
12994 convert_level_nr = convert_leveldir->first_level;
12996 PrintLine("=", 79);
12997 Print("Converting levels\n");
12998 PrintLine("-", 79);
12999 Print("Level series identifier: '%s'\n", convert_leveldir->identifier);
13000 Print("Level series name: '%s'\n", convert_leveldir->name);
13001 Print("Level series author: '%s'\n", convert_leveldir->author);
13002 Print("Number of levels: %d\n", convert_leveldir->levels);
13003 PrintLine("=", 79);
13006 for (i = 0; i < MAX_NUM_CONVERT_LEVELS; i++)
13007 levels_failed[i] = FALSE;
13009 while (convert_level_nr <= convert_leveldir->last_level)
13011 char *level_filename;
13014 level_nr = convert_level_nr++;
13016 Print("Level %03d: ", level_nr);
13018 LoadLevel(level_nr);
13019 if (level.no_level_file || level.no_valid_file)
13021 Print("(no level)\n");
13025 Print("converting level ... ");
13027 level_filename = getDefaultLevelFilename(level_nr);
13028 new_level = !fileExists(level_filename);
13032 SaveLevel(level_nr);
13034 num_levels_converted++;
13036 Print("converted.\n");
13040 if (level_nr >= 0 && level_nr < MAX_NUM_CONVERT_LEVELS)
13041 levels_failed[level_nr] = TRUE;
13043 Print("NOT CONVERTED -- LEVEL ALREADY EXISTS.\n");
13046 num_levels_handled++;
13050 PrintLine("=", 79);
13051 Print("Number of levels handled: %d\n", num_levels_handled);
13052 Print("Number of levels converted: %d (%d%%)\n", num_levels_converted,
13053 (num_levels_handled ?
13054 num_levels_converted * 100 / num_levels_handled : 0));
13055 PrintLine("-", 79);
13056 Print("Summary (for automatic parsing by scripts):\n");
13057 Print("LEVELDIR '%s', CONVERTED %d/%d (%d%%)",
13058 convert_leveldir->identifier, num_levels_converted,
13059 num_levels_handled,
13060 (num_levels_handled ?
13061 num_levels_converted * 100 / num_levels_handled : 0));
13063 if (num_levels_handled != num_levels_converted)
13065 Print(", FAILED:");
13066 for (i = 0; i < MAX_NUM_CONVERT_LEVELS; i++)
13067 if (levels_failed[i])
13072 PrintLine("=", 79);
13074 CloseAllAndExit(0);
13078 // ----------------------------------------------------------------------------
13079 // create and save images for use in level sketches (raw BMP format)
13080 // ----------------------------------------------------------------------------
13082 void CreateLevelSketchImages(void)
13088 InitElementPropertiesGfxElement();
13090 bitmap1 = CreateBitmap(TILEX, TILEY, DEFAULT_DEPTH);
13091 bitmap2 = CreateBitmap(MINI_TILEX, MINI_TILEY, DEFAULT_DEPTH);
13093 for (i = 0; i < NUM_FILE_ELEMENTS; i++)
13095 int element = getMappedElement(i);
13096 char basename1[16];
13097 char basename2[16];
13101 sprintf(basename1, "%04d.bmp", i);
13102 sprintf(basename2, "%04ds.bmp", i);
13104 filename1 = getPath2(global.create_sketch_images_dir, basename1);
13105 filename2 = getPath2(global.create_sketch_images_dir, basename2);
13107 DrawSizedElement(0, 0, element, TILESIZE);
13108 BlitBitmap(drawto, bitmap1, SX, SY, TILEX, TILEY, 0, 0);
13110 if (SDL_SaveBMP(bitmap1->surface, filename1) != 0)
13111 Fail("cannot save level sketch image file '%s'", filename1);
13113 DrawSizedElement(0, 0, element, MINI_TILESIZE);
13114 BlitBitmap(drawto, bitmap2, SX, SY, MINI_TILEX, MINI_TILEY, 0, 0);
13116 if (SDL_SaveBMP(bitmap2->surface, filename2) != 0)
13117 Fail("cannot save level sketch image file '%s'", filename2);
13122 // create corresponding SQL statements (for normal and small images)
13125 printf("insert into phpbb_words values (NULL, '`%03d', '<IMG class=\"levelsketch\" src=\"/I/%04d.png\"/>');\n", i, i);
13126 printf("insert into phpbb_words values (NULL, '¸%03d', '<IMG class=\"levelsketch\" src=\"/I/%04ds.png\"/>');\n", i, i);
13129 printf("insert into phpbb_words values (NULL, '`%04d', '<IMG class=\"levelsketch\" src=\"/I/%04d.png\"/>');\n", i, i);
13130 printf("insert into phpbb_words values (NULL, '¸%04d', '<IMG class=\"levelsketch\" src=\"/I/%04ds.png\"/>');\n", i, i);
13132 // optional: create content for forum level sketch demonstration post
13134 fprintf(stderr, "%03d `%03d%c", i, i, (i % 10 < 9 ? ' ' : '\n'));
13137 FreeBitmap(bitmap1);
13138 FreeBitmap(bitmap2);
13141 fprintf(stderr, "\n");
13143 Info("%d normal and small images created", NUM_FILE_ELEMENTS);
13145 CloseAllAndExit(0);
13149 // ----------------------------------------------------------------------------
13150 // create and save images for element collecting animations (raw BMP format)
13151 // ----------------------------------------------------------------------------
13153 static boolean createCollectImage(int element)
13155 return (IS_COLLECTIBLE(element) && !IS_SP_ELEMENT(element));
13158 void CreateCollectElementImages(void)
13162 int anim_frames = num_steps - 1;
13163 int tile_size = TILESIZE;
13164 int anim_width = tile_size * anim_frames;
13165 int anim_height = tile_size;
13166 int num_collect_images = 0;
13167 int pos_collect_images = 0;
13169 for (i = 0; i < MAX_NUM_ELEMENTS; i++)
13170 if (createCollectImage(i))
13171 num_collect_images++;
13173 Info("Creating %d element collecting animation images ...",
13174 num_collect_images);
13176 int dst_width = anim_width * 2;
13177 int dst_height = anim_height * num_collect_images / 2;
13178 Bitmap *dst_bitmap = CreateBitmap(dst_width, dst_height, DEFAULT_DEPTH);
13179 char *basename = "RocksCollect.bmp";
13180 char *filename = getPath2(global.create_collect_images_dir, basename);
13182 for (i = 0; i < MAX_NUM_ELEMENTS; i++)
13184 if (!createCollectImage(i))
13187 int dst_x = (pos_collect_images / (num_collect_images / 2)) * anim_width;
13188 int dst_y = (pos_collect_images % (num_collect_images / 2)) * anim_height;
13189 int graphic = el2img(i);
13190 char *token_name = element_info[i].token_name;
13191 Bitmap *tmp_bitmap = CreateBitmap(tile_size, tile_size, DEFAULT_DEPTH);
13192 Bitmap *src_bitmap;
13195 Info("- creating collecting image for '%s' ...", token_name);
13197 getGraphicSource(graphic, 0, &src_bitmap, &src_x, &src_y);
13199 BlitBitmap(src_bitmap, tmp_bitmap, src_x, src_y,
13200 tile_size, tile_size, 0, 0);
13202 tmp_bitmap->surface_masked = tmp_bitmap->surface;
13204 for (j = 0; j < anim_frames; j++)
13206 int frame_size_final = tile_size * (anim_frames - j) / num_steps;
13207 int frame_size = frame_size_final * num_steps;
13208 int offset = (tile_size - frame_size_final) / 2;
13209 Bitmap *frame_bitmap = ZoomBitmap(tmp_bitmap, frame_size, frame_size);
13211 while (frame_size > frame_size_final)
13215 Bitmap *half_bitmap = ZoomBitmap(frame_bitmap, frame_size, frame_size);
13217 FreeBitmap(frame_bitmap);
13219 frame_bitmap = half_bitmap;
13222 BlitBitmap(frame_bitmap, dst_bitmap, 0, 0,
13223 frame_size_final, frame_size_final,
13224 dst_x + j * tile_size + offset, dst_y + offset);
13226 FreeBitmap(frame_bitmap);
13229 tmp_bitmap->surface_masked = NULL;
13231 FreeBitmap(tmp_bitmap);
13233 pos_collect_images++;
13236 if (SDL_SaveBMP(dst_bitmap->surface, filename) != 0)
13237 Fail("cannot save element collecting image file '%s'", filename);
13239 FreeBitmap(dst_bitmap);
13243 CloseAllAndExit(0);
13247 // ----------------------------------------------------------------------------
13248 // create and save images for custom and group elements (raw BMP format)
13249 // ----------------------------------------------------------------------------
13251 void CreateCustomElementImages(char *directory)
13253 char *src_basename = "RocksCE-template.ilbm";
13254 char *dst_basename = "RocksCE.bmp";
13255 char *src_filename = getPath2(directory, src_basename);
13256 char *dst_filename = getPath2(directory, dst_basename);
13257 Bitmap *src_bitmap;
13259 int yoffset_ce = 0;
13260 int yoffset_ge = (TILEY * NUM_CUSTOM_ELEMENTS / 16);
13263 InitVideoDefaults();
13265 ReCreateBitmap(&backbuffer, video.width, video.height);
13267 src_bitmap = LoadImage(src_filename);
13269 bitmap = CreateBitmap(TILEX * 16 * 2,
13270 TILEY * (NUM_CUSTOM_ELEMENTS + NUM_GROUP_ELEMENTS) / 16,
13273 for (i = 0; i < NUM_CUSTOM_ELEMENTS; i++)
13280 BlitBitmap(src_bitmap, bitmap, 0, 0, TILEX, TILEY,
13281 TILEX * x, TILEY * y + yoffset_ce);
13283 BlitBitmap(src_bitmap, bitmap, 0, TILEY,
13285 TILEX * x + TILEX * 16,
13286 TILEY * y + yoffset_ce);
13288 for (j = 2; j >= 0; j--)
13292 BlitBitmap(src_bitmap, bitmap,
13293 TILEX + c * 7, 0, 6, 10,
13294 TILEX * x + 6 + j * 7,
13295 TILEY * y + 11 + yoffset_ce);
13297 BlitBitmap(src_bitmap, bitmap,
13298 TILEX + c * 8, TILEY, 6, 10,
13299 TILEX * 16 + TILEX * x + 6 + j * 8,
13300 TILEY * y + 10 + yoffset_ce);
13306 for (i = 0; i < NUM_GROUP_ELEMENTS; i++)
13313 BlitBitmap(src_bitmap, bitmap, 0, 0, TILEX, TILEY,
13314 TILEX * x, TILEY * y + yoffset_ge);
13316 BlitBitmap(src_bitmap, bitmap, 0, TILEY,
13318 TILEX * x + TILEX * 16,
13319 TILEY * y + yoffset_ge);
13321 for (j = 1; j >= 0; j--)
13325 BlitBitmap(src_bitmap, bitmap, TILEX + c * 10, 11, 10, 10,
13326 TILEX * x + 6 + j * 10,
13327 TILEY * y + 11 + yoffset_ge);
13329 BlitBitmap(src_bitmap, bitmap,
13330 TILEX + c * 8, TILEY + 12, 6, 10,
13331 TILEX * 16 + TILEX * x + 10 + j * 8,
13332 TILEY * y + 10 + yoffset_ge);
13338 if (SDL_SaveBMP(bitmap->surface, dst_filename) != 0)
13339 Fail("cannot save CE graphics file '%s'", dst_filename);
13341 FreeBitmap(bitmap);
13343 CloseAllAndExit(0);