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