Int16 GotoAddress(Int16 index)
{
GoToParamsPtr theGotoPointer;
DmSearchStateType searchInfo;
UInt16 cardNo;
LocalID dbID;
UInt32 addrID = AddrGotoCreatorId[(int)gPrefsR.addrapp];
theGotoPointer = MemPtrNew(sizeof(GoToParamsType));
if (!theGotoPointer) return -1;
/* Set the owner of the pointer to be the
system. This is required because all memory
allocated by our application is freed when
the application quits. Our application will
quit the next time through our event
handler.
*/
if ((MemPtrSetOwner(theGotoPointer, 0) == 0) &&
(DmGetNextDatabaseByTypeCreator(true, &searchInfo, 0,
addrID, true, &cardNo, &dbID)
== 0)) {
// copy all the goto information into the
// GotoParamsPtr structure
theGotoPointer->searchStrLen = 0;
theGotoPointer->dbCardNo = cardNo;
theGotoPointer->dbID = dbID;
theGotoPointer->recordNum = index;
theGotoPointer->matchPos = 0;
theGotoPointer->matchFieldNum = 0;
theGotoPointer->matchCustom = 0;
if ((DmGetNextDatabaseByTypeCreator
(true, &searchInfo,
sysFileTApplication, addrID, true, &cardNo, &dbID) == 0)) {
SysUIAppSwitch(cardNo, dbID,
sysAppLaunchCmdGoTo,
(MemPtr) theGotoPointer);
/*
* return from address? (fatal?)
SysAppLaunch(cardNo, dbID, sysAppLaunchFlagNewThread,
sysAppLaunchCmdGoTo,
(MemPtr) theGotoPointer, &ret);
*/
return 0;
}
}
MemPtrFree(theGotoPointer);
return -1;
}
/* Jumps to newly created item using app specified in 'booger' structure */
static UInt16
Sneeze(KleenexPtr kleenexP)
{
UInt16 err;
LocalID dbID;
UInt16 cardNo;
// Free up parameters in 'kleenex' structure
if (kleenexP->note) MemPtrFree(kleenexP->note);
if (kleenexP->data) MemPtrFree(kleenexP->data);
if (kleenexP->text) MemPtrFree(kleenexP->text);
if (kleenexP->title) MemPtrFree(kleenexP->title);
if (kleenexP->category) MemPtrFree(kleenexP->category);
if (kleenexP->repeat) MemPtrFree(kleenexP->repeat);
// Jump to default app if not specified
if (!kleenexP->booger.dbID) {
if ((err = BlowNose(kleenexP)))
return (err);
}
if ((kleenexP->booger.cmd == sysAppLaunchCmdNormalLaunch) ||
(kleenexP->booger.cmd == boogerPlugLaunchCmdLaunchLauncher))
{
// Don't use the GoTo params
if (kleenexP->booger.cmdPBP) {
MemPtrFree(kleenexP->booger.cmdPBP);
kleenexP->booger.cmdPBP = NULL;
}
} else if (kleenexP->booger.cmd == sysAppLaunchCmdOpenDB) {
// Change GoTo params to OpenDB params
cardNo = ((GoToParamsType *)(kleenexP->booger.cmdPBP))->dbCardNo;
dbID = ((GoToParamsType *)(kleenexP->booger.cmdPBP))->dbID;
((SysAppLaunchCmdOpenDBType *)(kleenexP->booger.cmdPBP))->cardNo = cardNo;
((SysAppLaunchCmdOpenDBType *)(kleenexP->booger.cmdPBP))->dbID = dbID;
}
// Achoo!
if (SysUIAppSwitch(kleenexP->booger.cardNo, kleenexP->booger.dbID,
kleenexP->booger.cmd, kleenexP->booger.cmdPBP))
{
if (kleenexP->booger.cmdPBP)
MemPtrFree(kleenexP->booger.cmdPBP);
return (1);
}
return (errNone);
}
Boolean StartScummVM() {
Char **argvP;
UInt8 lightspeed, argc = 0;
UInt32 stackSize;
Boolean toLauncher, direct, isARM;
UInt8 engine;
Char num[6];
UInt16 index = GamGetSelected();
argvP = ArgsInit();
direct = false;
// start command line (exec name)
ArgsAdd(&argvP[argc], "-", NULL, &argc);
// no game selected
if (index == dmMaxRecordIndex) {
ListPtr listP;
UInt16 whichButton;
// init form
FormPtr frmP = FrmInitForm(EngineForm);
listP = (ListType *)FrmGetObjectPtr(frmP, FrmGetObjectIndex(frmP, EngineListList));
itemsText = (Char **)MemPtrNew(ENGINE_COUNT * sizeof(Char *));
for (int i = 0; i < ENGINE_COUNT; i++)
itemsText[i] = (Char *)engines[i].nameP;
LstSetListChoices (listP, itemsText, ENGINE_COUNT);
LstSetSelection(listP, 0);
whichButton = FrmDoDialog(frmP);
engine = LstGetSelection(listP);
FrmDeleteForm(frmP);
MemPtrFree(itemsText);
itemsText = NULL;
if (whichButton == EngineCancelButton) {
if (bDirectMode) {
// and force exit if nothing selected
EventType event;
event.eType = keyDownEvent;
event.data.keyDown.chr = vchrLaunch;
event.data.keyDown.modifiers = commandKeyMask;
EvtAddUniqueEventToQueue(&event, 0, true);
}
// free args
ArgsFree(argvP);
return false;
}
// default values
if (bDirectMode)
gPrefs->card.volRefNum = parseCards(); // always use the first removable card available (?)
gVars->filter = true;
gVars->palmVolume = 50;
gVars->fmQuality = FM_QUALITY_INI;
direct = true;
// somthing selected
} else {
Char pathP[256];
MemHandle recordH;
GameInfoType *gameInfoP;
recordH = DmQueryRecord(gameDB,index);
gameInfoP = (GameInfoType *)MemHandleLock(recordH);
engine = gameInfoP->engine;
// build path
StrCopy(pathP,"/Palm/Programs/ScummVM/Games/");
if (gameInfoP->pathP[0] == '/')
StrCopy(pathP, gameInfoP->pathP);
else if (!(gameInfoP->pathP[0] == '.' && StrLen(gameInfoP->pathP) == 1))
StrCat(pathP, gameInfoP->pathP);
// path
ArgsAdd(&argvP[argc], "-p", pathP, &argc);
// language
if (gameInfoP->language > 0) {
const Char *lang = "zh\0cz\0gb\0en\0fr\0de\0hb\0it\0jp\0kr\0pl\0pt\0ru\0es\0se\0";
ArgsAdd(&argvP[argc], "-q", (lang + (gameInfoP->language - 1) * 3), &argc);
}
// fullscreen ?
if (gameInfoP->fullscreen)
ArgsAdd(&argvP[argc], "-f", NULL, &argc);
// aspect-ratio ?
ArgsAdd(&argvP[argc], (gameInfoP->aspectRatio ? "--aspect-ratio" : "--no-aspect-ratio"), NULL, &argc);
// gfx mode
gVars->filter = gameInfoP->filter;
switch (gameInfoP->renderMode) {
case 1:
ArgsAdd(&argvP[argc], "--render-mode=", "amiga", &argc);
break;
case 2:
ArgsAdd(&argvP[argc], "--render-mode=", "cga", &argc);
break;
case 3:
ArgsAdd(&argvP[argc], "--render-mode=", "ega", &argc);
break;
case 4:
ArgsAdd(&argvP[argc], "--render-mode=", "hercAmber", &argc);
break;
case 5:
ArgsAdd(&argvP[argc], "--render-mode=", "hercGreen", &argc);
break;
}
switch (gameInfoP->gfxMode) {
case 1:
ArgsAdd(&argvP[argc], "-g", "wide", &argc);
break;
default:
ArgsAdd(&argvP[argc], "-g", "1x", &argc);
break;
}
// load state
if (gameInfoP->autoLoad) {
StrIToA(num, gameInfoP->loadSlot);
ArgsAdd(&argvP[argc], "-x", num, &argc);
}
// boot script parameter
if (gameInfoP->bootParam) {
StrIToA(num, gameInfoP->bootValue);
ArgsAdd(&argvP[argc], "-b", num, &argc);
}
// not a PC version
if (gameInfoP->setPlatform) {
static const char *platform[] = {
"3do",
"acorn",
"amiga",
"atari",
"c64",
"pc",
"fmtowns",
"linux",
"mac",
"nes",
"segacd",
"windows"
};
ArgsAdd(&argvP[argc], "--platform=", platform[gameInfoP->platform], &argc);
}
// subtitles
if (gameInfoP->subtitles)
ArgsAdd(&argvP[argc], "-n", NULL, &argc);
// multi midi ?
if (gameInfoP->musicInfo.sound.multiMidi)
ArgsAdd(&argvP[argc], "--multi-midi", NULL, &argc);
if (engine == ENGINE_SCUMM) {
// music tempo
StrIToA(num, gameInfoP->musicInfo.sound.tempo);
ArgsAdd(&argvP[argc], "--tempo=", num, &argc);
}
// talk speed
if (gameInfoP->talkSpeed) {
StrIToA(num, gameInfoP->talkValue);
ArgsAdd(&argvP[argc], "--talkspeed=", num, &argc);
}
// music driver
if (gameInfoP->musicInfo.sound.music) {
static char *drv[] = {
"auto",
"null",
"adlib",
"towns",
"pcjr",
"native",
"pcspk"
};
if (StrCompare(drv[gameInfoP->musicInfo.sound.drvMusic], "native") == 0) {
if (OPTIONS_TST(kOptDeviceZodiac))
ArgsAdd(&argvP[argc], "-e", "zodiac", &argc); // Tapwave Zodiac
else if (OPTIONS_TST(kOptSonyPa1LibAPI))
ArgsAdd(&argvP[argc], "-e", "ypa1", &argc); // Pa1Lib devices
else
ArgsAdd(&argvP[argc], "-e", "auto", &argc); // no driver, switch to auto
} else {
ArgsAdd(&argvP[argc], "-e", drv[gameInfoP->musicInfo.sound.drvMusic], &argc);
}
// output rate
UInt32 rates[] = {4000, 8000, 11025, 22050, 44100};
StrIToA(num, rates[gameInfoP->musicInfo.sound.rate]);
ArgsAdd(&argvP[argc], "--output-rate=", num, &argc);
// FM quality
gVars->fmQuality = gameInfoP->fmQuality;
} else {
ArgsAdd(&argvP[argc], "-e", "null", &argc);
}
// volume control
StrIToA(num, gameInfoP->musicInfo.volume.sfx);
ArgsAdd(&argvP[argc], "-s", num, &argc);
StrIToA(num, gameInfoP->musicInfo.volume.music);
ArgsAdd(&argvP[argc], "-m", num, &argc);
StrIToA(num, gameInfoP->musicInfo.volume.speech);
ArgsAdd(&argvP[argc], "-r", num, &argc);
// game name
ArgsAdd(&argvP[argc], gameInfoP->gameP, NULL, &argc);
// others globals data
gVars->CD.enable = gameInfoP->musicInfo.sound.CD;
gVars->CD.driver = gameInfoP->musicInfo.sound.drvCD;
gVars->CD.format = gameInfoP->musicInfo.sound.frtCD;
gVars->CD.volume = gameInfoP->musicInfo.volume.audiocd;
gVars->CD.defaultTrackLength = gameInfoP->musicInfo.sound.defaultTrackLength;
gVars->CD.firstTrack = gameInfoP->musicInfo.sound.firstTrack;
gVars->palmVolume = gameInfoP->musicInfo.sound.music ? gameInfoP->musicInfo.volume.palm : 0;
MemHandleUnlock(recordH);
} // end no game / game selected
// common command line options
// debug level
if (gPrefs->debug) {
StrIToA(num, gPrefs->debugLevel);
ArgsAdd(&argvP[argc], "-d", num, &argc);
}
if (engine == ENGINE_QUEEN || engine == ENGINE_SKY) {
// alternative intro ?
if (gPrefs->altIntro)
ArgsAdd(&argvP[argc], "--alt-intro", NULL, &argc);
}
if (engine == ENGINE_SCUMM) {
// demo mode ?
if (gPrefs->demoMode)
ArgsAdd(&argvP[argc], "--demo-mode", NULL, &argc);
}
// copy protection ?
if (gPrefs->copyProtection)
ArgsAdd(&argvP[argc], "--copy-protection", NULL, &argc);
// exceed max args ?
if (argc > MAX_ARG)
FrmCustomAlert(FrmErrorAlert, "Too many parameters.",0,0);
// set some common options
stackSize = (gPrefs->setStack ? STACK_LARGER : STACK_DEFAULT);
lightspeed= (gPrefs->lightspeed.enable ? gPrefs->lightspeed.mode : 255);
toLauncher= (gPrefs->exitLauncher);
// gVars values
// (gVars->HRrefNum defined in checkHRmode on Clié)
gVars->VFS.volRefNum = gPrefs->card.volRefNum;
gVars->vibrator = gPrefs->vibrator;
gVars->stdPalette = gPrefs->stdPalette;
gVars->VFS.cacheSize = (gPrefs->card.useCache ? gPrefs->card.cacheSize : 0);
gVars->indicator.showLED= gPrefs->card.showLED;
gVars->stylusClick = gPrefs->stylusClick;
gVars->autoSave = (gPrefs->autoSave ? gPrefs->autoSavePeriod : -1);
gVars->advancedMode = gPrefs->advancedMode;
gVars->arrowKeys = gPrefs->arrowKeys;
// user params
HWR_RSTALL();
if (gPrefs->goLCD)
HWR_SET(INIT_GOLCD);
else
OPTIONS_RST(kOptGoLcdAPI);
if (!gPrefs->autoOff)
HWR_SET(INIT_AUTOOFF);
if (gVars->vibrator)
HWR_SET(INIT_VIBRATOR);
/* ????
if ( musicDriver == 1 ||
musicDriver == 3 ||
musicDriver == 4 ||
musicDriver == sysInvalidRefNum) {
HWR_SET(INIT_PA1LIB);
}
*/
if (ModImport(gVars->VFS.volRefNum, engine, &isARM) != errNone) {
if (bDirectMode) {
// and force exit if nothing selected
EventType event;
event.eType = keyDownEvent;
event.data.keyDown.chr = vchrLaunch;
event.data.keyDown.modifiers = commandKeyMask;
EvtAddUniqueEventToQueue(&event, 0, true);
}
ArgsFree(argvP);
return false;
}
// reset mode if screen rotation occured (DIA only)
if (!direct && OPTIONS_TST(kOptCollapsible)) {
UInt8 mode = PalmScreenSize(0,0, &(gVars->screenFullWidth), &(gVars->screenFullHeight));
OPTIONS_RST(kOptModeLandscape);
OPTIONS_SET((mode == PALM_LANDSCAPE) ? kOptModeLandscape : kOptNone);
}
// free and save globals pref memory
GamCloseDatabase(false);
FrmCloseAllForms();
SavePrefs();
{
UInt16 cardNo;
UInt32 dbID;
LaunchParamType *cmdPBP = (LaunchParamType *)MemPtrNew(sizeof(LaunchParamType));
MemPtrSetOwner(cmdPBP, 0);
MemPtrSetOwner(gVars, 0);
ArgsSetOwner(argvP, 0);
cardNo = 0;
dbID = DmFindDatabase(0, "ScummVM-Engine");
if (isARM)
FtrSet(appFileCreator, ftrStack , (stackSize * 4));
else
ModSetStack(stackSize, cardNo, dbID);
cmdPBP->args.argc = argc;
cmdPBP->args.argv = argvP;
cmdPBP->gVars = gVars;
cmdPBP->lightspeed = lightspeed;
cmdPBP->exitLauncher = toLauncher;
SysUIAppSwitch(cardNo, dbID, sysAppLaunchCmdNormalLaunch, cmdPBP);
bLaunched = true;
}
return false;
}
/*
** FinishXferMode
*/
void FinishXferMode(void) {
KleenexType kleenex;
DtbkRepeatInfoType repeat;
FormType* frm = FrmGetActiveForm();
SysDBListItemType* pluglistP = NULL;
Int16 current_plug = -1;
UInt32 result;
Boolean is_goto = false;
Err err = errNone;
Char cat_name[dmCategoryLength];
Char* note = NULL;
UInt16 attr;
/* Zero the kleenex */
MemSet(&kleenex, sizeof(KleenexType), 0);
/* Bail if no plugins installed */
if (!d.xfer.pluglistH) {
FrmAlert(NoPluginInstalled);
return;
}
/* Lock the plugin list */
pluglistP = MemHandleLock(d.xfer.pluglistH);
current_plug = GetCurrentXferAppListIndex();
if (current_plug == -1) {
FrmAlert(NoPluginSelected);
MemHandleUnlock(d.xfer.pluglistH);
return;
}
/* Set the version */
if (pluglistP[current_plug].version & IBVERSION_PICTURE)
kleenex.version = IBVERSION_PICTURE;
else if (pluglistP[current_plug].version & IBVERSION_ORIG)
kleenex.version = IBVERSION_ORIG;
else
abort();
/* Add flag notifier */
kleenex.version |= IBVERSION_FLAGS;
/* Set flags */
if (d.hires)
kleenex.flags = IBFLAG_HIRES;
/* Set the current record index */
kleenex.sketchRecordNum = p.dbI;
/* Set the pick text */
kleenex.text = GetLink(FldGetTextPtr(GetObjectPointer(frm, XferField)));
if (!kleenex.text) {
FlashWaitMessage(XferNoTextString);
MemHandleUnlock(d.xfer.pluglistH);
return;
}
/* Set the title text */
kleenex.title = MemHandleLock(d.record_name);
/* Set the category text */
DmRecordInfo(d.dbR, p.dbI, &attr, NULL, NULL);
CategoryGetName(d.dbR, attr & dmRecAttrCategoryMask, cat_name);
kleenex.category = cat_name;
/* Set the note */
note = MemHandleLock(d.record_note);
if (StrLen(note))
kleenex.note = note;
/* Set the seconds for the alarm */
if (recordIsAlarmSet)
kleenex.alarm_secs = d.record.alarmSecs;
/* Set the repeat information */
kleenex.repeat = &repeat;
switch (d.record.repeatInfo.repeatType) {
case repeatDaily:
case repeatWeekly:
case repeatMonthlyByDay:
case repeatMonthlyByDate:
case repeatYearly:
repeat.repeatType = d.record.repeatInfo.repeatType - 1; /* fix offset caused by repeatHourly */
repeat.repeatFrequency = d.record.repeatInfo.repeatFrequency;
repeat.repeatEndDate = d.record.repeatInfo.repeatEndDate;
repeat.repeatOn = d.record.repeatInfo.repeatOn;
repeat.repeatStartOfWeek = d.record.repeatInfo.repeatStartOfWeek;
break;
case repeatNone:
case repeatHourly:
default:
kleenex.repeat = NULL;
}
/* Set the priority */
kleenex.priority = d.record.priority + 1; /* DiddleBug priority is zero-based */
/* Set the completion flag */
if ((d.xfer.complete || (xferCompleteIsAlways)) && !(xferCompleteIsNever))
kleenex.is_complete = 1;
else
kleenex.is_complete = 0;
/* Load the sketch data */
if (kleenex.version & IBVERSION_PICTURE) {
if (!d.sonyClie || !d.hires) {
kleenex.data = BmpGetBits(WinGetBitmap(d.winbufM));
kleenex.data_size = BmpBitsSize(WinGetBitmap(d.winbufM));
} else {
kleenex.data = BmpGetBits(WinGetBitmap(d.winbufM));
kleenex.data_size = HRBmpBitsSize(d.sonyHRRefNum, WinGetBitmap(d.winbufM));
}
}
/* Call the plugin */
err = SysAppLaunch(pluglistP[current_plug].cardNo,
pluglistP[current_plug].dbID, 0,
boogerPlugLaunchCmdBlowNose, (MemPtr)&kleenex, &result);
/* Clean up some stuff */
MemHandleUnlock(d.xfer.pluglistH);
MemPtrFree(kleenex.text);
if (err || result) {
FrmAlert(PluginError);
return;
}
/* Just to save some typing */
is_goto = (((p.flags&PFLAGS_XFER_GOTO) || (xferGotoIsAlways)) &&
!(xferGotoIsNever));
if (!is_goto)
FlashWaitMessage(XferSavingString);
/* Clean up some more */
MemHandleUnlock(d.record_name);
MemHandleUnlock(d.record_note);
/* Delete the sketch if selected */
if (p.flags&PFLAGS_XFER_DELETE)
DoCmdRemove();
/* Goto the new sketch if required */
if (is_goto) {
/* Clean up */
MemHandleFree(d.xfer.pluglistH);
d.xfer.pluglistH = NULL;
/* Switch to other application */
err = SysUIAppSwitch(kleenex.booger.cardNo, kleenex.booger.dbID,
kleenex.booger.cmd, kleenex.booger.cmdPBP);
/* Clean up on error */
if (err && kleenex.booger.cmdPBP)
MemPtrFree(kleenex.booger.cmdPBP);
} else {
if (kleenex.booger.cmdPBP)
MemPtrFree(kleenex.booger.cmdPBP);
}
CancelXferMode();
}
/***********************************************************************
*
* FUNCTION: ReceiveDatabase
*
* DESCRIPTION: Receives data in the input field using the Exg API
*
* RETURNED: error code or zero for no error.
*
***************************************************************************/
static Err ReceiveDatabase (ExgSocketPtr exgSocketP)
{
Err err;
LocalID dbID;
UInt16 cardNo = 0;
Boolean *needResetP = NULL;
Boolean keepDates = false;
char outName [32];
char appName [32];
int bytesSent = -1;
LocalID app_dbID;
// Create exgSocket structure
MemSet(exgSocketP, sizeof(exgSocketP->length), 0);
// Start and exchange put operation
err = ExgAccept(exgSocketP);
if (!err){
// Receive the DB name we fix it at 32 bytes
bytesSent = ExgReceive(exgSocketP, outName, 32, &err);
if(bytesSent != 32){
return err;
}
// Receive the DB name we fix it at 32 bytes
bytesSent = ExgReceive(exgSocketP, appName, 32, &err);
if(bytesSent != 32){
return err;
}
// Receive the database
err = ExgDBRead(ReadDBData, DeleteExistingDB, exgSocketP, &dbID, cardNo, needResetP, keepDates);
/*
exgSocketP->goToCreator = 'CCPr';
exgSocketP->noGoTo = 0;
*/
// Disconnect Exg and pass error
err = ExgDisconnect(exgSocketP, err);
// Try to rename the database to the outName
if(StrLen(outName) > 0){
/*
UInt cardNo,
LocalID dbID, CharPtr nameP,
UIntPtr attributesP, UIntPtr versionP,
ULongPtr crDateP, ULongPtr modDateP,
ULongPtr bckUpDateP, ULongPtr modNumP,
LocalID* appInfoIDP, LocalID* sortInfoIDP,
ULongPtr typeP, ULongPtr creatorP);
*/
DmSetDatabaseInfo(cardNo, dbID, outName,
NULL, NULL, NULL, NULL,
NULL, NULL, NULL, NULL, NULL, NULL);
}
if (!err && StrLen(appName) > 0)
{
// Find the database
app_dbID = DmFindDatabase(0, appName);
if(app_dbID != 0)
{
SysUIAppSwitch(0, app_dbID, sysAppLaunchCmdNormalLaunch, NULL);
}
}
}
/****************************************************************************/
return err;
}
