/***********************************************************
* Artsoft Retro-Game Library *
*----------------------------------------------------------*
-* (c) 1994-2000 Artsoft Entertainment *
+* (c) 1994-2002 Artsoft Entertainment *
* Holger Schemel *
* Detmolder Strasse 189 *
* 33604 Bielefeld *
#include "system.h"
#include "sound.h"
+#include "setup.h"
+#include "joystick.h"
#include "misc.h"
struct VideoSystemInfo video;
struct AudioSystemInfo audio;
struct GfxInfo gfx;
+struct FontInfo font;
+struct AnimInfo anim;
+struct ArtworkInfo artwork;
+struct JoystickInfo joystick;
+struct SetupInfo setup;
-struct LevelDirInfo *leveldir_first = NULL;
-struct LevelDirInfo *leveldir_current = NULL;
+LevelDirTree *leveldir_first = NULL;
+LevelDirTree *leveldir_current = NULL;
+int level_nr;
-Display *display = NULL;
-Visual *visual = NULL;
-int screen = 0;
-Colormap cmap = None;
+Display *display = NULL;
+Visual *visual = NULL;
+int screen = 0;
+Colormap cmap = None;
-DrawWindow *window = NULL;
-DrawBuffer *backbuffer = NULL;
-DrawBuffer *drawto = NULL;
+DrawWindow *window = NULL;
+DrawBuffer *backbuffer = NULL;
+DrawBuffer *drawto = NULL;
-int button_status = MB_NOT_PRESSED;
-boolean motion_status = FALSE;
+int button_status = MB_NOT_PRESSED;
+boolean motion_status = FALSE;
-int redraw_mask = REDRAW_NONE;
-int redraw_tiles = 0;
+int redraw_mask = REDRAW_NONE;
+int redraw_tiles = 0;
-int FrameCounter = 0;
+int FrameCounter = 0;
/* ========================================================================= */
#endif
#if !defined(PLATFORM_UNIX)
+ program.userdata_directory = "userdata";
+#endif
+
+#if defined(PLATFORM_MSDOS)
initErrorFile();
#endif
+
+#if defined(TARGET_SDL)
+ if (SDL_Init(SDL_INIT_EVENTTHREAD | SDL_INIT_NOPARACHUTE) < 0)
+ Error(ERR_EXIT, "SDL_Init() failed: %s", SDL_GetError());
+#endif
}
void ClosePlatformDependantStuff(void)
{
-#if !defined(PLATFORM_UNIX)
+#if defined(PLATFORM_MSDOS)
dumpErrorFile();
#endif
}
void InitProgramInfo(char *unix_userdata_directory, char *program_title,
char *window_title, char *icon_title,
- char *x11_icon_basename, char *x11_iconmask_basename,
- char *msdos_pointer_basename)
+ char *x11_icon_filename, char *x11_iconmask_filename,
+ char *msdos_pointer_filename,
+ char *cookie_prefix, char *filename_prefix,
+ int program_version)
{
- char *gfx_dir = getPath2(options.ro_base_directory, GRAPHICS_DIRECTORY);
- char *x11_icon_filename = getPath2(gfx_dir, x11_icon_basename);
- char *x11_iconmask_filename = getPath2(gfx_dir, x11_iconmask_basename);
- char *msdos_pointer_filename = getPath2(gfx_dir, msdos_pointer_basename);
-
- free(gfx_dir);
-
#if defined(PLATFORM_UNIX)
program.userdata_directory = unix_userdata_directory;
#else
program.x11_icon_filename = x11_icon_filename;
program.x11_iconmask_filename = x11_iconmask_filename;
program.msdos_pointer_filename = msdos_pointer_filename;
+
+ program.cookie_prefix = cookie_prefix;
+ program.filename_prefix = filename_prefix;
+
+ program.version_major = VERSION_MAJOR(program_version);
+ program.version_minor = VERSION_MINOR(program_version);
+ program.version_patch = VERSION_PATCH(program_version);
}
void InitGfxFieldInfo(int sx, int sy, int sxsize, int sysize,
gfx.real_sy = real_sy;
gfx.full_sxsize = full_sxsize;
gfx.full_sysize = full_sysize;
+
+ gfx.background_bitmap = NULL;
+ gfx.background_bitmap_mask = REDRAW_NONE;
+
+ SetDrawDeactivationMask(REDRAW_NONE); /* do not deactivate drawing */
+ SetDrawBackgroundMask(REDRAW_NONE); /* deactivate masked drawing */
}
void InitGfxDoor1Info(int dx, int dy, int dxsize, int dysize)
gfx.scrollbuffer_height = scrollbuffer_height;
}
+void SetDrawDeactivationMask(int draw_deactivation_mask)
+{
+ gfx.draw_deactivation_mask = draw_deactivation_mask;
+}
+
+void SetDrawBackgroundMask(int draw_background_mask)
+{
+ gfx.draw_background_mask = draw_background_mask;
+}
+
+static void DrawBitmapFromTile(Bitmap *bitmap, Bitmap *tile,
+ int dest_x, int dest_y, int width, int height)
+{
+ int bitmap_xsize = width;
+ int bitmap_ysize = height;
+ int tile_xsize = tile->width;
+ int tile_ysize = tile->height;
+ int tile_xsteps = (bitmap_xsize + tile_xsize - 1) / tile_xsize;
+ int tile_ysteps = (bitmap_ysize + tile_ysize - 1) / tile_ysize;
+ int x, y;
+
+ for (y=0; y < tile_ysteps; y++)
+ {
+ for (x=0; x < tile_xsteps; x++)
+ {
+ int draw_x = dest_x + x * tile_xsize;
+ int draw_y = dest_y + y * tile_ysize;
+ int draw_xsize = MIN(tile_xsize, bitmap_xsize - x * tile_xsize);
+ int draw_ysize = MIN(tile_ysize, bitmap_ysize - y * tile_ysize);
+
+ BlitBitmap(tile, bitmap, 0, 0, draw_xsize, draw_ysize, draw_x, draw_y);
+ }
+ }
+}
+
+void SetBackgroundBitmap(Bitmap *background_bitmap_tile, int mask)
+{
+ static Bitmap *main_bitmap_tile = NULL;
+ static Bitmap *door_bitmap_tile = NULL;
+
+ if (mask == REDRAW_FIELD)
+ {
+ if (background_bitmap_tile == main_bitmap_tile)
+ return; /* main background tile has not changed */
+
+ main_bitmap_tile = background_bitmap_tile;
+ }
+ else if (mask == REDRAW_DOOR_1)
+ {
+ if (background_bitmap_tile == door_bitmap_tile)
+ return; /* main background tile has not changed */
+
+ door_bitmap_tile = background_bitmap_tile;
+ }
+ else /* should not happen */
+ return;
+
+ if (background_bitmap_tile)
+ gfx.background_bitmap_mask |= mask;
+ else
+ gfx.background_bitmap_mask &= ~mask;
+
+ if (gfx.background_bitmap == NULL)
+ gfx.background_bitmap = CreateBitmap(video.width, video.height,
+ DEFAULT_DEPTH);
+
+ if (background_bitmap_tile == NULL) /* empty background requested */
+ return;
+
+ if (mask == REDRAW_FIELD)
+ DrawBitmapFromTile(gfx.background_bitmap, background_bitmap_tile,
+ gfx.real_sx, gfx.real_sy,
+ gfx.full_sxsize, gfx.full_sysize);
+ else
+ DrawBitmapFromTile(gfx.background_bitmap, background_bitmap_tile,
+ gfx.dx, gfx.dy,
+ gfx.dxsize, gfx.dysize);
+}
+
+void SetMainBackgroundBitmap(Bitmap *background_bitmap_tile)
+{
+ SetBackgroundBitmap(background_bitmap_tile, REDRAW_FIELD);
+}
+
+void SetDoorBackgroundBitmap(Bitmap *background_bitmap_tile)
+{
+ SetBackgroundBitmap(background_bitmap_tile, REDRAW_DOOR_1);
+}
+
/* ========================================================================= */
/* video functions */
inline void InitVideoDisplay(void)
{
-#ifdef TARGET_SDL
+#if defined(TARGET_SDL)
SDLInitVideoDisplay();
#else
X11InitVideoDisplay();
inline void CloseVideoDisplay(void)
{
-#if defined(TARGET_X11)
+ KeyboardAutoRepeatOn();
+
+#if defined(TARGET_SDL)
+ SDL_QuitSubSystem(SDL_INIT_VIDEO);
+#else
+
if (display)
XCloseDisplay(display);
#endif
new_bitmap->line_gc[1] = window->line_gc[1];
#endif
+ new_bitmap->width = width;
+ new_bitmap->height = height;
+
return new_bitmap;
}
-inline void FreeBitmap(Bitmap *bitmap)
+inline static void FreeBitmapPointers(Bitmap *bitmap)
{
if (bitmap == NULL)
return;
SDL_FreeSurface(bitmap->surface);
if (bitmap->surface_masked)
SDL_FreeSurface(bitmap->surface_masked);
+ bitmap->surface = NULL;
+ bitmap->surface_masked = NULL;
#else
+ /* The X11 version seems to have a memory leak here -- although
+ "XFreePixmap()" is called, the correspondig memory seems not
+ to be freed (according to "ps"). The SDL version apparently
+ does not have this problem. */
+
if (bitmap->drawable)
XFreePixmap(display, bitmap->drawable);
if (bitmap->clip_mask)
XFreePixmap(display, bitmap->clip_mask);
if (bitmap->stored_clip_gc)
XFreeGC(display, bitmap->stored_clip_gc);
+ /* the other GCs are only pointers to GCs used elsewhere */
+ bitmap->drawable = None;
+ bitmap->clip_mask = None;
+ bitmap->stored_clip_gc = None;
#endif
+ if (bitmap->source_filename)
+ free(bitmap->source_filename);
+ bitmap->source_filename = NULL;
+}
+
+inline static void TransferBitmapPointers(Bitmap *src_bitmap,
+ Bitmap *dst_bitmap)
+{
+ if (src_bitmap == NULL || dst_bitmap == NULL)
+ return;
+
+ FreeBitmapPointers(dst_bitmap);
+
+ *dst_bitmap = *src_bitmap;
+}
+
+inline void FreeBitmap(Bitmap *bitmap)
+{
+ if (bitmap == NULL)
+ return;
+
+ FreeBitmapPointers(bitmap);
+
free(bitmap);
}
#endif
}
+static inline boolean CheckDrawingArea(int x, int y, int width, int height,
+ int draw_mask)
+{
+ if (draw_mask == REDRAW_NONE)
+ return FALSE;
+
+ if (draw_mask & REDRAW_ALL)
+ return TRUE;
+
+ if ((draw_mask & REDRAW_FIELD) && x < gfx.real_sx + gfx.full_sxsize)
+ return TRUE;
+
+ if ((draw_mask & REDRAW_DOOR_1) && x >= gfx.dx && y < gfx.dy + gfx.dysize)
+ return TRUE;
+
+ if ((draw_mask & REDRAW_DOOR_2) && x >= gfx.dx && y >= gfx.vy)
+ return TRUE;
+
+ return FALSE;
+}
+
+inline boolean DrawingDeactivated(int x, int y, int width, int height)
+{
+ return CheckDrawingArea(x, y, width, height, gfx.draw_deactivation_mask);
+}
+
+inline boolean DrawingOnBackground(int x, int y)
+{
+ return ((gfx.draw_background_mask & gfx.background_bitmap_mask) &&
+ CheckDrawingArea(x, y, 1, 1, gfx.draw_background_mask));
+}
+
inline void BlitBitmap(Bitmap *src_bitmap, Bitmap *dst_bitmap,
int src_x, int src_y,
int width, int height,
int dst_x, int dst_y)
{
+ if (DrawingDeactivated(dst_x, dst_y, width, height))
+ return;
+
#ifdef TARGET_SDL
SDLCopyArea(src_bitmap, dst_bitmap,
src_x, src_y, width, height, dst_x, dst_y, SDLCOPYAREA_OPAQUE);
inline void ClearRectangle(Bitmap *bitmap, int x, int y, int width, int height)
{
+ if (DrawingDeactivated(x, y, width, height))
+ return;
+
#ifdef TARGET_SDL
SDLFillRectangle(bitmap, x, y, width, height, 0x000000);
#else
#endif
}
+inline void ClearRectangleOnBackground(Bitmap *bitmap, int x, int y,
+ int width, int height)
+{
+ if (DrawingOnBackground(x, y))
+ BlitBitmap(gfx.background_bitmap, bitmap, x, y, width, height, x, y);
+ else
+ ClearRectangle(bitmap, x, y, width, height);
+}
+
#if 0
#ifndef TARGET_SDL
static GC last_clip_gc = 0; /* needed for XCopyArea() through clip mask */
int width, int height,
int dst_x, int dst_y)
{
+ if (DrawingDeactivated(dst_x, dst_y, width, height))
+ return;
+
#ifdef TARGET_SDL
SDLCopyArea(src_bitmap, dst_bitmap,
src_x, src_y, width, height, dst_x, dst_y, SDLCOPYAREA_MASKED);
#endif
}
+inline void BlitBitmapOnBackground(Bitmap *src_bitmap, Bitmap *dst_bitmap,
+ int src_x, int src_y,
+ int width, int height,
+ int dst_x, int dst_y)
+{
+ if (DrawingOnBackground(src_x, src_y))
+ {
+ /* draw background */
+ BlitBitmap(gfx.background_bitmap, dst_bitmap, dst_x, dst_y, width, height,
+ dst_x, dst_y);
+
+ /* draw foreground */
+ SetClipOrigin(src_bitmap, src_bitmap->stored_clip_gc,
+ dst_x - src_x, dst_y - src_y);
+ BlitBitmapMasked(src_bitmap, dst_bitmap, src_x, src_y, width, height,
+ dst_x, dst_y);
+ }
+ else
+ BlitBitmap(src_bitmap, dst_bitmap, src_x, src_y, width, height,
+ dst_x, dst_y);
+}
+
inline void DrawSimpleWhiteLine(Bitmap *bitmap, int from_x, int from_y,
int to_x, int to_y)
{
#ifdef TARGET_SDL
- SDLDrawSimpleLine(bitmap->surface, from_x, from_y, to_x, to_y, 0xffffff);
+ SDLDrawSimpleLine(bitmap, from_x, from_y, to_x, to_y, 0xffffff);
#else
XSetForeground(display, bitmap->gc, WhitePixel(display, screen));
XDrawLine(display, bitmap->drawable, bitmap->gc, from_x, from_y, to_x, to_y);
continue;
#if defined(TARGET_SDL)
- sge_Line(bitmap->surface,
- from_x + dx, from_y + dy, to_x + dx, to_y + dy, pixel);
+ SDLDrawLine(bitmap,
+ from_x + dx, from_y + dy, to_x + dx, to_y + dy, pixel);
#elif defined(TARGET_ALLEGRO)
AllegroDrawLine(bitmap->drawable, from_x + dx, from_y + dy,
to_x + dx, to_y + dy, pixel);
#endif
}
+inline Pixel GetPixel(Bitmap *bitmap, int x, int y)
+{
+#if defined(TARGET_SDL)
+ return SDLGetPixel(bitmap, x, y);
+#elif defined(TARGET_ALLEGRO)
+ return AllegroGetPixel(bitmap->drawable, x, y);
+#else
+ unsigned long pixel_value;
+ XImage *pixel_image;
+
+ pixel_image = XGetImage(display, bitmap->drawable, x, y, 1, 1,
+ AllPlanes, ZPixmap);
+ pixel_value = XGetPixel(pixel_image, 0, 0);
+
+ XDestroyImage(pixel_image);
+
+ return pixel_value;
+#endif
+}
+
inline Pixel GetPixelFromRGB(Bitmap *bitmap, unsigned int color_r,
unsigned int color_g, unsigned int color_b)
{
#if defined(TARGET_SDL)
pixel = SDL_MapRGB(bitmap->surface->format, color_r, color_g, color_b);
+#elif defined(TARGET_ALLEGRO)
+ pixel = AllegroAllocColorCell(color_r << 8, color_g << 8, color_b << 8);
#elif defined(TARGET_X11_NATIVE)
XColor xcolor;
return fullscreen;
}
-Bitmap *LoadImage(char *basename)
+Bitmap *LoadImage(char *filename)
{
Bitmap *new_bitmap;
- char filename[256];
-
- sprintf(filename, "%s/%s/%s",
- options.ro_base_directory, GRAPHICS_DIRECTORY, basename);
#if defined(TARGET_SDL)
new_bitmap = SDLLoadImage(filename);
new_bitmap = X11LoadImage(filename);
#endif
+ if (new_bitmap)
+ new_bitmap->source_filename = getStringCopy(filename);
+
return new_bitmap;
}
+Bitmap *LoadCustomImage(char *basename)
+{
+ char *filename = getCustomImageFilename(basename);
+ Bitmap *new_bitmap;
-/* ========================================================================= */
-/* audio functions */
-/* ========================================================================= */
+ if (filename == NULL)
+ Error(ERR_EXIT, "LoadCustomImage(): cannot find file '%s'", basename);
+
+ if ((new_bitmap = LoadImage(filename)) == NULL)
+ Error(ERR_EXIT, "LoadImage() failed: %s", GetError());
+
+ return new_bitmap;
+}
-inline boolean OpenAudio(struct AudioSystemInfo *audio)
+void ReloadCustomImage(Bitmap *bitmap, char *basename)
{
- audio->sound_available = FALSE;
- audio->loops_available = FALSE;
- audio->sound_enabled = FALSE;
- audio->soundserver_pipe[0] = audio->soundserver_pipe[1] = 0;
- audio->soundserver_pid = 0;
- audio->device_name = NULL;
- audio->device_fd = 0;
+ char *filename = getCustomImageFilename(basename);
+ Bitmap *new_bitmap;
-#if defined(TARGET_SDL)
- if (SDLOpenAudio())
+ if (filename == NULL) /* (should never happen) */
{
- audio->sound_available = TRUE;
- audio->loops_available = TRUE;
- audio->sound_enabled = TRUE;
+ Error(ERR_WARN, "ReloadCustomImage(): cannot find file '%s'", basename);
+ return;
}
-#elif defined(PLATFORM_MSDOS)
- if (MSDOSOpenAudio())
+
+ if (strcmp(filename, bitmap->source_filename) == 0)
+ {
+ /* The old and new image are the same (have the same filename and path).
+ This usually means that this image does not exist in this graphic set
+ and a fallback to the existing image is done. */
+
+ return;
+ }
+
+ if ((new_bitmap = LoadImage(filename)) == NULL)
+ {
+ Error(ERR_WARN, "LoadImage() failed: %s", GetError());
+ return;
+ }
+
+ if (bitmap->width != new_bitmap->width ||
+ bitmap->height != new_bitmap->height)
{
- audio->sound_available = TRUE;
- audio->loops_available = TRUE;
- audio->sound_enabled = TRUE;
+ Error(ERR_WARN, "ReloadCustomImage: new image '%s' has wrong dimensions",
+ filename);
+ FreeBitmap(new_bitmap);
+ return;
}
+
+ TransferBitmapPointers(new_bitmap, bitmap);
+ free(new_bitmap);
+}
+
+
+/* ========================================================================= */
+/* audio functions */
+/* ========================================================================= */
+
+inline void OpenAudio(void)
+{
+ /* always start with reliable default values */
+ audio.sound_available = FALSE;
+ audio.music_available = FALSE;
+ audio.loops_available = FALSE;
+
+ audio.sound_enabled = FALSE;
+ audio.sound_deactivated = FALSE;
+
+ audio.mixer_pipe[0] = audio.mixer_pipe[1] = 0;
+ audio.mixer_pid = -1;
+ audio.device_name = NULL;
+ audio.device_fd = -1;
+
+ audio.num_channels = 0;
+ audio.music_channel = 0;
+ audio.first_sound_channel = 0;
+
+#if defined(TARGET_SDL)
+ SDLOpenAudio();
#elif defined(PLATFORM_UNIX)
- UnixOpenAudio(audio);
+ UnixOpenAudio();
+#elif defined(PLATFORM_MSDOS)
+ MSDOSOpenAudio();
#endif
-
- return audio->sound_available;
}
-inline void CloseAudio(struct AudioSystemInfo *audio)
+inline void CloseAudio(void)
{
#if defined(TARGET_SDL)
SDLCloseAudio();
+#elif defined(PLATFORM_UNIX)
+ UnixCloseAudio();
#elif defined(PLATFORM_MSDOS)
MSDOSCloseAudio();
-#elif defined(PLATFORM_UNIX)
- UnixCloseAudio(audio);
#endif
- audio->sound_available = FALSE;
- audio->loops_available = FALSE;
- audio->sound_enabled = FALSE;
+ audio.sound_enabled = FALSE;
}
inline void SetAudioMode(boolean enabled)
inline void NextEvent(Event *event)
{
#ifdef TARGET_SDL
- SDL_WaitEvent(event);
+ SDLNextEvent(event);
#else
XNextEvent(display, event);
#endif
(int)SDL_GetModState());
#endif
- if (with_modifiers && event->keysym.unicode != 0)
+ if (with_modifiers &&
+ event->keysym.unicode > 0x0000 &&
+ event->keysym.unicode < 0x2000)
return event->keysym.unicode;
else
return event->keysym.sym;
}
-inline void dummy(void)
+/* ========================================================================= */
+/* joystick functions */
+/* ========================================================================= */
+
+inline void InitJoysticks()
{
-#ifdef TARGET_SDL
-#else
+ int i;
+
+#ifdef NO_JOYSTICK
+ return; /* joysticks generally deactivated by compile-time directive */
+#endif
+
+ /* always start with reliable default values */
+ joystick.status = JOYSTICK_NOT_AVAILABLE;
+ for (i=0; i<MAX_PLAYERS; i++)
+ joystick.fd[i] = -1; /* joystick device closed */
+
+#if defined(TARGET_SDL)
+ SDLInitJoysticks();
+#elif defined(PLATFORM_UNIX)
+ UnixInitJoysticks();
+#elif defined(PLATFORM_MSDOS)
+ MSDOSInitJoysticks();
+#endif
+}
+
+inline boolean ReadJoystick(int nr, int *x, int *y, boolean *b1, boolean *b2)
+{
+#if defined(TARGET_SDL)
+ return SDLReadJoystick(nr, x, y, b1, b2);
+#elif defined(PLATFORM_UNIX)
+ return UnixReadJoystick(nr, x, y, b1, b2);
+#elif defined(PLATFORM_MSDOS)
+ return MSDOSReadJoystick(nr, x, y, b1, b2);
#endif
}