6d5d9115bafb30b28a53b972b37652c4f87e4dda
[supertux.git] / src / main.cpp
1 //  $Id$
2 //
3 //  SuperTux
4 //  Copyright (C) 2006 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 "log.hpp"
24 #include "main.hpp"
25
26 #include <stdexcept>
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_image.h>
38 #include <GL/gl.h>
39
40 #include "gameconfig.hpp"
41 #include "resources.hpp"
42 #include "gettext.hpp"
43 #include "audio/sound_manager.hpp"
44 #include "video/surface.hpp"
45 #include "video/texture_manager.hpp"
46 #include "control/joystickkeyboardcontroller.hpp"
47 #include "misc.hpp"
48 #include "mainloop.hpp"
49 #include "title.hpp"
50 #include "game_session.hpp"
51 #include "script_manager.hpp"
52 #include "scripting/sound.hpp"
53 #include "scripting/level.hpp"
54 #include "scripting/wrapper_util.hpp"
55 #include "file_system.hpp"
56 #include "physfs/physfs_sdl.hpp"
57
58 SDL_Surface* screen = 0;
59 JoystickKeyboardController* main_controller = 0;
60 TinyGetText::DictionaryManager dictionary_manager;
61
62 static void init_config()
63 {
64   config = new Config();
65   try {
66     config->load();
67   } catch(std::exception& e) {
68     log_info << "Couldn't load config file: " << e.what() << ", using default settings" << std::endl;
69   }
70 }
71
72 static void init_tinygettext()
73 {
74   dictionary_manager.add_directory("locale");
75   dictionary_manager.set_charset("UTF-8");
76 }
77
78 static void init_physfs(const char* argv0)
79 {
80   if(!PHYSFS_init(argv0)) {
81     std::stringstream msg;
82     msg << "Couldn't initialize physfs: " << PHYSFS_getLastError();
83     throw std::runtime_error(msg.str());
84   }
85
86   // Initialize physfs (this is a slightly modified version of
87   // PHYSFS_setSaneConfig
88   const char* application = PACKAGE_NAME;
89   const char* userdir = PHYSFS_getUserDir();
90   const char* dirsep = PHYSFS_getDirSeparator();
91   char* writedir = new char[strlen(userdir) + strlen(application) + 2];
92
93   // Set configuration directory
94   sprintf(writedir, "%s.%s", userdir, application);
95   if(!PHYSFS_setWriteDir(writedir)) {
96     // try to create the directory
97     char* mkdir = new char[strlen(application) + 2];
98     sprintf(mkdir, ".%s", application);
99     if(!PHYSFS_setWriteDir(userdir) || !PHYSFS_mkdir(mkdir)) {
100       std::ostringstream msg;
101       msg << "Failed creating configuration directory '" 
102           << writedir << "': " << PHYSFS_getLastError();
103       delete[] writedir;
104       delete[] mkdir;
105       throw std::runtime_error(msg.str());
106     }
107     delete[] mkdir;
108     
109     if(!PHYSFS_setWriteDir(writedir)) {
110       std::ostringstream msg;
111       msg << "Failed to use configuration directory '" 
112           <<  writedir << "': " << PHYSFS_getLastError();
113       delete[] writedir;
114       throw std::runtime_error(msg.str());
115     }
116   }
117   PHYSFS_addToSearchPath(writedir, 0);
118   delete[] writedir;
119
120   // Search for archives and add them to the search path
121   const char* archiveExt = "zip";
122   char** rc = PHYSFS_enumerateFiles("/");
123   size_t extlen = strlen(archiveExt);
124
125   for(char** i = rc; *i != 0; ++i) {
126     size_t l = strlen(*i);
127     if((l > extlen) && ((*i)[l - extlen - 1] == '.')) {
128       const char* ext = (*i) + (l - extlen);
129       if(strcasecmp(ext, archiveExt) == 0) {
130         const char* d = PHYSFS_getRealDir(*i);
131         char* str = new char[strlen(d) + strlen(dirsep) + l + 1];
132         sprintf(str, "%s%s%s", d, dirsep, *i);
133         PHYSFS_addToSearchPath(str, 1);
134         delete[] str;
135       }
136     }
137   }
138   
139   PHYSFS_freeList(rc);
140
141   // when started from source dir...
142   std::string dir = PHYSFS_getBaseDir();
143   dir += "/data";
144   std::string testfname = dir;
145   testfname += "/credits.txt";
146   bool sourcedir = false;
147   FILE* f = fopen(testfname.c_str(), "r");
148   if(f) {
149     fclose(f);
150     if(!PHYSFS_addToSearchPath(dir.c_str(), 1)) {
151       log_warning << "Couldn't add '" << dir << "' to physfs searchpath: " << PHYSFS_getLastError() << std::endl;
152     } else {
153       sourcedir = true;
154     }
155   }
156
157 #ifdef MACOSX
158   // when started from Application file on Mac OS X...
159   dir = PHYSFS_getBaseDir();
160   dir += "SuperTux.app/Contents/Resources/data";
161   testfname = dir + "/credits.txt";
162   sourcedir = false;
163   f = fopen(testfname.c_str(), "r");
164   if(f) {
165     fclose(f);
166     if(!PHYSFS_addToSearchPath(dir.c_str(), 1)) {
167       msg_warning << "Couldn't add '" << dir << "' to physfs searchpath: " << PHYSFS_getLastError() << std::endl;
168     } else {
169       sourcedir = true;
170     }
171   }
172 #endif
173
174   if(!sourcedir) {
175 #if defined(APPDATADIR) || defined(ENABLE_BINRELOC)
176     std::string datadir;
177 #ifdef ENABLE_BINRELOC
178     char* brdatadir = br_strcat(DATADIR, "/" PACKAGE_NAME);
179     datadir = brdatadir;
180     free(brdatadir);
181 #else
182     datadir = APPDATADIR;
183 #endif
184     if(!PHYSFS_addToSearchPath(datadir.c_str(), 1)) {
185       log_warning << "Couldn't add '" << datadir << "' to physfs searchpath: " << PHYSFS_getLastError() << std::endl;
186     }
187 #endif
188   }
189
190   // allow symbolic links
191   PHYSFS_permitSymbolicLinks(1);
192
193   //show search Path
194   for(char** i = PHYSFS_getSearchPath(); *i != NULL; i++)
195     log_info << "[" << *i << "] is in the search path" << std::endl;
196 }
197
198 static void print_usage(const char* argv0)
199 {
200   fprintf(stderr, _("Usage: %s [OPTIONS] [LEVELFILE]\n\n"), argv0);
201   fprintf(stderr,
202           _("Options:\n"
203             "  -f, --fullscreen             Run in fullscreen mode\n"
204             "  -w, --window                 Run in window mode\n"
205             "  -g, --geometry WIDTHxHEIGHT  Run SuperTux in given resolution\n"
206             "  --disable-sfx                Disable sound effects\n"
207             "  --disable-music              Disable music\n"
208             "  --help                       Show this help message\n"
209             "  --version                    Display SuperTux version and quit\n"
210             "  --show-fps                   Display framerate in levels\n"
211             "  --record-demo FILE LEVEL     Record a demo to FILE\n"
212             "  --play-demo FILE LEVEL       Play a recorded demo\n"
213             "\n"));
214 }
215
216 static bool parse_commandline(int argc, char** argv)
217 {
218   for(int i = 1; i < argc; ++i) {
219     std::string arg = argv[i];
220
221     if(arg == "--fullscreen" || arg == "-f") {
222       config->use_fullscreen = true;
223     } else if(arg == "--window" || arg == "-w") {
224       config->use_fullscreen = false;
225     } else if(arg == "--geometry" || arg == "-g") {
226       if(i+1 >= argc) {
227         print_usage(argv[0]);
228         throw std::runtime_error("Need to specify a parameter for geometry switch");
229       }
230       if(sscanf(argv[++i], "%dx%d", &config->screenwidth, &config->screenheight)
231          != 2) {
232         print_usage(argv[0]);
233         throw std::runtime_error("Invalid geometry spec, should be WIDTHxHEIGHT");
234       }
235     } else if(arg == "--show-fps") {
236       config->show_fps = true;
237     } else if(arg == "--disable-sfx") {
238       config->sound_enabled = false;
239     } else if(arg == "--disable-music") {
240       config->music_enabled = false;
241     } else if(arg == "--play-demo") {
242       if(i+1 >= argc) {
243         print_usage(argv[0]);
244         throw std::runtime_error("Need to specify a demo filename");
245       }
246       config->start_demo = argv[++i];
247     } else if(arg == "--record-demo") {
248       if(i+1 >= argc) {
249         print_usage(argv[0]);
250         throw std::runtime_error("Need to specify a demo filename");
251       }
252       config->record_demo = argv[++i];
253     } else if(arg == "--help") {
254       print_usage(argv[0]);
255       return true;
256     } else if(arg == "--version") {
257       log_info << PACKAGE_NAME << " " << PACKAGE_VERSION << std::endl;
258       return true;
259     } else if(arg[0] != '-') {
260       config->start_level = arg;
261     } else {
262       log_warning << "Unknown option '" << arg << "'. Use --help to see a list of options" << std::endl;
263     }
264   }
265
266   return false;
267 }
268
269 static void init_sdl()
270 {
271   if(SDL_Init(SDL_INIT_EVERYTHING) < 0) {
272     std::stringstream msg;
273     msg << "Couldn't initialize SDL: " << SDL_GetError();
274     throw std::runtime_error(msg.str());
275   }
276   // just to be sure
277   atexit(SDL_Quit);
278
279   SDL_EnableUNICODE(1);
280
281   // wait 100ms and clear SDL event queue because sometimes we have random
282   // joystick events in the queue on startup...
283   SDL_Delay(100);
284   SDL_Event dummy;
285   while(SDL_PollEvent(&dummy))
286       ;
287 }
288
289 static void check_gl_error()
290 {
291   GLenum glerror = glGetError();
292   std::string errormsg;
293   
294   if(glerror != GL_NO_ERROR) {
295     switch(glerror) {
296       case GL_INVALID_ENUM:
297         errormsg = "Invalid enumeration value";
298         break;
299       case GL_INVALID_VALUE:
300         errormsg = "Numeric argzment out of range";
301         break;
302       case GL_INVALID_OPERATION:
303         errormsg = "Invalid operation";
304         break;
305       case GL_STACK_OVERFLOW:
306         errormsg = "stack overflow";
307         break;
308       case GL_STACK_UNDERFLOW:
309         errormsg = "stack underflow";
310         break;
311       case GL_OUT_OF_MEMORY:
312         errormsg = "out of memory";
313         break;
314 #ifdef GL_TABLE_TOO_LARGE
315       case GL_TABLE_TOO_LARGE:
316         errormsg = "table too large";
317         break;
318 #endif
319       default:
320         errormsg = "unknown error number";
321         break;
322     }
323     std::stringstream msg;
324     msg << "OpenGL Error: " << errormsg;
325     throw std::runtime_error(msg.str());
326   }
327 }
328
329 void init_video()
330 {
331   if(texture_manager != NULL)
332     texture_manager->save_textures();
333   
334   SDL_GL_SetAttribute(SDL_GL_DOUBLEBUFFER, 1); 
335   SDL_GL_SetAttribute(SDL_GL_RED_SIZE, 5);
336   SDL_GL_SetAttribute(SDL_GL_GREEN_SIZE, 5);
337   SDL_GL_SetAttribute(SDL_GL_BLUE_SIZE, 5);
338   
339   int flags = SDL_OPENGL;
340   if(config->use_fullscreen)
341     flags |= SDL_FULLSCREEN;
342   int width = config->screenwidth;
343   int height = config->screenheight;
344   int bpp = 0;
345
346   screen = SDL_SetVideoMode(width, height, bpp, flags);
347   if(screen == 0) {
348     std::stringstream msg;
349     msg << "Couldn't set video mode (" << width << "x" << height
350         << "-" << bpp << "bpp): " << SDL_GetError();
351     throw std::runtime_error(msg.str());
352   }
353
354   SDL_WM_SetCaption(PACKAGE_NAME " " PACKAGE_VERSION, 0);
355
356   // set icon
357   SDL_Surface* icon = IMG_Load_RW(
358       get_physfs_SDLRWops("images/engine/icons/supertux.xpm"), true);
359   if(icon != 0) {
360     SDL_WM_SetIcon(icon, 0);
361     SDL_FreeSurface(icon);
362   }
363 #ifdef DEBUG
364   else {
365     log_warning << "Couldn't find icon 'images/engine/icons/supertux.xpm'" << std::endl;
366   }
367 #endif
368
369   // setup opengl state and transform
370   glDisable(GL_DEPTH_TEST);
371   glDisable(GL_CULL_FACE);
372   glEnable(GL_TEXTURE_2D);
373   glEnable(GL_BLEND);
374   glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
375
376   glViewport(0, 0, screen->w, screen->h);
377   glMatrixMode(GL_PROJECTION);
378   glLoadIdentity();
379   // logical resolution here not real monitor resolution
380   glOrtho(0, 800, 600, 0, -1.0, 1.0);
381   glMatrixMode(GL_MODELVIEW);
382   glLoadIdentity();
383   glTranslatef(0, 0, 0);
384
385   check_gl_error();
386
387   if(texture_manager != NULL)
388     texture_manager->reload_textures();
389   else
390     texture_manager = new TextureManager();
391 }
392
393 static void init_audio()
394 {
395   sound_manager = new SoundManager();
396   
397   sound_manager->enable_sound(config->sound_enabled);
398   sound_manager->enable_music(config->music_enabled);
399 }
400
401 static void init_scripting()
402 {
403   ScriptManager::instance = new ScriptManager();
404
405   HSQUIRRELVM vm = ScriptManager::instance->get_vm();
406   sq_pushroottable(vm); 
407   expose_object(vm, -1, new Scripting::Sound(), "Sound", true);
408   expose_object(vm, -1, new Scripting::Level(), "Level", true);
409   sq_pop(vm, 1);
410 }
411
412 static void quit_audio()
413 {
414   if(sound_manager != NULL) {
415     delete sound_manager;
416     sound_manager = NULL;
417   }
418 }
419
420 void wait_for_event(float min_delay, float max_delay)
421 {
422   assert(min_delay <= max_delay);
423   
424   Uint32 min = (Uint32) (min_delay * 1000);
425   Uint32 max = (Uint32) (max_delay * 1000);
426
427   Uint32 ticks = SDL_GetTicks();
428   while(SDL_GetTicks() - ticks < min) {
429     SDL_Delay(10);
430     sound_manager->update();
431   }
432
433   // clear event queue
434   SDL_Event event;
435   while (SDL_PollEvent(&event))
436   {}
437
438   /* Handle events: */
439   bool running = false;
440   ticks = SDL_GetTicks();
441   while(running) {
442     while(SDL_PollEvent(&event)) {
443       switch(event.type) {
444         case SDL_QUIT:
445           main_loop->quit();
446           break;
447         case SDL_KEYDOWN:
448         case SDL_JOYBUTTONDOWN:
449         case SDL_MOUSEBUTTONDOWN:
450           running = false;
451       }
452     }
453     if(SDL_GetTicks() - ticks >= (max - min))
454       running = false;
455     sound_manager->update();
456     SDL_Delay(10);
457   }
458 }
459
460 #ifdef DEBUG
461 static Uint32 last_timelog_ticks = 0;
462 static const char* last_timelog_component = 0;
463
464 static inline void timelog(const char* component)
465 {
466   Uint32 current_ticks = SDL_GetTicks();
467   
468   if(last_timelog_component != 0) {
469     log_info << "Component '" << last_timelog_component <<  "' finished after " << (current_ticks - last_timelog_ticks) / 1000.0 << " seconds" << std::endl;
470   }
471
472   last_timelog_ticks = current_ticks;
473   last_timelog_component = component;
474 }
475 #else
476 static inline void timelog(const char* )
477 {
478 }
479 #endif
480
481 int main(int argc, char** argv) 
482 {
483   int result = 0;
484     
485   try {
486     srand(time(0));
487     init_physfs(argv[0]);
488     init_sdl();
489     timelog("controller");
490     main_controller = new JoystickKeyboardController();    
491     timelog("config");
492     init_config();
493     timelog("tinygettext");
494     init_tinygettext();
495     timelog("commandline");
496     if(parse_commandline(argc, argv))
497       return 0;
498     timelog("audio");
499     init_audio();
500     timelog("video");
501     init_video();
502     Console::instance = new Console(); 
503     timelog("scripting");
504     init_scripting();
505
506     timelog("menu");
507     setup_menu();
508     timelog("resources");
509     load_shared(); 
510     timelog(0);
511
512     main_loop = new MainLoop(); 
513     if(config->start_level != "") {
514       // we have a normal path specified at commandline not physfs paths.
515       // So we simply mount that path here...
516       std::string dir = FileSystem::dirname(config->start_level);
517       PHYSFS_addToSearchPath(dir.c_str(), true);
518       GameSession* session
519         = new GameSession(
520           FileSystem::basename(config->start_level), ST_GL_LOAD_LEVEL_FILE);
521       if(config->start_demo != "")
522         session->play_demo(config->start_demo);
523       if(config->record_demo != "")
524         session->record_demo(config->record_demo);
525       main_loop->push_screen(session);
526     } else {
527       main_loop->push_screen(new TitleScreen());
528     }
529
530     main_loop->run();
531   } catch(std::exception& e) {
532     log_fatal << "Unexpected exception: " << e.what() << std::endl;
533     result = 1;
534   } catch(...) {
535     log_fatal << "Unexpected exception" << std::endl;
536     result = 1;
537   }
538
539   delete main_loop;
540   main_loop = NULL;
541
542   free_menu();
543   delete ScriptManager::instance;
544   ScriptManager::instance = NULL;
545   unload_shared();
546   quit_audio();
547
548   if(config)
549     config->save();
550   delete config;
551   config = NULL;
552   delete main_controller;
553   main_controller = NULL;
554   delete Console::instance;
555   Console::instance = NULL;
556   delete texture_manager;
557   texture_manager = NULL;
558   SDL_Quit();
559   PHYSFS_deinit();
560   
561   return result;
562 }