Max
/
SameBoy
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity
SameBoy/libretro/libretro.c

1563 lines
54 KiB
C
Raw Permalink Blame History

#include <stdio.h>
#include <string.h>
#include <stdbool.h>
#include <unistd.h>
#include <time.h>
#include <assert.h>
#include <signal.h>
#include <stdarg.h>
#include <stdlib.h>
#ifndef WIIU
#define AUDIO_FREQUENCY 384000
#else
/* Use the internal sample rate for the Wii U */
#define AUDIO_FREQUENCY 48000
#endif
#ifdef _WIN32
#include <direct.h>
#include <windows.h>
#define snprintf _snprintf
#endif
#include <Core/gb.h>
#include "libretro.h"
#include "libretro_core_options.inc"
#ifdef _WIN32
static const char slash = '\\';
#else
static const char slash = '/';
#endif
#define MAX_VIDEO_WIDTH 256
#define MAX_VIDEO_HEIGHT 224
#define MAX_VIDEO_PIXELS (MAX_VIDEO_WIDTH * MAX_VIDEO_HEIGHT)
#define RETRO_MEMORY_GAMEBOY_1_SRAM ((1 << 8) | RETRO_MEMORY_SAVE_RAM)
#define RETRO_MEMORY_GAMEBOY_1_RTC ((2 << 8) | RETRO_MEMORY_RTC)
#define RETRO_MEMORY_GAMEBOY_2_SRAM ((3 << 8) | RETRO_MEMORY_SAVE_RAM)
#define RETRO_MEMORY_GAMEBOY_2_RTC ((3 << 8) | RETRO_MEMORY_RTC)
#define RETRO_GAME_TYPE_GAMEBOY_LINK_2P 0x101
char battery_save_path[512];
char symbols_path[512];
enum model {
MODEL_DMG_B,
MODEL_CGB_C,
MODEL_CGB_E,
MODEL_AGB,
MODEL_SGB_PAL,
MODEL_SGB_NTSC,
MODEL_SGB2,
MODEL_AUTO
};
static const GB_model_t libretro_to_internal_model[] =
{
[MODEL_DMG_B] = GB_MODEL_DMG_B,
[MODEL_CGB_C] = GB_MODEL_CGB_C,
[MODEL_CGB_E] = GB_MODEL_CGB_E,
[MODEL_AGB] = GB_MODEL_AGB,
[MODEL_SGB_PAL] = GB_MODEL_SGB_PAL,
[MODEL_SGB_NTSC] = GB_MODEL_SGB_NTSC,
[MODEL_SGB2] = GB_MODEL_SGB2
};
enum screen_layout {
LAYOUT_TOP_DOWN,
LAYOUT_LEFT_RIGHT
};
enum audio_out {
GB_1,
GB_2
};
static enum model model[2];
static enum model auto_model = MODEL_CGB_E;
static uint32_t *frame_buf = NULL;
static uint32_t *frame_buf_copy = NULL;
static struct retro_log_callback logging;
static retro_log_printf_t log_cb;
static retro_video_refresh_t video_cb;
static retro_audio_sample_t audio_sample_cb;
static retro_input_poll_t input_poll_cb;
static retro_input_state_t input_state_cb;
static bool libretro_supports_bitmasks = false;
static unsigned emulated_devices = 1;
static bool initialized = false;
static unsigned screen_layout = 0;
static unsigned audio_out = 0;
static bool geometry_updated = false;
static bool link_cable_emulation = false;
/*static bool infrared_emulation = false;*/
signed short soundbuf[1024 * 2];
char retro_system_directory[4096];
char retro_save_directory[4096];
char retro_game_path[4096];
GB_gameboy_t gameboy[2];
extern const unsigned char dmg_boot[], cgb_boot[], agb_boot[], sgb_boot[], sgb2_boot[];
extern const unsigned dmg_boot_length, cgb_boot_length, agb_boot_length, sgb_boot_length, sgb2_boot_length;
bool vblank1_occurred = false, vblank2_occurred = false;
static void fallback_log(enum retro_log_level level, const char *fmt, ...)
{
(void)level;
va_list va;
va_start(va, fmt);
vfprintf(stderr, fmt, va);
va_end(va);
}
static struct retro_rumble_interface rumble;
static void GB_update_keys_status(GB_gameboy_t *gb, unsigned port)
{
uint16_t joypad_bits = 0;
input_poll_cb();
if (libretro_supports_bitmasks) {
joypad_bits = input_state_cb(port, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_MASK);
}
else {
unsigned j;
for (j = 0; j < (RETRO_DEVICE_ID_JOYPAD_R3 + 1); j++) {
if (input_state_cb(port, RETRO_DEVICE_JOYPAD, 0, j)) {
joypad_bits |= (1 << j);
}
}
}
GB_set_key_state_for_player(gb, GB_KEY_RIGHT, emulated_devices == 1 ? port : 0,
joypad_bits & (1 << RETRO_DEVICE_ID_JOYPAD_RIGHT));
GB_set_key_state_for_player(gb, GB_KEY_LEFT, emulated_devices == 1 ? port : 0,
joypad_bits & (1 << RETRO_DEVICE_ID_JOYPAD_LEFT));
GB_set_key_state_for_player(gb, GB_KEY_UP, emulated_devices == 1 ? port : 0,
joypad_bits & (1 << RETRO_DEVICE_ID_JOYPAD_UP));
GB_set_key_state_for_player(gb, GB_KEY_DOWN, emulated_devices == 1 ? port : 0,
joypad_bits & (1 << RETRO_DEVICE_ID_JOYPAD_DOWN));
GB_set_key_state_for_player(gb, GB_KEY_A, emulated_devices == 1 ? port : 0,
joypad_bits & (1 << RETRO_DEVICE_ID_JOYPAD_A));
GB_set_key_state_for_player(gb, GB_KEY_B, emulated_devices == 1 ? port : 0,
joypad_bits & (1 << RETRO_DEVICE_ID_JOYPAD_B));
GB_set_key_state_for_player(gb, GB_KEY_SELECT, emulated_devices == 1 ? port : 0,
joypad_bits & (1 << RETRO_DEVICE_ID_JOYPAD_SELECT));
GB_set_key_state_for_player(gb, GB_KEY_START, emulated_devices == 1 ? port : 0,
joypad_bits & (1 << RETRO_DEVICE_ID_JOYPAD_START));
}
static void rumble_callback(GB_gameboy_t *gb, double amplitude)
{
if (!rumble.set_rumble_state) return;
if (gb == &gameboy[0]) {
rumble.set_rumble_state(0, RETRO_RUMBLE_STRONG, 65535 * amplitude);
}
else if (gb == &gameboy[1]) {
rumble.set_rumble_state(1, RETRO_RUMBLE_STRONG, 65535 * amplitude);
}
}
static void audio_callback(GB_gameboy_t *gb, GB_sample_t *sample)
{
if ((audio_out == GB_1 && gb == &gameboy[0]) ||
(audio_out == GB_2 && gb == &gameboy[1])) {
audio_sample_cb(sample->left, sample->right);
}
}
static void vblank1(GB_gameboy_t *gb)
{
vblank1_occurred = true;
}
static void vblank2(GB_gameboy_t *gb)
{
vblank2_occurred = true;
}
static bool bit_to_send1 = true, bit_to_send2 = true;
static void serial_start1(GB_gameboy_t *gb, bool bit_received)
{
bit_to_send1 = bit_received;
}
static bool serial_end1(GB_gameboy_t *gb)
{
bool ret = GB_serial_get_data_bit(&gameboy[1]);
GB_serial_set_data_bit(&gameboy[1], bit_to_send1);
return ret;
}
static void serial_start2(GB_gameboy_t *gb, bool bit_received)
{
bit_to_send2 = bit_received;
}
static bool serial_end2(GB_gameboy_t *gb)
{
bool ret = GB_serial_get_data_bit(&gameboy[0]);
GB_serial_set_data_bit(&gameboy[0], bit_to_send2);
return ret;
}
static void infrared_callback1(GB_gameboy_t *gb, bool output)
{
GB_set_infrared_input(&gameboy[1], output);
}
static void infrared_callback2(GB_gameboy_t *gb, bool output)
{
GB_set_infrared_input(&gameboy[0], output);
}
static uint32_t rgb_encode(GB_gameboy_t *gb, uint8_t r, uint8_t g, uint8_t b)
{
return r <<16 | g <<8 | b;
}
static retro_environment_t environ_cb;
static void set_variable_visibility(void)
{
struct retro_core_option_display option_display_singlecart;
struct retro_core_option_display option_display_dualcart;
size_t i;
size_t num_options = 0;
// Show/hide options depending on the number of emulated devices
if (emulated_devices == 1) {
option_display_singlecart.visible = true;
option_display_dualcart.visible = false;
}
else if (emulated_devices == 2) {
option_display_singlecart.visible = false;
option_display_dualcart.visible = true;
}
// Determine number of options
while (true) {
if (!option_defs_us[num_options].key) break;
num_options++;
}
// Copy parameters from option_defs_us array
for (i = 0; i < num_options; i++) {
const char *key = option_defs_us[i].key;
if ((strcmp(key, "sameboy_model") == 0) ||
(strcmp(key, "sameboy_rtc") == 0) ||
(strcmp(key, "sameboy_scaling_filter") == 0) ||
(strcmp(key, "sameboy_mono_palette") == 0) ||
(strcmp(key, "sameboy_color_correction_mode") == 0) ||
(strcmp(key, "sameboy_light_temperature") == 0) ||
(strcmp(key, "sameboy_border") == 0) ||
(strcmp(key, "sameboy_high_pass_filter_mode") == 0) ||
(strcmp(key, "sameboy_audio_interference") == 0) ||
(strcmp(key, "sameboy_rumble") == 0)) {
option_display_singlecart.key = key;
environ_cb(RETRO_ENVIRONMENT_SET_CORE_OPTIONS_DISPLAY, &option_display_singlecart);
}
else if ((strcmp(key, "sameboy_link") == 0) ||
(strcmp(key, "sameboy_screen_layout") == 0) ||
(strcmp(key, "sameboy_audio_output") == 0) ||
(strcmp(key, "sameboy_model_1") == 0) ||
(strcmp(key, "sameboy_model_2") == 0) ||
(strcmp(key, "sameboy_mono_palette_1") == 0) ||
(strcmp(key, "sameboy_mono_palette_2") == 0) ||
(strcmp(key, "sameboy_color_correction_mode_1") == 0) ||
(strcmp(key, "sameboy_color_correction_mode_2") == 0) ||
(strcmp(key, "sameboy_light_temperature_1") == 0) ||
(strcmp(key, "sameboy_light_temperature_2") == 0) ||
(strcmp(key, "sameboy_high_pass_filter_mode_1") == 0) ||
(strcmp(key, "sameboy_high_pass_filter_mode_2") == 0) ||
(strcmp(key, "sameboy_audio_interference_1") == 0) ||
(strcmp(key, "sameboy_audio_interference_2") == 0) ||
(strcmp(key, "sameboy_rumble_1") == 0) ||
(strcmp(key, "sameboy_rumble_2") == 0)) {
option_display_dualcart.key = key;
environ_cb(RETRO_ENVIRONMENT_SET_CORE_OPTIONS_DISPLAY, &option_display_dualcart);
}
}
}
static const struct retro_subsystem_memory_info gb1_memory[] = {
{ "srm", RETRO_MEMORY_GAMEBOY_1_SRAM },
{ "rtc", RETRO_MEMORY_GAMEBOY_1_RTC },
};
static const struct retro_subsystem_memory_info gb2_memory[] = {
{ "srm", RETRO_MEMORY_GAMEBOY_2_SRAM },
{ "rtc", RETRO_MEMORY_GAMEBOY_2_RTC },
};
static const struct retro_subsystem_rom_info gb_roms[] = {
{ "GameBoy #1", "gb|gbc", true, false, true, gb1_memory, 1 },
{ "GameBoy #2", "gb|gbc", true, false, true, gb2_memory, 1 },
};
static const struct retro_subsystem_info subsystems[] = {
{ "2 Player Game Boy Link", "gb_link_2p", gb_roms, 2, RETRO_GAME_TYPE_GAMEBOY_LINK_2P },
{ NULL },
};
static const struct retro_controller_description controllers[] = {
{ "Nintendo Game Boy", RETRO_DEVICE_SUBCLASS(RETRO_DEVICE_JOYPAD, 0) },
};
static const struct retro_controller_description controllers_sgb[] = {
{ "SNES/SFC Gamepad", RETRO_DEVICE_SUBCLASS(RETRO_DEVICE_JOYPAD, 0) },
};
static struct retro_input_descriptor descriptors_1p[] = {
{ 0, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_LEFT, "Left" },
{ 0, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_UP, "Up" },
{ 0, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_DOWN, "Down" },
{ 0, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_RIGHT, "Right" },
{ 0, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_B, "B" },
{ 0, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_A, "A" },
{ 0, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_SELECT, "Select" },
{ 0, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_START, "Start" },
{ 0 },
};
static struct retro_input_descriptor descriptors_2p[] = {
{ 0, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_LEFT, "Left" },
{ 0, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_UP, "Up" },
{ 0, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_DOWN, "Down" },
{ 0, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_RIGHT, "Right" },
{ 0, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_B, "B" },
{ 0, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_A, "A" },
{ 0, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_SELECT, "Select" },
{ 0, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_START, "Start" },
{ 1, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_LEFT, "Left" },
{ 1, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_UP, "Up" },
{ 1, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_DOWN, "Down" },
{ 1, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_RIGHT, "Right" },
{ 1, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_B, "B" },
{ 1, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_A, "A" },
{ 1, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_SELECT, "Select" },
{ 1, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_START, "Start" },
{ 0 },
};
static struct retro_input_descriptor descriptors_4p[] = {
{ 0, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_LEFT, "Left" },
{ 0, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_UP, "Up" },
{ 0, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_DOWN, "Down" },
{ 0, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_RIGHT, "Right" },
{ 0, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_B, "B" },
{ 0, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_A, "A" },
{ 0, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_SELECT, "Select" },
{ 0, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_START, "Start" },
{ 1, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_LEFT, "Left" },
{ 1, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_UP, "Up" },
{ 1, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_DOWN, "Down" },
{ 1, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_RIGHT, "Right" },
{ 1, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_B, "B" },
{ 1, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_A, "A" },
{ 1, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_SELECT, "Select" },
{ 1, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_START, "Start" },
{ 2, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_LEFT, "Left" },
{ 2, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_UP, "Up" },
{ 2, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_DOWN, "Down" },
{ 2, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_RIGHT, "Right" },
{ 2, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_B, "B" },
{ 2, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_A, "A" },
{ 2, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_SELECT, "Select" },
{ 3, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_START, "Start" },
{ 3, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_LEFT, "Left" },
{ 3, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_UP, "Up" },
{ 3, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_DOWN, "Down" },
{ 3, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_RIGHT, "Right" },
{ 3, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_B, "B" },
{ 3, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_A, "A" },
{ 3, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_SELECT, "Select" },
{ 3, RETRO_DEVICE_JOYPAD, 0, RETRO_DEVICE_ID_JOYPAD_START, "Start" },
{ 0 },
};
static void set_link_cable_state(bool state)
{
if (state && emulated_devices == 2) {
GB_set_serial_transfer_bit_start_callback(&gameboy[0], serial_start1);
GB_set_serial_transfer_bit_end_callback(&gameboy[0], serial_end1);
GB_set_serial_transfer_bit_start_callback(&gameboy[1], serial_start2);
GB_set_serial_transfer_bit_end_callback(&gameboy[1], serial_end2);
GB_set_infrared_callback(&gameboy[0], infrared_callback1);
GB_set_infrared_callback(&gameboy[1], infrared_callback2);
}
else if (!state) {
GB_set_serial_transfer_bit_start_callback(&gameboy[0], NULL);
GB_set_serial_transfer_bit_end_callback(&gameboy[0], NULL);
GB_set_serial_transfer_bit_start_callback(&gameboy[1], NULL);
GB_set_serial_transfer_bit_end_callback(&gameboy[1], NULL);
GB_set_infrared_callback(&gameboy[0], NULL);
GB_set_infrared_callback(&gameboy[1], NULL);
}
}
static void boot_rom_load(GB_gameboy_t *gb, GB_boot_rom_t type)
{
const char *model_name = (char *[]) {
[GB_BOOT_ROM_DMG_0] = "dmg0",
[GB_BOOT_ROM_DMG] = "dmg",
[GB_BOOT_ROM_MGB] = "mgb",
[GB_BOOT_ROM_SGB] = "sgb",
[GB_BOOT_ROM_SGB2] = "sgb2",
[GB_BOOT_ROM_CGB_0] = "cgb0",
[GB_BOOT_ROM_CGB] = "cgb",
[GB_BOOT_ROM_AGB] = "agb",
}[type];
const uint8_t *boot_code = (const unsigned char *[]) {
[GB_BOOT_ROM_DMG_0] = dmg_boot, // DMG_0 not implemented yet
[GB_BOOT_ROM_DMG] = dmg_boot,
[GB_BOOT_ROM_MGB] = dmg_boot, // mgb not implemented yet
[GB_BOOT_ROM_SGB] = sgb_boot,
[GB_BOOT_ROM_SGB2] = sgb2_boot,
[GB_BOOT_ROM_CGB_0] = cgb_boot, // CGB_0 not implemented yet
[GB_BOOT_ROM_CGB] = cgb_boot,
[GB_BOOT_ROM_AGB] = agb_boot,
}[type];
unsigned boot_length = (unsigned []) {
[GB_BOOT_ROM_DMG_0] = dmg_boot_length, // DMG_0 not implemented yet
[GB_BOOT_ROM_DMG] = dmg_boot_length,
[GB_BOOT_ROM_MGB] = dmg_boot_length, // mgb not implemented yet
[GB_BOOT_ROM_SGB] = sgb_boot_length,
[GB_BOOT_ROM_SGB2] = sgb2_boot_length,
[GB_BOOT_ROM_CGB_0] = cgb_boot_length, // CGB_0 not implemented yet
[GB_BOOT_ROM_CGB] = cgb_boot_length,
[GB_BOOT_ROM_AGB] = agb_boot_length,
}[type];
char buf[256];
snprintf(buf, sizeof(buf), "%s%c%s_boot.bin", retro_system_directory, slash, model_name);
log_cb(RETRO_LOG_INFO, "Initializing as model: %s\n", model_name);
log_cb(RETRO_LOG_INFO, "Loading boot image: %s\n", buf);
if (GB_load_boot_rom(gb, buf)) {
GB_load_boot_rom_from_buffer(gb, boot_code, boot_length);
}
}
static void retro_set_memory_maps(void)
{
struct retro_memory_descriptor descs[11];
size_t size;
uint16_t bank;
unsigned i;
/* todo: add netplay awareness for this so achievements can be granted on the respective client */
i = 0;
memset(descs, 0, sizeof(descs));
descs[0].ptr = GB_get_direct_access(&gameboy[i], GB_DIRECT_ACCESS_IE, &size, &bank);
descs[0].start = 0xFFFF;
descs[0].len = 1;
descs[1].ptr = GB_get_direct_access(&gameboy[i], GB_DIRECT_ACCESS_HRAM, &size, &bank);
descs[1].start = 0xFF80;
descs[1].len = 0x0080;
descs[2].ptr = GB_get_direct_access(&gameboy[i], GB_DIRECT_ACCESS_RAM, &size, &bank);
descs[2].start = 0xC000;
descs[2].len = 0x1000;
descs[3].ptr = descs[2].ptr + 0x1000; /* GB RAM/GBC RAM bank 1 */
descs[3].start = 0xD000;
descs[3].len = 0x1000;
descs[4].ptr = GB_get_direct_access(&gameboy[i], GB_DIRECT_ACCESS_CART_RAM, &size, &bank);
descs[4].start = 0xA000;
descs[4].len = 0x2000;
descs[5].ptr = GB_get_direct_access(&gameboy[i], GB_DIRECT_ACCESS_VRAM, &size, &bank);
descs[5].start = 0x8000;
descs[5].len = 0x2000;
descs[6].ptr = GB_get_direct_access(&gameboy[i], GB_DIRECT_ACCESS_ROM, &size, &bank);
descs[6].start = 0x0000;
descs[6].len = 0x4000;
descs[6].flags = RETRO_MEMDESC_CONST;
descs[7].ptr = descs[6].ptr + (bank * 0x4000);
descs[7].start = 0x4000;
descs[7].len = 0x4000;
descs[7].flags = RETRO_MEMDESC_CONST;
descs[8].ptr = GB_get_direct_access(&gameboy[i], GB_DIRECT_ACCESS_OAM, &size, &bank);
descs[8].start = 0xFE00;
descs[8].len = 0x00A0;
descs[8].select = 0xFFFFFF00;
descs[9].ptr = descs[2].ptr + 0x2000; /* GBC RAM bank 2 */
descs[9].start = 0x10000;
descs[9].len = GB_is_cgb(&gameboy[i]) ? 0x6000 : 0; /* 0x1000 per bank (2-7), unmapped on GB */
descs[9].select = 0xFFFF0000;
descs[10].ptr = GB_get_direct_access(&gameboy[i], GB_DIRECT_ACCESS_IO, &size, &bank);
descs[10].start = 0xFF00;
descs[10].len = 0x0080;
descs[10].select = 0xFFFFFF00;
struct retro_memory_map mmaps;
mmaps.descriptors = descs;
mmaps.num_descriptors = sizeof(descs) / sizeof(descs[0]);
environ_cb(RETRO_ENVIRONMENT_SET_MEMORY_MAPS, &mmaps);
}
static void init_for_current_model(unsigned id)
{
unsigned i = id;
enum model effective_model;
effective_model = model[i];
if (effective_model == MODEL_AUTO) {
effective_model = auto_model;
}
if (GB_is_inited(&gameboy[i])) {
GB_switch_model_and_reset(&gameboy[i], libretro_to_internal_model[effective_model]);
}
else {
GB_init(&gameboy[i], libretro_to_internal_model[effective_model]);
}
GB_set_boot_rom_load_callback(&gameboy[i], boot_rom_load);
/* When running multiple devices they are assumed to use the same resolution */
GB_set_pixels_output(&gameboy[i],
(uint32_t *)(frame_buf + GB_get_screen_width(&gameboy[0]) * GB_get_screen_height(&gameboy[0]) * i));
GB_set_rgb_encode_callback(&gameboy[i], rgb_encode);
GB_set_sample_rate(&gameboy[i], AUDIO_FREQUENCY);
GB_apu_set_sample_callback(&gameboy[i], audio_callback);
GB_set_rumble_callback(&gameboy[i], rumble_callback);
/* todo: attempt to make these more generic */
GB_set_vblank_callback(&gameboy[0], (GB_vblank_callback_t) vblank1);
if (emulated_devices == 2) {
GB_set_vblank_callback(&gameboy[1], (GB_vblank_callback_t) vblank2);
if (link_cable_emulation) {
set_link_cable_state(true);
}
}
/* Let's be extremely nitpicky about how devices and descriptors are set */
if (emulated_devices == 1 && (model[0] == MODEL_SGB_PAL || model[0] == MODEL_SGB_NTSC || model[0] == MODEL_SGB2)) {
static const struct retro_controller_info ports[] = {
{ controllers_sgb, 1 },
{ controllers_sgb, 1 },
{ controllers_sgb, 1 },
{ controllers_sgb, 1 },
{ NULL, 0 },
};
environ_cb(RETRO_ENVIRONMENT_SET_CONTROLLER_INFO, (void*)ports);
environ_cb(RETRO_ENVIRONMENT_SET_INPUT_DESCRIPTORS, descriptors_4p);
}
else if (emulated_devices == 1) {
static const struct retro_controller_info ports[] = {
{ controllers, 1 },
{ NULL, 0 },
};
environ_cb(RETRO_ENVIRONMENT_SET_CONTROLLER_INFO, (void*)ports);
environ_cb(RETRO_ENVIRONMENT_SET_INPUT_DESCRIPTORS, descriptors_1p);
}
else {
static const struct retro_controller_info ports[] = {
{ controllers, 1 },
{ controllers, 1 },
{ NULL, 0 },
};
environ_cb(RETRO_ENVIRONMENT_SET_CONTROLLER_INFO, (void*)ports);
environ_cb(RETRO_ENVIRONMENT_SET_INPUT_DESCRIPTORS, descriptors_2p);
}
}
static void check_variables()
{
struct retro_variable var = {0};
if (emulated_devices == 1) {
var.key = "sameboy_model";
var.value = NULL;
if (environ_cb(RETRO_ENVIRONMENT_GET_VARIABLE, &var) && var.value) {
enum model new_model = model[0];
if (strcmp(var.value, "Game Boy") == 0) {
new_model = MODEL_DMG_B;
}
else if (strcmp(var.value, "Game Boy Color C") == 0) {
new_model = MODEL_CGB_C;
}
else if (strcmp(var.value, "Game Boy Color") == 0) {
new_model = MODEL_CGB_E;
}
else if (strcmp(var.value, "Game Boy Advance") == 0) {
new_model = MODEL_AGB;
}
else if (strcmp(var.value, "Super Game Boy") == 0) {
new_model = MODEL_SGB_NTSC;
}
else if (strcmp(var.value, "Super Game Boy PAL") == 0) {
new_model = MODEL_SGB_PAL;
}
else if (strcmp(var.value, "Super Game Boy 2") == 0) {
new_model = MODEL_SGB2;
}
else {
new_model = MODEL_AUTO;
}
model[0] = new_model;
}
var.key = "sameboy_rtc";
var.value = NULL;
if (environ_cb(RETRO_ENVIRONMENT_GET_VARIABLE, &var) && var.value) {
if (strcmp(var.value, "sync to system clock") == 0) {
GB_set_rtc_mode(&gameboy[0], GB_RTC_MODE_SYNC_TO_HOST);
}
else if (strcmp(var.value, "accurate") == 0) {
GB_set_rtc_mode(&gameboy[0], GB_RTC_MODE_ACCURATE);
}
}
var.key = "sameboy_mono_palette";
var.value = NULL;
if (environ_cb(RETRO_ENVIRONMENT_GET_VARIABLE, &var) && var.value) {
if (strcmp(var.value, "greyscale") == 0) {
GB_set_palette(&gameboy[0], &GB_PALETTE_GREY);
}
else if (strcmp(var.value, "lime") == 0) {
GB_set_palette(&gameboy[0], &GB_PALETTE_DMG);
}
else if (strcmp(var.value, "olive") == 0) {
GB_set_palette(&gameboy[0], &GB_PALETTE_MGB);
}
else if (strcmp(var.value, "teal") == 0) {
GB_set_palette(&gameboy[0], &GB_PALETTE_GBL);
}
}
var.key = "sameboy_color_correction_mode";
var.value = NULL;
if (environ_cb(RETRO_ENVIRONMENT_GET_VARIABLE, &var) && var.value) {
if (strcmp(var.value, "off") == 0) {
GB_set_color_correction_mode(&gameboy[0], GB_COLOR_CORRECTION_DISABLED);
}
else if (strcmp(var.value, "correct curves") == 0) {
GB_set_color_correction_mode(&gameboy[0], GB_COLOR_CORRECTION_CORRECT_CURVES);
}
else if (strcmp(var.value, "emulate hardware") == 0) {
GB_set_color_correction_mode(&gameboy[0], GB_COLOR_CORRECTION_EMULATE_HARDWARE);
}
else if (strcmp(var.value, "preserve brightness") == 0) {
GB_set_color_correction_mode(&gameboy[0], GB_COLOR_CORRECTION_PRESERVE_BRIGHTNESS);
}
else if (strcmp(var.value, "reduce contrast") == 0) {
GB_set_color_correction_mode(&gameboy[0], GB_COLOR_CORRECTION_REDUCE_CONTRAST);
}
else if (strcmp(var.value, "harsh reality") == 0) {
GB_set_color_correction_mode(&gameboy[0], GB_COLOR_CORRECTION_LOW_CONTRAST);
}
}
var.key = "sameboy_light_temperature";
var.value = NULL;
if (environ_cb(RETRO_ENVIRONMENT_GET_VARIABLE, &var) && var.value) {
GB_set_light_temperature(&gameboy[0], atof(var.value));
}
var.key = "sameboy_border";
var.value = NULL;
if (environ_cb(RETRO_ENVIRONMENT_GET_VARIABLE, &var) && var.value) {
if (strcmp(var.value, "never") == 0) {
GB_set_border_mode(&gameboy[0], GB_BORDER_NEVER);
}
else if (strcmp(var.value, "Super Game Boy only") == 0) {
GB_set_border_mode(&gameboy[0], GB_BORDER_SGB);
}
else if (strcmp(var.value, "always") == 0) {
GB_set_border_mode(&gameboy[0], GB_BORDER_ALWAYS);
}
geometry_updated = true;
}
var.key = "sameboy_high_pass_filter_mode";
var.value = NULL;
if (environ_cb(RETRO_ENVIRONMENT_GET_VARIABLE, &var) && var.value) {
if (strcmp(var.value, "off") == 0) {
GB_set_highpass_filter_mode(&gameboy[0], GB_HIGHPASS_OFF);
}
else if (strcmp(var.value, "accurate") == 0) {
GB_set_highpass_filter_mode(&gameboy[0], GB_HIGHPASS_ACCURATE);
}
else if (strcmp(var.value, "remove dc offset") == 0) {
GB_set_highpass_filter_mode(&gameboy[0], GB_HIGHPASS_REMOVE_DC_OFFSET);
}
}
var.key = "sameboy_audio_interference";
var.value = NULL;
if (environ_cb(RETRO_ENVIRONMENT_GET_VARIABLE, &var) && var.value) {
GB_set_interference_volume(&gameboy[0], atoi(var.value) / 100.0);
}
var.key = "sameboy_rumble";
var.value = NULL;
if (environ_cb(RETRO_ENVIRONMENT_GET_VARIABLE, &var) && var.value) {
if (strcmp(var.value, "never") == 0) {
GB_set_rumble_mode(&gameboy[0], GB_RUMBLE_DISABLED);
}
else if (strcmp(var.value, "rumble-enabled games") == 0) {
GB_set_rumble_mode(&gameboy[0], GB_RUMBLE_CARTRIDGE_ONLY);
}
else if (strcmp(var.value, "all games") == 0) {
GB_set_rumble_mode(&gameboy[0], GB_RUMBLE_ALL_GAMES);
}
}
}
else {
GB_set_border_mode(&gameboy[0], GB_BORDER_NEVER);
GB_set_border_mode(&gameboy[1], GB_BORDER_NEVER);
GB_set_rtc_mode(&gameboy[0], GB_RTC_MODE_ACCURATE);
GB_set_rtc_mode(&gameboy[1], GB_RTC_MODE_ACCURATE);
var.key = "sameboy_link";
var.value = NULL;
if (environ_cb(RETRO_ENVIRONMENT_GET_VARIABLE, &var) && var.value) {
bool tmp = link_cable_emulation;
if (strcmp(var.value, "enabled") == 0) {
link_cable_emulation = true;
}
else {
link_cable_emulation = false;
}
if (link_cable_emulation && link_cable_emulation != tmp) {
set_link_cable_state(true);
}
else if (!link_cable_emulation && link_cable_emulation != tmp) {
set_link_cable_state(false);
}
}
var.key = "sameboy_screen_layout";
var.value = NULL;
if (environ_cb(RETRO_ENVIRONMENT_GET_VARIABLE, &var) && var.value) {
if (strcmp(var.value, "top-down") == 0) {
screen_layout = LAYOUT_TOP_DOWN;
}
else {
screen_layout = LAYOUT_LEFT_RIGHT;
}
geometry_updated = true;
}
var.key = "sameboy_audio_output";
var.value = NULL;
if (environ_cb(RETRO_ENVIRONMENT_GET_VARIABLE, &var) && var.value) {
if (strcmp(var.value, "Game Boy #1") == 0) {
audio_out = GB_1;
}
else {
audio_out = GB_2;
}
}
var.key = "sameboy_model_1";
var.value = NULL;
if (environ_cb(RETRO_ENVIRONMENT_GET_VARIABLE, &var) && var.value) {
enum model new_model = model[0];
if (strcmp(var.value, "Game Boy") == 0) {
new_model = MODEL_DMG_B;
}
else if (strcmp(var.value, "Game Boy Color C") == 0) {
new_model = MODEL_CGB_C;
}
else if (strcmp(var.value, "Game Boy Color") == 0) {
new_model = MODEL_CGB_E;
}
else if (strcmp(var.value, "Game Boy Advance") == 0) {
new_model = MODEL_AGB;
}
else if (strcmp(var.value, "Super Game Boy") == 0) {
new_model = MODEL_SGB_NTSC;
}
else if (strcmp(var.value, "Super Game Boy PAL") == 0) {
new_model = MODEL_SGB_PAL;
}
else if (strcmp(var.value, "Super Game Boy 2") == 0) {
new_model = MODEL_SGB2;
}
else {
new_model = MODEL_AUTO;
}
model[0] = new_model;
}
var.key = "sameboy_model_2";
var.value = NULL;
if (environ_cb(RETRO_ENVIRONMENT_GET_VARIABLE, &var) && var.value) {
enum model new_model = model[1];
if (strcmp(var.value, "Game Boy") == 0) {
new_model = MODEL_DMG_B;
}
else if (strcmp(var.value, "Game Boy Color C") == 0) {
new_model = MODEL_CGB_C;
}
else if (strcmp(var.value, "Game Boy Color") == 0) {
new_model = MODEL_CGB_E;
}
else if (strcmp(var.value, "Game Boy Advance") == 0) {
new_model = MODEL_AGB;
}
else if (strcmp(var.value, "Super Game Boy") == 0) {
new_model = MODEL_SGB_NTSC;
}
else if (strcmp(var.value, "Super Game Boy PAL") == 0) {
new_model = MODEL_SGB_PAL;
}
else if (strcmp(var.value, "Super Game Boy 2") == 0) {
new_model = MODEL_SGB2;
}
else {
new_model = MODEL_AUTO;
}
model[1] = new_model;
}
var.key = "sameboy_mono_palette_1";
var.value = NULL;
if (environ_cb(RETRO_ENVIRONMENT_GET_VARIABLE, &var) && var.value) {
if (strcmp(var.value, "greyscale") == 0) {
GB_set_palette(&gameboy[0], &GB_PALETTE_GREY);
}
else if (strcmp(var.value, "lime") == 0) {
GB_set_palette(&gameboy[0], &GB_PALETTE_DMG);
}
else if (strcmp(var.value, "olive") == 0) {
GB_set_palette(&gameboy[0], &GB_PALETTE_MGB);
}
else if (strcmp(var.value, "teal") == 0) {
GB_set_palette(&gameboy[0], &GB_PALETTE_GBL);
}
}
var.key = "sameboy_mono_palette_2";
var.value = NULL;
if (environ_cb(RETRO_ENVIRONMENT_GET_VARIABLE, &var) && var.value) {
if (strcmp(var.value, "greyscale") == 0) {
GB_set_palette(&gameboy[1], &GB_PALETTE_GREY);
}
else if (strcmp(var.value, "lime") == 0) {
GB_set_palette(&gameboy[1], &GB_PALETTE_DMG);
}
else if (strcmp(var.value, "olive") == 0) {
GB_set_palette(&gameboy[1], &GB_PALETTE_MGB);
}
else if (strcmp(var.value, "teal") == 0) {
GB_set_palette(&gameboy[1], &GB_PALETTE_GBL);
}
}
var.key = "sameboy_color_correction_mode_1";
var.value = NULL;
if (environ_cb(RETRO_ENVIRONMENT_GET_VARIABLE, &var) && var.value) {
if (strcmp(var.value, "off") == 0) {
GB_set_color_correction_mode(&gameboy[0], GB_COLOR_CORRECTION_DISABLED);
}
else if (strcmp(var.value, "correct curves") == 0) {
GB_set_color_correction_mode(&gameboy[0], GB_COLOR_CORRECTION_CORRECT_CURVES);
}
else if (strcmp(var.value, "emulate hardware") == 0) {
GB_set_color_correction_mode(&gameboy[0], GB_COLOR_CORRECTION_EMULATE_HARDWARE);
}
else if (strcmp(var.value, "preserve brightness") == 0) {
GB_set_color_correction_mode(&gameboy[0], GB_COLOR_CORRECTION_PRESERVE_BRIGHTNESS);
}
else if (strcmp(var.value, "reduce contrast") == 0) {
GB_set_color_correction_mode(&gameboy[0], GB_COLOR_CORRECTION_REDUCE_CONTRAST);
}
else if (strcmp(var.value, "harsh reality") == 0) {
GB_set_color_correction_mode(&gameboy[0], GB_COLOR_CORRECTION_LOW_CONTRAST);
}
}
var.key = "sameboy_color_correction_mode_2";
var.value = NULL;
if (environ_cb(RETRO_ENVIRONMENT_GET_VARIABLE, &var) && var.value) {
if (strcmp(var.value, "off") == 0) {
GB_set_color_correction_mode(&gameboy[1], GB_COLOR_CORRECTION_DISABLED);
}
else if (strcmp(var.value, "correct curves") == 0) {
GB_set_color_correction_mode(&gameboy[1], GB_COLOR_CORRECTION_CORRECT_CURVES);
}
else if (strcmp(var.value, "emulate hardware") == 0) {
GB_set_color_correction_mode(&gameboy[1], GB_COLOR_CORRECTION_EMULATE_HARDWARE);
}
else if (strcmp(var.value, "preserve brightness") == 0) {
GB_set_color_correction_mode(&gameboy[1], GB_COLOR_CORRECTION_PRESERVE_BRIGHTNESS);
}
else if (strcmp(var.value, "reduce contrast") == 0) {
GB_set_color_correction_mode(&gameboy[1], GB_COLOR_CORRECTION_REDUCE_CONTRAST);
}
else if (strcmp(var.value, "harsh reality") == 0) {
GB_set_color_correction_mode(&gameboy[1], GB_COLOR_CORRECTION_LOW_CONTRAST);
}
}
var.key = "sameboy_light_temperature_1";
var.value = NULL;
if (environ_cb(RETRO_ENVIRONMENT_GET_VARIABLE, &var) && var.value) {
GB_set_light_temperature(&gameboy[0], atof(var.value));
}
var.key = "sameboy_light_temperature_2";
var.value = NULL;
if (environ_cb(RETRO_ENVIRONMENT_GET_VARIABLE, &var) && var.value) {
GB_set_light_temperature(&gameboy[1], atof(var.value));
}
var.key = "sameboy_high_pass_filter_mode_1";
var.value = NULL;
if (environ_cb(RETRO_ENVIRONMENT_GET_VARIABLE, &var) && var.value) {
if (strcmp(var.value, "off") == 0) {
GB_set_highpass_filter_mode(&gameboy[0], GB_HIGHPASS_OFF);
}
else if (strcmp(var.value, "accurate") == 0) {
GB_set_highpass_filter_mode(&gameboy[0], GB_HIGHPASS_ACCURATE);
}
else if (strcmp(var.value, "remove dc offset") == 0) {
GB_set_highpass_filter_mode(&gameboy[0], GB_HIGHPASS_REMOVE_DC_OFFSET);
}
}
var.key = "sameboy_high_pass_filter_mode_2";
var.value = NULL;
if (environ_cb(RETRO_ENVIRONMENT_GET_VARIABLE, &var) && var.value) {
if (strcmp(var.value, "off") == 0) {
GB_set_highpass_filter_mode(&gameboy[1], GB_HIGHPASS_OFF);
}
else if (strcmp(var.value, "accurate") == 0) {
GB_set_highpass_filter_mode(&gameboy[1], GB_HIGHPASS_ACCURATE);
}
else if (strcmp(var.value, "remove dc offset") == 0) {
GB_set_highpass_filter_mode(&gameboy[1], GB_HIGHPASS_REMOVE_DC_OFFSET);
}
}
var.key = "sameboy_audio_interference_1";
var.value = NULL;
if (environ_cb(RETRO_ENVIRONMENT_GET_VARIABLE, &var) && var.value) {
GB_set_interference_volume(&gameboy[0], atoi(var.value) / 100.0);
}
var.key = "sameboy_audio_interference_2";
var.value = NULL;
if (environ_cb(RETRO_ENVIRONMENT_GET_VARIABLE, &var) && var.value) {
GB_set_interference_volume(&gameboy[1], atoi(var.value) / 100.0);
}
var.key = "sameboy_rumble_1";
var.value = NULL;
if (environ_cb(RETRO_ENVIRONMENT_GET_VARIABLE, &var) && var.value) {
if (strcmp(var.value, "never") == 0) {
GB_set_rumble_mode(&gameboy[0], GB_RUMBLE_DISABLED);
}
else if (strcmp(var.value, "rumble-enabled games") == 0) {
GB_set_rumble_mode(&gameboy[0], GB_RUMBLE_CARTRIDGE_ONLY);
}
else if (strcmp(var.value, "all games") == 0) {
GB_set_rumble_mode(&gameboy[0], GB_RUMBLE_ALL_GAMES);
}
}
var.key = "sameboy_rumble_2";
var.value = NULL;
if (environ_cb(RETRO_ENVIRONMENT_GET_VARIABLE, &var) && var.value) {
if (strcmp(var.value, "never") == 0) {
GB_set_rumble_mode(&gameboy[1], GB_RUMBLE_DISABLED);
}
else if (strcmp(var.value, "rumble-enabled games") == 0) {
GB_set_rumble_mode(&gameboy[1], GB_RUMBLE_CARTRIDGE_ONLY);
}
else if (strcmp(var.value, "all games") == 0) {
GB_set_rumble_mode(&gameboy[1], GB_RUMBLE_ALL_GAMES);
}
}
}
set_variable_visibility();
}
void retro_init(void)
{
const char *dir = NULL;
if (environ_cb(RETRO_ENVIRONMENT_GET_SYSTEM_DIRECTORY, &dir) && dir) {
snprintf(retro_system_directory, sizeof(retro_system_directory), "%s", dir);
}
else {
snprintf(retro_system_directory, sizeof(retro_system_directory), "%s", ".");
}
if (environ_cb(RETRO_ENVIRONMENT_GET_SAVE_DIRECTORY, &dir) && dir) {
snprintf(retro_save_directory, sizeof(retro_save_directory), "%s", dir);
}
else {
snprintf(retro_save_directory, sizeof(retro_save_directory), "%s", ".");
}
if (environ_cb(RETRO_ENVIRONMENT_GET_LOG_INTERFACE, &logging)) {
log_cb = logging.log;
}
else {
log_cb = fallback_log;
}
if (environ_cb(RETRO_ENVIRONMENT_GET_INPUT_BITMASKS, NULL)) {
libretro_supports_bitmasks = true;
}
}
void retro_deinit(void)
{
free(frame_buf);
free(frame_buf_copy);
frame_buf = NULL;
frame_buf_copy = NULL;
libretro_supports_bitmasks = false;
}
unsigned retro_api_version(void)
{
return RETRO_API_VERSION;
}
void retro_set_controller_port_device(unsigned port, unsigned device)
{
log_cb(RETRO_LOG_INFO, "Connecting device %u into port %u\n", device, port);
}
void retro_get_system_info(struct retro_system_info *info)
{
memset(info, 0, sizeof(*info));
info->library_name = "SameBoy";
#ifdef GIT_VERSION
info->library_version = GB_VERSION GIT_VERSION;
#else
info->library_version = GB_VERSION;
#endif
info->need_fullpath = true;
info->valid_extensions = "gb|gbc";
}
void retro_get_system_av_info(struct retro_system_av_info *info)
{
struct retro_game_geometry geom;
struct retro_system_timing timing = { GB_get_usual_frame_rate(&gameboy[0]), AUDIO_FREQUENCY };
if (emulated_devices == 2) {
if (screen_layout == LAYOUT_TOP_DOWN) {
geom.base_width = GB_get_screen_width(&gameboy[0]);
geom.base_height = GB_get_screen_height(&gameboy[0]) * emulated_devices;
geom.aspect_ratio = (double)GB_get_screen_width(&gameboy[0]) / (emulated_devices * GB_get_screen_height(&gameboy[0]));
}
else if (screen_layout == LAYOUT_LEFT_RIGHT) {
geom.base_width = GB_get_screen_width(&gameboy[0]) * emulated_devices;
geom.base_height = GB_get_screen_height(&gameboy[0]);
geom.aspect_ratio = ((double)GB_get_screen_width(&gameboy[0]) * emulated_devices) / GB_get_screen_height(&gameboy[0]);
}
}
else {
geom.base_width = GB_get_screen_width(&gameboy[0]);
geom.base_height = GB_get_screen_height(&gameboy[0]);
geom.aspect_ratio = (double)GB_get_screen_width(&gameboy[0]) / GB_get_screen_height(&gameboy[0]);
}
geom.max_width = MAX_VIDEO_WIDTH * emulated_devices;
geom.max_height = MAX_VIDEO_HEIGHT * emulated_devices;
info->geometry = geom;
info->timing = timing;
}
void retro_set_environment(retro_environment_t cb)
{
environ_cb = cb;
libretro_set_core_options(environ_cb);
cb(RETRO_ENVIRONMENT_SET_SUBSYSTEM_INFO, (void*)subsystems);
}
void retro_set_audio_sample(retro_audio_sample_t cb)
{
audio_sample_cb = cb;
}
void retro_set_audio_sample_batch(retro_audio_sample_batch_t cb)
{
}
void retro_set_input_poll(retro_input_poll_t cb)
{
input_poll_cb = cb;
}
void retro_set_input_state(retro_input_state_t cb)
{
input_state_cb = cb;
}
void retro_set_video_refresh(retro_video_refresh_t cb)
{
video_cb = cb;
}
void retro_reset(void)
{
check_variables();
for (int i = 0; i < emulated_devices; i++) {
init_for_current_model(i);
GB_reset(&gameboy[i]);
}
geometry_updated = true;
}
void retro_run(void)
{
bool updated = false;
if (!initialized) {
geometry_updated = false;
}
if (geometry_updated) {
struct retro_system_av_info info;
retro_get_system_av_info(&info);
environ_cb(RETRO_ENVIRONMENT_SET_GEOMETRY, &info.geometry);
geometry_updated = false;
}
if (!frame_buf) {
return;
}
if (environ_cb(RETRO_ENVIRONMENT_GET_VARIABLE_UPDATE, &updated) && updated) {
check_variables();
}
if (emulated_devices == 2) {
GB_update_keys_status(&gameboy[0], 0);
GB_update_keys_status(&gameboy[1], 1);
}
else if (emulated_devices == 1 && (model[0] == MODEL_SGB_PAL || model[0] == MODEL_SGB_NTSC || model[0] == MODEL_SGB2)) {
for (unsigned i = 0; i < 4; i++) {
GB_update_keys_status(&gameboy[0], i);
}
}
else {
GB_update_keys_status(&gameboy[0], 0);
}
vblank1_occurred = vblank2_occurred = false;
signed delta = 0;
if (emulated_devices == 2) {
while (!vblank1_occurred || !vblank2_occurred) {
if (delta >= 0) {
delta -= GB_run(&gameboy[0]);
}
else {
delta += GB_run(&gameboy[1]);
}
}
}
else {
GB_run_frame(&gameboy[0]);
}
if (emulated_devices == 2) {
if (screen_layout == LAYOUT_TOP_DOWN) {
video_cb(frame_buf,
GB_get_screen_width(&gameboy[0]),
GB_get_screen_height(&gameboy[0]) * emulated_devices,
GB_get_screen_width(&gameboy[0]) * sizeof(uint32_t));
}
else if (screen_layout == LAYOUT_LEFT_RIGHT) {
unsigned pitch = GB_get_screen_width(&gameboy[0]) * emulated_devices;
unsigned pixels_per_device = GB_get_screen_width(&gameboy[0]) * GB_get_screen_height(&gameboy[0]);
for (int y = 0; y < GB_get_screen_height(&gameboy[0]); y++) {
for (unsigned i = 0; i < emulated_devices; i++) {
memcpy(frame_buf_copy + y * pitch + GB_get_screen_width(&gameboy[0]) * i,
frame_buf + pixels_per_device * i + y * GB_get_screen_width(&gameboy[0]),
GB_get_screen_width(&gameboy[0]) * sizeof(uint32_t));
}
}
video_cb(frame_buf_copy, GB_get_screen_width(&gameboy[0]) * emulated_devices, GB_get_screen_height(&gameboy[0]), GB_get_screen_width(&gameboy[0]) * emulated_devices * sizeof(uint32_t));
}
}
else {
video_cb(frame_buf,
GB_get_screen_width(&gameboy[0]),
GB_get_screen_height(&gameboy[0]),
GB_get_screen_width(&gameboy[0]) * sizeof(uint32_t));
}
initialized = true;
}
bool retro_load_game(const struct retro_game_info *info)
{
check_variables();
frame_buf = (uint32_t *)malloc(MAX_VIDEO_PIXELS * emulated_devices * sizeof(uint32_t));
memset(frame_buf, 0, MAX_VIDEO_PIXELS * emulated_devices * sizeof(uint32_t));
enum retro_pixel_format fmt = RETRO_PIXEL_FORMAT_XRGB8888;
if (!environ_cb(RETRO_ENVIRONMENT_SET_PIXEL_FORMAT, &fmt)) {
log_cb(RETRO_LOG_INFO, "XRGB8888 is not supported\n");
return false;
}
auto_model = (info->path[strlen(info->path) - 1] & ~0x20) == 'C' ? MODEL_CGB_E : MODEL_DMG_B;
snprintf(retro_game_path, sizeof(retro_game_path), "%s", info->path);
for (int i = 0; i < emulated_devices; i++) {
init_for_current_model(i);
if (GB_load_rom(&gameboy[i], info->path)) {
log_cb(RETRO_LOG_INFO, "Failed to load ROM at %s\n", info->path);
return false;
}
}
bool achievements = true;
environ_cb(RETRO_ENVIRONMENT_SET_SUPPORT_ACHIEVEMENTS, &achievements);
if (environ_cb(RETRO_ENVIRONMENT_GET_RUMBLE_INTERFACE, &rumble)) {
log_cb(RETRO_LOG_INFO, "Rumble environment supported\n");
}
else {
log_cb(RETRO_LOG_INFO, "Rumble environment not supported\n");
}
check_variables();
retro_set_memory_maps();
return true;
}
void retro_unload_game(void)
{
for (int i = 0; i < emulated_devices; i++) {
log_cb(RETRO_LOG_INFO, "Unloading GB: %d\n", emulated_devices);
GB_free(&gameboy[i]);
}
}
unsigned retro_get_region(void)
{
return RETRO_REGION_NTSC;
}
bool retro_load_game_special(unsigned type, const struct retro_game_info *info, size_t num_info)
{
if (type == RETRO_GAME_TYPE_GAMEBOY_LINK_2P) {
emulated_devices = 2;
}
else {
return false; /* all other types are unhandled for now */
}
check_variables();
frame_buf = (uint32_t*)malloc(emulated_devices * MAX_VIDEO_PIXELS * sizeof(uint32_t));
frame_buf_copy = (uint32_t*)malloc(emulated_devices * MAX_VIDEO_PIXELS * sizeof(uint32_t));
memset(frame_buf, 0, emulated_devices * MAX_VIDEO_PIXELS * sizeof(uint32_t));
memset(frame_buf_copy, 0, emulated_devices * MAX_VIDEO_PIXELS * sizeof(uint32_t));
enum retro_pixel_format fmt = RETRO_PIXEL_FORMAT_XRGB8888;
if (!environ_cb(RETRO_ENVIRONMENT_SET_PIXEL_FORMAT, &fmt)) {
log_cb(RETRO_LOG_INFO, "XRGB8888 is not supported\n");
return false;
}
auto_model = (info->path[strlen(info->path) - 1] & ~0x20) == 'C' ? MODEL_CGB_E : MODEL_DMG_B;
snprintf(retro_game_path, sizeof(retro_game_path), "%s", info->path);
for (int i = 0; i < emulated_devices; i++) {
init_for_current_model(i);
if (GB_load_rom(&gameboy[i], info[i].path)) {
log_cb(RETRO_LOG_INFO, "Failed to load ROM\n");
return false;
}
}
bool achievements = true;
environ_cb(RETRO_ENVIRONMENT_SET_SUPPORT_ACHIEVEMENTS, &achievements);
if (environ_cb(RETRO_ENVIRONMENT_GET_RUMBLE_INTERFACE, &rumble)) {
log_cb(RETRO_LOG_INFO, "Rumble environment supported\n");
}
else {
log_cb(RETRO_LOG_INFO, "Rumble environment not supported\n");
}
check_variables();
return true;
}
size_t retro_serialize_size(void)
{
static size_t maximum_save_size = 0;
if (maximum_save_size) {
return maximum_save_size * 2;
}
GB_gameboy_t temp;
GB_init(&temp, GB_MODEL_DMG_B);
maximum_save_size = GB_get_save_state_size(&temp);
GB_free(&temp);
GB_init(&temp, GB_MODEL_CGB_E);
maximum_save_size = MAX(maximum_save_size, GB_get_save_state_size(&temp));
GB_free(&temp);
GB_init(&temp, GB_MODEL_SGB2);
maximum_save_size = MAX(maximum_save_size, GB_get_save_state_size(&temp));
GB_free(&temp);
return maximum_save_size * 2;
}
bool retro_serialize(void *data, size_t size)
{
if (!initialized || !data) {
return false;
}
size_t offset = 0;
for (int i = 0; i < emulated_devices; i++) {
size_t state_size = GB_get_save_state_size(&gameboy[i]);
if (state_size > size) {
return false;
}
GB_save_state_to_buffer(&gameboy[i], ((uint8_t *) data) + offset);
offset += state_size;
size -= state_size;
}
return true;
}
bool retro_unserialize(const void *data, size_t size)
{
for (int i = 0; i < emulated_devices; i++) {
size_t state_size = GB_get_save_state_size(&gameboy[i]);
if (state_size > size) {
return false;
}
if (GB_load_state_from_buffer(&gameboy[i], data, state_size)) {
return false;
}
size -= state_size;
data = ((uint8_t *)data) + state_size;
}
return true;
}
void *retro_get_memory_data(unsigned type)
{
void *data = NULL;
if (emulated_devices == 1) {
switch (type) {
case RETRO_MEMORY_SYSTEM_RAM:
data = gameboy[0].ram;
break;
case RETRO_MEMORY_SAVE_RAM:
if (gameboy[0].cartridge_type->has_battery && gameboy[0].mbc_ram_size != 0) {
data = gameboy[0].mbc_ram;
}
else {
data = NULL;
}
break;
case RETRO_MEMORY_VIDEO_RAM:
data = gameboy[0].vram;
break;
case RETRO_MEMORY_RTC:
if (gameboy[0].cartridge_type->has_battery) {
data = GB_GET_SECTION(&gameboy[0], rtc);
}
else {
data = NULL;
}
break;
default:
break;
}
}
else {
switch (type) {
case RETRO_MEMORY_GAMEBOY_1_SRAM:
if (gameboy[0].cartridge_type->has_battery && gameboy[0].mbc_ram_size != 0) {
data = gameboy[0].mbc_ram;
}
else {
data = NULL;
}
break;
case RETRO_MEMORY_GAMEBOY_2_SRAM:
if (gameboy[1].cartridge_type->has_battery && gameboy[1].mbc_ram_size != 0) {
data = gameboy[1].mbc_ram;
}
else {
data = NULL;
}
break;
case RETRO_MEMORY_GAMEBOY_1_RTC:
if (gameboy[0].cartridge_type->has_battery) {
data = GB_GET_SECTION(&gameboy[0], rtc);
}
else {
data = NULL;
}
break;
case RETRO_MEMORY_GAMEBOY_2_RTC:
if (gameboy[1].cartridge_type->has_battery) {
data = GB_GET_SECTION(&gameboy[1], rtc);
}
else {
data = NULL;
}
break;
default:
break;
}
}
return data;
}
size_t retro_get_memory_size(unsigned type)
{
size_t size = 0;
if (emulated_devices == 1) {
switch (type) {
case RETRO_MEMORY_SYSTEM_RAM:
size = gameboy[0].ram_size;
break;
case RETRO_MEMORY_SAVE_RAM:
if (gameboy[0].cartridge_type->has_battery && gameboy[0].mbc_ram_size != 0) {
size = gameboy[0].mbc_ram_size;
}
else {
size = 0;
}
break;
case RETRO_MEMORY_VIDEO_RAM:
size = gameboy[0].vram_size;
break;
case RETRO_MEMORY_RTC:
if (gameboy[0].cartridge_type->has_battery) {
size = GB_SECTION_SIZE(rtc);
}
else {
size = 0;
}
break;
default:
break;
}
}
else {
switch (type) {
case RETRO_MEMORY_GAMEBOY_1_SRAM:
if (gameboy[0].cartridge_type->has_battery && gameboy[0].mbc_ram_size != 0) {
size = gameboy[0].mbc_ram_size;
}
else {
size = 0;
}
break;
case RETRO_MEMORY_GAMEBOY_2_SRAM:
if (gameboy[1].cartridge_type->has_battery && gameboy[1].mbc_ram_size != 0) {
size = gameboy[1].mbc_ram_size;
}
else {
size = 0;
}
break;
case RETRO_MEMORY_GAMEBOY_1_RTC:
if (gameboy[0].cartridge_type->has_battery) {
size = GB_SECTION_SIZE(rtc);
}
break;
case RETRO_MEMORY_GAMEBOY_2_RTC:
if (gameboy[1].cartridge_type->has_battery) {
size = GB_SECTION_SIZE(rtc);
}
break;
default:
break;
}
}
return size;
}
void retro_cheat_reset(void)
{}
void retro_cheat_set(unsigned index, bool enabled, const char *code)
{
(void)index;
(void)enabled;
(void)code;
}
Reference in New Issue View Git Blame Copy Permalink