mirror of
https://github.com/Oibaf66/frodo-wii.git
synced 2024-11-10 21:55:11 +01:00
Cleanup
This commit is contained in:
parent
5ae81fc5bf
commit
580a876773
418
Src/C64_Be.h
418
Src/C64_Be.h
@ -1,418 +0,0 @@
|
||||
/*
|
||||
* C64_Be.h - Put the pieces together, Be specific stuff
|
||||
*
|
||||
* Frodo (C) 1994-1997,2002-2005 Christian Bauer
|
||||
*
|
||||
* This program is free software; you can redistribute it and/or modify
|
||||
* it under the terms of the GNU General Public License as published by
|
||||
* the Free Software Foundation; either version 2 of the License, or
|
||||
* (at your option) any later version.
|
||||
*
|
||||
* This program is distributed in the hope that it will be useful,
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
* GNU General Public License for more details.
|
||||
*
|
||||
* You should have received a copy of the GNU General Public License
|
||||
* along with this program; if not, write to the Free Software
|
||||
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
||||
*/
|
||||
|
||||
#include <KernelKit.h>
|
||||
#include <device/Joystick.h>
|
||||
#include <device/DigitalPort.h>
|
||||
|
||||
#undef PROFILING
|
||||
|
||||
|
||||
/*
|
||||
* Constructor, system-dependent things
|
||||
*/
|
||||
|
||||
void C64::c64_ctor1(void)
|
||||
{
|
||||
joy[0] = joy[1] = NULL;
|
||||
joy_geek_port[0] = joy_geek_port[1] = false;
|
||||
}
|
||||
|
||||
void C64::c64_ctor2(void)
|
||||
{
|
||||
// Initialize joystick variables
|
||||
joy_minx = joy_miny = 32767;
|
||||
joy_maxx = joy_maxy = 0;
|
||||
|
||||
// Initialize semaphores (initially acquired)
|
||||
pause_sem = create_sem(0, "Frodo Pause Semaphore");
|
||||
sound_sync_sem = create_sem(0, "Frodo Sound Sync Semaphore");
|
||||
|
||||
// Preset speedometer start time
|
||||
start_time = system_time();
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Destructor, system-dependent things
|
||||
*/
|
||||
|
||||
void C64::c64_dtor(void)
|
||||
{
|
||||
delete_sem(pause_sem);
|
||||
delete_sem(sound_sync_sem);
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Start main emulation thread
|
||||
*/
|
||||
|
||||
void C64::Run(void)
|
||||
{
|
||||
// Reset chips
|
||||
TheCPU->Reset();
|
||||
TheSID->Reset();
|
||||
TheCIA1->Reset();
|
||||
TheCIA2->Reset();
|
||||
TheCPU1541->Reset();
|
||||
|
||||
// Patch kernal IEC routines
|
||||
orig_kernal_1d84 = Kernal[0x1d84];
|
||||
orig_kernal_1d85 = Kernal[0x1d85];
|
||||
PatchKernal(ThePrefs.FastReset, ThePrefs.Emul1541Proc);
|
||||
|
||||
// Start the CPU thread
|
||||
the_thread = spawn_thread(thread_invoc, "Frodo 6510", B_URGENT_DISPLAY_PRIORITY, this);
|
||||
thread_running = true;
|
||||
quit_thyself = false;
|
||||
have_a_break = false;
|
||||
resume_thread(the_thread);
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Stop main emulation thread
|
||||
*/
|
||||
|
||||
void C64::Quit(void)
|
||||
{
|
||||
long ret;
|
||||
|
||||
// Ask the thread to quit itself if it is running
|
||||
if (thread_running) {
|
||||
if (have_a_break)
|
||||
Resume();
|
||||
quit_thyself = true;
|
||||
wait_for_thread(the_thread, &ret);
|
||||
thread_running = false;
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Pause main emulation thread
|
||||
*/
|
||||
|
||||
void C64::Pause(void)
|
||||
{
|
||||
// Ask the thread to pause and wait for acknowledge
|
||||
if (thread_running && !have_a_break) {
|
||||
have_a_break = true;
|
||||
acquire_sem(pause_sem);
|
||||
TheSID->PauseSound();
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Resume main emulation thread
|
||||
*/
|
||||
|
||||
void C64::Resume(void)
|
||||
{
|
||||
if (thread_running && have_a_break) {
|
||||
have_a_break = false;
|
||||
release_sem(pause_sem);
|
||||
TheSID->ResumeSound();
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Vertical blank: Poll keyboard and joysticks, update window
|
||||
*/
|
||||
|
||||
void C64::VBlank(bool draw_frame)
|
||||
{
|
||||
bigtime_t elapsed_time;
|
||||
long speed_index;
|
||||
|
||||
// To avoid deadlocks on quitting
|
||||
if (quit_thyself) return;
|
||||
|
||||
// Pause requested?
|
||||
if (have_a_break) {
|
||||
release_sem(pause_sem); // Acknowledge pause
|
||||
acquire_sem(pause_sem); // Wait for resume
|
||||
}
|
||||
|
||||
// Poll keyboard
|
||||
TheDisplay->PollKeyboard(TheCIA1->KeyMatrix, TheCIA1->RevMatrix, &joykey);
|
||||
|
||||
// Poll joysticks
|
||||
TheCIA1->Joystick1 = poll_joystick(0);
|
||||
TheCIA1->Joystick2 = poll_joystick(1);
|
||||
|
||||
if (ThePrefs.JoystickSwap) {
|
||||
uint8 tmp = TheCIA1->Joystick1;
|
||||
TheCIA1->Joystick1 = TheCIA1->Joystick2;
|
||||
TheCIA1->Joystick2 = tmp;
|
||||
}
|
||||
|
||||
// Joystick keyboard emulation
|
||||
if (TheDisplay->NumLock())
|
||||
TheCIA1->Joystick1 &= joykey;
|
||||
else
|
||||
TheCIA1->Joystick2 &= joykey;
|
||||
|
||||
// Count TOD clocks
|
||||
TheCIA1->CountTOD();
|
||||
TheCIA2->CountTOD();
|
||||
|
||||
// Update window if needed
|
||||
if (draw_frame) {
|
||||
TheDisplay->Update();
|
||||
|
||||
// Calculate time between VBlanks, display speedometer
|
||||
elapsed_time = system_time() - start_time;
|
||||
speed_index = 20000 * 100 * ThePrefs.SkipFrames / (elapsed_time + 1);
|
||||
|
||||
// Limit speed to 100% if desired (20ms/frame)
|
||||
// If the SID emulation is on and no frames are skipped, synchronize to the SID
|
||||
if (ThePrefs.LimitSpeed && speed_index > 100) {
|
||||
if (ThePrefs.SIDType == SIDTYPE_DIGITAL && ThePrefs.SkipFrames == 1) {
|
||||
long l;
|
||||
get_sem_count(sound_sync_sem, &l);
|
||||
if (l > 0) // Avoid C64 lagging behind
|
||||
acquire_sem_etc(sound_sync_sem, l+1, 0, 0);
|
||||
else
|
||||
acquire_sem(sound_sync_sem);
|
||||
} else
|
||||
snooze(ThePrefs.SkipFrames * 20000 - elapsed_time);
|
||||
speed_index = 100;
|
||||
}
|
||||
|
||||
start_time = system_time();
|
||||
|
||||
TheDisplay->Speedometer(speed_index);
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Called by SID after playing 1/50 sec of sound
|
||||
*/
|
||||
|
||||
void C64::SoundSync(void)
|
||||
{
|
||||
release_sem(sound_sync_sem);
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Open/close joystick drivers given old and new state of
|
||||
* joystick preferences
|
||||
*/
|
||||
|
||||
void C64::open_close_joystick(int port, int oldjoy, int newjoy)
|
||||
{
|
||||
if (oldjoy != newjoy) {
|
||||
joy_minx = joy_miny = 32767; // Reset calibration
|
||||
joy_maxx = joy_maxy = 0;
|
||||
if (joy[port]) {
|
||||
if (joy_geek_port[port]) {
|
||||
((BDigitalPort *)joy[port])->Close();
|
||||
delete (BDigitalPort *)joy[port];
|
||||
} else {
|
||||
((BJoystick *)joy[port])->Close();
|
||||
delete (BJoystick *)joy[port];
|
||||
}
|
||||
joy[port] = NULL;
|
||||
}
|
||||
switch (newjoy) {
|
||||
case 1:
|
||||
joy[port] = new BJoystick;
|
||||
((BJoystick *)joy[port])->Open("joystick1");
|
||||
joy_geek_port[port] = false;
|
||||
break;
|
||||
case 2:
|
||||
joy[port] = new BJoystick;
|
||||
((BJoystick *)joy[port])->Open("joystick2");
|
||||
joy_geek_port[port] = false;
|
||||
break;
|
||||
case 3:
|
||||
joy[port] = new BDigitalPort;
|
||||
((BDigitalPort *)joy[port])->Open("DigitalA");
|
||||
joy_geek_port[port] = true;
|
||||
break;
|
||||
case 4:
|
||||
joy[port] = new BDigitalPort;
|
||||
((BDigitalPort *)joy[port])->Open("DigitalB");
|
||||
joy_geek_port[port] = true;
|
||||
break;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
void C64::open_close_joysticks(int oldjoy1, int oldjoy2, int newjoy1, int newjoy2)
|
||||
{
|
||||
open_close_joystick(0, oldjoy1, newjoy1);
|
||||
open_close_joystick(1, oldjoy2, newjoy2);
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Poll joystick port, return CIA mask
|
||||
*/
|
||||
|
||||
uint8 C64::poll_joystick(int port)
|
||||
{
|
||||
uint8 j = 0xff;
|
||||
|
||||
if (joy[port] == NULL)
|
||||
return j;
|
||||
|
||||
if (joy_geek_port[port]) {
|
||||
|
||||
// GeekPort
|
||||
uint8 val;
|
||||
if (((BDigitalPort *)joy[port])->Read(&val) == 1)
|
||||
j = val | 0xe0;
|
||||
|
||||
} else {
|
||||
|
||||
// Joystick port
|
||||
BJoystick *p = (BJoystick *)joy[port];
|
||||
if (p->Update() != B_ERROR) {
|
||||
if (p->horizontal > joy_maxx)
|
||||
joy_maxx = p->horizontal;
|
||||
if (p->horizontal < joy_minx)
|
||||
joy_minx = p->horizontal;
|
||||
if (p->vertical > joy_maxy)
|
||||
joy_maxy = p->vertical;
|
||||
if (p->vertical < joy_miny)
|
||||
joy_miny = p->vertical;
|
||||
|
||||
if (!p->button1)
|
||||
j &= 0xef; // Button
|
||||
|
||||
if (joy_maxx-joy_minx < 100 || joy_maxy-joy_miny < 100)
|
||||
return j;
|
||||
|
||||
if (p->horizontal < (joy_minx + (joy_maxx-joy_minx)/3))
|
||||
j &= 0xf7; // Right
|
||||
else if (p->horizontal > (joy_minx + 2*(joy_maxx-joy_minx)/3))
|
||||
j &= 0xfb; // Left
|
||||
|
||||
if (p->vertical < (joy_miny + (joy_maxy-joy_miny)/3))
|
||||
j &= 0xfd; // Down
|
||||
else if (p->vertical > (joy_miny + 2*(joy_maxy-joy_miny)/3))
|
||||
j &= 0xfe; // Up
|
||||
}
|
||||
}
|
||||
return j;
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* The emulation's main loop
|
||||
*/
|
||||
|
||||
long C64::thread_invoc(void *obj)
|
||||
{
|
||||
((C64 *)obj)->thread_func();
|
||||
return 0;
|
||||
}
|
||||
|
||||
void C64::thread_func(void)
|
||||
{
|
||||
#ifdef PROFILING
|
||||
static bigtime_t vic_time_acc = 0;
|
||||
static bigtime_t sid_time_acc = 0;
|
||||
static bigtime_t cia_time_acc = 0;
|
||||
static bigtime_t cpu_time_acc = 0;
|
||||
#endif
|
||||
#ifdef FRODO_SC
|
||||
while (!quit_thyself) {
|
||||
// The order of calls is important here
|
||||
if (TheVIC->EmulateCycle())
|
||||
TheSID->EmulateLine();
|
||||
TheCIA1->CheckIRQs();
|
||||
TheCIA2->CheckIRQs();
|
||||
TheCIA1->EmulateCycle();
|
||||
TheCIA2->EmulateCycle();
|
||||
TheCPU->EmulateCycle();
|
||||
|
||||
if (ThePrefs.Emul1541Proc) {
|
||||
TheCPU1541->CountVIATimers(1);
|
||||
if (!TheCPU1541->Idle)
|
||||
TheCPU1541->EmulateCycle();
|
||||
}
|
||||
CycleCounter++;
|
||||
#else
|
||||
while (!quit_thyself) {
|
||||
// The order of calls is important here
|
||||
#ifdef PROFILING
|
||||
bigtime_t start_time = system_time();
|
||||
#endif
|
||||
int cycles = TheVIC->EmulateLine();
|
||||
#ifdef PROFILING
|
||||
bigtime_t vic_time = system_time();
|
||||
#endif
|
||||
TheSID->EmulateLine();
|
||||
#ifdef PROFILING
|
||||
bigtime_t sid_time = system_time();
|
||||
#endif
|
||||
#if !PRECISE_CIA_CYCLES
|
||||
TheCIA1->EmulateLine(ThePrefs.CIACycles);
|
||||
TheCIA2->EmulateLine(ThePrefs.CIACycles);
|
||||
#endif
|
||||
#ifdef PROFILING
|
||||
bigtime_t cia_time = system_time();
|
||||
#endif
|
||||
|
||||
if (ThePrefs.Emul1541Proc) {
|
||||
int cycles_1541 = ThePrefs.FloppyCycles;
|
||||
TheCPU1541->CountVIATimers(cycles_1541);
|
||||
|
||||
if (!TheCPU1541->Idle) {
|
||||
// 1541 processor active, alternately execute
|
||||
// 6502 and 6510 instructions until both have
|
||||
// used up their cycles
|
||||
while (cycles >= 0 || cycles_1541 >= 0)
|
||||
if (cycles > cycles_1541)
|
||||
cycles -= TheCPU->EmulateLine(1);
|
||||
else
|
||||
cycles_1541 -= TheCPU1541->EmulateLine(1);
|
||||
} else
|
||||
TheCPU->EmulateLine(cycles);
|
||||
} else
|
||||
// 1541 processor disabled, only emulate 6510
|
||||
TheCPU->EmulateLine(cycles);
|
||||
#ifdef PROFILING
|
||||
bigtime_t cpu_time = system_time();
|
||||
vic_time_acc += vic_time - start_time;
|
||||
sid_time_acc += sid_time - vic_time;
|
||||
cia_time_acc += cia_time - sid_time;
|
||||
cpu_time_acc += cpu_time - cia_time;
|
||||
#endif
|
||||
|
||||
#endif
|
||||
}
|
||||
|
||||
#ifdef PROFILING
|
||||
bigtime_t total_time = vic_time_acc + sid_time_acc + cia_time_acc + cpu_time_acc;
|
||||
printf("VIC: %Ld\n", vic_time_acc * 100 / total_time);
|
||||
printf("SID: %Ld\n", sid_time_acc * 100 / total_time);
|
||||
printf("CIA: %Ld\n", cia_time_acc * 100 / total_time);
|
||||
printf("CPU: %Ld\n", cpu_time_acc * 100 / total_time);
|
||||
#endif
|
||||
}
|
181
Src/CmdPipe.cpp
181
Src/CmdPipe.cpp
@ -1,181 +0,0 @@
|
||||
/*
|
||||
* CmdPipe.cpp
|
||||
*
|
||||
* Frodo (C) 1994-1997,2002-2005 Christian Bauer
|
||||
*
|
||||
* This program is free software; you can redistribute it and/or modify
|
||||
* it under the terms of the GNU General Public License as published by
|
||||
* the Free Software Foundation; either version 2 of the License, or
|
||||
* (at your option) any later version.
|
||||
*
|
||||
* This program is distributed in the hope that it will be useful,
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
* GNU General Public License for more details.
|
||||
*
|
||||
* You should have received a copy of the GNU General Public License
|
||||
* along with this program; if not, write to the Free Software
|
||||
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
||||
*/
|
||||
|
||||
#include "CmdPipe.h"
|
||||
|
||||
|
||||
extern "C" {
|
||||
#include <string.h>
|
||||
#include <unistd.h>
|
||||
#include <stdlib.h>
|
||||
#include <sys/wait.h>
|
||||
#include <sys/types.h>
|
||||
#include <string.h>
|
||||
#include <signal.h>
|
||||
|
||||
#if defined(__alpha__)
|
||||
#include <cma.h>
|
||||
#endif
|
||||
|
||||
#if defined(AIX)
|
||||
#include <sys/select.h>
|
||||
#else
|
||||
#include <unistd.h>
|
||||
#endif
|
||||
|
||||
#if defined(__linux__)
|
||||
#include <sys/time.h>
|
||||
#endif
|
||||
|
||||
#include <time.h>
|
||||
#include <errno.h>
|
||||
}
|
||||
|
||||
static void kaputt(const char * c1, const char * c2) {
|
||||
fprintf(stderr,"error: %s%s\n",c1,c2);
|
||||
exit(20);
|
||||
}
|
||||
|
||||
Pipe::Pipe(void) : fail(true) {
|
||||
|
||||
fds[0] = 0;
|
||||
fds[1] = 1;
|
||||
|
||||
if (-1 == pipe(fds)) {
|
||||
kaputt("Pipe: ","unable to create pipe");
|
||||
return;
|
||||
}
|
||||
|
||||
fail = false;
|
||||
return;
|
||||
}
|
||||
|
||||
Pipe::~Pipe(void) {
|
||||
|
||||
if (! fail) {
|
||||
close(fds[0]);
|
||||
close(fds[1]);
|
||||
}
|
||||
return;
|
||||
}
|
||||
|
||||
unsigned long Pipe::ewrite(const void * buf, unsigned long len) {
|
||||
|
||||
unsigned long wsum = 0;
|
||||
while (len) {
|
||||
long wlen;
|
||||
|
||||
wlen = ::write(fds[1], buf, (long) len);
|
||||
if (wlen <= 0) {
|
||||
kaputt("Pipe::ewrite ","write-error");
|
||||
}
|
||||
|
||||
len -= wlen;
|
||||
buf = (void*) ((char*) buf + wlen);
|
||||
wsum += wlen;
|
||||
}
|
||||
return wsum;
|
||||
}
|
||||
|
||||
unsigned long Pipe::eread(void * buf, unsigned long len) {
|
||||
|
||||
unsigned long rsum = 0;
|
||||
while (len) {
|
||||
long rlen;
|
||||
|
||||
rlen = ::read(fds[0], buf, (long) len);
|
||||
|
||||
if (rlen <= 0) {
|
||||
kaputt("Pipe::eread ","read-error");
|
||||
}
|
||||
|
||||
len -= rlen;
|
||||
buf = (void*) ((char*) buf + rlen);
|
||||
rsum += rlen;
|
||||
}
|
||||
return rsum;
|
||||
}
|
||||
|
||||
int Pipe::probe(void) const {
|
||||
|
||||
fd_set set;
|
||||
FD_ZERO(&set);
|
||||
FD_SET(fds[0], &set);
|
||||
|
||||
struct timeval tv;
|
||||
tv.tv_sec = 0;
|
||||
tv.tv_usec = 0;
|
||||
|
||||
int res;
|
||||
// Use the following commented line for HP-UX < 10.20
|
||||
// res = select(FD_SETSIZE, (int *)&set, (int *)0, (int *)0, &tv);
|
||||
res = select(FD_SETSIZE, &set, (fd_set *)0, (fd_set *)0, &tv);
|
||||
|
||||
if (res > 0) return -1;
|
||||
return 0;
|
||||
|
||||
}
|
||||
|
||||
CmdPipe::CmdPipe(const char * command, const char * arg, int nicediff) : childpid(0), fail(true) {
|
||||
|
||||
if (tocmd.fail || fromcmd.fail) {
|
||||
kaputt("CmdPipe: ","unable to initialize pipes");
|
||||
return;
|
||||
}
|
||||
|
||||
childpid = fork();
|
||||
|
||||
if (childpid == -1) {
|
||||
childpid = 0;
|
||||
kaputt("CmdPipe: ","unable to fork process");
|
||||
return;
|
||||
}
|
||||
|
||||
if (childpid == 0) {
|
||||
|
||||
if (nicediff) {
|
||||
if (-1 == nice(nicediff)) {
|
||||
fprintf(stderr,"CmdPipe: unable to change nice-level (non-fatal)");
|
||||
}
|
||||
}
|
||||
|
||||
dup2(tocmd.get_read_fd(), STDIN_FILENO);
|
||||
|
||||
dup2(fromcmd.get_write_fd(), STDOUT_FILENO);
|
||||
execlp(command, "Frodo_GUI", arg, (char *)0);
|
||||
kaputt("CmdPipe: unable to execute child process ",command);
|
||||
_exit(0); // exit (and do NOT call destructors etc..)
|
||||
}
|
||||
|
||||
fail = false;
|
||||
return;
|
||||
}
|
||||
|
||||
CmdPipe::~CmdPipe(void) {
|
||||
|
||||
if (childpid) {
|
||||
int status;
|
||||
waitpid(childpid, &status, 0);
|
||||
|
||||
if (status != 0) {
|
||||
fprintf(stderr,"~CmdPipe child process returned error\n");
|
||||
}
|
||||
}
|
||||
}
|
@ -1,98 +0,0 @@
|
||||
/*
|
||||
* CmdPipe.h
|
||||
*
|
||||
* Frodo (C) 1994-1997,2002-2005 Christian Bauer
|
||||
*
|
||||
* This program is free software; you can redistribute it and/or modify
|
||||
* it under the terms of the GNU General Public License as published by
|
||||
* the Free Software Foundation; either version 2 of the License, or
|
||||
* (at your option) any later version.
|
||||
*
|
||||
* This program is distributed in the hope that it will be useful,
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
* GNU General Public License for more details.
|
||||
*
|
||||
* You should have received a copy of the GNU General Public License
|
||||
* along with this program; if not, write to the Free Software
|
||||
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
||||
*/
|
||||
|
||||
#ifndef CmdPipe_h
|
||||
#define CmdPipe_h
|
||||
|
||||
extern "C" {
|
||||
#include <stdio.h>
|
||||
#include <sys/types.h>
|
||||
}
|
||||
|
||||
class Pipe {
|
||||
|
||||
protected:
|
||||
|
||||
int fds[2];
|
||||
|
||||
public:
|
||||
|
||||
bool fail;
|
||||
|
||||
Pipe(void);
|
||||
Pipe(int fdin, int fdout) : fail(false) {
|
||||
fds[0] = fdin;
|
||||
fds[1] = fdout;
|
||||
}
|
||||
~Pipe(void);
|
||||
|
||||
unsigned long ewrite(const void * buf, unsigned long len);
|
||||
unsigned long eread (void * buf, unsigned long len);
|
||||
|
||||
int get_read_fd(void) const {
|
||||
return fds[0];
|
||||
}
|
||||
|
||||
int get_write_fd(void) const {
|
||||
return fds[1];
|
||||
}
|
||||
|
||||
int probe(void) const;
|
||||
};
|
||||
|
||||
class CmdPipe {
|
||||
|
||||
protected:
|
||||
|
||||
Pipe tocmd;
|
||||
Pipe fromcmd;
|
||||
|
||||
int childpid;
|
||||
|
||||
public:
|
||||
|
||||
bool fail;
|
||||
|
||||
CmdPipe(const char * command, const char * arg, int nicediff = 0);
|
||||
~CmdPipe(void);
|
||||
|
||||
unsigned long ewrite(const void * buf, unsigned long len) {
|
||||
return tocmd.ewrite(buf, len);
|
||||
}
|
||||
|
||||
unsigned long eread (void * buf, unsigned long len) {
|
||||
return fromcmd.eread(buf, len);
|
||||
}
|
||||
|
||||
int get_read_fd(void) const {
|
||||
return fromcmd.get_read_fd();
|
||||
}
|
||||
|
||||
int get_write_fd(void) const {
|
||||
return tocmd.get_write_fd();
|
||||
}
|
||||
|
||||
int probe(void) const {
|
||||
return fromcmd.probe();
|
||||
}
|
||||
|
||||
};
|
||||
|
||||
#endif // CmdPipe_h
|
298
Src/SID_Amiga.h
298
Src/SID_Amiga.h
@ -1,298 +0,0 @@
|
||||
/*
|
||||
* SID_Amiga.h - 6581 emulation, Amiga specific stuff
|
||||
*
|
||||
* Frodo (C) 1994-1997,2002-2005 Christian Bauer
|
||||
*
|
||||
* This program is free software; you can redistribute it and/or modify
|
||||
* it under the terms of the GNU General Public License as published by
|
||||
* the Free Software Foundation; either version 2 of the License, or
|
||||
* (at your option) any later version.
|
||||
*
|
||||
* This program is distributed in the hope that it will be useful,
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
* GNU General Public License for more details.
|
||||
*
|
||||
* You should have received a copy of the GNU General Public License
|
||||
* along with this program; if not, write to the Free Software
|
||||
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
||||
*/
|
||||
|
||||
#include <dos/dostags.h>
|
||||
#include <hardware/cia.h>
|
||||
#include <proto/exec.h>
|
||||
#include <proto/dos.h>
|
||||
#include <proto/ahi.h>
|
||||
#include <proto/graphics.h>
|
||||
|
||||
|
||||
// Library bases
|
||||
struct Library *AHIBase;
|
||||
|
||||
// CIA-A base
|
||||
extern struct CIA ciaa;
|
||||
|
||||
|
||||
/*
|
||||
* Initialization, create sub-process
|
||||
*/
|
||||
|
||||
void DigitalRenderer::init_sound(void)
|
||||
{
|
||||
// Find our (main) task
|
||||
main_task = FindTask(NULL);
|
||||
|
||||
// Create signal for communication
|
||||
main_sig = AllocSignal(-1);
|
||||
|
||||
// Create sub-process and wait until it is ready
|
||||
if ((sound_process = CreateNewProcTags(
|
||||
NP_Entry, (ULONG)&sub_invoc,
|
||||
NP_Name, (ULONG)"Frodo Sound Process",
|
||||
NP_Priority, 1,
|
||||
NP_ExitData, (ULONG)this, // Easiest way to supply sub_invoc with this pointer
|
||||
TAG_DONE)) != NULL)
|
||||
Wait(1 << main_sig);
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Destructor, delete sub-process
|
||||
*/
|
||||
|
||||
DigitalRenderer::~DigitalRenderer()
|
||||
{
|
||||
// Tell sub-process to quit and wait for completion
|
||||
if (sound_process != NULL) {
|
||||
Signal(&(sound_process->pr_Task), 1 << quit_sig);
|
||||
Wait(1 << main_sig);
|
||||
}
|
||||
|
||||
// Free signal
|
||||
FreeSignal(main_sig);
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Sample volume (for sampled voice)
|
||||
*/
|
||||
|
||||
void DigitalRenderer::EmulateLine(void)
|
||||
{
|
||||
sample_buf[sample_in_ptr] = volume;
|
||||
sample_in_ptr = (sample_in_ptr + 1) % SAMPLE_BUF_SIZE;
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Pause sound output
|
||||
*/
|
||||
|
||||
void DigitalRenderer::Pause(void)
|
||||
{
|
||||
if (sound_process != NULL)
|
||||
Signal(&(sound_process->pr_Task), 1 << pause_sig);
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Resume sound output
|
||||
*/
|
||||
|
||||
void DigitalRenderer::Resume(void)
|
||||
{
|
||||
if (sound_process != NULL)
|
||||
Signal(&(sound_process->pr_Task), 1 << resume_sig);
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Sound sub-process
|
||||
*/
|
||||
|
||||
void DigitalRenderer::sub_invoc(void)
|
||||
{
|
||||
// Get pointer to the DigitalRenderer object and call sub_func()
|
||||
DigitalRenderer *r = (DigitalRenderer *)((struct Process *)FindTask(NULL))->pr_ExitData;
|
||||
r->sub_func();
|
||||
}
|
||||
|
||||
void DigitalRenderer::sub_func(void)
|
||||
{
|
||||
ahi_port = NULL;
|
||||
ahi_io = NULL;
|
||||
ahi_ctrl = NULL;
|
||||
sample[0].ahisi_Address = sample[1].ahisi_Address = NULL;
|
||||
ready = FALSE;
|
||||
|
||||
// Create signals for communication
|
||||
quit_sig = AllocSignal(-1);
|
||||
pause_sig = AllocSignal(-1);
|
||||
resume_sig = AllocSignal(-1);
|
||||
ahi_sig = AllocSignal(-1);
|
||||
|
||||
// Open AHI
|
||||
if ((ahi_port = CreateMsgPort()) == NULL)
|
||||
goto wait_for_quit;
|
||||
if ((ahi_io = (struct AHIRequest *)CreateIORequest(ahi_port, sizeof(struct AHIRequest))) == NULL)
|
||||
goto wait_for_quit;
|
||||
ahi_io->ahir_Version = 2;
|
||||
if (OpenDevice(AHINAME, AHI_NO_UNIT, (struct IORequest *)ahi_io, NULL))
|
||||
goto wait_for_quit;
|
||||
AHIBase = (struct Library *)ahi_io->ahir_Std.io_Device;
|
||||
|
||||
// Initialize callback hook
|
||||
sf_hook.h_Entry = sound_func;
|
||||
|
||||
// Open audio control structure
|
||||
if ((ahi_ctrl = AHI_AllocAudio(
|
||||
AHIA_AudioID, 0x0002000b,
|
||||
AHIA_MixFreq, SAMPLE_FREQ,
|
||||
AHIA_Channels, 1,
|
||||
AHIA_Sounds, 2,
|
||||
AHIA_SoundFunc, (ULONG)&sf_hook,
|
||||
AHIA_UserData, (ULONG)this,
|
||||
TAG_DONE)) == NULL)
|
||||
goto wait_for_quit;
|
||||
|
||||
// Prepare SampleInfos and load sounds (two sounds for double buffering)
|
||||
sample[0].ahisi_Type = AHIST_M16S;
|
||||
sample[0].ahisi_Length = SAMPLE_FREQ / CALC_FREQ;
|
||||
sample[0].ahisi_Address = AllocVec(SAMPLE_FREQ / CALC_FREQ * 2, MEMF_PUBLIC | MEMF_CLEAR);
|
||||
sample[1].ahisi_Type = AHIST_M16S;
|
||||
sample[1].ahisi_Length = SAMPLE_FREQ / CALC_FREQ;
|
||||
sample[1].ahisi_Address = AllocVec(SAMPLE_FREQ / CALC_FREQ * 2, MEMF_PUBLIC | MEMF_CLEAR);
|
||||
if (sample[0].ahisi_Address == NULL || sample[1].ahisi_Address == NULL)
|
||||
goto wait_for_quit;
|
||||
AHI_LoadSound(0, AHIST_DYNAMICSAMPLE, &sample[0], ahi_ctrl);
|
||||
AHI_LoadSound(1, AHIST_DYNAMICSAMPLE, &sample[1], ahi_ctrl);
|
||||
|
||||
// Set parameters
|
||||
play_buf = 0;
|
||||
AHI_SetVol(0, 0x10000, 0x8000, ahi_ctrl, AHISF_IMM);
|
||||
AHI_SetFreq(0, SAMPLE_FREQ, ahi_ctrl, AHISF_IMM);
|
||||
AHI_SetSound(0, play_buf, 0, 0, ahi_ctrl, AHISF_IMM);
|
||||
|
||||
// Start audio output
|
||||
AHI_ControlAudio(ahi_ctrl, AHIC_Play, TRUE, TAG_DONE);
|
||||
|
||||
// We are now ready for commands
|
||||
ready = TRUE;
|
||||
Signal(main_task, 1 << main_sig);
|
||||
|
||||
// Accept and execute commands
|
||||
for (;;) {
|
||||
ULONG sigs = Wait((1 << quit_sig) | (1 << pause_sig) | (1 << resume_sig) | (1 << ahi_sig));
|
||||
|
||||
// Quit sub-process
|
||||
if (sigs & (1 << quit_sig))
|
||||
goto quit;
|
||||
|
||||
// Pause sound output
|
||||
if (sigs & (1 << pause_sig))
|
||||
AHI_ControlAudio(ahi_ctrl, AHIC_Play, FALSE, TAG_DONE);
|
||||
|
||||
// Resume sound output
|
||||
if (sigs & (1 << resume_sig))
|
||||
AHI_ControlAudio(ahi_ctrl, AHIC_Play, TRUE, TAG_DONE);
|
||||
|
||||
// Calculate next buffer
|
||||
if (sigs & (1 << ahi_sig))
|
||||
calc_buffer((int16 *)(sample[play_buf].ahisi_Address), sample[play_buf].ahisi_Length * 2);
|
||||
}
|
||||
|
||||
wait_for_quit:
|
||||
// Initialization failed, wait for quit signal
|
||||
Wait(1 << quit_sig);
|
||||
|
||||
quit:
|
||||
// Free everything
|
||||
if (ahi_ctrl != NULL) {
|
||||
AHI_ControlAudio(ahi_ctrl, AHIC_Play, FALSE, TAG_DONE);
|
||||
AHI_FreeAudio(ahi_ctrl);
|
||||
CloseDevice((struct IORequest *)ahi_io);
|
||||
}
|
||||
|
||||
FreeVec(sample[0].ahisi_Address);
|
||||
FreeVec(sample[1].ahisi_Address);
|
||||
|
||||
if (ahi_io != NULL)
|
||||
DeleteIORequest((struct IORequest *)ahi_io);
|
||||
|
||||
if (ahi_port != NULL)
|
||||
DeleteMsgPort(ahi_port);
|
||||
|
||||
FreeSignal(quit_sig);
|
||||
FreeSignal(pause_sig);
|
||||
FreeSignal(resume_sig);
|
||||
FreeSignal(ahi_sig);
|
||||
|
||||
// Quit (synchronized with main task)
|
||||
Forbid();
|
||||
Signal(main_task, 1 << main_sig);
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* AHI sound callback, play next buffer and signal sub-process
|
||||
*/
|
||||
|
||||
ULONG DigitalRenderer::sound_func(void)
|
||||
{
|
||||
register struct AHIAudioCtrl *ahi_ctrl asm ("a2");
|
||||
DigitalRenderer *r = (DigitalRenderer *)ahi_ctrl->ahiac_UserData;
|
||||
r->play_buf ^= 1;
|
||||
AHI_SetSound(0, r->play_buf, 0, 0, ahi_ctrl, 0);
|
||||
Signal(&(r->sound_process->pr_Task), 1 << (r->ahi_sig));
|
||||
return 0;
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Renderer for SID card
|
||||
*/
|
||||
|
||||
// Renderer class
|
||||
class SIDCardRenderer : public SIDRenderer {
|
||||
public:
|
||||
SIDCardRenderer();
|
||||
virtual ~SIDCardRenderer();
|
||||
|
||||
virtual void Reset(void);
|
||||
virtual void EmulateLine(void) {}
|
||||
virtual void WriteRegister(uint16 adr, uint8 byte);
|
||||
virtual void NewPrefs(Prefs *prefs) {}
|
||||
virtual void Pause(void) {}
|
||||
virtual void Resume(void) {}
|
||||
|
||||
private:
|
||||
UBYTE *sid_base; // SID card base pointer
|
||||
};
|
||||
|
||||
// Constructor: Reset SID
|
||||
SIDCardRenderer::SIDCardRenderer()
|
||||
{
|
||||
sid_base = (UBYTE *)0xa00001;
|
||||
Reset();
|
||||
}
|
||||
|
||||
// Destructor: Reset SID
|
||||
SIDCardRenderer::~SIDCardRenderer()
|
||||
{
|
||||
Reset();
|
||||
}
|
||||
|
||||
// Reset SID
|
||||
void SIDCardRenderer::Reset(void)
|
||||
{
|
||||
WaitTOF();
|
||||
ciaa.ciapra |= CIAF_LED;
|
||||
WaitTOF();
|
||||
ciaa.ciapra &= ~CIAF_LED;
|
||||
}
|
||||
|
||||
// Write to register
|
||||
void SIDCardRenderer::WriteRegister(uint16 adr, uint8 byte)
|
||||
{
|
||||
sid_base[adr << 1] = byte;
|
||||
}
|
Loading…
Reference in New Issue
Block a user