105 lines
1.8 KiB
C++
105 lines
1.8 KiB
C++
#include <stdint.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
|
|
#include "resid-fp/sid.h"
|
|
#include <86box/plat.h>
|
|
#include <86box/snd_resid.h>
|
|
|
|
#define RESID_FREQ 48000
|
|
|
|
using reSIDfp::SID;
|
|
|
|
typedef struct psid_t {
|
|
/* resid sid implementation */
|
|
SID *sid;
|
|
int16_t last_sample;
|
|
} psid_t;
|
|
|
|
psid_t *psid;
|
|
|
|
void *
|
|
sid_init(uint8_t type)
|
|
{
|
|
reSIDfp::SamplingMethod method = reSIDfp::RESAMPLE;
|
|
float cycles_per_sec = 14318180.0 / 16.0;
|
|
|
|
psid = new psid_t;
|
|
psid->sid = new SID;
|
|
|
|
switch (type) {
|
|
default:
|
|
case 0:
|
|
psid->sid->setChipModel(reSIDfp::MOS6581);
|
|
case 1:
|
|
psid->sid->setChipModel(reSIDfp::MOS8580);
|
|
}
|
|
|
|
psid->sid->reset();
|
|
|
|
for (uint8_t c = 0; c < 32; c++)
|
|
psid->sid->write(c, 0);
|
|
|
|
try {
|
|
psid->sid->setSamplingParameters(cycles_per_sec, method, (float) RESID_FREQ);
|
|
} catch (reSIDfp::SIDError) {
|
|
#if 0
|
|
printf("reSID failed!\n");
|
|
#endif
|
|
}
|
|
|
|
psid->sid->input(0);
|
|
|
|
return (void *) psid;
|
|
}
|
|
|
|
void
|
|
sid_close(UNUSED(void *priv))
|
|
{
|
|
delete psid->sid;
|
|
#if 0
|
|
free(psid);
|
|
#endif
|
|
}
|
|
|
|
void
|
|
sid_reset(UNUSED(void *priv))
|
|
{
|
|
psid->sid->reset();
|
|
|
|
for (uint8_t c = 0; c < 32; c++)
|
|
psid->sid->write(c, 0);
|
|
}
|
|
|
|
uint8_t
|
|
sid_read(uint16_t addr, UNUSED(void *priv))
|
|
{
|
|
return psid->sid->read(addr & 0x1f);
|
|
}
|
|
|
|
void
|
|
sid_write(uint16_t addr, uint8_t val, UNUSED(void *priv))
|
|
{
|
|
psid->sid->write(addr & 0x1f, val);
|
|
}
|
|
|
|
#define CLOCK_DELTA(n) (int) (((14318180.0 * n) / 16.0) / (float) RESID_FREQ)
|
|
|
|
static void
|
|
fillbuf2(int &count, int16_t *buf, int len)
|
|
{
|
|
int c;
|
|
c = psid->sid->clock(count, buf);
|
|
if (!c)
|
|
*buf = psid->last_sample;
|
|
psid->last_sample = *buf;
|
|
}
|
|
void
|
|
sid_fillbuf(int16_t *buf, int len, UNUSED(void *priv))
|
|
{
|
|
int x = CLOCK_DELTA(len);
|
|
|
|
fillbuf2(x, buf, len);
|
|
}
|