/* Autostart the image attached to device `num'. */
int autostart_device(int num)
{
if (network_connected() || !autostart_enabled)
return -1;
switch (num) {
case 8:
reboot_for_autostart(NULL, AUTOSTART_HASDISK, AUTOSTART_MODE_RUN);
return 0;
case 1:
reboot_for_autostart(NULL, AUTOSTART_HASTAPE, AUTOSTART_MODE_RUN);
return 0;
}
return -1;
}
/* Autostart disk image `file_name'. */
int autostart_disk(const char *file_name, const char *program_name,
unsigned int program_number, unsigned int runmode)
{
char *name = NULL;
if (network_connected() || !file_name || !autostart_enabled)
return -1;
/* Get program name first to avoid more than one file handle open on
image. */
if (!program_name && program_number > 0)
name = image_contents_filename_by_number(IMAGE_CONTENTS_DISK,
file_name, 0, program_number);
else
name = lib_stralloc(program_name ? program_name : "*");
if (name) {
autostart_disk_cook_name(&name);
if (!(file_system_attach_disk(8, file_name) < 0)) {
log_message(autostart_log,
"Attached file `%s' as a disk image.", file_name);
reboot_for_autostart(name, AUTOSTART_HASDISK, runmode);
lib_free(name);
return 0;
}
}
autostartmode = AUTOSTART_ERROR;
deallocate_program_name();
if (name)
lib_free(name);
return -1;
}
/* Autostart snapshot file `file_name'. */
int autostart_snapshot(const char *file_name, const char *program_name)
{
BYTE vmajor, vminor;
snapshot_t *snap;
if (network_connected() || file_name == NULL || !autostart_enabled)
return -1;
deallocate_program_name(); /* not needed at all */
if (!(snap = snapshot_open(file_name, &vmajor, &vminor, machine_name)) ) {
autostartmode = AUTOSTART_ERROR;
return -1;
}
log_message(autostart_log, "Loading snapshot file `%s'.", file_name);
snapshot_close(snap);
/*autostart_program_name = (BYTE *)lib_stralloc(file_name);
interrupt_maincpu_trigger_trap(load_snapshot_trap, (void*)0);*/
/* use for snapshot */
reboot_for_autostart(file_name, AUTOSTART_HASSNAPSHOT, AUTOSTART_MODE_RUN);
return 0;
}
/* Autostart the image attached to device `num'. */
int autostart_device(int num)
{
if (event_playback_active() || event_record_active() || !autostart_enabled)
return -1;
switch (num)
{
case 8:
reboot_for_autostart(NULL, AUTOSTART_HASDISK, AUTOSTART_MODE_RUN);
return 0;
case 1:
reboot_for_autostart(NULL, AUTOSTART_HASTAPE, AUTOSTART_MODE_RUN);
return 0;
}
return -1;
}
/* Autostart PRG file `file_name'. The PRG file can either be a raw CBM file
or a P00 file */
int autostart_prg(const char *file_name, unsigned int runmode)
{
fileio_info_t *finfo;
int result;
const char *boot_file_name;
int mode;
if (event_record_active() || event_playback_active())
return -1;
/* open prg file */
finfo = fileio_open(file_name, NULL, FILEIO_FORMAT_RAW | FILEIO_FORMAT_P00, FILEIO_COMMAND_READ | FILEIO_COMMAND_FSNAME, FILEIO_TYPE_PRG);
/* can't open file */
if (finfo == NULL) {
#ifdef CELL_DEBUG
printf("ERROR: Cannot open `%s'.\n", file_name);
#endif
return -1;
}
/* determine how to load file */
switch(AutostartPrgMode)
{
case AUTOSTART_PRG_MODE_VFS:
//log_message(autostart_log, "Loading PRG file `%s' with virtual FS on unit #8.", file_name);
result = autostart_prg_with_virtual_fs(file_name, finfo);
mode = AUTOSTART_HASDISK;
boot_file_name = (const char *)finfo->name;
break;
case AUTOSTART_PRG_MODE_INJECT:
//log_message(autostart_log, "Loading PRG file `%s' with direct RAM injection.", file_name);
result = autostart_prg_with_ram_injection(file_name, finfo);
mode = AUTOSTART_INJECT;
boot_file_name = NULL;
break;
case AUTOSTART_PRG_MODE_DISK:
//log_message(autostart_log, "Loading PRG file `%s' with autostart disk image.", file_name);
result = autostart_prg_with_disk_image(file_name, finfo, AutostartPrgDiskImage);
mode = AUTOSTART_HASDISK;
boot_file_name = "*";
break;
default:
//log_error(autostart_log, "Invalid PRG autostart mode: %d", AutostartPrgMode);
result = -1;
break;
}
/* Now either proceed with disk image booting or prg injection after reset */
if (result >= 0)
{
ui_update_menus();
reboot_for_autostart(boot_file_name, mode, runmode);
}
/* close prg file */
fileio_close(finfo);
return result;
}
/* Autostart PRG file `file_name'. The PRG file can either be a raw CBM file
or a P00 file, and the FS-based drive emulation is set up so that its
directory becomes the current one on unit #8. */
int autostart_prg(const char *file_name, unsigned int runmode)
{
char *directory;
char *file;
fileio_info_t *finfo;
if (network_connected())
return -1;
finfo = fileio_open(file_name, NULL, FILEIO_FORMAT_RAW | FILEIO_FORMAT_P00,
FILEIO_COMMAND_READ | FILEIO_COMMAND_FSNAME,
FILEIO_TYPE_PRG);
if (finfo == NULL) {
log_error(autostart_log, "Cannot open `%s'.", file_name);
return -1;
}
/* Extract the directory path to allow FS-based drive emulation to
work. */
util_fname_split(file_name, &directory, &file);
if (archdep_path_is_relative(directory)) {
char *tmp;
archdep_expand_path(&tmp, directory);
lib_free(directory);
directory = tmp;
/* FIXME: We should actually eat `.'s and `..'s from `directory'
instead. */
}
/* Setup FS-based drive emulation. */
fsdevice_set_directory(directory ? directory : ".", 8);
set_true_drive_emulation_mode(0);
orig_drive_true_emulation_state =0;
resources_set_int("VirtualDevices", 1);
resources_set_int("FSDevice8ConvertP00", 1);
file_system_detach_disk(8);
ui_update_menus();
/* Now it's the same as autostarting a disk image. */
reboot_for_autostart((char *)(finfo->name), AUTOSTART_HASDISK, runmode);
lib_free(directory);
lib_free(file);
fileio_close(finfo);
log_message(autostart_log, "Preparing to load PRG file `%s'.",
file_name);
return 0;
}
/* Autostart tape image `file_name'. */
int autostart_tape(const char *file_name, const char *program_name,
unsigned int program_number, unsigned int runmode)
{
char *name = NULL;
if (network_connected() || !file_name || !autostart_enabled)
return -1;
/* Get program name first to avoid more than one file handle open on
image. */
if (!program_name && program_number > 0)
name = image_contents_filename_by_number(IMAGE_CONTENTS_TAPE,
file_name, 0, program_number);
else
name = lib_stralloc(program_name ? program_name : "");
if (!(tape_image_attach(1, file_name) < 0)) {
log_message(autostart_log,
"Attached file `%s' as a tape image.", file_name);
if (tape_tap_attched()) {
if (program_number > 0) {
lib_free(name);
name = NULL;
/* program numbers in tape_seek_to_file() start at 0 */
tape_seek_to_file(tape_image_dev1, program_number-1);
} else {
tape_seek_start(tape_image_dev1);
}
}
resources_set_int("VirtualDevices", 1); /* Kludge: iAN CooG - for t64 images we need devtraps ON */
reboot_for_autostart(name, AUTOSTART_HASTAPE, runmode);
lib_free(name);
return 0;
}
autostartmode = AUTOSTART_ERROR;
deallocate_program_name();
if (name)
lib_free(name);
return -1;
}
/* Autostart disk image `file_name'. */
int autostart_disk(const char *file_name, const char *program_name,
unsigned int program_number, unsigned int runmode)
{
char *name = NULL;
if (network_connected() || event_record_active() || event_playback_active()
|| !file_name || !autostart_enabled) {
return -1;
}
/* Get program name first to avoid more than one file handle open on
image. */
if (!program_name && program_number > 0) {
image_contents_t *contents = diskcontents_filesystem_read(file_name);
if (contents) {
name = image_contents_filename_by_number(contents, program_number);
image_contents_destroy(contents);
}
} else {
name = lib_stralloc(program_name ? program_name : "*");
}
if (name) {
autostart_disk_cook_name(&name);
if (!(file_system_attach_disk(8, file_name) < 0)) {
log_message(autostart_log,
"Attached file `%s' as a disk image.", file_name);
reboot_for_autostart(name, AUTOSTART_HASDISK, runmode);
lib_free(name);
return 0;
}
}
autostartmode = AUTOSTART_ERROR;
deallocate_program_name();
lib_free(name);
return -1;
}
/* Autostart tape image `file_name'. */
int autostart_tape(const char *file_name, const char *program_name,
unsigned int program_number, unsigned int runmode)
{
BYTE do_seek = 1;
if (network_connected() || event_record_active() || event_playback_active()
|| !file_name || !autostart_enabled) {
return -1;
}
if (!(tape_image_attach(1, file_name) < 0)) {
log_message(autostart_log,
"Attached file `%s' as a tape image.", file_name);
if (!tape_tap_attached()) {
if (program_number == 0 || program_number == 1) {
do_seek = 0;
}
program_number -= 1;
}
if (do_seek) {
if (program_number > 0) {
/* program numbers in tape_seek_to_file() start at 0 */
tape_seek_to_file(tape_image_dev1, program_number - 1);
} else {
tape_seek_start(tape_image_dev1);
}
}
if (!tape_tap_attached()) {
resources_set_int("VirtualDevices", 1); /* Kludge: for t64 images we need devtraps ON */
}
reboot_for_autostart(program_name, AUTOSTART_HASTAPE, runmode);
return 0;
}
autostartmode = AUTOSTART_ERROR;
deallocate_program_name();
return -1;
}
/* Autostart PRG file `file_name'. The PRG file can either be a raw CBM file
or a P00 file */
int autostart_prg(const char *file_name, unsigned int runmode)
{
fileio_info_t *finfo;
int result;
const char *boot_file_name;
int mode;
if (network_connected() || event_record_active() || event_playback_active()) {
return -1;
}
/* open prg file */
finfo = fileio_open(file_name, NULL, FILEIO_FORMAT_RAW | FILEIO_FORMAT_P00,
FILEIO_COMMAND_READ | FILEIO_COMMAND_FSNAME,
FILEIO_TYPE_PRG);
/* can't open file */
if (finfo == NULL) {
log_error(autostart_log, "Cannot open `%s'.", file_name);
return -1;
}
/* determine how to load file */
switch (AutostartPrgMode) {
case AUTOSTART_PRG_MODE_VFS:
log_message(autostart_log, "Loading PRG file `%s' with virtual FS on unit #8.", file_name);
result = autostart_prg_with_virtual_fs(file_name, finfo, autostart_log);
mode = AUTOSTART_HASDISK;
boot_file_name = (const char *)finfo->name;
break;
case AUTOSTART_PRG_MODE_INJECT:
log_message(autostart_log, "Loading PRG file `%s' with direct RAM injection.", file_name);
result = autostart_prg_with_ram_injection(file_name, finfo, autostart_log);
mode = AUTOSTART_INJECT;
boot_file_name = NULL;
break;
case AUTOSTART_PRG_MODE_DISK:
{
char *savedir;
log_message(autostart_log, "Loading PRG file `%s' with autostart disk image.", file_name);
/* create the directory where the image should be written first */
util_fname_split(AutostartPrgDiskImage, &savedir, NULL);
ioutil_mkdir(savedir, IOUTIL_MKDIR_RWXU);
lib_free(savedir);
result = autostart_prg_with_disk_image(file_name, finfo, autostart_log, AutostartPrgDiskImage);
mode = AUTOSTART_HASDISK;
boot_file_name = "*";
}
break;
default:
log_error(autostart_log, "Invalid PRG autostart mode: %d", AutostartPrgMode);
result = -1;
break;
}
/* Now either proceed with disk image booting or prg injection after reset */
if (result >= 0) {
ui_update_menus();
reboot_for_autostart(boot_file_name, mode, runmode);
}
/* close prg file */
fileio_close(finfo);
return result;
}
