Call the oddly labelled button on the gigabeat remote "Menu" in the
[kugel-rb.git] / apps / plugins / sokoban.c
blob50410d29f6ffd1dc56f23e501a399c6149428114
1 /***************************************************************************
2 * __________ __ ___.
3 * Open \______ \ ____ ____ | | _\_ |__ _______ ___
4 * Source | _// _ \_/ ___\| |/ /| __ \ / _ \ \/ /
5 * Jukebox | | ( <_> ) \___| < | \_\ ( <_> > < <
6 * Firmware |____|_ /\____/ \___ >__|_ \|___ /\____/__/\_ \
7 * \/ \/ \/ \/ \/
8 * $Id$
10 * Copyright (C) 2002 Eric Linenberg
11 * February 2003: Robert Hak performs a cleanup/rewrite/feature addition.
12 * Eric smiles. Bjorn cries. Linus say 'huh?'.
13 * March 2007: Sean Morrisey performs a major rewrite/feature addition.
15 * This program is free software; you can redistribute it and/or
16 * modify it under the terms of the GNU General Public License
17 * as published by the Free Software Foundation; either version 2
18 * of the License, or (at your option) any later version.
20 * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
21 * KIND, either express or implied.
23 ****************************************************************************/
24 #include "plugin.h"
25 #include "lib/playback_control.h"
27 PLUGIN_HEADER
29 #define SOKOBAN_TITLE "Sokoban"
31 #define SOKOBAN_LEVELS_FILE PLUGIN_GAMES_DIR "/sokoban.levels"
32 #define SOKOBAN_SAVE_FILE PLUGIN_GAMES_DIR "/sokoban.save"
33 #define SOKOBAN_SAVE_FOLDER "/games"
35 #include "pluginbitmaps/sokoban_tiles.h"
36 #define SOKOBAN_TILESIZE BMPWIDTH_sokoban_tiles
38 /* If tilesize is 0 (which it is during dependency generation) gcc will abort
39 (div by 0) and this plugin won't get any dependencies
41 #if SOKOBAN_TILESIZE < 1
42 #define SOKOBAN_TILESIZE 10
43 #endif
45 /* SOKOBAN_TILESIZE is the number of pixels for each block.
46 * Set dynamically so all targets can support levels
47 * that fill their entire screen, less the stat box.
48 * 16 rows & 20 cols minimum */
49 #if LCD_WIDTH > LCD_HEIGHT /* horizontal layout*/
50 #define ROWS (LCD_HEIGHT/SOKOBAN_TILESIZE)
51 #if (LCD_WIDTH+4) >= (20*SOKOBAN_TILESIZE+40) /* wide or narrow stats box */
52 #define COLS ((LCD_WIDTH-40)/SOKOBAN_TILESIZE)
53 #else
54 #define COLS ((LCD_WIDTH-32)/SOKOBAN_TILESIZE)
55 #endif
56 #else /* vertical layout*/
57 #define ROWS ((LCD_HEIGHT-25)/SOKOBAN_TILESIZE)
58 #define COLS (LCD_WIDTH/SOKOBAN_TILESIZE)
59 #endif
61 /* Use either all but 16k of the plugin buffer for level data
62 * or 128k, which ever is less */
63 #if PLUGIN_BUFFER_SIZE - 0x4000 < 0x20000
64 #define MAX_LEVEL_DATA (PLUGIN_BUFFER_SIZE - 0x4000)
65 #else
66 #define MAX_LEVEL_DATA 0x20000
67 #endif
69 /* Number of levels for which to allocate buffer indexes */
70 #define MAX_LEVELS MAX_LEVEL_DATA/70
72 /* Use 4k plus remaining plugin buffer (-12k for prog) for undo, up to 64k */
73 #if PLUGIN_BUFFER_SIZE - MAX_LEVEL_DATA - 0x3000 > 0x10000
74 #define MAX_UNDOS 0x10000
75 #else
76 #define MAX_UNDOS (PLUGIN_BUFFER_SIZE - MAX_LEVEL_DATA - 0x3000)
77 #endif
79 /* Move/push definitions for undo */
80 #define SOKOBAN_PUSH_LEFT 'L'
81 #define SOKOBAN_PUSH_RIGHT 'R'
82 #define SOKOBAN_PUSH_UP 'U'
83 #define SOKOBAN_PUSH_DOWN 'D'
84 #define SOKOBAN_MOVE_LEFT 'l'
85 #define SOKOBAN_MOVE_RIGHT 'r'
86 #define SOKOBAN_MOVE_UP 'u'
87 #define SOKOBAN_MOVE_DOWN 'd'
89 #define SOKOBAN_MOVE_DIFF (SOKOBAN_MOVE_LEFT-SOKOBAN_PUSH_LEFT)
90 #define SOKOBAN_MOVE_MIN SOKOBAN_MOVE_DOWN
92 /* variable button definitions */
93 #if (CONFIG_KEYPAD == RECORDER_PAD) || \
94 (CONFIG_KEYPAD == ARCHOS_AV300_PAD)
95 #define SOKOBAN_LEFT BUTTON_LEFT
96 #define SOKOBAN_RIGHT BUTTON_RIGHT
97 #define SOKOBAN_UP BUTTON_UP
98 #define SOKOBAN_DOWN BUTTON_DOWN
99 #define SOKOBAN_MENU BUTTON_OFF
100 #define SOKOBAN_UNDO BUTTON_ON
101 #define SOKOBAN_REDO BUTTON_PLAY
102 #define SOKOBAN_LEVEL_DOWN BUTTON_F1
103 #define SOKOBAN_LEVEL_REPEAT BUTTON_F2
104 #define SOKOBAN_LEVEL_UP BUTTON_F3
105 #define SOKOBAN_PAUSE BUTTON_PLAY
106 #define BUTTON_SAVE BUTTON_ON
107 #define BUTTON_SAVE_NAME "ON"
109 #elif CONFIG_KEYPAD == ONDIO_PAD
110 #define SOKOBAN_LEFT BUTTON_LEFT
111 #define SOKOBAN_RIGHT BUTTON_RIGHT
112 #define SOKOBAN_UP BUTTON_UP
113 #define SOKOBAN_DOWN BUTTON_DOWN
114 #define SOKOBAN_MENU BUTTON_OFF
115 #define SOKOBAN_UNDO_PRE BUTTON_MENU
116 #define SOKOBAN_UNDO (BUTTON_MENU | BUTTON_REL)
117 #define SOKOBAN_REDO (BUTTON_MENU | BUTTON_DOWN)
118 #define SOKOBAN_LEVEL_DOWN (BUTTON_MENU | BUTTON_LEFT)
119 #define SOKOBAN_LEVEL_REPEAT (BUTTON_MENU | BUTTON_UP)
120 #define SOKOBAN_LEVEL_UP (BUTTON_MENU | BUTTON_RIGHT)
121 #define SOKOBAN_PAUSE BUTTON_MENU
122 #define BUTTON_SAVE BUTTON_MENU
123 #define BUTTON_SAVE_NAME "MENU"
125 #elif (CONFIG_KEYPAD == IRIVER_H100_PAD) || \
126 (CONFIG_KEYPAD == IRIVER_H300_PAD)
127 #define SOKOBAN_LEFT BUTTON_LEFT
128 #define SOKOBAN_RIGHT BUTTON_RIGHT
129 #define SOKOBAN_UP BUTTON_UP
130 #define SOKOBAN_DOWN BUTTON_DOWN
131 #define SOKOBAN_MENU BUTTON_OFF
132 #define SOKOBAN_UNDO BUTTON_REC
133 #define SOKOBAN_REDO BUTTON_MODE
134 #define SOKOBAN_LEVEL_DOWN (BUTTON_ON | BUTTON_DOWN)
135 #define SOKOBAN_LEVEL_REPEAT BUTTON_ON
136 #define SOKOBAN_LEVEL_UP (BUTTON_ON | BUTTON_UP)
137 #define SOKOBAN_PAUSE BUTTON_ON
138 #define BUTTON_SAVE BUTTON_MODE
139 #define BUTTON_SAVE_NAME "MODE"
141 #define SOKOBAN_RC_MENU BUTTON_RC_STOP
143 #elif (CONFIG_KEYPAD == IPOD_4G_PAD) || \
144 (CONFIG_KEYPAD == IPOD_3G_PAD) || \
145 (CONFIG_KEYPAD == IPOD_1G2G_PAD)
146 #define SOKOBAN_LEFT BUTTON_LEFT
147 #define SOKOBAN_RIGHT BUTTON_RIGHT
148 #define SOKOBAN_UP BUTTON_MENU
149 #define SOKOBAN_DOWN BUTTON_PLAY
150 #define SOKOBAN_MENU (BUTTON_SELECT | BUTTON_MENU)
151 #define SOKOBAN_UNDO_PRE BUTTON_SELECT
152 #define SOKOBAN_UNDO (BUTTON_SELECT | BUTTON_REL)
153 #define SOKOBAN_REDO (BUTTON_SELECT | BUTTON_PLAY)
154 #define SOKOBAN_LEVEL_DOWN (BUTTON_SELECT | BUTTON_LEFT)
155 #define SOKOBAN_LEVEL_UP (BUTTON_SELECT | BUTTON_RIGHT)
156 #define SOKOBAN_PAUSE BUTTON_SELECT
157 #define BUTTON_SAVE BUTTON_SELECT
158 #define BUTTON_SAVE_NAME "SELECT"
160 /* FIXME: if/when simultaneous button presses work for X5/M5,
161 * add level up/down */
162 #elif CONFIG_KEYPAD == IAUDIO_X5M5_PAD
163 #define SOKOBAN_LEFT BUTTON_LEFT
164 #define SOKOBAN_RIGHT BUTTON_RIGHT
165 #define SOKOBAN_UP BUTTON_UP
166 #define SOKOBAN_DOWN BUTTON_DOWN
167 #define SOKOBAN_MENU BUTTON_POWER
168 #define SOKOBAN_UNDO_PRE BUTTON_SELECT
169 #define SOKOBAN_UNDO (BUTTON_SELECT | BUTTON_REL)
170 #define SOKOBAN_LEVEL_REPEAT BUTTON_REC
171 #define SOKOBAN_REDO BUTTON_PLAY
172 #define SOKOBAN_PAUSE BUTTON_PLAY
173 #define BUTTON_SAVE BUTTON_SELECT
174 #define BUTTON_SAVE_NAME "SELECT"
176 #elif CONFIG_KEYPAD == IRIVER_H10_PAD
177 #define SOKOBAN_LEFT BUTTON_LEFT
178 #define SOKOBAN_RIGHT BUTTON_RIGHT
179 #define SOKOBAN_UP BUTTON_SCROLL_UP
180 #define SOKOBAN_DOWN BUTTON_SCROLL_DOWN
181 #define SOKOBAN_MENU BUTTON_POWER
182 #define SOKOBAN_UNDO_PRE BUTTON_REW
183 #define SOKOBAN_UNDO (BUTTON_REW | BUTTON_REL)
184 #define SOKOBAN_REDO BUTTON_FF
185 #define SOKOBAN_LEVEL_DOWN (BUTTON_PLAY | BUTTON_SCROLL_DOWN)
186 #define SOKOBAN_LEVEL_REPEAT (BUTTON_PLAY | BUTTON_RIGHT)
187 #define SOKOBAN_LEVEL_UP (BUTTON_PLAY | BUTTON_SCROLL_UP)
188 #define SOKOBAN_PAUSE BUTTON_PLAY
189 #define BUTTON_SAVE BUTTON_PLAY
190 #define BUTTON_SAVE_NAME "PLAY"
192 #elif CONFIG_KEYPAD == GIGABEAT_PAD
193 #define SOKOBAN_LEFT BUTTON_LEFT
194 #define SOKOBAN_RIGHT BUTTON_RIGHT
195 #define SOKOBAN_UP BUTTON_UP
196 #define SOKOBAN_DOWN BUTTON_DOWN
197 #define SOKOBAN_MENU BUTTON_POWER
198 #define SOKOBAN_UNDO BUTTON_SELECT
199 #define SOKOBAN_REDO BUTTON_A
200 #define SOKOBAN_LEVEL_DOWN BUTTON_VOL_DOWN
201 #define SOKOBAN_LEVEL_REPEAT BUTTON_MENU
202 #define SOKOBAN_LEVEL_UP BUTTON_VOL_UP
203 #define SOKOBAN_PAUSE BUTTON_SELECT
204 #define BUTTON_SAVE BUTTON_SELECT
205 #define BUTTON_SAVE_NAME "SELECT"
207 #elif CONFIG_KEYPAD == SANSA_E200_PAD
208 #define SOKOBAN_LEFT BUTTON_LEFT
209 #define SOKOBAN_RIGHT BUTTON_RIGHT
210 #define SOKOBAN_UP BUTTON_UP
211 #define SOKOBAN_DOWN BUTTON_DOWN
212 #define SOKOBAN_MENU BUTTON_POWER
213 #define SOKOBAN_UNDO_PRE BUTTON_SELECT
214 #define SOKOBAN_UNDO (BUTTON_SELECT | BUTTON_REL)
215 #define SOKOBAN_REDO BUTTON_REC
216 #define SOKOBAN_LEVEL_DOWN (BUTTON_SELECT | BUTTON_DOWN)
217 #define SOKOBAN_LEVEL_REPEAT (BUTTON_SELECT | BUTTON_RIGHT)
218 #define SOKOBAN_LEVEL_UP (BUTTON_SELECT | BUTTON_UP)
219 #define SOKOBAN_PAUSE BUTTON_SELECT
220 #define BUTTON_SAVE BUTTON_SELECT
221 #define BUTTON_SAVE_NAME "SELECT"
223 #elif CONFIG_KEYPAD == SANSA_FUZE_PAD
224 #define SOKOBAN_LEFT BUTTON_LEFT
225 #define SOKOBAN_RIGHT BUTTON_RIGHT
226 #define SOKOBAN_UP BUTTON_UP
227 #define SOKOBAN_DOWN BUTTON_DOWN
228 #define SOKOBAN_MENU (BUTTON_HOME|BUTTON_REPEAT)
229 #define SOKOBAN_UNDO_PRE BUTTON_SELECT
230 #define SOKOBAN_UNDO (BUTTON_SELECT | BUTTON_REL)
231 #define SOKOBAN_REDO (BUTTON_SELECT | BUTTON_LEFT)
232 #define SOKOBAN_LEVEL_DOWN (BUTTON_SELECT | BUTTON_DOWN)
233 #define SOKOBAN_LEVEL_REPEAT (BUTTON_SELECT | BUTTON_RIGHT)
234 #define SOKOBAN_LEVEL_UP (BUTTON_SELECT | BUTTON_UP)
235 #define SOKOBAN_PAUSE BUTTON_SELECT
236 #define BUTTON_SAVE BUTTON_SELECT
237 #define BUTTON_SAVE_NAME "SELECT"
239 #elif CONFIG_KEYPAD == SANSA_C200_PAD
240 #define SOKOBAN_LEFT BUTTON_LEFT
241 #define SOKOBAN_RIGHT BUTTON_RIGHT
242 #define SOKOBAN_UP BUTTON_UP
243 #define SOKOBAN_DOWN BUTTON_DOWN
244 #define SOKOBAN_MENU BUTTON_POWER
245 #define SOKOBAN_UNDO_PRE BUTTON_SELECT
246 #define SOKOBAN_UNDO (BUTTON_SELECT | BUTTON_REL)
247 #define SOKOBAN_REDO BUTTON_REC
248 #define SOKOBAN_LEVEL_DOWN BUTTON_VOL_DOWN
249 #define SOKOBAN_LEVEL_REPEAT (BUTTON_SELECT | BUTTON_RIGHT)
250 #define SOKOBAN_LEVEL_UP BUTTON_VOL_UP
251 #define SOKOBAN_PAUSE BUTTON_SELECT
252 #define BUTTON_SAVE BUTTON_SELECT
253 #define BUTTON_SAVE_NAME "SELECT"
255 #elif CONFIG_KEYPAD == SANSA_CLIP_PAD
256 #define SOKOBAN_LEFT BUTTON_LEFT
257 #define SOKOBAN_RIGHT BUTTON_RIGHT
258 #define SOKOBAN_UP BUTTON_UP
259 #define SOKOBAN_DOWN BUTTON_DOWN
260 #define SOKOBAN_MENU BUTTON_POWER
261 #define SOKOBAN_UNDO_PRE BUTTON_SELECT
262 #define SOKOBAN_UNDO (BUTTON_SELECT | BUTTON_REL)
263 #define SOKOBAN_REDO BUTTON_HOME
264 #define SOKOBAN_LEVEL_DOWN BUTTON_VOL_DOWN
265 #define SOKOBAN_LEVEL_REPEAT (BUTTON_SELECT | BUTTON_RIGHT)
266 #define SOKOBAN_LEVEL_UP BUTTON_VOL_UP
267 #define SOKOBAN_PAUSE BUTTON_SELECT
268 #define BUTTON_SAVE BUTTON_SELECT
269 #define BUTTON_SAVE_NAME "SELECT"
271 #elif CONFIG_KEYPAD == SANSA_M200_PAD
272 #define SOKOBAN_LEFT BUTTON_LEFT
273 #define SOKOBAN_RIGHT BUTTON_RIGHT
274 #define SOKOBAN_UP BUTTON_UP
275 #define SOKOBAN_DOWN BUTTON_DOWN
276 #define SOKOBAN_MENU BUTTON_POWER
277 #define SOKOBAN_UNDO_PRE BUTTON_SELECT
278 #define SOKOBAN_UNDO (BUTTON_SELECT | BUTTON_REL)
279 #define SOKOBAN_REDO (BUTTON_SELECT | BUTTON_UP)
280 #define SOKOBAN_LEVEL_DOWN BUTTON_VOL_DOWN
281 #define SOKOBAN_LEVEL_REPEAT (BUTTON_SELECT | BUTTON_RIGHT)
282 #define SOKOBAN_LEVEL_UP BUTTON_VOL_UP
283 #define SOKOBAN_PAUSE BUTTON_SELECT
284 #define BUTTON_SAVE BUTTON_SELECT
285 #define BUTTON_SAVE_NAME "SELECT"
287 #elif CONFIG_KEYPAD == GIGABEAT_S_PAD
288 #define SOKOBAN_LEFT BUTTON_LEFT
289 #define SOKOBAN_RIGHT BUTTON_RIGHT
290 #define SOKOBAN_UP BUTTON_UP
291 #define SOKOBAN_DOWN BUTTON_DOWN
292 #define SOKOBAN_MENU BUTTON_MENU
293 #define SOKOBAN_UNDO BUTTON_VOL_UP
294 #define SOKOBAN_REDO BUTTON_VOL_DOWN
295 #define SOKOBAN_LEVEL_DOWN BUTTON_PREV
296 #define SOKOBAN_LEVEL_REPEAT BUTTON_PLAY
297 #define SOKOBAN_LEVEL_UP BUTTON_NEXT
298 #define SOKOBAN_PAUSE BUTTON_SELECT
299 #define BUTTON_SAVE BUTTON_SELECT
300 #define BUTTON_SAVE_NAME "SELECT"
302 #elif CONFIG_KEYPAD == MROBE100_PAD
303 #define SOKOBAN_LEFT BUTTON_LEFT
304 #define SOKOBAN_RIGHT BUTTON_RIGHT
305 #define SOKOBAN_UP BUTTON_UP
306 #define SOKOBAN_DOWN BUTTON_DOWN
307 #define SOKOBAN_MENU BUTTON_POWER
308 #define SOKOBAN_UNDO BUTTON_SELECT
309 #define SOKOBAN_REDO BUTTON_MENU
310 #define SOKOBAN_LEVEL_DOWN (BUTTON_DISPLAY | BUTTON_DOWN)
311 #define SOKOBAN_LEVEL_REPEAT (BUTTON_DISPLAY | BUTTON_RIGHT)
312 #define SOKOBAN_LEVEL_UP (BUTTON_DISPLAY | BUTTON_UP)
313 #define SOKOBAN_PAUSE BUTTON_SELECT
314 #define BUTTON_SAVE BUTTON_SELECT
315 #define BUTTON_SAVE_NAME "SELECT"
317 #elif CONFIG_KEYPAD == IAUDIO_M3_PAD
318 #define SOKOBAN_LEFT BUTTON_RC_REW
319 #define SOKOBAN_RIGHT BUTTON_RC_FF
320 #define SOKOBAN_UP BUTTON_RC_VOL_UP
321 #define SOKOBAN_DOWN BUTTON_RC_VOL_DOWN
322 #define SOKOBAN_MENU BUTTON_RC_REC
323 #define SOKOBAN_UNDO BUTTON_RC_MODE
324 #define SOKOBAN_REDO BUTTON_RC_MENU
325 #define SOKOBAN_PAUSE BUTTON_RC_PLAY
326 #define BUTTON_SAVE BUTTON_RC_PLAY
327 #define BUTTON_SAVE_NAME "PLAY"
329 #define SOKOBAN_RC_MENU BUTTON_REC
331 #elif CONFIG_KEYPAD == COWOND2_PAD
332 #define SOKOBAN_MENU BUTTON_MENU
333 #define SOKOBAN_MENU_NAME "[MENU]"
335 #elif CONFIG_KEYPAD == IAUDIO67_PAD
336 #define SOKOBAN_LEFT BUTTON_LEFT
337 #define SOKOBAN_RIGHT BUTTON_RIGHT
338 #define SOKOBAN_UP BUTTON_STOP
339 #define SOKOBAN_DOWN BUTTON_PLAY
340 #define SOKOBAN_MENU BUTTON_MENU
341 #define SOKOBAN_UNDO BUTTON_VOLDOWN
342 #define SOKOBAN_REDO BUTTON_VOLUP
343 #define SOKOBAN_PAUSE (BUTTON_MENU|BUTTON_LEFT)
344 #define BUTTON_SAVE (BUTTON_MENU|BUTTON_PLAY)
345 #define BUTTON_SAVE_NAME "MENU+PLAY"
347 #define SOKOBAN_RC_MENU (BUTTON_MENU|BUTTON_STOP)
349 #elif CONFIG_KEYPAD == CREATIVEZVM_PAD
350 #define SOKOBAN_LEFT BUTTON_LEFT
351 #define SOKOBAN_RIGHT BUTTON_RIGHT
352 #define SOKOBAN_UP BUTTON_UP
353 #define SOKOBAN_DOWN BUTTON_DOWN
354 #define SOKOBAN_MENU BUTTON_MENU
355 #define SOKOBAN_UNDO BUTTON_BACK
356 #define SOKOBAN_REDO (BUTTON_BACK | BUTTON_PLAY)
357 #define SOKOBAN_LEVEL_DOWN (BUTTON_SELECT | BUTTON_DOWN)
358 #define SOKOBAN_LEVEL_REPEAT (BUTTON_SELECT | BUTTON_RIGHT)
359 #define SOKOBAN_LEVEL_UP (BUTTON_SELECT | BUTTON_UP)
360 #define SOKOBAN_PAUSE BUTTON_PLAY
361 #define BUTTON_SAVE BUTTON_CUSTOM
362 #define BUTTON_SAVE_NAME "CUSTOM"
364 #elif CONFIG_KEYPAD == PHILIPS_HDD1630_PAD
365 #define SOKOBAN_LEFT BUTTON_LEFT
366 #define SOKOBAN_RIGHT BUTTON_RIGHT
367 #define SOKOBAN_UP BUTTON_UP
368 #define SOKOBAN_DOWN BUTTON_DOWN
369 #define SOKOBAN_MENU BUTTON_MENU
370 #define SOKOBAN_UNDO BUTTON_VIEW
371 #define SOKOBAN_REDO (BUTTON_SELECT | BUTTON_VIEW)
372 #define SOKOBAN_LEVEL_DOWN BUTTON_VOL_DOWN
373 #define SOKOBAN_LEVEL_REPEAT BUTTON_POWER
374 #define SOKOBAN_LEVEL_UP BUTTON_VOL_UP
375 #define SOKOBAN_PAUSE BUTTON_SELECT
376 #define BUTTON_SAVE BUTTON_PLAYLIST
377 #define BUTTON_SAVE_NAME "PLAYLIST"
379 #elif CONFIG_KEYPAD == ONDAVX747_PAD
380 #define SOKOBAN_MENU BUTTON_MENU
381 #define SOKOBAN_MENU_NAME "[MENU]"
383 #elif CONFIG_KEYPAD == MROBE500_PAD
385 #define SOKOBAN_MENU BUTTON_POWER
386 #define SOKOBAN_MENU_NAME "[POWER]"
388 #elif CONFIG_KEYPAD == SAMSUNG_YH_PAD
389 #define SOKOBAN_LEFT BUTTON_LEFT
390 #define SOKOBAN_RIGHT BUTTON_RIGHT
391 #define SOKOBAN_UP BUTTON_UP
392 #define SOKOBAN_DOWN BUTTON_DOWN
393 #define SOKOBAN_MENU BUTTON_REC
394 #define SOKOBAN_UNDO_PRE BUTTON_REW
395 #define SOKOBAN_UNDO (BUTTON_REW | BUTTON_LEFT)
396 #define SOKOBAN_REDO BUTTON_FFWD
397 #define SOKOBAN_LEVEL_DOWN (BUTTON_PLAY | BUTTON_DOWN)
398 #define SOKOBAN_LEVEL_REPEAT (BUTTON_PLAY | BUTTON_RIGHT)
399 #define SOKOBAN_LEVEL_UP (BUTTON_PLAY | BUTTON_UP)
400 #define SOKOBAN_PAUSE BUTTON_PLAY
401 #define BUTTON_SAVE BUTTON_PLAY
402 #define BUTTON_SAVE_NAME "PLAY"
404 #else
405 #error No keymap defined!
406 #endif
408 #ifdef HAVE_TOUCHSCREEN
409 #ifndef SOKOBAN_LEFT
410 #define SOKOBAN_LEFT BUTTON_MIDLEFT
411 #endif
412 #ifndef SOKOBAN_RIGHT
413 #define SOKOBAN_RIGHT BUTTON_MIDRIGHT
414 #endif
415 #ifndef SOKOBAN_UP
416 #define SOKOBAN_UP BUTTON_TOPMIDDLE
417 #endif
418 #ifndef SOKOBAN_DOWN
419 #define SOKOBAN_DOWN BUTTON_BOTTOMMIDDLE
420 #endif
421 #ifndef SOKOBAN_MENU
422 #define SOKOBAN_MENU BUTTON_TOPLEFT
423 #define SOKOBAN_MENU_NAME "[TOPLEFT]"
424 #endif
425 #ifndef SOKOBAN_UNDO
426 #define SOKOBAN_UNDO BUTTON_BOTTOMRIGHT
427 #define SOKOBAN_UNDO_NAME "[BOTTOMRIGHT]"
428 #endif
429 #ifndef SOKOBAN_REDO
430 #define SOKOBAN_REDO BUTTON_BOTTOMLEFT
431 #define SOKOBAN_REDO_NAME "[BOTTOMLEFT]"
432 #endif
433 #ifndef SOKOBAN_PAUSE
434 #define SOKOBAN_PAUSE BUTTON_CENTER
435 #define SOKOBAN_PAUSE_NAME "[CENTER]"
436 #endif
437 #ifndef SOKOBAN_LEVEL_REPEAT
438 #define SOKOBAN_LEVEL_REPEAT BUTTON_TOPRIGHT
439 #define SOKOBAN_LEVEL_REPEAT_NAME "[TOPRIGHT]"
440 #endif
441 #ifndef BUTTON_SAVE
442 #define BUTTON_SAVE BUTTON_CENTER
443 #define BUTTON_SAVE_NAME "CENTER"
444 #endif
445 #endif
447 #define SOKOBAN_FONT FONT_SYSFIXED
450 /* The Location, Undo and LevelInfo structs are OO-flavored.
451 * (oooh!-flavored as Schnueff puts it.) It makes more you have to know,
452 * but the overall data layout becomes more manageable. */
454 /* Level data & stats */
455 struct LevelInfo {
456 int index; /* Level index (level number - 1) */
457 int moves; /* Moves & pushes for the stats */
458 int pushes;
459 short boxes_to_go; /* Number of unplaced boxes remaining in level */
460 short height; /* Height & width for centering level display */
461 short width;
464 struct Location {
465 short row;
466 short col;
469 /* Our full undo history */
470 static struct UndoInfo {
471 int count; /* How many undos have been done */
472 int current; /* Which history is the current undo */
473 int max; /* Which history is the max redoable */
474 char history[MAX_UNDOS];
475 } undo_info;
477 /* Our playing board */
478 static struct BoardInfo {
479 char board[ROWS][COLS]; /* The current board data */
480 struct LevelInfo level; /* Level data & stats */
481 struct Location player; /* Where the player is */
482 int max_level; /* The number of levels we have */
483 } current_info;
485 static struct BufferedBoards {
486 char filename[MAX_PATH]; /* Filename of the levelset we're using */
487 char data[MAX_LEVEL_DATA]; /* Buffered level data */
488 int index[MAX_LEVELS + 1]; /* Where each buffered board begins & ends */
489 int start; /* Index of first buffered board */
490 int end; /* Index of last buffered board */
491 short prebuffered_boards; /* Number of boards before current to store */
492 } buffered_boards;
495 static char buf[ROWS*(COLS + 1)]; /* Enough for a whole board or a filename */
498 static void init_undo(void)
500 undo_info.count = 0;
501 undo_info.current = 0;
502 undo_info.max = 0;
505 static void get_delta(char direction, short *d_r, short *d_c)
507 switch (direction) {
508 case SOKOBAN_PUSH_LEFT:
509 case SOKOBAN_MOVE_LEFT:
510 *d_r = 0;
511 *d_c = -1;
512 break;
513 case SOKOBAN_PUSH_RIGHT:
514 case SOKOBAN_MOVE_RIGHT:
515 *d_r = 0;
516 *d_c = 1;
517 break;
518 case SOKOBAN_PUSH_UP:
519 case SOKOBAN_MOVE_UP:
520 *d_r = -1;
521 *d_c = 0;
522 break;
523 case SOKOBAN_PUSH_DOWN:
524 case SOKOBAN_MOVE_DOWN:
525 *d_r = 1;
526 *d_c = 0;
530 static bool undo(void)
532 char undo;
533 short r, c;
534 short d_r = 0, d_c = 0; /* delta row & delta col */
535 char *space_cur, *space_next, *space_prev;
536 bool undo_push = false;
538 /* If no more undos or we've wrapped all the way around, quit */
539 if (undo_info.count == 0 || undo_info.current - 1 == undo_info.max)
540 return false;
542 /* Move to previous undo in the list */
543 if (undo_info.current == 0 && undo_info.count > 1)
544 undo_info.current = MAX_UNDOS - 1;
545 else
546 undo_info.current--;
548 undo_info.count--;
550 undo = undo_info.history[undo_info.current];
552 if (undo < SOKOBAN_MOVE_MIN)
553 undo_push = true;
555 get_delta(undo, &d_r, &d_c);
557 r = current_info.player.row;
558 c = current_info.player.col;
560 /* Give the 3 spaces we're going to use better names */
561 space_cur = &current_info.board[r][c];
562 space_next = &current_info.board[r + d_r][c + d_c];
563 space_prev = &current_info.board[r - d_r][c - d_c];
565 /* Update board info */
566 if (undo_push) {
567 /* Moving box from goal to floor */
568 if (*space_next == '*' && *space_cur == '@')
569 current_info.level.boxes_to_go++;
570 /* Moving box from floor to goal */
571 else if (*space_next == '$' && *space_cur == '+')
572 current_info.level.boxes_to_go--;
574 /* Move box off of next space... */
575 *space_next = (*space_next == '*' ? '.' : ' ');
576 /* ...and on to current space */
577 *space_cur = (*space_cur == '+' ? '*' : '$');
579 current_info.level.pushes--;
580 } else
581 /* Just move player off of current space */
582 *space_cur = (*space_cur == '+' ? '.' : ' ');
583 /* Move player back to previous space */
584 *space_prev = (*space_prev == '.' ? '+' : '@');
586 /* Update position */
587 current_info.player.row -= d_r;
588 current_info.player.col -= d_c;
590 current_info.level.moves--;
592 return true;
595 static void add_undo(char undo)
597 undo_info.history[undo_info.current] = undo;
599 /* Wrap around if MAX_UNDOS exceeded */
600 if (undo_info.current < (MAX_UNDOS - 1))
601 undo_info.current++;
602 else
603 undo_info.current = 0;
605 if (undo_info.count < MAX_UNDOS)
606 undo_info.count++;
609 static bool move(char direction, bool redo)
611 short r, c;
612 short d_r = 0, d_c = 0; /* delta row & delta col */
613 char *space_cur, *space_next, *space_beyond;
614 bool push = false;
616 get_delta(direction, &d_r, &d_c);
618 r = current_info.player.row;
619 c = current_info.player.col;
621 /* Check for out-of-bounds */
622 if (r + 2*d_r < 0 || r + 2*d_r >= ROWS ||
623 c + 2*d_c < 0 || c + 2*d_c >= COLS)
624 return false;
626 /* Give the 3 spaces we're going to use better names */
627 space_cur = &current_info.board[r][c];
628 space_next = &current_info.board[r + d_r][c + d_c];
629 space_beyond = &current_info.board[r + 2*d_r][c + 2*d_c];
631 if (*space_next == '$' || *space_next == '*') {
632 /* Change direction from move to push for undo */
633 if (direction >= SOKOBAN_MOVE_MIN)
634 direction -= SOKOBAN_MOVE_DIFF;
635 push = true;
637 else if (direction < SOKOBAN_MOVE_MIN)
638 /* Change back to move if redo/solution playback push is invalid */
639 direction += SOKOBAN_MOVE_DIFF;
641 /* Update board info */
642 if (push) {
643 /* Moving box from goal to floor */
644 if (*space_next == '*' && *space_beyond == ' ')
645 current_info.level.boxes_to_go++;
646 /* Moving box from floor to goal */
647 else if (*space_next == '$' && *space_beyond == '.')
648 current_info.level.boxes_to_go--;
649 /* Check for invalid move */
650 else if (*space_beyond != '.' && *space_beyond != ' ')
651 return false;
653 /* Move player onto next space */
654 *space_next = (*space_next == '*' ? '+' : '@');
655 /* Move box onto space beyond next */
656 *space_beyond = (*space_beyond == '.' ? '*' : '$');
658 current_info.level.pushes++;
659 } else {
660 /* Check for invalid move */
661 if (*space_next != '.' && *space_next != ' ')
662 return false;
664 /* Move player onto next space */
665 *space_next = (*space_next == '.' ? '+' : '@');
667 /* Move player off of current space */
668 *space_cur = (*space_cur == '+' ? '.' : ' ');
670 /* Update position */
671 current_info.player.row += d_r;
672 current_info.player.col += d_c;
674 current_info.level.moves++;
676 /* Update undo_info.max to current on every normal move,
677 * except if it's the same as a redo. */
678 /* normal move and either */
679 if (!redo &&
680 /* moves have been undone... */
681 ((undo_info.max != undo_info.current &&
682 /* ...and the current move is NOT the same as the one in history */
683 undo_info.history[undo_info.current] != direction) ||
684 /* or moves have not been undone */
685 undo_info.max == undo_info.current)) {
686 add_undo(direction);
687 undo_info.max = undo_info.current;
688 } else /* redo move or move was same as redo */
689 add_undo(direction); /* add_undo to update current */
691 return true;
694 #ifdef SOKOBAN_REDO
695 static bool redo(void)
697 /* If no moves have been undone, quit */
698 if (undo_info.current == undo_info.max)
699 return false;
701 return move(undo_info.history[(undo_info.current < MAX_UNDOS ?
702 undo_info.current : 0)], true);
704 #endif
706 static void init_boards(void)
708 rb->strlcpy(buffered_boards.filename, SOKOBAN_LEVELS_FILE,
709 sizeof(buffered_boards.filename));
711 current_info.level.index = 0;
712 current_info.player.row = 0;
713 current_info.player.col = 0;
714 current_info.max_level = 0;
716 buffered_boards.start = 0;
717 buffered_boards.end = 0;
718 buffered_boards.prebuffered_boards = 0;
720 init_undo();
723 static bool read_levels(bool initialize)
725 int fd = 0;
726 short len;
727 short lastlen = 0;
728 short row = 0;
729 int level_count = 0;
731 int i = 0;
732 int level_len = 0;
733 bool index_set = false;
735 /* Get the index of the first level to buffer */
736 if (current_info.level.index > buffered_boards.prebuffered_boards &&
737 !initialize)
738 buffered_boards.start = current_info.level.index -
739 buffered_boards.prebuffered_boards;
740 else
741 buffered_boards.start = 0;
743 if ((fd = rb->open(buffered_boards.filename, O_RDONLY)) < 0) {
744 rb->splashf(HZ*2, "Unable to open %s", buffered_boards.filename);
745 return false;
748 do {
749 len = rb->read_line(fd, buf, sizeof(buf));
751 /* Correct len when trailing \r's or \n's are counted */
752 if (len > 2 && buf[len - 2] == '\0')
753 len -= 2;
754 else if (len > 1 && buf[len - 1] == '\0')
755 len--;
757 /* Skip short lines & lines with non-level data */
758 if (len >= 3 && ((buf[0] >= '1' && buf[0] <= '9') || buf[0] == '#' ||
759 buf[0] == ' ' || buf[0] == '-' || buf[0] == '_')) {
760 if (level_count >= buffered_boards.start) {
761 /* Set the index of this level */
762 if (!index_set &&
763 level_count - buffered_boards.start < MAX_LEVELS) {
764 buffered_boards.index[level_count - buffered_boards.start]
765 = i;
766 index_set = true;
768 /* Copy buffer to board data */
769 if (i + level_len + len < MAX_LEVEL_DATA) {
770 rb->memcpy(&buffered_boards.data[i + level_len], buf, len);
771 buffered_boards.data[i + level_len + len] = '\n';
774 level_len += len + 1;
775 row++;
777 /* If newline & level is tall enough or is RLE */
778 } else if (buf[0] == '\0' && (row > 2 || lastlen > 22)) {
779 level_count++;
780 if (level_count >= buffered_boards.start) {
781 i += level_len;
782 if (i < MAX_LEVEL_DATA)
783 buffered_boards.end = level_count;
784 else if (!initialize)
785 break;
787 row = 0;
788 level_len = 0;
789 index_set = false;
791 } else if (len > 22)
792 len = 1;
794 } while ((lastlen = len));
796 /* Set the index of the end of the last level */
797 if (level_count - buffered_boards.start < MAX_LEVELS)
798 buffered_boards.index[level_count - buffered_boards.start] = i;
800 if (initialize) {
801 current_info.max_level = level_count;
802 buffered_boards.prebuffered_boards = buffered_boards.end/2;
805 rb->close(fd);
807 return true;
810 static void load_level(void)
812 int c, r;
813 int i, n;
814 int level_size;
815 int index = current_info.level.index - buffered_boards.start;
816 char *level;
818 /* Get the buffered board index of the current level */
819 if (current_info.level.index < buffered_boards.start ||
820 current_info.level.index >= buffered_boards.end) {
821 read_levels(false);
822 if (current_info.level.index > buffered_boards.prebuffered_boards)
823 index = buffered_boards.prebuffered_boards;
824 else
825 index = current_info.level.index;
827 level = &buffered_boards.data[buffered_boards.index[index]];
829 /* Reset level info */
830 current_info.level.moves = 0;
831 current_info.level.pushes = 0;
832 current_info.level.boxes_to_go = 0;
833 current_info.level.width = 0;
835 /* Clear board */
836 for (r = 0; r < ROWS; r++)
837 for (c = 0; c < COLS; c++)
838 current_info.board[r][c] = 'X';
840 level_size = buffered_boards.index[index + 1] -
841 buffered_boards.index[index];
843 for (r = 0, c = 0, n = 1, i = 0; i < level_size; i++) {
844 if (level[i] == '\n' || level[i] == '|') {
845 if (c > 3) {
846 /* Update max width of level & go to next row */
847 if (c > current_info.level.width)
848 current_info.level.width = c;
849 c = 0;
850 r++;
851 if (r >= ROWS)
852 break;
854 } else if (c < COLS) {
855 /* Read RLE character's length into n */
856 if (level[i] >= '0' && level[i] <= '9') {
857 n = level[i++] - '0';
858 if (level[i] >= '0' && level[i] <= '9')
859 n = n*10 + level[i++] - '0';
862 /* Cleanup & replace */
863 if (level[i] == '%')
864 level[i] = '*';
865 else if (level[i] == '-' || level[i] == '_')
866 level[i] = ' ';
868 if (n > 1) {
869 if (c + n >= COLS)
870 n = COLS - c;
872 if (level[i] == '.')
873 current_info.level.boxes_to_go += n;
875 /* Put RLE character n times */
876 while (n--)
877 current_info.board[r][c++] = level[i];
878 n = 1;
880 } else {
881 if (level[i] == '.' || level[i] == '+')
882 current_info.level.boxes_to_go++;
884 if (level[i] == '@' ||level[i] == '+') {
885 current_info.player.row = r;
886 current_info.player.col = c;
889 current_info.board[r][c++] = level[i];
894 current_info.level.height = r;
896 #if LCD_DEPTH > 2
897 /* Fill in blank space outside level on color targets */
898 for (r = 0; r < ROWS; r++)
899 for (c = 0; current_info.board[r][c] == ' ' && c < COLS; c++)
900 current_info.board[r][c] = 'X';
902 for (c = 0; c < COLS; c++) {
903 for (r = 0; (current_info.board[r][c] == ' ' ||
904 current_info.board[r][c] == 'X') && r < ROWS; r++)
905 current_info.board[r][c] = 'X';
906 for (r = ROWS - 1; (current_info.board[r][c] == ' ' ||
907 current_info.board[r][c] == 'X') && r >= 0; r--)
908 current_info.board[r][c] = 'X';
910 #endif
913 static void update_screen(void)
915 int c, r;
916 int rows, cols;
918 #if LCD_WIDTH - (COLS*SOKOBAN_TILESIZE) < 32
919 #define STAT_HEIGHT 25
920 #define STAT_X (LCD_WIDTH - 120)/2
921 #define STAT_Y (LCD_HEIGHT - STAT_HEIGHT)
922 #define BOARD_WIDTH LCD_WIDTH
923 #define BOARD_HEIGHT (LCD_HEIGHT - STAT_HEIGHT)
924 rb->lcd_putsxy(STAT_X + 4, STAT_Y + 4, "Level");
925 rb->snprintf(buf, sizeof(buf), "%d", current_info.level.index + 1);
926 rb->lcd_putsxy(STAT_X + 7, STAT_Y + 14, buf);
927 rb->lcd_putsxy(STAT_X + 41, STAT_Y + 4, "Moves");
928 rb->snprintf(buf, sizeof(buf), "%d", current_info.level.moves);
929 rb->lcd_putsxy(STAT_X + 44, STAT_Y + 14, buf);
930 rb->lcd_putsxy(STAT_X + 79, STAT_Y + 4, "Pushes");
931 rb->snprintf(buf, sizeof(buf), "%d", current_info.level.pushes);
932 rb->lcd_putsxy(STAT_X + 82, STAT_Y + 14, buf);
934 rb->lcd_drawrect(STAT_X, STAT_Y, 38, STAT_HEIGHT);
935 rb->lcd_drawrect(STAT_X + 37, STAT_Y, 39, STAT_HEIGHT);
936 rb->lcd_drawrect(STAT_X + 75, STAT_Y, 45, STAT_HEIGHT);
937 #else
938 #if LCD_WIDTH - (COLS*SOKOBAN_TILESIZE) > 40
939 #define STAT_X (LCD_WIDTH - 40)
940 #else
941 #define STAT_X COLS*SOKOBAN_TILESIZE
942 #endif
943 #define STAT_Y (LCD_HEIGHT - 64)/2
944 #define STAT_WIDTH (LCD_WIDTH - STAT_X)
945 #define BOARD_WIDTH (LCD_WIDTH - STAT_WIDTH)
946 #define BOARD_HEIGHT LCD_HEIGHT
947 rb->lcd_putsxy(STAT_X + 1, STAT_Y + 2, "Level");
948 rb->snprintf(buf, sizeof(buf), "%d", current_info.level.index + 1);
949 rb->lcd_putsxy(STAT_X + 4, STAT_Y + 12, buf);
950 rb->lcd_putsxy(STAT_X + 1, STAT_Y + 23, "Moves");
951 rb->snprintf(buf, sizeof(buf), "%d", current_info.level.moves);
952 rb->lcd_putsxy(STAT_X + 4, STAT_Y + 33, buf);
953 #if STAT_WIDTH < 38
954 rb->lcd_putsxy(STAT_X + 1, STAT_Y + 44, "Push");
955 #else
956 rb->lcd_putsxy(STAT_X + 1, STAT_Y + 44, "Pushes");
957 #endif
958 rb->snprintf(buf, sizeof(buf), "%d", current_info.level.pushes);
959 rb->lcd_putsxy(STAT_X + 4, STAT_Y + 54, buf);
961 rb->lcd_drawrect(STAT_X, STAT_Y + 0, STAT_WIDTH, 64);
962 rb->lcd_hline(STAT_X, LCD_WIDTH - 1, STAT_Y + 21);
963 rb->lcd_hline(STAT_X, LCD_WIDTH - 1, STAT_Y + 42);
965 #endif
967 /* load the board to the screen */
968 for (rows = 0; rows < ROWS; rows++) {
969 for (cols = 0; cols < COLS; cols++) {
970 c = cols*SOKOBAN_TILESIZE +
971 (BOARD_WIDTH - current_info.level.width*SOKOBAN_TILESIZE)/2;
972 r = rows*SOKOBAN_TILESIZE +
973 (BOARD_HEIGHT - current_info.level.height*SOKOBAN_TILESIZE)/2;
975 switch(current_info.board[rows][cols]) {
976 case 'X': /* blank space outside of level */
977 break;
979 case ' ': /* floor */
980 rb->lcd_bitmap_part(sokoban_tiles, 0, 0*SOKOBAN_TILESIZE,
981 SOKOBAN_TILESIZE, c, r, SOKOBAN_TILESIZE,
982 SOKOBAN_TILESIZE);
983 break;
985 case '#': /* wall */
986 rb->lcd_bitmap_part(sokoban_tiles, 0, 1*SOKOBAN_TILESIZE,
987 SOKOBAN_TILESIZE, c, r, SOKOBAN_TILESIZE,
988 SOKOBAN_TILESIZE);
989 break;
991 case '$': /* box */
992 rb->lcd_bitmap_part(sokoban_tiles, 0, 2*SOKOBAN_TILESIZE,
993 SOKOBAN_TILESIZE, c, r, SOKOBAN_TILESIZE,
994 SOKOBAN_TILESIZE);
995 break;
997 case '*': /* box on goal */
998 rb->lcd_bitmap_part(sokoban_tiles, 0, 3*SOKOBAN_TILESIZE,
999 SOKOBAN_TILESIZE, c, r, SOKOBAN_TILESIZE,
1000 SOKOBAN_TILESIZE);
1001 break;
1003 case '.': /* goal */
1004 rb->lcd_bitmap_part(sokoban_tiles, 0, 4*SOKOBAN_TILESIZE,
1005 SOKOBAN_TILESIZE, c, r, SOKOBAN_TILESIZE,
1006 SOKOBAN_TILESIZE);
1007 break;
1009 case '@': /* player */
1010 rb->lcd_bitmap_part(sokoban_tiles, 0, 5*SOKOBAN_TILESIZE,
1011 SOKOBAN_TILESIZE, c, r, SOKOBAN_TILESIZE,
1012 SOKOBAN_TILESIZE);
1013 break;
1015 case '+': /* player on goal */
1016 rb->lcd_bitmap_part(sokoban_tiles, 0, 6*SOKOBAN_TILESIZE,
1017 SOKOBAN_TILESIZE, c, r, SOKOBAN_TILESIZE,
1018 SOKOBAN_TILESIZE);
1019 break;
1024 /* print out the screen */
1025 rb->lcd_update();
1028 static void draw_level(void)
1030 load_level();
1031 rb->lcd_clear_display();
1032 update_screen();
1035 static bool save(char *filename, bool solution)
1037 int fd;
1038 char *loc;
1039 DIR *dir;
1040 char dirname[MAX_PATH];
1042 rb->splash(0, "Saving...");
1044 /* Create dir if it doesn't exist */
1045 if ((loc = rb->strrchr(filename, '/')) != NULL) {
1046 rb->strlcpy(dirname, filename, loc - filename + 1);
1048 if(!(dir = rb->opendir(dirname)))
1049 rb->mkdir(dirname);
1050 else
1051 rb->closedir(dir);
1054 if (filename[0] == '\0' ||
1055 (fd = rb->open(filename, O_WRONLY|O_CREAT|O_TRUNC)) < 0) {
1056 rb->splashf(HZ*2, "Unable to open %s", filename);
1057 return false;
1060 /* Sokoban: S/P for solution/progress : level number : current undo */
1061 rb->snprintf(buf, sizeof(buf), "Sokoban:%c:%d:%d\n", (solution ? 'S' : 'P'),
1062 current_info.level.index + 1, undo_info.current);
1063 rb->write(fd, buf, rb->strlen(buf));
1065 /* Filename of levelset */
1066 rb->write(fd, buffered_boards.filename,
1067 rb->strlen(buffered_boards.filename));
1068 rb->write(fd, "\n", 1);
1070 /* Full undo history */
1071 rb->write(fd, undo_info.history, undo_info.max);
1073 rb->close(fd);
1075 return true;
1078 static bool load(char *filename, bool silent)
1080 int fd;
1081 int i, n;
1082 int len;
1083 int button;
1084 bool play_solution;
1085 bool paused = false;
1086 unsigned short speed = 2;
1087 int delay[] = {HZ/2, HZ/3, HZ/4, HZ/6, HZ/8, HZ/12, HZ/16, HZ/25};
1089 if (filename[0] == '\0' || (fd = rb->open(filename, O_RDONLY)) < 0) {
1090 if (!silent)
1091 rb->splashf(HZ*2, "Unable to open %s", filename);
1092 return false;
1095 /* Read header, level number, & current undo */
1096 rb->read_line(fd, buf, sizeof(buf));
1098 /* If we're opening a level file, not a solution/progress file */
1099 if (rb->strncmp(buf, "Sokoban", 7) != 0) {
1100 rb->close(fd);
1102 rb->strlcpy(buffered_boards.filename, filename,
1103 sizeof(buffered_boards.filename));
1105 if (!read_levels(true))
1106 return false;
1108 current_info.level.index = 0;
1109 load_level();
1111 /* If there aren't any boxes to go or the player position wasn't set,
1112 * the file probably wasn't a Sokoban level file */
1113 if (current_info.level.boxes_to_go == 0 ||
1114 current_info.player.row == 0 || current_info.player.col == 0) {
1115 if (!silent)
1116 rb->splash(HZ*2, "File is not a Sokoban level file");
1117 return false;
1120 } else {
1122 /* Read filename of levelset */
1123 rb->read_line(fd, buffered_boards.filename,
1124 sizeof(buffered_boards.filename));
1126 /* Read full undo history */
1127 len = rb->read_line(fd, undo_info.history, MAX_UNDOS);
1129 /* Correct len when trailing \r's or \n's are counted */
1130 if (len > 2 && undo_info.history[len - 2] == '\0')
1131 len -= 2;
1132 else if (len > 1 && undo_info.history[len - 1] == '\0')
1133 len--;
1135 rb->close(fd);
1137 /* Check to see if we're going to play a solution or resume progress */
1138 play_solution = (buf[8] == 'S');
1140 /* Get level number */
1141 for (n = 0, i = 10; buf[i] >= '0' && buf[i] <= '9' && i < 15; i++)
1142 n = n*10 + buf[i] - '0';
1143 current_info.level.index = n - 1;
1145 /* Get undo index */
1146 for (n = 0, i++; buf[i] >= '0' && buf[i] <= '9' && i < 21; i++)
1147 n = n*10 + buf[i] - '0';
1148 if (n > len)
1149 n = len;
1150 undo_info.max = len;
1152 if (current_info.level.index < 0) {
1153 if (!silent)
1154 rb->splash(HZ*2, "Error loading level");
1155 return false;
1157 if (!read_levels(true))
1158 return false;
1159 if (current_info.level.index >= current_info.max_level) {
1160 if (!silent)
1161 rb->splash(HZ*2, "Error loading level");
1162 return false;
1165 load_level();
1167 if (play_solution) {
1168 rb->lcd_clear_display();
1169 update_screen();
1170 rb->sleep(2*delay[speed]);
1172 /* Replay solution until menu button is pressed */
1173 i = 0;
1174 while (true) {
1175 if (i < len) {
1176 if (!move(undo_info.history[i], true)) {
1177 n = i;
1178 break;
1180 rb->lcd_clear_display();
1181 update_screen();
1182 i++;
1183 } else
1184 paused = true;
1186 rb->sleep(delay[speed]);
1188 while ((button = rb->button_get(false)) || paused) {
1189 switch (button) {
1190 case SOKOBAN_MENU:
1191 /* Pretend the level is complete so we'll quit */
1192 current_info.level.boxes_to_go = 0;
1193 return true;
1195 case SOKOBAN_PAUSE:
1196 /* Toggle pause state */
1197 paused = !paused;
1198 break;
1200 case SOKOBAN_LEFT:
1201 case SOKOBAN_LEFT | BUTTON_REPEAT:
1202 /* Go back one move */
1203 if (paused) {
1204 if (undo())
1205 i--;
1206 rb->lcd_clear_display();
1207 update_screen();
1209 break;
1211 case SOKOBAN_RIGHT:
1212 case SOKOBAN_RIGHT | BUTTON_REPEAT:
1213 /* Go forward one move */
1214 if (paused) {
1215 if (redo())
1216 i++;
1217 rb->lcd_clear_display();
1218 update_screen();
1220 break;
1222 case SOKOBAN_UP:
1223 case SOKOBAN_UP | BUTTON_REPEAT:
1224 /* Speed up */
1225 if (speed < sizeof(delay)/sizeof(int) - 1)
1226 speed++;
1227 break;
1229 case SOKOBAN_DOWN:
1230 case SOKOBAN_DOWN | BUTTON_REPEAT:
1231 /* Slow down */
1232 if (speed > 0)
1233 speed--;
1236 if (paused)
1237 rb->sleep(HZ/33);
1241 /* If level is complete, wait for keypress before quitting */
1242 if (current_info.level.boxes_to_go == 0)
1243 rb->button_get(true);
1245 } else {
1246 /* Advance to current undo */
1247 for (i = 0; i < n; i++) {
1248 if (!move(undo_info.history[i], true)) {
1249 n = i;
1250 break;
1254 rb->button_clear_queue();
1255 rb->lcd_clear_display();
1258 undo_info.current = n;
1261 return true;
1264 static int sokoban_menu(void)
1266 int button;
1267 int selection = 0;
1268 int i;
1269 bool menu_quit;
1270 int start_selected = 0;
1271 int prev_level = current_info.level.index;
1273 MENUITEM_STRINGLIST(menu, "Sokoban Menu", NULL,
1274 "Resume", "Select Level", "Audio Playback", "Keys",
1275 "Load Default Level Set", "Quit Without Saving",
1276 "Save Progress & Quit");
1278 do {
1279 menu_quit = true;
1280 selection = rb->do_menu(&menu, &start_selected, NULL, false);
1282 switch (selection) {
1283 case 0: /* Resume */
1284 break;
1286 case 1: /* Select level */
1287 current_info.level.index++;
1288 rb->set_int("Select Level", "", UNIT_INT,
1289 &current_info.level.index, NULL, 1, 1,
1290 current_info.max_level, NULL);
1291 current_info.level.index--;
1292 if (prev_level != current_info.level.index) {
1293 init_undo();
1294 draw_level();
1295 } else
1296 menu_quit = false;
1297 break;
1299 case 2: /* Audio playback control */
1300 playback_control(NULL);
1301 menu_quit = false;
1302 break;
1304 case 3: /* Keys */
1305 FOR_NB_SCREENS(i)
1306 rb->screens[i]->clear_display();
1307 rb->lcd_setfont(SOKOBAN_FONT);
1309 #if (CONFIG_KEYPAD == RECORDER_PAD) || \
1310 (CONFIG_KEYPAD == ARCHOS_AV300_PAD)
1311 rb->lcd_putsxy(3, 6, "[OFF] Menu");
1312 rb->lcd_putsxy(3, 16, "[ON] Undo");
1313 rb->lcd_putsxy(3, 26, "[PLAY] Redo");
1314 rb->lcd_putsxy(3, 36, "[F1] Down a Level");
1315 rb->lcd_putsxy(3, 46, "[F2] Restart Level");
1316 rb->lcd_putsxy(3, 56, "[F3] Up a Level");
1317 #elif CONFIG_KEYPAD == ONDIO_PAD
1318 rb->lcd_putsxy(3, 6, "[OFF] Menu");
1319 rb->lcd_putsxy(3, 16, "[MODE] Undo");
1320 rb->lcd_putsxy(3, 26, "[MODE+DOWN] Redo");
1321 rb->lcd_putsxy(3, 36, "[MODE+LEFT] Previous Level");
1322 rb->lcd_putsxy(3, 46, "[MODE+UP] Restart Level");
1323 rb->lcd_putsxy(3, 56, "[MODE+RIGHT] Up Level");
1324 #elif (CONFIG_KEYPAD == IRIVER_H100_PAD) || \
1325 (CONFIG_KEYPAD == IRIVER_H300_PAD)
1326 rb->lcd_putsxy(3, 6, "[STOP] Menu");
1327 rb->lcd_putsxy(3, 16, "[REC] Undo");
1328 rb->lcd_putsxy(3, 26, "[MODE] Redo");
1329 rb->lcd_putsxy(3, 36, "[PLAY+DOWN] Previous Level");
1330 rb->lcd_putsxy(3, 46, "[PLAY] Restart Level");
1331 rb->lcd_putsxy(3, 56, "[PLAY+UP] Next Level");
1332 #elif (CONFIG_KEYPAD == IPOD_4G_PAD) || \
1333 (CONFIG_KEYPAD == IPOD_3G_PAD) || \
1334 (CONFIG_KEYPAD == IPOD_1G2G_PAD)
1335 rb->lcd_putsxy(3, 6, "[SELECT+MENU] Menu");
1336 rb->lcd_putsxy(3, 16, "[SELECT] Undo");
1337 rb->lcd_putsxy(3, 26, "[SELECT+PLAY] Redo");
1338 rb->lcd_putsxy(3, 36, "[SELECT+LEFT] Previous Level");
1339 rb->lcd_putsxy(3, 46, "[SELECT+RIGHT] Next Level");
1340 #elif CONFIG_KEYPAD == IAUDIO_X5M5_PAD
1341 rb->lcd_putsxy(3, 6, "[POWER] Menu");
1342 rb->lcd_putsxy(3, 16, "[SELECT] Undo");
1343 rb->lcd_putsxy(3, 26, "[PLAY] Redo");
1344 rb->lcd_putsxy(3, 36, "[REC] Restart Level");
1345 #elif CONFIG_KEYPAD == IRIVER_H10_PAD
1346 rb->lcd_putsxy(3, 6, "[POWER] Menu");
1347 rb->lcd_putsxy(3, 16, "[REW] Undo");
1348 rb->lcd_putsxy(3, 26, "[FF] Redo");
1349 rb->lcd_putsxy(3, 36, "[PLAY+DOWN] Previous Level");
1350 rb->lcd_putsxy(3, 46, "[PLAY+RIGHT] Restart Level");
1351 rb->lcd_putsxy(3, 56, "[PLAY+UP] Next Level");
1352 #elif CONFIG_KEYPAD == GIGABEAT_PAD
1353 rb->lcd_putsxy(3, 6, "[POWER] Menu");
1354 rb->lcd_putsxy(3, 16, "[SELECT] Undo");
1355 rb->lcd_putsxy(3, 26, "[A] Redo");
1356 rb->lcd_putsxy(3, 36, "[VOL-] Previous Level");
1357 rb->lcd_putsxy(3, 46, "[MENU] Restart Level");
1358 rb->lcd_putsxy(3, 56, "[VOL+] Next Level");
1359 #elif CONFIG_KEYPAD == SANSA_E200_PAD
1360 rb->lcd_putsxy(3, 6, "[POWER] Menu");
1361 rb->lcd_putsxy(3, 16, "[SELECT] Undo");
1362 rb->lcd_putsxy(3, 26, "[REC] Redo");
1363 rb->lcd_putsxy(3, 36, "[SELECT+DOWN] Previous Level");
1364 rb->lcd_putsxy(3, 46, "[SELECT+RIGHT] Restart Level");
1365 rb->lcd_putsxy(3, 56, "[SELECT+UP] Next Level");
1366 #elif CONFIG_KEYPAD == GIGABEAT_S_PAD
1367 rb->lcd_putsxy(3, 6, "[MENU] Menu");
1368 rb->lcd_putsxy(3, 16, "[VOL+] Undo");
1369 rb->lcd_putsxy(3, 26, "[VOL-] Redo");
1370 rb->lcd_putsxy(3, 36, "[PREV] Previous Level");
1371 rb->lcd_putsxy(3, 46, "[PLAY] Restart Level");
1372 rb->lcd_putsxy(3, 56, "[NEXT] Next Level");
1373 #endif
1375 #ifdef HAVE_TOUCHSCREEN
1376 rb->lcd_putsxy(3, 6, SOKOBAN_MENU_NAME " Menu");
1377 rb->lcd_putsxy(3, 16, SOKOBAN_UNDO_NAME " Undo");
1378 rb->lcd_putsxy(3, 26, SOKOBAN_REDO_NAME " Redo");
1379 rb->lcd_putsxy(3, 36, SOKOBAN_PAUSE_NAME " Pause");
1380 rb->lcd_putsxy(3, 46, SOKOBAN_LEVEL_REPEAT_NAME " Restart Level");
1381 #endif
1383 FOR_NB_SCREENS(i)
1384 rb->screens[i]->update();
1386 /* Display until keypress */
1387 do {
1388 rb->sleep(HZ/20);
1389 button = rb->button_get(false);
1390 } while (!button || button & BUTTON_REL ||
1391 button & BUTTON_REPEAT);
1393 menu_quit = false;
1394 break;
1396 case 4: /* Load default levelset */
1397 init_boards();
1398 if (!read_levels(true))
1399 return 5; /* Quit */
1400 load_level();
1401 break;
1403 case 5: /* Quit */
1404 break;
1406 case 6: /* Save & quit */
1407 save(SOKOBAN_SAVE_FILE, false);
1408 rb->reload_directory();
1411 } while (!menu_quit);
1413 /* Restore font */
1414 rb->lcd_setfont(SOKOBAN_FONT);
1416 FOR_NB_SCREENS(i) {
1417 rb->screens[i]->clear_display();
1418 rb->screens[i]->update();
1421 return selection;
1424 static bool sokoban_loop(void)
1426 bool moved;
1427 int i = 0, button = 0, lastbutton = 0;
1428 short r = 0, c = 0;
1429 int w, h;
1430 char *loc;
1432 while (true) {
1433 moved = false;
1435 r = current_info.player.row;
1436 c = current_info.player.col;
1438 button = rb->button_get(true);
1440 switch(button)
1442 #ifdef SOKOBAN_RC_MENU
1443 case SOKOBAN_RC_MENU:
1444 #endif
1445 case SOKOBAN_MENU:
1446 switch (sokoban_menu()) {
1447 case 5: /* Quit */
1448 case 6: /* Save & quit */
1449 return PLUGIN_OK;
1451 update_screen();
1452 break;
1454 case SOKOBAN_UNDO:
1455 #ifdef SOKOBAN_UNDO_PRE
1456 if (lastbutton != SOKOBAN_UNDO_PRE)
1457 break;
1458 #else /* repeat can't work here for Ondio, iPod, et al */
1459 case SOKOBAN_UNDO | BUTTON_REPEAT:
1460 #endif
1461 undo();
1462 rb->lcd_clear_display();
1463 update_screen();
1464 break;
1466 #ifdef SOKOBAN_REDO
1467 case SOKOBAN_REDO:
1468 case SOKOBAN_REDO | BUTTON_REPEAT:
1469 moved = redo();
1470 rb->lcd_clear_display();
1471 update_screen();
1472 break;
1473 #endif
1475 #ifdef SOKOBAN_LEVEL_UP
1476 case SOKOBAN_LEVEL_UP:
1477 case SOKOBAN_LEVEL_UP | BUTTON_REPEAT:
1478 /* next level */
1479 init_undo();
1480 if (current_info.level.index + 1 < current_info.max_level)
1481 current_info.level.index++;
1483 draw_level();
1484 break;
1485 #endif
1487 #ifdef SOKOBAN_LEVEL_DOWN
1488 case SOKOBAN_LEVEL_DOWN:
1489 case SOKOBAN_LEVEL_DOWN | BUTTON_REPEAT:
1490 /* previous level */
1491 init_undo();
1492 if (current_info.level.index > 0)
1493 current_info.level.index--;
1495 draw_level();
1496 break;
1497 #endif
1499 #ifdef SOKOBAN_LEVEL_REPEAT
1500 case SOKOBAN_LEVEL_REPEAT:
1501 case SOKOBAN_LEVEL_REPEAT | BUTTON_REPEAT:
1502 /* same level */
1503 init_undo();
1504 draw_level();
1505 break;
1506 #endif
1508 case SOKOBAN_LEFT:
1509 case SOKOBAN_LEFT | BUTTON_REPEAT:
1510 moved = move(SOKOBAN_MOVE_LEFT, false);
1511 break;
1513 case SOKOBAN_RIGHT:
1514 case SOKOBAN_RIGHT | BUTTON_REPEAT:
1515 moved = move(SOKOBAN_MOVE_RIGHT, false);
1516 break;
1518 case SOKOBAN_UP:
1519 case SOKOBAN_UP | BUTTON_REPEAT:
1520 moved = move(SOKOBAN_MOVE_UP, false);
1521 break;
1523 case SOKOBAN_DOWN:
1524 case SOKOBAN_DOWN | BUTTON_REPEAT:
1525 moved = move(SOKOBAN_MOVE_DOWN, false);
1526 break;
1528 default:
1529 if (rb->default_event_handler(button) == SYS_USB_CONNECTED)
1530 return PLUGIN_USB_CONNECTED;
1531 break;
1534 lastbutton = button;
1536 if (moved) {
1537 rb->lcd_clear_display();
1538 update_screen();
1541 /* We have completed this level */
1542 if (current_info.level.boxes_to_go == 0) {
1544 if (moved) {
1545 rb->lcd_clear_display();
1547 /* Show level complete message & stats */
1548 rb->snprintf(buf, sizeof(buf), "Level %d Complete!",
1549 current_info.level.index + 1);
1550 rb->lcd_getstringsize(buf, &w, &h);
1551 rb->lcd_putsxy(LCD_WIDTH/2 - w/2, LCD_HEIGHT/2 - h*3, buf);
1553 rb->snprintf(buf, sizeof(buf), "%4d Moves ",
1554 current_info.level.moves);
1555 rb->lcd_getstringsize(buf, &w, &h);
1556 rb->lcd_putsxy(LCD_WIDTH/2 - w/2, LCD_HEIGHT/2 - h, buf);
1558 rb->snprintf(buf, sizeof(buf), "%4d Pushes",
1559 current_info.level.pushes);
1560 rb->lcd_getstringsize(buf, &w, &h);
1561 rb->lcd_putsxy(LCD_WIDTH/2 - w/2, LCD_HEIGHT/2, buf);
1563 if (undo_info.count < MAX_UNDOS) {
1564 rb->snprintf(buf, sizeof(buf), "%s: Save solution",
1565 BUTTON_SAVE_NAME);
1566 rb->lcd_getstringsize(buf, &w, &h);
1567 rb->lcd_putsxy(LCD_WIDTH/2 - w/2, LCD_HEIGHT/2 + h*2, buf);
1570 rb->lcd_update();
1571 rb->sleep(HZ/4);
1572 rb->button_clear_queue();
1574 /* Display for 4 seconds or until new keypress */
1575 for (i = 0; i < 80; i++) {
1576 rb->sleep(HZ/20);
1577 button = rb->button_get(false);
1578 if (button && !(button & BUTTON_REL) &&
1579 !(button & BUTTON_REPEAT))
1580 break;
1583 if (button == BUTTON_SAVE) {
1584 if (undo_info.count < MAX_UNDOS) {
1585 /* Set filename to current levelset plus level number
1586 * and .sok extension. Use SAVE_FOLDER if using the
1587 * default levelset, since it's in a hidden folder. */
1588 if (rb->strcmp(buffered_boards.filename,
1589 SOKOBAN_LEVELS_FILE) == 0) {
1590 rb->snprintf(buf, sizeof(buf),
1591 "%s/sokoban.%d.sok",
1592 SOKOBAN_SAVE_FOLDER,
1593 current_info.level.index + 1);
1594 } else {
1595 if ((loc = rb->strrchr(buffered_boards.filename,
1596 '.')) != NULL)
1597 *loc = '\0';
1598 rb->snprintf(buf, sizeof(buf), "%s.%d.sok",
1599 buffered_boards.filename,
1600 current_info.level.index + 1);
1601 if (loc != NULL)
1602 *loc = '.';
1605 if (!rb->kbd_input(buf, MAX_PATH))
1606 save(buf, true);
1607 } else
1608 rb->splash(HZ*2, "Solution too long to save");
1610 rb->lcd_setfont(SOKOBAN_FONT); /* Restore font */
1614 FOR_NB_SCREENS(i) {
1615 rb->screens[i]->clear_display();
1616 rb->screens[i]->update();
1619 current_info.level.index++;
1621 /* clear undo stats */
1622 init_undo();
1624 if (current_info.level.index >= current_info.max_level) {
1625 /* Show levelset complete message */
1626 rb->snprintf(buf, sizeof(buf), "You WIN!!");
1627 rb->lcd_getstringsize(buf, &w, &h);
1628 rb->lcd_putsxy(LCD_WIDTH/2 - w/2, LCD_HEIGHT/2 - h/2, buf);
1630 rb->lcd_set_drawmode(DRMODE_COMPLEMENT);
1631 /* Display for 4 seconds or until keypress */
1632 for (i = 0; i < 80; i++) {
1633 rb->lcd_fillrect(0, 0, LCD_WIDTH, LCD_HEIGHT);
1634 rb->lcd_update();
1635 rb->sleep(HZ/10);
1637 button = rb->button_get(false);
1638 if (button && !(button & BUTTON_REL))
1639 break;
1641 rb->lcd_set_drawmode(DRMODE_SOLID);
1643 /* Reset to first level & show quit menu */
1644 current_info.level.index = 0;
1646 switch (sokoban_menu()) {
1647 case 5: /* Quit */
1648 case 6: /* Save & quit */
1649 return PLUGIN_OK;
1653 load_level();
1654 update_screen();
1657 } /* end while */
1659 return PLUGIN_OK;
1663 enum plugin_status plugin_start(const void* parameter)
1665 int w, h;
1667 (void)(parameter);
1669 rb->lcd_setfont(SOKOBAN_FONT);
1671 rb->lcd_clear_display();
1672 rb->lcd_getstringsize(SOKOBAN_TITLE, &w, &h);
1673 rb->lcd_putsxy(LCD_WIDTH/2 - w/2, LCD_HEIGHT/2 - h/2, SOKOBAN_TITLE);
1674 rb->lcd_update();
1675 rb->sleep(HZ); /* Show title for 1 second */
1677 init_boards();
1679 if (parameter == NULL) {
1680 /* Attempt to resume saved progress, otherwise start at beginning */
1681 if (!load(SOKOBAN_SAVE_FILE, true)) {
1682 init_boards();
1683 if (!read_levels(true))
1684 return PLUGIN_OK;
1685 load_level();
1688 } else {
1689 /* The plugin is being used to open a file */
1690 if (load((char*) parameter, false)) {
1691 /* If we loaded & played a solution, quit */
1692 if (current_info.level.boxes_to_go == 0)
1693 return PLUGIN_OK;
1694 } else
1695 return PLUGIN_OK;
1698 rb->lcd_clear_display();
1699 update_screen();
1701 return sokoban_loop();