/* -*- mode: c; tab-width: 4; c-basic-offset: 3; c-file-style: "linux" -*- */
//
// Copyright (c) 2009, Wei Mingzhi <whistler_wmz@users.sf.net>.
// All rights reserved.
//
// This file is part of SDLPAL.
//
// SDLPAL is free software: you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation, either version 3 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program. If not, see <http://www.gnu.org/licenses/>.
//
// Modified by Lou Yihua <louyihua@21cn.com> with Unicode support, 2015
//
#include "main.h"
#if defined(LONGJMP_EXIT)
#include <setjmp.h>
static jmp_buf g_exit_jmp_buf;
#endif
#define BITMAPNUM_SPLASH_UP (gConfig.fIsWIN95 ? 0x03 : 0x26)
#define BITMAPNUM_SPLASH_DOWN (gConfig.fIsWIN95 ? 0x04 : 0x27)
#define SPRITENUM_SPLASH_TITLE 0x47
#define SPRITENUM_SPLASH_CRANE 0x49
#define NUM_RIX_TITLE 0x05
static VOID
PAL_Init(
VOID
)
/*++
Purpose:
Initialize everything needed by the game.
Parameters:
None.
Return value:
None.
--*/
{
int e;
//
// Initialize defaults, video and audio
//
if (SDL_Init(PAL_SDL_INIT_FLAGS) == -1)
{
#if defined (_WIN32) && SDL_MAJOR_VERSION == 1 && SDL_MINOR_VERSION <= 2
//
// Try the WINDIB driver if DirectX failed.
//
putenv("SDL_VIDEODRIVER=windib");
if (SDL_Init(SDL_INIT_VIDEO | SDL_INIT_AUDIO | SDL_INIT_NOPARACHUTE | SDL_INIT_JOYSTICK) == -1)
{
TerminateOnError("Could not initialize SDL: %s.\n", SDL_GetError());
}
#else
TerminateOnError("Could not initialize SDL: %s.\n", SDL_GetError());
#endif
}
//
// Initialize subsystems.
//
e = PAL_InitGlobals();
if (e != 0)
{
TerminateOnError("Could not initialize global data: %d.\n", e);
}
e = VIDEO_Startup();
if (e != 0)
{
TerminateOnError("Could not initialize Video: %d.\n", e);
}
SDL_WM_SetCaption("Loading...", NULL);
if (!gConfig.fIsWIN95 && gConfig.fUseEmbeddedFonts)
{
e = PAL_InitEmbeddedFont();
if (e != 0)
{
TerminateOnError("Could not load fonts: %d.\n", e);
}
}
if (gConfig.pszBdfFile != NULL)
{
e = PAL_LoadBdfFont(gConfig.pszBdfFile);
if (e != 0)
{
TerminateOnError("Could not load BDF fonts: %d.\n", e);
}
}
e = PAL_InitUI();
if (e != 0)
{
TerminateOnError("Could not initialize UI subsystem: %d.\n", e);
}
e = PAL_InitText();
if (e != 0)
{
TerminateOnError("Could not initialize text subsystem: %d.\n", e);
}
PAL_InitInput();
PAL_InitResources();
AUDIO_OpenDevice();
if (gConfig.fIsWIN95)
{
#ifdef _DEBUG
SDL_WM_SetCaption("Pal WIN95 (Debug Build)", NULL);
#else
SDL_WM_SetCaption("Pal WIN95", NULL);
#endif
}
else
{
#ifdef _DEBUG
SDL_WM_SetCaption("Pal (Debug Build)", NULL);
#else
SDL_WM_SetCaption("Pal", NULL);
#endif
}
}
VOID
PAL_Shutdown(
int exit_code
)
/*++
Purpose:
Free everything needed by the game.
Parameters:
exit_code - The exit code return to OS.
Return value:
None.
--*/
{
AUDIO_CloseDevice();
PAL_FreeFont();
PAL_FreeResources();
PAL_FreeGlobals();
PAL_FreeUI();
PAL_FreeText();
PAL_ShutdownInput();
VIDEO_Shutdown();
UTIL_CloseLog();
SDL_Quit();
UTIL_Platform_Quit();
#if defined(LONGJMP_EXIT)
longjmp(g_exit_jmp_buf, exit_code);
#elif defined (NDS)
while (1);
#else
exit(exit_code);
#endif
}
VOID
PAL_TrademarkScreen(
VOID
)
/*++
Purpose:
Show the trademark screen.
Parameters:
None.
Return value:
None.
--*/
{
PAL_SetPalette(3, FALSE);
PAL_RNGPlay(6, 0, 1000, 25);
UTIL_Delay(1000);
PAL_FadeOut(1);
}
VOID
PAL_SplashScreen(
VOID
)
/*++
Purpose:
Show the splash screen.
Parameters:
None.
Return value:
None.
--*/
{
SDL_Color *palette = PAL_GetPalette(1, FALSE);
SDL_Color rgCurrentPalette[256];
SDL_Surface *lpBitmapDown, *lpBitmapUp;
SDL_Rect srcrect, dstrect;
LPSPRITE lpSpriteCrane;
LPBITMAPRLE lpBitmapTitle;
LPBYTE buf, buf2;
int cranepos[9][3], i, iImgPos = 200, iCraneFrame = 0, iTitleHeight;
DWORD dwTime, dwBeginTime;
BOOL fUseCD = TRUE;
if (palette == NULL)
{
fprintf(stderr, "ERROR: PAL_SplashScreen(): palette == NULL\n");
return;
}
//
// Allocate all the needed memory at once for simplification
//
buf = (LPBYTE)UTIL_calloc(1, 320 * 200 * 2);
buf2 = (LPBYTE)(buf + 320 * 200);
lpSpriteCrane = (LPSPRITE)buf2 + 32000;
//
// Create the surfaces
//
lpBitmapDown = SDL_CreateRGBSurface(gpScreen->flags, 320, 200, 8,
gpScreen->format->Rmask, gpScreen->format->Gmask, gpScreen->format->Bmask,
gpScreen->format->Amask);
lpBitmapUp = SDL_CreateRGBSurface(gpScreen->flags, 320, 200, 8,
gpScreen->format->Rmask, gpScreen->format->Gmask, gpScreen->format->Bmask,
gpScreen->format->Amask);
#if SDL_VERSION_ATLEAST(2, 0, 0)
SDL_SetSurfacePalette(lpBitmapDown, gpScreen->format->palette);
SDL_SetSurfacePalette(lpBitmapUp, gpScreen->format->palette);
#else
SDL_SetPalette(lpBitmapDown, SDL_LOGPAL | SDL_PHYSPAL, VIDEO_GetPalette(), 0, 256);
SDL_SetPalette(lpBitmapUp, SDL_LOGPAL | SDL_PHYSPAL, VIDEO_GetPalette(), 0, 256);
#endif
//
// Read the bitmaps
//
PAL_MKFReadChunk(buf, 320 * 200, BITMAPNUM_SPLASH_UP, gpGlobals->f.fpFBP);
Decompress(buf, buf2, 320 * 200);
PAL_FBPBlitToSurface(buf2, lpBitmapUp);
PAL_MKFReadChunk(buf, 320 * 200, BITMAPNUM_SPLASH_DOWN, gpGlobals->f.fpFBP);
Decompress(buf, buf2, 320 * 200);
PAL_FBPBlitToSurface(buf2, lpBitmapDown);
PAL_MKFReadChunk(buf, 32000, SPRITENUM_SPLASH_TITLE, gpGlobals->f.fpMGO);
Decompress(buf, buf2, 32000);
lpBitmapTitle = (LPBITMAPRLE)PAL_SpriteGetFrame(buf2, 0);
PAL_MKFReadChunk(buf, 32000, SPRITENUM_SPLASH_CRANE, gpGlobals->f.fpMGO);
Decompress(buf, lpSpriteCrane, 32000);
iTitleHeight = PAL_RLEGetHeight(lpBitmapTitle);
lpBitmapTitle[2] = 0;
lpBitmapTitle[3] = 0; // HACKHACK
//
// Generate the positions of the cranes
//
for (i = 0; i < 9; i++)
{
cranepos[i][0] = RandomLong(300, 600);
cranepos[i][1] = RandomLong(0, 80);
cranepos[i][2] = RandomLong(0, 8);
}
//
// Play the title music
//
if (!AUDIO_PlayCDTrack(7))
{
fUseCD = FALSE;
AUDIO_PlayMusic(NUM_RIX_TITLE, TRUE, 2);
}
//
// Clear all of the events and key states
//
PAL_ProcessEvent();
PAL_ClearKeyState();
dwBeginTime = SDL_GetTicks();
srcrect.x = 0;
srcrect.w = 320;
dstrect.x = 0;
dstrect.w = 320;
while (TRUE)
{
PAL_ProcessEvent();
dwTime = SDL_GetTicks() - dwBeginTime;
//
// Set the palette
//
if (dwTime < 15000)
{
for (i = 0; i < 256; i++)
{
rgCurrentPalette[i].r = (BYTE)(palette[i].r * ((float)dwTime / 15000));
rgCurrentPalette[i].g = (BYTE)(palette[i].g * ((float)dwTime / 15000));
rgCurrentPalette[i].b = (BYTE)(palette[i].b * ((float)dwTime / 15000));
}
}
VIDEO_SetPalette(rgCurrentPalette);
#if SDL_VERSION_ATLEAST(2, 0, 0)
SDL_SetSurfacePalette(lpBitmapDown, gpScreen->format->palette);
SDL_SetSurfacePalette(lpBitmapUp, gpScreen->format->palette);
#else
SDL_SetPalette(lpBitmapDown, SDL_LOGPAL | SDL_PHYSPAL, VIDEO_GetPalette(), 0, 256);
SDL_SetPalette(lpBitmapUp, SDL_LOGPAL | SDL_PHYSPAL, VIDEO_GetPalette(), 0, 256);
#endif
//
// Draw the screen
//
if (iImgPos > 1)
{
iImgPos--;
}
//
// The upper part...
//
srcrect.y = iImgPos;
srcrect.h = 200 - iImgPos;
dstrect.y = 0;
dstrect.h = srcrect.h;
SDL_BlitSurface(lpBitmapUp, &srcrect, gpScreen, &dstrect);
//
// The lower part...
//
srcrect.y = 0;
srcrect.h = iImgPos;
dstrect.y = 200 - iImgPos;
dstrect.h = srcrect.h;
SDL_BlitSurface(lpBitmapDown, &srcrect, gpScreen, &dstrect);
//
// Draw the cranes...
//
for (i = 0; i < 9; i++)
{
LPCBITMAPRLE lpFrame = PAL_SpriteGetFrame(lpSpriteCrane,
cranepos[i][2] = (cranepos[i][2] + (iCraneFrame & 1)) % 8);
cranepos[i][1] += ((iImgPos > 1) && (iImgPos & 1)) ? 1 : 0;
PAL_RLEBlitToSurface(lpFrame, gpScreen,
PAL_XY(cranepos[i][0], cranepos[i][1]));
cranepos[i][0]--;
}
iCraneFrame++;
//
// Draw the title...
//
if (PAL_RLEGetHeight(lpBitmapTitle) < iTitleHeight)
{
//
// HACKHACK
//
WORD w = lpBitmapTitle[2] | (lpBitmapTitle[3] << 8);
w++;
lpBitmapTitle[2] = (w & 0xFF);
lpBitmapTitle[3] = (w >> 8);
}
PAL_RLEBlitToSurface(lpBitmapTitle, gpScreen, PAL_XY(255, 10));
VIDEO_UpdateScreen(NULL);
//
// Check for keypress...
//
if (g_InputState.dwKeyPress & (kKeyMenu | kKeySearch))
{
//
// User has pressed a key...
//
lpBitmapTitle[2] = iTitleHeight & 0xFF;
lpBitmapTitle[3] = iTitleHeight >> 8; // HACKHACK
PAL_RLEBlitToSurface(lpBitmapTitle, gpScreen, PAL_XY(255, 10));
VIDEO_UpdateScreen(NULL);
if (dwTime < 15000)
{
//
// If the picture has not completed fading in, complete the rest
//
while (dwTime < 15000)
{
for (i = 0; i < 256; i++)
{
rgCurrentPalette[i].r = (BYTE)(palette[i].r * ((float)dwTime / 15000));
rgCurrentPalette[i].g = (BYTE)(palette[i].g * ((float)dwTime / 15000));
rgCurrentPalette[i].b = (BYTE)(palette[i].b * ((float)dwTime / 15000));
}
VIDEO_SetPalette(rgCurrentPalette);
#if SDL_VERSION_ATLEAST(2, 0, 0)
SDL_SetSurfacePalette(lpBitmapDown, gpScreen->format->palette);
SDL_SetSurfacePalette(lpBitmapUp, gpScreen->format->palette);
#else
SDL_SetPalette(lpBitmapDown, SDL_PHYSPAL | SDL_LOGPAL, VIDEO_GetPalette(), 0, 256);
SDL_SetPalette(lpBitmapUp, SDL_PHYSPAL | SDL_LOGPAL, VIDEO_GetPalette(), 0, 256);
#endif
UTIL_Delay(8);
dwTime += 250;
}
UTIL_Delay(500);
}
//
// Quit the splash screen
//
break;
}
//
// Delay a while...
//
PAL_ProcessEvent();
while (SDL_GetTicks() - dwBeginTime < dwTime + 85)
{
SDL_Delay(1);
PAL_ProcessEvent();
}
}
SDL_FreeSurface(lpBitmapDown);
SDL_FreeSurface(lpBitmapUp);
free(buf);
if (!fUseCD)
{
AUDIO_PlayMusic(0, FALSE, 1);
}
PAL_FadeOut(1);
}
int
main(
int argc,
char *argv[]
)
/*++
Purpose:
Program entry.
Parameters:
argc - Number of arguments.
argv - Array of arguments.
Return value:
Integer value.
--*/
{
#if defined(LONGJMP_EXIT)
int exit_code;
if (exit_code = setjmp(g_exit_jmp_buf))
return exit_code != 1 ? exit_code : 0;
#endif
#if defined(__APPLE__) && !defined(__IOS__) && !defined(DEBUG) //for ease of debugging(specify resource dir in xcode scheme)
char *p = strstr(argv[0], "/Pal.app/");
if (p != NULL)
{
char buf[4096];
strcpy(buf, argv[0]);
buf[p - argv[0]] = '\0';
chdir(buf);
}
#endif
UTIL_OpenLog();
#if !defined(UNIT_TEST) || defined(UNIT_TEST_GAME_INIT)
PAL_LoadConfig(TRUE);
//
// Platform-specific initialization
//
if (UTIL_Platform_Init(argc, argv) != 0)
return -1;
//
// Should launch setting
// However, it may arrive here through the activatation event on WinRT platform
// So close the current process so that the new process can go to setting
//
if (gConfig.fLaunchSetting)
return 0;
//
// Initialize everything
//
PAL_Init();
#endif
#if !defined(UNIT_TEST)
//
// Show the trademark screen and splash screen
//
PAL_TrademarkScreen();
PAL_SplashScreen();
//
// Run the main game routine
//
PAL_GameMain();
//
// Should not really reach here...
//
assert(FALSE);
return 255;
#else
extern int testmain(int argc, char *argv[]);
return testmain(argc, argv);
#endif
}