src/libgame/system.c

   1 /***********************************************************
   2 * Artsoft Retro-Game Library                               *
   3 *----------------------------------------------------------*
   4 * (c) 1994-2002 Artsoft Entertainment                      *
   5 *               Holger Schemel                             *
   6 *               Detmolder Strasse 189                      *
   7 *               33604 Bielefeld                            *
   8 *               Germany                                    *
   9 *               e-mail: info@artsoft.org                   *
  10 *----------------------------------------------------------*
  11 * system.c                                                 *
  12 ***********************************************************/
  13
  14 #include <string.h>
  15 #include <signal.h>
  16
  17 #include "platform.h"
  18
  19 #if defined(PLATFORM_MSDOS)
  20 #include <fcntl.h>
  21 #endif
  22
  23 #include "system.h"
  24 #include "image.h"
  25 #include "sound.h"
  26 #include "setup.h"
  27 #include "joystick.h"
  28 #include "misc.h"
  29
  30
  31 /* ========================================================================= */
  32 /* exported variables                                                        */
  33 /* ========================================================================= */
  34
  35 struct ProgramInfo      program;
  36 struct OptionInfo       options;
  37 struct VideoSystemInfo  video;
  38 struct AudioSystemInfo  audio;
  39 struct GfxInfo          gfx;
  40 struct ArtworkInfo      artwork;
  41 struct JoystickInfo     joystick;
  42 struct SetupInfo        setup;
  43
  44 LevelDirTree           *leveldir_first_all = NULL;
  45 LevelDirTree           *leveldir_first = NULL;
  46 LevelDirTree           *leveldir_current = NULL;
  47 int                     level_nr;
  48
  49 Display                *display = NULL;
  50 Visual                 *visual = NULL;
  51 int                     screen = 0;
  52 Colormap                cmap = None;
  53
  54 DrawWindow             *window = NULL;
  55 DrawBuffer             *backbuffer = NULL;
  56 DrawBuffer             *drawto = NULL;
  57
  58 int                     button_status = MB_NOT_PRESSED;
  59 boolean                 motion_status = FALSE;
  60
  61 int                     redraw_mask = REDRAW_NONE;
  62 int                     redraw_tiles = 0;
  63
  64 int                     FrameCounter = 0;
  65
  66
  67 /* ========================================================================= */
  68 /* init/close functions                                                      */
  69 /* ========================================================================= */
  70
  71 void InitProgramInfo(char *argv0,
  72                      char *userdata_directory, char *program_title,
  73                      char *window_title, char *icon_title,
  74                      char *x11_icon_filename, char *x11_iconmask_filename,
  75                      char *msdos_cursor_filename,
  76                      char *cookie_prefix, char *filename_prefix,
  77                      int program_version)
  78 {
  79   program.command_basepath = getBasePath(argv0);
  80   program.command_basename = getBaseName(argv0);
  81
  82   program.userdata_directory = userdata_directory;
  83   program.program_title = program_title;
  84   program.window_title = window_title;
  85   program.icon_title = icon_title;
  86   program.x11_icon_filename = x11_icon_filename;
  87   program.x11_iconmask_filename = x11_iconmask_filename;
  88   program.msdos_cursor_filename = msdos_cursor_filename;
  89
  90   program.cookie_prefix = cookie_prefix;
  91   program.filename_prefix = filename_prefix;
  92
  93   program.version_major = VERSION_MAJOR(program_version);
  94   program.version_minor = VERSION_MINOR(program_version);
  95   program.version_patch = VERSION_PATCH(program_version);
  96 }
  97
  98 void InitExitFunction(void (*exit_function)(int))
  99 {
 100   program.exit_function = exit_function;
 101
 102   /* set signal handlers to custom exit function */
 103   signal(SIGINT, exit_function);
 104   signal(SIGTERM, exit_function);
 105
 106 #if defined(TARGET_SDL)
 107   /* set exit function to automatically cleanup SDL stuff after exit() */
 108   atexit(SDL_Quit);
 109 #endif
 110 }
 111
 112 void InitPlatformDependentStuff(void)
 113 {
 114 #if defined(PLATFORM_MSDOS)
 115   _fmode = O_BINARY;
 116   initErrorFile();
 117 #endif
 118
 119 #if defined(TARGET_SDL)
 120   if (SDL_Init(SDL_INIT_EVENTTHREAD | SDL_INIT_NOPARACHUTE) < 0)
 121     Error(ERR_EXIT, "SDL_Init() failed: %s", SDL_GetError());
 122
 123   SDLNet_Init();
 124 #endif
 125 }
 126
 127 void ClosePlatformDependentStuff(void)
 128 {
 129 #if defined(PLATFORM_MSDOS)
 130   dumpErrorFile();
 131 #endif
 132 }
 133
 134 void InitGfxFieldInfo(int sx, int sy, int sxsize, int sysize,
 135                       int real_sx, int real_sy,
 136                       int full_sxsize, int full_sysize,
 137                       Bitmap *field_save_buffer)
 138 {
 139   gfx.sx = sx;
 140   gfx.sy = sy;
 141   gfx.sxsize = sxsize;
 142   gfx.sysize = sysize;
 143   gfx.real_sx = real_sx;
 144   gfx.real_sy = real_sy;
 145   gfx.full_sxsize = full_sxsize;
 146   gfx.full_sysize = full_sysize;
 147
 148   gfx.field_save_buffer = field_save_buffer;
 149
 150   gfx.background_bitmap = NULL;
 151   gfx.background_bitmap_mask = REDRAW_NONE;
 152
 153   SetDrawDeactivationMask(REDRAW_NONE);         /* do not deactivate drawing */
 154   SetDrawBackgroundMask(REDRAW_NONE);           /* deactivate masked drawing */
 155 }
 156
 157 void InitGfxDoor1Info(int dx, int dy, int dxsize, int dysize)
 158 {
 159   gfx.dx = dx;
 160   gfx.dy = dy;
 161   gfx.dxsize = dxsize;
 162   gfx.dysize = dysize;
 163 }
 164
 165 void InitGfxDoor2Info(int vx, int vy, int vxsize, int vysize)
 166 {
 167   gfx.vx = vx;
 168   gfx.vy = vy;
 169   gfx.vxsize = vxsize;
 170   gfx.vysize = vysize;
 171 }
 172
 173 void InitGfxScrollbufferInfo(int scrollbuffer_width, int scrollbuffer_height)
 174 {
 175   /* currently only used by MSDOS code to alloc VRAM buffer, if available */
 176   gfx.scrollbuffer_width = scrollbuffer_width;
 177   gfx.scrollbuffer_height = scrollbuffer_height;
 178 }
 179
 180 void SetDrawDeactivationMask(int draw_deactivation_mask)
 181 {
 182   gfx.draw_deactivation_mask = draw_deactivation_mask;
 183 }
 184
 185 void SetDrawBackgroundMask(int draw_background_mask)
 186 {
 187   gfx.draw_background_mask = draw_background_mask;
 188 }
 189
 190 static void DrawBitmapFromTile(Bitmap *bitmap, Bitmap *tile,
 191                                int dest_x, int dest_y, int width, int height)
 192 {
 193   int bitmap_xsize = width;
 194   int bitmap_ysize = height;
 195   int tile_xsize = tile->width;
 196   int tile_ysize = tile->height;
 197   int tile_xsteps = (bitmap_xsize + tile_xsize - 1) / tile_xsize;
 198   int tile_ysteps = (bitmap_ysize + tile_ysize - 1) / tile_ysize;
 199   int x, y;
 200
 201   for (y = 0; y < tile_ysteps; y++)
 202   {
 203     for (x = 0; x < tile_xsteps; x++)
 204     {
 205       int draw_x = dest_x + x * tile_xsize;
 206       int draw_y = dest_y + y * tile_ysize;
 207       int draw_xsize = MIN(tile_xsize, bitmap_xsize - x * tile_xsize);
 208       int draw_ysize = MIN(tile_ysize, bitmap_ysize - y * tile_ysize);
 209
 210       BlitBitmap(tile, bitmap, 0, 0, draw_xsize, draw_ysize, draw_x, draw_y);
 211     }
 212   }
 213 }
 214
 215 void SetBackgroundBitmap(Bitmap *background_bitmap_tile, int mask)
 216 {
 217   if (background_bitmap_tile != NULL)
 218     gfx.background_bitmap_mask |= mask;
 219   else
 220     gfx.background_bitmap_mask &= ~mask;
 221
 222   if (gfx.background_bitmap == NULL)
 223     gfx.background_bitmap = CreateBitmap(video.width, video.height,
 224                                          DEFAULT_DEPTH);
 225
 226   if (background_bitmap_tile == NULL)   /* empty background requested */
 227     return;
 228
 229   if (mask == REDRAW_FIELD)
 230     DrawBitmapFromTile(gfx.background_bitmap, background_bitmap_tile,
 231                        gfx.real_sx, gfx.real_sy,
 232                        gfx.full_sxsize, gfx.full_sysize);
 233   else if (mask == REDRAW_DOOR_1)
 234   {
 235     DrawBitmapFromTile(gfx.background_bitmap, background_bitmap_tile,
 236                        gfx.dx, gfx.dy,
 237                        gfx.dxsize, gfx.dysize);
 238   }
 239 }
 240
 241 void SetMainBackgroundBitmap(Bitmap *background_bitmap_tile)
 242 {
 243   SetBackgroundBitmap(background_bitmap_tile, REDRAW_FIELD);
 244 }
 245
 246 void SetDoorBackgroundBitmap(Bitmap *background_bitmap_tile)
 247 {
 248   SetBackgroundBitmap(background_bitmap_tile, REDRAW_DOOR_1);
 249 }
 250
 251
 252 /* ========================================================================= */
 253 /* video functions                                                           */
 254 /* ========================================================================= */
 255
 256 inline static int GetRealDepth(int depth)
 257 {
 258   return (depth == DEFAULT_DEPTH ? video.default_depth : depth);
 259 }
 260
 261 inline static void sysFillRectangle(Bitmap *bitmap, int x, int y,
 262                                int width, int height, Pixel color)
 263 {
 264 #if defined(TARGET_SDL)
 265   SDLFillRectangle(bitmap, x, y, width, height, color);
 266 #else
 267   X11FillRectangle(bitmap, x, y, width, height, color);
 268 #endif
 269 }
 270
 271 inline static void sysCopyArea(Bitmap *src_bitmap, Bitmap *dst_bitmap,
 272                                int src_x, int src_y, int width, int height,
 273                                int dst_x, int dst_y, int mask_mode)
 274 {
 275 #if defined(TARGET_SDL)
 276   SDLCopyArea(src_bitmap, dst_bitmap, src_x, src_y, width, height,
 277               dst_x, dst_y, mask_mode);
 278 #else
 279   X11CopyArea(src_bitmap, dst_bitmap, src_x, src_y, width, height,
 280               dst_x, dst_y, mask_mode);
 281 #endif
 282 }
 283
 284 inline void InitVideoDisplay(void)
 285 {
 286 #if defined(TARGET_SDL)
 287   SDLInitVideoDisplay();
 288 #else
 289   X11InitVideoDisplay();
 290 #endif
 291 }
 292
 293 inline void CloseVideoDisplay(void)
 294 {
 295   KeyboardAutoRepeatOn();
 296
 297 #if defined(TARGET_SDL)
 298   SDL_QuitSubSystem(SDL_INIT_VIDEO);
 299 #else
 300   if (display)
 301     XCloseDisplay(display);
 302 #endif
 303 }
 304
 305 inline void InitVideoBuffer(DrawBuffer **backbuffer, DrawWindow **window,
 306                             int width, int height, int depth,
 307                             boolean fullscreen)
 308 {
 309   video.width = width;
 310   video.height = height;
 311   video.depth = GetRealDepth(depth);
 312   video.fullscreen_available = FULLSCREEN_STATUS;
 313   video.fullscreen_enabled = FALSE;
 314
 315 #if defined(TARGET_SDL)
 316   SDLInitVideoBuffer(backbuffer, window, fullscreen);
 317 #else
 318   X11InitVideoBuffer(backbuffer, window);
 319 #endif
 320 }
 321
 322 inline Bitmap *CreateBitmapStruct(void)
 323 {
 324 #if defined(TARGET_SDL)
 325   return checked_calloc(sizeof(struct SDLSurfaceInfo));
 326 #else
 327   return checked_calloc(sizeof(struct X11DrawableInfo));
 328 #endif
 329 }
 330
 331 inline Bitmap *CreateBitmap(int width, int height, int depth)
 332 {
 333   Bitmap *new_bitmap = CreateBitmapStruct();
 334   int real_depth = GetRealDepth(depth);
 335
 336 #if defined(TARGET_SDL)
 337   SDLCreateBitmapContent(new_bitmap, width, height, real_depth);
 338 #else
 339   X11CreateBitmapContent(new_bitmap, width, height, real_depth);
 340 #endif
 341
 342   new_bitmap->width = width;
 343   new_bitmap->height = height;
 344
 345   return new_bitmap;
 346 }
 347
 348 inline static void FreeBitmapPointers(Bitmap *bitmap)
 349 {
 350   if (bitmap == NULL)
 351     return;
 352
 353 #if defined(TARGET_SDL)
 354   SDLFreeBitmapPointers(bitmap);
 355 #else
 356   X11FreeBitmapPointers(bitmap);
 357 #endif
 358
 359   checked_free(bitmap->source_filename);
 360   bitmap->source_filename = NULL;
 361 }
 362
 363 inline static void TransferBitmapPointers(Bitmap *src_bitmap,
 364                                           Bitmap *dst_bitmap)
 365 {
 366   if (src_bitmap == NULL || dst_bitmap == NULL)
 367     return;
 368
 369   FreeBitmapPointers(dst_bitmap);
 370
 371   *dst_bitmap = *src_bitmap;
 372 }
 373
 374 inline void FreeBitmap(Bitmap *bitmap)
 375 {
 376   if (bitmap == NULL)
 377     return;
 378
 379   FreeBitmapPointers(bitmap);
 380
 381   free(bitmap);
 382 }
 383
 384 inline void CloseWindow(DrawWindow *window)
 385 {
 386 #if defined(TARGET_X11)
 387   if (window->drawable)
 388   {
 389     XUnmapWindow(display, window->drawable);
 390     XDestroyWindow(display, window->drawable);
 391   }
 392   if (window->gc)
 393     XFreeGC(display, window->gc);
 394 #endif
 395 }
 396
 397 static inline boolean CheckDrawingArea(int x, int y, int width, int height,
 398                                        int draw_mask)
 399 {
 400   if (draw_mask == REDRAW_NONE)
 401     return FALSE;
 402
 403   if (draw_mask & REDRAW_ALL)
 404     return TRUE;
 405
 406   if ((draw_mask & REDRAW_FIELD) && x < gfx.real_sx + gfx.full_sxsize)
 407     return TRUE;
 408
 409   if ((draw_mask & REDRAW_DOOR_1) && x >= gfx.dx && y < gfx.dy + gfx.dysize)
 410     return TRUE;
 411
 412   if ((draw_mask & REDRAW_DOOR_2) && x >= gfx.dx && y >= gfx.vy)
 413     return TRUE;
 414
 415   return FALSE;
 416 }
 417
 418 inline boolean DrawingDeactivated(int x, int y, int width, int height)
 419 {
 420   return CheckDrawingArea(x, y, width, height, gfx.draw_deactivation_mask);
 421 }
 422
 423 inline boolean DrawingOnBackground(int x, int y)
 424 {
 425   return (CheckDrawingArea(x, y, 1, 1, gfx.background_bitmap_mask) &&
 426           CheckDrawingArea(x, y, 1, 1, gfx.draw_background_mask));
 427 }
 428
 429 inline void BlitBitmap(Bitmap *src_bitmap, Bitmap *dst_bitmap,
 430                        int src_x, int src_y, int width, int height,
 431                        int dst_x, int dst_y)
 432 {
 433   if (DrawingDeactivated(dst_x, dst_y, width, height))
 434     return;
 435
 436   sysCopyArea(src_bitmap, dst_bitmap, src_x, src_y, width, height,
 437               dst_x, dst_y, BLIT_OPAQUE);
 438 }
 439
 440 inline void FillRectangle(Bitmap *bitmap, int x, int y, int width, int height,
 441                           Pixel color)
 442 {
 443   if (DrawingDeactivated(x, y, width, height))
 444     return;
 445
 446   sysFillRectangle(bitmap, x, y, width, height, color);
 447 }
 448
 449 inline void ClearRectangle(Bitmap *bitmap, int x, int y, int width, int height)
 450 {
 451   FillRectangle(bitmap, x, y, width, height, BLACK_PIXEL);
 452 }
 453
 454 inline void ClearRectangleOnBackground(Bitmap *bitmap, int x, int y,
 455                                        int width, int height)
 456 {
 457   if (DrawingOnBackground(x, y))
 458     BlitBitmap(gfx.background_bitmap, bitmap, x, y, width, height, x, y);
 459   else
 460     ClearRectangle(bitmap, x, y, width, height);
 461 }
 462
 463 inline void SetClipMask(Bitmap *bitmap, GC clip_gc, Pixmap clip_pixmap)
 464 {
 465 #if defined(TARGET_X11)
 466   if (clip_gc)
 467   {
 468     bitmap->clip_gc = clip_gc;
 469     XSetClipMask(display, bitmap->clip_gc, clip_pixmap);
 470   }
 471 #endif
 472 }
 473
 474 inline void SetClipOrigin(Bitmap *bitmap, GC clip_gc, int clip_x, int clip_y)
 475 {
 476 #if defined(TARGET_X11)
 477   if (clip_gc)
 478   {
 479     bitmap->clip_gc = clip_gc;
 480     XSetClipOrigin(display, bitmap->clip_gc, clip_x, clip_y);
 481   }
 482 #endif
 483 }
 484
 485 inline void BlitBitmapMasked(Bitmap *src_bitmap, Bitmap *dst_bitmap,
 486                              int src_x, int src_y,
 487                              int width, int height,
 488                              int dst_x, int dst_y)
 489 {
 490   if (DrawingDeactivated(dst_x, dst_y, width, height))
 491     return;
 492
 493   sysCopyArea(src_bitmap, dst_bitmap, src_x, src_y, width, height,
 494               dst_x, dst_y, BLIT_MASKED);
 495 }
 496
 497 inline void BlitBitmapOnBackground(Bitmap *src_bitmap, Bitmap *dst_bitmap,
 498                                    int src_x, int src_y,
 499                                    int width, int height,
 500                                    int dst_x, int dst_y)
 501 {
 502   if (DrawingOnBackground(dst_x, dst_y))
 503   {
 504     /* draw background */
 505     BlitBitmap(gfx.background_bitmap, dst_bitmap, dst_x, dst_y, width, height,
 506                dst_x, dst_y);
 507
 508     /* draw foreground */
 509     SetClipOrigin(src_bitmap, src_bitmap->stored_clip_gc,
 510                   dst_x - src_x, dst_y - src_y);
 511     BlitBitmapMasked(src_bitmap, dst_bitmap, src_x, src_y, width, height,
 512                      dst_x, dst_y);
 513   }
 514   else
 515     BlitBitmap(src_bitmap, dst_bitmap, src_x, src_y, width, height,
 516                dst_x, dst_y);
 517 }
 518
 519 inline void DrawSimpleBlackLine(Bitmap *bitmap, int from_x, int from_y,
 520                                 int to_x, int to_y)
 521 {
 522 #if defined(TARGET_SDL)
 523   SDLDrawSimpleLine(bitmap, from_x, from_y, to_x, to_y, BLACK_PIXEL);
 524 #else
 525   X11DrawSimpleLine(bitmap, from_x, from_y, to_x, to_y, BLACK_PIXEL);
 526 #endif
 527 }
 528
 529 inline void DrawSimpleWhiteLine(Bitmap *bitmap, int from_x, int from_y,
 530                                 int to_x, int to_y)
 531 {
 532 #if defined(TARGET_SDL)
 533   SDLDrawSimpleLine(bitmap, from_x, from_y, to_x, to_y, WHITE_PIXEL);
 534 #else
 535   X11DrawSimpleLine(bitmap, from_x, from_y, to_x, to_y, WHITE_PIXEL);
 536 #endif
 537 }
 538
 539 #if !defined(TARGET_X11_NATIVE)
 540 inline void DrawLine(Bitmap *bitmap, int from_x, int from_y,
 541                      int to_x, int to_y, Pixel pixel, int line_width)
 542 {
 543   int x, y;
 544
 545   for (x = 0; x < line_width; x++)
 546   {
 547     for (y = 0; y < line_width; y++)
 548     {
 549       int dx = x - line_width / 2;
 550       int dy = y - line_width / 2;
 551
 552       if ((x == 0 && y == 0) ||
 553           (x == 0 && y == line_width - 1) ||
 554           (x == line_width - 1 && y == 0) ||
 555           (x == line_width - 1 && y == line_width - 1))
 556         continue;
 557
 558 #if defined(TARGET_SDL)
 559       SDLDrawLine(bitmap,
 560                   from_x + dx, from_y + dy, to_x + dx, to_y + dy, pixel);
 561 #elif defined(TARGET_ALLEGRO)
 562       AllegroDrawLine(bitmap->drawable, from_x + dx, from_y + dy,
 563                       to_x + dx, to_y + dy, pixel);
 564 #endif
 565     }
 566   }
 567 }
 568 #endif
 569
 570 inline void DrawLines(Bitmap *bitmap, struct XY *points, int num_points,
 571                       Pixel pixel)
 572 {
 573 #if !defined(TARGET_X11_NATIVE)
 574   int line_width = 4;
 575   int i;
 576
 577   for (i = 0; i < num_points - 1; i++)
 578     DrawLine(bitmap, points[i].x, points[i].y,
 579              points[i + 1].x, points[i + 1].y, pixel, line_width);
 580
 581   /*
 582   SDLDrawLines(bitmap->surface, points, num_points, pixel);
 583   */
 584 #else
 585   XSetForeground(display, bitmap->line_gc[1], pixel);
 586   XDrawLines(display, bitmap->drawable, bitmap->line_gc[1],
 587              (XPoint *)points, num_points, CoordModeOrigin);
 588 #endif
 589 }
 590
 591 inline Pixel GetPixel(Bitmap *bitmap, int x, int y)
 592 {
 593   if (x < 0 || x >= bitmap->width ||
 594       y < 0 || y >= bitmap->height)
 595     return BLACK_PIXEL;
 596
 597 #if defined(TARGET_SDL)
 598   return SDLGetPixel(bitmap, x, y);
 599 #elif defined(TARGET_ALLEGRO)
 600   return AllegroGetPixel(bitmap->drawable, x, y);
 601 #else
 602   return X11GetPixel(bitmap, x, y);
 603 #endif
 604 }
 605
 606 inline Pixel GetPixelFromRGB(Bitmap *bitmap, unsigned int color_r,
 607                              unsigned int color_g, unsigned int color_b)
 608 {
 609 #if defined(TARGET_SDL)
 610   return SDL_MapRGB(bitmap->surface->format, color_r, color_g, color_b);
 611 #elif defined(TARGET_ALLEGRO)
 612   return AllegroAllocColorCell(color_r << 8, color_g << 8, color_b << 8);
 613 #else
 614   return X11GetPixelFromRGB(color_r, color_g, color_b);
 615 #endif
 616 }
 617
 618 inline Pixel GetPixelFromRGBcompact(Bitmap *bitmap, unsigned int color)
 619 {
 620   unsigned int color_r = (color >> 16) & 0xff;
 621   unsigned int color_g = (color >>  8) & 0xff;
 622   unsigned int color_b = (color >>  0) & 0xff;
 623
 624   return GetPixelFromRGB(bitmap, color_r, color_g, color_b);
 625 }
 626
 627 /* execute all pending screen drawing operations */
 628 inline void FlushDisplay(void)
 629 {
 630 #ifndef TARGET_SDL
 631   XFlush(display);
 632 #endif
 633 }
 634
 635 /* execute and wait for all pending screen drawing operations */
 636 inline void SyncDisplay(void)
 637 {
 638 #ifndef TARGET_SDL
 639   XSync(display, FALSE);
 640 #endif
 641 }
 642
 643 inline void KeyboardAutoRepeatOn(void)
 644 {
 645 #if defined(TARGET_SDL)
 646   SDL_EnableKeyRepeat(SDL_DEFAULT_REPEAT_DELAY / 2,
 647                       SDL_DEFAULT_REPEAT_INTERVAL / 2);
 648   SDL_EnableUNICODE(1);
 649 #else
 650   if (display)
 651     XAutoRepeatOn(display);
 652 #endif
 653 }
 654
 655 inline void KeyboardAutoRepeatOff(void)
 656 {
 657 #if defined(TARGET_SDL)
 658   SDL_EnableKeyRepeat(0, SDL_DEFAULT_REPEAT_INTERVAL);
 659   SDL_EnableUNICODE(0);
 660 #else
 661   if (display)
 662     XAutoRepeatOff(display);
 663 #endif
 664 }
 665
 666 inline boolean PointerInWindow(DrawWindow *window)
 667 {
 668 #if defined(TARGET_SDL)
 669   return TRUE;
 670 #else
 671   Window root, child;
 672   int root_x, root_y;
 673   unsigned int mask;
 674   int win_x, win_y;
 675
 676   /* if XQueryPointer() returns False, the pointer
 677      is not on the same screen as the specified window */
 678   return XQueryPointer(display, window->drawable, &root, &child,
 679                        &root_x, &root_y, &win_x, &win_y, &mask);
 680 #endif
 681 }
 682
 683 inline boolean SetVideoMode(boolean fullscreen)
 684 {
 685 #if defined(TARGET_SDL)
 686   return SDLSetVideoMode(&backbuffer, fullscreen);
 687 #else
 688   boolean success = TRUE;
 689
 690   if (fullscreen && video.fullscreen_available)
 691   {
 692     Error(ERR_WARN, "fullscreen not available in X11 version");
 693
 694     /* display error message only once */
 695     video.fullscreen_available = FALSE;
 696
 697     success = FALSE;
 698   }
 699
 700   return success;
 701 #endif
 702 }
 703
 704 inline boolean ChangeVideoModeIfNeeded(boolean fullscreen)
 705 {
 706 #if defined(TARGET_SDL)
 707   if ((fullscreen && !video.fullscreen_enabled && video.fullscreen_available)||
 708       (!fullscreen && video.fullscreen_enabled))
 709     fullscreen = SetVideoMode(fullscreen);
 710 #endif
 711
 712   return fullscreen;
 713 }
 714
 715 Bitmap *LoadImage(char *filename)
 716 {
 717   Bitmap *new_bitmap;
 718
 719 #if defined(TARGET_SDL)
 720   new_bitmap = SDLLoadImage(filename);
 721 #else
 722   new_bitmap = X11LoadImage(filename);
 723 #endif
 724
 725   if (new_bitmap)
 726     new_bitmap->source_filename = getStringCopy(filename);
 727
 728   return new_bitmap;
 729 }
 730
 731 Bitmap *LoadCustomImage(char *basename)
 732 {
 733   char *filename = getCustomImageFilename(basename);
 734   Bitmap *new_bitmap;
 735
 736   if (filename == NULL)
 737     Error(ERR_EXIT, "LoadCustomImage(): cannot find file '%s'", basename);
 738
 739   if ((new_bitmap = LoadImage(filename)) == NULL)
 740     Error(ERR_EXIT, "LoadImage() failed: %s", GetError());
 741
 742   return new_bitmap;
 743 }
 744
 745 void ReloadCustomImage(Bitmap *bitmap, char *basename)
 746 {
 747   char *filename = getCustomImageFilename(basename);
 748   Bitmap *new_bitmap;
 749
 750   if (filename == NULL)         /* (should never happen) */
 751   {
 752     Error(ERR_WARN, "ReloadCustomImage(): cannot find file '%s'", basename);
 753     return;
 754   }
 755
 756   if (strcmp(filename, bitmap->source_filename) == 0)
 757   {
 758     /* The old and new image are the same (have the same filename and path).
 759        This usually means that this image does not exist in this graphic set
 760        and a fallback to the existing image is done. */
 761
 762     return;
 763   }
 764
 765   if ((new_bitmap = LoadImage(filename)) == NULL)
 766   {
 767     Error(ERR_WARN, "LoadImage() failed: %s", GetError());
 768     return;
 769   }
 770
 771   if (bitmap->width != new_bitmap->width ||
 772       bitmap->height != new_bitmap->height)
 773   {
 774     Error(ERR_WARN, "ReloadCustomImage: new image '%s' has wrong dimensions",
 775           filename);
 776     FreeBitmap(new_bitmap);
 777     return;
 778   }
 779
 780   TransferBitmapPointers(new_bitmap, bitmap);
 781   free(new_bitmap);
 782 }
 783
 784 Bitmap *ZoomBitmap(Bitmap *src_bitmap, int zoom_width, int zoom_height)
 785 {
 786   Bitmap *dst_bitmap = CreateBitmap(zoom_width, zoom_height, DEFAULT_DEPTH);
 787
 788 #if defined(TARGET_SDL)
 789   SDLZoomBitmap(src_bitmap, dst_bitmap);
 790 #else
 791   X11ZoomBitmap(src_bitmap, dst_bitmap);
 792 #endif
 793
 794   return dst_bitmap;
 795 }
 796
 797 void CreateBitmapWithSmallBitmaps(Bitmap *old_bitmap, int zoom_factor)
 798 {
 799   Bitmap swap_bitmap;
 800   Bitmap *new_bitmap, *tmp_bitmap_1, *tmp_bitmap_2, *tmp_bitmap_8;
 801   int width_1, height_1, width_2, height_2, width_8, height_8;
 802   int new_width, new_height;
 803
 804   width_1  = old_bitmap->width  * zoom_factor;
 805   height_1 = old_bitmap->height * zoom_factor;
 806   width_2  = width_1  / 2;
 807   height_2 = height_1 / 2;
 808   width_8  = width_1  / 8;
 809   height_8 = height_1 / 8;
 810
 811   /* get image with normal size (this might require scaling up) */
 812   if (zoom_factor != 1)
 813     tmp_bitmap_1 = ZoomBitmap(old_bitmap, width_1, height_1);
 814   else
 815     tmp_bitmap_1 = old_bitmap;
 816
 817   /* get image with 1/2 of normal size (for use in the level editor) */
 818   if (zoom_factor != 2)
 819     tmp_bitmap_2 = ZoomBitmap(tmp_bitmap_1, width_1 / 2, height_1 / 2);
 820   else
 821     tmp_bitmap_2 = old_bitmap;
 822
 823   /* get image with 1/8 of normal size (for use on the preview screen) */
 824   if (zoom_factor != 8)
 825     tmp_bitmap_8 = ZoomBitmap(tmp_bitmap_1, width_1 / 8, height_1 / 8);
 826   else
 827     tmp_bitmap_8 = old_bitmap;
 828
 829   /* if image was scaled up, create new clipmask for normal size image */
 830   if (zoom_factor != 1)
 831   {
 832 #if defined(TARGET_X11)
 833     if (old_bitmap->clip_mask)
 834       XFreePixmap(display, old_bitmap->clip_mask);
 835
 836     old_bitmap->clip_mask =
 837       Pixmap_to_Mask(tmp_bitmap_1->drawable, width_1, height_1);
 838
 839     XSetClipMask(display, old_bitmap->stored_clip_gc, old_bitmap->clip_mask);
 840 #else
 841     SDL_Surface *tmp_surface_1 = tmp_bitmap_1->surface;
 842
 843     if (old_bitmap->surface_masked)
 844       SDL_FreeSurface(old_bitmap->surface_masked);
 845
 846     SDL_SetColorKey(tmp_surface_1, SDL_SRCCOLORKEY,
 847                     SDL_MapRGB(tmp_surface_1->format, 0x00, 0x00, 0x00));
 848     if ((old_bitmap->surface_masked = SDL_DisplayFormat(tmp_surface_1)) ==NULL)
 849       Error(ERR_EXIT, "SDL_DisplayFormat() failed");
 850     SDL_SetColorKey(tmp_surface_1, 0, 0);       /* reset transparent pixel */
 851 #endif
 852   }
 853
 854   new_width  = width_1;
 855   new_height = height_1 + (height_1 + 1) / 2;     /* prevent odd height */
 856
 857   new_bitmap = CreateBitmap(new_width, new_height, DEFAULT_DEPTH);
 858
 859   BlitBitmap(tmp_bitmap_1, new_bitmap, 0, 0, width_1, height_1, 0, 0);
 860   BlitBitmap(tmp_bitmap_2, new_bitmap, 0, 0, width_1 / 2, height_1 / 2,
 861              0, height_1);
 862   BlitBitmap(tmp_bitmap_8, new_bitmap, 0, 0, width_1 / 8, height_1 / 8,
 863              3 * width_1 / 4, height_1);
 864
 865   if (zoom_factor != 1)
 866     FreeBitmap(tmp_bitmap_1);
 867
 868   if (zoom_factor != 2)
 869     FreeBitmap(tmp_bitmap_2);
 870
 871   if (zoom_factor != 8)
 872     FreeBitmap(tmp_bitmap_8);
 873
 874   /* replace image with extended image (containing normal, 1/2 and 1/8 size) */
 875 #if defined(TARGET_SDL)
 876   swap_bitmap.surface = old_bitmap->surface;
 877   old_bitmap->surface = new_bitmap->surface;
 878   new_bitmap->surface = swap_bitmap.surface;
 879 #else
 880   swap_bitmap.drawable = old_bitmap->drawable;
 881   old_bitmap->drawable = new_bitmap->drawable;
 882   new_bitmap->drawable = swap_bitmap.drawable;
 883 #endif
 884
 885   old_bitmap->width  = new_bitmap->width;
 886   old_bitmap->height = new_bitmap->height;
 887
 888   FreeBitmap(new_bitmap);
 889 }
 890
 891
 892 /* ------------------------------------------------------------------------- */
 893 /* mouse pointer functions                                                   */
 894 /* ------------------------------------------------------------------------- */
 895
 896 #if !defined(PLATFORM_MSDOS)
 897 /* XPM */
 898 static const char *cursor_image_playfield[] =
 899 {
 900   /* width height num_colors chars_per_pixel */
 901   "    16    16        3            1",
 902
 903   /* colors */
 904   "X c #000000",
 905   ". c #ffffff",
 906   "  c None",
 907
 908 #if 1
 909   /* some people complained about a "white dot" on the screen and thought it
 910      was a graphical error... OK, let's just remove the whole pointer :-) */
 911
 912   /* pixels */
 913   "                ",
 914   "                ",
 915   "                ",
 916   "                ",
 917   "                ",
 918   "                ",
 919   "                ",
 920   "                ",
 921   "                ",
 922   "                ",
 923   "                ",
 924   "                ",
 925   "                ",
 926   "                ",
 927   "                ",
 928   "                ",
 929
 930   /* hot spot */
 931   "0,0"
 932
 933 #else
 934
 935   /* pixels */
 936   " X              ",
 937   "X.X             ",
 938   " X              ",
 939   "                ",
 940   "                ",
 941   "                ",
 942   "                ",
 943   "                ",
 944   "                ",
 945   "                ",
 946   "                ",
 947   "                ",
 948   "                ",
 949   "                ",
 950   "                ",
 951   "                ",
 952
 953   /* hot spot */
 954   "1,1"
 955 #endif
 956 };
 957
 958 #if defined(TARGET_SDL)
 959 static const int cursor_bit_order = BIT_ORDER_MSB;
 960 #elif defined(TARGET_X11_NATIVE)
 961 static const int cursor_bit_order = BIT_ORDER_LSB;
 962 #endif
 963
 964 static struct MouseCursorInfo *get_cursor_from_image(const char **image)
 965 {
 966   struct MouseCursorInfo *cursor;
 967   boolean bit_order_msb = (cursor_bit_order == BIT_ORDER_MSB);
 968   int header_lines = 4;
 969   int x, y, i;
 970
 971   cursor = checked_calloc(sizeof(struct MouseCursorInfo));
 972
 973   sscanf(image[0], " %d %d ", &cursor->width, &cursor->height);
 974
 975   i = -1;
 976   for (y = 0; y < cursor->width; y++)
 977   {
 978     for (x = 0; x < cursor->height; x++)
 979     {
 980       int bit_nr = x % 8;
 981       int bit_mask = 0x01 << (bit_order_msb ? 7 - bit_nr : bit_nr );
 982
 983       if (bit_nr == 0)
 984       {
 985         i++;
 986         cursor->data[i] = cursor->mask[i] = 0;
 987       }
 988
 989       switch (image[header_lines + y][x])
 990       {
 991         case 'X':
 992           cursor->data[i] |= bit_mask;
 993           cursor->mask[i] |= bit_mask;
 994           break;
 995
 996         case '.':
 997           cursor->mask[i] |= bit_mask;
 998           break;
 999
1000         case ' ':
1001           break;
1002       }
1003     }
1004   }
1005
1006   sscanf(image[header_lines + y], "%d,%d", &cursor->hot_x, &cursor->hot_y);
1007
1008   return cursor;
1009 }
1010 #endif  /* !PLATFORM_MSDOS */
1011
1012 void SetMouseCursor(int mode)
1013 {
1014 #if !defined(PLATFORM_MSDOS)
1015   static struct MouseCursorInfo *cursor_playfield = NULL;
1016
1017   if (cursor_playfield == NULL)
1018     cursor_playfield = get_cursor_from_image(cursor_image_playfield);
1019
1020 #if defined(TARGET_SDL)
1021   SDLSetMouseCursor(mode == CURSOR_PLAYFIELD ? cursor_playfield : NULL);
1022 #elif defined(TARGET_X11_NATIVE)
1023   X11SetMouseCursor(mode == CURSOR_PLAYFIELD ? cursor_playfield : NULL);
1024 #endif
1025 #endif
1026 }
1027
1028
1029 /* ========================================================================= */
1030 /* audio functions                                                           */
1031 /* ========================================================================= */
1032
1033 inline void OpenAudio(void)
1034 {
1035   /* always start with reliable default values */
1036   audio.sound_available = FALSE;
1037   audio.music_available = FALSE;
1038   audio.loops_available = FALSE;
1039
1040   audio.sound_enabled = FALSE;
1041   audio.sound_deactivated = FALSE;
1042
1043   audio.mixer_pipe[0] = audio.mixer_pipe[1] = 0;
1044   audio.mixer_pid = 0;
1045   audio.device_name = NULL;
1046   audio.device_fd = -1;
1047
1048   audio.num_channels = 0;
1049   audio.music_channel = 0;
1050   audio.first_sound_channel = 0;
1051
1052 #if defined(TARGET_SDL)
1053   SDLOpenAudio();
1054 #elif defined(PLATFORM_UNIX)
1055   UnixOpenAudio();
1056 #elif defined(PLATFORM_MSDOS)
1057   MSDOSOpenAudio();
1058 #endif
1059 }
1060
1061 inline void CloseAudio(void)
1062 {
1063 #if defined(TARGET_SDL)
1064   SDLCloseAudio();
1065 #elif defined(PLATFORM_UNIX)
1066   UnixCloseAudio();
1067 #elif defined(PLATFORM_MSDOS)
1068   MSDOSCloseAudio();
1069 #endif
1070
1071   audio.sound_enabled = FALSE;
1072 }
1073
1074 inline void SetAudioMode(boolean enabled)
1075 {
1076   if (!audio.sound_available)
1077     return;
1078
1079   audio.sound_enabled = enabled;
1080 }
1081
1082
1083 /* ========================================================================= */
1084 /* event functions                                                           */
1085 /* ========================================================================= */
1086
1087 inline void InitEventFilter(EventFilter filter_function)
1088 {
1089 #if defined(TARGET_SDL)
1090   /* set event filter to filter out certain events */
1091   SDL_SetEventFilter(filter_function);
1092 #endif
1093 }
1094
1095 inline boolean PendingEvent(void)
1096 {
1097 #if defined(TARGET_SDL)
1098   return (SDL_PollEvent(NULL) ? TRUE : FALSE);
1099 #else
1100   return (XPending(display) ? TRUE : FALSE);
1101 #endif
1102 }
1103
1104 inline void NextEvent(Event *event)
1105 {
1106 #if defined(TARGET_SDL)
1107   SDLNextEvent(event);
1108 #else
1109   XNextEvent(display, event);
1110 #endif
1111 }
1112
1113 inline void PeekEvent(Event *event)
1114 {
1115 #if defined(TARGET_SDL)
1116   SDL_PeepEvents(event, 1, SDL_PEEKEVENT, SDL_ALLEVENTS);
1117 #else
1118   XPeekEvent(display, event);
1119 #endif
1120 }
1121
1122 inline Key GetEventKey(KeyEvent *event, boolean with_modifiers)
1123 {
1124 #if defined(TARGET_SDL)
1125
1126 #if 0
1127   printf("unicode == '%d', sym == '%d', mod == '0x%04x'\n",
1128          (int)event->keysym.unicode,
1129          (int)event->keysym.sym,
1130          (int)SDL_GetModState());
1131 #endif
1132
1133   if (with_modifiers &&
1134       event->keysym.unicode > 0x0000 &&
1135       event->keysym.unicode < 0x2000)
1136     return event->keysym.unicode;
1137   else
1138     return event->keysym.sym;
1139
1140 #else
1141
1142 #if 0
1143   printf("with modifiers == '0x%04x', without modifiers == '0x%04x'\n",
1144          (int)XLookupKeysym(event, event->state),
1145          (int)XLookupKeysym(event, 0));
1146 #endif
1147
1148   if (with_modifiers)
1149     return XLookupKeysym(event, event->state);
1150   else
1151     return XLookupKeysym(event, 0);
1152 #endif
1153 }
1154
1155 inline KeyMod HandleKeyModState(Key key, int key_status)
1156 {
1157   static KeyMod current_modifiers = KMOD_None;
1158
1159 #if !defined(TARGET_SDL)
1160   if (key != KSYM_UNDEFINED)    /* new key => check for modifier key change */
1161   {
1162     KeyMod new_modifier = KMOD_None;
1163
1164     switch(key)
1165     {
1166       case KSYM_Shift_L:
1167         new_modifier = KMOD_Shift_L;
1168         break;
1169       case KSYM_Shift_R:
1170         new_modifier = KMOD_Shift_R;
1171         break;
1172       case KSYM_Control_L:
1173         new_modifier = KMOD_Control_L;
1174         break;
1175       case KSYM_Control_R:
1176         new_modifier = KMOD_Control_R;
1177         break;
1178       case KSYM_Meta_L:
1179         new_modifier = KMOD_Meta_L;
1180         break;
1181       case KSYM_Meta_R:
1182         new_modifier = KMOD_Meta_R;
1183         break;
1184       case KSYM_Alt_L:
1185         new_modifier = KMOD_Alt_L;
1186         break;
1187       case KSYM_Alt_R:
1188         new_modifier = KMOD_Alt_R;
1189         break;
1190       default:
1191         break;
1192     }
1193
1194     if (key_status == KEY_PRESSED)
1195       current_modifiers |= new_modifier;
1196     else
1197       current_modifiers &= ~new_modifier;
1198   }
1199 #endif
1200
1201   return current_modifiers;
1202 }
1203
1204 inline KeyMod GetKeyModState()
1205 {
1206 #if defined(TARGET_SDL)
1207   return (KeyMod)SDL_GetModState();
1208 #else
1209   return HandleKeyModState(KSYM_UNDEFINED, 0);
1210 #endif
1211 }
1212
1213 inline boolean CheckCloseWindowEvent(ClientMessageEvent *event)
1214 {
1215   if (event->type != EVENT_CLIENTMESSAGE)
1216     return FALSE;
1217
1218 #if defined(TARGET_SDL)
1219   return TRUE;          /* the only possible message here is SDL_QUIT */
1220 #elif defined(PLATFORM_UNIX)
1221   if ((event->window == window->drawable) &&
1222       (event->data.l[0] == XInternAtom(display, "WM_DELETE_WINDOW", FALSE)))
1223     return TRUE;
1224 #endif
1225
1226   return FALSE;
1227 }
1228
1229
1230 /* ========================================================================= */
1231 /* joystick functions                                                        */
1232 /* ========================================================================= */
1233
1234 inline void InitJoysticks()
1235 {
1236   int i;
1237
1238 #if defined(NO_JOYSTICK)
1239   return;       /* joysticks generally deactivated by compile-time directive */
1240 #endif
1241
1242   /* always start with reliable default values */
1243   joystick.status = JOYSTICK_NOT_AVAILABLE;
1244   for (i = 0; i < MAX_PLAYERS; i++)
1245     joystick.fd[i] = -1;                /* joystick device closed */
1246
1247 #if defined(TARGET_SDL)
1248   SDLInitJoysticks();
1249 #elif defined(PLATFORM_UNIX)
1250   UnixInitJoysticks();
1251 #elif defined(PLATFORM_MSDOS)
1252   MSDOSInitJoysticks();
1253 #endif
1254
1255 #if 0
1256   for (i = 0; i < MAX_PLAYERS; i++)
1257     printf("::: Joystick for player %d: %d\n", i, joystick.fd[i]);
1258 #endif
1259 }
1260
1261 inline boolean ReadJoystick(int nr, int *x, int *y, boolean *b1, boolean *b2)
1262 {
1263 #if defined(TARGET_SDL)
1264   return SDLReadJoystick(nr, x, y, b1, b2);
1265 #elif defined(PLATFORM_UNIX)
1266   return UnixReadJoystick(nr, x, y, b1, b2);
1267 #elif defined(PLATFORM_MSDOS)
1268   return MSDOSReadJoystick(nr, x, y, b1, b2);
1269 #endif
1270 }