- added default argument instead of NO_UPDATE
[supertux.git] / src / menu.cpp
1 /*
2   menu.c
3   
4   Super Tux - Menu
5   
6   by Tobias Glaesser
7   tobi.web@gmx.de
8   http://www.newbreedsoftware.com/supertux/
9   
10   December 20, 2003 - March 15, 2004
11 */
12
13 #ifndef WIN32
14 #include <sys/types.h>
15 #include <ctype.h>
16 #endif
17
18 #include <stdlib.h>
19 #include <stdio.h>
20 #include <string.h>
21
22 #include "defines.h"
23 #include "globals.h"
24 #include "menu.h"
25 #include "screen.h"
26 #include "setup.h"
27 #include "sound.h"
28 #include "scene.h"
29 #include "leveleditor.h"
30 #include "timer.h"
31 #include "high_scores.h"
32
33 /* (global) menu variables */
34 int menuaction;
35 int show_menu;
36 int menu_change;
37 texture_type checkbox, checkbox_checked, back, arrow_left, arrow_right;
38
39 menu_type main_menu, game_menu, options_menu, highscore_menu, load_game_menu, save_game_menu;
40 menu_type* current_menu, * last_menu;
41
42 /* input implementation variables */
43 int delete_character;
44 char mn_input_char;
45
46 /* Set the current menu */
47 void menu_set_current(menu_type* pmenu)
48 {
49   if(pmenu != current_menu)
50     {
51       menu_change = YES;
52       last_menu = current_menu;
53       current_menu = pmenu;
54       timer_start(&pmenu->effect, 500);
55     }
56 }
57
58 /* Return a pointer to a new menu item */
59 menu_item_type* menu_item_create(int kind, char *text, int init_toggle, void* target_menu)
60 {
61   menu_item_type *pnew_item = (menu_item_type*) malloc(sizeof(menu_item_type));
62   pnew_item->kind = kind;
63   pnew_item->text = (char*) malloc(sizeof(char) * (strlen(text) + 1));
64   strcpy(pnew_item->text,text);
65   if(kind == MN_TOGGLE)
66     pnew_item->toggled = init_toggle;
67   else
68     pnew_item->toggled = NO;
69   pnew_item->target_menu = target_menu;
70   pnew_item->input = (char*) malloc(sizeof(char));
71   pnew_item->input[0] = '\0';
72   if(kind == MN_STRINGSELECT)
73     {
74       pnew_item->list = (string_list_type*) malloc(sizeof(string_list_type));
75       string_list_init(pnew_item->list);
76     }
77   else
78     pnew_item->list = NULL;
79   return pnew_item;
80 }
81
82 void menu_item_change_text(menu_item_type* pmenu_item,const  char *text)
83 {
84   if(text)
85     {
86       free(pmenu_item->text);
87       pmenu_item->text = (char*) malloc(sizeof(char )*(strlen(text)+1));
88       strcpy(pmenu_item->text,text);
89     }
90 }
91 void menu_item_change_input(menu_item_type* pmenu_item,const  char *text)
92 {
93   if(text)
94     {
95       free(pmenu_item->input);
96       pmenu_item->input = (char*) malloc(sizeof(char )*(strlen(text)+1));
97       strcpy(pmenu_item->input,text);
98     }
99 }
100
101 /* Free a menu and all its items */
102 void menu_free(menu_type* pmenu)
103 {
104   int i;
105   if(pmenu->num_items != 0 && pmenu->item != NULL)
106     {
107       for(i = 0; i < pmenu->num_items; ++i)
108         {
109           free(pmenu->item[i].text);
110           free(pmenu->item[i].input);
111           string_list_free(pmenu->item[i].list);
112         }
113       free(pmenu->item);
114     }
115 }
116
117 /* Initialize a menu */
118 void menu_init(menu_type* pmenu)
119 {
120   pmenu->arrange_left = 0;
121   pmenu->num_items = 0;
122   pmenu->active_item = 0;
123   pmenu->item = NULL;
124   timer_init(&pmenu->effect,NO);
125 }
126
127 /* Add an item to a menu */
128 void menu_additem(menu_type* pmenu, menu_item_type* pmenu_item)
129 {
130   ++pmenu->num_items;
131   pmenu->item = (menu_item_type*) realloc(pmenu->item, sizeof(menu_item_type) * pmenu->num_items);
132   memcpy(&pmenu->item[pmenu->num_items-1],pmenu_item,sizeof(menu_item_type));
133   free(pmenu_item);
134 }
135
136 /* Process actions done on the menu */
137 void menu_action(menu_type* pmenu)
138 {
139   int i;
140
141   if(pmenu->num_items != 0 && pmenu->item != NULL)
142     {
143       switch(menuaction)
144         {
145         case MN_UP:
146           if(pmenu->active_item > 0)
147             --pmenu->active_item;
148           else
149             pmenu->active_item = pmenu->num_items-1;
150           break;
151         case MN_DOWN:
152           if(pmenu->active_item < pmenu->num_items-1)
153             ++pmenu->active_item;
154           else
155             pmenu->active_item = 0;
156           break;
157         case MN_LEFT:
158           if(pmenu->item[pmenu->active_item].kind == MN_STRINGSELECT && pmenu->item[pmenu->active_item].list->num_items != 0)
159             {
160               if(pmenu->item[pmenu->active_item].list->active_item > 0)
161                 --pmenu->item[pmenu->active_item].list->active_item;
162               else
163                 pmenu->item[pmenu->active_item].list->active_item = pmenu->item[pmenu->active_item].list->num_items-1;
164             }
165           break;
166         case MN_RIGHT:
167           if(pmenu->item[pmenu->active_item].kind == MN_STRINGSELECT && pmenu->item[pmenu->active_item].list->num_items != 0)
168             {
169               if(pmenu->item[pmenu->active_item].list->active_item < pmenu->item[pmenu->active_item].list->num_items-1)
170                 ++pmenu->item[pmenu->active_item].list->active_item;
171               else
172                 pmenu->item[pmenu->active_item].list->active_item = 0;
173             }
174           break;
175         case MN_HIT:
176           if(pmenu->item[pmenu->active_item].kind == MN_GOTO && pmenu->item[pmenu->active_item].target_menu != NULL)
177             menu_set_current((menu_type*)pmenu->item[pmenu->active_item].target_menu);
178           else if(pmenu->item[pmenu->active_item].kind == MN_TOGGLE)
179             {
180               pmenu->item[pmenu->active_item].toggled = !pmenu->item[pmenu->active_item].toggled;
181               menu_change = YES;
182             }
183           else if(pmenu->item[pmenu->active_item].kind == MN_ACTION || pmenu->item[pmenu->active_item].kind == MN_TEXTFIELD || pmenu->item[pmenu->active_item].kind == MN_NUMFIELD)
184             {
185               pmenu->item[pmenu->active_item].toggled = YES;
186             }
187           else if(pmenu->item[pmenu->active_item].kind == MN_BACK)
188             {
189               if(last_menu != NULL)
190                 menu_set_current(last_menu);
191             }
192           break;
193         case MN_REMOVE:
194           if(pmenu->item[pmenu->active_item].kind == MN_TEXTFIELD || pmenu->item[pmenu->active_item].kind == MN_NUMFIELD)
195             {
196               if(pmenu->item[pmenu->active_item].input != NULL)
197                 {
198                   i = strlen(pmenu->item[pmenu->active_item].input);
199
200                   while(delete_character > 0)   /* remove charactes */
201                     {
202                       pmenu->item[pmenu->active_item].input[i-1] = '\0';
203                       delete_character--;
204                     }
205                 }
206             }
207           break;
208         case MN_INPUT:
209           if(pmenu->item[pmenu->active_item].kind == MN_TEXTFIELD || (pmenu->item[pmenu->active_item].kind == MN_NUMFIELD && mn_input_char >= '0' && mn_input_char <= '9'))
210             {
211               if(pmenu->item[pmenu->active_item].input != NULL)
212                 {
213                   i = strlen(pmenu->item[pmenu->active_item].input);
214                   pmenu->item[pmenu->active_item].input = (char*) realloc(pmenu->item[pmenu->active_item].input,sizeof(char)*(i + 2));
215                   pmenu->item[pmenu->active_item].input[i] = mn_input_char;
216                   pmenu->item[pmenu->active_item].input[i+1] = '\0';
217                 }
218               else
219                 {
220                   pmenu->item[pmenu->active_item].input = (char*) malloc(2*sizeof(char));
221                   pmenu->item[pmenu->active_item].input[0] = mn_input_char;
222                   pmenu->item[pmenu->active_item].input[1] = '\0';
223                 }
224             }
225           break;
226         }
227     }
228
229   if(pmenu->item[pmenu->active_item].kind == MN_DEACTIVE || pmenu->item[pmenu->active_item].kind == MN_LABEL || pmenu->item[pmenu->active_item].kind == MN_HL)
230     {
231       if(menuaction != MN_UP && menuaction != MN_DOWN)
232         menuaction = MN_DOWN;
233
234       if(pmenu->num_items > 1)
235         menu_action(pmenu);
236     }
237
238 }
239
240 /* Check, if the value of the active menu item has changed. */
241 int menu_check(menu_type* pmenu)
242 {
243   if(pmenu->num_items != 0 && pmenu->item != NULL)
244     {
245       if((pmenu->item[pmenu->active_item].kind == MN_ACTION || pmenu->item[pmenu->active_item].kind == MN_TEXTFIELD || pmenu->item[pmenu->active_item].kind == MN_NUMFIELD) && pmenu->item[pmenu->active_item].toggled == YES)
246         {
247           pmenu->item[pmenu->active_item].toggled = NO;
248           show_menu = 0;
249           return pmenu->active_item;
250         }
251       else if(pmenu->item[pmenu->active_item].kind == MN_TOGGLE || pmenu->item[pmenu->active_item].kind == MN_GOTO)
252         {
253           return pmenu->active_item;
254         }
255       else
256         return -1;
257     }
258   else
259     return -1;
260 }
261
262 void menu_draw_item(menu_type* pmenu, const menu_item_type& pitem,
263                     int offset, // Position of the current item in the menu
264                     int menu_width, 
265                     int menu_height)
266 {
267   int a;
268   int b;
269   int e;
270   int f;
271
272   if(pmenu->arrange_left == YES)
273     a = menu_width * 16;
274   else
275     a = 0;
276   
277   if(pmenu->arrange_left == YES)
278     b = (a - ((strlen(pitem.text)+strlen(pitem.input)+ strlen(string_list_active(pitem.list))) * 16)) / 2;
279   else
280     b = 0;
281
282   if(timer_check(&pmenu->effect))
283     e = timer_get_left(&pmenu->effect) / 4;
284   else
285     e = 0;
286
287   if(e != 0)
288     f = (offset % 2) ? e : -e;
289   else
290     f = 0;
291
292   int x_pos = screen->w/2 - menu_width/2;
293   int y_pos = offset*24 - menu_height/2;
294
295   int center_x = screen->w/2;
296   int center_y = screen->h /2;
297   int start_x = center_x - b;
298
299   if(pitem.kind == MN_DEACTIVE)
300     {
301       text_drawf(&black_text, pitem.text, 
302                  -b, y_pos + 10 + f,
303                  A_HMIDDLE, A_VMIDDLE, 2, NO_UPDATE);
304     }
305   else if(pitem.kind == MN_HL)
306     {
307       /* Draw a horizontal line with a little 3d effect */
308       fillrect(x_pos, y_pos + 6 + center_y,
309                menu_width, 4,
310                210,50,50,225);
311       fillrect(x_pos, y_pos + 10 + center_y, 
312                menu_width, 2,
313                0,0,0,255);
314     }
315   else if(pitem.kind == MN_LABEL)
316     {
317       text_drawf(&white_big_text, pitem.text, 
318                  -b, y_pos + 10,
319                  A_HMIDDLE, A_VMIDDLE, 2);
320     }
321   else if(pitem.kind == MN_TEXTFIELD || pitem.kind == MN_NUMFIELD)
322     {
323       int input_pos = ((strlen(pitem.input)*16)/2);
324       int text_pos  = ((strlen(pitem.text) + 1)*16)/2;
325       fillrect(-b +center_x - input_pos + text_pos - 1,y_pos + 10 + center_y - 10 + f,
326                (strlen(pitem.input)+1)*16 + 2, 20,
327                255,255,255,255);
328       fillrect(-b +center_x - input_pos + text_pos, y_pos + 10 + center_y - 9 + f,
329                (strlen(pitem.input)+1)*16, 18,
330                0,0,0,128);
331       text_drawf(&gold_text, pitem.input,
332                  -b + text_pos, y_pos + 10 + f, 
333                  A_HMIDDLE, A_VMIDDLE, 2);
334
335       if(offset == pmenu->active_item)
336         {
337           text_drawf(&blue_text,pitem.text, -b  -(((strlen(pitem.input)+1) * 16)/2),y_pos + 10 + f,A_HMIDDLE, A_VMIDDLE,3);
338         }
339       else
340         {
341           text_drawf(&white_text,pitem.text, -b  -(((strlen(pitem.input)+1) * 16)/2),y_pos +10 + f,A_HMIDDLE, A_VMIDDLE,2);
342         }
343     }
344   else if(pitem.kind == MN_STRINGSELECT)
345     {
346       int list_pos = ((strlen(string_list_active(pitem.list))*16)/2);
347       int list_pos_2 = (strlen(string_list_active(pitem.list))+1)*16;
348       int text_pos = ((strlen(pitem.text) + 1)*16)/2;
349
350       /* Draw arrows */
351       texture_draw(&arrow_left, start_x - list_pos + text_pos - 17, y_pos + 10 + center_y -8 + f);
352       texture_draw(&arrow_right, start_x - list_pos + text_pos - 1 + list_pos_2, y_pos + 10 + center_y -8 + f);
353
354       /* Draw input background */
355       fillrect(start_x - list_pos + text_pos - 1, y_pos + 10 + center_y - 10 + f,
356                list_pos_2 + 2, 20,
357                255,255,255,255);
358       fillrect(start_x - list_pos + text_pos, y_pos + 10 + center_y - 9 + f,
359                list_pos_2, 18,
360                0,0,0,128);
361
362       text_drawf(&gold_text, string_list_active(pitem.list), 
363                  -b + text_pos, y_pos + 10 + f,
364                  A_HMIDDLE, A_VMIDDLE,2);
365
366       if(offset == pmenu->active_item)
367         {
368           text_drawf(&blue_text,pitem.text,
369                      -b - list_pos_2/2, y_pos + 10 + f,
370                      A_HMIDDLE, A_VMIDDLE,3);
371         }
372       else
373         {
374           text_drawf(&white_text,pitem.text,
375                      -b - list_pos_2/2, y_pos +10 + f,
376                      A_HMIDDLE, A_VMIDDLE,2);
377         }
378     }
379   else if(offset == pmenu->active_item)
380     {
381       text_drawf(&blue_text, pitem.text, 
382                  -b,y_pos + 10 + f,
383                  A_HMIDDLE, A_VMIDDLE, 3);
384     }
385   else
386     {
387       text_drawf(&white_text, pitem.text,
388                  -b, y_pos + 10 + f, 
389                  A_HMIDDLE, A_VMIDDLE, 2);
390     }
391
392   if(pitem.kind == MN_TOGGLE)
393     {
394       if(pitem.toggled == YES)
395         texture_draw(&checkbox_checked, -b + screen->w / 2 + (strlen(pitem.text) * 16)/2  + 16,y_pos + 10 + center_y -8 + f);
396       else
397         texture_draw(&checkbox, -b + screen->w / 2 + (strlen(pitem.text) * 16)/2 + 16,y_pos + 10 + center_y - 8 + f);
398     }
399   else if(pitem.kind == MN_BACK)
400     {
401       texture_draw(&back, -b + screen->w / 2 + (strlen(pitem.text) * 16)/2  + 16,y_pos + 10 + center_y -8 + f);
402     } 
403 }
404
405 /* Draw the current menu. */
406 void menu_draw(menu_type* pmenu)
407 {
408   int y;
409   int menu_height;
410   int menu_width;
411   
412   /* The width of the menu has to be more than the width of the text with the most characters */
413   menu_width = 0;
414   for(int i = 0; i < pmenu->num_items; ++i)
415     {
416       y = strlen(pmenu->item[i].text) + (pmenu->item[i].input ? strlen(pmenu->item[i].input) + 1 : 0) + strlen(string_list_active(pmenu->item[i].list));
417       if( y > menu_width )
418         {
419           menu_width = y;
420           if( pmenu->item[i].kind == MN_TOGGLE)
421             menu_width += 2;
422         }
423     }
424
425   menu_width = menu_width * 16 + 48;
426   menu_height = (pmenu->num_items) * 24;
427
428   int center_x = screen->w/2;
429   /* Draw a transparent background */
430   fillrect(center_x - menu_width/2,screen->h/2-(((pmenu->num_items)*24)/2),menu_width,menu_height,150,150,150,100);
431
432   for(int i = 0; i < pmenu->num_items; ++i)
433     {
434       menu_draw_item(pmenu, pmenu->item[i], i, menu_width, menu_height);
435     }
436 }
437
438 /* Reset/Set global defaults */
439 void menu_reset(void)
440 {
441   menu_change = NO;
442   show_menu = NO;
443   menuaction = -1;
444   current_menu = NULL;
445   last_menu = NULL;
446
447   delete_character = 0;
448   mn_input_char = '\0';
449 }
450
451 /* --- MENU --- */
452 /* Draw the current menu and execute the (menu)events */
453 void menu_process_current(void)
454 {
455   menu_change = NO;
456
457   if(current_menu != NULL)
458     {
459       menu_action(current_menu);
460       menu_draw(current_menu);
461     }
462
463   menuaction = -1;
464 }
465
466 /* Check for menu event */
467 void menu_event(SDL_keysym* keysym)
468 {
469   SDLKey key = keysym->sym;
470   SDLMod keymod;
471   char ch[2];
472   keymod = SDL_GetModState();
473
474   /* If the current unicode character is an ASCII character,
475      assign it to ch. */
476   if ( (keysym->unicode & 0xFF80) == 0 )
477     {
478       ch[0] = keysym->unicode & 0x7F;
479       ch[1] = '\0';
480     }
481   else
482     {
483       /* An International Character. */
484     }
485
486   switch(key)
487     {
488     case SDLK_UP:               /* Menu Up */
489       menuaction = MN_UP;
490       menu_change = YES;
491       break;
492     case SDLK_DOWN:             /* Menu Down */
493       menuaction = MN_DOWN;
494       menu_change = YES;
495       break;
496     case SDLK_LEFT:             /* Menu Up */
497       menuaction = MN_LEFT;
498       menu_change = YES;
499       break;
500     case SDLK_RIGHT:            /* Menu Down */
501       menuaction = MN_RIGHT;
502       menu_change = YES;
503       break;
504     case SDLK_SPACE:
505       if(current_menu->item[current_menu->active_item].kind == MN_TEXTFIELD)
506       {
507       menuaction = MN_INPUT;
508       menu_change = YES;
509       mn_input_char = ' ';
510       break;
511       }
512     case SDLK_RETURN: /* Menu Hit */
513       menuaction = MN_HIT;
514       menu_change = YES;
515       break;
516     case SDLK_DELETE:
517     case SDLK_BACKSPACE:
518       menuaction = MN_REMOVE;
519       menu_change = YES;
520       delete_character++;
521       break;
522     default:
523       if( (key >= SDLK_0 && key <= SDLK_9) || (key >= SDLK_a && key <= SDLK_z) || (key >= SDLK_SPACE && key <= SDLK_SLASH))
524         {
525           menuaction = MN_INPUT;
526           menu_change = YES;
527           mn_input_char = *ch;
528         }
529       else
530         {
531           mn_input_char = '\0';
532         }
533       break;
534     }
535
536
537   /* FIXME: NO JOYSTICK SUPPORT */
538   /*#ifdef JOY_YES
539   else if (event.type == SDL_JOYBUTTONDOWN)
540    {
541       Joystick button: Continue:
542
543      done = 1;
544    }
545   #endif*/
546 }
547