only add installdir to searchpath if nothing was found in current dir
[supertux.git] / src / main.cpp
1 //  $Id$
2 // 
3 //  SuperTux
4 //  Copyright (C) 2005 Matthias Braun <matze@braunis.de>
5 //
6 //  This program is free software; you can redistribute it and/or
7 //  modify it under the terms of the GNU General Public License
8 //  as published by the Free Software Foundation; either version 2
9 //  of the License, or (at your option) any later version.
10 //
11 //  This program is distributed in the hope that it will be useful,
12 //  but WITHOUT ANY WARRANTY; without even the implied warranty of
13 //  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14 //  GNU General Public License for more details.
15 // 
16 //  You should have received a copy of the GNU General Public License
17 //  along with this program; if not, write to the Free Software
18 //  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
19 //  02111-1307, USA.
20 #include <config.h>
21 #include <assert.h>
22
23 #include "main.h"
24
25 #include <stdexcept>
26 #include <iostream>
27 #include <sstream>
28 #include <time.h>
29 #include <stdlib.h>
30 #include <sys/stat.h>
31 #include <sys/types.h>
32 #include <dirent.h>
33 #include <unistd.h>
34 #include <assert.h>
35 #include <physfs.h>
36 #include <SDL.h>
37 #include <SDL_mixer.h>
38 #include <SDL_image.h>
39 #include <SDL_opengl.h>
40
41 #include "gameconfig.h"
42 #include "resources.h"
43 #include "gettext.h"
44 #include "audio/sound_manager.h"
45 #include "video/surface.h"
46 #include "control/joystickkeyboardcontroller.h"
47 #include "misc.h"
48 #include "title.h"
49 #include "game_session.h"
50 #include "file_system.h"
51 #include "physfs/physfs_sdl.h"
52
53 SDL_Surface* screen = 0;
54 JoystickKeyboardController* main_controller = 0;
55 TinyGetText::DictionaryManager dictionary_manager;
56
57 static void init_config()
58 {
59   config = new Config();
60   try {
61     config->load();
62   } catch(std::exception& e) {
63 #ifdef DEBUG
64     std::cerr << "Couldn't load config file: " << e.what() << "\n";
65 #endif
66   }
67 }
68
69 static void init_tinygettext()
70 {
71   dictionary_manager.add_directory("locale");
72   dictionary_manager.set_charset("UTF-8");
73 }
74
75 static void init_physfs(const char* argv0)
76 {
77   if(!PHYSFS_init(argv0)) {
78     std::stringstream msg;
79     msg << "Couldn't initialize physfs: " << PHYSFS_getLastError();
80     throw std::runtime_error(msg.str());
81   }
82
83   // Initialize physfs (this is a slightly modified version of
84   // PHYSFS_setSaneConfig
85   const char* application = PACKAGE_NAME;
86   const char* userdir = PHYSFS_getUserDir();
87   const char* dirsep = PHYSFS_getDirSeparator();
88   char* writedir = new char[strlen(userdir) + strlen(application) + 2];
89
90   // Set configuration directory
91   sprintf(writedir, "%s.%s", userdir, application);
92   if(!PHYSFS_setWriteDir(writedir)) {
93     // try to create the directory
94     char* mkdir = new char[strlen(application) + 2];
95     sprintf(mkdir, ".%s", application);
96     if(!PHYSFS_setWriteDir(userdir) || !PHYSFS_mkdir(mkdir)) {
97       std::ostringstream msg;
98       msg << "Failed creating configuration directory '" 
99           << writedir << "': " << PHYSFS_getLastError();
100       delete[] writedir;
101       delete[] mkdir;
102       throw std::runtime_error(msg.str());
103     }
104     delete[] mkdir;
105     
106     if(!PHYSFS_setWriteDir(writedir)) {
107       std::ostringstream msg;
108       msg << "Failed to use configuration directory '" 
109           <<  writedir << "': " << PHYSFS_getLastError();
110       delete[] writedir;
111       throw std::runtime_error(msg.str());
112     }
113   }
114   PHYSFS_addToSearchPath(writedir, 0);
115   delete[] writedir;
116
117   // Search for archives and add them to the search path
118   const char* archiveExt = "zip";
119   char** rc = PHYSFS_enumerateFiles("/");
120   size_t extlen = strlen(archiveExt);
121
122   for(char** i = rc; *i != 0; ++i) {
123     size_t l = strlen(*i);
124     if((l > extlen) && ((*i)[l - extlen - 1] == '.')) {
125       const char* ext = (*i) + (l - extlen);
126       if(strcasecmp(ext, archiveExt) == 0) {
127         const char* d = PHYSFS_getRealDir(*i);
128         char* str = new char[strlen(d) + strlen(dirsep) + l + 1];
129         sprintf(str, "%s%s%s", d, dirsep, *i);
130         PHYSFS_addToSearchPath(str, 1);
131         delete[] str;
132       }
133     }
134   }
135   
136   PHYSFS_freeList(rc);
137
138   // when started from source dir...
139   std::string dir = PHYSFS_getBaseDir();
140   dir += "/data";
141   std::string testfname = dir;
142   testfname += "/credits.txt";
143   bool sourcedir = false;
144   FILE* f = fopen(testfname.c_str(), "r");
145   if(f) {
146     fclose(f);
147     if(!PHYSFS_addToSearchPath(dir.c_str(), 1)) {
148       std::cout << "Warning: Couldn't add '" << dir 
149                 << "' to physfs searchpath: " << PHYSFS_getLastError() << "\n";
150     } else {
151       sourcedir = true;
152     }
153   }
154
155   if(!sourcedir) {
156 #if defined(APPDATADIR) || defined(ENABLE_BINRELOC)
157     std::string datadir;
158 #ifdef ENABLE_BINRELOC
159     char* brdatadir = br_strcat(DATADIR, "/" PACKAGE_NAME);
160     datadir = brdatadir;
161     free(brdatadir);
162 #else
163     datadir = APPDATADIR;
164 #endif
165     if(!PHYSFS_addToSearchPath(datadir.c_str(), 1)) {
166       std::cout << "Couldn't add '" << datadir
167         << "' to physfs searchpath: " << PHYSFS_getLastError() << "\n";
168     }
169 #endif
170   }
171
172   // allow symbolic links
173   PHYSFS_permitSymbolicLinks(1);
174
175   //show search Path
176   for(char** i = PHYSFS_getSearchPath(); *i != NULL; i++)
177     printf("[%s] is in the search path.\n", *i);
178 }
179
180 static void print_usage(const char* argv0)
181 {
182   fprintf(stderr, _("Usage: %s [OPTIONS] LEVELFILE\n\n"), argv0);
183   fprintf(stderr,
184           _("Options:\n"
185             "  -f, --fullscreen             Run in fullscreen mode.\n"
186             "  -w, --window                 Run in window mode.\n"
187             "  -g, --geometry WIDTHxHEIGHT  Run SuperTux in give resolution\n"
188             "  --help                       Show this help message\n"
189             "  --version                    Display SuperTux version and quit\n"
190             "\n"));
191 }
192
193 static void parse_commandline(int argc, char** argv)
194 {
195   for(int i = 1; i < argc; ++i) {
196     std::string arg = argv[i];
197
198     if(arg == "--fullscreen" || arg == "-f") {
199       config->use_fullscreen = true;
200     } else if(arg == "--window" || arg == "-w") {
201       config->use_fullscreen = false;
202     } else if(arg == "--geometry" || arg == "-g") {
203       if(i+1 >= argc) {
204         print_usage(argv[0]);
205         throw std::runtime_error("Need to specify a parameter for geometry switch");
206       }
207       if(sscanf(argv[++i], "%dx%d", &config->screenwidth, &config->screenheight)
208          != 2) {
209         print_usage(argv[0]);
210         throw std::runtime_error("Invalid geometry spec, should be WIDTHxHEIGHT");
211       }
212     } else if(arg == "--show-fps") {
213       config->show_fps = true;
214     } else if(arg == "--play-demo") {
215       if(i+1 >= argc) {
216         print_usage(argv[0]);
217         throw std::runtime_error("Need to specify a demo filename");
218       }
219       config->start_demo = argv[++i];
220     } else if(arg == "--record-demo") {
221       if(i+1 >= argc) {
222         print_usage(argv[0]);
223         throw std::runtime_error("Need to specify a demo filename");
224       }
225       config->record_demo = argv[++i];
226     } else if(arg == "--help") {
227       print_usage(argv[0]);
228       throw std::runtime_error("");
229     } else if(arg == "--version") {
230       std::cerr << PACKAGE_NAME << " " << PACKAGE_VERSION << "\n";
231       throw std::runtime_error("");
232     } else if(arg[0] != '-') {
233       config->start_level = arg;
234     } else {
235       std::cerr << "Unknown option '" << arg << "'.\n";
236       std::cerr << "Use --help to see a list of options.\n";
237     }
238   }
239
240   // TODO joystick switchyes...
241 }
242
243 static void init_sdl()
244 {
245   if(SDL_Init(SDL_INIT_EVERYTHING) < 0) {
246     std::stringstream msg;
247     msg << "Couldn't initialize SDL: " << SDL_GetError();
248     throw std::runtime_error(msg.str());
249   }
250
251   SDL_EnableUNICODE(1);
252
253   // wait 100ms and clear SDL event queue because sometimes we have random
254   // joystick events in the queue on startup...
255   SDL_Delay(100);
256   SDL_Event dummy;
257   while(SDL_PollEvent(&dummy))
258       ;
259 }
260
261 static void check_gl_error()
262 {
263   GLenum glerror = glGetError();
264   std::string errormsg;
265   
266   if(glerror != GL_NO_ERROR) {
267     switch(glerror) {
268       case GL_INVALID_ENUM:
269         errormsg = "Invalid enumeration value";
270         break;
271       case GL_INVALID_VALUE:
272         errormsg = "Numeric argzment out of range";
273         break;
274       case GL_INVALID_OPERATION:
275         errormsg = "Invalid operation";
276         break;
277       case GL_STACK_OVERFLOW:
278         errormsg = "stack overflow";
279         break;
280       case GL_STACK_UNDERFLOW:
281         errormsg = "stack underflow";
282         break;
283       case GL_OUT_OF_MEMORY:
284         errormsg = "out of memory";
285         break;
286       case GL_TABLE_TOO_LARGE:
287         errormsg = "table too large";
288         break;
289       default:
290         errormsg = "unknown error number";
291         break;
292     }
293     std::stringstream msg;
294     msg << "OpenGL Error: " << errormsg;
295     throw std::runtime_error(msg.str());
296   }
297 }
298
299 void init_video()
300 {
301   SDL_GL_SetAttribute(SDL_GL_DOUBLEBUFFER, 1); 
302   SDL_GL_SetAttribute(SDL_GL_RED_SIZE, 5);
303   SDL_GL_SetAttribute(SDL_GL_GREEN_SIZE, 5);
304   SDL_GL_SetAttribute(SDL_GL_BLUE_SIZE, 5);
305   
306   int flags = SDL_OPENGL;
307   if(config->use_fullscreen)
308     flags |= SDL_FULLSCREEN;
309   int width = config->screenwidth;
310   int height = config->screenheight;
311   int bpp = 0;
312
313   screen = SDL_SetVideoMode(width, height, bpp, flags);
314   if(screen == 0) {
315     std::stringstream msg;
316     msg << "Couldn't set video mode (" << width << "x" << height
317         << "-" << bpp << "bpp): " << SDL_GetError();
318     throw std::runtime_error(msg.str());
319   }
320
321   SDL_WM_SetCaption(PACKAGE_NAME " " PACKAGE_VERSION, 0);
322
323   // set icon
324   SDL_Surface* icon = IMG_Load_RW(
325       get_physfs_SDLRWops("images/engine/icons/supertux.xpm"), true);
326   if(icon != 0) {
327     SDL_WM_SetIcon(icon, 0);
328     SDL_FreeSurface(icon);
329   }
330 #ifdef DEBUG
331   else {
332     std::cerr << "Warning: Couldn't find icon 'images/engine/icons/supertux.xpm'.\n";
333   }
334 #endif
335
336   // setup opengl state and transform
337   glDisable(GL_DEPTH_TEST);
338   glDisable(GL_CULL_FACE);
339
340   glViewport(0, 0, screen->w, screen->h);
341   glMatrixMode(GL_PROJECTION);
342   glLoadIdentity();
343   // logical resolution here not real monitor resolution
344   glOrtho(0, 800, 600, 0, -1.0, 1.0);
345   glMatrixMode(GL_MODELVIEW);
346   glLoadIdentity();
347   glTranslatef(0, 0, 0);
348
349   check_gl_error();
350
351   Surface::reload_all();
352 }
353
354 static void init_audio()
355 {
356   sound_manager = new SoundManager();
357   
358   int format = MIX_DEFAULT_FORMAT;
359   if(Mix_OpenAudio(config->audio_frequency, format, config->audio_channels,
360                    config->audio_chunksize) < 0) {
361     std::cerr << "Couldn't initialize audio ("
362               << config->audio_frequency << "HZ, " << config->audio_channels
363               << " Channels, Format " << format << ", ChunkSize "
364               << config->audio_chunksize << "): " << SDL_GetError() << "\n";
365     return;
366   }
367   sound_manager->set_audio_device_available(true);
368   sound_manager->enable_sound(config->sound_enabled);
369   sound_manager->enable_music(config->music_enabled);
370   
371   if(Mix_AllocateChannels(config->audio_voices) < 0) {
372     std::cerr << "Couldn't allocate '" << config->audio_voices << "' audio voices: "
373               << SDL_GetError() << "\n";
374     return;
375   }
376 }
377
378 static void quit_audio()
379 {
380   if(sound_manager) {
381     if(sound_manager->audio_device_available())
382       Mix_CloseAudio();
383
384     delete sound_manager;
385     sound_manager = 0;
386   }
387 }
388
389 void wait_for_event(float min_delay, float max_delay)
390 {
391   assert(min_delay <= max_delay);
392   
393   Uint32 min = (Uint32) (min_delay * 1000);
394   Uint32 max = (Uint32) (max_delay * 1000);
395
396   SDL_Delay(min);
397
398   // clear even queue
399   SDL_Event event;
400   while (SDL_PollEvent(&event))
401   {}
402
403   /* Handle events: */
404   bool running = false;
405   Uint32 ticks = SDL_GetTicks();
406   while(running) {
407     while(SDL_PollEvent(&event)) {
408       switch(event.type) {
409         case SDL_QUIT:
410           throw std::runtime_error("received window close");
411         case SDL_KEYDOWN:
412         case SDL_JOYBUTTONDOWN:
413         case SDL_MOUSEBUTTONDOWN:
414           running = false;
415       }
416     }
417     if(SDL_GetTicks() - ticks >= (max - min))
418       running = false;
419     SDL_Delay(10);
420   }
421 }
422
423 int main(int argc, char** argv) 
424 {
425   try {
426     srand(time(0));
427     init_physfs(argv[0]);
428     init_sdl();
429     main_controller = new JoystickKeyboardController();    
430     init_config();
431     init_tinygettext();
432     parse_commandline(argc, argv);
433     init_audio();
434     init_video();
435
436     setup_menu();
437     load_shared();
438     if(config->start_level != "") {
439       // we have a normal path specified at commandline not physfs paths.
440       // So we simply mount that path here...
441       std::string dir = FileSystem::dirname(config->start_level);
442       PHYSFS_addToSearchPath(dir.c_str(), true);
443       GameSession session(
444           FileSystem::basename(config->start_level), ST_GL_LOAD_LEVEL_FILE);
445       if(config->start_demo != "")
446         session.play_demo(config->start_demo);
447       if(config->record_demo != "")
448         session.record_demo(config->record_demo);
449       session.run();
450     } else {
451       // normal game
452       title();
453     }    
454   } catch(std::exception& e) {
455     std::cerr << "Unexpected exception: " << e.what() << std::endl;
456     return 1;
457   } catch(...) {
458     std::cerr << "Unexpected exception." << std::endl;
459     return 1;
460   }
461
462   free_menu();
463   unload_shared();
464 #ifdef DEBUG
465   Surface::debug_check();
466 #endif
467   quit_audio();
468
469   if(config)
470     config->save();
471   delete config;
472   delete main_controller;
473   SDL_Quit();
474   PHYSFS_deinit();
475   
476   return 0;
477 }