rnd-20030404-1-src
[rocksndiamonds.git] / 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 "sound.h"
25 #include "setup.h"
26 #include "joystick.h"
27 #include "misc.h"
28
29
30 /* ========================================================================= */
31 /* exported variables                                                        */
32 /* ========================================================================= */
33
34 struct ProgramInfo      program;
35 struct OptionInfo       options;
36 struct VideoSystemInfo  video;
37 struct AudioSystemInfo  audio;
38 struct GfxInfo          gfx;
39 struct ArtworkInfo      artwork;
40 struct JoystickInfo     joystick;
41 struct SetupInfo        setup;
42
43 LevelDirTree           *leveldir_first = NULL;
44 LevelDirTree           *leveldir_current = NULL;
45 int                     level_nr;
46
47 Display                *display = NULL;
48 Visual                 *visual = NULL;
49 int                     screen = 0;
50 Colormap                cmap = None;
51
52 DrawWindow             *window = NULL;
53 DrawBuffer             *backbuffer = NULL;
54 DrawBuffer             *drawto = NULL;
55
56 int                     button_status = MB_NOT_PRESSED;
57 boolean                 motion_status = FALSE;
58
59 int                     redraw_mask = REDRAW_NONE;
60 int                     redraw_tiles = 0;
61
62 int                     FrameCounter = 0;
63
64
65 /* ========================================================================= */
66 /* init/close functions                                                      */
67 /* ========================================================================= */
68
69 void InitProgramInfo(char *argv0,
70                      char *userdata_directory, char *program_title,
71                      char *window_title, char *icon_title,
72                      char *x11_icon_filename, char *x11_iconmask_filename,
73                      char *msdos_pointer_filename,
74                      char *cookie_prefix, char *filename_prefix,
75                      int program_version)
76 {
77   program.command_basename =
78     (strrchr(argv0, '/') ? strrchr(argv0, '/') + 1 : argv0);
79
80   program.userdata_directory = userdata_directory;
81   program.program_title = program_title;
82   program.window_title = window_title;
83   program.icon_title = icon_title;
84   program.x11_icon_filename = x11_icon_filename;
85   program.x11_iconmask_filename = x11_iconmask_filename;
86   program.msdos_pointer_filename = msdos_pointer_filename;
87
88   program.cookie_prefix = cookie_prefix;
89   program.filename_prefix = filename_prefix;
90
91   program.version_major = VERSION_MAJOR(program_version);
92   program.version_minor = VERSION_MINOR(program_version);
93   program.version_patch = VERSION_PATCH(program_version);
94 }
95
96 void InitExitFunction(void (*exit_function)(int))
97 {
98   program.exit_function = exit_function;
99
100   /* set signal handlers to custom exit function */
101   signal(SIGINT, exit_function);
102   signal(SIGTERM, exit_function);
103
104 #if defined(TARGET_SDL)
105   /* set exit function to automatically cleanup SDL stuff after exit() */
106   atexit(SDL_Quit);
107 #endif
108 }
109
110 void InitPlatformDependantStuff(void)
111 {
112 #if defined(PLATFORM_MSDOS)
113   _fmode = O_BINARY;
114   initErrorFile();
115 #endif
116
117 #if defined(TARGET_SDL)
118   if (SDL_Init(SDL_INIT_EVENTTHREAD | SDL_INIT_NOPARACHUTE) < 0)
119     Error(ERR_EXIT, "SDL_Init() failed: %s", SDL_GetError());
120 #endif
121 }
122
123 void ClosePlatformDependantStuff(void)
124 {
125 #if defined(PLATFORM_MSDOS)
126   dumpErrorFile();
127 #endif
128 }
129
130 void InitGfxFieldInfo(int sx, int sy, int sxsize, int sysize,
131                       int real_sx, int real_sy,
132                       int full_sxsize, int full_sysize,
133                       Bitmap *field_save_buffer)
134 {
135   gfx.sx = sx;
136   gfx.sy = sy;
137   gfx.sxsize = sxsize;
138   gfx.sysize = sysize;
139   gfx.real_sx = real_sx;
140   gfx.real_sy = real_sy;
141   gfx.full_sxsize = full_sxsize;
142   gfx.full_sysize = full_sysize;
143
144   gfx.field_save_buffer = field_save_buffer;
145
146   gfx.background_bitmap = NULL;
147   gfx.background_bitmap_mask = REDRAW_NONE;
148
149   SetDrawDeactivationMask(REDRAW_NONE);         /* do not deactivate drawing */
150   SetDrawBackgroundMask(REDRAW_NONE);           /* deactivate masked drawing */
151 }
152
153 void InitGfxDoor1Info(int dx, int dy, int dxsize, int dysize)
154 {
155   gfx.dx = dx;
156   gfx.dy = dy;
157   gfx.dxsize = dxsize;
158   gfx.dysize = dysize;
159 }
160
161 void InitGfxDoor2Info(int vx, int vy, int vxsize, int vysize)
162 {
163   gfx.vx = vx;
164   gfx.vy = vy;
165   gfx.vxsize = vxsize;
166   gfx.vysize = vysize;
167 }
168
169 void InitGfxScrollbufferInfo(int scrollbuffer_width, int scrollbuffer_height)
170 {
171   /* currently only used by MSDOS code to alloc VRAM buffer, if available */
172   gfx.scrollbuffer_width = scrollbuffer_width;
173   gfx.scrollbuffer_height = scrollbuffer_height;
174 }
175
176 void SetDrawDeactivationMask(int draw_deactivation_mask)
177 {
178   gfx.draw_deactivation_mask = draw_deactivation_mask;
179 }
180
181 void SetDrawBackgroundMask(int draw_background_mask)
182 {
183   gfx.draw_background_mask = draw_background_mask;
184 }
185
186 static void DrawBitmapFromTile(Bitmap *bitmap, Bitmap *tile,
187                                int dest_x, int dest_y, int width, int height)
188 {
189   int bitmap_xsize = width;
190   int bitmap_ysize = height;
191   int tile_xsize = tile->width;
192   int tile_ysize = tile->height;
193   int tile_xsteps = (bitmap_xsize + tile_xsize - 1) / tile_xsize;
194   int tile_ysteps = (bitmap_ysize + tile_ysize - 1) / tile_ysize;
195   int x, y;
196
197   for (y=0; y < tile_ysteps; y++)
198   {
199     for (x=0; x < tile_xsteps; x++)
200     {
201       int draw_x = dest_x + x * tile_xsize;
202       int draw_y = dest_y + y * tile_ysize;
203       int draw_xsize = MIN(tile_xsize, bitmap_xsize - x * tile_xsize);
204       int draw_ysize = MIN(tile_ysize, bitmap_ysize - y * tile_ysize);
205
206       BlitBitmap(tile, bitmap, 0, 0, draw_xsize, draw_ysize, draw_x, draw_y);
207     }
208   }
209 }
210
211 void SetBackgroundBitmap(Bitmap *background_bitmap_tile, int mask)
212 {
213   static Bitmap *main_bitmap_tile = NULL;
214   static Bitmap *door_bitmap_tile = NULL;
215
216   if (mask == REDRAW_FIELD)
217   {
218     if (background_bitmap_tile == main_bitmap_tile)
219       return;           /* main background tile has not changed */
220
221     main_bitmap_tile = background_bitmap_tile;
222   }
223   else if (mask == REDRAW_DOOR_1)
224   {
225     if (background_bitmap_tile == door_bitmap_tile)
226       return;   /* main background tile has not changed */
227
228     door_bitmap_tile = background_bitmap_tile;
229   }
230   else          /* should not happen */
231     return;
232
233   if (background_bitmap_tile)
234     gfx.background_bitmap_mask |= mask;
235   else
236     gfx.background_bitmap_mask &= ~mask;
237
238   if (gfx.background_bitmap == NULL)
239     gfx.background_bitmap = CreateBitmap(video.width, video.height,
240                                          DEFAULT_DEPTH);
241
242   if (background_bitmap_tile == NULL)   /* empty background requested */
243     return;
244
245   if (mask == REDRAW_FIELD)
246     DrawBitmapFromTile(gfx.background_bitmap, background_bitmap_tile,
247                        gfx.real_sx, gfx.real_sy,
248                        gfx.full_sxsize, gfx.full_sysize);
249   else
250     DrawBitmapFromTile(gfx.background_bitmap, background_bitmap_tile,
251                        gfx.dx, gfx.dy,
252                        gfx.dxsize, gfx.dysize);
253 }
254
255 void SetMainBackgroundBitmap(Bitmap *background_bitmap_tile)
256 {
257   SetBackgroundBitmap(background_bitmap_tile, REDRAW_FIELD);
258 }
259
260 void SetDoorBackgroundBitmap(Bitmap *background_bitmap_tile)
261 {
262   SetBackgroundBitmap(background_bitmap_tile, REDRAW_DOOR_1);
263 }
264
265
266 /* ========================================================================= */
267 /* video functions                                                           */
268 /* ========================================================================= */
269
270 inline static int GetRealDepth(int depth)
271 {
272   return (depth == DEFAULT_DEPTH ? video.default_depth : depth);
273 }
274
275 inline static void sysFillRectangle(Bitmap *bitmap, int x, int y,
276                                int width, int height, Pixel color)
277 {
278 #ifdef TARGET_SDL
279   SDLFillRectangle(bitmap, x, y, width, height, color);
280 #else
281   X11FillRectangle(bitmap, x, y, width, height, color);
282 #endif
283 }
284
285 inline static void sysCopyArea(Bitmap *src_bitmap, Bitmap *dst_bitmap,
286                                int src_x, int src_y, int width, int height,
287                                int dst_x, int dst_y, int mask_mode)
288 {
289 #ifdef TARGET_SDL
290   SDLCopyArea(src_bitmap, dst_bitmap,
291               src_x, src_y, width, height, dst_x, dst_y, mask_mode);
292 #else
293   X11CopyArea(src_bitmap, dst_bitmap,
294               src_x, src_y, width, height, dst_x, dst_y, mask_mode);
295 #endif
296 }
297
298 inline void InitVideoDisplay(void)
299 {
300 #if defined(TARGET_SDL)
301   SDLInitVideoDisplay();
302 #else
303   X11InitVideoDisplay();
304 #endif
305 }
306
307 inline void CloseVideoDisplay(void)
308 {
309   KeyboardAutoRepeatOn();
310
311 #if defined(TARGET_SDL)
312   SDL_QuitSubSystem(SDL_INIT_VIDEO);
313 #else
314   if (display)
315     XCloseDisplay(display);
316 #endif
317 }
318
319 inline void InitVideoBuffer(DrawBuffer **backbuffer, DrawWindow **window,
320                             int width, int height, int depth,
321                             boolean fullscreen)
322 {
323   video.width = width;
324   video.height = height;
325   video.depth = GetRealDepth(depth);
326   video.fullscreen_available = FULLSCREEN_STATUS;
327   video.fullscreen_enabled = FALSE;
328
329 #ifdef TARGET_SDL
330   SDLInitVideoBuffer(backbuffer, window, fullscreen);
331 #else
332   X11InitVideoBuffer(backbuffer, window);
333 #endif
334 }
335
336 inline Bitmap *CreateBitmapStruct(void)
337 {
338 #ifdef TARGET_SDL
339   return checked_calloc(sizeof(struct SDLSurfaceInfo));
340 #else
341   return checked_calloc(sizeof(struct X11DrawableInfo));
342 #endif
343 }
344
345 inline Bitmap *CreateBitmap(int width, int height, int depth)
346 {
347   Bitmap *new_bitmap = CreateBitmapStruct();
348   int real_depth = GetRealDepth(depth);
349
350 #ifdef TARGET_SDL
351   SDLCreateBitmapContent(new_bitmap, width, height, real_depth);
352 #else
353   X11CreateBitmapContent(new_bitmap, width, height, real_depth);
354 #endif
355
356   new_bitmap->width = width;
357   new_bitmap->height = height;
358
359   return new_bitmap;
360 }
361
362 inline static void FreeBitmapPointers(Bitmap *bitmap)
363 {
364   if (bitmap == NULL)
365     return;
366
367 #ifdef TARGET_SDL
368   SDLFreeBitmapPointers(bitmap);
369 #else
370   X11FreeBitmapPointers(bitmap);
371 #endif
372
373   if (bitmap->source_filename)
374     free(bitmap->source_filename);
375   bitmap->source_filename = NULL;
376 }
377
378 inline static void TransferBitmapPointers(Bitmap *src_bitmap,
379                                           Bitmap *dst_bitmap)
380 {
381   if (src_bitmap == NULL || dst_bitmap == NULL)
382     return;
383
384   FreeBitmapPointers(dst_bitmap);
385
386   *dst_bitmap = *src_bitmap;
387 }
388
389 inline void FreeBitmap(Bitmap *bitmap)
390 {
391   if (bitmap == NULL)
392     return;
393
394   FreeBitmapPointers(bitmap);
395
396   free(bitmap);
397 }
398
399 inline void CloseWindow(DrawWindow *window)
400 {
401 #ifdef TARGET_X11
402   if (window->drawable)
403   {
404     XUnmapWindow(display, window->drawable);
405     XDestroyWindow(display, window->drawable);
406   }
407   if (window->gc)
408     XFreeGC(display, window->gc);
409 #endif
410 }
411
412 static inline boolean CheckDrawingArea(int x, int y, int width, int height,
413                                        int draw_mask)
414 {
415   if (draw_mask == REDRAW_NONE)
416     return FALSE;
417
418   if (draw_mask & REDRAW_ALL)
419     return TRUE;
420
421   if ((draw_mask & REDRAW_FIELD) && x < gfx.real_sx + gfx.full_sxsize)
422     return TRUE;
423
424   if ((draw_mask & REDRAW_DOOR_1) && x >= gfx.dx && y < gfx.dy + gfx.dysize)
425     return TRUE;
426
427   if ((draw_mask & REDRAW_DOOR_2) && x >= gfx.dx && y >= gfx.vy)
428     return TRUE;
429
430   return FALSE;
431 }
432
433 inline boolean DrawingDeactivated(int x, int y, int width, int height)
434 {
435   return CheckDrawingArea(x, y, width, height, gfx.draw_deactivation_mask);
436 }
437
438 inline boolean DrawingOnBackground(int x, int y)
439 {
440   return ((gfx.draw_background_mask & gfx.background_bitmap_mask) &&
441           CheckDrawingArea(x, y, 1, 1, gfx.draw_background_mask));
442 }
443
444 inline void BlitBitmap(Bitmap *src_bitmap, Bitmap *dst_bitmap,
445                        int src_x, int src_y, int width, int height,
446                        int dst_x, int dst_y)
447 {
448   if (DrawingDeactivated(dst_x, dst_y, width, height))
449     return;
450
451   sysCopyArea(src_bitmap, dst_bitmap, src_x, src_y, width, height,
452               dst_x, dst_y, BLIT_OPAQUE);
453 }
454
455 inline void FillRectangle(Bitmap *bitmap, int x, int y, int width, int height,
456                           Pixel color)
457 {
458   if (DrawingDeactivated(x, y, width, height))
459     return;
460
461   sysFillRectangle(bitmap, x, y, width, height, color);
462 }
463
464 inline void ClearRectangle(Bitmap *bitmap, int x, int y, int width, int height)
465 {
466   FillRectangle(bitmap, x, y, width, height, BlackPixel(display, screen));
467 }
468
469 inline void ClearRectangleOnBackground(Bitmap *bitmap, int x, int y,
470                                        int width, int height)
471 {
472   if (DrawingOnBackground(x, y))
473     BlitBitmap(gfx.background_bitmap, bitmap, x, y, width, height, x, y);
474   else
475     ClearRectangle(bitmap, x, y, width, height);
476 }
477
478 #if 0
479 #ifndef TARGET_SDL
480 static GC last_clip_gc = 0;     /* needed for XCopyArea() through clip mask */
481 #endif
482 #endif
483
484 inline void SetClipMask(Bitmap *bitmap, GC clip_gc, Pixmap clip_pixmap)
485 {
486 #ifdef TARGET_X11
487   if (clip_gc)
488   {
489     bitmap->clip_gc = clip_gc;
490     XSetClipMask(display, bitmap->clip_gc, clip_pixmap);
491   }
492 #if 0
493   last_clip_gc = clip_gc;
494 #endif
495 #endif
496 }
497
498 inline void SetClipOrigin(Bitmap *bitmap, GC clip_gc, int clip_x, int clip_y)
499 {
500 #ifdef TARGET_X11
501   if (clip_gc)
502   {
503     bitmap->clip_gc = clip_gc;
504     XSetClipOrigin(display, bitmap->clip_gc, clip_x, clip_y);
505   }
506 #if 0
507   last_clip_gc = clip_gc;
508 #endif
509 #endif
510 }
511
512 inline void BlitBitmapMasked(Bitmap *src_bitmap, Bitmap *dst_bitmap,
513                              int src_x, int src_y,
514                              int width, int height,
515                              int dst_x, int dst_y)
516 {
517   if (DrawingDeactivated(dst_x, dst_y, width, height))
518     return;
519
520   sysCopyArea(src_bitmap, dst_bitmap, src_x, src_y, width, height,
521               dst_x, dst_y, BLIT_MASKED);
522 }
523
524 inline void BlitBitmapOnBackground(Bitmap *src_bitmap, Bitmap *dst_bitmap,
525                                    int src_x, int src_y,
526                                    int width, int height,
527                                    int dst_x, int dst_y)
528 {
529   if (DrawingOnBackground(dst_x, dst_y))
530   {
531     /* draw background */
532     BlitBitmap(gfx.background_bitmap, dst_bitmap, dst_x, dst_y, width, height,
533                dst_x, dst_y);
534
535     /* draw foreground */
536     SetClipOrigin(src_bitmap, src_bitmap->stored_clip_gc,
537                   dst_x - src_x, dst_y - src_y);
538     BlitBitmapMasked(src_bitmap, dst_bitmap, src_x, src_y, width, height,
539                      dst_x, dst_y);
540   }
541   else
542     BlitBitmap(src_bitmap, dst_bitmap, src_x, src_y, width, height,
543                dst_x, dst_y);
544 }
545
546 inline void DrawSimpleWhiteLine(Bitmap *bitmap, int from_x, int from_y,
547                                 int to_x, int to_y)
548 {
549 #ifdef TARGET_SDL
550   SDLDrawSimpleLine(bitmap, from_x, from_y, to_x, to_y, 0xffffff);
551 #else
552   XSetForeground(display, bitmap->gc, WhitePixel(display, screen));
553   XDrawLine(display, bitmap->drawable, bitmap->gc, from_x, from_y, to_x, to_y);
554 #endif
555 }
556
557 #if !defined(TARGET_X11_NATIVE)
558 inline void DrawLine(Bitmap *bitmap, int from_x, int from_y,
559                      int to_x, int to_y, Pixel pixel, int line_width)
560 {
561   int x, y;
562
563   for (x=0; x<line_width; x++)
564   {
565     for (y=0; y<line_width; y++)
566     {
567       int dx = x - line_width / 2;
568       int dy = y - line_width / 2;
569
570       if ((x == 0 && y == 0) ||
571           (x == 0 && y == line_width - 1) ||
572           (x == line_width - 1 && y == 0) ||
573           (x == line_width - 1 && y == line_width - 1))
574         continue;
575
576 #if defined(TARGET_SDL)
577       SDLDrawLine(bitmap,
578                   from_x + dx, from_y + dy, to_x + dx, to_y + dy, pixel);
579 #elif defined(TARGET_ALLEGRO)
580       AllegroDrawLine(bitmap->drawable, from_x + dx, from_y + dy,
581                       to_x + dx, to_y + dy, pixel);
582 #endif
583     }
584   }
585 }
586 #endif
587
588 inline void DrawLines(Bitmap *bitmap, struct XY *points, int num_points,
589                       Pixel pixel)
590 {
591 #if !defined(TARGET_X11_NATIVE)
592   int line_width = 4;
593   int i;
594
595   for (i=0; i<num_points - 1; i++)
596     DrawLine(bitmap, points[i].x, points[i].y,
597              points[i + 1].x, points[i + 1].y, pixel, line_width);
598
599   /*
600   SDLDrawLines(bitmap->surface, points, num_points, pixel);
601   */
602 #else
603   XSetForeground(display, bitmap->line_gc[1], pixel);
604   XDrawLines(display, bitmap->drawable, bitmap->line_gc[1],
605              (XPoint *)points, num_points, CoordModeOrigin);
606 #endif
607 }
608
609 inline Pixel GetPixel(Bitmap *bitmap, int x, int y)
610 {
611 #if defined(TARGET_SDL)
612   return SDLGetPixel(bitmap, x, y);
613 #elif defined(TARGET_ALLEGRO)
614   return AllegroGetPixel(bitmap->drawable, x, y);
615 #else
616   return X11GetPixel(bitmap, x, y);
617 #endif
618 }
619
620 inline Pixel GetPixelFromRGB(Bitmap *bitmap, unsigned int color_r,
621                              unsigned int color_g, unsigned int color_b)
622 {
623 #if defined(TARGET_SDL)
624   return SDL_MapRGB(bitmap->surface->format, color_r, color_g, color_b);
625 #elif defined(TARGET_ALLEGRO)
626   return AllegroAllocColorCell(color_r << 8, color_g << 8, color_b << 8);
627 #else
628   return X11GetPixelFromRGB(color_r, color_g, color_b);
629 #endif
630 }
631
632 inline Pixel GetPixelFromRGBcompact(Bitmap *bitmap, unsigned int color)
633 {
634   unsigned int color_r = (color >> 16) & 0xff;
635   unsigned int color_g = (color >>  8) & 0xff;
636   unsigned int color_b = (color >>  0) & 0xff;
637
638   return GetPixelFromRGB(bitmap, color_r, color_g, color_b);
639 }
640
641 /* execute all pending screen drawing operations */
642 inline void FlushDisplay(void)
643 {
644 #ifndef TARGET_SDL
645   XFlush(display);
646 #endif
647 }
648
649 /* execute and wait for all pending screen drawing operations */
650 inline void SyncDisplay(void)
651 {
652 #ifndef TARGET_SDL
653   XSync(display, FALSE);
654 #endif
655 }
656
657 inline void KeyboardAutoRepeatOn(void)
658 {
659 #ifdef TARGET_SDL
660   SDL_EnableKeyRepeat(SDL_DEFAULT_REPEAT_DELAY / 2,
661                       SDL_DEFAULT_REPEAT_INTERVAL / 2);
662   SDL_EnableUNICODE(1);
663 #else
664   if (display)
665     XAutoRepeatOn(display);
666 #endif
667 }
668
669 inline void KeyboardAutoRepeatOff(void)
670 {
671 #ifdef TARGET_SDL
672   SDL_EnableKeyRepeat(0, SDL_DEFAULT_REPEAT_INTERVAL);
673   SDL_EnableUNICODE(0);
674 #else
675   if (display)
676     XAutoRepeatOff(display);
677 #endif
678 }
679
680 inline boolean PointerInWindow(DrawWindow *window)
681 {
682 #ifdef TARGET_SDL
683   return TRUE;
684 #else
685   Window root, child;
686   int root_x, root_y;
687   unsigned int mask;
688   int win_x, win_y;
689
690   /* if XQueryPointer() returns False, the pointer
691      is not on the same screen as the specified window */
692   return XQueryPointer(display, window->drawable, &root, &child,
693                        &root_x, &root_y, &win_x, &win_y, &mask);
694 #endif
695 }
696
697 inline boolean SetVideoMode(boolean fullscreen)
698 {
699 #ifdef TARGET_SDL
700   return SDLSetVideoMode(&backbuffer, fullscreen);
701 #else
702   boolean success = TRUE;
703
704   if (fullscreen && video.fullscreen_available)
705   {
706     Error(ERR_WARN, "fullscreen not available in X11 version");
707
708     /* display error message only once */
709     video.fullscreen_available = FALSE;
710
711     success = FALSE;
712   }
713
714   return success;
715 #endif
716 }
717
718 inline boolean ChangeVideoModeIfNeeded(boolean fullscreen)
719 {
720 #ifdef TARGET_SDL
721   if ((fullscreen && !video.fullscreen_enabled && video.fullscreen_available)||
722       (!fullscreen && video.fullscreen_enabled))
723     fullscreen = SetVideoMode(fullscreen);
724 #endif
725
726   return fullscreen;
727 }
728
729 Bitmap *LoadImage(char *filename)
730 {
731   Bitmap *new_bitmap;
732
733 #if defined(TARGET_SDL)
734   new_bitmap = SDLLoadImage(filename);
735 #else
736   new_bitmap = X11LoadImage(filename);
737 #endif
738
739   if (new_bitmap)
740     new_bitmap->source_filename = getStringCopy(filename);
741
742   return new_bitmap;
743 }
744
745 Bitmap *LoadCustomImage(char *basename)
746 {
747   char *filename = getCustomImageFilename(basename);
748   Bitmap *new_bitmap;
749
750   if (filename == NULL)
751     Error(ERR_EXIT, "LoadCustomImage(): cannot find file '%s'", basename);
752
753   if ((new_bitmap = LoadImage(filename)) == NULL)
754     Error(ERR_EXIT, "LoadImage() failed: %s", GetError());
755
756   return new_bitmap;
757 }
758
759 void ReloadCustomImage(Bitmap *bitmap, char *basename)
760 {
761   char *filename = getCustomImageFilename(basename);
762   Bitmap *new_bitmap;
763
764   if (filename == NULL)         /* (should never happen) */
765   {
766     Error(ERR_WARN, "ReloadCustomImage(): cannot find file '%s'", basename);
767     return;
768   }
769
770   if (strcmp(filename, bitmap->source_filename) == 0)
771   {
772     /* The old and new image are the same (have the same filename and path).
773        This usually means that this image does not exist in this graphic set
774        and a fallback to the existing image is done. */
775
776     return;
777   }
778
779   if ((new_bitmap = LoadImage(filename)) == NULL)
780   {
781     Error(ERR_WARN, "LoadImage() failed: %s", GetError());
782     return;
783   }
784
785   if (bitmap->width != new_bitmap->width ||
786       bitmap->height != new_bitmap->height)
787   {
788     Error(ERR_WARN, "ReloadCustomImage: new image '%s' has wrong dimensions",
789           filename);
790     FreeBitmap(new_bitmap);
791     return;
792   }
793
794   TransferBitmapPointers(new_bitmap, bitmap);
795   free(new_bitmap);
796 }
797
798 Bitmap *ZoomBitmap(Bitmap *src_bitmap, int zoom_width, int zoom_height)
799 {
800   Bitmap *dst_bitmap = CreateBitmap(zoom_width, zoom_height, DEFAULT_DEPTH);
801
802 #if defined(TARGET_SDL)
803   SDLZoomBitmap(src_bitmap, dst_bitmap);
804 #else
805   X11ZoomBitmap(src_bitmap, dst_bitmap);
806 #endif
807
808   return dst_bitmap;
809 }
810
811 void CreateBitmapWithSmallBitmaps(Bitmap *src_bitmap)
812 {
813   Bitmap *tmp_bitmap, *tmp_bitmap_2, *tmp_bitmap_8;
814   int src_width, src_height;
815   int tmp_width, tmp_height;
816
817   src_width  = src_bitmap->width;
818   src_height = src_bitmap->height;
819
820   tmp_width  = src_width;
821   tmp_height = src_height + src_height / 2;
822
823   tmp_bitmap = CreateBitmap(tmp_width, tmp_height, DEFAULT_DEPTH);
824
825   tmp_bitmap_2 = ZoomBitmap(src_bitmap, src_width / 2, src_height / 2);
826   tmp_bitmap_8 = ZoomBitmap(src_bitmap, src_width / 8, src_height / 8);
827
828   BlitBitmap(src_bitmap, tmp_bitmap, 0, 0, src_width, src_height, 0, 0);
829   BlitBitmap(tmp_bitmap_2, tmp_bitmap, 0, 0, src_width / 2, src_height / 2,
830              0, src_height);
831   BlitBitmap(tmp_bitmap_8, tmp_bitmap, 0, 0, src_width / 8, src_height / 8,
832              3 * src_width / 4, src_height);
833
834   FreeBitmap(tmp_bitmap_2);
835   FreeBitmap(tmp_bitmap_8);
836
837 #ifdef TARGET_SDL
838   src_bitmap->surface = tmp_bitmap->surface;
839   tmp_bitmap->surface = NULL;
840 #else
841   src_bitmap->drawable = tmp_bitmap->drawable;
842   tmp_bitmap->drawable = None;
843 #endif
844
845   src_bitmap->height = tmp_bitmap->height;
846
847   FreeBitmap(tmp_bitmap);
848 }
849
850
851 /* ========================================================================= */
852 /* audio functions                                                           */
853 /* ========================================================================= */
854
855 inline void OpenAudio(void)
856 {
857   /* always start with reliable default values */
858   audio.sound_available = FALSE;
859   audio.music_available = FALSE;
860   audio.loops_available = FALSE;
861
862   audio.sound_enabled = FALSE;
863   audio.sound_deactivated = FALSE;
864
865   audio.mixer_pipe[0] = audio.mixer_pipe[1] = 0;
866   audio.mixer_pid = 0;
867   audio.device_name = NULL;
868   audio.device_fd = -1;
869
870   audio.num_channels = 0;
871   audio.music_channel = 0;
872   audio.first_sound_channel = 0;
873
874 #if defined(TARGET_SDL)
875   SDLOpenAudio();
876 #elif defined(PLATFORM_UNIX)
877   UnixOpenAudio();
878 #elif defined(PLATFORM_MSDOS)
879   MSDOSOpenAudio();
880 #endif
881 }
882
883 inline void CloseAudio(void)
884 {
885 #if defined(TARGET_SDL)
886   SDLCloseAudio();
887 #elif defined(PLATFORM_UNIX)
888   UnixCloseAudio();
889 #elif defined(PLATFORM_MSDOS)
890   MSDOSCloseAudio();
891 #endif
892
893   audio.sound_enabled = FALSE;
894 }
895
896 inline void SetAudioMode(boolean enabled)
897 {
898   if (!audio.sound_available)
899     return;
900
901   audio.sound_enabled = enabled;
902 }
903
904
905 /* ========================================================================= */
906 /* event functions                                                           */
907 /* ========================================================================= */
908
909 inline void InitEventFilter(EventFilter filter_function)
910 {
911 #ifdef TARGET_SDL
912   /* set event filter to filter out certain events */
913   SDL_SetEventFilter(filter_function);
914 #endif
915 }
916
917 inline boolean PendingEvent(void)
918 {
919 #ifdef TARGET_SDL
920   return (SDL_PollEvent(NULL) ? TRUE : FALSE);
921 #else
922   return (XPending(display) ? TRUE : FALSE);
923 #endif
924 }
925
926 inline void NextEvent(Event *event)
927 {
928 #ifdef TARGET_SDL
929   SDLNextEvent(event);
930 #else
931   XNextEvent(display, event);
932 #endif
933 }
934
935 inline Key GetEventKey(KeyEvent *event, boolean with_modifiers)
936 {
937 #ifdef TARGET_SDL
938 #if 0
939   printf("unicode == '%d', sym == '%d', mod == '0x%04x'\n",
940          (int)event->keysym.unicode,
941          (int)event->keysym.sym,
942          (int)SDL_GetModState());
943 #endif
944
945   if (with_modifiers &&
946       event->keysym.unicode > 0x0000 &&
947       event->keysym.unicode < 0x2000)
948     return event->keysym.unicode;
949   else
950     return event->keysym.sym;
951 #else
952 #if 0
953   printf("with modifiers == '0x%04x', without modifiers == '0x%04x'\n",
954          (int)XLookupKeysym(event, event->state),
955          (int)XLookupKeysym(event, 0));
956 #endif
957
958   if (with_modifiers)
959     return XLookupKeysym(event, event->state);
960   else
961     return XLookupKeysym(event, 0);
962 #endif
963 }
964
965 inline boolean CheckCloseWindowEvent(ClientMessageEvent *event)
966 {
967   if (event->type != EVENT_CLIENTMESSAGE)
968     return FALSE;
969
970 #if defined(TARGET_SDL)
971   return TRUE;          /* the only possible message here is SDL_QUIT */
972 #elif defined(PLATFORM_UNIX)
973   if ((event->window == window->drawable) &&
974       (event->data.l[0] == XInternAtom(display, "WM_DELETE_WINDOW", FALSE)))
975     return TRUE;
976 #endif
977
978   return FALSE;
979 }
980
981
982 /* ========================================================================= */
983 /* joystick functions                                                        */
984 /* ========================================================================= */
985
986 inline void InitJoysticks()
987 {
988   int i;
989
990 #ifdef NO_JOYSTICK
991   return;       /* joysticks generally deactivated by compile-time directive */
992 #endif
993
994   /* always start with reliable default values */
995   joystick.status = JOYSTICK_NOT_AVAILABLE;
996   for (i=0; i<MAX_PLAYERS; i++)
997     joystick.fd[i] = -1;                /* joystick device closed */
998
999 #if defined(TARGET_SDL)
1000   SDLInitJoysticks();
1001 #elif defined(PLATFORM_UNIX)
1002   UnixInitJoysticks();
1003 #elif defined(PLATFORM_MSDOS)
1004   MSDOSInitJoysticks();
1005 #endif
1006 }
1007
1008 inline boolean ReadJoystick(int nr, int *x, int *y, boolean *b1, boolean *b2)
1009 {
1010 #if defined(TARGET_SDL)
1011   return SDLReadJoystick(nr, x, y, b1, b2);
1012 #elif defined(PLATFORM_UNIX)
1013   return UnixReadJoystick(nr, x, y, b1, b2);
1014 #elif defined(PLATFORM_MSDOS)
1015   return MSDOSReadJoystick(nr, x, y, b1, b2);
1016 #endif
1017 }