static void ARCH_SIGNALDECL
handle_CTRL_C(int dummy)
{
CBM_FILE fd_cbm_local;
/*
* remember fd_cbm, and make the global one invalid
* so that no routine can call a cbm_...() routine
* once we have cancelled another one
*/
fd_cbm_local = fd;
fd = CBM_FILE_INVALID;
fprintf(stderr, "\nSIGINT caught, resetting IEC bus...\n");
DEBUG_PRINTDEBUGCOUNTERS();
arch_sleep(1);
cbm_reset(fd_cbm_local);
#if 0 // reset automatically restores the VIA shift register
arch_usleep(100000);
fprintf(stderr, "Emergency resetting VIA2 shift register to default.\n");
cbm_exec_command(fd, drive, CmdBuffer, sizeof(CmdBuffer));
#endif
cbm_driver_close(fd);
exit(1);
}
static void ARCH_SIGNALDECL reset(int dummy)
{
fprintf(stderr, "\nSIGINT caught X-( Resetting IEC bus...\n");
arch_sleep(1);
d64copy_cleanup();
cbm_reset(fd_cbm);
cbm_driver_close(fd_cbm);
exit(1);
}
static void ARCH_SIGNALDECL
reset(int dummy)
{
if (fd != CBM_FILE_INVALID)
{
cbm_reset(fd);
cbm_driver_close(fd);
}
exit(1);
}
static void ARCH_SIGNALDECL
handle_CTRL_C(int dummy)
{
fprintf(stderr, "\nSIGINT caught, resetting IEC bus...\n");
DEBUG_PRINTDEBUGCOUNTERS();
arch_sleep(1);
cbm_reset(fd);
cbm_driver_close(fd);
exit(1);
}
static void ARCH_SIGNALDECL reset(int dummy)
{
CBM_FILE fd_cbm_local;
/*
* remember fd_cbm, and make the global one invalid
* so that no routine can call a cbm_...() routine
* once we have cancelled another one
*/
fd_cbm_local = fd_cbm;
fd_cbm = CBM_FILE_INVALID;
fprintf(stderr, "\nSIGINT caught X-( Resetting IEC bus...\n");
DEBUG_PRINTDEBUGCOUNTERS();
cbm_reset(fd_cbm_local);
cbm_driver_close(fd_cbm_local);
exit(1);
}
//
// abort signal trap
//
static void ARCH_SIGNALDECL reset(int dummy)
{
CBM_FILE fd_cbm_local;
/*
* remember fd_cbm, and make the global one invalid
* so that no routine can call a cbm_...() routine
* once we have cancelled another one
*/
fd_cbm_local = fd_cbm;
fd_cbm = CBM_FILE_INVALID;
fprintf(stderr, "\nSIGINT caught X-( Resetting IEC bus...\n");
#ifdef LIBIMGCOPY_DEBUG
printDebugLibImgCounters(my_message_cb);
#endif
imgcopy_cleanup();
cbm_reset(fd_cbm_local);
cbm_driver_close(fd_cbm_local);
exit(1);
}
int main(int argc, char **argv)
{
int ret, n;
unsigned char drive = 8;
CBM_FILE f;
char buffer[80];
char *devicetype_str;
const char *drivername;
enum cbm_device_type_e devicetype;
int checklines = 0;
int checkiohook = 0;
if (argc>1)
{
int i;
for (i=0; i < argc; i++)
{
switch (argv[i][0])
{
case '-':
checklines = 1;
break;
case '+':
checkiohook = 1;
break;
default:
drive = atoi(argv[i]);
}
}
}
printf("VDDTEST " __DATE__ " " __TIME__ ", using drive %u\n", drive);
if (vdd_init())
{
printf("Could not initialize the VDD, aborting!\n");
exit(1);
}
drivername = cbm_get_driver_name(0);
printf("cbm_get_driver_name() returned %s.\n", drivername);
ret = cbm_driver_open(&f, 0);
if (ret)
{
printf("cbm_driver_open FAILED!\n");
exit(1);
}
printf("cbm_driver_open success!\n\n");
n = cbm_reset(f);
printf("cbm_reset %s\n", n==0 ? "success" : "FAILED");
if (checklines)
{
changelines(f);
}
n = cbm_device_status(f, drive, buffer, sizeof(buffer));
printf("cbm_device_status returned: %u\n%s\n\n", n, buffer);
n = cbm_open(f, drive, 15, "I0", 0);
printf("cbm_open %u,15,\"I0\" %s!\n", drive, n == 0 ? "success" : "FAILED");
n = cbm_close(f, drive, 15);
printf("cbm_close %s!\n", n == 0 ? "success" : "FAILED");
n = own_device_status(f, drive, buffer, sizeof(buffer));
printf("own_device_status returned: %u\n%s\n\n", n, buffer);
n = cbm_identify(f, drive, &devicetype, &devicetype_str);
printf("cbm_identify %s!\n", n==0 ? "success" : "FAILED");
printf("cbm_identify returned: %u - '%s'.\n\n", (unsigned int) devicetype,
devicetype_str);
n = cbm_exec_command(f, drive, "S0:OPENCBM.VDD", 0);
printf("cbm_exec_command(scratch) %s!\n", n==0 ? "success" : "FAILED");
writefile(f, drive, "OPENCBM.VDD,S,W");
readfile(f, drive, "OPENCBM.VDD,S,R");
morse(f, drive);
if (checkiohook)
{
unsigned int base = 0x0fc0;
printf("trying to install iohook at 0x%08x ", base);
if (vdd_install_iohook(f, base, 1))
{
int i;
printf("success\n");
for (i=0; i<15; i++)
{
outportb(base + 2, i);
sleep(1);
}
printf("trying to uninstall iohook ");
if (vdd_uninstall_iohook(f))
{
printf("success\n");
}
else
{
printf("FAILED\n");
}
}
else
{
printf("FAILED\n");
}
}
cbm_driver_close(f);
printf("cbm_driver_close success!\n");
return 0;
}
