int main()
{
log_init(1, "emu86.log");
mem_init();
/* load_rom("../rom/wdbios.rom", 0xc8000, 8192, "a39b2b1c3e298b3599995c353d16c3ad");*/
load_rom("../rom/basicc11.f6", 0xf6000, 8192, "69e2bd1d08c893cbf841607c8749d5bd");
load_rom("../rom/basicc11.f8", 0xf8000, 8192, "5f85ff5ea352c1ec11b084043fbb549e");
load_rom("../rom/basicc11.fa", 0xfa000, 8192, "04a285d5dc8d86c60679e8f3c779dcc4");
load_rom("../rom/basicc11.fc", 0xfc000, 8192, "b086a6980fc5736098269e62b59726ef");
load_rom("../rom/pc081682.bin", 0xfe000, 8192, "1584aeaadebba4bc95783f1fa0fa3db8");
cpu_init();
pit_init();
pic_init();
dma_init();
ppi_init();
fdc_init();
initscr();
cbreak();
noecho();
nodelay(stdscr, TRUE);
keypad(stdscr, TRUE);
mainloop();
endwin();
return 0;
}
void ieee_drive_init(struct drive_context_s *drv)
{
ieeerom_init();
via1d2031_init(drv);
fdc_init(drv);
riot1_init(drv);
riot2_init(drv);
}
void c65_d81_init ( const char *dfn )
{
atexit(c65_d81_shutdown);
fdc_init();
disk_inserted = 0;
read_only = 1;
if (disk_fd >= 0)
close(disk_fd);
disk_fd = -1;
if (dfn) {
// Note about O_BINARY: it's a windows stuff, it won't work without that.
// HOWEVER, O_BINARY defined as zero on non-win archs in one of my include headers, thus it won't bother us with the good OSes :)
disk_fd = open(dfn, O_RDWR|O_BINARY); // First, try to open D81 file in read-write mode
if (disk_fd < 0) {
disk_fd = open(dfn, O_RDONLY|O_BINARY); // If R/W was not ok, try read-only!
if (disk_fd >= 0) {
WARNING_WINDOW("Disk image \"%s\" could be open only in read-only mode", dfn);
disk_inserted = 1;
} else {
ERROR_WINDOW("Couldn't open disk image \"%s\": %s", dfn, strerror(errno));
}
} else {
disk_inserted = 1;
read_only = 0;
}
}
if (disk_inserted) {
off_t size = lseek(disk_fd, 0, SEEK_END);
if (size < 0)
FATAL("D81: host-OS error while testing image size: %s", strerror(errno));
if (size != D81_SIZE) {
ERROR_WINDOW("Image size is wrong, got %d, should be %d", (int)size, D81_SIZE);
disk_inserted = 0;
}
}
if (!disk_inserted) {
read_only = 1;
if (disk_fd >= 0) {
close(disk_fd);
disk_fd = -1;
}
ERROR_WINDOW("No valid D81 found, or given (in command line). There will be no available disk emulated.");
}
fdc_set_disk(disk_inserted, !read_only);
}
/* OPEN routine called by kernel-interface code
*/
int _ftape_open(void)
{
TRACE_FUN(8, "_ftape_open");
int result;
static int new_tape = 1;
result = fdc_init();
if (result >= 0) {
result = ftape_activate_drive(&drive_type);
if (result < 0) {
fdc_disable();
fdc_release_irq_and_dma();
} else {
result = ftape_get_drive_status(&new_tape, &no_tape, &write_protected);
if (result < 0) {
ftape_detach_drive();
} else {
if (drive_type.vendor_id == UNKNOWN_VENDOR) {
ftape_log_vendor_id();
}
if (no_tape) {
ftape_offline = 1;
} else if (new_tape) {
ftape_offline = 0;
init_drive_needed = 1;
read_only = 0; /* enable writes again */
}
if (!ftape_offline && init_drive_needed) {
result = ftape_init_drive(&formatted);
if (result >= 0) {
new_tape = 0;
} else {
ftape_detach_drive();
}
}
if (result >= 0) {
clear_history();
}
}
}
}
TRACE_EXIT;
return result;
}
void resetpchard()
{
if (!modelchanged)
device_close_all();
else
modelchanged = 0;
device_init();
midi_close();
midi_init();
timer_reset();
sound_reset();
mem_resize();
if (pcfirsttime)
{
fdc_init();
pcfirsttime = 0;
}
else
fdc_hard_reset();
model_init();
video_init();
speaker_init();
// #ifdef USE_NETWORKING
vlan_reset(); //NETWORK
network_card_init(network_card_current);
// #endif
sound_card_init(sound_card_current);
if (GUS)
device_add(&gus_device);
if (GAMEBLASTER)
device_add(&cms_device);
if (SSI2001)
device_add(&ssi2001_device);
if (voodoo_enabled)
device_add(&voodoo_device);
pc_reset();
resetide();
loadnvr();
// cpuspeed2 = (AT)?2:1;
// atfullspeed = 0;
// setpitclock(models[model].cpu[cpu_manufacturer].cpus[cpu].rspeed);
shadowbios = 0;
ali1429_reset();
keyboard_at_reset();
// output=3;
#if __unix
if (cdrom_drive == -1)
cdrom_null_reset();
else
#endif
ioctl_reset();
}
void initpc()
{
char *p;
// allegro_init();
get_executable_name(pcempath,511);
pclog("executable_name = %s\n", pcempath);
p=get_filename(pcempath);
*p=0;
pclog("path = %s\n", pcempath);
fdd_init();
keyboard_init();
mouse_init();
joystick_init();
midi_init();
loadconfig(NULL);
pclog("Config loaded\n");
loadfont("mda.rom", 0, cga_fontdat, cga_fontdatm);
loadfont("roms/pc1512/40078.ic127", 0, pc1512_fontdat, pc1512_fontdatm);
loadfont("roms/pc200/40109.bin", 0, pc200_fontdat, pc200_fontdatm);
codegen_init();
cpuspeed2=(AT)?2:1;
// cpuspeed2=cpuspeed;
atfullspeed=0;
device_init();
initvideo();
mem_init();
loadbios();
mem_add_bios();
timer_reset();
sound_reset();
fdc_init();
// #ifdef USE_NETWORKING
vlan_reset(); //NETWORK
network_card_init(network_card_current);
// #endif
loaddisc(0,discfns[0]);
loaddisc(1,discfns[1]);
//loadfont();
loadnvr();
sound_init();
resetide();
#if __unix
if (cdrom_drive == -1)
cdrom_null_open(cdrom_drive);
else
#endif
ioctl_open(cdrom_drive);
pit_reset();
/* if (romset==ROM_AMI386 || romset==ROM_AMI486) */fullspeed();
ali1429_reset();
// CPUID=(is486 && (cpuspeed==7 || cpuspeed>=9));
// pclog("Init - CPUID %i %i\n",CPUID,cpuspeed);
shadowbios=0;
#if __unix
if (cdrom_drive == -1)
cdrom_null_reset();
else
#endif
ioctl_reset();
}
int main(int argc, char *argv[])
{
int c;
struct state *state = NULL;
#if TEST_BUILD
struct test_case *test_case;
#endif
prefs_init();
while(1) {
int option_index = 0;
static struct option long_options[] = {
{"cart", required_argument, 0, OPT_CART },
{"force-extreme-disasm", no_argument, 0, OPT_FORCE_EXTREME_DISASM },
{"crop-screen", no_argument, 0, OPT_CROP_SCREEN },
{"loglevels" , required_argument, 0, OPT_LOGLEVELS },
{"audio-device" , required_argument, 0, OPT_AUDIO_DEVICE },
#if TEST_BUILD
{"test-case", required_argument, 0, OPT_TEST_MODE},
#endif
{0, 0, 0, 0 }
};
c = getopt_long(argc, argv, "a:b:c:t:s:hdpyVAMvq", long_options, &option_index);
if(c == -1) break;
switch(c) {
case 'a':
prefs_set("diskimage", optarg);
break;
case 'b':
prefs_set("diskimage2", optarg);
break;
case 'c':
prefs_set("hdimage", optarg);
break;
case 't':
prefs_set("tosimage", optarg);
break;
case 's':
prefs_set("stateimage", optarg);
break;
case OPT_CART:
prefs_set("cartimage", optarg);
break;
case OPT_FORCE_EXTREME_DISASM:
cprint_all = 1;
break;
case OPT_CROP_SCREEN:
crop_screen = 1;
break;
case OPT_LOGLEVELS:
diag_set_module_levels(optarg);
break;
case OPT_AUDIO_DEVICE:
if(!strncmp("list", optarg, 4)) {
audio_device = -1;
} else {
audio_device = atoi(optarg);
}
break;
#if TEST_BUILD
case OPT_TEST_MODE:
test_case_name = xstrdup(optarg);
test_mode = 1;
break;
#endif
case 'd':
debugger = 1;
break;
case 'p':
ppmoutput = 1;
break;
case 'y':
psgoutput = 1;
break;
case 'v':
verbosity++;
break;
case 'q':
verbosity = MAX(1, verbosity-1);
break;
case 'V':
vsync_delay = 1;
break;
case 'A':
play_audio = 1;
break;
case 'M':
monitor_sm124 = 1;
break;
case 'h':
default:
printf("Usage: %s [-AdMpqvVy] [-a diskimage1] [-b diskimage2] [-c hdimage] [-t tosimage] [-s stateimage]\n",
argv[0]);
exit(-1);
break;
}
}
/* Do not crop screen while debugging */
if(debugger) {
crop_screen = 0;
}
if((prefs.diskimage == NULL) && (argv[optind] != NULL))
prefs_set("diskimage", argv[optind]);
SDL_Init(SDL_INIT_VIDEO|SDL_INIT_JOYSTICK|SDL_INIT_AUDIO);
#if TEST_BUILD
if(test_mode) {
test_case = test_init(test_case_name);
if(test_case) {
if(test_case->cartridge_name) {
prefs_set("cartimage", test_case->cartridge_name);
}
if(test_case->floppy_name) {
prefs_set("diskimage", test_case->floppy_name);
}
} else {
printf("DEBUG: Could not load test case %s\n", test_case_name);
exit(-3);
}
}
#endif
/* Must run before hardware module inits */
mmu_init();
/* This must also be run before hardware modules.
It gives a dummy area for some memory regions to not
cause bus errors */
mmu_fallback_init();
/* Actual hardware */
ram_init();
rom_init();
cpu_init();
if(prefs.cartimage) {
cartridge_init(prefs.cartimage);
} else {
cartridge_init(NULL);
}
psg_init();
midi_init();
acia_init();
ikbd_init();
#if INCLUDE_RTC
rtc_init();
#endif
dma_init();
fdc_init();
hdc_init(prefs.hdimage);
mfp_init();
screen_disable(0);
glue_init();
shifter_init();
if(debugger) {
debug_init();
cpu_halt_for_debug();
}
screen_init();
floppy_init(prefs.diskimage, prefs.diskimage2);
if(prefs.stateimage) {
state = state_load(prefs.stateimage);
}
if(state != NULL)
state_restore(state);
memset(&reset, 0, sizeof reset);
reset.sa_sigaction = reset_action;
sigaction(SIGHUP, &reset, NULL);
while(cpu_run(CPU_RUN));
return 0;
}
