mirror of
https://github.com/Oibaf66/frodo-wii.git
synced 2024-11-26 13:34:22 +01:00
793 lines
20 KiB
OpenEdge ABL
793 lines
20 KiB
OpenEdge ABL
/*
|
||
* C64_x.i - Put the pieces together, X specific stuff
|
||
*
|
||
* Frodo (C) 1994-1997,2002 Christian Bauer
|
||
* Unix stuff by Bernd Schmidt/Lutz Vieweg
|
||
*/
|
||
|
||
#include "main.h"
|
||
|
||
#include <sys/types.h>
|
||
#include <dirent.h>
|
||
|
||
#if defined(GEKKO)
|
||
#include <wiiuse/wpad.h>
|
||
#define FONT_PATH "/apps/frodo/FreeMono.ttf"
|
||
#define SAVES_PATH "/apps/frodo/saves"
|
||
#define IMAGE_PATH "/apps/frodo/images"
|
||
#define TMP_PATH "/apps/frodo/tmp"
|
||
#else
|
||
#define FONT_PATH "FreeMono.ttf"
|
||
#define SAVES_PATH "saves"
|
||
#define IMAGE_PATH "images"
|
||
#define TMP_PATH "tmp"
|
||
#endif
|
||
#define MS_PER_FRAME 27
|
||
|
||
static struct timeval tv_start;
|
||
static int MENU_SIZE_X, MENU_SIZE_Y;
|
||
static const char *main_menu_messages[] = {
|
||
"Insert disc or tape", /* 0 */
|
||
"Load disc or tape", /* 1 */
|
||
"Reset C64", /* 2 */
|
||
"Bind key to joystick",/* 3 */
|
||
"Display options", /* 4 */
|
||
"Controller 1 joystick port", /* 5 */
|
||
"^|1|2",
|
||
"Save/Load state", /* 7 */
|
||
" ",
|
||
"Quit", /* 9 */
|
||
NULL,
|
||
};
|
||
|
||
static const char *display_option_messages[] = {
|
||
"double resolution, centered", /* 0 */
|
||
"full-screen stretched", /* 1 */
|
||
NULL,
|
||
};
|
||
|
||
static const char *save_load_state_messages[] = {
|
||
"Load saved state", /* 0 */
|
||
"Save current state", /* 1 */
|
||
"Delete state", /* 2 */
|
||
NULL,
|
||
};
|
||
|
||
/*
|
||
* Constructor, system-dependent things
|
||
*/
|
||
void C64::c64_ctor1(void)
|
||
{
|
||
// Initialize joystick variables
|
||
#ifdef HAVE_LINUX_JOYSTICK_H
|
||
joyfd[0] = joyfd[1] = -1;
|
||
joy_minx = joy_miny = 32767;
|
||
joy_maxx = joy_maxy = -32768;
|
||
#endif
|
||
|
||
this->fake_key_sequence = false;
|
||
this->fake_key_index = 0;
|
||
this->fake_key_keytime = 5;
|
||
this->fake_key_type = 0;
|
||
|
||
this->prefs_changed = false;
|
||
memset(this->save_game_name, 0, sizeof(this->save_game_name));
|
||
strcpy(this->save_game_name, "unknown");
|
||
|
||
MENU_SIZE_X = FULL_DISPLAY_X - FULL_DISPLAY_X / 4;
|
||
MENU_SIZE_Y = FULL_DISPLAY_Y - FULL_DISPLAY_Y / 4;
|
||
|
||
SDL_RWops *rw;
|
||
|
||
Uint8 *data = (Uint8*)malloc(1 * 1024*1024);
|
||
FILE *fp = fopen(FONT_PATH, "r");
|
||
if (!fp) {
|
||
fprintf(stderr, "Could not open font\n");
|
||
exit(1);
|
||
}
|
||
fread(data, 1, 1 * 1024 * 1024, fp);
|
||
rw = SDL_RWFromMem(data, 1 * 1024 * 1024);
|
||
if (!rw) {
|
||
fprintf(stderr, "Could not create RW: %s\n", SDL_GetError());
|
||
exit(1);
|
||
}
|
||
|
||
this->menu_font = TTF_OpenFontRW(rw, 1, 20);
|
||
if (!this->menu_font)
|
||
{
|
||
fprintf(stderr, "Unable to open font\n" );
|
||
exit(1);
|
||
}
|
||
menu_init(&this->main_menu, this->menu_font, main_menu_messages,
|
||
32, 32, MENU_SIZE_X, MENU_SIZE_Y);
|
||
}
|
||
|
||
void C64::c64_ctor2(void)
|
||
{
|
||
gettimeofday(&tv_start, NULL);
|
||
}
|
||
|
||
|
||
/*
|
||
* Destructor, system-dependent things
|
||
*/
|
||
|
||
void C64::c64_dtor(void)
|
||
{
|
||
menu_fini(&this->main_menu);
|
||
}
|
||
|
||
static int cmpstringp(const void *p1, const void *p2)
|
||
{
|
||
return strcmp(* (char * const *) p1, * (char * const *) p2);
|
||
}
|
||
|
||
static const char **get_file_list(const char *base_dir)
|
||
{
|
||
DIR *d = opendir(base_dir);
|
||
const char **file_list;
|
||
int cur = 0;
|
||
struct dirent *de;
|
||
int cnt = 16;
|
||
|
||
if (!d)
|
||
return NULL;
|
||
|
||
file_list = (const char**)malloc(cnt * sizeof(char*));
|
||
file_list[cur++] = strdup("None");
|
||
file_list[cur] = NULL;
|
||
|
||
for (de = readdir(d);
|
||
de;
|
||
de = readdir(d))
|
||
{
|
||
if (strstr(de->d_name, ".d64") || strstr(de->d_name, ".D64") ||
|
||
strstr(de->d_name, ".prg") || strstr(de->d_name, ".PRG") ||
|
||
strstr(de->d_name, ".p00") || strstr(de->d_name, ".P00") ||
|
||
strstr(de->d_name, ".s00") || strstr(de->d_name, ".S00") ||
|
||
strstr(de->d_name, ".t64") || strstr(de->d_name, ".T64") ||
|
||
strstr(de->d_name, ".sav"))
|
||
{
|
||
char *p;
|
||
|
||
p = strdup(de->d_name);
|
||
file_list[cur++] = p;
|
||
file_list[cur] = NULL;
|
||
if (cur > cnt - 2)
|
||
{
|
||
cnt = cnt + 32;
|
||
file_list = (const char**)realloc(file_list, cnt * sizeof(char*));
|
||
if (!file_list)
|
||
return NULL;
|
||
}
|
||
}
|
||
}
|
||
closedir(d);
|
||
qsort(&file_list[1], cur-1, sizeof(const char *), cmpstringp);
|
||
|
||
return file_list;
|
||
}
|
||
|
||
void C64::select_disc(Prefs *np)
|
||
{
|
||
const char **file_list = get_file_list(IMAGE_PATH);
|
||
menu_t select_disc_menu;
|
||
|
||
if (file_list == NULL)
|
||
return;
|
||
|
||
menu_init(&select_disc_menu, this->menu_font, file_list,
|
||
32, 32, MENU_SIZE_X, MENU_SIZE_Y);
|
||
int opt = menu_select(real_screen, &select_disc_menu, NULL);
|
||
if (opt >= 0)
|
||
{
|
||
const char *name = file_list[opt];
|
||
|
||
if (strcmp(file_list[opt], "None") == 0)
|
||
{
|
||
strcpy(np->DrivePath[0], "\0");
|
||
strcpy(this->save_game_name, "unknown");
|
||
}
|
||
else
|
||
{
|
||
snprintf(np->DrivePath[0], 255, "%s/%s",
|
||
IMAGE_PATH, name);
|
||
strncpy(this->save_game_name, name, 255);
|
||
if (strstr(name, ".d64") || strstr(name, ".D64"))
|
||
np->DriveType[0] = DRVTYPE_D64;
|
||
else if (strstr(name, ".prg") || strstr(name, ".PRG") ||
|
||
strstr(name, ".p00") || strstr(name, ".P00") ||
|
||
strstr(name, ".s00") || strstr(name, ".S00")) {
|
||
FILE *src, *dst;
|
||
|
||
/* Clean temp dir first (we only want one file) */
|
||
unlink(TMP_PATH"/a");
|
||
|
||
src = fopen(np->DrivePath[0], "r");
|
||
if (src != NULL)
|
||
{
|
||
np->DriveType[0] = DRVTYPE_DIR;
|
||
snprintf(np->DrivePath[0], 255, "%s", TMP_PATH);
|
||
|
||
/* Special handling of .prg: Copy to TMP_PATH and
|
||
* load that as a dir */
|
||
dst = fopen(TMP_PATH"/a", "w");
|
||
if (dst)
|
||
{
|
||
Uint8 buf[1024];
|
||
size_t v;
|
||
|
||
do {
|
||
v = fread(buf, 1, 1024, src);
|
||
fwrite(buf, 1, v, dst);
|
||
} while (v > 0);
|
||
fclose(dst);
|
||
}
|
||
fclose(src);
|
||
}
|
||
}
|
||
else
|
||
np->DriveType[0] = DRVTYPE_T64;
|
||
NewPrefs(np);
|
||
ThePrefs = *np;
|
||
}
|
||
this->prefs_changed = true;
|
||
}
|
||
menu_fini(&select_disc_menu);
|
||
|
||
/* Cleanup everything */
|
||
for ( int i = 0; file_list[i]; i++ )
|
||
free((void*)file_list[i]);
|
||
free(file_list);
|
||
}
|
||
|
||
/*
|
||
C64 keyboard matrix:
|
||
|
||
Bit 7 6 5 4 3 2 1 0
|
||
0 CUD F5 F3 F1 F7 CLR RET DEL
|
||
1 SHL E S Z 4 A W 3
|
||
2 X T F C 6 D R 5
|
||
3 V U H B 8 G Y 7
|
||
4 N O K M 0 J I 9
|
||
5 , @ : . - L P +
|
||
6 / ^ = SHR HOM ; * <EFBFBD>
|
||
7 R/S Q C= SPC 2 CTL <- 1
|
||
*/
|
||
#define MATRIX(a,b) (((a) << 3) | (b))
|
||
|
||
void C64::bind_key(Prefs *np)
|
||
{
|
||
const char **bind_key_messages;
|
||
bool has_classic_controller = false;
|
||
menu_t bind_key_menu;
|
||
menu_t key_menu;
|
||
static const char *keys[] = { "None", "space", "Run/Stop", "return", "F1", "F3", "F5", "F7",
|
||
"0", "1", "2", "3", "4", "5", "6", "7", "8", "9", "A",
|
||
"B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L", "M",
|
||
"N", "O", "P", "Q", "R", "S", "T", "U", "V", "W", "X", "Y", "Z",
|
||
"ctrl", "del", "home,", "shl", "shr", "clr", "C=", "<-",
|
||
NULL };
|
||
int kcs[] = { 0, MATRIX(7, 4), MATRIX(7, 7), MATRIX(0, 1), /* space, R/S, return */
|
||
MATRIX(0, 4), MATRIX(0, 5), MATRIX(0, 6), MATRIX(0, 3), MATRIX(4, 3), MATRIX(7, 0),
|
||
MATRIX(7, 3), MATRIX(1, 0), MATRIX(1, 3), MATRIX(2, 0), MATRIX(2, 3), MATRIX(3, 0),
|
||
MATRIX(3, 3), MATRIX(4, 0), MATRIX(1, 2), MATRIX(3, 4), MATRIX(2, 4), MATRIX(2, 2),
|
||
MATRIX(1, 6), MATRIX(2, 5), MATRIX(3, 2), MATRIX(3, 5), MATRIX(4, 1), MATRIX(4, 2),
|
||
MATRIX(4, 5), MATRIX(5, 2), MATRIX(4, 4), MATRIX(4, 7), MATRIX(4, 6), MATRIX(5, 1),
|
||
MATRIX(7, 6), MATRIX(2, 1), MATRIX(1, 5), MATRIX(2, 6), MATRIX(3, 6), MATRIX(3, 7),
|
||
MATRIX(1, 1), MATRIX(2, 7), MATRIX(3, 1), MATRIX(1, 4), /* ... Z */
|
||
MATRIX(7, 3), MATRIX(0, 0), MATRIX(6, 4), MATRIX(1, 7), MATRIX(6, 4),
|
||
MATRIX(0, 2), MATRIX(7, 5), MATRIX(7, 1),
|
||
};
|
||
|
||
#if defined(GEKKO)
|
||
WPADData *wpad, *wpad_other;
|
||
|
||
wpad = WPAD_Data(0);
|
||
wpad_other = WPAD_Data(1);
|
||
|
||
if (wpad->exp.type == WPAD_EXP_CLASSIC ||
|
||
wpad_other->exp.type == WPAD_EXP_CLASSIC)
|
||
has_classic_controller = true;
|
||
#endif
|
||
|
||
bind_key_messages = (const char **)malloc( sizeof(const char*) * (N_WIIMOTE_BINDINGS + 1));
|
||
assert(bind_key_messages);
|
||
memset(bind_key_messages, 0, sizeof(const char*) * (N_WIIMOTE_BINDINGS + 1));
|
||
|
||
bind_key_messages[WIIMOTE_A] = "Bind to A";
|
||
bind_key_messages[WIIMOTE_B] = "Bind to B";
|
||
bind_key_messages[WIIMOTE_PLUS] = "Bind to Plus";
|
||
bind_key_messages[WIIMOTE_MINUS] = "Bind to Minus";
|
||
bind_key_messages[WIIMOTE_1] = "Bind to 1";
|
||
|
||
if (has_classic_controller)
|
||
{
|
||
bind_key_messages[WIIMOTE_PLUS] = "Bind to wiimote/classic Plus";
|
||
bind_key_messages[WIIMOTE_MINUS] = "Bind to wiimote/classic Minus";
|
||
|
||
bind_key_messages[CLASSIC_X] = "Bind to classic X";
|
||
bind_key_messages[CLASSIC_Y] = "Bind to classic Y";
|
||
bind_key_messages[CLASSIC_B] = "Bind to classic B";
|
||
bind_key_messages[CLASSIC_L] = "Bind to classic L";
|
||
bind_key_messages[CLASSIC_R] = "Bind to classic R";
|
||
}
|
||
|
||
menu_init(&bind_key_menu, this->menu_font, bind_key_messages,
|
||
32, 32, MENU_SIZE_X, MENU_SIZE_Y);
|
||
int opt = menu_select(real_screen, &bind_key_menu, NULL);
|
||
if (opt >= 0)
|
||
{
|
||
menu_init(&key_menu, this->menu_font, keys,
|
||
32, 32, MENU_SIZE_X, MENU_SIZE_Y);
|
||
int key = menu_select(real_screen, &key_menu, NULL);
|
||
|
||
/* Assume prefs are changed */
|
||
this->prefs_changed = true;
|
||
if (key > 0)
|
||
np->JoystickKeyBinding[opt] = kcs[key];
|
||
else if (key == 0)
|
||
np->JoystickKeyBinding[opt] = -1;
|
||
else
|
||
this->prefs_changed = false;
|
||
menu_fini(&key_menu);
|
||
}
|
||
menu_fini(&bind_key_menu);
|
||
free(bind_key_messages);
|
||
}
|
||
|
||
void C64::display_options(Prefs *np)
|
||
{
|
||
menu_t display_menu;
|
||
|
||
menu_init(&display_menu, this->menu_font, display_option_messages,
|
||
32, 32, MENU_SIZE_X, MENU_SIZE_Y);
|
||
int opt = menu_select(real_screen, &display_menu, NULL);
|
||
if (opt >= 0)
|
||
{
|
||
np->DisplayOption = opt;
|
||
this->prefs_changed = true;
|
||
}
|
||
menu_fini(&display_menu);
|
||
}
|
||
|
||
void C64::save_load_state(Prefs *np)
|
||
{
|
||
menu_t save_load_menu;
|
||
menu_t select_saves_menu;
|
||
|
||
menu_init(&save_load_menu, this->menu_font, save_load_state_messages,
|
||
32, 32, MENU_SIZE_X, MENU_SIZE_Y);
|
||
int opt = menu_select(real_screen, &save_load_menu, NULL);
|
||
switch(opt)
|
||
{
|
||
case 1: /* save */
|
||
{
|
||
char buf[255];
|
||
|
||
snprintf(buf, 255, "%s/%s.sav", SAVES_PATH,
|
||
this->save_game_name);
|
||
|
||
this->SaveSnapshot(buf);
|
||
} break;
|
||
case 0: /* load/delete */
|
||
case 2:
|
||
{
|
||
const char **file_list = get_file_list(SAVES_PATH);
|
||
|
||
if (file_list == NULL)
|
||
break;
|
||
menu_init(&select_saves_menu, this->menu_font, file_list,
|
||
32, 32, MENU_SIZE_X, MENU_SIZE_Y);
|
||
int save = menu_select(real_screen, &select_saves_menu, NULL);
|
||
if (save >= 0)
|
||
{
|
||
char buf[255];
|
||
|
||
snprintf(buf, 255, "%s/%s", SAVES_PATH, file_list[save]);
|
||
if (opt == 2)
|
||
unlink(buf);
|
||
else /* Load the snapshot */
|
||
this->LoadSnapshot(buf);
|
||
}
|
||
menu_fini(&select_saves_menu);
|
||
|
||
/* Cleanup everything */
|
||
for ( int i = 0; file_list[i]; i++ )
|
||
free((void*)file_list[i]);
|
||
free(file_list);
|
||
} break;
|
||
default:
|
||
break;
|
||
}
|
||
menu_fini(&save_load_menu);
|
||
}
|
||
|
||
/*
|
||
* 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);
|
||
|
||
quit_thyself = false;
|
||
thread_func();
|
||
}
|
||
|
||
/* From dreamcast port */
|
||
static const char *auto_seq[4] =
|
||
{
|
||
"\nLOAD \"*\",8,1\nRUN\n",
|
||
"\nLOAD \"*\",9,1\nRUN\n",
|
||
"\nLOAD \"*\",10,1\nRUN\n",
|
||
"\nLOAD \"*\",11,1\nRUN\n",
|
||
};
|
||
extern "C" int get_kc_from_char(char c_in, int *shifted);
|
||
|
||
/*
|
||
* Vertical blank: Poll keyboard and joysticks, update window
|
||
*/
|
||
|
||
void C64::VBlank(bool draw_frame)
|
||
{
|
||
#if defined(GEKKO)
|
||
WPAD_ScanPads();
|
||
#endif
|
||
|
||
// Poll joysticks
|
||
TheCIA1->Joystick1 = poll_joystick(0);
|
||
TheCIA1->Joystick2 = poll_joystick(1);
|
||
|
||
// Poll keyboard
|
||
TheDisplay->PollKeyboard(TheCIA1->KeyMatrix, TheCIA1->RevMatrix, &joykey);
|
||
if (TheDisplay->quit_requested)
|
||
quit_thyself = true;
|
||
|
||
if (this->fake_key_sequence)
|
||
{
|
||
int shifted;
|
||
int kc = get_kc_from_char(auto_seq[this->fake_key_type][this->fake_key_index], &shifted);
|
||
|
||
TheDisplay->FakeKeyPress(kc, shifted, TheCIA1->KeyMatrix,
|
||
TheCIA1->RevMatrix);
|
||
|
||
this->fake_key_keytime --;
|
||
if (this->fake_key_keytime == 0)
|
||
{
|
||
this->fake_key_keytime = 1;
|
||
this->fake_key_index ++;
|
||
|
||
if (auto_seq[this->fake_key_type][this->fake_key_index] == '\0')
|
||
{
|
||
this->fake_key_sequence = false;
|
||
this->fake_key_index = 0;
|
||
this->fake_key_keytime = 5;
|
||
}
|
||
}
|
||
}
|
||
#ifndef GEKKO
|
||
// Joystick keyboard emulation
|
||
if (TheDisplay->NumLock())
|
||
TheCIA1->Joystick1 &= joykey;
|
||
else
|
||
TheCIA1->Joystick2 &= joykey;
|
||
#endif
|
||
|
||
// Count TOD clocks
|
||
TheCIA1->CountTOD();
|
||
TheCIA2->CountTOD();
|
||
|
||
// Update window if needed
|
||
if (draw_frame) {
|
||
TheDisplay->Update();
|
||
#if 0
|
||
// Calculate time between VBlanks, display speedometer
|
||
struct timeval tv;
|
||
gettimeofday(&tv, NULL);
|
||
if ((tv.tv_usec -= tv_start.tv_usec) < 0) {
|
||
tv.tv_usec += 1000000;
|
||
tv.tv_sec -= 1;
|
||
}
|
||
tv.tv_sec -= tv_start.tv_sec;
|
||
double elapsed_time = (double)tv.tv_sec * 1000000 + tv.tv_usec;
|
||
speed_index = 20000 / (elapsed_time + 1) * 100;
|
||
|
||
// Limit speed to 100% if desired
|
||
if ((speed_index > 100)) {
|
||
usleep((unsigned long)(20000 - elapsed_time));
|
||
speed_index = 100;
|
||
}
|
||
|
||
gettimeofday(&tv_start, NULL);
|
||
|
||
TheDisplay->Speedometer((int)speed_index);
|
||
#endif
|
||
}
|
||
if (this->have_a_break) {
|
||
int submenus[1];
|
||
int opt;
|
||
int old_swap = ThePrefs.JoystickSwap == true ? 1 : 0;
|
||
|
||
Prefs np = ThePrefs;
|
||
this->prefs_changed = false;
|
||
|
||
TheSID->PauseSound();
|
||
submenus[0] = old_swap;
|
||
opt = menu_select(real_screen, &this->main_menu, submenus);
|
||
|
||
switch(opt)
|
||
{
|
||
case 0: /* Insert disc/tape */
|
||
this->select_disc(&np);
|
||
break;
|
||
case 1: /* Load disc/tape */
|
||
this->fake_key_sequence = true;
|
||
break;
|
||
case 2: /* Reset */
|
||
Reset();
|
||
break;
|
||
case 3: /* Bind keys to joystick */
|
||
this->bind_key(&np);
|
||
break;
|
||
case 4: /* Display options */
|
||
this->display_options(&np);
|
||
break;
|
||
case 5: /* Swap joysticks */
|
||
break;
|
||
case 7: /* Save / load game */
|
||
this->save_load_state(&np);
|
||
break;
|
||
case 9: /* Quit */
|
||
quit_thyself = true;
|
||
break;
|
||
case -1:
|
||
default:
|
||
break;
|
||
}
|
||
if (submenus[0] == 0)
|
||
np.JoystickSwap = false;
|
||
else
|
||
np.JoystickSwap = true;
|
||
if (submenus[0] != old_swap)
|
||
this->prefs_changed = true;
|
||
|
||
if (this->prefs_changed)
|
||
{
|
||
this->NewPrefs(&np);
|
||
ThePrefs = np;
|
||
}
|
||
TheDisplay->FakeKeyPress(-1, false, TheCIA1->KeyMatrix,
|
||
TheCIA1->RevMatrix);
|
||
|
||
this->have_a_break = false;
|
||
if (this->quit_thyself)
|
||
ThePrefs.Save(PREFS_PATH);
|
||
}
|
||
/* From Acorn port */
|
||
static uint64_t lastFrame;
|
||
uint32_t now = SDL_GetTicks();
|
||
|
||
if ( (now - lastFrame) < MS_PER_FRAME ) {
|
||
SDL_Delay( MS_PER_FRAME - (now - lastFrame) );
|
||
}
|
||
lastFrame = now;
|
||
}
|
||
|
||
|
||
/*
|
||
* Open/close joystick drivers given old and new state of
|
||
* joystick preferences
|
||
*/
|
||
|
||
void C64::open_close_joysticks(bool oldjoy1, bool oldjoy2, bool newjoy1, bool newjoy2)
|
||
{
|
||
#ifdef HAVE_LINUX_JOYSTICK_H
|
||
if (oldjoy1 != newjoy1) {
|
||
joy_minx = joy_miny = 32767; // Reset calibration
|
||
joy_maxx = joy_maxy = -32768;
|
||
if (newjoy1) {
|
||
joyfd[0] = open("/dev/js0", O_RDONLY);
|
||
if (joyfd[0] < 0)
|
||
fprintf(stderr, "Couldn't open joystick 1\n");
|
||
} else {
|
||
close(joyfd[0]);
|
||
joyfd[0] = -1;
|
||
}
|
||
}
|
||
|
||
if (oldjoy2 != newjoy2) {
|
||
joy_minx = joy_miny = 32767; // Reset calibration
|
||
joy_maxx = joy_maxy = -32768;
|
||
if (newjoy2) {
|
||
joyfd[1] = open("/dev/js1", O_RDONLY);
|
||
if (joyfd[1] < 0)
|
||
fprintf(stderr, "Couldn't open joystick 2\n");
|
||
} else {
|
||
close(joyfd[1]);
|
||
joyfd[1] = -1;
|
||
}
|
||
}
|
||
#endif
|
||
}
|
||
|
||
|
||
/*
|
||
* Poll joystick port, return CIA mask
|
||
*/
|
||
|
||
uint8 C64::poll_joystick(int port)
|
||
{
|
||
#ifdef GEKKO
|
||
int extra_keys[N_WIIMOTE_BINDINGS];
|
||
int controller = port;
|
||
WPADData *wpad, *wpad_other;
|
||
Uint32 held, held_other, held_classic, held_classic_other;
|
||
uint8 j = 0xff;
|
||
|
||
if (ThePrefs.JoystickSwap)
|
||
controller = !port;
|
||
held_classic = held_classic_other = 0;
|
||
|
||
wpad = WPAD_Data(controller);
|
||
wpad_other = WPAD_Data(!controller);
|
||
held = wpad->btns_h;
|
||
held_other = wpad_other->btns_h;
|
||
|
||
// Check classic controller as well
|
||
if (wpad->exp.type == WPAD_EXP_CLASSIC)
|
||
held_classic = wpad->exp.classic.btns_held;
|
||
if (wpad_other->exp.type == WPAD_EXP_CLASSIC)
|
||
held_classic_other = wpad_other->exp.classic.btns_held;
|
||
|
||
if ( (held & WPAD_BUTTON_UP) || (held_classic & CLASSIC_CTRL_BUTTON_UP) )
|
||
j &= 0xfb; // Left
|
||
if ( (held & WPAD_BUTTON_DOWN) || (held_classic & CLASSIC_CTRL_BUTTON_DOWN) )
|
||
j &= 0xf7; // Right
|
||
if ( (held & WPAD_BUTTON_RIGHT) || (held_classic & CLASSIC_CTRL_BUTTON_RIGHT) )
|
||
j &= 0xfe; // Up
|
||
if ( (held & WPAD_BUTTON_LEFT) || (held_classic & CLASSIC_CTRL_BUTTON_LEFT) )
|
||
j &= 0xfd; // Down
|
||
if ( (held & WPAD_BUTTON_2) || (held_classic & CLASSIC_CTRL_BUTTON_A) )
|
||
j &= 0xef; // Button
|
||
if ( (held & WPAD_BUTTON_HOME) || (held_classic & CLASSIC_CTRL_BUTTON_HOME) )
|
||
this->enter_menu();
|
||
|
||
extra_keys[WIIMOTE_A] = (held | held_other) & WPAD_BUTTON_A;
|
||
extra_keys[WIIMOTE_B] = (held | held_other) & WPAD_BUTTON_B;
|
||
extra_keys[WIIMOTE_PLUS] = (held | held_other) & WPAD_BUTTON_PLUS;
|
||
extra_keys[WIIMOTE_MINUS] = (held | held_other) & WPAD_BUTTON_MINUS;
|
||
extra_keys[WIIMOTE_1] = (held | held_other) & WPAD_BUTTON_1;
|
||
|
||
/* Classic buttons (might not be connected) */
|
||
extra_keys[CLASSIC_X] = (held_classic | held_classic_other) & CLASSIC_CTRL_BUTTON_X;
|
||
extra_keys[CLASSIC_Y] = (held_classic | held_classic_other) & CLASSIC_CTRL_BUTTON_Y;
|
||
extra_keys[CLASSIC_B] = (held_classic | held_classic_other) & CLASSIC_CTRL_BUTTON_B;
|
||
extra_keys[CLASSIC_L] = (held_classic | held_classic_other) & CLASSIC_CTRL_BUTTON_FULL_L;
|
||
extra_keys[CLASSIC_R] = (held_classic | held_classic_other) & CLASSIC_CTRL_BUTTON_FULL_R;
|
||
|
||
for (int i = 0; i < N_WIIMOTE_BINDINGS; i++)
|
||
{
|
||
int kc = ThePrefs.JoystickKeyBinding[i];
|
||
|
||
if ( kc < 0 )
|
||
continue;
|
||
|
||
if (extra_keys[i])
|
||
TheDisplay->UpdateKeyMatrix(kc, false,
|
||
TheCIA1->KeyMatrix, TheCIA1->RevMatrix);
|
||
else
|
||
TheDisplay->UpdateKeyMatrix(kc, true,
|
||
TheCIA1->KeyMatrix, TheCIA1->RevMatrix);
|
||
}
|
||
|
||
return j;
|
||
#elif defined(HAVE_LINUX_JOYSTICK_H)
|
||
JS_DATA_TYPE js;
|
||
uint8 j = 0xff;
|
||
|
||
if (joyfd[port] >= 0) {
|
||
if (read(joyfd[port], &js, JS_RETURN) == JS_RETURN) {
|
||
if (js.x > joy_maxx)
|
||
joy_maxx = js.x;
|
||
if (js.x < joy_minx)
|
||
joy_minx = js.x;
|
||
if (js.y > joy_maxy)
|
||
joy_maxy = js.y;
|
||
if (js.y < joy_miny)
|
||
joy_miny = js.y;
|
||
|
||
if (joy_maxx-joy_minx < 100 || joy_maxy-joy_miny < 100)
|
||
return 0xff;
|
||
|
||
if (js.x < (joy_minx + (joy_maxx-joy_minx)/3))
|
||
j &= 0xfb; // Left
|
||
else if (js.x > (joy_minx + 2*(joy_maxx-joy_minx)/3))
|
||
j &= 0xf7; // Right
|
||
|
||
if (js.y < (joy_miny + (joy_maxy-joy_miny)/3))
|
||
j &= 0xfe; // Up
|
||
else if (js.y > (joy_miny + 2*(joy_maxy-joy_miny)/3))
|
||
j &= 0xfd; // Down
|
||
|
||
if (js.buttons & 1)
|
||
j &= 0xef; // Button
|
||
}
|
||
}
|
||
return j;
|
||
#else
|
||
return 0xff;
|
||
#endif
|
||
}
|
||
|
||
|
||
/*
|
||
* The emulation's main loop
|
||
*/
|
||
|
||
void C64::thread_func(void)
|
||
{
|
||
int linecnt = 0;
|
||
|
||
#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
|
||
int cycles = TheVIC->EmulateLine();
|
||
TheSID->EmulateLine();
|
||
#if !PRECISE_CIA_CYCLES
|
||
TheCIA1->EmulateLine(ThePrefs.CIACycles);
|
||
TheCIA2->EmulateLine(ThePrefs.CIACycles);
|
||
#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);
|
||
#endif
|
||
linecnt++;
|
||
}
|
||
}
|