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 \