OpenEmu/O2EM-Core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
Files
9c2b359d9a5571917043ce97b92efd9684f7ac5f
O2EM-Core/OdysseyGameCore.m
T
clobber c2248f7846 Initial port
2014-08-29 14:40:54 -05:00

631 lines
18 KiB
Objective-C
Raw Blame History

/*
Copyright (c) 2014, OpenEmu Team
Redistribution and use in source and binary forms, with or without
modification, are permitted provided that the following conditions are met:
* Redistributions of source code must retain the above copyright
notice, this list of conditions and the following disclaimer.
* Redistributions in binary form must reproduce the above copyright
notice, this list of conditions and the following disclaimer in the
documentation and/or other materials provided with the distribution.
* Neither the name of the OpenEmu Team nor the
names of its contributors may be used to endorse or promote products
derived from this software without specific prior written permission.
THIS SOFTWARE IS PROVIDED BY OpenEmu Team ''AS IS'' AND ANY
EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
DISCLAIMED. IN NO EVENT SHALL OpenEmu Team BE LIABLE FOR ANY
DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
(INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*/
#import "OdysseyGameCore.h"
#import "OEOdyssey2SystemResponderClient.h"
#import <OpenEmuBase/OERingBuffer.h>
#import <OpenGL/gl.h>
#include <IOKit/hid/IOHIDUsageTables.h>
#include "crc32.h"
#include "audio.h"
#include "vmachine.h"
#include "config.h"
#include "vdc.h"
#include "cpu.h"
#include "debug.h"
#include "keyboard.h"
#include "voice.h"
#include "vpp.h"
#include "wrapalleg.h"
#include "score.h"
#include "libretro.h"
@interface OdysseyGameCore () <OEOdyssey2SystemResponderClient>
{
NSDictionary *virtualPhysicalKeyMap;
}
@end
//uint16_t mbmp[EMUWIDTH * EMUHEIGHT];
//unsigned short int mbmp[TEX_WIDTH * TEX_HEIGHT];
uint16_t mbmp[TEX_WIDTH * TEX_HEIGHT];
//short signed int SNDBUF[1024*2];
uint8_t soundBuffer[1056];
int SND;
int RLOOP=0;
int joystick_data[2][5]={{0,0,0,0,0},{0,0,0,0,0}};
void update_joy(void){
}
int contax, o2flag, g74flag, c52flag, jopflag, helpflag;
unsigned long crcx = ~0;
static char bios[MAXC], scshot[MAXC], xrom[MAXC], romdir[MAXC], xbios[MAXC],
biosdir[MAXC], arkivo[MAXC][MAXC], biossux[MAXC], romssux[MAXC],
odyssey2[MAXC], g7400[MAXC], c52[MAXC], jopac[MAXC], file_l[MAXC], bios_l[MAXC],
file_v[MAXC],scorefile[MAXC], statefile[MAXC], path2[MAXC];
static long filesize(FILE *stream){
long curpos, length;
curpos = ftell(stream);
fseek(stream, 0L, SEEK_END);
length = ftell(stream);
fseek(stream, curpos, SEEK_SET);
return length;
}
static void load_bios(const char *biosname){
FILE *fn;
static char s[MAXC+10];
unsigned long crc;
int i;
if ((biosname[strlen(biosname)-1]=='/') ||
(biosname[strlen(biosname)-1]=='\\') ||
(biosname[strlen(biosname)-1]==':')) {
strcpy(s,biosname);
strcat(s,odyssey2);
fn = fopen(s,"rb");
if (!fn) {
strcpy(s,biosname);
strcat(s,odyssey2);
fn = fopen(s,"rb");
}
} else {
strcpy(s,biosname);
fn = fopen(biosname,"rb");
}
if (!fn) {
fprintf(stderr,"Error loading bios ROM (%s)\n",s);
exit(EXIT_FAILURE);
}
if (fread(rom_table[0],1024,1,fn) != 1) {
fprintf(stderr,"Error loading bios ROM %s\n",odyssey2);
exit(EXIT_FAILURE);
}
strcpy(s,biosname);
fn = fopen(biosname,"rb");
if (!fn) {
fprintf(stderr,"Error loading bios ROM (%s)\n",s);
exit(EXIT_FAILURE);
}
if (fread(rom_table[0],1024,1,fn) != 1) {
fprintf(stderr,"Error loading bios ROM %s\n",odyssey2);
exit(EXIT_FAILURE);
}
fclose(fn);
for (i=1; i<8; i++) memcpy(rom_table[i],rom_table[0],1024);
crc = crc32_buf(rom_table[0],1024);
if (crc==0x8016A315) {
printf("Odyssey2 bios ROM loaded\n");
app_data.vpp = 0;
app_data.bios = ROM_O2;
} else if (crc==0xE20A9F41) {
printf("Videopac+ G7400 bios ROM loaded\n");
app_data.vpp = 1;
app_data.bios = ROM_G7400;
} else if (crc==0xA318E8D6) {
if (!((!o2flag)&&(c52flag))) printf("C52 bios ROM loaded\n"); else printf("Ok\n");
app_data.vpp = 0;
app_data.bios = ROM_C52;
} else if (crc==0x11647CA5) {
if (g74flag) printf("Jopac bios ROM loaded\n"); else printf(" Ok\n");
app_data.vpp = 1;
app_data.bios = ROM_JOPAC;
} else {
printf("Bios ROM loaded (unknown version)\n");
app_data.vpp = 0;
app_data.bios = ROM_UNKNOWN;
}
}
static void load_cart(const char *file){
FILE *fn;
long l;
int i, nb;
app_data.crc = crc32_file(file);
if (app_data.crc == 0xAFB23F89) app_data.exrom = 1; /* Musician */
if (app_data.crc == 0x3BFEF56B) app_data.exrom = 1; /* Four in 1 Row! */
if (app_data.crc == 0x9B5E9356) app_data.exrom = 1; /* Four in 1 Row! (french) */
if (((app_data.crc == 0x975AB8DA) || (app_data.crc == 0xE246A812)) && (!app_data.debug)) {
fprintf(stderr,"Error: file %s is an incomplete ROM dump\n",file_v);
exit(EXIT_FAILURE);
}
fn=fopen(file,"rb");
if (!fn) {
fprintf(stderr,"Error loading %s\n",file_v);
exit(EXIT_FAILURE);
}
printf("Loading: \"%s\" Size: ",file_v);
l = filesize(fn);
if ((l % 1024) != 0) {
fprintf(stderr,"Error: file %s is an invalid ROM dump\n",file_v);
exit(EXIT_FAILURE);
}
/* special MegaCART design by Soeren Gust */
if ((l == 32768) || (l == 65536) || (l == 131072) || (l == 262144) || (l == 524288) || (l == 1048576)) {
app_data.megaxrom = 1;
app_data.bank = 1;
megarom = malloc(1048576);
if (megarom == NULL) {
fprintf(stderr, "Out of memory loading %s\n", file);
exit(EXIT_FAILURE);
}
if (fread(megarom, l, 1, fn) != 1) {
fprintf(stderr,"Error loading %s\n",file);
exit(EXIT_FAILURE);
}
/* mirror shorter files into full megabyte */
if (l < 65536) memcpy(megarom+32768,megarom,32768);
if (l < 131072) memcpy(megarom+65536,megarom,65536);
if (l < 262144) memcpy(megarom+131072,megarom,131072);
if (l < 524288) memcpy(megarom+262144,megarom,262144);
if (l < 1048576) memcpy(megarom+524288,megarom,524288);
/* start in bank 0xff */
memcpy(&rom_table[0][1024], megarom + 4096*255 + 1024, 3072);
printf("MegaCart %ldK", l / 1024);
nb = 1;
} else if (((l % 3072) == 0))
{
app_data.three_k = 1;
nb = l/3072;
for (i=nb-1; i>=0; i--) {
if (fread(&rom_table[i][1024],3072,1,fn) != 1) {
fprintf(stderr,"Error loading %s\n",file);
exit(EXIT_FAILURE);
}
}
printf("%dK",nb*3);
} else {
nb = l/2048;
if ((nb == 2) && (app_data.exrom)) {
if (fread(&extROM[0], 1024,1,fn) != 1) {
fprintf(stderr,"Error loading %s\n",file);
exit(EXIT_FAILURE);
}
if (fread(&rom_table[0][1024],3072,1,fn) != 1) {
fprintf(stderr,"Error loading %s\n",file);
exit(EXIT_FAILURE);
}
printf("3K EXROM");
} else {
for (i=nb-1; i>=0; i--) {
if (fread(&rom_table[i][1024],2048,1,fn) != 1) {
fprintf(stderr,"Error loading %s\n",file);
exit(EXIT_FAILURE);
}
memcpy(&rom_table[i][3072],&rom_table[i][2048],1024); /* simulate missing A10 */
}
printf("%dK",nb*2);
}
}
fclose(fn);
rom = rom_table[0];
if (nb==1)
app_data.bank = 1;
else if (nb==2)
app_data.bank = app_data.exrom ? 1 : 2;
else if (nb==4)
app_data.bank = 3;
else
app_data.bank = 4;
if ((rom_table[nb-1][1024+12]=='O') && (rom_table[nb-1][1024+13]=='P') && (rom_table[nb-1][1024+14]=='N') && (rom_table[nb-1][1024+15]=='B')) app_data.openb=1;
printf(" CRC: %08lX\n",app_data.crc);
}
//int suck_bios()
//{
// int i;
// for (i=0; i<contax; ++i)
// {
// strcpy(biossux,biosdir);
// strcat(biossux,arkivo[i]);
// identify_bios(biossux);
// }
// return(0);
//}
/********************* Search ROM */
//int suck_roms()
//{
// int i;
// rom_f = 1;
// for (i=0; i<contax; ++i)
// {
// strcpy(romssux,romdir);
// strcat(romssux,arkivo[i]);
// app_data.crc = crc32_file(romssux);
// if (app_data.crc == crcx)
// {
// if ((app_data.crc == 0xD7089068)||(app_data.crc == 0xB0A7D723)||
// (app_data.crc == 0x0CA26992)||(app_data.crc == 0x0B6EB25B)||
// (app_data.crc == 0x06861A9C)||(app_data.crc == 0xB2F0F0B4)||
// (app_data.crc == 0x68560DC7)||(app_data.crc == 0x0D2D721D)||
// (app_data.crc == 0xC4134DF8)||(app_data.crc == 0xA75C42F8))
// rom_f = 0;
// }
// }
// return(0);
//}
/********************* Ready BIOS */
//int identify_bios(char *biossux)
//{
// app_data.crc = crc32_file(biossux);
// if (app_data.crc == 0x8016A315){
// strcpy(odyssey2, biossux);
// o2flag = 1;
// }
// if (app_data.crc == 0xE20A9F41){
// strcpy(g7400, biossux);
// g74flag = 1;
// }
// if (app_data.crc == 0xA318E8D6){
// strcpy(c52, biossux);
// c52flag = 1;
// }
// if (app_data.crc == 0x11647CA5){
// strcpy(jopac, biossux);
// jopflag = 1;
// }
// return(0);
//}
OdysseyGameCore *current;
@implementation OdysseyGameCore
- (id)init
{
if((self = [super init]))
{
current = self;
virtualPhysicalKeyMap = @{ @(kHIDUsage_Keyboard0) : @(RETROK_0),
@(kHIDUsage_Keyboard1) : @(RETROK_1),
@(kHIDUsage_Keyboard2) : @(RETROK_2),
@(kHIDUsage_Keyboard3) : @(RETROK_3),
@(kHIDUsage_Keyboard4) : @(RETROK_4),
@(kHIDUsage_Keyboard5) : @(RETROK_5),
@(kHIDUsage_Keyboard6) : @(RETROK_6),
@(kHIDUsage_Keyboard7) : @(RETROK_7),
@(kHIDUsage_Keyboard8) : @(RETROK_8),
@(kHIDUsage_Keyboard9) : @(RETROK_9),
@(kHIDUsage_KeyboardA) : @(RETROK_a),
@(kHIDUsage_KeyboardB) : @(RETROK_b),
@(kHIDUsage_KeyboardC) : @(RETROK_c),
@(kHIDUsage_KeyboardD) : @(RETROK_d),
@(kHIDUsage_KeyboardE) : @(RETROK_e),
@(kHIDUsage_KeyboardF) : @(RETROK_f),
@(kHIDUsage_KeyboardG) : @(RETROK_g),
@(kHIDUsage_KeyboardH) : @(RETROK_h),
@(kHIDUsage_KeyboardI) : @(RETROK_i),
@(kHIDUsage_KeyboardJ) : @(RETROK_j),
@(kHIDUsage_KeyboardK) : @(RETROK_k),
@(kHIDUsage_KeyboardL) : @(RETROK_l),
@(kHIDUsage_KeyboardM) : @(RETROK_m),
@(kHIDUsage_KeyboardN) : @(RETROK_n),
@(kHIDUsage_KeyboardO) : @(RETROK_o),
@(kHIDUsage_KeyboardP) : @(RETROK_p),
@(kHIDUsage_KeyboardQ) : @(RETROK_q),
@(kHIDUsage_KeyboardR) : @(RETROK_r),
@(kHIDUsage_KeyboardS) : @(RETROK_s),
@(kHIDUsage_KeyboardT) : @(RETROK_t),
@(kHIDUsage_KeyboardU) : @(RETROK_u),
@(kHIDUsage_KeyboardV) : @(RETROK_v),
@(kHIDUsage_KeyboardW) : @(RETROK_w),
@(kHIDUsage_KeyboardX) : @(RETROK_x),
@(kHIDUsage_KeyboardY) : @(RETROK_y),
@(kHIDUsage_KeyboardZ) : @(RETROK_z),
@(kHIDUsage_KeyboardSpacebar) : @(RETROK_SPACE),
@(kHIDUsage_KeyboardSlash) : @(RETROK_QUESTION),
@(kHIDUsage_KeyboardPeriod) : @(RETROK_PERIOD),
@(kHIDUsage_KeyboardDeleteOrBackspace) : @(RETROK_END),
@(kHIDUsage_KeyboardReturnOrEnter) : @(RETROK_RETURN),
@(kHIDUsage_KeyboardHyphen) : @(RETROK_MINUS),
//@(kHIDUsage_KeyboardSpacebar) : @(RETROK_ASTERISK),
//@(kHIDUsage_KeyboardSpacebar) : @(RETROK_SLASH),
//@(kHIDUsage_KeyboardSpacebar) : @(RETROK_EQUALS),
//@(kHIDUsage_KeyboardSpacebar) : @(RETROK_PLUS),
};
}
return self;
}
- (void)dealloc
{
close_audio();
close_voice();
close_display();
retro_destroybmp();
}
#pragma mark Execution
- (BOOL)loadFileAtPath:(NSString *)path
{
memset(mbmp, 0, sizeof(mbmp));
RLOOP=1;
static char file[MAXC], attr[MAXC], val[MAXC], *p, *binver;
app_data.debug = 0;
app_data.stick[0] = app_data.stick[1] = 1;
app_data.sticknumber[0] = app_data.sticknumber[1] = 0;
set_defjoykeys(0,0);
set_defjoykeys(1,1);
set_defsystemkeys();
app_data.bank = 0;
app_data.limit = 1;
app_data.sound_en = 1;
app_data.speed = 100;
app_data.wsize = 2;
app_data.fullscreen = 0;
app_data.scanlines = 0;
app_data.voice = 1;
app_data.window_title = "O2EM v" O2EM_VERSION;
app_data.svolume = 100;
app_data.vvolume = 100;
app_data.filter = 0;
app_data.exrom = 0;
app_data.three_k = 0;
app_data.crc = 0;
app_data.scshot = scshot;
app_data.statefile = statefile;
app_data.euro = 0;
app_data.openb = 0;
app_data.vpp = 0;
app_data.bios = 0;
app_data.scoretype = 0;
app_data.scoreaddress = 0;
app_data.default_highscore = 0;
app_data.breakpoint = 65535;
app_data.megaxrom = 0;
strcpy(file,"");
strcpy(file_l,"");
strcpy(bios_l,"");
strcpy(bios,"");
strcpy(scshot,"");
strcpy(statefile,"");
strcpy(xrom,"");
strcpy(scorefile,"highscore.txt");
//read_default_config();
init_audio();
app_data.crc = crc32_file([path UTF8String]);
//suck_bios();
o2flag = 1;
crcx = app_data.crc;
//suck_roms();
NSString *biosROM = [[self biosDirectoryPath] stringByAppendingPathComponent:@"o2rom.bin"];
load_bios([biosROM UTF8String]);
load_cart([path UTF8String]);
//if (app_data.voice) load_voice_samples(path2);
init_display();
init_cpu();
init_system();
set_score(app_data.scoretype, app_data.scoreaddress, app_data.default_highscore);
return YES;
}
- (void)executeFrame
{
[self executeFrameSkippingFrame:NO];
}
- (void)executeFrameSkippingFrame:(BOOL)skip
{
//run();
cpu_exec();
int len = evblclk == EVBLCLK_NTSC ? 44100/60 : 44100/50;
//for(int x=0; x<len; x++)
//[[current ringBufferAtIndex:0] write:soundBuffer maxLength:len];
// signed short int *p=(signed short int *)SNDBUF;
// for(int x=0; x<len; x++)
// {
// //[[current ringBufferAtIndex:0] write:p maxLength:len*4];
// [[current ringBufferAtIndex:0] write:p[0] maxLength:2];
// [[current ringBufferAtIndex:0] write:p[1] maxLength:2];
// }
//audio_cb(*p, *p++);
// Convert 8u to 16s
for(int i = 0; i != len; i ++)
{
int16_t sample16 = (soundBuffer[i] << 8) - 32768;
int16_t frame[2] = {sample16, sample16};
//audio_cb(frame[0], frame[1]);
//[[current ringBufferAtIndex:0] write:frame maxLength:2];
//[[current ringBufferAtIndex:0] write:frame[1] maxLength:2];
[[current ringBufferAtIndex:0] write:&frame[0] maxLength:2];
[[current ringBufferAtIndex:0] write:&frame[1] maxLength:2];
}
RLOOP=1;
}
- (void)resetEmulation
{
init_cpu();
init_roms();
init_vpp();
clearscr();
}
#pragma mark Video
- (OEIntRect)screenRect
{
return OEIntRectMake(0, 0, EMUWIDTH, EMUHEIGHT);
}
- (OEIntSize)bufferSize
{
return OEIntSizeMake(TEX_WIDTH, TEX_HEIGHT);
}
- (const void *)videoBuffer
{
return mbmp;
}
- (GLenum)pixelFormat
{
return GL_RGB;
}
- (GLenum)pixelType
{
return GL_UNSIGNED_SHORT_5_6_5;
}
- (GLenum)internalPixelFormat
{
return GL_RGB5;
}
- (NSTimeInterval)frameInterval
{
return 60;
}
#pragma mark Audio
- (NSUInteger)channelCount
{
return 2;
}
- (double)audioSampleRate
{
return 44100;
}
- (NSUInteger)audioBitDepth
{
return 16;
}
#pragma mark Input
- (void)keyDown:(unsigned short)keyCode
{
NSNumber *virtualCode = [virtualPhysicalKeyMap objectForKey:[NSNumber numberWithInt:keyCode]];
if(virtualCode)
key[[virtualCode intValue]] = 1;
}
- (void)keyUp:(unsigned short)keyCode
{
NSNumber *virtualCode = [virtualPhysicalKeyMap objectForKey:[NSNumber numberWithInt:keyCode]];
if(virtualCode)
key[[virtualCode intValue]] = 0;
}
- (oneway void)didPushOdyssey2Button:(OEOdyssey2Button)button forPlayer:(NSUInteger)player;
{
player--;
if (button == OEOdyssey2ButtonUp)
joystick_data[player][0] = 1;
else if (button == OEOdyssey2ButtonDown)
joystick_data[player][1] = 1;
else if (button == OEOdyssey2ButtonLeft)
joystick_data[player][2] = 1;
else if (button == OEOdyssey2ButtonRight)
joystick_data[player][3] = 1;
else if (button == OEOdyssey2ButtonAction)
joystick_data[player][4] = 1;
}
- (oneway void)didReleaseOdyssey2Button:(OEOdyssey2Button)button forPlayer:(NSUInteger)player;
{
player--;
if (button == OEOdyssey2ButtonUp)
joystick_data[player][0] = 0;
else if (button == OEOdyssey2ButtonDown)
joystick_data[player][1] = 0;
else if (button == OEOdyssey2ButtonLeft)
joystick_data[player][2] = 0;
else if (button == OEOdyssey2ButtonRight)
joystick_data[player][3] = 0;
else if (button == OEOdyssey2ButtonAction)
joystick_data[player][4] = 0;
}
- (BOOL)saveStateToFileAtPath:(NSString *)fileName
{
return savestate([fileName UTF8String]) ? YES : NO;
}
- (BOOL)loadStateFromFileAtPath:(NSString *)fileName
{
return loadstate([fileName UTF8String]) ? YES : NO;
}
@end
Reference in New Issue View Git Blame Copy Permalink