working on the castle door, still testing other ideas for this image
[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.hpp"
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_image.h>
38 #include <SDL_opengl.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 "title.hpp"
49 #include "game_session.hpp"
50 #include "file_system.hpp"
51 #include "physfs/physfs_sdl.hpp"
52 #include "exceptions.hpp"
53
54 SDL_Surface* screen = 0;
55 JoystickKeyboardController* main_controller = 0;
56 TinyGetText::DictionaryManager dictionary_manager;
57
58 static void init_config()
59 {
60   config = new Config();
61   try {
62     config->load();
63   } catch(std::exception& e) {
64     std::cerr << "Couldn't load config file: " << e.what() << "\n";
65     std::cerr << "Using default settings.\n";
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 given resolution\n"
188             "  --disable-sfx                Disable sound effects\n"
189             "  --disable-music              Disable music\n"
190             "  --help                       Show this help message\n"
191             "  --version                    Display SuperTux version and quit\n"
192             "  --show-fps                   Display framerate in levels\n"
193             "  --record-demo FILE LEVEL     Record a demo to FILE\n"
194             "  --play-demo FILE LEVEL       Play a recorded demo\n"
195             "\n"));
196 }
197
198 static void parse_commandline(int argc, char** argv)
199 {
200   for(int i = 1; i < argc; ++i) {
201     std::string arg = argv[i];
202
203     if(arg == "--fullscreen" || arg == "-f") {
204       config->use_fullscreen = true;
205     } else if(arg == "--window" || arg == "-w") {
206       config->use_fullscreen = false;
207     } else if(arg == "--geometry" || arg == "-g") {
208       if(i+1 >= argc) {
209         print_usage(argv[0]);
210         throw std::runtime_error("Need to specify a parameter for geometry switch");
211       }
212       if(sscanf(argv[++i], "%dx%d", &config->screenwidth, &config->screenheight)
213          != 2) {
214         print_usage(argv[0]);
215         throw std::runtime_error("Invalid geometry spec, should be WIDTHxHEIGHT");
216       }
217     } else if(arg == "--show-fps") {
218       config->show_fps = true;
219     } else if(arg == "--disable-sfx") {
220       config->sound_enabled = false;
221     } else if(arg == "--disable-music") {
222       config->music_enabled = false;
223     } else if(arg == "--play-demo") {
224       if(i+1 >= argc) {
225         print_usage(argv[0]);
226         throw std::runtime_error("Need to specify a demo filename");
227       }
228       config->start_demo = argv[++i];
229     } else if(arg == "--record-demo") {
230       if(i+1 >= argc) {
231         print_usage(argv[0]);
232         throw std::runtime_error("Need to specify a demo filename");
233       }
234       config->record_demo = argv[++i];
235     } else if(arg == "--help") {
236       print_usage(argv[0]);
237       throw graceful_shutdown();
238     } else if(arg == "--version") {
239       std::cerr << PACKAGE_NAME << " " << PACKAGE_VERSION << "\n";
240       throw graceful_shutdown();
241     } else if(arg[0] != '-') {
242       config->start_level = arg;
243     } else {
244       std::cerr << "Unknown option '" << arg << "'.\n";
245       std::cerr << "Use --help to see a list of options.\n";
246     }
247   }
248
249   // TODO joystick switchyes...
250 }
251
252 static void init_sdl()
253 {
254   if(SDL_Init(SDL_INIT_EVERYTHING) < 0) {
255     std::stringstream msg;
256     msg << "Couldn't initialize SDL: " << SDL_GetError();
257     throw std::runtime_error(msg.str());
258   }
259
260   SDL_EnableUNICODE(1);
261
262   // wait 100ms and clear SDL event queue because sometimes we have random
263   // joystick events in the queue on startup...
264   SDL_Delay(100);
265   SDL_Event dummy;
266   while(SDL_PollEvent(&dummy))
267       ;
268 }
269
270 static void check_gl_error()
271 {
272   GLenum glerror = glGetError();
273   std::string errormsg;
274   
275   if(glerror != GL_NO_ERROR) {
276     switch(glerror) {
277       case GL_INVALID_ENUM:
278         errormsg = "Invalid enumeration value";
279         break;
280       case GL_INVALID_VALUE:
281         errormsg = "Numeric argzment out of range";
282         break;
283       case GL_INVALID_OPERATION:
284         errormsg = "Invalid operation";
285         break;
286       case GL_STACK_OVERFLOW:
287         errormsg = "stack overflow";
288         break;
289       case GL_STACK_UNDERFLOW:
290         errormsg = "stack underflow";
291         break;
292       case GL_OUT_OF_MEMORY:
293         errormsg = "out of memory";
294         break;
295       case GL_TABLE_TOO_LARGE:
296         errormsg = "table too large";
297         break;
298       default:
299         errormsg = "unknown error number";
300         break;
301     }
302     std::stringstream msg;
303     msg << "OpenGL Error: " << errormsg;
304     throw std::runtime_error(msg.str());
305   }
306 }
307
308 void init_video()
309 {
310   if(texture_manager != NULL)
311     texture_manager->save_textures();
312   
313   SDL_GL_SetAttribute(SDL_GL_DOUBLEBUFFER, 1); 
314   SDL_GL_SetAttribute(SDL_GL_RED_SIZE, 5);
315   SDL_GL_SetAttribute(SDL_GL_GREEN_SIZE, 5);
316   SDL_GL_SetAttribute(SDL_GL_BLUE_SIZE, 5);
317   
318   int flags = SDL_OPENGL;
319   if(config->use_fullscreen)
320     flags |= SDL_FULLSCREEN;
321   int width = config->screenwidth;
322   int height = config->screenheight;
323   int bpp = 0;
324
325   screen = SDL_SetVideoMode(width, height, bpp, flags);
326   if(screen == 0) {
327     std::stringstream msg;
328     msg << "Couldn't set video mode (" << width << "x" << height
329         << "-" << bpp << "bpp): " << SDL_GetError();
330     throw std::runtime_error(msg.str());
331   }
332
333   SDL_WM_SetCaption(PACKAGE_NAME " " PACKAGE_VERSION, 0);
334
335   // set icon
336   SDL_Surface* icon = IMG_Load_RW(
337       get_physfs_SDLRWops("images/engine/icons/supertux.xpm"), true);
338   if(icon != 0) {
339     SDL_WM_SetIcon(icon, 0);
340     SDL_FreeSurface(icon);
341   }
342 #ifdef DEBUG
343   else {
344     std::cerr << "Warning: Couldn't find icon 'images/engine/icons/supertux.xpm'.\n";
345   }
346 #endif
347
348   // setup opengl state and transform
349   glDisable(GL_DEPTH_TEST);
350   glDisable(GL_CULL_FACE);
351   glEnable(GL_TEXTURE_2D);
352   glEnable(GL_BLEND);
353   glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
354
355   glViewport(0, 0, screen->w, screen->h);
356   glMatrixMode(GL_PROJECTION);
357   glLoadIdentity();
358   // logical resolution here not real monitor resolution
359   glOrtho(0, 800, 600, 0, -1.0, 1.0);
360   glMatrixMode(GL_MODELVIEW);
361   glLoadIdentity();
362   glTranslatef(0, 0, 0);
363
364   check_gl_error();
365
366   if(texture_manager != NULL)
367     texture_manager->reload_textures();
368   else
369     texture_manager = new TextureManager();
370 }
371
372 static void init_audio()
373 {
374   sound_manager = new SoundManager();
375   
376   sound_manager->enable_sound(config->sound_enabled);
377   sound_manager->enable_music(config->music_enabled);
378 }
379
380 static void quit_audio()
381 {
382   if(sound_manager) {
383     delete sound_manager;
384     sound_manager = 0;
385   }
386 }
387
388 void wait_for_event(float min_delay, float max_delay)
389 {
390   assert(min_delay <= max_delay);
391   
392   Uint32 min = (Uint32) (min_delay * 1000);
393   Uint32 max = (Uint32) (max_delay * 1000);
394
395   Uint32 ticks = SDL_GetTicks();
396   while(SDL_GetTicks() - ticks < min) {
397     SDL_Delay(10);
398     sound_manager->update();
399   }
400
401   // clear even queue
402   SDL_Event event;
403   while (SDL_PollEvent(&event))
404   {}
405
406   /* Handle events: */
407   bool running = false;
408   ticks = SDL_GetTicks();
409   while(running) {
410     while(SDL_PollEvent(&event)) {
411       switch(event.type) {
412         case SDL_QUIT:
413           throw graceful_shutdown();
414         case SDL_KEYDOWN:
415         case SDL_JOYBUTTONDOWN:
416         case SDL_MOUSEBUTTONDOWN:
417           running = false;
418       }
419     }
420     if(SDL_GetTicks() - ticks >= (max - min))
421       running = false;
422     sound_manager->update();
423     SDL_Delay(10);
424   }
425 }
426
427 #ifdef DEBUG
428 static Uint32 last_timelog_ticks = 0;
429 static const char* last_timelog_component = 0;
430
431 static inline void timelog(const char* component)
432 {
433   Uint32 current_ticks = SDL_GetTicks();
434   
435   if(last_timelog_component != 0) {
436     printf("Component '%s' finished after %f seconds\n",
437         last_timelog_component, (current_ticks - last_timelog_ticks) / 1000.0);
438   }
439
440   last_timelog_ticks = current_ticks;
441   last_timelog_component = component;
442 }
443 #else
444 static inline void timelog(const char* )
445 {
446 }
447 #endif
448
449 int main(int argc, char** argv) 
450 {
451   try {
452     srand(time(0));
453     init_physfs(argv[0]);
454     init_sdl();
455     timelog("controller");
456     main_controller = new JoystickKeyboardController();    
457     timelog("config");
458     init_config();
459     timelog("tinygettext");
460     init_tinygettext();
461     timelog("commandline");
462     parse_commandline(argc, argv);
463     timelog("audio");
464     init_audio();
465     timelog("video");
466     init_video();
467
468     timelog("menu");
469     setup_menu();
470     timelog("resources");
471     load_shared();
472     timelog(0);
473     if(config->start_level != "") {
474       // we have a normal path specified at commandline not physfs paths.
475       // So we simply mount that path here...
476       std::string dir = FileSystem::dirname(config->start_level);
477       PHYSFS_addToSearchPath(dir.c_str(), true);
478       GameSession session(
479           FileSystem::basename(config->start_level), ST_GL_LOAD_LEVEL_FILE);
480       if(config->start_demo != "")
481         session.play_demo(config->start_demo);
482       if(config->record_demo != "")
483         session.record_demo(config->record_demo);
484       session.run();
485     } else {
486       // normal game
487       title();
488     }
489   } catch(graceful_shutdown& e) {
490   } catch(std::exception& e) {
491     std::cerr << "Unexpected exception: " << e.what() << std::endl;
492     return 1;
493   } catch(...) {
494     std::cerr << "Unexpected exception." << std::endl;
495     return 1;
496   }
497
498   free_menu();
499   unload_shared();
500   quit_audio();
501
502   if(config)
503     config->save();
504   delete config;
505   delete main_controller;
506   delete texture_manager;
507   SDL_Quit();
508   PHYSFS_deinit();
509   
510   return 0;
511 }