git.maemo.org Git - neverball/blob - ball/main.c

   1 /*
   2  * Copyright (C) 2003 Robert Kooima
   3  *
   4  * NEVERBALL is  free software; you can redistribute  it and/or modify
   5  * it under the  terms of the GNU General  Public License as published
   6  * by the Free  Software Foundation; either version 2  of the License,
   7  * or (at your option) any later version.
   8  *
   9  * This program is distributed in the hope that it will be useful, but
  10  * WITHOUT  ANY  WARRANTY;  without   even  the  implied  warranty  of
  11  * MERCHANTABILITY or  FITNESS FOR A PARTICULAR PURPOSE.   See the GNU
  12  * General Public License for more details.
  13  */
  14
  15 /*---------------------------------------------------------------------------*/
  16
  17 #include <SDL.h>
  18 #include <stdio.h>
  19 #include <string.h>
  20
  21 #include "glext.h"
  22 #include "config.h"
  23 #include "video.h"
  24 #include "image.h"
  25 #include "audio.h"
  26 #include "demo.h"
  27 #include "progress.h"
  28 #include "gui.h"
  29 #include "set.h"
  30 #include "tilt.h"
  31 #include "fs.h"
  32 #include "common.h"
  33
  34 #include "st_conf.h"
  35 #include "st_title.h"
  36 #include "st_demo.h"
  37 #include "st_level.h"
  38 #include "st_pause.h"
  39
  40 const char TITLE[] = "Neverball " VERSION;
  41 const char ICON[] = "icon/neverball.png";
  42
  43 /*---------------------------------------------------------------------------*/
  44
  45 static void shot(void)
  46 {
  47     static char filename[MAXSTR];
  48
  49     sprintf(filename, "Screenshots/screen%05d.png", config_screenshot());
  50     image_snap(filename);
  51 }
  52
  53 /*---------------------------------------------------------------------------*/
  54
  55 static void toggle_wire(void)
  56 {
  57     static int wire = 0;
  58
  59     if (wire)
  60     {
  61         glPolygonMode(GL_FRONT_AND_BACK, GL_FILL);
  62         glEnable(GL_TEXTURE_2D);
  63         glEnable(GL_LIGHTING);
  64         wire = 0;
  65     }
  66     else
  67     {
  68         glPolygonMode(GL_FRONT_AND_BACK, GL_LINE);
  69         glDisable(GL_TEXTURE_2D);
  70         glDisable(GL_LIGHTING);
  71         wire = 1;
  72     }
  73 }
  74
  75 /*---------------------------------------------------------------------------*/
  76
  77 static int loop(void)
  78 {
  79     SDL_Event e;
  80     int d = 1;
  81     int c;
  82
  83     /* Process SDL events. */
  84
  85     while (d && SDL_PollEvent(&e))
  86     {
  87         switch (e.type)
  88         {
  89         case SDL_QUIT:
  90             return 0;
  91
  92         case SDL_MOUSEMOTION:
  93             st_point(+e.motion.x,
  94                      -e.motion.y + config_get_d(CONFIG_HEIGHT),
  95                      +e.motion.xrel,
  96                      config_get_d(CONFIG_MOUSE_INVERT)
  97                      ? +e.motion.yrel : -e.motion.yrel);
  98             break;
  99
 100         case SDL_MOUSEBUTTONDOWN:
 101             d = st_click(e.button.button, 1);
 102             break;
 103
 104         case SDL_MOUSEBUTTONUP:
 105             d = st_click(e.button.button, 0);
 106             break;
 107
 108         case SDL_KEYDOWN:
 109
 110             c = e.key.keysym.sym;
 111
 112             if (config_tst_d(CONFIG_KEY_FORWARD, c))
 113                 st_stick(config_get_d(CONFIG_JOYSTICK_AXIS_Y), -1.0f);
 114
 115             else if (config_tst_d(CONFIG_KEY_BACKWARD, c))
 116                 st_stick(config_get_d(CONFIG_JOYSTICK_AXIS_Y), +1.0f);
 117
 118             else if (config_tst_d(CONFIG_KEY_LEFT, c))
 119                 st_stick(config_get_d(CONFIG_JOYSTICK_AXIS_X), -1.0f);
 120
 121             else if (config_tst_d(CONFIG_KEY_RIGHT, c))
 122                 st_stick(config_get_d(CONFIG_JOYSTICK_AXIS_X), +1.0f);
 123
 124             else switch (c)
 125             {
 126             case SDLK_F10:   shot();                    break;
 127             case SDLK_F9:    config_tgl_d(CONFIG_FPS);  break;
 128             case SDLK_F8:    config_tgl_d(CONFIG_NICE); break;
 129
 130             case SDLK_F7:
 131                 if (config_cheat())
 132                     toggle_wire();
 133                 break;
 134
 135             case SDLK_RETURN:
 136                 d = st_buttn(config_get_d(CONFIG_JOYSTICK_BUTTON_A), 1);
 137                 break;
 138             case SDLK_ESCAPE:
 139                 d = st_buttn(config_get_d(CONFIG_JOYSTICK_BUTTON_EXIT), 1);
 140                 break;
 141
 142             default:
 143                 if (SDL_EnableUNICODE(-1))
 144                     d = st_keybd(e.key.keysym.unicode, 1);
 145                 else
 146                     d = st_keybd(e.key.keysym.sym, 1);
 147             }
 148
 149             break;
 150
 151         case SDL_KEYUP:
 152
 153             c = e.key.keysym.sym;
 154
 155             if      (config_tst_d(CONFIG_KEY_FORWARD, c))
 156                 st_stick(config_get_d(CONFIG_JOYSTICK_AXIS_Y), 0);
 157
 158             else if (config_tst_d(CONFIG_KEY_BACKWARD, c))
 159                 st_stick(config_get_d(CONFIG_JOYSTICK_AXIS_Y), 0);
 160
 161             else if (config_tst_d(CONFIG_KEY_LEFT, c))
 162                 st_stick(config_get_d(CONFIG_JOYSTICK_AXIS_X), 0);
 163
 164             else if (config_tst_d(CONFIG_KEY_RIGHT, c))
 165                 st_stick(config_get_d(CONFIG_JOYSTICK_AXIS_X), 0);
 166
 167             else switch (c)
 168             {
 169             case SDLK_RETURN:
 170                 d = st_buttn(config_get_d(CONFIG_JOYSTICK_BUTTON_A), 0);
 171                 break;
 172             case SDLK_ESCAPE:
 173                 d = st_buttn(config_get_d(CONFIG_JOYSTICK_BUTTON_EXIT), 0);
 174                 break;
 175
 176             default:
 177                 d = st_keybd(e.key.keysym.sym, 0);
 178             }
 179
 180         case SDL_ACTIVEEVENT:
 181             if (e.active.state == SDL_APPINPUTFOCUS)
 182                 if (e.active.gain == 0 && video_get_grab())
 183                     goto_state(&st_pause);
 184             break;
 185
 186         case SDL_JOYAXISMOTION:
 187             st_stick(e.jaxis.axis, JOY_VALUE(e.jaxis.value));
 188             break;
 189
 190         case SDL_JOYBUTTONDOWN:
 191             d = st_buttn(e.jbutton.button, 1);
 192             break;
 193
 194         case SDL_JOYBUTTONUP:
 195             d = st_buttn(e.jbutton.button, 0);
 196             break;
 197         }
 198     }
 199
 200     /* Process events via the tilt sensor API. */
 201
 202     if (tilt_stat())
 203     {
 204         int b;
 205         int s;
 206
 207         st_angle((int) tilt_get_x(),
 208                  (int) tilt_get_z());
 209
 210         while (tilt_get_button(&b, &s))
 211         {
 212             const int X = config_get_d(CONFIG_JOYSTICK_AXIS_X);
 213             const int Y = config_get_d(CONFIG_JOYSTICK_AXIS_Y);
 214             const int L = config_get_d(CONFIG_JOYSTICK_DPAD_L);
 215             const int R = config_get_d(CONFIG_JOYSTICK_DPAD_R);
 216             const int U = config_get_d(CONFIG_JOYSTICK_DPAD_U);
 217             const int D = config_get_d(CONFIG_JOYSTICK_DPAD_D);
 218
 219             if (b == L || b == R || b == U || b == D)
 220             {
 221                 static int pad[4] = { 0, 0, 0, 0 };
 222
 223                 /* Track the state of the D-pad buttons. */
 224
 225                 if      (b == L) pad[0] = s;
 226                 else if (b == R) pad[1] = s;
 227                 else if (b == U) pad[2] = s;
 228                 else if (b == D) pad[3] = s;
 229
 230                 /* Convert D-pad button events into joystick axis motion. */
 231
 232                 if      (pad[0] && !pad[1]) st_stick(X, -1.0f);
 233                 else if (pad[1] && !pad[0]) st_stick(X, +1.0f);
 234                 else                        st_stick(X,  0.0f);
 235
 236                 if      (pad[2] && !pad[3]) st_stick(Y, -1.0f);
 237                 else if (pad[3] && !pad[2]) st_stick(Y, +1.0f);
 238                 else                        st_stick(Y,  0.0f);
 239             }
 240             else d = st_buttn(b, s);
 241         }
 242     }
 243
 244     return d;
 245 }
 246
 247 /*---------------------------------------------------------------------------*/
 248
 249 static char *opt_data;
 250 static char *opt_replay;
 251 static char *opt_level;
 252
 253 #define opt_usage \
 254     L_(                                                                   \
 255         "Usage: %s [options ...]\n"                                       \
 256         "Options:\n"                                                      \
 257         "  -h, --help                show this usage message.\n"          \
 258         "  -v, --version             show version.\n"                     \
 259         "  -d, --data <dir>          use 'dir' as game data directory.\n" \
 260         "  -r, --replay <file>       play the replay 'file'.\n"           \
 261         "  -l, --level <file>        load the level 'file'\n"             \
 262     )
 263
 264 #define opt_error(option) \
 265     fprintf(stderr, L_("Option '%s' requires an argument.\n"), option)
 266
 267 static void opt_parse(int argc, char **argv)
 268 {
 269     int i;
 270
 271     /* Scan argument list. */
 272
 273     for (i = 1; i < argc; i++)
 274     {
 275         if (strcmp(argv[i], "-h") == 0 || strcmp(argv[i], "--help")    == 0)
 276         {
 277             printf(opt_usage, argv[0]);
 278             exit(EXIT_SUCCESS);
 279         }
 280
 281         if (strcmp(argv[i], "-v") == 0 || strcmp(argv[i], "--version") == 0)
 282         {
 283             printf("%s\n", VERSION);
 284             exit(EXIT_SUCCESS);
 285         }
 286
 287         if (strcmp(argv[i], "-d") == 0 || strcmp(argv[i], "--data")    == 0)
 288         {
 289             if (i + 1 == argc)
 290             {
 291                 opt_error(argv[i]);
 292                 exit(EXIT_FAILURE);
 293             }
 294             opt_data = argv[++i];
 295             continue;
 296         }
 297
 298         if (strcmp(argv[i], "-r") == 0 || strcmp(argv[i], "--replay")  == 0)
 299         {
 300             if (i + 1 == argc)
 301             {
 302                 opt_error(argv[i]);
 303                 exit(EXIT_FAILURE);
 304             }
 305             opt_replay = argv[++i];
 306             continue;
 307         }
 308
 309         if (strcmp(argv[i], "-l") == 0 || strcmp(argv[i], "--level")  == 0)
 310         {
 311             if (i + 1 == argc)
 312             {
 313                 opt_error(argv[i]);
 314                 exit(EXIT_FAILURE);
 315             }
 316             opt_level = argv[++i];
 317             continue;
 318         }
 319
 320         /* Perform magic on a single unrecognized argument. */
 321
 322         if (argc == 2)
 323         {
 324             size_t len = strlen(argv[i]);
 325             int level = 0;
 326
 327             if (len > 4)
 328             {
 329                 char *ext = argv[i] + len - 4;
 330
 331                 if (strcmp(ext, ".map") == 0)
 332                     strncpy(ext, ".sol", 4);
 333
 334                 if (strcmp(ext, ".sol") == 0)
 335                     level = 1;
 336             }
 337
 338             if (level)
 339                 opt_level = argv[i];
 340             else
 341                 opt_replay = argv[i];
 342
 343             break;
 344         }
 345     }
 346 }
 347
 348 #undef opt_usage
 349 #undef opt_error
 350
 351 /*---------------------------------------------------------------------------*/
 352
 353 static int is_replay(struct dir_item *item)
 354 {
 355     return str_ends_with(item->path, ".nbr");
 356 }
 357
 358 static int is_score_file(struct dir_item *item)
 359 {
 360     return str_starts_with(item->path, "neverballhs-");
 361 }
 362
 363 static void make_dirs_and_migrate(void)
 364 {
 365     Array items;
 366     int i;
 367
 368     const char *src;
 369     char *dst;
 370
 371     if (fs_mkdir("Replays"))
 372     {
 373         if ((items = fs_dir_scan("", is_replay)))
 374         {
 375             for (i = 0; i < array_len(items); i++)
 376             {
 377                 src = DIR_ITEM_GET(items, i)->path;
 378                 dst = concat_string("Replays/", src, NULL);
 379                 fs_rename(src, dst);
 380                 free(dst);
 381             }
 382
 383             fs_dir_free(items);
 384         }
 385     }
 386
 387     if (fs_mkdir("Scores"))
 388     {
 389         if ((items = fs_dir_scan("", is_score_file)))
 390         {
 391             for (i = 0; i < array_len(items); i++)
 392             {
 393                 src = DIR_ITEM_GET(items, i)->path;
 394                 dst = concat_string("Scores/",
 395                                     src + sizeof ("neverballhs-") - 1,
 396                                     ".txt",
 397                                     NULL);
 398                 fs_rename(src, dst);
 399                 free(dst);
 400             }
 401
 402             fs_dir_free(items);
 403         }
 404     }
 405
 406     fs_mkdir("Screenshots");
 407 }
 408
 409 /*---------------------------------------------------------------------------*/
 410
 411 int main(int argc, char *argv[])
 412 {
 413     SDL_Joystick *joy = NULL;
 414     int t1, t0;
 415
 416     if (!fs_init(argv[0]))
 417     {
 418         fprintf(stderr, "Failure to initialize virtual file system: %s\n",
 419                 fs_error());
 420         return 1;
 421     }
 422
 423     lang_init("neverball");
 424
 425     opt_parse(argc, argv);
 426
 427     config_paths(opt_data);
 428     make_dirs_and_migrate();
 429
 430     /* Initialize SDL. */
 431
 432     if (SDL_Init(SDL_INIT_VIDEO | SDL_INIT_AUDIO | SDL_INIT_JOYSTICK) == -1)
 433     {
 434         fprintf(stderr, "%s\n", SDL_GetError());
 435         return 1;
 436     }
 437
 438     /* Intitialize configuration. */
 439
 440     config_init();
 441     config_load();
 442
 443     /* Initialize joystick. */
 444
 445     if (config_get_d(CONFIG_JOYSTICK) && SDL_NumJoysticks() > 0)
 446     {
 447         joy = SDL_JoystickOpen(config_get_d(CONFIG_JOYSTICK_DEVICE));
 448         if (joy)
 449             SDL_JoystickEventState(SDL_ENABLE);
 450     }
 451
 452     /* Initialize audio. */
 453
 454     audio_init();
 455     tilt_init();
 456
 457     /* Initialize video. */
 458
 459     if (!video_init(TITLE, ICON))
 460         return 1;
 461
 462     init_state(&st_null);
 463
 464     /* Initialize demo playback or load the level. */
 465
 466     if (opt_replay &&
 467         fs_add_path(dir_name(opt_replay)) &&
 468         progress_replay(base_name(opt_replay)))
 469     {
 470         demo_play_goto(1);
 471         goto_state(&st_demo_play);
 472     }
 473     else if (opt_level)
 474     {
 475         const char *path = fs_resolve(opt_level);
 476         int loaded = 0;
 477
 478         if (path)
 479         {
 480             struct level level;
 481
 482             if (level_load(path, &level))
 483             {
 484                 progress_init(MODE_STANDALONE);
 485
 486                 if (progress_play(&level))
 487                 {
 488                     goto_state(&st_level);
 489                     loaded = 1;
 490                 }
 491             }
 492         }
 493         else fprintf(stderr, "%s: file is not in game path\n", opt_level);
 494
 495         if (!loaded)
 496             goto_state(&st_title);
 497     }
 498     else
 499         goto_state(&st_title);
 500
 501     /* Run the main game loop. */
 502
 503     t0 = SDL_GetTicks();
 504
 505     while (loop())
 506     {
 507         if ((t1 = SDL_GetTicks()) > t0)
 508         {
 509             /* Step the game state. */
 510
 511             st_timer(0.001f * (t1 - t0));
 512
 513             t0 = t1;
 514
 515             /* Render. */
 516
 517             st_paint(0.001f * t0);
 518             video_swap();
 519
 520             if (config_get_d(CONFIG_NICE))
 521                 SDL_Delay(1);
 522         }
 523     }
 524
 525     config_save();
 526
 527     if (joy)
 528         SDL_JoystickClose(joy);
 529
 530     tilt_free();
 531     SDL_Quit();
 532
 533     return 0;
 534 }
 535
 536 /*---------------------------------------------------------------------------*/
 537