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