diff --git a/src/machine/m_ps1.c b/src/machine/m_ps1.c index 29dd9c7c8..7fe78af20 100644 --- a/src/machine/m_ps1.c +++ b/src/machine/m_ps1.c @@ -22,7 +22,13 @@ * The reserved 384K is remapped to the top of extended memory. * If this is not done then you get an error on startup. * - * Version: @(#)m_ps1.c 1.0.2 2017/11/05 + * NOTES: Floppy does not seem to work. --FvK + * The "ROM DOS" shell does not seem to work. We do have the + * correct BIOS images now, and they do load, but they do not + * boot. Sometimes, they do, and then it shows an "Incorrect + * DOS" error message?? --FvK + * + * Version: @(#)m_ps1.c 1.0.3 2017/11/08 * * Authors: Sarah Walker, * Miran Grca, @@ -45,6 +51,7 @@ #include "../pit.h" #include "../mem.h" #include "../rom.h" +#include "../timer.h" #include "../device.h" #include "../nvr.h" #include "../game/gameport.h" @@ -56,13 +63,26 @@ #include "../floppy/floppy.h" #include "../floppy/fdd.h" #include "../floppy/fdc.h" -#include "../sound/snd_ps1.h" +#include "../sound/sound.h" +#include "../sound/snd_sn76489.h" #include "../video/video.h" #include "../video/vid_vga.h" #include "../video/vid_ti_cf62011.h" #include "machine.h" +typedef struct { + sn76489_t sn76489; + uint8_t status, ctrl; + int64_t timer_latch, timer_count, timer_enable; + uint8_t fifo[2048]; + int fifo_read_idx, fifo_write_idx; + int fifo_threshold; + uint8_t dac_val; + int16_t buffer[SOUNDBUFLEN]; + int pos; +} ps1snd_t; + typedef struct { int model; @@ -85,6 +105,177 @@ typedef struct { } ps1_t; +static void +update_irq_status(ps1snd_t *snd) +{ + if (((snd->status & snd->ctrl) & 0x12) && (snd->ctrl & 0x01)) + picint(1 << 7); + else + picintc(1 << 7); +} + + +static uint8_t +snd_read(uint16_t port, void *priv) +{ + ps1snd_t *snd = (ps1snd_t *)priv; + uint8_t ret = 0xff; + + switch (port & 7) { + case 0: /* ADC data */ + snd->status &= ~0x10; + update_irq_status(snd); + ret = 0; + break; + + case 2: /* status */ + ret = snd->status; + ret |= (snd->ctrl & 0x01); + if ((snd->fifo_write_idx - snd->fifo_read_idx) >= 2048) + ret |= 0x08; /* FIFO full */ + if (snd->fifo_read_idx == snd->fifo_write_idx) + ret |= 0x04; /* FIFO empty */ + break; + + case 3: /* FIFO timer */ + /* + * The PS/1 Technical Reference says this should return + * thecurrent value, but the PS/1 BIOS and Stunt Island + * expect it not to change. + */ + ret = snd->timer_latch; + break; + + case 4: + case 5: + case 6: + case 7: + ret = 0; + } + + return(ret); +} + + +static void +snd_write(uint16_t port, uint8_t val, void *priv) +{ + ps1snd_t *snd = (ps1snd_t *)priv; + + switch (port & 7) { + case 0: /* DAC output */ + if ((snd->fifo_write_idx - snd->fifo_read_idx) < 2048) { + snd->fifo[snd->fifo_write_idx & 2047] = val; + snd->fifo_write_idx++; + } + break; + + case 2: /* control */ + snd->ctrl = val; + if (! (val & 0x02)) + snd->status &= ~0x02; + update_irq_status(snd); + break; + + case 3: /* timer reload value */ + snd->timer_latch = val; + snd->timer_count = (int64_t) ((0xff-val) * TIMER_USEC); + snd->timer_enable = (val != 0); + break; + + case 4: /* almost empty */ + snd->fifo_threshold = val * 4; + break; + } +} + + +static void +snd_update(ps1snd_t *snd) +{ + for (; snd->pos < sound_pos_global; snd->pos++) + snd->buffer[snd->pos] = (int8_t)(snd->dac_val ^ 0x80) * 0x20; +} + + +static void +snd_callback(void *priv) +{ + ps1snd_t *snd = (ps1snd_t *)priv; + + snd_update(snd); + + if (snd->fifo_read_idx != snd->fifo_write_idx) { + snd->dac_val = snd->fifo[snd->fifo_read_idx & 2047]; + snd->fifo_read_idx++; + } + + if ((snd->fifo_write_idx - snd->fifo_read_idx) == snd->fifo_threshold) + snd->status |= 0x02; /*FIFO almost empty*/ + + snd->status |= 0x10; /*ADC data ready*/ + update_irq_status(snd); + + snd->timer_count += snd->timer_latch * TIMER_USEC; +} + + +static void +snd_get_buffer(int32_t *buffer, int len, void *priv) +{ + ps1snd_t *snd = (ps1snd_t *)priv; + int c; + + snd_update(snd); + + for (c = 0; c < len * 2; c++) + buffer[c] += snd->buffer[c >> 1]; + + snd->pos = 0; +} + + +static void * +snd_init(device_t *info) +{ + ps1snd_t *snd; + + snd = malloc(sizeof(ps1snd_t)); + memset(snd, 0x00, sizeof(ps1snd_t)); + + sn76489_init(&snd->sn76489, 0x0205, 0x0001, SN76496, 4000000); + + io_sethandler(0x0200, 1, snd_read,NULL,NULL, snd_write,NULL,NULL, snd); + io_sethandler(0x0202, 6, snd_read,NULL,NULL, snd_write,NULL,NULL, snd); + + timer_add(snd_callback, &snd->timer_count, &snd->timer_enable, snd); + + sound_add_handler(snd_get_buffer, snd); + + return(snd); +} + + +static void +snd_close(void *priv) +{ + ps1snd_t *snd = (ps1snd_t *)priv; + + free(snd); +} + + +static device_t snd_device = { + "PS/1 Audio Card", + 0, 0, + snd_init, snd_close, NULL, + NULL, + NULL, + NULL, + NULL +}; + + static void recalc_memory(ps1_t *ps) { @@ -354,14 +545,14 @@ ps1_common_init(machine_t *model) nvr_at_init(8); -// if (romset != ROM_IBMPS1_2011) + if (romset != ROM_IBMPS1_2011) ide_init(); device_add(&keyboard_at_device); if (romset != ROM_IBMPS1_2133) { fdc_set_dskchg_activelow(); - device_add(&ps1_audio_device); + device_add(&snd_device); } /* Audio uses ports 200h and 202-207h, so only initialize gameport on 201h. */ diff --git a/src/sound/snd_ps1.c b/src/sound/snd_ps1.c deleted file mode 100644 index c969f4fd5..000000000 --- a/src/sound/snd_ps1.c +++ /dev/null @@ -1,174 +0,0 @@ -#include -#include -#include -#include -#include -#include "../86box.h" -#include "../io.h" -#include "../pic.h" -#include "../timer.h" -#include "../device.h" -#include "sound.h" -#include "snd_ps1.h" -#include "snd_sn76489.h" - - -typedef struct ps1_audio_t -{ - sn76489_t sn76489; - - uint8_t status, ctrl; - - int64_t timer_latch, timer_count, timer_enable; - - uint8_t fifo[2048]; - int fifo_read_idx, fifo_write_idx; - int fifo_threshold; - - uint8_t dac_val; - - int16_t buffer[SOUNDBUFLEN]; - int pos; -} ps1_audio_t; - -static void ps1_update_irq_status(ps1_audio_t *ps1) -{ - if (((ps1->status & ps1->ctrl) & 0x12) && (ps1->ctrl & 0x01)) - picint(1 << 7); - else - picintc(1 << 7); -} - -static uint8_t ps1_audio_read(uint16_t port, void *p) -{ - ps1_audio_t *ps1 = (ps1_audio_t *)p; - uint8_t temp; - - switch (port & 7) - { - case 0: /*ADC data*/ - ps1->status &= ~0x10; - ps1_update_irq_status(ps1); - return 0; - case 2: /*Status*/ - temp = ps1->status; - temp |= (ps1->ctrl & 0x01); - if ((ps1->fifo_write_idx - ps1->fifo_read_idx) >= 2048) - temp |= 0x08; /*FIFO full*/ - if (ps1->fifo_read_idx == ps1->fifo_write_idx) - temp |= 0x04; /*FIFO empty*/ - return temp; - case 3: /*FIFO timer*/ - /*PS/1 technical reference says this should return the current value, - but the PS/1 BIOS and Stunt Island expect it not to change*/ - return ps1->timer_latch; - case 4: case 5: case 6: case 7: - return 0; - } - return 0xff; -} - -static void ps1_audio_write(uint16_t port, uint8_t val, void *p) -{ - ps1_audio_t *ps1 = (ps1_audio_t *)p; - - switch (port & 7) - { - case 0: /*DAC output*/ - if ((ps1->fifo_write_idx - ps1->fifo_read_idx) < 2048) - { - ps1->fifo[ps1->fifo_write_idx & 2047] = val; - ps1->fifo_write_idx++; - } - break; - case 2: /*Control*/ - ps1->ctrl = val; - if (!(val & 0x02)) - ps1->status &= ~0x02; - ps1_update_irq_status(ps1); - break; - case 3: /*Timer reload value*/ - ps1->timer_latch = val; - ps1->timer_count = (int64_t) ((0xff-val) * TIMER_USEC); - ps1->timer_enable = (val != 0); - break; - case 4: /*Almost empty*/ - ps1->fifo_threshold = val * 4; - break; - } -} - -static void ps1_audio_update(ps1_audio_t *ps1) -{ - for (; ps1->pos < sound_pos_global; ps1->pos++) - ps1->buffer[ps1->pos] = (int8_t)(ps1->dac_val ^ 0x80) * 0x20; -} - -static void ps1_audio_callback(void *p) -{ - ps1_audio_t *ps1 = (ps1_audio_t *)p; - - ps1_audio_update(ps1); - - if (ps1->fifo_read_idx != ps1->fifo_write_idx) - { - ps1->dac_val = ps1->fifo[ps1->fifo_read_idx & 2047]; - ps1->fifo_read_idx++; - } - if ((ps1->fifo_write_idx - ps1->fifo_read_idx) == ps1->fifo_threshold) - { - ps1->status |= 0x02; /*FIFO almost empty*/ - } - ps1->status |= 0x10; /*ADC data ready*/ - ps1_update_irq_status(ps1); - - ps1->timer_count += ps1->timer_latch * TIMER_USEC; -} - -static void ps1_audio_get_buffer(int32_t *buffer, int len, void *p) -{ - ps1_audio_t *ps1 = (ps1_audio_t *)p; - int c; - - ps1_audio_update(ps1); - - for (c = 0; c < len * 2; c++) - buffer[c] += ps1->buffer[c >> 1]; - - ps1->pos = 0; -} - -static void *ps1_audio_init(device_t *info) -{ - ps1_audio_t *ps1 = malloc(sizeof(ps1_audio_t)); - memset(ps1, 0, sizeof(ps1_audio_t)); - - sn76489_init(&ps1->sn76489, 0x0205, 0x0001, SN76496, 4000000); - - io_sethandler(0x0200, 0x0001, ps1_audio_read, NULL, NULL, ps1_audio_write, NULL, NULL, ps1); - io_sethandler(0x0202, 0x0006, ps1_audio_read, NULL, NULL, ps1_audio_write, NULL, NULL, ps1); - timer_add(ps1_audio_callback, &ps1->timer_count, &ps1->timer_enable, ps1); - sound_add_handler(ps1_audio_get_buffer, ps1); - - return ps1; -} - -static void ps1_audio_close(void *p) -{ - ps1_audio_t *ps1 = (ps1_audio_t *)p; - - free(ps1); -} - -device_t ps1_audio_device = -{ - "PS/1 Audio Card", - 0, 0, - ps1_audio_init, - ps1_audio_close, - NULL, - NULL, - NULL, - NULL, - NULL -}; diff --git a/src/sound/snd_ps1.h b/src/sound/snd_ps1.h deleted file mode 100644 index 04bb209d5..000000000 --- a/src/sound/snd_ps1.h +++ /dev/null @@ -1 +0,0 @@ -extern device_t ps1_audio_device; diff --git a/src/win/Makefile.mingw b/src/win/Makefile.mingw index d80dd2dbb..b41a4086e 100644 --- a/src/win/Makefile.mingw +++ b/src/win/Makefile.mingw @@ -354,7 +354,7 @@ SNDOBJ := sound.o \ midi.o $(FSYNTHOBJ) $(MUNTOBJ) \ midi_system.o \ snd_speaker.o \ - snd_ps1.o snd_pssj.o \ + snd_pssj.o \ snd_lpt_dac.o snd_lpt_dss.o \ snd_adlib.o snd_adlibgold.o snd_ad1848.o snd_audiopci.o \ snd_sb.o snd_sb_dsp.o snd_cms.o snd_dbopl.o \