152 lines
5.0 KiB
C
152 lines
5.0 KiB
C
/*
|
|
Copyright 2014 Wolfgang Thaller.
|
|
|
|
This file is part of Retro68.
|
|
|
|
Retro68 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.
|
|
|
|
Retro68 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 Retro68. If not, see <http://www.gnu.org/licenses/>.
|
|
*/
|
|
|
|
#include <stdio.h>
|
|
#include <Events.h>
|
|
#include <Processes.h>
|
|
#include <ToolUtils.h>
|
|
#include <Files.h>
|
|
#include <Resources.h>
|
|
|
|
#include <string.h>
|
|
|
|
void Explain(void)
|
|
{
|
|
printf("*********************************************************\n");
|
|
printf("This program is intended to make developing software\n");
|
|
printf("using Retro68K and Mini vMac a little more convenient.\n");
|
|
printf("\n");
|
|
printf("If you insert a disk that contains a single application\n");
|
|
printf("(= drag a disk image created by Retro68K to this window),\n");
|
|
printf("the application will be automatically launched and the\n");
|
|
printf("disk image unmounted again afterwards.\n");
|
|
printf("\n");
|
|
printf("It just saves a few repetitive clicks.\n");
|
|
printf("*********************************************************\n");
|
|
}
|
|
|
|
void EjectOldDisk(void)
|
|
{
|
|
Handle h = GetResource('LNCH', 128);
|
|
if(h)
|
|
{
|
|
short refNum = **(short**)h;
|
|
printf("Ejecting disk (refNum = %d)\n", (int)refNum);
|
|
|
|
Eject(NULL, refNum);
|
|
UnmountVol(NULL, refNum);
|
|
RemoveResource(h);
|
|
}
|
|
}
|
|
|
|
int main(void)
|
|
{
|
|
Explain();
|
|
EjectOldDisk();
|
|
printf("Insert a disk or hit any key to abort.\n");
|
|
|
|
FlushEvents(everyEvent, 0);
|
|
|
|
for(;;)
|
|
{
|
|
EventRecord e;
|
|
GetNextEvent(everyEvent, &e);
|
|
|
|
switch(e.what)
|
|
{
|
|
case keyDown:
|
|
return 0;
|
|
break;
|
|
|
|
case diskEvt:
|
|
{
|
|
short refNum = LoWord(e.message);
|
|
short err = HiWord(e.message);
|
|
printf("Disk Inserted (refNum = %d, error = %d)\n", refNum, err);
|
|
if(err == 0)
|
|
{
|
|
{
|
|
Handle h = NewHandle(2);
|
|
**(short**)h = refNum;
|
|
AddResource(h, 'LNCH', 128, "");
|
|
}
|
|
SetVol(NULL, refNum);
|
|
|
|
CInfoPBRec cpb;
|
|
unsigned char name[257];
|
|
int i, nApps = 0;
|
|
unsigned char bestName[257];
|
|
for(i = 1;; i++)
|
|
{
|
|
memset(&cpb, 0, sizeof(cpb));
|
|
cpb.dirInfo.ioVRefNum = refNum;
|
|
cpb.dirInfo.ioFDirIndex = i;
|
|
cpb.dirInfo.ioNamePtr = name;
|
|
err = PBGetCatInfoSync(&cpb);
|
|
|
|
if(err != noErr)
|
|
break;
|
|
|
|
name[name[0]+1] = 0;
|
|
if(cpb.hFileInfo.ioFlFndrInfo.fdType == 'APPL')
|
|
{
|
|
printf("Application: %s\n", &name[1]);
|
|
memcpy(bestName, name, sizeof(bestName));
|
|
++nApps;
|
|
}
|
|
}
|
|
|
|
if(nApps == 0)
|
|
{
|
|
printf("No applications found on disk.\n");
|
|
EjectOldDisk();
|
|
}
|
|
else if(nApps > 1)
|
|
{
|
|
printf("Multiple applications found on disk.\n");
|
|
EjectOldDisk();
|
|
}
|
|
else
|
|
{
|
|
LaunchParamBlockRec lpb;
|
|
memset(&lpb, 0, sizeof(lpb));
|
|
|
|
lpb.reserved1 = (unsigned long) bestName;
|
|
lpb.reserved2 = 0;
|
|
lpb.launchBlockID = extendedBlock;
|
|
lpb.launchEPBLength = 6;
|
|
lpb.launchFileFlags = 0;
|
|
lpb.launchControlFlags = 0xC000;
|
|
|
|
printf("Launching...\n");
|
|
err = LaunchApplication(&lpb);
|
|
printf("Still here after launch (err = %d). Press Enter to exit.\n", (int)err);
|
|
getchar();
|
|
return 0;
|
|
}
|
|
}
|
|
else
|
|
Eject(NULL, refNum);
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
return 0;
|
|
}
|