apple2ix/src/misc.c
Aaron Culliney 6858e51a75 Apple2Mac first cut and refactor common rendering code
* Based on NSOpenGLView and Apple's GLEssentials sample code
    * CVDisplayLink- or NSTimer-driven rendering
    * Works in window or fullscreen mode on Mac OSX Lion or later

TODO FIXME:
    * Breaks Linux/Posix build
    * Cocoa menu interfaces
    * Key/mouse/joystick/gamepad handling
2014-09-30 21:01:58 -07:00

645 lines
17 KiB
C

/*
* Apple // emulator for Linux: Miscellaneous support
*
* Copyright 1994 Alexander Jean-Claude Bottema
* Copyright 1995 Stephen Lee
* Copyright 1997, 1998 Aaron Culliney
* Copyright 1998, 1999, 2000 Michael Deutschmann
*
* This software package is subject to the GNU General Public License
* version 2 or later (your choice) as published by the Free Software
* Foundation.
*
* THERE ARE NO WARRANTIES WHATSOEVER.
*
*/
#include "common.h"
/* ----------------------------------
internal apple2 variables
---------------------------------- */
extern uint8_t apple_iie_rom[32768];
extern bool iie_rom_loaded;
bool do_logging = true; // also controlled by NDEBUG
FILE *error_log = NULL;
__attribute__((constructor))
static void _init_common() {
error_log = stderr;
}
GLUE_BANK_READ(read_ram_bank,base_d000_rd)
GLUE_BANK_MAYBEWRITE(write_ram_bank,base_d000_wrt)
GLUE_BANK_READ(read_ram_lc,base_e000_rd)
GLUE_BANK_MAYBEWRITE(write_ram_lc,base_e000_wrt)
GLUE_BANK_READ(iie_read_ram_default,base_ramrd)
GLUE_BANK_WRITE(iie_write_ram_default,base_ramwrt)
GLUE_BANK_READ(iie_read_ram_text_page0,base_textrd)
GLUE_BANK_WRITE(iie_write_screen_hole_text_page0,base_textwrt)
GLUE_BANK_READ(iie_read_ram_hires_page0,base_hgrrd)
GLUE_BANK_WRITE(iie_write_screen_hole_hires_page0,base_hgrwrt)
GLUE_BANK_READ(iie_read_ram_zpage_and_stack,base_stackzp)
GLUE_BANK_WRITE(iie_write_ram_zpage_and_stack,base_stackzp)
GLUE_BANK_READ(iie_read_slot3,base_c3rom)
GLUE_BANK_MAYBEREAD(iie_read_slot4,base_c4rom)
GLUE_BANK_MAYBEREAD(iie_read_slot5,base_c5rom)
GLUE_BANK_READ(iie_read_slotx,base_cxrom)
uint32_t softswitches;
const uint8_t *base_vmem = apple_ii_64k[0];
uint8_t *base_ramrd;
uint8_t *base_ramwrt;
uint8_t *base_textrd;
uint8_t *base_textwrt;
uint8_t *base_hgrrd;
uint8_t *base_hgrwrt;
uint8_t *base_stackzp;
uint8_t *base_d000_rd;
uint8_t *base_e000_rd;
uint8_t *base_d000_wrt;
uint8_t *base_e000_wrt;
uint8_t *base_c3rom;
uint8_t *base_c4rom;
uint8_t *base_c5rom;
uint8_t *base_cxrom;
/* -------------------------------------------------------------------------
c_debug_illegal_bcd - illegal BCD (decimal mode) computation
------------------------------------------------------------------------- */
GLUE_C_READ(debug_illegal_bcd)
{
RELEASE_LOG("Illegal/undefined BCD operation encountered, debug break on c_debug_illegal_bcd to debug...");
return 0;
}
/* -------------------------------------------------------------------------
c_set_altchar() - set alternate character set
------------------------------------------------------------------------- */
void c_set_altchar()
{
video_loadfont(0x40,0x20,mousetext_glyphs,1);
video_loadfont(0x60,0x20,lcase_glyphs,2);
video_redraw();
}
/* -------------------------------------------------------------------------
c_set_primary_char() - set primary character set
------------------------------------------------------------------------- */
void c_set_primary_char()
{
video_loadfont(0x40,0x40,ucase_glyphs,3);
video_redraw();
}
/* -------------------------------------------------------------------------
c_initialize_font(): Initialize ROM character table to primary char set
------------------------------------------------------------------------- */
void c_initialize_font()
{
video_loadfont(0x00,0x40,ucase_glyphs,2);
video_loadfont(0x40,0x40,ucase_glyphs,3);
video_loadfont(0x80,0x40,ucase_glyphs,0);
video_loadfont(0xC0,0x20,ucase_glyphs,0);
video_loadfont(0xE0,0x20,lcase_glyphs,0);
video_redraw();
}
/* -------------------------------------------------------------------------
c_initialize_tables()
------------------------------------------------------------------------- */
void c_initialize_tables() {
int i;
/* reset everything */
for (i = 0; i < 0x10000; i++)
{
cpu65_vmem_r[i] = iie_read_ram_default;
cpu65_vmem_w[i] = iie_write_ram_default;
}
/* language card read/write area */
for (i = 0xD000; i < 0xE000; i++)
{
{
cpu65_vmem_w[i] =
write_ram_bank;
cpu65_vmem_r[i] =
read_ram_bank;
}
}
for (i = 0xE000; i < 0x10000; i++)
{
{
cpu65_vmem_w[i] =
write_ram_lc;
cpu65_vmem_r[i] =
read_ram_lc;
}
}
/* done common initialization */
/* initialize zero-page, //e specific */
for (i = 0; i < 0x200; i++)
{
cpu65_vmem_r[i] =
iie_read_ram_zpage_and_stack;
cpu65_vmem_w[i] =
iie_write_ram_zpage_and_stack;
}
/* initialize first text & hires page, which are specially bank switched
*
* video_set() substitutes it's own hooks for all visible write locations
* affect the display, leaving our write-functions in place only at the
* `screen holes', hence the name.
*/
for (i = 0x400; i < 0x800; i++)
{
cpu65_vmem_r[i] =
iie_read_ram_text_page0;
cpu65_vmem_w[i] =
iie_write_screen_hole_text_page0;
}
for (i = 0x2000; i < 0x4000; i++)
{
cpu65_vmem_r[i] =
iie_read_ram_hires_page0;
cpu65_vmem_w[i] =
iie_write_screen_hole_hires_page0;
}
/* softswich rom */
for (i = 0xC000; i < 0xC100; i++)
{
cpu65_vmem_r[i] =
read_unmapped_softswitch;
cpu65_vmem_w[i] =
write_unmapped_softswitch;
}
/* slot rom defaults */
for (i = 0xC100; i < 0xD000; i++)
{
cpu65_vmem_r[i] =
iie_read_ram_default;
cpu65_vmem_w[i] =
ram_nop;
}
/* keyboard data and strobe (READ) */
for (i = 0xC000; i < 0xC010; i++)
{
cpu65_vmem_r[i] =
read_keyboard;
}
for (i = 0xC010; i < 0xC020; i++)
{
cpu65_vmem_r[i] =
cpu65_vmem_w[i] =
read_keyboard_strobe;
}
/* RDBNK2 switch */
cpu65_vmem_r[0xC011] =
iie_check_bank;
/* RDLCRAM switch */
cpu65_vmem_r[0xC012] =
iie_check_lcram;
/* 80STORE switch */
cpu65_vmem_w[0xC000] = iie_80store_off;
cpu65_vmem_w[0xC001] = iie_80store_on;
cpu65_vmem_r[0xC018] = iie_check_80store;
/* RAMRD switch */
cpu65_vmem_w[0xC002] = iie_ramrd_main;
cpu65_vmem_w[0xC003] = iie_ramrd_aux;
cpu65_vmem_r[0xC013] = iie_check_ramrd;
/* RAMWRT switch */
cpu65_vmem_w[0xC004] = iie_ramwrt_main;
cpu65_vmem_w[0xC005] = iie_ramwrt_aux;
cpu65_vmem_r[0xC014] = iie_check_ramwrt;
/* ALTZP switch */
cpu65_vmem_w[0xC008] = iie_altzp_main;
cpu65_vmem_w[0xC009] = iie_altzp_aux;
cpu65_vmem_r[0xC016] = iie_check_altzp;
/* 80COL switch */
cpu65_vmem_w[0xC00C] = iie_80col_off;
cpu65_vmem_w[0xC00D] = iie_80col_on;
cpu65_vmem_r[0xC01F] = iie_check_80col;
/* ALTCHAR switch */
cpu65_vmem_w[0xC00E] = iie_altchar_off;
cpu65_vmem_w[0xC00F] = iie_altchar_on;
cpu65_vmem_r[0xC01E] = iie_check_altchar;
/* SLOTC3ROM switch */
cpu65_vmem_w[0xC00A] = iie_c3rom_internal; // HACK FIXME TODO VERIFY : the pattern here is reversed from cxrom?
cpu65_vmem_w[0xC00B] = iie_c3rom_peripheral;
cpu65_vmem_r[0xC017] = iie_check_c3rom;
/* SLOTCXROM switch */
cpu65_vmem_w[0xC006] = iie_cxrom_peripheral; // HACK FIXME TODO VERIFY : the pattern here is reversed from c3rom?
cpu65_vmem_w[0xC007] = iie_cxrom_internal;
cpu65_vmem_r[0xC015] = iie_check_cxrom;
/* RDVBLBAR switch */
cpu65_vmem_r[0xC019] =
iie_check_vbl;
/* random number generator */
for (i = 0xC020; i < 0xC030; i++)
{
cpu65_vmem_r[i] =
cpu65_vmem_w[i] =
read_random;
}
/* TEXT switch */
cpu65_vmem_r[0xC050] =
cpu65_vmem_w[0xC050] =
read_switch_graphics;
cpu65_vmem_r[0xC051] =
cpu65_vmem_w[0xC051] =
read_switch_text;
cpu65_vmem_r[0xC01A] =
iie_check_text;
/* MIXED switch */
cpu65_vmem_r[0xC052] =
cpu65_vmem_w[0xC052] =
read_switch_no_mixed;
cpu65_vmem_r[0xC053] =
cpu65_vmem_w[0xC053] =
read_switch_mixed;
cpu65_vmem_r[0xC01B] =
iie_check_mixed;
/* PAGE2 switch */
cpu65_vmem_r[0xC054] =
cpu65_vmem_w[0xC054] =
iie_page2_off;
cpu65_vmem_r[0xC01C] =
iie_check_page2;
/* PAGE2 switch */
cpu65_vmem_r[0xC055] =
cpu65_vmem_w[0xC055] =
iie_page2_on;
/* HIRES switch */
cpu65_vmem_r[0xC01D] =
iie_check_hires;
cpu65_vmem_r[0xC056] =
cpu65_vmem_w[0xC056] =
iie_hires_off;
cpu65_vmem_r[0xC057] =
cpu65_vmem_w[0xC057] =
iie_hires_on;
/* game I/O switches */
cpu65_vmem_r[0xC061] =
cpu65_vmem_r[0xC069] =
read_button0;
cpu65_vmem_r[0xC062] =
cpu65_vmem_r[0xC06A] =
read_button1;
cpu65_vmem_r[0xC063] =
cpu65_vmem_r[0xC06B] =
read_button2;
cpu65_vmem_r[0xC064] =
cpu65_vmem_r[0xC06C] =
read_gc0;
cpu65_vmem_r[0xC065] =
cpu65_vmem_r[0xC06D] =
read_gc1;
cpu65_vmem_r[0xC066] =
iie_read_gc2;
cpu65_vmem_r[0xC067] =
iie_read_gc3;
for (i = 0xC070; i < 0xC080; i++)
{
cpu65_vmem_r[i] =
cpu65_vmem_w[i] =
read_gc_strobe;
}
/* IOUDIS switch & read_gc_strobe */
cpu65_vmem_w[0xC07E] =
iie_ioudis_on;
cpu65_vmem_w[0xC07F] =
iie_ioudis_off; // HACK FIXME TODO : double-check this stuff against AWin...
cpu65_vmem_r[0xC07E] =
iie_check_ioudis;
cpu65_vmem_r[0xC07F] =
iie_check_dhires;
/* DHIRES/Annunciator switches */
cpu65_vmem_w[0xC05E] =
cpu65_vmem_r[0xC05E] =
iie_dhires_on;
cpu65_vmem_w[0xC05F] =
cpu65_vmem_r[0xC05F] =
iie_dhires_off;
/* language card softswitches */
cpu65_vmem_r[0xC080] = cpu65_vmem_w[0xC080] =
cpu65_vmem_r[0xC084] = cpu65_vmem_w[0xC084] = iie_c080;
cpu65_vmem_r[0xC081] = cpu65_vmem_w[0xC081] =
cpu65_vmem_r[0xC085] = cpu65_vmem_w[0xC085] = iie_c081;
cpu65_vmem_r[0xC082] = cpu65_vmem_w[0xC082] =
cpu65_vmem_r[0xC086] = cpu65_vmem_w[0xC086] = lc_c082;
cpu65_vmem_r[0xC083] = cpu65_vmem_w[0xC083] =
cpu65_vmem_r[0xC087] = cpu65_vmem_w[0xC087] = iie_c083;
cpu65_vmem_r[0xC088] = cpu65_vmem_w[0xC088] =
cpu65_vmem_r[0xC08C] = cpu65_vmem_w[0xC08C] = iie_c088;
cpu65_vmem_r[0xC089] = cpu65_vmem_w[0xC089] =
cpu65_vmem_r[0xC08D] = cpu65_vmem_w[0xC08D] = iie_c089;
cpu65_vmem_r[0xC08A] = cpu65_vmem_w[0xC08A] =
cpu65_vmem_r[0xC08E] = cpu65_vmem_w[0xC08E] = lc_c08a;
cpu65_vmem_r[0xC08B] = cpu65_vmem_w[0xC08B] =
cpu65_vmem_r[0xC08F] = cpu65_vmem_w[0xC08F] = iie_c08b;
/* slot i/o area */
for (i = 0xC100; i < 0xC300; i++)
{
cpu65_vmem_r[i] =
iie_read_slotx; /* slots 1 & 2 (x) */
}
for (i = 0xC300; i < 0xC400; i++)
{
cpu65_vmem_r[i] =
iie_read_slot3; /* slot 3 (80col) */
}
for (i = 0xC400; i < 0xC500; i++)
{
cpu65_vmem_r[i] =
iie_read_slot4; /* slot 4 - MB or Phasor */
}
for (i = 0xC500; i < 0xC600; i++)
{
cpu65_vmem_r[i] =
iie_read_slot5; /* slot 5 - MB #2 */
}
for (i = 0xC600; i < 0xC800; i++)
{
cpu65_vmem_r[i] =
iie_read_slotx; /* slots 6 - 7 (x) */
}
for (i = 0xC800; i < 0xD000; i++)
{
cpu65_vmem_r[i] =
iie_read_slot_expansion; /* expansion rom */
}
cpu65_vmem_r[0xCFFF] =
cpu65_vmem_w[0xCFFF] =
iie_disable_slot_expansion;
video_set(0);
// Peripheral card slot initializations ...
// HACK TODO FIXME : this needs to be tied to the UI/configuration system (once we have more/conflicting options)
#ifdef AUDIO_ENABLED
mb_io_initialize(4, 5); /* Mockingboard(s) and/or Phasor in slots 4 & 5 */
#endif
disk_io_initialize(6); /* Put a Disk ][ Controller in slot 6 */
}
/* -------------------------------------------------------------------------
c_initialize_apple_ii_memory()
------------------------------------------------------------------------- */
void c_initialize_apple_ii_memory()
{
FILE *f;
int i;
for (i = 0; i < 0x10000; i++)
{
apple_ii_64k[0][i] = 0;
apple_ii_64k[1][i] = 0;
}
for (i = 0; i < 8192; i++)
{
language_card[0][i] = language_card[1][i] = 0;
}
for (i = 0; i < 8192; i++)
{
language_banks[0][i] = language_banks[1][i] = 0;
}
if (!iie_rom_loaded)
{
char temp[PATH_MAX];
snprintf(temp, PATH_MAX, "%s/apple_IIe.rom", system_path);
if ((f = fopen(temp, "r")) == NULL)
{
printf("Cannot find file '%s'.\n",temp);
exit(0);
}
if (fread(apple_iie_rom, 32768, 1, f) != 32768)
{
// ERROR ...
}
fclose(f);
iie_rom_loaded = 1;
}
/* load the rom from 0xC000, slot rom main, internal rom aux */
for (i = 0xC000; i < 0x10000; i++)
{
apple_ii_64k[0][i] = apple_iie_rom[i - 0xC000];
apple_ii_64k[1][i] = apple_iie_rom[i - 0x8000];
}
for (i = 0; i < 0x1000; i++)
{
language_banks[0][i] = apple_iie_rom[i + 0x1000];
language_banks[1][i] = apple_iie_rom[i + 0x5000];
}
for (i = 0; i < 0x2000; i++)
{
language_card[0][i] = apple_iie_rom[i + 0x2000];
language_card[1][i] = apple_iie_rom[i + 0x6000];
}
apple_ii_64k[0][0xC000] = 0x00;
apple_ii_64k[1][0xC000] = 0x00;
}
/* -------------------------------------------------------------------------
void c_initialize_sound_hooks()
------------------------------------------------------------------------- */
void c_initialize_sound_hooks()
{
#ifdef AUDIO_ENABLED
SpkrSetVolume(sound_volume * (SPKR_DATA_INIT/10));
#endif
for (int i = 0xC030; i < 0xC040; i++)
{
cpu65_vmem_r[i] = cpu65_vmem_w[i] =
#ifdef AUDIO_ENABLED
(sound_volume > 0) ? speaker_toggle :
#endif
ram_nop;
}
}
void c_disable_sound_hooks()
{
for (int i = 0xC030; i < 0xC040; i++)
{
cpu65_vmem_r[i] = ram_nop;
}
}
/* -------------------------------------------------------------------------
c_initialize_iie_switches
------------------------------------------------------------------------- */
void c_initialize_iie_switches() {
base_stackzp = apple_ii_64k[0];
base_d000_rd = apple_ii_64k[0];
base_d000_wrt = language_banks[0] - 0xD000;
base_e000_rd = apple_ii_64k[0];
base_e000_wrt = language_card[0] - 0xE000;
base_ramrd = apple_ii_64k[0];
base_ramwrt = apple_ii_64k[0];
base_textrd = apple_ii_64k[0];
base_textwrt = apple_ii_64k[0];
base_hgrrd = apple_ii_64k[0];
base_hgrwrt= apple_ii_64k[0];
base_c3rom = apple_ii_64k[1]; /* c3rom internal */
base_c4rom = apple_ii_64k[1]; /* c4rom internal */
base_c5rom = apple_ii_64k[1]; /* c5rom internal */
base_cxrom = apple_ii_64k[0]; /* cxrom peripheral */
}
/* -------------------------------------------------------------------------
void c_initialize_vm()
------------------------------------------------------------------------- */
void c_initialize_vm() {
c_initialize_font(); /* font already read in */
c_initialize_apple_ii_memory(); /* read in rom memory */
c_initialize_tables(); /* read/write memory jump tables */
c_initialize_sound_hooks(); /* sound system */
c_init_6(); /* drive ][, slot 6 */
c_initialize_iie_switches(); /* set the //e softswitches */
}
/* -------------------------------------------------------------------------
void c_initialize_firsttime()
------------------------------------------------------------------------- */
void reinitialize(void)
{
c_initialize_vm();
softswitches = SS_TEXT | SS_IOUDIS | SS_C3ROM | SS_LCWRT | SS_LCSEC;
video_setpage( 0 );
video_redraw();
cpu65_init();
timing_initialize();
#ifdef AUDIO_ENABLED
MB_Reset();
#endif
}
void c_initialize_firsttime()
{
#ifdef INTERFACE_CLASSIC
/* read in system files and calculate system defaults */
c_load_interface_font();
#endif
/* initialize the video system */
video_init();
// TODO FIXME : sound system never released ...
#ifdef AUDIO_ENABLED
DSInit();
SpkrInitialize();
MB_Initialize();
#endif
#ifdef DEBUGGER
c_debugger_init();
#endif
reinitialize();
}
#if !defined(TESTING) && !defined(__APPLE__)
extern void *cpu_thread(void *dummyptr);
int main(int _argc, char **_argv) {
argc = _argc;
argv = _argv;
load_settings(); /* user prefs */
c_initialize_firsttime(); /* init svga graphics and vm */
// spin off cpu thread
pthread_create(&cpu_thread_id, NULL, (void *)&cpu_thread, (void *)NULL);
c_keys_set_key(kF8); // show credits
video_main_loop();
}
#endif // TESTING