720a8fb7 |
1 | /* |
2 | * midend.c: general middle fragment sitting between the |
3 | * platform-specific front end and game-specific back end. |
4 | * Maintains a move list, takes care of Undo and Redo commands, and |
5 | * processes standard keystrokes for undo/redo/new/restart/quit. |
6 | */ |
7f77ea24 |
7 | |
8 | #include <stdio.h> |
5928817c |
9 | #include <string.h> |
7f77ea24 |
10 | #include <assert.h> |
11 | |
12 | #include "puzzles.h" |
13 | |
14 | struct midend_data { |
2ef96bd6 |
15 | frontend *frontend; |
48d70ca9 |
16 | random_state *random; |
be8d5aa1 |
17 | const game *ourgame; |
48d70ca9 |
18 | |
7f77ea24 |
19 | char *seed; |
5928817c |
20 | int fresh_seed; |
7f77ea24 |
21 | int nstates, statesize, statepos; |
eb2ad6f1 |
22 | |
23 | game_params **presets; |
24 | char **preset_names; |
25 | int npresets, presetsize; |
26 | |
7f77ea24 |
27 | game_params *params; |
28 | game_state **states; |
2ef96bd6 |
29 | game_drawstate *drawstate; |
30 | game_state *oldstate; |
74a4e547 |
31 | game_ui *ui; |
2ef96bd6 |
32 | float anim_time, anim_pos; |
87ed82be |
33 | float flash_time, flash_pos; |
c822de4a |
34 | int dir; |
6776a950 |
35 | |
36 | int pressed_mouse_button; |
7f77ea24 |
37 | }; |
38 | |
39 | #define ensure(me) do { \ |
40 | if ((me)->nstates >= (me)->statesize) { \ |
41 | (me)->statesize = (me)->nstates + 128; \ |
42 | (me)->states = sresize((me)->states, (me)->statesize, game_state *); \ |
43 | } \ |
44 | } while (0) |
45 | |
be8d5aa1 |
46 | midend_data *midend_new(frontend *fe, const game *ourgame) |
7f77ea24 |
47 | { |
48 | midend_data *me = snew(midend_data); |
cbb5549e |
49 | void *randseed; |
50 | int randseedsize; |
51 | |
52 | get_random_seed(&randseed, &randseedsize); |
7f77ea24 |
53 | |
48d70ca9 |
54 | me->frontend = fe; |
be8d5aa1 |
55 | me->ourgame = ourgame; |
48d70ca9 |
56 | me->random = random_init(randseed, randseedsize); |
7f77ea24 |
57 | me->nstates = me->statesize = me->statepos = 0; |
58 | me->states = NULL; |
be8d5aa1 |
59 | me->params = ourgame->default_params(); |
7f77ea24 |
60 | me->seed = NULL; |
5928817c |
61 | me->fresh_seed = FALSE; |
2ef96bd6 |
62 | me->drawstate = NULL; |
63 | me->oldstate = NULL; |
eb2ad6f1 |
64 | me->presets = NULL; |
65 | me->preset_names = NULL; |
66 | me->npresets = me->presetsize = 0; |
87ed82be |
67 | me->anim_time = me->anim_pos = 0.0F; |
68 | me->flash_time = me->flash_pos = 0.0F; |
c822de4a |
69 | me->dir = 0; |
74a4e547 |
70 | me->ui = NULL; |
6776a950 |
71 | me->pressed_mouse_button = 0; |
7f77ea24 |
72 | |
cbb5549e |
73 | sfree(randseed); |
74 | |
7f77ea24 |
75 | return me; |
76 | } |
77 | |
78 | void midend_free(midend_data *me) |
79 | { |
80 | sfree(me->states); |
81 | sfree(me->seed); |
be8d5aa1 |
82 | me->ourgame->free_params(me->params); |
7f77ea24 |
83 | sfree(me); |
84 | } |
85 | |
86 | void midend_size(midend_data *me, int *x, int *y) |
87 | { |
be8d5aa1 |
88 | me->ourgame->size(me->params, x, y); |
7f77ea24 |
89 | } |
90 | |
91 | void midend_set_params(midend_data *me, game_params *params) |
92 | { |
be8d5aa1 |
93 | me->ourgame->free_params(me->params); |
94 | me->params = me->ourgame->dup_params(params); |
7f77ea24 |
95 | } |
96 | |
5928817c |
97 | void midend_new_game(midend_data *me) |
7f77ea24 |
98 | { |
99 | while (me->nstates > 0) |
be8d5aa1 |
100 | me->ourgame->free_game(me->states[--me->nstates]); |
7f77ea24 |
101 | |
2ef96bd6 |
102 | if (me->drawstate) |
be8d5aa1 |
103 | me->ourgame->free_drawstate(me->drawstate); |
2ef96bd6 |
104 | |
7f77ea24 |
105 | assert(me->nstates == 0); |
106 | |
5928817c |
107 | if (!me->fresh_seed) { |
108 | sfree(me->seed); |
be8d5aa1 |
109 | me->seed = me->ourgame->new_seed(me->params, me->random); |
5928817c |
110 | } else |
111 | me->fresh_seed = FALSE; |
7f77ea24 |
112 | |
113 | ensure(me); |
be8d5aa1 |
114 | me->states[me->nstates++] = me->ourgame->new_game(me->params, me->seed); |
7f77ea24 |
115 | me->statepos = 1; |
be8d5aa1 |
116 | me->drawstate = me->ourgame->new_drawstate(me->states[0]); |
74a4e547 |
117 | if (me->ui) |
be8d5aa1 |
118 | me->ourgame->free_ui(me->ui); |
119 | me->ui = me->ourgame->new_ui(me->states[0]); |
6776a950 |
120 | me->pressed_mouse_button = 0; |
7f77ea24 |
121 | } |
122 | |
123 | void midend_restart_game(midend_data *me) |
124 | { |
125 | while (me->nstates > 1) |
be8d5aa1 |
126 | me->ourgame->free_game(me->states[--me->nstates]); |
7f77ea24 |
127 | me->statepos = me->nstates; |
be8d5aa1 |
128 | me->ourgame->free_ui(me->ui); |
129 | me->ui = me->ourgame->new_ui(me->states[0]); |
7f77ea24 |
130 | } |
131 | |
1482ee76 |
132 | static int midend_undo(midend_data *me) |
7f77ea24 |
133 | { |
1482ee76 |
134 | if (me->statepos > 1) { |
7f77ea24 |
135 | me->statepos--; |
c822de4a |
136 | me->dir = -1; |
1482ee76 |
137 | return 1; |
138 | } else |
139 | return 0; |
7f77ea24 |
140 | } |
141 | |
1482ee76 |
142 | static int midend_redo(midend_data *me) |
7f77ea24 |
143 | { |
1482ee76 |
144 | if (me->statepos < me->nstates) { |
7f77ea24 |
145 | me->statepos++; |
c822de4a |
146 | me->dir = +1; |
1482ee76 |
147 | return 1; |
148 | } else |
149 | return 0; |
7f77ea24 |
150 | } |
151 | |
87ed82be |
152 | static void midend_finish_move(midend_data *me) |
153 | { |
154 | float flashtime; |
155 | |
156 | if (me->oldstate || me->statepos > 1) { |
be8d5aa1 |
157 | flashtime = me->ourgame->flash_length(me->oldstate ? me->oldstate : |
158 | me->states[me->statepos-2], |
159 | me->states[me->statepos-1], |
160 | me->oldstate ? me->dir : +1); |
87ed82be |
161 | if (flashtime > 0) { |
162 | me->flash_pos = 0.0F; |
163 | me->flash_time = flashtime; |
164 | } |
165 | } |
166 | |
167 | if (me->oldstate) |
be8d5aa1 |
168 | me->ourgame->free_game(me->oldstate); |
87ed82be |
169 | me->oldstate = NULL; |
170 | me->anim_pos = me->anim_time = 0; |
c822de4a |
171 | me->dir = 0; |
87ed82be |
172 | |
173 | if (me->flash_time == 0 && me->anim_time == 0) |
174 | deactivate_timer(me->frontend); |
175 | else |
176 | activate_timer(me->frontend); |
177 | } |
178 | |
dd216087 |
179 | static void midend_stop_anim(midend_data *me) |
7f77ea24 |
180 | { |
2ef96bd6 |
181 | if (me->oldstate || me->anim_time) { |
87ed82be |
182 | midend_finish_move(me); |
2ef96bd6 |
183 | midend_redraw(me); |
184 | } |
dd216087 |
185 | } |
186 | |
6776a950 |
187 | static int midend_really_process_key(midend_data *me, int x, int y, int button) |
dd216087 |
188 | { |
be8d5aa1 |
189 | game_state *oldstate = me->ourgame->dup_game(me->states[me->statepos - 1]); |
dd216087 |
190 | float anim_time; |
7f77ea24 |
191 | |
192 | if (button == 'n' || button == 'N' || button == '\x0E') { |
dd216087 |
193 | midend_stop_anim(me); |
5928817c |
194 | midend_new_game(me); |
2ef96bd6 |
195 | midend_redraw(me); |
196 | return 1; /* never animate */ |
7f77ea24 |
197 | } else if (button == 'r' || button == 'R') { |
dd216087 |
198 | midend_stop_anim(me); |
7f77ea24 |
199 | midend_restart_game(me); |
2ef96bd6 |
200 | midend_redraw(me); |
201 | return 1; /* never animate */ |
7f77ea24 |
202 | } else if (button == 'u' || button == 'u' || |
1482ee76 |
203 | button == '\x1A' || button == '\x1F') { |
dd216087 |
204 | midend_stop_anim(me); |
1482ee76 |
205 | if (!midend_undo(me)) |
206 | return 1; |
7f77ea24 |
207 | } else if (button == '\x12') { |
dd216087 |
208 | midend_stop_anim(me); |
1482ee76 |
209 | if (!midend_redo(me)) |
210 | return 1; |
7f77ea24 |
211 | } else if (button == 'q' || button == 'Q' || button == '\x11') { |
be8d5aa1 |
212 | me->ourgame->free_game(oldstate); |
2ef96bd6 |
213 | return 0; |
214 | } else { |
be8d5aa1 |
215 | game_state *s = me->ourgame->make_move(me->states[me->statepos-1], |
216 | me->ui, x, y, button); |
74a4e547 |
217 | |
218 | if (s == me->states[me->statepos-1]) { |
219 | /* |
220 | * make_move() is allowed to return its input state to |
221 | * indicate that although no move has been made, the UI |
222 | * state has been updated and a redraw is called for. |
223 | */ |
224 | midend_redraw(me); |
225 | return 1; |
226 | } else if (s) { |
dd216087 |
227 | midend_stop_anim(me); |
2ef96bd6 |
228 | while (me->nstates > me->statepos) |
be8d5aa1 |
229 | me->ourgame->free_game(me->states[--me->nstates]); |
2ef96bd6 |
230 | ensure(me); |
231 | me->states[me->nstates] = s; |
232 | me->statepos = ++me->nstates; |
c822de4a |
233 | me->dir = +1; |
2ef96bd6 |
234 | } else { |
be8d5aa1 |
235 | me->ourgame->free_game(oldstate); |
2ef96bd6 |
236 | return 1; |
237 | } |
7f77ea24 |
238 | } |
239 | |
2ef96bd6 |
240 | /* |
241 | * See if this move requires an animation. |
242 | */ |
be8d5aa1 |
243 | anim_time = me->ourgame->anim_length(oldstate, me->states[me->statepos-1], |
244 | me->dir); |
2ef96bd6 |
245 | |
87ed82be |
246 | me->oldstate = oldstate; |
2ef96bd6 |
247 | if (anim_time > 0) { |
2ef96bd6 |
248 | me->anim_time = anim_time; |
249 | } else { |
2ef96bd6 |
250 | me->anim_time = 0.0; |
87ed82be |
251 | midend_finish_move(me); |
7f77ea24 |
252 | } |
2ef96bd6 |
253 | me->anim_pos = 0.0; |
254 | |
255 | midend_redraw(me); |
256 | |
257 | activate_timer(me->frontend); |
7f77ea24 |
258 | |
259 | return 1; |
260 | } |
2ef96bd6 |
261 | |
6776a950 |
262 | int midend_process_key(midend_data *me, int x, int y, int button) |
263 | { |
264 | int ret = 1; |
265 | |
266 | /* |
267 | * Harmonise mouse drag and release messages. |
268 | * |
269 | * Some front ends might accidentally switch from sending, say, |
270 | * RIGHT_DRAG messages to sending LEFT_DRAG, half way through a |
271 | * drag. (This can happen on the Mac, for example, since |
272 | * RIGHT_DRAG is usually done using Command+drag, and if the |
273 | * user accidentally releases Command half way through the drag |
274 | * then there will be trouble.) |
275 | * |
276 | * It would be an O(number of front ends) annoyance to fix this |
277 | * in the front ends, but an O(number of back ends) annoyance |
278 | * to have each game capable of dealing with it. Therefore, we |
279 | * fix it _here_ in the common midend code so that it only has |
280 | * to be done once. |
281 | * |
282 | * Semantics: |
283 | * |
284 | * - when we receive a button down message, we remember which |
285 | * button went down. |
286 | * |
287 | * - if we receive a drag or release message for a button we |
288 | * don't currently think is pressed, we fabricate a |
289 | * button-down for it before sending it. |
290 | * |
291 | * - if we receive (or fabricate) a button down message |
292 | * without having seen a button up for the previously |
293 | * pressed button, we invent the button up before sending |
294 | * the button down. |
295 | * |
296 | * Therefore, front ends can just send whatever data they |
297 | * happen to be conveniently able to get, and back ends can be |
298 | * guaranteed of always receiving a down, zero or more drags |
299 | * and an up for a single button at a time. |
300 | */ |
301 | if (IS_MOUSE_DRAG(button) || IS_MOUSE_RELEASE(button)) { |
302 | int which; |
303 | |
304 | if (IS_MOUSE_DRAG(button)) |
305 | which = button + (LEFT_BUTTON - LEFT_DRAG); |
306 | else |
307 | which = button + (LEFT_BUTTON - LEFT_RELEASE); |
308 | |
309 | if (which != me->pressed_mouse_button) { |
310 | /* |
311 | * Fabricate a button-up for the currently pressed |
312 | * button, if any. |
313 | */ |
314 | if (me->pressed_mouse_button) { |
315 | ret = ret && midend_really_process_key |
316 | (me, x, y, (me->pressed_mouse_button + |
317 | (LEFT_RELEASE - LEFT_BUTTON))); |
318 | } |
319 | |
320 | /* |
321 | * Now fabricate a button-down for this one. |
322 | */ |
323 | ret = ret && midend_really_process_key(me, x, y, which); |
324 | |
325 | /* |
326 | * And set the currently pressed button to this one. |
327 | */ |
328 | me->pressed_mouse_button = which; |
329 | } |
330 | } else if (IS_MOUSE_DOWN(button) && me->pressed_mouse_button) { |
331 | /* |
332 | * Fabricate a button-up for the previously pressed button. |
333 | */ |
334 | ret = ret && midend_really_process_key |
335 | (me, x, y, (me->pressed_mouse_button + |
336 | (LEFT_RELEASE - LEFT_BUTTON))); |
337 | } |
338 | |
339 | /* |
340 | * Now send on the event we originally received. |
341 | */ |
342 | ret = ret && midend_really_process_key(me, x, y, button); |
343 | |
344 | /* |
345 | * And update the currently pressed button. |
346 | */ |
347 | if (IS_MOUSE_RELEASE(button)) |
348 | me->pressed_mouse_button = 0; |
349 | else if (IS_MOUSE_DOWN(button)) |
350 | me->pressed_mouse_button = button; |
351 | |
352 | return ret; |
353 | } |
354 | |
2ef96bd6 |
355 | void midend_redraw(midend_data *me) |
356 | { |
357 | if (me->statepos > 0 && me->drawstate) { |
358 | start_draw(me->frontend); |
359 | if (me->oldstate && me->anim_time > 0 && |
360 | me->anim_pos < me->anim_time) { |
c822de4a |
361 | assert(me->dir != 0); |
be8d5aa1 |
362 | me->ourgame->redraw(me->frontend, me->drawstate, me->oldstate, |
363 | me->states[me->statepos-1], me->dir, |
364 | me->ui, me->anim_pos, me->flash_pos); |
2ef96bd6 |
365 | } else { |
be8d5aa1 |
366 | me->ourgame->redraw(me->frontend, me->drawstate, NULL, |
367 | me->states[me->statepos-1], +1 /*shrug*/, |
368 | me->ui, 0.0, me->flash_pos); |
2ef96bd6 |
369 | } |
370 | end_draw(me->frontend); |
371 | } |
372 | } |
373 | |
374 | void midend_timer(midend_data *me, float tplus) |
375 | { |
376 | me->anim_pos += tplus; |
377 | if (me->anim_pos >= me->anim_time || |
378 | me->anim_time == 0 || !me->oldstate) { |
87ed82be |
379 | if (me->anim_time > 0) |
380 | midend_finish_move(me); |
381 | } |
382 | me->flash_pos += tplus; |
383 | if (me->flash_pos >= me->flash_time || me->flash_time == 0) { |
384 | me->flash_pos = me->flash_time = 0; |
2ef96bd6 |
385 | } |
87ed82be |
386 | if (me->flash_time == 0 && me->anim_time == 0) |
387 | deactivate_timer(me->frontend); |
2ef96bd6 |
388 | midend_redraw(me); |
389 | } |
390 | |
391 | float *midend_colours(midend_data *me, int *ncolours) |
392 | { |
393 | game_state *state = NULL; |
394 | float *ret; |
395 | |
396 | if (me->nstates == 0) { |
be8d5aa1 |
397 | char *seed = me->ourgame->new_seed(me->params, me->random); |
398 | state = me->ourgame->new_game(me->params, seed); |
2ef96bd6 |
399 | sfree(seed); |
400 | } else |
401 | state = me->states[0]; |
402 | |
be8d5aa1 |
403 | ret = me->ourgame->colours(me->frontend, state, ncolours); |
2ef96bd6 |
404 | |
405 | if (me->nstates == 0) |
be8d5aa1 |
406 | me->ourgame->free_game(state); |
2ef96bd6 |
407 | |
408 | return ret; |
409 | } |
eb2ad6f1 |
410 | |
411 | int midend_num_presets(midend_data *me) |
412 | { |
413 | if (!me->npresets) { |
414 | char *name; |
415 | game_params *preset; |
416 | |
be8d5aa1 |
417 | while (me->ourgame->fetch_preset(me->npresets, &name, &preset)) { |
eb2ad6f1 |
418 | if (me->presetsize <= me->npresets) { |
419 | me->presetsize = me->npresets + 10; |
420 | me->presets = sresize(me->presets, me->presetsize, |
421 | game_params *); |
422 | me->preset_names = sresize(me->preset_names, me->presetsize, |
423 | char *); |
424 | } |
425 | |
426 | me->presets[me->npresets] = preset; |
427 | me->preset_names[me->npresets] = name; |
428 | me->npresets++; |
429 | } |
430 | } |
431 | |
432 | return me->npresets; |
433 | } |
434 | |
435 | void midend_fetch_preset(midend_data *me, int n, |
436 | char **name, game_params **params) |
437 | { |
438 | assert(n >= 0 && n < me->npresets); |
439 | *name = me->preset_names[n]; |
440 | *params = me->presets[n]; |
441 | } |
fd1a1a2b |
442 | |
443 | int midend_wants_statusbar(midend_data *me) |
444 | { |
be8d5aa1 |
445 | return me->ourgame->wants_statusbar(); |
fd1a1a2b |
446 | } |
c8230524 |
447 | |
5928817c |
448 | config_item *midend_get_config(midend_data *me, int which, char **wintitle) |
c8230524 |
449 | { |
b0e26073 |
450 | char *titlebuf, *parstr; |
5928817c |
451 | config_item *ret; |
452 | |
be8d5aa1 |
453 | titlebuf = snewn(40 + strlen(me->ourgame->name), char); |
5928817c |
454 | |
455 | switch (which) { |
456 | case CFG_SETTINGS: |
be8d5aa1 |
457 | sprintf(titlebuf, "%s configuration", me->ourgame->name); |
5928817c |
458 | *wintitle = dupstr(titlebuf); |
be8d5aa1 |
459 | return me->ourgame->configure(me->params); |
5928817c |
460 | case CFG_SEED: |
be8d5aa1 |
461 | sprintf(titlebuf, "%s game selection", me->ourgame->name); |
5928817c |
462 | *wintitle = dupstr(titlebuf); |
463 | |
464 | ret = snewn(2, config_item); |
465 | |
466 | ret[0].type = C_STRING; |
467 | ret[0].name = "Game ID"; |
468 | ret[0].ival = 0; |
b0e26073 |
469 | /* |
470 | * The text going in here will be a string encoding of the |
471 | * parameters, plus a colon, plus the game seed. This is a |
472 | * full game ID. |
473 | */ |
be8d5aa1 |
474 | parstr = me->ourgame->encode_params(me->params); |
b0e26073 |
475 | ret[0].sval = snewn(strlen(parstr) + strlen(me->seed) + 2, char); |
476 | sprintf(ret[0].sval, "%s:%s", parstr, me->seed); |
477 | sfree(parstr); |
5928817c |
478 | |
479 | ret[1].type = C_END; |
480 | ret[1].name = ret[1].sval = NULL; |
481 | ret[1].ival = 0; |
482 | |
483 | return ret; |
484 | } |
485 | |
486 | assert(!"We shouldn't be here"); |
487 | return NULL; |
c8230524 |
488 | } |
489 | |
8b7938e7 |
490 | char *midend_game_id(midend_data *me, char *id, int def_seed) |
491 | { |
492 | char *error, *par, *seed; |
493 | game_params *params; |
494 | |
495 | seed = strchr(id, ':'); |
496 | |
497 | if (seed) { |
498 | /* |
499 | * We have a colon separating parameters from game seed. So |
500 | * `par' now points to the parameters string, and `seed' to |
501 | * the seed string. |
502 | */ |
503 | *seed++ = '\0'; |
504 | par = id; |
505 | } else { |
506 | /* |
507 | * We only have one string. Depending on `def_seed', we |
508 | * take it to be either parameters or seed. |
509 | */ |
510 | if (def_seed) { |
511 | seed = id; |
512 | par = NULL; |
513 | } else { |
514 | seed = NULL; |
515 | par = id; |
516 | } |
517 | } |
518 | |
519 | if (par) { |
be8d5aa1 |
520 | params = me->ourgame->decode_params(par); |
521 | error = me->ourgame->validate_params(params); |
8b7938e7 |
522 | if (error) { |
be8d5aa1 |
523 | me->ourgame->free_params(params); |
8b7938e7 |
524 | return error; |
525 | } |
be8d5aa1 |
526 | me->ourgame->free_params(me->params); |
8b7938e7 |
527 | me->params = params; |
528 | } |
529 | |
530 | if (seed) { |
be8d5aa1 |
531 | error = me->ourgame->validate_seed(me->params, seed); |
8b7938e7 |
532 | if (error) |
533 | return error; |
534 | |
535 | sfree(me->seed); |
536 | me->seed = dupstr(seed); |
537 | me->fresh_seed = TRUE; |
538 | } |
539 | |
540 | return NULL; |
541 | } |
542 | |
5928817c |
543 | char *midend_set_config(midend_data *me, int which, config_item *cfg) |
c8230524 |
544 | { |
8b7938e7 |
545 | char *error; |
c8230524 |
546 | game_params *params; |
547 | |
5928817c |
548 | switch (which) { |
549 | case CFG_SETTINGS: |
be8d5aa1 |
550 | params = me->ourgame->custom_params(cfg); |
551 | error = me->ourgame->validate_params(params); |
c8230524 |
552 | |
5928817c |
553 | if (error) { |
be8d5aa1 |
554 | me->ourgame->free_params(params); |
5928817c |
555 | return error; |
556 | } |
c8230524 |
557 | |
be8d5aa1 |
558 | me->ourgame->free_params(me->params); |
5928817c |
559 | me->params = params; |
560 | break; |
561 | |
562 | case CFG_SEED: |
8b7938e7 |
563 | error = midend_game_id(me, cfg[0].sval, TRUE); |
5928817c |
564 | if (error) |
565 | return error; |
5928817c |
566 | break; |
567 | } |
c8230524 |
568 | |
569 | return NULL; |
570 | } |