cleanups. Merged credits patch from Ricardo and improved it.
[supertux.git] / src / setup.c
1 /*
2   setup.c
3   
4   Super Tux - Setup
5   
6   by Bill Kendrick
7   bill@newbreedsoftware.com
8   http://www.newbreedsoftware.com/supertux/
9   
10   April 11, 2000 - February 1st, 2004
11 */
12
13 #include <stdio.h>
14 #include <stdlib.h>
15 #include <string.h>
16 #include <errno.h>
17 #include <unistd.h>
18 #include <SDL.h>
19 #include <SDL_image.h>
20 #ifndef NOOPENGL
21 #include <SDL_opengl.h>
22 #endif
23
24 #ifdef LINUX
25 #include <pwd.h>
26 #include <sys/stat.h>
27 #include <sys/types.h>
28 #include <dirent.h>
29 #include <ctype.h>
30 #endif
31
32 #include "defines.h"
33 #include "globals.h"
34 #include "setup.h"
35 #include "screen.h"
36 #include "texture.h"
37 #include "menu.h"
38 #include "gameloop.h"
39
40 /* Local function prototypes: */
41
42 void seticon(void);
43 void usage(char * prog, int ret);
44
45 /* Does the given file exist and is it accessible? */
46 int faccessible(char *filename)
47 {
48   struct stat filestat;
49   if (stat(filename, &filestat) == -1)
50   {
51     return NO;
52   }
53   else
54   {
55   if(S_ISREG(filestat.st_mode))
56     return YES;
57   else
58     return NO;
59   }
60 }
61
62 /* Can we write to this location? */
63 int fwriteable(char *filename)
64 {
65   FILE* fi;
66   fi = fopen(filename, "wa");
67   if (fi == NULL)
68     {
69       return NO;
70     }
71   return YES;
72 }
73
74 /* Makes sure a directory is created in either the SuperTux base directory or the SuperTux base directory.*/
75 int fcreatedir(char* relative_dir)
76 {
77   char path[1024];
78   snprintf(path, 1024, "%s/%s/", st_dir, relative_dir);
79   if(mkdir(path,0755) != 0)
80     {
81       snprintf(path, 1024, "%s/%s/", DATA_PREFIX, relative_dir);
82       if(mkdir(path,0755) != 0)
83         {
84           return NO;
85         }
86       else
87         {
88           return YES;
89         }
90     }
91   else
92     {
93       return YES;
94     }
95 }
96
97 /* Get all names of sub-directories in a certain directory. */
98 /* Returns the number of sub-directories found. */
99 /* Note: The user has to free the allocated space. */
100 string_list_type dsubdirs(char *rel_path, char* expected_file)
101 {
102   DIR *dirStructP;
103   struct dirent *direntp;
104   int i = 0;
105   string_list_type sdirs;
106   char filename[1024];
107   char path[1024];
108
109   string_list_init(&sdirs);
110   sprintf(path,"%s/%s",st_dir,rel_path);
111   if((dirStructP = opendir(path)) != NULL)
112     {
113       while((direntp = readdir(dirStructP)) != NULL)
114         {
115           char absolute_filename[1024];
116           struct stat buf;
117
118           sprintf(absolute_filename, "%s/%s", path, direntp->d_name);
119
120           if (stat(absolute_filename, &buf) == 0 && S_ISDIR(buf.st_mode))
121             {
122               if(expected_file != NULL)
123                 {
124                   sprintf(filename,"%s/%s/%s",path,direntp->d_name,expected_file);
125                   if(!faccessible(filename))
126                     continue;
127                 }
128
129               string_list_add_item(&sdirs,direntp->d_name);
130             }
131         }
132       closedir(dirStructP);
133     }
134
135   sprintf(path,"%s/%s",DATA_PREFIX,rel_path);
136   if((dirStructP = opendir(path)) != NULL)
137     {
138       while((direntp = readdir(dirStructP)) != NULL)
139         {
140           char absolute_filename[1024];
141           struct stat buf;
142
143           sprintf(absolute_filename, "%s/%s", path, direntp->d_name);
144
145           if (stat(absolute_filename, &buf) == 0 && S_ISDIR(buf.st_mode))
146             {
147               if(expected_file != NULL)
148                 {
149                   sprintf(filename,"%s/%s/%s",path,direntp->d_name,expected_file);
150                   if(!faccessible(filename))
151                     {
152                       continue;
153                     }
154                   else
155                     {
156                       sprintf(filename,"%s/%s/%s/%s",st_dir,rel_path,direntp->d_name,expected_file);
157                       if(faccessible(filename))
158                         continue;
159                     }
160                 }
161
162               string_list_add_item(&sdirs,direntp->d_name);
163             }
164         }
165       closedir(dirStructP);
166     }
167
168   return sdirs;
169 }
170
171 string_list_type dfiles(char *rel_path, char* glob, char* exception_str)
172 {
173   DIR *dirStructP;
174   struct dirent *direntp;
175   int i = 0;
176   string_list_type sdirs;
177   char filename[1024];
178   char path[1024];
179
180   string_list_init(&sdirs);
181   sprintf(path,"%s/%s",st_dir,rel_path);
182   if((dirStructP = opendir(path)) != NULL)
183     {
184       while((direntp = readdir(dirStructP)) != NULL)
185         {
186           char absolute_filename[1024];
187           struct stat buf;
188
189           sprintf(absolute_filename, "%s/%s", path, direntp->d_name);
190
191           if (stat(absolute_filename, &buf) == 0 && S_ISREG(buf.st_mode))
192             {
193               if(exception_str != NULL)
194                 {
195                   if(strstr(direntp->d_name,exception_str) != NULL)
196                     continue;
197                 }
198               if(glob != NULL)
199                 if(strstr(direntp->d_name,glob) == NULL)
200                   continue;
201
202               string_list_add_item(&sdirs,direntp->d_name);
203             }
204         }
205       closedir(dirStructP);
206     }
207
208   sprintf(path,"%s/%s",DATA_PREFIX,rel_path);
209   if((dirStructP = opendir(path)) != NULL)
210     {
211       while((direntp = readdir(dirStructP)) != NULL)
212         {
213           char absolute_filename[1024];
214           struct stat buf;
215
216           sprintf(absolute_filename, "%s/%s", path, direntp->d_name);
217
218           if (stat(absolute_filename, &buf) == 0 && S_ISREG(buf.st_mode))
219             {
220               if(exception_str != NULL)
221                 {
222                   if(strstr(direntp->d_name,exception_str) != NULL)
223                     continue;
224                 }
225               if(glob != NULL)
226                 if(strstr(direntp->d_name,glob) == NULL)
227                   continue;
228
229               string_list_add_item(&sdirs,direntp->d_name);
230             }
231         }
232       closedir(dirStructP);
233     }
234
235   return sdirs;
236 }
237
238 void free_strings(char **strings, int num)
239 {
240   int i;
241   for(i=0; i < num; ++i)
242     free(strings[i]);
243 }
244
245 /* --- SETUP --- */
246 /* Set SuperTux configuration and save directories */
247 void st_directory_setup(void)
248 {
249   char *home;
250   char str[1024];
251   /* Get home directory (from $HOME variable)... if we can't determine it,
252      use the current directory ("."): */
253   if (getenv("HOME") != NULL)
254     home = getenv("HOME");
255   else
256     home = ".";
257
258   st_dir = (char *) malloc(sizeof(char) * (strlen(home) +
259                            strlen("/.supertux") + 1));
260   strcpy(st_dir, home);
261   strcat(st_dir, "/.supertux");
262   
263   /* Remove .supertux config-file from old SuperTux versions */
264   if(faccessible(st_dir))
265   {
266   remove(st_dir);
267   }
268
269   st_save_dir = (char *) malloc(sizeof(char) * (strlen(st_dir) + strlen("/save") + 1));
270
271   strcpy(st_save_dir,st_dir);
272   strcat(st_save_dir,"/save");
273
274   /* Create them. In the case they exist they won't destroy anything. */
275 #ifdef LINUX
276
277   mkdir(st_dir, 0755);
278   mkdir(st_save_dir, 0755);
279
280   sprintf(str, "%s/levels", st_dir);
281   mkdir(str, 0755);
282 #else
283   #ifdef WIN32
284
285   mkdir(st_dir);
286   mkdir(st_save_dir);
287   sprintf(str, "%s/levels", st_dir);
288   mkdir(str);
289 #endif
290 #endif
291
292 }
293
294 /* Create and setup menus. */
295 void st_menu(void)
296 {
297   menu_init(&main_menu);
298   menu_additem(&main_menu,menu_item_create(MN_LABEL,"Main Menu",0,0));
299   menu_additem(&main_menu,menu_item_create(MN_HL,"",0,0));
300   menu_additem(&main_menu,menu_item_create(MN_ACTION,"Start Game",0,0));
301   menu_additem(&main_menu,menu_item_create(MN_GOTO,"Load Game",0,&load_game_menu));
302   menu_additem(&main_menu,menu_item_create(MN_GOTO,"Options",0,&options_menu));
303   menu_additem(&main_menu,menu_item_create(MN_ACTION,"Level editor",0,0));
304   menu_additem(&main_menu,menu_item_create(MN_ACTION,"Credits",0,0));
305   menu_additem(&main_menu,menu_item_create(MN_HL,"",0,0));
306   menu_additem(&main_menu,menu_item_create(MN_ACTION,"Quit",0,0));
307
308   menu_init(&options_menu);
309   menu_additem(&options_menu,menu_item_create(MN_LABEL,"Options",0,0));
310   menu_additem(&options_menu,menu_item_create(MN_HL,"",0,0));
311   menu_additem(&options_menu,menu_item_create(MN_TOGGLE,"Fullscreen",use_fullscreen,0));
312   if(audio_device == YES)
313     {
314       menu_additem(&options_menu,menu_item_create(MN_TOGGLE,"Sound     ",use_sound,0));
315       menu_additem(&options_menu,menu_item_create(MN_TOGGLE,"Music     ",use_music,0));
316     }
317   else
318     {
319       menu_additem(&options_menu,menu_item_create(MN_DEACTIVE,"Sound     ",use_sound,0));
320       menu_additem(&options_menu,menu_item_create(MN_DEACTIVE,"Music     ",use_music,0));
321     }
322   menu_additem(&options_menu,menu_item_create(MN_TOGGLE,"Show FPS  ",show_fps,0));
323   menu_additem(&options_menu,menu_item_create(MN_HL,"",0,0));
324   menu_additem(&options_menu,menu_item_create(MN_BACK,"Back",0,0));
325
326   menu_init(&load_game_menu);
327   menu_additem(&load_game_menu,menu_item_create(MN_LABEL,"Load Game",0,0));
328   menu_additem(&load_game_menu,menu_item_create(MN_HL,"",0,0));
329   menu_additem(&load_game_menu,menu_item_create(MN_DEACTIVE,"Slot 1",0,0));
330   menu_additem(&load_game_menu,menu_item_create(MN_DEACTIVE,"Slot 2",0,0));
331   menu_additem(&load_game_menu,menu_item_create(MN_DEACTIVE,"Slot 3",0,0));
332   menu_additem(&load_game_menu,menu_item_create(MN_DEACTIVE,"Slot 4",0,0));
333   menu_additem(&load_game_menu,menu_item_create(MN_DEACTIVE,"Slot 5",0,0));
334   menu_additem(&load_game_menu,menu_item_create(MN_HL,"",0,0));
335   menu_additem(&load_game_menu,menu_item_create(MN_BACK,"Back",0,0));
336
337   menu_init(&save_game_menu);
338   menu_additem(&save_game_menu,menu_item_create(MN_LABEL,"Save Game",0,0));
339   menu_additem(&save_game_menu,menu_item_create(MN_HL,"",0,0));
340   menu_additem(&save_game_menu,menu_item_create(MN_DEACTIVE,"Slot 1",0,0));
341   menu_additem(&save_game_menu,menu_item_create(MN_DEACTIVE,"Slot 2",0,0));
342   menu_additem(&save_game_menu,menu_item_create(MN_DEACTIVE,"Slot 3",0,0));
343   menu_additem(&save_game_menu,menu_item_create(MN_DEACTIVE,"Slot 4",0,0));
344   menu_additem(&save_game_menu,menu_item_create(MN_DEACTIVE,"Slot 5",0,0));
345   menu_additem(&save_game_menu,menu_item_create(MN_HL,"",0,0));
346   menu_additem(&save_game_menu,menu_item_create(MN_BACK,"Back",0,0));
347
348   menu_init(&game_menu);
349   menu_additem(&game_menu,menu_item_create(MN_LABEL,"InGame Menu",0,0));
350   menu_additem(&game_menu,menu_item_create(MN_HL,"",0,0));
351   menu_additem(&game_menu,menu_item_create(MN_ACTION,"Return To Game",0,0));
352   menu_additem(&game_menu,menu_item_create(MN_GOTO,"Save Game",0,&save_game_menu));
353   menu_additem(&game_menu,menu_item_create(MN_GOTO,"Load Game",0,&load_game_menu));
354   menu_additem(&game_menu,menu_item_create(MN_GOTO,"Options",0,&options_menu));
355   menu_additem(&game_menu,menu_item_create(MN_HL,"",0,0));
356   menu_additem(&game_menu,menu_item_create(MN_ACTION,"Quit Game",0,0));
357
358   menu_init(&highscore_menu);
359   menu_additem(&highscore_menu,menu_item_create(MN_TEXTFIELD,"Enter your name:",0,0));
360
361 }
362
363 void update_load_save_game_menu(menu_type* pmenu, int load)
364 {
365   int i;
366
367   for(i = 2; i < 7; ++i)
368     {
369       char *tmp;
370       slotinfo(&tmp,i-1);
371       if(load && strlen(tmp) == strlen("Slot X - Free") )
372         pmenu->item[i].kind = MN_DEACTIVE;
373       else
374         pmenu->item[i].kind = MN_ACTION;
375       menu_item_change_text(&pmenu->item[i],tmp);
376       free(tmp);
377     }
378 }
379
380 void process_save_load_game_menu(int save)
381 {
382   int slot;
383   switch (slot = menu_check(save ? &save_game_menu : &load_game_menu))
384     {
385     default:
386       if(slot != -1)
387         {
388           if(save == YES)
389             {
390               savegame(slot);
391             }
392           else
393             {
394               if(game_started == NO)
395                 gameloop("whatever",slot,ST_GL_LOAD_GAME);
396               else
397                 loadgame(slot);
398             }
399           st_pause_ticks_stop();
400         }
401       break;
402     }
403 }
404
405 /* Handle changes made to global settings in the options menu. */
406 void process_options_menu(void)
407 {
408   switch (menu_check(&options_menu))
409     {
410     case 2:
411       if(use_fullscreen != options_menu.item[2].toggled)
412         {
413           use_fullscreen = !use_fullscreen;
414           st_video_setup();
415         }
416       break;
417     case 3:
418       if(use_sound != options_menu.item[3].toggled)
419         use_sound = !use_sound;
420       break;
421     case 4:
422       if(use_music != options_menu.item[4].toggled)
423         {
424           if(use_music == YES)
425             {
426               if(playing_music())
427                 {
428                   halt_music();
429                 }
430               use_music = NO;
431             }
432           else
433             {
434               use_music = YES;
435               if (!playing_music())
436                 {
437                   play_current_music();
438                 }
439             }
440         }
441       break;
442     case 5:
443       if(show_fps != options_menu.item[5].toggled)
444         show_fps = !show_fps;
445       break;
446     }
447 }
448
449 void st_general_setup(void)
450 {
451   /* Seed random number generator: */
452
453   srand(SDL_GetTicks());
454
455   /* Load global images: */
456
457   text_load(&black_text,DATA_PREFIX "/images/status/letters-black.png", TEXT_TEXT, 16,18);
458   text_load(&gold_text,DATA_PREFIX "/images/status/letters-gold.png", TEXT_TEXT, 16,18);
459   text_load(&blue_text,DATA_PREFIX "/images/status/letters-blue.png", TEXT_TEXT, 16,18);
460   text_load(&red_text,DATA_PREFIX "/images/status/letters-red.png", TEXT_TEXT, 16,18);
461   text_load(&white_text,DATA_PREFIX "/images/status/letters-white.png", TEXT_TEXT, 16,18);
462   text_load(&white_small_text,DATA_PREFIX "/images/status/letters-white-small.png", TEXT_TEXT, 8,9);
463   text_load(&white_big_text,DATA_PREFIX "/images/status/letters-white-big.png", TEXT_TEXT, 20,23);
464   text_load(&yellow_nums,DATA_PREFIX "/images/status/numbers.png", TEXT_NUM, 32,32);
465
466   /* Load GUI/menu images: */
467   texture_load(&checkbox, DATA_PREFIX "/images/status/checkbox.png", USE_ALPHA);
468   texture_load(&checkbox_checked, DATA_PREFIX "/images/status/checkbox-checked.png", USE_ALPHA);
469   texture_load(&back, DATA_PREFIX "/images/status/back.png", USE_ALPHA);
470   texture_load(&arrow_left, DATA_PREFIX "/images/icons/left.png", USE_ALPHA);
471   texture_load(&arrow_right, DATA_PREFIX "/images/icons/right.png", USE_ALPHA);
472
473   /* Set icon image: */
474
475   seticon();
476   SDL_EnableUNICODE(1);
477
478 }
479
480 void st_general_free(void)
481 {
482
483   /* Free global images: */
484
485   text_free(&black_text);
486   text_free(&gold_text);
487   text_free(&white_text);
488   text_free(&blue_text);
489   text_free(&red_text);
490   text_free(&white_small_text);
491   text_free(&white_big_text);
492
493   /* Free GUI/menu images: */
494   texture_free(&checkbox);
495   texture_free(&checkbox_checked);
496   texture_free(&back);
497   texture_free(&arrow_left);
498   texture_free(&arrow_right);
499   
500   /* Free menus */
501
502   menu_free(&main_menu);
503   menu_free(&game_menu);
504   menu_free(&options_menu);
505   menu_free(&highscore_menu);
506   menu_free(&save_game_menu);
507   menu_free(&load_game_menu);
508
509 }
510
511 void st_video_setup(void)
512 {
513
514   if(screen != NULL)
515     SDL_FreeSurface(screen);
516
517   /* Init SDL Video: */
518
519   if (SDL_Init(SDL_INIT_VIDEO) < 0)
520     {
521       fprintf(stderr,
522               "\nError: I could not initialize video!\n"
523               "The Simple DirectMedia error that occured was:\n"
524               "%s\n\n", SDL_GetError());
525       exit(1);
526     }
527
528   /* Open display: */
529
530   if(use_gl)
531     st_video_setup_gl();
532   else
533     st_video_setup_sdl();
534
535   texture_setup();
536
537   /* Set window manager stuff: */
538
539   SDL_WM_SetCaption("Super Tux", "Super Tux");
540
541 }
542
543 void st_video_setup_sdl(void)
544 {
545   SDL_FreeSurface(screen);
546
547   if (use_fullscreen == YES)
548     {
549       screen = SDL_SetVideoMode(640, 480, 16, SDL_FULLSCREEN ) ; /* | SDL_HWSURFACE); */
550       if (screen == NULL)
551         {
552           fprintf(stderr,
553                   "\nWarning: I could not set up fullscreen video for "
554                   "640x480 mode.\n"
555                   "The Simple DirectMedia error that occured was:\n"
556                   "%s\n\n", SDL_GetError());
557           use_fullscreen = NO;
558         }
559     }
560   else
561     {
562       screen = SDL_SetVideoMode(640, 480, 16, SDL_HWSURFACE | SDL_DOUBLEBUF );
563
564       if (screen == NULL)
565         {
566           fprintf(stderr,
567                   "\nError: I could not set up video for 640x480 mode.\n"
568                   "The Simple DirectMedia error that occured was:\n"
569                   "%s\n\n", SDL_GetError());
570           exit(1);
571         }
572     }
573 }
574
575 void st_video_setup_gl(void)
576 {
577 #ifndef NOOPENGL
578
579   SDL_GL_SetAttribute(SDL_GL_RED_SIZE, 5);
580   SDL_GL_SetAttribute(SDL_GL_GREEN_SIZE, 5);
581   SDL_GL_SetAttribute(SDL_GL_BLUE_SIZE, 5);
582   SDL_GL_SetAttribute(SDL_GL_DEPTH_SIZE, 16);
583   SDL_GL_SetAttribute(SDL_GL_DOUBLEBUFFER, 1);
584
585   if (use_fullscreen == YES)
586     {
587       screen = SDL_SetVideoMode(640, 480, 32, SDL_FULLSCREEN | SDL_OPENGL) ; /* | SDL_HWSURFACE); */
588       if (screen == NULL)
589         {
590           fprintf(stderr,
591                   "\nWarning: I could not set up fullscreen video for "
592                   "640x480 mode.\n"
593                   "The Simple DirectMedia error that occured was:\n"
594                   "%s\n\n", SDL_GetError());
595           use_fullscreen = NO;
596         }
597     }
598   else
599     {
600       screen = SDL_SetVideoMode(640, 480, 32, SDL_OPENGL);
601
602       if (screen == NULL)
603         {
604           fprintf(stderr,
605                   "\nError: I could not set up video for 640x480 mode.\n"
606                   "The Simple DirectMedia error that occured was:\n"
607                   "%s\n\n", SDL_GetError());
608           exit(1);
609         }
610     }
611
612   /*
613    * Set up OpenGL for 2D rendering.
614    */
615   glDisable(GL_DEPTH_TEST);
616   glDisable(GL_CULL_FACE);
617
618   glViewport(0, 0, screen->w, screen->h);
619   glMatrixMode(GL_PROJECTION);
620   glLoadIdentity();
621   glOrtho(0, screen->w, screen->h, 0, -1.0, 1.0);
622
623   glMatrixMode(GL_MODELVIEW);
624   glLoadIdentity();
625   glTranslatef(0.0f, 0.0f, 0.0f);
626
627 #endif
628
629 }
630
631 void st_joystick_setup(void)
632 {
633
634   /* Init Joystick: */
635
636 #ifdef JOY_YES
637   use_joystick = YES;
638
639   if (SDL_Init(SDL_INIT_JOYSTICK) < 0)
640     {
641       fprintf(stderr, "Warning: I could not initialize joystick!\n"
642               "The Simple DirectMedia error that occured was:\n"
643               "%s\n\n", SDL_GetError());
644
645       use_joystick = NO;
646     }
647   else
648     {
649       /* Open joystick: */
650
651       if (SDL_NumJoysticks() <= 0)
652         {
653           fprintf(stderr, "Warning: No joysticks are available.\n");
654
655           use_joystick = NO;
656         }
657       else
658         {
659           js = SDL_JoystickOpen(0);
660
661           if (js == NULL)
662             {
663               fprintf(stderr, "Warning: Could not open joystick 1.\n"
664                       "The Simple DirectMedia error that occured was:\n"
665                       "%s\n\n", SDL_GetError());
666
667               use_joystick = NO;
668             }
669           else
670             {
671               /* Check for proper joystick configuration: */
672
673               if (SDL_JoystickNumAxes(js) < 2)
674                 {
675                   fprintf(stderr,
676                           "Warning: Joystick does not have enough axes!\n");
677
678                   use_joystick = NO;
679                 }
680               else
681                 {
682                   if (SDL_JoystickNumButtons(js) < 2)
683                     {
684                       fprintf(stderr,
685                               "Warning: "
686                               "Joystick does not have enough buttons!\n");
687
688                       use_joystick = NO;
689                     }
690                 }
691             }
692         }
693     }
694 #endif
695
696 }
697
698 void st_audio_setup(void)
699 {
700
701   /* Init SDL Audio silently even if --disable-sound : */
702
703   if (audio_device == YES)
704     {
705       if (SDL_Init(SDL_INIT_AUDIO) < 0)
706         {
707           /* only print out message if sound or music
708              was not disabled at command-line
709            */
710           if (use_sound == YES || use_music == YES)
711             {
712               fprintf(stderr,
713                       "\nWarning: I could not initialize audio!\n"
714                       "The Simple DirectMedia error that occured was:\n"
715                       "%s\n\n", SDL_GetError());
716             }
717           /* keep the programming logic the same :-)
718              because in this case, use_sound & use_music' values are ignored
719              when there's no available audio device
720           */
721           use_sound = NO;
722           use_music = NO;
723           audio_device = NO;
724         }
725     }
726
727
728   /* Open sound silently regarless the value of "use_sound": */
729
730   if (audio_device == YES)
731     {
732       if (open_audio(44100, AUDIO_S16, 2, 2048) < 0)
733         {
734           /* only print out message if sound or music
735              was not disabled at command-line
736            */
737           if ((use_sound == YES) || (use_music == YES))
738             {
739               fprintf(stderr,
740                       "\nWarning: I could not set up audio for 44100 Hz "
741                       "16-bit stereo.\n"
742                       "The Simple DirectMedia error that occured was:\n"
743                       "%s\n\n", SDL_GetError());
744             }
745           use_sound = NO;
746           use_music = NO;
747           audio_device = NO;
748         }
749     }
750
751 }
752
753
754 /* --- SHUTDOWN --- */
755
756 void st_shutdown(void)
757 {
758   close_audio();
759   SDL_Quit();
760 }
761
762
763 /* --- ABORT! --- */
764
765 void st_abort(char * reason, char * details)
766 {
767   fprintf(stderr, "\nError: %s\n%s\n\n", reason, details);
768   st_shutdown();
769   exit(1);
770 }
771
772
773 /* Set Icon (private) */
774
775 void seticon(void)
776 {
777   int masklen;
778   Uint8 * mask;
779   SDL_Surface * icon;
780
781
782   /* Load icon into a surface: */
783
784   icon = IMG_Load(DATA_PREFIX "/images/icon.png");
785   if (icon == NULL)
786     {
787       fprintf(stderr,
788               "\nError: I could not load the icon image: %s\n"
789               "The Simple DirectMedia error that occured was:\n"
790               "%s\n\n", DATA_PREFIX "images/icon.png", SDL_GetError());
791       exit(1);
792     }
793
794
795   /* Create mask: */
796
797   masklen = (((icon -> w) + 7) / 8) * (icon -> h);
798   mask = (Uint8*) malloc(masklen * sizeof(Uint8));
799   memset(mask, 0xFF, masklen);
800
801
802   /* Set icon: */
803
804   SDL_WM_SetIcon(icon, mask);
805
806
807   /* Free icon surface & mask: */
808
809   free(mask);
810   SDL_FreeSurface(icon);
811 }
812
813
814 /* Parse command-line arguments: */
815
816 void parseargs(int argc, char * argv[])
817 {
818   int i;
819
820   /* Set defaults: */
821
822
823   debug_mode = NO;
824   use_fullscreen = NO;
825   show_fps = NO;
826   use_gl = NO;
827
828 #ifndef NOSOUND
829
830   use_sound = YES;
831   use_music = YES;
832   audio_device = YES;
833 #else
834
835   use_sound = NO;
836   use_music = NO;
837   audio_device = NO;
838 #endif
839
840   /* Parse arguments: */
841
842   for (i = 1; i < argc; i++)
843     {
844       if (strcmp(argv[i], "--fullscreen") == 0 ||
845           strcmp(argv[i], "-f") == 0)
846         {
847           /* Use full screen: */
848
849           use_fullscreen = YES;
850         }
851       else if (strcmp(argv[i], "--show-fps") == 0)
852         {
853           /* Use full screen: */
854
855           show_fps = YES;
856         }
857       else if (strcmp(argv[i], "--opengl") == 0 ||
858                strcmp(argv[i], "-gl") == 0)
859         {
860 #ifndef NOOPENGL
861           /* Use OpengGL: */
862
863           use_gl = YES;
864 #endif
865
866         }
867       else if (strcmp(argv[i], "--usage") == 0)
868         {
869           /* Show usage: */
870
871           usage(argv[0], 0);
872         }
873       else if (strcmp(argv[i], "--version") == 0)
874         {
875           /* Show version: */
876
877           printf("Super Tux - version " VERSION "\n");
878           exit(0);
879         }
880       else if (strcmp(argv[i], "--disable-sound") == 0)
881         {
882           /* Disable the compiled in sound feature */
883 #ifndef NOSOUND
884           printf("Sounds disabled \n");
885           use_sound = NO;
886 #else
887
888           printf("Warning: Sounds feature is not compiled in \n");
889 #endif
890
891         }
892       else if (strcmp(argv[i], "--disable-music") == 0)
893         {
894           /* Disable the compiled in sound feature */
895 #ifndef NOSOUND
896           printf("Music disabled \n");
897           use_music = NO;
898 #else
899
900           printf("Warning: Music feature is not compiled in \n");
901 #endif
902
903         }
904       else if (strcmp(argv[i], "--debug-mode") == 0)
905         {
906           /* Enable the debug-mode */
907           debug_mode = YES;
908
909         }
910       else if (strcmp(argv[i], "--help") == 0)
911         {         /* Show help: */
912
913           printf("Super Tux " VERSION "\n\n");
914
915           printf("----------  Command-line options  ----------\n\n");
916
917           printf("  --opengl            - If opengl support was compiled in, this will enable the EXPERIMENTAL OpenGL mode.\n\n");
918
919           printf("  --disable-sound     - If sound support was compiled in,  this will\n                        disable sound for this session of the game.\n\n");
920
921           printf("  --disable-music     - Like above, but this will disable music.\n\n");
922
923           printf("  --fullscreen        - Run in fullscreen mode.\n\n");
924
925           printf("  --debug-mode        - Enables the debug-mode, which is useful for developers.\n\n");
926
927           printf("  --help              - Display a help message summarizing command-line\n                        options, license and game controls.\n\n");
928
929           printf("  --usage             - Display a brief message summarizing command-line options.\n\n");
930
931           printf("  --version           - Display the version of SuperTux you're running.\n\n\n");
932
933
934           printf("----------          License       ----------\n\n");
935           printf("  This program comes with ABSOLUTELY NO WARRANTY.\n");
936           printf("  This is free software, and you are welcome to redistribute\n");
937           printf("  or modify it under certain conditions. See the file \n");
938           printf("  \"COPYING.txt\" for more details.\n\n\n");
939
940           printf("----------      Game controls     ----------\n\n");
941           printf("  Please see the file \"README.txt\"\n\n");
942
943           exit(0);
944         }
945       else
946         {
947           /* Unknown - complain! */
948
949           usage(argv[0], 1);
950         }
951     }
952 }
953
954
955 /* Display usage: */
956
957 void usage(char * prog, int ret)
958 {
959   FILE * fi;
960
961
962   /* Determine which stream to write to: */
963
964   if (ret == 0)
965     fi = stdout;
966   else
967     fi = stderr;
968
969
970   /* Display the usage message: */
971
972   fprintf(fi, "Usage: %s [--fullscreen] [--opengl] [--disable-sound] [--disable-music] [--debug-mode] | [--usage | --help | --version]\n",
973           prog);
974
975
976   /* Quit! */
977
978   exit(ret);
979 }
980