Mercurial > vba-clojure
view src/sdl/SDL.cpp @ 138:2b69cbe8a5b9
saving progress on state machine; 240 ops -> 90 ops (provided it withstands debugging)
| author | Dylan Holmes <ocsenave@gmail.com> |
|---|---|
| date | Mon, 19 Mar 2012 03:05:42 -0500 |
| parents | 1ff2c546f5ad |
| children | 95b2758dd517 |
line wrap: on
line source
1 // VisualBoyAdvance - Nintendo Gameboy/GameboyAdvance (TM) emulator.2 // Copyright (C) 1999-2003 Forgotten3 // Copyright (C) 2004 Forgotten and the VBA development team5 // This program is free software; you can redistribute it and/or modify6 // it under the terms of the GNU General Public License as published by7 // the Free Software Foundation; either version 2, or(at your option)8 // any later version.9 //10 // This program is distributed in the hope that it will be useful,11 // but WITHOUT ANY WARRANTY; without even the implied warranty of12 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the13 // GNU General Public License for more details.14 //15 // You should have received a copy of the GNU General Public License16 // along with this program; if not, write to the Free Software Foundation,17 // Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.19 #include <stdarg.h>20 #include <stdlib.h>21 #include <stdio.h>22 #include <string.h>23 #include <sys/types.h>24 #include <sys/stat.h>25 #include <config.h>26 #include "AutoBuild.h"28 #include "Port.h"29 #include "SDL.h"30 #include "debugger.h"31 #include "gba/GBA.h"32 #include "gba/GBAGlobals.h"33 #include "gba/agbprint.h"34 #include "gba/Flash.h"35 #include "gba/RTC.h"36 #include "gba/GBASound.h"37 #include "gb/GB.h"38 #include "gb/gbGlobals.h"39 #include "common/Text.h"40 #include "common/unzip.h"41 #include "common/Util.h"42 #include "common/movie.h"43 #include "common/System.h"44 #include "common/inputGlobal.h"45 #include "../common/vbalua.h"46 #include "SoundSDL.h"47 #include "Drive.h"49 #define GBC_CAPABLE ((gbRom[0x143] & 0x80) != 0)50 #define SGB_CAPABLE (gbRom[0x146] == 0x03)52 #ifndef WIN3253 # include <unistd.h>54 # define GETCWD getcwd55 #else // WIN3256 # include <direct.h>57 # define GETCWD _getcwd58 #endif // WIN3260 #ifndef __GNUC__61 # define HAVE_DECL_GETOPT 062 # define __STDC__ 163 # include "getopt.h"64 #else // ! __GNUC__65 # define HAVE_DECL_GETOPT 166 # include "getopt.h"67 #endif // ! __GNUC__69 #ifdef MMX70 extern "C" bool cpu_mmx;71 #endif72 extern bool8 soundEcho;73 extern bool8 soundLowPass;74 extern bool8 soundReverse;75 extern int Init_2xSaI(u32);76 extern void _2xSaI(u8*,u32,u8*,u8*,u32,int,int);77 extern void _2xSaI32(u8*,u32,u8*,u8*,u32,int,int);78 extern void Super2xSaI(u8*,u32,u8*,u8*,u32,int,int);79 extern void Super2xSaI32(u8*,u32,u8*,u8*,u32,int,int);80 extern void SuperEagle(u8*,u32,u8*,u8*,u32,int,int);81 extern void SuperEagle32(u8*,u32,u8*,u8*,u32,int,int);82 extern void Pixelate2x16(u8*,u32,u8*,u8*,u32,int,int);83 extern void Pixelate2x32(u8*,u32,u8*,u8*,u32,int,int);84 extern void MotionBlur(u8*,u32,u8*,u8*,u32,int,int);85 extern void MotionBlur32(u8*,u32,u8*,u8*,u32,int,int);86 extern void AdMame2x(u8*,u32,u8*,u8*,u32,int,int);87 extern void AdMame2x32(u8*,u32,u8*,u8*,u32,int,int);88 extern void Simple2x16(u8*,u32,u8*,u8*,u32,int,int);89 extern void Simple2x32(u8*,u32,u8*,u8*,u32,int,int);90 extern void Bilinear(u8*,u32,u8*,u8*,u32,int,int);91 extern void Bilinear32(u8*,u32,u8*,u8*,u32,int,int);92 extern void BilinearPlus(u8*,u32,u8*,u8*,u32,int,int);93 extern void BilinearPlus32(u8*,u32,u8*,u8*,u32,int,int);94 extern void Scanlines(u8*,u32,u8*,u8*,u32,int,int);95 extern void Scanlines32(u8*,u32,u8*,u8*,u32,int,int);96 extern void ScanlinesTV(u8*,u32,u8*,u8*,u32,int,int);97 extern void ScanlinesTV32(u8*,u32,u8*,u8*,u32,int,int);98 extern void hq2x(u8*,u32,u8*,u8*,u32,int,int);99 extern void hq2x32(u8*,u32,u8*,u8*,u32,int,int);100 extern void lq2x(u8*,u32,u8*,u8*,u32,int,int);101 extern void lq2x32(u8*,u32,u8*,u8*,u32,int,int);103 extern void SmartIB(u8*,u32,int,int);104 extern void SmartIB32(u8*,u32,int,int);105 extern void MotionBlurIB(u8*,u32,int,int);106 extern void MotionBlurIB32(u8*,u32,int,int);108 void Init_Overlay(SDL_Surface *surface, int overlaytype);109 void Quit_Overlay(void);110 void Draw_Overlay(SDL_Surface *surface, int size);112 extern void remoteInit();113 extern void remoteCleanUp();114 extern void remoteStubMain();115 extern void remoteStubSignal(int,int);116 extern void remoteOutput(char *, u32);117 extern void remoteSetProtocol(int);118 extern void remoteSetPort(int);119 extern void debuggerOutput(char *, u32);121 extern void CPUUpdateRenderBuffers(bool);123 struct EmulatedSystem theEmulator = {124 NULL,125 NULL,126 NULL,127 NULL,128 NULL,129 NULL,130 NULL,131 NULL,132 NULL,133 NULL,134 NULL,135 NULL,136 false,137 0138 };140 SDL_Surface *surface = NULL;141 SDL_Overlay *overlay = NULL;142 SDL_Rect overlay_rect;144 int systemSpeed = 0;145 int systemRedShift = 0;146 int systemBlueShift = 0;147 int systemGreenShift = 0;148 int systemColorDepth = 0;149 int systemDebug = 0;150 int systemVerbose = 0;151 int systemFrameSkip = 0;152 int systemSaveUpdateCounter = SYSTEM_SAVE_NOT_UPDATED;154 int srcPitch = 0;155 int srcWidth = 0;156 int srcHeight = 0;157 int destWidth = 0;158 int destHeight = 0;160 int sensorX = 2047;161 int sensorY = 2047;162 bool sensorOn = false;164 int filter = 0;165 u8 *delta = NULL;167 int sdlPrintUsage = 0;168 int disableMMX = 0;170 int systemCartridgeType = 3;171 int sizeOption = 0;172 int captureFormat = 0;173 int useMovie = 0;175 int pauseWhenInactive = 0;176 int active = 1;177 int emulating = 0;178 int RGB_LOW_BITS_MASK=0x821;179 u32 systemColorMap32[0x10000];180 u16 systemColorMap16[0x10000];181 u16 systemGbPalette[24];182 void (*filterFunction)(u8*,u32,u8*,u8*,u32,int,int) = NULL;183 void (*ifbFunction)(u8*,u32,int,int) = NULL;184 int ifbType = 0;185 char filename[2048];186 char ipsname[2048];187 char biosFileName[2048];188 char movieFileName[2048];189 char captureDir[2048];190 char saveDir[2048];191 char batteryDir[2048];193 static char *rewindMemory = NULL;194 static int rewindPos = 0;195 static int rewindTopPos = 0;196 static int rewindCounter = 0;197 static int rewindCount = 0;198 static bool rewindSaveNeeded = false;199 static int rewindTimer = 0;201 #define REWIND_SIZE 400000203 #define _stricmp strcasecmp205 /*bool sdlButtons[4][12] = {206 { false, false, false, false, false, false,207 false, false, false, false, false, false },208 { false, false, false, false, false, false,209 false, false, false, false, false, false },210 { false, false, false, false, false, false,211 false, false, false, false, false, false },212 { false, false, false, false, false, false,213 false, false, false, false, false, false }214 };*/215 /*216 I'm changing the way the SDL GUI handles the button217 input to match the one in win32, this is needed in218 order to be compatible with the format required by219 common/movie.cpp220 --Felipe221 */223 u16 currentButtons[4] = {0, 0, 0, 0};225 bool sdlMotionButtons[4] = { false, false, false, false };226 const int32 INITIAL_SENSOR_VALUE = 2047;228 int sdlNumDevices = 0;229 SDL_Joystick **sdlDevices = NULL;231 bool wasPaused = false;232 int autoFrameSkip = 0;233 int frameskipadjust = 0;234 int showRenderedFrames = 0;235 int renderedFrames = 0;237 int throttle = 0;238 u32 throttleLastTime = 0;239 u32 autoFrameSkipLastTime = 0;241 int showSpeed = 1;242 int showSpeedTransparent = 1;243 bool disableStatusMessages = false;244 bool paused = false;245 bool pauseNextFrame = false;246 bool debugger = false;247 bool debuggerStub = false;248 int fullscreen = 0;249 bool systemSoundOn = false;250 bool yuv = false;251 int yuvType = 0;252 bool removeIntros = false;253 int sdlFlashSize = 0;254 int sdlAutoIPS = 1;255 int sdlRtcEnable = 0;256 int sdlAgbPrint = 0;258 int sdlDefaultJoypad = 0;260 extern void debuggerSignal(int,int);262 void (*dbgMain)() = debuggerMain;263 void (*dbgSignal)(int,int) = debuggerSignal;264 void (*dbgOutput)(char *, u32) = debuggerOutput;266 int mouseCounter = 0;267 int autoFire = 0;268 bool autoFireToggle = false;270 bool screenMessage[8] = {false,false,false,false,false,false,false,false};271 char screenMessageBuffer[8][21];272 u32 screenMessageTime[8] = {0,0,0,0,0,0,0,0};273 u32 screenMessageDuration[8] = {0,0,0,0,0,0,0,0};275 SDL_cond *cond = NULL;276 SDL_mutex *mutex = NULL;277 u8* sdlBuffer;278 int sdlSoundLen = 0;279 SoundSDL* soundDriver = NULL;281 char *arg0;283 #ifndef C_CORE284 u8 sdlStretcher[16384];285 int sdlStretcherPos;286 #else287 void (*sdlStretcher)(u8 *, u8*) = NULL;288 #endif290 u16 joypad[4][12] = {291 { SDLK_LEFT, SDLK_RIGHT,292 SDLK_UP, SDLK_DOWN,293 SDLK_z, SDLK_x,294 SDLK_RETURN,SDLK_BACKSPACE,295 SDLK_a, SDLK_s,296 SDLK_SPACE, SDLK_F12297 },298 { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },299 { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },300 { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 }301 };303 u16 defaultJoypad[12] = {304 SDLK_LEFT, SDLK_RIGHT,305 SDLK_UP, SDLK_DOWN,306 SDLK_z, SDLK_x,307 SDLK_RETURN,SDLK_BACKSPACE,308 SDLK_a, SDLK_s,309 SDLK_SPACE, SDLK_F12310 };312 u16 motion[4] = {313 SDLK_KP4, SDLK_KP6, SDLK_KP8, SDLK_KP2314 };316 u16 defaultMotion[4] = {317 SDLK_KP4, SDLK_KP6, SDLK_KP8, SDLK_KP2318 };320 struct option sdlOptions[] = {321 { "agb-print", no_argument, &sdlAgbPrint, 1 },322 { "auto-frameskip", no_argument, &autoFrameSkip, 1 },323 { "bios", required_argument, 0, 'b' },324 { "config", required_argument, 0, 'c' },325 { "debug", no_argument, 0, 'd' },326 { "filter", required_argument, 0, 'f' },327 { "filter-normal", no_argument, &filter, 0 },328 { "filter-tv-mode", no_argument, &filter, 1 },329 { "filter-2xsai", no_argument, &filter, 2 },330 { "filter-super-2xsai", no_argument, &filter, 3 },331 { "filter-super-eagle", no_argument, &filter, 4 },332 { "filter-pixelate", no_argument, &filter, 5 },333 { "filter-motion-blur", no_argument, &filter, 6 },334 { "filter-advmame", no_argument, &filter, 7 },335 { "filter-simple2x", no_argument, &filter, 8 },336 { "filter-bilinear", no_argument, &filter, 9 },337 { "filter-bilinear+", no_argument, &filter, 10 },338 { "filter-scanlines", no_argument, &filter, 11 },339 { "filter-hq2x", no_argument, &filter, 12 },340 { "filter-lq2x", no_argument, &filter, 13 },341 { "flash-size", required_argument, 0, 'S' },342 { "flash-64k", no_argument, &sdlFlashSize, 0 },343 { "flash-128k", no_argument, &sdlFlashSize, 1 },344 { "frameskip", required_argument, 0, 's' },345 { "fullscreen", no_argument, &fullscreen, 1 },346 { "gdb", required_argument, 0, 'G' },347 { "help", no_argument, &sdlPrintUsage, 1 },348 { "ifb-none", no_argument, &ifbType, 0 },349 { "ifb-motion-blur", no_argument, &ifbType, 1 },350 { "ifb-smart", no_argument, &ifbType, 2 },351 { "ips", required_argument, 0, 'i' },352 { "no-agb-print", no_argument, &sdlAgbPrint, 0 },353 { "no-auto-frameskip", no_argument, &autoFrameSkip, 0 },354 { "no-debug", no_argument, 0, 'N' },355 { "no-ips", no_argument, &sdlAutoIPS, 0 },356 { "no-mmx", no_argument, &disableMMX, 1 },357 { "no-pause-when-inactive", no_argument, &pauseWhenInactive, 0 },358 { "no-rtc", no_argument, &sdlRtcEnable, 0 },359 { "no-show-speed", no_argument, &showSpeed, 0 },360 { "no-throttle", no_argument, &throttle, 0 },361 { "pause-when-inactive", no_argument, &pauseWhenInactive, 1 },362 { "profile", optional_argument, 0, 'P' },363 { "rtc", no_argument, &sdlRtcEnable, 1 },364 { "save-type", required_argument, 0, 't' },365 { "save-auto", no_argument, &cpuSaveType, 0 },366 { "save-eeprom", no_argument, &cpuSaveType, 1 },367 { "save-sram", no_argument, &cpuSaveType, 2 },368 { "save-flash", no_argument, &cpuSaveType, 3 },369 { "save-sensor", no_argument, &cpuSaveType, 4 },370 { "save-none", no_argument, &cpuSaveType, 5 },371 { "show-speed-normal", no_argument, &showSpeed, 1 },372 { "show-speed-detailed", no_argument, &showSpeed, 2 },373 { "throttle", required_argument, 0, 'T' },374 { "verbose", required_argument, 0, 'v' },375 { "video-1x", no_argument, &sizeOption, 0 },376 { "video-2x", no_argument, &sizeOption, 1 },377 { "video-3x", no_argument, &sizeOption, 2 },378 { "video-4x", no_argument, &sizeOption, 3 },379 { "yuv", required_argument, 0, 'Y' },380 { "recordmovie", required_argument, 0, 'r' },381 { "playmovie", required_argument, 0, 'p' },382 { "watchmovie", required_argument, 0, 'w' },383 { NULL, no_argument, NULL, 0 }384 };386 #ifndef C_CORE387 #define SDL_LONG(val) \388 *((u32 *)&sdlStretcher[sdlStretcherPos]) = val;\389 sdlStretcherPos+=4;391 #define SDL_AND_EAX(val) \392 sdlStretcher[sdlStretcherPos++] = 0x25;\393 SDL_LONG(val);395 #define SDL_AND_EBX(val) \396 sdlStretcher[sdlStretcherPos++] = 0x81;\397 sdlStretcher[sdlStretcherPos++] = 0xe3;\398 SDL_LONG(val);400 #define SDL_OR_EAX_EBX \401 sdlStretcher[sdlStretcherPos++] = 0x09;\402 sdlStretcher[sdlStretcherPos++] = 0xd8;404 #define SDL_LOADL_EBX \405 sdlStretcher[sdlStretcherPos++] = 0x8b;\406 sdlStretcher[sdlStretcherPos++] = 0x1f;408 #define SDL_LOADW \409 sdlStretcher[sdlStretcherPos++] = 0x66;\410 sdlStretcher[sdlStretcherPos++] = 0x8b;\411 sdlStretcher[sdlStretcherPos++] = 0x06;\412 sdlStretcher[sdlStretcherPos++] = 0x83;\413 sdlStretcher[sdlStretcherPos++] = 0xc6;\414 sdlStretcher[sdlStretcherPos++] = 0x02;416 #define SDL_LOADL \417 sdlStretcher[sdlStretcherPos++] = 0x8b;\418 sdlStretcher[sdlStretcherPos++] = 0x06;\419 sdlStretcher[sdlStretcherPos++] = 0x83;\420 sdlStretcher[sdlStretcherPos++] = 0xc6;\421 sdlStretcher[sdlStretcherPos++] = 0x04;423 #define SDL_LOADL2 \424 sdlStretcher[sdlStretcherPos++] = 0x8b;\425 sdlStretcher[sdlStretcherPos++] = 0x06;\426 sdlStretcher[sdlStretcherPos++] = 0x83;\427 sdlStretcher[sdlStretcherPos++] = 0xc6;\428 sdlStretcher[sdlStretcherPos++] = 0x03;430 #define SDL_STOREW \431 sdlStretcher[sdlStretcherPos++] = 0x66;\432 sdlStretcher[sdlStretcherPos++] = 0x89;\433 sdlStretcher[sdlStretcherPos++] = 0x07;\434 sdlStretcher[sdlStretcherPos++] = 0x83;\435 sdlStretcher[sdlStretcherPos++] = 0xc7;\436 sdlStretcher[sdlStretcherPos++] = 0x02;438 #define SDL_STOREL \439 sdlStretcher[sdlStretcherPos++] = 0x89;\440 sdlStretcher[sdlStretcherPos++] = 0x07;\441 sdlStretcher[sdlStretcherPos++] = 0x83;\442 sdlStretcher[sdlStretcherPos++] = 0xc7;\443 sdlStretcher[sdlStretcherPos++] = 0x04;445 #define SDL_STOREL2 \446 sdlStretcher[sdlStretcherPos++] = 0x89;\447 sdlStretcher[sdlStretcherPos++] = 0x07;\448 sdlStretcher[sdlStretcherPos++] = 0x83;\449 sdlStretcher[sdlStretcherPos++] = 0xc7;\450 sdlStretcher[sdlStretcherPos++] = 0x03;452 #define SDL_RET \453 sdlStretcher[sdlStretcherPos++] = 0xc3;455 #define SDL_PUSH_EAX \456 sdlStretcher[sdlStretcherPos++] = 0x50;458 #define SDL_PUSH_ECX \459 sdlStretcher[sdlStretcherPos++] = 0x51;461 #define SDL_PUSH_EBX \462 sdlStretcher[sdlStretcherPos++] = 0x53;464 #define SDL_PUSH_ESI \465 sdlStretcher[sdlStretcherPos++] = 0x56;467 #define SDL_PUSH_EDI \468 sdlStretcher[sdlStretcherPos++] = 0x57;470 #define SDL_POP_EAX \471 sdlStretcher[sdlStretcherPos++] = 0x58;473 #define SDL_POP_ECX \474 sdlStretcher[sdlStretcherPos++] = 0x59;476 #define SDL_POP_EBX \477 sdlStretcher[sdlStretcherPos++] = 0x5b;479 #define SDL_POP_ESI \480 sdlStretcher[sdlStretcherPos++] = 0x5e;482 #define SDL_POP_EDI \483 sdlStretcher[sdlStretcherPos++] = 0x5f;485 #define SDL_MOV_ECX(val) \486 sdlStretcher[sdlStretcherPos++] = 0xb9;\487 SDL_LONG(val);489 #define SDL_REP_MOVSB \490 sdlStretcher[sdlStretcherPos++] = 0xf3;\491 sdlStretcher[sdlStretcherPos++] = 0xa4;493 #define SDL_REP_MOVSW \494 sdlStretcher[sdlStretcherPos++] = 0xf3;\495 sdlStretcher[sdlStretcherPos++] = 0x66;\496 sdlStretcher[sdlStretcherPos++] = 0xa5;498 #define SDL_REP_MOVSL \499 sdlStretcher[sdlStretcherPos++] = 0xf3;\500 sdlStretcher[sdlStretcherPos++] = 0xa5;502 void sdlMakeStretcher(int width)503 {504 sdlStretcherPos = 0;505 switch(systemColorDepth) {506 case 16:507 if(sizeOption) {508 SDL_PUSH_EAX;509 SDL_PUSH_ESI;510 SDL_PUSH_EDI;511 for(int i = 0; i < width; i++) {512 SDL_LOADW;513 SDL_STOREW;514 SDL_STOREW;515 if(sizeOption > 1) {516 SDL_STOREW;517 }518 if(sizeOption > 2) {519 SDL_STOREW;520 }521 }522 SDL_POP_EDI;523 SDL_POP_ESI;524 SDL_POP_EAX;525 SDL_RET;526 } else {527 SDL_PUSH_ESI;528 SDL_PUSH_EDI;529 SDL_PUSH_ECX;530 SDL_MOV_ECX(width);531 SDL_REP_MOVSW;532 SDL_POP_ECX;533 SDL_POP_EDI;534 SDL_POP_ESI;535 SDL_RET;536 }537 break;538 case 24:539 if(sizeOption) {540 SDL_PUSH_EAX;541 SDL_PUSH_ESI;542 SDL_PUSH_EDI;543 int w = width - 1;544 for(int i = 0; i < w; i++) {545 SDL_LOADL2;546 SDL_STOREL2;547 SDL_STOREL2;548 if(sizeOption > 1) {549 SDL_STOREL2;550 }551 if(sizeOption > 2) {552 SDL_STOREL2;553 }554 }555 // need to write the last one556 SDL_LOADL2;557 SDL_STOREL2;558 if(sizeOption > 1) {559 SDL_STOREL2;560 }561 if(sizeOption > 2) {562 SDL_STOREL2;563 }564 SDL_AND_EAX(0x00ffffff);565 SDL_PUSH_EBX;566 SDL_LOADL_EBX;567 SDL_AND_EBX(0xff000000);568 SDL_OR_EAX_EBX;569 SDL_POP_EBX;570 SDL_STOREL2;571 SDL_POP_EDI;572 SDL_POP_ESI;573 SDL_POP_EAX;574 SDL_RET;575 } else {576 SDL_PUSH_ESI;577 SDL_PUSH_EDI;578 SDL_PUSH_ECX;579 SDL_MOV_ECX(3*width);580 SDL_REP_MOVSB;581 SDL_POP_ECX;582 SDL_POP_EDI;583 SDL_POP_ESI;584 SDL_RET;585 }586 break;587 case 32:588 if(sizeOption) {589 SDL_PUSH_EAX;590 SDL_PUSH_ESI;591 SDL_PUSH_EDI;592 for(int i = 0; i < width; i++) {593 SDL_LOADL;594 SDL_STOREL;595 SDL_STOREL;596 if(sizeOption > 1) {597 SDL_STOREL;598 }599 if(sizeOption > 2) {600 SDL_STOREL;601 }602 }603 SDL_POP_EDI;604 SDL_POP_ESI;605 SDL_POP_EAX;606 SDL_RET;607 } else {608 SDL_PUSH_ESI;609 SDL_PUSH_EDI;610 SDL_PUSH_ECX;611 SDL_MOV_ECX(width);612 SDL_REP_MOVSL;613 SDL_POP_ECX;614 SDL_POP_EDI;615 SDL_POP_ESI;616 SDL_RET;617 }618 break;619 }620 }622 #ifdef _MSC_VER623 #define SDL_CALL_STRETCHER \624 {\625 __asm mov eax, stretcher\626 __asm mov edi, dest\627 __asm mov esi, src\628 __asm call eax\629 }630 #else631 #define SDL_CALL_STRETCHER \632 asm volatile("call *%%eax"::"a" (stretcher),"S" (src),"D" (dest))633 #endif634 #else635 #define SDL_CALL_STRETCHER \636 sdlStretcher(src, dest)638 void sdlStretch16x1(u8 *src, u8 *dest)639 {640 u16 *s = (u16 *)src;641 u16 *d = (u16 *)dest;642 for(int i = 0; i < srcWidth; i++)643 *d++ = *s++;644 }646 void sdlStretch16x2(u8 *src, u8 *dest)647 {648 u16 *s = (u16 *)src;649 u16 *d = (u16 *)dest;650 for(int i = 0; i < srcWidth; i++) {651 *d++ = *s;652 *d++ = *s++;653 }654 }656 void sdlStretch16x3(u8 *src, u8 *dest)657 {658 u16 *s = (u16 *)src;659 u16 *d = (u16 *)dest;660 for(int i = 0; i < srcWidth; i++) {661 *d++ = *s;662 *d++ = *s;663 *d++ = *s++;664 }665 }667 void sdlStretch16x4(u8 *src, u8 *dest)668 {669 u16 *s = (u16 *)src;670 u16 *d = (u16 *)dest;671 for(int i = 0; i < srcWidth; i++) {672 *d++ = *s;673 *d++ = *s;674 *d++ = *s;675 *d++ = *s++;676 }677 }679 void (*sdlStretcher16[4])(u8 *, u8 *) = {680 sdlStretch16x1,681 sdlStretch16x2,682 sdlStretch16x3,683 sdlStretch16x4684 };686 void sdlStretch32x1(u8 *src, u8 *dest)687 {688 u32 *s = (u32 *)src;689 u32 *d = (u32 *)dest;690 for(int i = 0; i < srcWidth; i++)691 *d++ = *s++;692 }694 void sdlStretch32x2(u8 *src, u8 *dest)695 {696 u32 *s = (u32 *)src;697 u32 *d = (u32 *)dest;698 for(int i = 0; i < srcWidth; i++) {699 *d++ = *s;700 *d++ = *s++;701 }702 }704 void sdlStretch32x3(u8 *src, u8 *dest)705 {706 u32 *s = (u32 *)src;707 u32 *d = (u32 *)dest;708 for(int i = 0; i < srcWidth; i++) {709 *d++ = *s;710 *d++ = *s;711 *d++ = *s++;712 }713 }715 void sdlStretch32x4(u8 *src, u8 *dest)716 {717 u32 *s = (u32 *)src;718 u32 *d = (u32 *)dest;719 for(int i = 0; i < srcWidth; i++) {720 *d++ = *s;721 *d++ = *s;722 *d++ = *s;723 *d++ = *s++;724 }725 }727 void (*sdlStretcher32[4])(u8 *, u8 *) = {728 sdlStretch32x1,729 sdlStretch32x2,730 sdlStretch32x3,731 sdlStretch32x4732 };734 void sdlStretch24x1(u8 *src, u8 *dest)735 {736 u8 *s = src;737 u8 *d = dest;738 for(int i = 0; i < srcWidth; i++) {739 *d++ = *s++;740 *d++ = *s++;741 *d++ = *s++;742 }743 }745 void sdlStretch24x2(u8 *src, u8 *dest)746 {747 u8 *s = (u8 *)src;748 u8 *d = (u8 *)dest;749 for(int i = 0; i < srcWidth; i++) {750 *d++ = *s;751 *d++ = *(s+1);752 *d++ = *(s+2);753 s += 3;754 *d++ = *s;755 *d++ = *(s+1);756 *d++ = *(s+2);757 s += 3;758 }759 }761 void sdlStretch24x3(u8 *src, u8 *dest)762 {763 u8 *s = (u8 *)src;764 u8 *d = (u8 *)dest;765 for(int i = 0; i < srcWidth; i++) {766 *d++ = *s;767 *d++ = *(s+1);768 *d++ = *(s+2);769 s += 3;770 *d++ = *s;771 *d++ = *(s+1);772 *d++ = *(s+2);773 s += 3;774 *d++ = *s;775 *d++ = *(s+1);776 *d++ = *(s+2);777 s += 3;778 }779 }781 void sdlStretch24x4(u8 *src, u8 *dest)782 {783 u8 *s = (u8 *)src;784 u8 *d = (u8 *)dest;785 for(int i = 0; i < srcWidth; i++) {786 *d++ = *s;787 *d++ = *(s+1);788 *d++ = *(s+2);789 s += 3;790 *d++ = *s;791 *d++ = *(s+1);792 *d++ = *(s+2);793 s += 3;794 *d++ = *s;795 *d++ = *(s+1);796 *d++ = *(s+2);797 s += 3;798 *d++ = *s;799 *d++ = *(s+1);800 *d++ = *(s+2);801 s += 3;802 }803 }805 void (*sdlStretcher24[4])(u8 *, u8 *) = {806 sdlStretch24x1,807 sdlStretch24x2,808 sdlStretch24x3,809 sdlStretch24x4810 };812 #endif814 u32 sdlFromHex(char *s)815 {816 u32 value;817 sscanf(s, "%x", &value);818 return value;819 }821 #ifdef __MSC__822 #define stat _stat823 #define S_IFDIR _S_IFDIR824 #endif826 void sdlCheckDirectory(char *dir)827 {828 struct stat buf;830 int len = strlen(dir);832 char *p = dir + len - 1;834 if(*p == '/' ||835 *p == '\\')836 *p = 0;838 if(stat(dir, &buf) == 0) {839 if(!(buf.st_mode & S_IFDIR)) {840 fprintf(stderr, "Error: %s is not a directory\n", dir);841 dir[0] = 0;842 }843 } else {844 fprintf(stderr, "Error: %s does not exist\n", dir);845 dir[0] = 0;846 }847 }849 char *sdlGetFilename(char *name)850 {851 static char filebuffer[2048];853 int len = strlen(name);855 char *p = name + len - 1;857 while(true) {858 if(*p == '/' ||859 *p == '\\') {860 p++;861 break;862 }863 len--;864 p--;865 if(len == 0)866 break;867 }869 if(len == 0)870 strcpy(filebuffer, name);871 else872 strcpy(filebuffer, p);873 return filebuffer;874 }876 FILE *sdlFindFile(const char *name)877 {878 char buffer[4096];879 char path[2048];881 #ifdef WIN32882 #define PATH_SEP ";"883 #define FILE_SEP '\\'884 #define EXE_NAME "VisualBoyAdvance-SDL.exe"885 #else // ! WIN32886 #define PATH_SEP ":"887 #define FILE_SEP '/'888 #define EXE_NAME "VisualBoyAdvance"889 #endif // ! WIN32891 fprintf(stderr, "Searching for file %s\n", name);893 if(GETCWD(buffer, 2048)) {894 fprintf(stderr, "Searching current directory: %s\n", buffer);895 }897 FILE *f = fopen(name, "r");898 if(f != NULL) {899 return f;900 }902 char *home = getenv("HOME");904 if(home != NULL) {905 fprintf(stderr, "Searching home directory: %s\n", home);906 sprintf(path, "%s%c%s", home, FILE_SEP, name);907 f = fopen(path, "r");908 if(f != NULL)909 return f;910 }912 #ifdef WIN32913 home = getenv("USERPROFILE");914 if(home != NULL) {915 fprintf(stderr, "Searching user profile directory: %s\n", home);916 sprintf(path, "%s%c%s", home, FILE_SEP, name);917 f = fopen(path, "r");918 if(f != NULL)919 return f;920 }921 #else // ! WIN32922 fprintf(stderr, "Searching system config directory: %s\n", SYSCONFDIR);923 sprintf(path, "%s%c%s", SYSCONFDIR, FILE_SEP, name);924 f = fopen(path, "r");925 if(f != NULL)926 return f;927 #endif // ! WIN32929 if(!strchr(arg0, '/') &&930 !strchr(arg0, '\\')) {931 char *path = getenv("PATH");933 if(path != NULL) {934 fprintf(stderr, "Searching PATH\n");935 strncpy(buffer, path, 4096);936 buffer[4095] = 0;937 char *tok = strtok(buffer, PATH_SEP);939 while(tok) {940 sprintf(path, "%s%c%s", tok, FILE_SEP, EXE_NAME);941 f = fopen(path, "r");942 if(f != NULL) {943 char path2[2048];944 fclose(f);945 sprintf(path2, "%s%c%s", tok, FILE_SEP, name);946 f = fopen(path2, "r");947 if(f != NULL) {948 fprintf(stderr, "Found at %s\n", path2);949 return f;950 }951 }952 tok = strtok(NULL, PATH_SEP);953 }954 }955 } else {956 // executable is relative to some directory957 fprintf(stderr, "Searching executable directory\n");958 strcpy(buffer, arg0);959 char *p = strrchr(buffer, FILE_SEP);960 if(p) {961 *p = 0;962 sprintf(path, "%s%c%s", buffer, FILE_SEP, name);963 f = fopen(path, "r");964 if(f != NULL)965 return f;966 }967 }968 return NULL;969 }971 void sdlReadPreferences(FILE *f)972 {973 char buffer[2048];975 while(1) {976 char *s = fgets(buffer, 2048, f);978 if(s == NULL)979 break;981 char *p = strchr(s, '#');983 if(p)984 *p = 0;986 char *token = strtok(s, " \t\n\r=");988 if(!token)989 continue;991 if(strlen(token) == 0)992 continue;994 char *key = token;995 char *value = strtok(NULL, "\t\n\r");997 if(value == NULL) {998 fprintf(stderr, "Empty value for key %s\n", key);999 continue;1000 }1002 if(!strcmp(key,"Joy0_Left")) {1003 joypad[0][KEY_LEFT] = sdlFromHex(value);1004 } else if(!strcmp(key, "Joy0_Right")) {1005 joypad[0][KEY_RIGHT] = sdlFromHex(value);1006 } else if(!strcmp(key, "Joy0_Up")) {1007 joypad[0][KEY_UP] = sdlFromHex(value);1008 } else if(!strcmp(key, "Joy0_Down")) {1009 joypad[0][KEY_DOWN] = sdlFromHex(value);1010 } else if(!strcmp(key, "Joy0_A")) {1011 joypad[0][KEY_BUTTON_A] = sdlFromHex(value);1012 } else if(!strcmp(key, "Joy0_B")) {1013 joypad[0][KEY_BUTTON_B] = sdlFromHex(value);1014 } else if(!strcmp(key, "Joy0_L")) {1015 joypad[0][KEY_BUTTON_L] = sdlFromHex(value);1016 } else if(!strcmp(key, "Joy0_R")) {1017 joypad[0][KEY_BUTTON_R] = sdlFromHex(value);1018 } else if(!strcmp(key, "Joy0_Start")) {1019 joypad[0][KEY_BUTTON_START] = sdlFromHex(value);1020 } else if(!strcmp(key, "Joy0_Select")) {1021 joypad[0][KEY_BUTTON_SELECT] = sdlFromHex(value);1022 } else if(!strcmp(key, "Joy0_Speed")) {1023 joypad[0][KEY_BUTTON_SPEED] = sdlFromHex(value);1024 } else if(!strcmp(key, "Joy0_Capture")) {1025 joypad[0][KEY_BUTTON_CAPTURE] = sdlFromHex(value);1026 } else if(!strcmp(key,"Joy1_Left")) {1027 joypad[1][KEY_LEFT] = sdlFromHex(value);1028 } else if(!strcmp(key, "Joy1_Right")) {1029 joypad[1][KEY_RIGHT] = sdlFromHex(value);1030 } else if(!strcmp(key, "Joy1_Up")) {1031 joypad[1][KEY_UP] = sdlFromHex(value);1032 } else if(!strcmp(key, "Joy1_Down")) {1033 joypad[1][KEY_DOWN] = sdlFromHex(value);1034 } else if(!strcmp(key, "Joy1_A")) {1035 joypad[1][KEY_BUTTON_A] = sdlFromHex(value);1036 } else if(!strcmp(key, "Joy1_B")) {1037 joypad[1][KEY_BUTTON_B] = sdlFromHex(value);1038 } else if(!strcmp(key, "Joy1_L")) {1039 joypad[1][KEY_BUTTON_L] = sdlFromHex(value);1040 } else if(!strcmp(key, "Joy1_R")) {1041 joypad[1][KEY_BUTTON_R] = sdlFromHex(value);1042 } else if(!strcmp(key, "Joy1_Start")) {1043 joypad[1][KEY_BUTTON_START] = sdlFromHex(value);1044 } else if(!strcmp(key, "Joy1_Select")) {1045 joypad[1][KEY_BUTTON_SELECT] = sdlFromHex(value);1046 } else if(!strcmp(key, "Joy1_Speed")) {1047 joypad[1][KEY_BUTTON_SPEED] = sdlFromHex(value);1048 } else if(!strcmp(key, "Joy1_Capture")) {1049 joypad[1][KEY_BUTTON_CAPTURE] = sdlFromHex(value);1050 } else if(!strcmp(key,"Joy2_Left")) {1051 joypad[2][KEY_LEFT] = sdlFromHex(value);1052 } else if(!strcmp(key, "Joy2_Right")) {1053 joypad[2][KEY_RIGHT] = sdlFromHex(value);1054 } else if(!strcmp(key, "Joy2_Up")) {1055 joypad[2][KEY_UP] = sdlFromHex(value);1056 } else if(!strcmp(key, "Joy2_Down")) {1057 joypad[2][KEY_DOWN] = sdlFromHex(value);1058 } else if(!strcmp(key, "Joy2_A")) {1059 joypad[2][KEY_BUTTON_A] = sdlFromHex(value);1060 } else if(!strcmp(key, "Joy2_B")) {1061 joypad[2][KEY_BUTTON_B] = sdlFromHex(value);1062 } else if(!strcmp(key, "Joy2_L")) {1063 joypad[2][KEY_BUTTON_L] = sdlFromHex(value);1064 } else if(!strcmp(key, "Joy2_R")) {1065 joypad[2][KEY_BUTTON_R] = sdlFromHex(value);1066 } else if(!strcmp(key, "Joy2_Start")) {1067 joypad[2][KEY_BUTTON_START] = sdlFromHex(value);1068 } else if(!strcmp(key, "Joy2_Select")) {1069 joypad[2][KEY_BUTTON_SELECT] = sdlFromHex(value);1070 } else if(!strcmp(key, "Joy2_Speed")) {1071 joypad[2][KEY_BUTTON_SPEED] = sdlFromHex(value);1072 } else if(!strcmp(key, "Joy2_Capture")) {1073 joypad[2][KEY_BUTTON_CAPTURE] = sdlFromHex(value);1074 } else if(!strcmp(key,"Joy4_Left")) {1075 joypad[4][KEY_LEFT] = sdlFromHex(value);1076 } else if(!strcmp(key, "Joy4_Right")) {1077 joypad[4][KEY_RIGHT] = sdlFromHex(value);1078 } else if(!strcmp(key, "Joy4_Up")) {1079 joypad[4][KEY_UP] = sdlFromHex(value);1080 } else if(!strcmp(key, "Joy4_Down")) {1081 joypad[4][KEY_DOWN] = sdlFromHex(value);1082 } else if(!strcmp(key, "Joy4_A")) {1083 joypad[4][KEY_BUTTON_A] = sdlFromHex(value);1084 } else if(!strcmp(key, "Joy4_B")) {1085 joypad[4][KEY_BUTTON_B] = sdlFromHex(value);1086 } else if(!strcmp(key, "Joy4_L")) {1087 joypad[4][KEY_BUTTON_L] = sdlFromHex(value);1088 } else if(!strcmp(key, "Joy4_R")) {1089 joypad[4][KEY_BUTTON_R] = sdlFromHex(value);1090 } else if(!strcmp(key, "Joy4_Start")) {1091 joypad[4][KEY_BUTTON_START] = sdlFromHex(value);1092 } else if(!strcmp(key, "Joy4_Select")) {1093 joypad[4][KEY_BUTTON_SELECT] = sdlFromHex(value);1094 } else if(!strcmp(key, "Joy4_Speed")) {1095 joypad[4][KEY_BUTTON_SPEED] = sdlFromHex(value);1096 } else if(!strcmp(key, "Joy4_Capture")) {1097 joypad[4][KEY_BUTTON_CAPTURE] = sdlFromHex(value);1098 } else if(!strcmp(key, "Motion_Left")) {1099 motion[KEY_LEFT] = sdlFromHex(value);1100 } else if(!strcmp(key, "Motion_Right")) {1101 motion[KEY_RIGHT] = sdlFromHex(value);1102 } else if(!strcmp(key, "Motion_Up")) {1103 motion[KEY_UP] = sdlFromHex(value);1104 } else if(!strcmp(key, "Motion_Down")) {1105 motion[KEY_DOWN] = sdlFromHex(value);1106 } else if(!strcmp(key, "frameSkip")) {1107 frameSkip = sdlFromHex(value);1108 if(frameSkip < 0 || frameSkip > 9)1109 frameSkip = 2;1110 } else if(!strcmp(key, "gbFrameSkip")) {1111 gbFrameSkip = sdlFromHex(value);1112 if(gbFrameSkip < 0 || gbFrameSkip > 9)1113 gbFrameSkip = 0;1114 } else if(!strcmp(key, "video")) {1115 sizeOption = sdlFromHex(value);1116 if(sizeOption < 0 || sizeOption > 3)1117 sizeOption = 1;1118 } else if(!strcmp(key, "fullScreen")) {1119 fullscreen = sdlFromHex(value) ? 1 : 0;1120 } else if(!strcmp(key, "useBios")) {1121 useBios = sdlFromHex(value) ? true : false;1122 } else if(!strcmp(key, "skipBios")) {1123 skipBios = sdlFromHex(value) ? true : false;1124 } else if(!strcmp(key, "biosFile")) {1125 strcpy(biosFileName, value);1126 } else if(!strcmp(key, "filter")) {1127 filter = sdlFromHex(value);1128 if(filter < 0 || filter > 13)1129 filter = 0;1130 } else if(!strcmp(key, "disableStatus")) {1131 disableStatusMessages = sdlFromHex(value) ? true : false;1132 } else if(!strcmp(key, "borderOn")) {1133 gbBorderOn = sdlFromHex(value) ? true : false;1134 } else if(!strcmp(key, "borderAutomatic")) {1135 gbBorderAutomatic = sdlFromHex(value) ? true : false;1136 } else if(!strcmp(key, "emulatorType")) {1137 gbEmulatorType = sdlFromHex(value);1138 if(gbEmulatorType < 0 || gbEmulatorType > 5)1139 gbEmulatorType = 1;1140 } else if(!strcmp(key, "colorOption")) {1141 gbColorOption = sdlFromHex(value) ? true : false;1142 } else if(!strcmp(key, "captureDir")) {1143 sdlCheckDirectory(value);1144 strcpy(captureDir, value);1145 } else if(!strcmp(key, "saveDir")) {1146 sdlCheckDirectory(value);1147 strcpy(saveDir, value);1148 } else if(!strcmp(key, "batteryDir")) {1149 sdlCheckDirectory(value);1150 strcpy(batteryDir, value);1151 } else if(!strcmp(key, "captureFormat")) {1152 captureFormat = sdlFromHex(value);1153 } else if(!strcmp(key, "soundQuality")) {1154 soundQuality = sdlFromHex(value);1155 switch(soundQuality) {1156 case 1: break;1157 default:1158 fprintf(stderr, "The rerecording version will run only sound at highest quality. Defaulting to 44.1 KHz\n");1159 soundQuality = 1;1160 break;1161 }1162 } else if(!strcmp(key, "soundOff")) {1163 soundOffFlag = sdlFromHex(value) ? true : false;1164 } else if(!strcmp(key, "soundEnable")) {1165 int res = sdlFromHex(value) & 0x30f;1166 soundEnableChannels(res);1167 soundDisableChannels(~res);1168 } else if(!strcmp(key, "soundEcho")) {1169 soundEcho = sdlFromHex(value) ? true : false;1170 } else if(!strcmp(key, "soundLowPass")) {1171 soundLowPass = sdlFromHex(value) ? true : false;1172 } else if(!strcmp(key, "soundReverse")) {1173 soundReverse = sdlFromHex(value) ? true : false;1174 } else if(!strcmp(key, "soundVolume")) {1175 soundVolume = sdlFromHex(value);1176 if(soundVolume < 0 || soundVolume > 3)1177 soundVolume = 0;1178 } else if(!strcmp(key, "removeIntros")) {1179 removeIntros = sdlFromHex(value) ? true : false;1180 } else if(!strcmp(key, "saveType")) {1181 cpuSaveType = sdlFromHex(value);1182 if(cpuSaveType < 0 || cpuSaveType > 5)1183 cpuSaveType = 0;1184 } else if(!strcmp(key, "flashSize")) {1185 sdlFlashSize = sdlFromHex(value);1186 if(sdlFlashSize != 0 && sdlFlashSize != 1)1187 sdlFlashSize = 0;1188 } else if(!strcmp(key, "ifbType")) {1189 ifbType = sdlFromHex(value);1190 if(ifbType < 0 || ifbType > 2)1191 ifbType = 0;1192 } else if(!strcmp(key, "showSpeed")) {1193 showSpeed = sdlFromHex(value);1194 if(showSpeed < 0 || showSpeed > 2)1195 showSpeed = 1;1196 } else if(!strcmp(key, "showSpeedTransparent")) {1197 showSpeedTransparent = sdlFromHex(value);1198 } else if(!strcmp(key, "autoFrameSkip")) {1199 autoFrameSkip = sdlFromHex(value);1200 } else if(!strcmp(key, "throttle")) {1201 throttle = sdlFromHex(value);1202 if(throttle != 0 && (throttle < 5 || throttle > 1000))1203 throttle = 0;1204 } else if(!strcmp(key, "disableMMX")) {1205 #ifdef MMX1206 cpu_mmx = sdlFromHex(value) ? false : true;1207 #endif1208 } else if(!strcmp(key, "pauseWhenInactive")) {1209 pauseWhenInactive = sdlFromHex(value) ? true : false;1210 } else if(!strcmp(key, "agbPrint")) {1211 sdlAgbPrint = sdlFromHex(value);1212 } else if(!strcmp(key, "rtcEnabled")) {1213 sdlRtcEnable = sdlFromHex(value);1214 } else if(!strcmp(key, "rewindTimer")) {1215 rewindTimer = sdlFromHex(value);1216 if(rewindTimer < 0 || rewindTimer > 600)1217 rewindTimer = 0;1218 rewindTimer *= 6; // convert value to 10 frames multiple1219 } else if(!strcmp(key, "enhancedDetection")) {1220 cpuEnhancedDetection = sdlFromHex(value) ? true : false;1221 } else {1222 fprintf(stderr, "Unknown configuration key %s\n", key);1223 }1224 }1225 }1227 void sdlReadPreferences()1228 {1229 FILE *f = sdlFindFile("VisualBoyAdvance.cfg");1231 if(f == NULL) {1232 fprintf(stderr, "Configuration file NOT FOUND (using defaults)\n");1233 return;1234 } else1235 fprintf(stderr, "Reading configuration file.\n");1237 sdlReadPreferences(f);1239 fclose(f);1240 }1242 static void sdlApplyPerImagePreferences()1243 {1244 FILE *f = sdlFindFile("vba-over.ini");1245 if(!f) {1246 fprintf(stderr, "vba-over.ini NOT FOUND (using emulator settings)\n");1247 return;1248 } else1249 fprintf(stderr, "Reading vba-over.ini\n");1251 char buffer[7];1252 buffer[0] = '[';1253 buffer[1] = rom[0xac];1254 buffer[2] = rom[0xad];1255 buffer[3] = rom[0xae];1256 buffer[4] = rom[0xaf];1257 buffer[5] = ']';1258 buffer[6] = 0;1260 char readBuffer[2048];1262 bool found = false;1264 while(1) {1265 char *s = fgets(readBuffer, 2048, f);1267 if(s == NULL)1268 break;1270 char *p = strchr(s, ';');1272 if(p)1273 *p = 0;1275 char *token = strtok(s, " \t\n\r=");1277 if(!token)1278 continue;1279 if(strlen(token) == 0)1280 continue;1282 if(!strcmp(token, buffer)) {1283 found = true;1284 break;1285 }1286 }1288 if(found) {1289 while(1) {1290 char *s = fgets(readBuffer, 2048, f);1292 if(s == NULL)1293 break;1295 char *p = strchr(s, ';');1296 if(p)1297 *p = 0;1299 char *token = strtok(s, " \t\n\r=");1300 if(!token)1301 continue;1302 if(strlen(token) == 0)1303 continue;1305 if(token[0] == '[') // starting another image settings1306 break;1307 char *value = strtok(NULL, "\t\n\r=");1308 if(value == NULL)1309 continue;1311 if(!strcmp(token, "rtcEnabled"))1312 rtcEnable(atoi(value) == 0 ? false : true);1313 else if(!strcmp(token, "flashSize")) {1314 int size = atoi(value);1315 if(size == 0x10000 || size == 0x20000)1316 flashSetSize(size);1317 } else if(!strcmp(token, "saveType")) {1318 int save = atoi(value);1319 if(save >= 0 && save <= 5)1320 cpuSaveType = save;1321 }1322 }1323 }1324 fclose(f);1325 }1327 static int sdlCalculateShift(u32 mask)1328 {1329 int m = 0;1331 while(mask) {1332 m++;1333 mask >>= 1;1334 }1336 return m-5;1337 }1339 static int sdlCalculateMaskWidth(u32 mask)1340 {1341 int m = 0;1342 int mask2 = mask;1344 while(mask2) {1345 m++;1346 mask2 >>= 1;1347 }1349 int m2 = 0;1350 mask2 = mask;1351 while(!(mask2 & 1)) {1352 m2++;1353 mask2 >>= 1;1354 }1356 return m - m2;1357 }1359 void sdlWriteState(int num)1360 {1361 char stateName[2048];1363 if(saveDir[0])1364 sprintf(stateName, "%s/%s%d.sgm", saveDir, sdlGetFilename(filename),1365 num+1);1366 else1367 sprintf(stateName,"%s%d.sgm", filename, num+1);1368 if(theEmulator.emuWriteState)1369 theEmulator.emuWriteState(stateName);1370 sprintf(stateName, "Wrote state %d", num+1);1371 systemScreenMessage(stateName);1372 }1374 void sdlReadState(int num)1375 {1376 char stateName[2048];1378 if(saveDir[0])1379 sprintf(stateName, "%s/%s%d.sgm", saveDir, sdlGetFilename(filename),1380 num+1);1381 else1382 sprintf(stateName,"%s%d.sgm", filename, num+1);1384 if(theEmulator.emuReadState)1385 theEmulator.emuReadState(stateName);1387 sprintf(stateName, "Loaded state %d", num+1);1388 systemScreenMessage(stateName);1389 }1391 void sdlWriteBattery()1392 {1393 char buffer[1048];1395 if(batteryDir[0])1396 sprintf(buffer, "%s/%s.sav", batteryDir, sdlGetFilename(filename));1397 else1398 sprintf(buffer, "%s.sav", filename);1400 theEmulator.emuWriteBattery(buffer);1402 systemScreenMessage("Wrote battery");1403 }1405 void sdlReadBattery()1406 {1407 char buffer[1048];1409 if(batteryDir[0])1410 sprintf(buffer, "%s/%s.sav", batteryDir, sdlGetFilename(filename));1411 else1412 sprintf(buffer, "%s.sav", filename);1414 bool res = false;1416 res = theEmulator.emuReadBattery(buffer);1418 if(res)1419 systemScreenMessage("Loaded battery");1420 }1422 #define MOD_KEYS (KMOD_CTRL|KMOD_SHIFT|KMOD_ALT|KMOD_META)1423 #define MOD_NOCTRL (KMOD_SHIFT|KMOD_ALT|KMOD_META)1424 #define MOD_NOALT (KMOD_CTRL|KMOD_SHIFT|KMOD_META)1425 #define MOD_NOSHIFT (KMOD_CTRL|KMOD_ALT|KMOD_META)1427 void sdlUpdateKey(int key, bool down)1428 {1429 int i;1430 for(int j = 0; j < 4; j++) {1431 for(i = 0 ; i < 12; i++) {1432 if((joypad[j][i] & 0xf000) == 0) {1433 if(key == joypad[j][i])1434 if (down) currentButtons[j] |= 1<<i;1435 else currentButtons[j] ^= 1<<i;1436 }1437 }1438 }1439 for(i = 0 ; i < 4; i++) {1440 if((motion[i] & 0xf000) == 0) {1441 if(key == motion[i])1442 sdlMotionButtons[i] = down;1443 }1444 }1445 }1447 void sdlUpdateJoyButton(int which,1448 int button,1449 bool pressed)1450 {1451 int i;1452 for(int j = 0; j < 4; j++) {1453 for(i = 0; i < 12; i++) {1454 int dev = (joypad[j][i] >> 12);1455 int b = joypad[j][i] & 0xfff;1456 if(dev) {1457 dev--;1459 if((dev == which) && (b >= 128) && (b == (button+128))) {1460 if (pressed) currentButtons[j] |= 1<<i;1461 else currentButtons[j] ^= 1<<i;1462 }1463 }1464 }1465 }1466 for(i = 0; i < 4; i++) {1467 int dev = (motion[i] >> 12);1468 int b = motion[i] & 0xfff;1469 if(dev) {1470 dev--;1472 if((dev == which) && (b >= 128) && (b == (button+128))) {1473 sdlMotionButtons[i] = pressed;1474 }1475 }1476 }1477 }1479 void sdlUpdateJoyHat(int which,1480 int hat,1481 int value)1482 {1483 int i;1484 for(int j = 0; j < 4; j++) {1485 for(i = 0; i < 12; i++) {1486 int dev = (joypad[j][i] >> 12);1487 int a = joypad[j][i] & 0xfff;1488 if(dev) {1489 dev--;1491 if((dev == which) && (a>=32) && (a < 48) && (((a&15)>>2) == hat)) {1492 int dir = a & 3;1493 int v = 0;1494 switch(dir) {1495 case 0:1496 v = value & SDL_HAT_UP;1497 break;1498 case 1:1499 v = value & SDL_HAT_DOWN;1500 break;1501 case 2:1502 v = value & SDL_HAT_RIGHT;1503 break;1504 case 3:1505 v = value & SDL_HAT_LEFT;1506 break;1507 }1508 if (v) currentButtons[j] |= 1<<i;1509 else currentButtons[j] ^= 1<<i;1510 }1511 }1512 }1513 }1514 for(i = 0; i < 4; i++) {1515 int dev = (motion[i] >> 12);1516 int a = motion[i] & 0xfff;1517 if(dev) {1518 dev--;1520 if((dev == which) && (a>=32) && (a < 48) && (((a&15)>>2) == hat)) {1521 int dir = a & 3;1522 int v = 0;1523 switch(dir) {1524 case 0:1525 v = value & SDL_HAT_UP;1526 break;1527 case 1:1528 v = value & SDL_HAT_DOWN;1529 break;1530 case 2:1531 v = value & SDL_HAT_RIGHT;1532 break;1533 case 3:1534 v = value & SDL_HAT_LEFT;1535 break;1536 }1537 sdlMotionButtons[i] = (v ? true : false);1538 }1539 }1540 }1541 }1543 void sdlUpdateJoyAxis(int which,1544 int axis,1545 int value)1546 {1547 int i;1548 for(int j = 0; j < 4; j++) {1549 for(i = 0; i < 12; i++) {1550 int dev = (joypad[j][i] >> 12);1551 int a = joypad[j][i] & 0xfff;1552 if(dev) {1553 dev--;1555 if((dev == which) && (a < 32) && ((a>>1) == axis)) {1556 //I have no idea what this does, is this reimplementation correct? --Felipe1557 if (value>16384) {1558 if (a&1) currentButtons[j] |= 1<<i;1559 else currentButtons[j] ^= 1<<i;1560 }1561 else if (value<16384){1562 if (a&1) currentButtons[j] ^= 1<<i;1563 else currentButtons[j] |= 1<<i;1564 }1565 }1566 }1567 }1568 }1569 for(i = 0; i < 4; i++) {1570 int dev = (motion[i] >> 12);1571 int a = motion[i] & 0xfff;1572 if(dev) {1573 dev--;1575 if((dev == which) && (a < 32) && ((a>>1) == axis)) {1576 sdlMotionButtons[i] = (a & 1) ? (value > 16384) : (value < -16384);1577 }1578 }1579 }1580 }1582 bool sdlCheckJoyKey(int key)1583 {1584 int dev = (key >> 12) - 1;1585 int what = key & 0xfff;1587 if(what >= 128) {1588 // joystick button1589 int button = what - 128;1591 if(button >= SDL_JoystickNumButtons(sdlDevices[dev]))1592 return false;1593 } else if (what < 0x20) {1594 // joystick axis1595 what >>= 1;1596 if(what >= SDL_JoystickNumAxes(sdlDevices[dev]))1597 return false;1598 } else if (what < 0x30) {1599 // joystick hat1600 what = (what & 15);1601 what >>= 2;1602 if(what >= SDL_JoystickNumHats(sdlDevices[dev]))1603 return false;1604 }1606 // no problem found1607 return true;1608 }1610 void sdlCheckKeys()1611 {1612 sdlNumDevices = SDL_NumJoysticks();1614 if(sdlNumDevices)1615 sdlDevices = (SDL_Joystick **)calloc(1,sdlNumDevices *1616 sizeof(SDL_Joystick **));1617 int i;1619 bool usesJoy = false;1621 for(int j = 0; j < 4; j++) {1622 for(i = 0; i < 12; i++) {1623 int dev = joypad[j][i] >> 12;1624 if(dev) {1625 dev--;1626 bool ok = false;1628 if(sdlDevices) {1629 if(dev < sdlNumDevices) {1630 if(sdlDevices[dev] == NULL) {1631 sdlDevices[dev] = SDL_JoystickOpen(dev);1632 }1634 ok = sdlCheckJoyKey(joypad[j][i]);1635 } else1636 ok = false;1637 }1639 if(!ok)1640 joypad[j][i] = defaultJoypad[i];1641 else1642 usesJoy = true;1643 }1644 }1645 }1647 for(i = 0; i < 4; i++) {1648 int dev = motion[i] >> 12;1649 if(dev) {1650 dev--;1651 bool ok = false;1653 if(sdlDevices) {1654 if(dev < sdlNumDevices) {1655 if(sdlDevices[dev] == NULL) {1656 sdlDevices[dev] = SDL_JoystickOpen(dev);1657 }1659 ok = sdlCheckJoyKey(motion[i]);1660 } else1661 ok = false;1662 }1664 if(!ok)1665 motion[i] = defaultMotion[i];1666 else1667 usesJoy = true;1668 }1669 }1671 if(usesJoy)1672 SDL_JoystickEventState(SDL_ENABLE);1673 }1675 void sdlPollEvents()1676 {1677 SDL_Event event;1678 while(SDL_PollEvent(&event)) {1679 switch(event.type) {1680 case SDL_QUIT:1681 emulating = 0;1682 break;1683 case SDL_ACTIVEEVENT:1684 if(pauseWhenInactive && (event.active.state & SDL_APPINPUTFOCUS)) {1685 active = event.active.gain;1686 if(active) {1687 if(!paused) {1688 if(emulating)1689 soundResume();1690 }1691 } else {1692 wasPaused = true;1693 if(pauseWhenInactive) {1694 if(emulating)1695 soundPause();1696 }1698 memset(delta,255,sizeof(delta));1699 }1700 }1701 break;1702 case SDL_MOUSEMOTION:1703 case SDL_MOUSEBUTTONUP:1704 case SDL_MOUSEBUTTONDOWN:1705 if(fullscreen) {1706 SDL_ShowCursor(SDL_ENABLE);1707 mouseCounter = 120;1708 }1709 break;1710 case SDL_JOYHATMOTION:1711 sdlUpdateJoyHat(event.jhat.which,1712 event.jhat.hat,1713 event.jhat.value);1714 break;1715 case SDL_JOYBUTTONDOWN:1716 case SDL_JOYBUTTONUP:1717 sdlUpdateJoyButton(event.jbutton.which,1718 event.jbutton.button,1719 event.jbutton.state == SDL_PRESSED);1720 break;1721 case SDL_JOYAXISMOTION:1722 sdlUpdateJoyAxis(event.jaxis.which,1723 event.jaxis.axis,1724 event.jaxis.value);1725 break;1726 case SDL_KEYDOWN:1727 sdlUpdateKey(event.key.keysym.sym, true);1728 break;1729 case SDL_KEYUP:1730 switch(event.key.keysym.sym) {1731 case SDLK_r:1732 if(!(event.key.keysym.mod & MOD_NOCTRL) &&1733 (event.key.keysym.mod & KMOD_CTRL)) {1734 if(emulating) {1735 theEmulator.emuReset(true);1737 systemScreenMessage("Reset");1738 }1739 }1740 break;1741 case SDLK_b:1742 if(!(event.key.keysym.mod & MOD_NOCTRL) &&1743 (event.key.keysym.mod & KMOD_CTRL)) {1744 if(emulating && theEmulator.emuReadMemState && rewindMemory1745 && rewindCount) {1746 rewindPos = --rewindPos & 7;1747 theEmulator.emuReadMemState(&rewindMemory[REWIND_SIZE*rewindPos],1748 REWIND_SIZE);1749 rewindCount--;1750 rewindCounter = 0;1751 systemScreenMessage("Rewind");1752 }1753 }1754 break;1755 case SDLK_p:1756 if(!(event.key.keysym.mod & MOD_NOCTRL) &&1757 (event.key.keysym.mod & KMOD_CTRL)) {1758 paused = !paused;1759 SDL_PauseAudio(paused);1760 if(paused)1761 wasPaused = true;1762 }1763 break;1764 case SDLK_ESCAPE:1765 emulating = 0;1766 break;1767 case SDLK_f:1768 if(!(event.key.keysym.mod & MOD_NOCTRL) &&1769 (event.key.keysym.mod & KMOD_CTRL)) {1770 int flags = 0;1771 fullscreen = !fullscreen;1772 if(fullscreen)1773 flags |= SDL_FULLSCREEN;1774 SDL_SetVideoMode(destWidth, destHeight, systemColorDepth, flags);1775 // if(SDL_WM_ToggleFullScreen(surface))1776 // fullscreen = !fullscreen;1777 }1778 break;1779 case SDLK_F11:1780 if(dbgMain != debuggerMain) {1781 if(armState) {1782 armNextPC -= 4;1783 reg[15].I -= 4;1784 } else {1785 armNextPC -= 2;1786 reg[15].I -= 2;1787 }1788 }1789 debugger = true;1790 break;1791 case SDLK_F1:1792 case SDLK_F2:1793 case SDLK_F3:1794 case SDLK_F4:1795 case SDLK_F5:1796 case SDLK_F6:1797 case SDLK_F7:1798 case SDLK_F8:1799 case SDLK_F9:1800 case SDLK_F10:1801 if(!(event.key.keysym.mod & MOD_NOSHIFT) &&1802 (event.key.keysym.mod & KMOD_SHIFT)) {1803 sdlWriteState(event.key.keysym.sym-SDLK_F1);1804 } else if(!(event.key.keysym.mod & MOD_KEYS)) {1805 sdlReadState(event.key.keysym.sym-SDLK_F1);1806 }1807 break;1808 case SDLK_1:1809 case SDLK_2:1810 case SDLK_3:1811 case SDLK_4:1812 if(!(event.key.keysym.mod & MOD_NOALT) &&1813 (event.key.keysym.mod & KMOD_ALT)) {1814 char *disableMessages[4] =1815 { "autofire A disabled",1816 "autofire B disabled",1817 "autofire R disabled",1818 "autofire L disabled"};1819 char *enableMessages[4] =1820 { "autofire A",1821 "autofire B",1822 "autofire R",1823 "autofire L"};1824 int mask = 1 << (event.key.keysym.sym - SDLK_1);1825 if(event.key.keysym.sym > SDLK_2)1826 mask <<= 6;1827 if(autoFire & mask) {1828 autoFire &= ~mask;1829 systemScreenMessage(disableMessages[event.key.keysym.sym - SDLK_1]);1830 } else {1831 autoFire |= mask;1832 systemScreenMessage(enableMessages[event.key.keysym.sym - SDLK_1]);1833 }1834 } if(!(event.key.keysym.mod & MOD_NOCTRL) &&1835 (event.key.keysym.mod & KMOD_CTRL)) {1836 int mask = 0x0100 << (event.key.keysym.sym - SDLK_1);1837 layerSettings ^= mask;1838 layerEnable = DISPCNT & layerSettings;1839 CPUUpdateRenderBuffers(false);1840 }1841 break;1842 case SDLK_5:1843 case SDLK_6:1844 case SDLK_7:1845 case SDLK_8:1846 if(!(event.key.keysym.mod & MOD_NOCTRL) &&1847 (event.key.keysym.mod & KMOD_CTRL)) {1848 int mask = 0x0100 << (event.key.keysym.sym - SDLK_1);1849 layerSettings ^= mask;1850 layerEnable = DISPCNT & layerSettings;1851 }1852 break;1853 case SDLK_n:1854 if(!(event.key.keysym.mod & MOD_NOCTRL) &&1855 (event.key.keysym.mod & KMOD_CTRL)) {1856 if(paused)1857 paused = false;1858 pauseNextFrame = true;1859 }1860 break;1861 default:1862 break;1863 }1864 sdlUpdateKey(event.key.keysym.sym, false);1865 break;1866 }1867 }1868 }1870 void usage(char *cmd)1871 {1872 printf("%s [option ...] file\n", cmd);1873 printf("\1874 \n\1875 Options:\n\1876 -1, --video-1x 1x\n\1877 -2, --video-2x 2x\n\1878 -3, --video-3x 3x\n\1879 -4, --video-4x 4x\n\1880 -F, --fullscreen Full screen\n\1881 -G, --gdb=PROTOCOL GNU Remote Stub mode:\n\1882 tcp - use TCP at port 55555\n\1883 tcp:PORT - use TCP at port PORT\n\1884 pipe - use pipe transport\n\1885 -N, --no-debug Don't parse debug information\n\1886 -S, --flash-size=SIZE Set the Flash size\n\1887 --flash-64k 0 - 64K Flash\n\1888 --flash-128k 1 - 128K Flash\n\1889 -T, --throttle=THROTTLE Set the desired throttle (5...1000)\n\1890 -Y, --yuv=TYPE Use YUV overlay for drawing:\n\1891 0 - YV12\n\1892 1 - UYVY\n\1893 2 - YVYU\n\1894 3 - YUY2\n\1895 4 - IYUV\n\1896 -b, --bios=BIOS Use given bios file\n\1897 -c, --config=FILE Read the given configuration file\n\1898 -d, --debug Enter debugger\n\1899 -f, --filter=FILTER Select filter:\n\1900 --filter-normal 0 - normal mode\n\1901 --filter-tv-mode 1 - TV Mode\n\1902 --filter-2xsai 2 - 2xSaI\n\1903 --filter-super-2xsai 3 - Super 2xSaI\n\1904 --filter-super-eagle 4 - Super Eagle\n\1905 --filter-pixelate 5 - Pixelate\n\1906 --filter-motion-blur 6 - Motion Blur\n\1907 --filter-advmame 7 - AdvanceMAME Scale2x\n\1908 --filter-simple2x 8 - Simple2x\n\1909 --filter-bilinear 9 - Bilinear\n\1910 --filter-bilinear+ 10 - Bilinear Plus\n\1911 --filter-scanlines 11 - Scanlines\n\1912 --filter-hq2x 12 - hq2x\n\1913 --filter-lq2x 13 - lq2x\n\1914 -h, --help Print this help\n\1915 -i, --ips=PATCH Apply given IPS patch\n\1916 -P, --profile=[HERTZ] Enable profiling\n\1917 -s, --frameskip=FRAMESKIP Set frame skip (0...9)\n\1918 ");1919 printf("\1920 -t, --save-type=TYPE Set the available save type\n\1921 --save-auto 0 - Automatic (EEPROM, SRAM, FLASH)\n\1922 --save-eeprom 1 - EEPROM\n\1923 --save-sram 2 - SRAM\n\1924 --save-flash 3 - FLASH\n\1925 --save-sensor 4 - EEPROM+Sensor\n\1926 --save-none 5 - NONE\n\1927 -v, --verbose=VERBOSE Set verbose logging (trace.log)\n\1928 1 - SWI\n\1929 2 - Unaligned memory access\n\1930 4 - Illegal memory write\n\1931 8 - Illegal memory read\n\1932 16 - DMA 0\n\1933 32 - DMA 1\n\1934 64 - DMA 2\n\1935 128 - DMA 3\n\1936 256 - Undefined instruction\n\1937 512 - AGBPrint messages\n\1938 \n\1939 Long options only:\n\1940 --agb-print Enable AGBPrint support\n\1941 --auto-frameskip Enable auto frameskipping\n\1942 --ifb-none No interframe blending\n\1943 --ifb-motion-blur Interframe motion blur\n\1944 --ifb-smart Smart interframe blending\n\1945 --no-agb-print Disable AGBPrint support\n\1946 --no-auto-frameskip Disable auto frameskipping\n\1947 --no-ips Do not apply IPS patch\n\1948 --no-mmx Disable MMX support\n\1949 --no-pause-when-inactive Don't pause when inactive\n\1950 --no-rtc Disable RTC support\n\1951 --no-show-speed Don't show emulation speed\n\1952 --no-throttle Disable thrrotle\n\1953 --pause-when-inactive Pause when inactive\n\1954 --rtc Enable RTC support\n\1955 --show-speed-normal Show emulation speed\n\1956 --show-speed-detailed Show detailed speed data\n\1957 ");1958 printf("\1959 -r, --recordmovie=filename Start recording input movie\n\1960 -p, --playmovie=filename Play input movie non-read-only\n\1961 -w, --watchmovie=filename Play input movie in read-only mode\n\1962 ");1963 }1965 static char *szFile;1967 void file_run()1968 {1969 //printf("RLM: file_run\n");1970 utilGetBaseName(szFile, filename);1971 char *p = strrchr(filename, '.');1973 if(p)1974 *p = 0;1976 if(ipsname[0] == 0)1977 sprintf(ipsname, "%s.ips", filename);1979 bool failed = false;1981 IMAGE_TYPE type = utilFindType(szFile);1983 if(type == IMAGE_UNKNOWN) {1984 systemMessage(0, "Unknown file type %s", szFile);1985 exit(-1);1986 }1987 systemCartridgeType = (int)type;1989 if(type == IMAGE_GB) {1990 failed = !gbLoadRom(szFile);1991 if(!failed) {1992 systemCartridgeType = 1;1993 //printf("RLM: choosing GBSystem\n");1994 theEmulator = GBSystem;1995 if(sdlAutoIPS) {1996 int size = gbRomSize;1997 utilApplyIPS(ipsname, &gbRom, &size);1998 if(size != gbRomSize) {1999 extern bool gbUpdateSizes();2000 gbUpdateSizes();2001 gbReset();2002 }2003 }2004 }2005 } else if(type == IMAGE_GBA) {2006 int size = CPULoadRom(szFile);2007 failed = (size == 0);2008 if(!failed) {2009 // if(cpuEnhancedDetection && cpuSaveType == 0) {2010 // utilGBAFindSave(rom, size);2011 // }2013 sdlApplyPerImagePreferences();2015 systemCartridgeType = 0;2016 theEmulator = GBASystem;2018 /* disabled due to problems2019 if(removeIntros && rom != NULL) {2020 WRITE32LE(&rom[0], 0xea00002e);2021 }2022 */2024 //CPUInit(biosFileName, useBios);2025 CPUInit();2026 CPUReset();2027 if(sdlAutoIPS) {2028 int size = 0x2000000;2029 utilApplyIPS(ipsname, &rom, &size);2030 if(size != 0x2000000) {2031 CPUReset();2032 }2033 }2034 }2035 }2037 if(failed) {2038 systemMessage(0, "Failed to load file %s", szFile);2039 exit(-1);2040 }2042 emulating = 1;2043 renderedFrames = 0;2044 }2047 void shutdown () {2048 fprintf(stderr,"Shutting down\n");2049 remoteCleanUp();2050 soundShutdown();2052 if(gbRom != NULL || rom != NULL) {2053 sdlWriteBattery();2054 theEmulator.emuCleanUp();2055 }2057 if(delta) {2058 free(delta);2059 delta = NULL;2060 }2062 SDL_Quit();2063 }2065 int tick () {2066 return theEmulator.emuMain(theEmulator.emuCount);2067 }2069 void step () {2070 if(!paused && active) {2071 //printf("RLM: emulator main\n");2072 int frameComplete = 0;2073 while (!(frameComplete)){2074 frameComplete = theEmulator.emuMain(theEmulator.emuCount);2075 }2076 //printf("RLM: emulator main called\n");2077 } else {2078 SDL_Delay(500);2079 }2080 sdlPollEvents();2081 SDL_ShowCursor(SDL_DISABLE);2082 }2084 void step(int keymask){2085 currentButtons[0] = keymask;2086 if (keymask == 0x0800){2087 theEmulator.emuReset(true);2088 }2089 else {2090 step();2091 }2092 currentButtons[0] = keymask;2093 }2097 int main(int argc, char **argv)2098 {2099 fprintf(stderr, "VisualBoyAdvance version %s [SDL]\n", PACKAGE_VERSION);2101 arg0 = argv[0];2103 captureDir[0] = 0;2104 saveDir[0] = 0;2105 batteryDir[0] = 0;2106 ipsname[0] = 0;2108 int op = -1;2110 frameSkip = 2;2111 gbBorderOn = 0;2113 parseDebug = true;2115 sdlReadPreferences();2117 sdlPrintUsage = 0;2119 while((op = getopt_long(argc,2120 argv,2121 "FNT:Y:G:D:b:c:df:hi:p::s:t:v:1234",2122 sdlOptions,2123 NULL)) != -1) {2124 switch(op) {2125 case 0:2126 // long option already processed by getopt_long2127 break;2128 case 'b':2129 useBios = true;2130 if(optarg == NULL) {2131 fprintf(stderr, "Missing BIOS file name\n");2132 exit(-1);2133 }2134 strcpy(biosFileName, optarg);2135 break;2136 case 'c':2137 {2138 if(optarg == NULL) {2139 fprintf(stderr, "Missing config file name\n");2140 exit(-1);2141 }2142 FILE *f = fopen(optarg, "r");2143 if(f == NULL) {2144 fprintf(stderr, "File not found %s\n", optarg);2145 exit(-1);2146 }2147 sdlReadPreferences(f);2148 fclose(f);2149 }2150 break;2151 case 'd':2152 debugger = true;2153 break;2154 case 'h':2155 sdlPrintUsage = 1;2156 break;2157 case 'i':2158 if(optarg == NULL) {2159 fprintf(stderr, "Missing IPS name\n");2160 exit(-1);2161 strcpy(ipsname, optarg);2162 }2163 break;2164 case 'Y':2165 yuv = true;2166 if(optarg) {2167 yuvType = atoi(optarg);2168 switch(yuvType) {2169 case 0:2170 yuvType = SDL_YV12_OVERLAY;2171 break;2172 case 1:2173 yuvType = SDL_UYVY_OVERLAY;2174 break;2175 case 2:2176 yuvType = SDL_YVYU_OVERLAY;2177 break;2178 case 3:2179 yuvType = SDL_YUY2_OVERLAY;2180 break;2181 case 4:2182 yuvType = SDL_IYUV_OVERLAY;2183 break;2184 default:2185 yuvType = SDL_YV12_OVERLAY;2186 }2187 } else2188 yuvType = SDL_YV12_OVERLAY;2189 break;2190 case 'G':2191 dbgMain = remoteStubMain;2192 dbgSignal = remoteStubSignal;2193 dbgOutput = remoteOutput;2194 debugger = true;2195 debuggerStub = true;2196 if(optarg) {2197 char *s = optarg;2198 if(strncmp(s,"tcp:", 4) == 0) {2199 s+=4;2200 int port = atoi(s);2201 remoteSetProtocol(0);2202 remoteSetPort(port);2203 } else if(strcmp(s,"tcp") == 0) {2204 remoteSetProtocol(0);2205 } else if(strcmp(s, "pipe") == 0) {2206 remoteSetProtocol(1);2207 } else {2208 fprintf(stderr, "Unknown protocol %s\n", s);2209 exit(-1);2210 }2211 } else {2212 remoteSetProtocol(0);2213 }2214 break;2215 case 'N':2216 parseDebug = false;2217 break;2218 case 'D':2219 if(optarg) {2220 systemDebug = atoi(optarg);2221 } else {2222 systemDebug = 1;2223 }2224 break;2225 case 'F':2226 fullscreen = 1;2227 mouseCounter = 120;2228 break;2229 case 'f':2230 if(optarg) {2231 filter = atoi(optarg);2232 } else {2233 filter = 0;2234 }2235 break;2237 case 'r':2238 if(optarg == NULL) {2239 fprintf(stderr, "ERROR: --recordmovie ('r') needs movie filename as option\n");2240 exit(-1);2241 }2242 strcpy(movieFileName, optarg);2243 useMovie = 1;2244 break;2245 case 'p': // play without read-only (editable)2246 fprintf (stderr, "-p got called!\n");2247 if(optarg == NULL) {2248 fprintf(stderr, "ERROR: --playmovie ('p') needs movie filename as option\n");2249 exit(-1);2250 }2251 strcpy(movieFileName, optarg);2252 useMovie = 2;2253 break;2254 case 'w': // play with read-only2255 fprintf (stderr, "-w got called!\n");2256 if(optarg == NULL) {2257 fprintf(stderr, "ERROR: --watchmovie ('w') needs movie filename as option\n");2258 exit(-1);2259 }2260 strcpy(movieFileName, optarg);2261 useMovie = 3;2262 break;2264 case 'P':2265 #ifdef PROFILING2266 if(optarg) {2267 cpuEnableProfiling(atoi(optarg));2268 } else2269 cpuEnableProfiling(100);2270 #endif2271 break;2272 case 'S':2273 sdlFlashSize = atoi(optarg);2274 if(sdlFlashSize < 0 || sdlFlashSize > 1)2275 sdlFlashSize = 0;2276 break;2277 case 's':2278 if(optarg) {2279 int a = atoi(optarg);2280 if(a >= 0 && a <= 9) {2281 gbFrameSkip = a;2282 frameSkip = a;2283 }2284 } else {2285 frameSkip = 2;2286 gbFrameSkip = 0;2287 }2288 break;2289 case 't':2290 if(optarg) {2291 int a = atoi(optarg);2292 if(a < 0 || a > 5)2293 a = 0;2294 cpuSaveType = a;2295 }2296 break;2297 case 'T':2298 if(optarg) {2299 int t = atoi(optarg);2300 throttle = t;2301 }2302 break;2303 case 'v':2304 if(optarg) {2305 systemVerbose = atoi(optarg);2306 } else2307 systemVerbose = 0;2308 break;2309 case '1':2310 sizeOption = 0;2311 break;2312 case '2':2313 sizeOption = 1;2314 break;2315 case '3':2316 sizeOption = 2;2317 break;2318 case '4':2319 sizeOption = 3;2320 break;2321 case '?':2322 sdlPrintUsage = 1;2323 break;2324 }2325 }2327 //printf("RLM: derpy loves you!\n");2328 //printf("RLM: useMovie: %d (1 is record)\n", useMovie);2329 if(sdlPrintUsage) {2330 usage(argv[0]);2331 exit(-1);2332 }2334 #ifdef MMX2335 if(disableMMX)2336 cpu_mmx = 0;2337 #endif2339 if(rewindTimer)2340 rewindMemory = (char *)malloc(8*REWIND_SIZE);2342 if(sdlFlashSize == 0)2343 flashSetSize(0x10000);2344 else2345 flashSetSize(0x20000);2347 rtcEnable(sdlRtcEnable ? true : false);2348 agbPrintEnable(sdlAgbPrint ? true : false);2350 if(!debuggerStub) {2351 if(optind >= argc) {2352 systemMessage(0,"Missing image name");2353 usage(argv[0]);2354 exit(-1);2355 }2356 }2358 if(filter) {2359 sizeOption = 1;2360 }2362 for(int i = 0; i < 24;) {2363 systemGbPalette[i++] = (0x1f) | (0x1f << 5) | (0x1f << 10);2364 systemGbPalette[i++] = (0x15) | (0x15 << 5) | (0x15 << 10);2365 systemGbPalette[i++] = (0x0c) | (0x0c << 5) | (0x0c << 10);2366 systemGbPalette[i++] = 0;2367 }2369 systemSaveUpdateCounter = SYSTEM_SAVE_NOT_UPDATED;2371 if(optind < argc)2372 {2373 szFile = argv[optind];2374 file_run();2375 //printf("RLM: file_run() done\n");2376 }2377 else2378 {2379 systemCartridgeType = 0;2380 strcpy(filename, "gnu_stub");2381 rom = (u8 *)malloc(0x2000000);2382 workRAM = (u8 *)calloc(1, 0x40000);2383 bios = (u8 *)calloc(1,0x4000);2384 internalRAM = (u8 *)calloc(1,0x8000);2385 paletteRAM = (u8 *)calloc(1,0x400);2386 vram = (u8 *)calloc(1, 0x20000);2387 oam = (u8 *)calloc(1, 0x400);2388 pix = (u8 *)calloc(1, 4 * 240 * 160);2389 ioMem = (u8 *)calloc(1, 0x400);2391 theEmulator = GBASystem;2393 //CPUInit(biosFileName, useBios);2394 CPUInit();2395 CPUReset();2396 }2398 if(debuggerStub)2399 remoteInit();2401 int flags = SDL_INIT_VIDEO|SDL_INIT_AUDIO|2402 SDL_INIT_TIMER|SDL_INIT_NOPARACHUTE;2404 if(soundOffFlag)2405 flags ^= SDL_INIT_AUDIO;2407 if(SDL_Init(flags)) {2408 systemMessage(0, "Failed to init SDL: %s", SDL_GetError());2409 exit(-1);2410 }2412 if(SDL_InitSubSystem(SDL_INIT_JOYSTICK)) {2413 systemMessage(0, "Failed to init joystick support: %s", SDL_GetError());2414 }2416 sdlCheckKeys();2418 if(systemCartridgeType == 0) {2419 srcWidth = 240;2420 srcHeight = 160;2421 systemFrameSkip = frameSkip;2422 } else if (systemCartridgeType == 1) {2423 if(gbBorderOn) {2424 srcWidth = 256;2425 srcHeight = 224;2426 gbBorderLineSkip = 256;2427 gbBorderColumnSkip = 48;2428 gbBorderRowSkip = 40;2429 } else {2430 srcWidth = 160;2431 srcHeight = 144;2432 gbBorderLineSkip = 160;2433 gbBorderColumnSkip = 0;2434 gbBorderRowSkip = 0;2435 }2436 systemFrameSkip = gbFrameSkip;2437 } else {2438 srcWidth = 320;2439 srcHeight = 240;2440 }2442 destWidth = (sizeOption+1)*srcWidth;2443 destHeight = (sizeOption+1)*srcHeight;2445 surface = SDL_SetVideoMode(destWidth, destHeight, 16,2446 SDL_ANYFORMAT|SDL_HWSURFACE|SDL_DOUBLEBUF|2447 (fullscreen ? SDL_FULLSCREEN : 0));2449 if(surface == NULL) {2450 systemMessage(0, "Failed to set video mode");2451 SDL_Quit();2452 exit(-1);2453 }2455 systemRedShift = sdlCalculateShift(surface->format->Rmask);2456 systemGreenShift = sdlCalculateShift(surface->format->Gmask);2457 systemBlueShift = sdlCalculateShift(surface->format->Bmask);2459 systemColorDepth = surface->format->BitsPerPixel;2460 if(systemColorDepth == 15)2461 systemColorDepth = 16;2463 if(yuv) {2464 Init_Overlay(surface, yuvType);2465 systemColorDepth = 32;2466 systemRedShift = 3;2467 systemGreenShift = 11;2468 systemBlueShift = 19;2469 }2471 if(systemColorDepth != 16 && systemColorDepth != 24 &&2472 systemColorDepth != 32) {2473 fprintf(stderr,"Unsupported color depth '%d'.\nOnly 16, 24 and 32 bit color depths are supported\n", systemColorDepth);2474 exit(-1);2475 }2477 #ifndef C_CORE2478 sdlMakeStretcher(srcWidth);2479 #else2480 switch(systemColorDepth) {2481 case 16:2482 sdlStretcher = sdlStretcher16[sizeOption];2483 break;2484 case 24:2485 sdlStretcher = sdlStretcher24[sizeOption];2486 break;2487 case 32:2488 sdlStretcher = sdlStretcher32[sizeOption];2489 break;2490 default:2491 fprintf(stderr, "Unsupported resolution: %d\n", systemColorDepth);2492 exit(-1);2493 }2494 #endif2496 fprintf(stderr,"Color depth: %d\n", systemColorDepth);2498 if(systemColorDepth == 16) {2499 if(sdlCalculateMaskWidth(surface->format->Gmask) == 6) {2500 Init_2xSaI(565);2501 RGB_LOW_BITS_MASK = 0x821;2502 } else {2503 Init_2xSaI(555);2504 RGB_LOW_BITS_MASK = 0x421;2505 }2506 if(systemCartridgeType == 2) {2507 for(int i = 0; i < 0x10000; i++) {2508 systemColorMap16[i] = (((i >> 1) & 0x1f) << systemBlueShift) |2509 (((i & 0x7c0) >> 6) << systemGreenShift) |2510 (((i & 0xf800) >> 11) << systemRedShift);2511 }2512 } else {2513 for(int i = 0; i < 0x10000; i++) {2514 systemColorMap16[i] = ((i & 0x1f) << systemRedShift) |2515 (((i & 0x3e0) >> 5) << systemGreenShift) |2516 (((i & 0x7c00) >> 10) << systemBlueShift);2517 }2518 }2519 srcPitch = srcWidth * 2+4;2520 } else {2521 if(systemColorDepth != 32)2522 filterFunction = NULL;2523 RGB_LOW_BITS_MASK = 0x010101;2524 if(systemColorDepth == 32) {2525 Init_2xSaI(32);2526 }2527 for(int i = 0; i < 0x10000; i++) {2528 systemColorMap32[i] = ((i & 0x1f) << systemRedShift) |2529 (((i & 0x3e0) >> 5) << systemGreenShift) |2530 (((i & 0x7c00) >> 10) << systemBlueShift);2531 }2532 if(systemColorDepth == 32)2533 srcPitch = srcWidth*4 + 4;2534 else2535 srcPitch = srcWidth*3;2536 }2538 if(systemColorDepth != 32) {2539 switch(filter) {2540 case 0:2541 filterFunction = NULL;2542 break;2543 case 1:2544 filterFunction = ScanlinesTV;2545 break;2546 case 2:2547 filterFunction = _2xSaI;2548 break;2549 case 3:2550 filterFunction = Super2xSaI;2551 break;2552 case 4:2553 filterFunction = SuperEagle;2554 break;2555 case 5:2556 filterFunction = Pixelate2x16;2557 break;2558 case 6:2559 filterFunction = MotionBlur;2560 break;2561 case 7:2562 filterFunction = AdMame2x;2563 break;2564 case 8:2565 filterFunction = Simple2x16;2566 break;2567 case 9:2568 filterFunction = Bilinear;2569 break;2570 case 10:2571 filterFunction = BilinearPlus;2572 break;2573 case 11:2574 filterFunction = Scanlines;2575 break;2576 case 12:2577 filterFunction = hq2x;2578 break;2579 case 13:2580 filterFunction = lq2x;2581 break;2582 default:2583 filterFunction = NULL;2584 break;2585 }2586 } else {2587 switch(filter) {2588 case 0:2589 filterFunction = NULL;2590 break;2591 case 1:2592 filterFunction = ScanlinesTV32;2593 break;2594 case 2:2595 filterFunction = _2xSaI32;2596 break;2597 case 3:2598 filterFunction = Super2xSaI32;2599 break;2600 case 4:2601 filterFunction = SuperEagle32;2602 break;2603 case 5:2604 filterFunction = Pixelate2x32;2605 break;2606 case 6:2607 filterFunction = MotionBlur32;2608 break;2609 case 7:2610 filterFunction = AdMame2x32;2611 break;2612 case 8:2613 filterFunction = Simple2x32;2614 break;2615 case 9:2616 filterFunction = Bilinear32;2617 break;2618 case 10:2619 filterFunction = BilinearPlus32;2620 break;2621 case 11:2622 filterFunction = Scanlines32;2623 break;2624 case 12:2625 filterFunction = hq2x32;2626 break;2627 case 13:2628 filterFunction = lq2x32;2629 break;2630 default:2631 filterFunction = NULL;2632 break;2633 }2634 }2636 if(systemColorDepth == 16) {2637 switch(ifbType) {2638 case 0:2639 default:2640 ifbFunction = NULL;2641 break;2642 case 1:2643 ifbFunction = MotionBlurIB;2644 break;2645 case 2:2646 ifbFunction = SmartIB;2647 break;2648 }2649 } else if(systemColorDepth == 32) {2650 switch(ifbType) {2651 case 0:2652 default:2653 ifbFunction = NULL;2654 break;2655 case 1:2656 ifbFunction = MotionBlurIB32;2657 break;2658 case 2:2659 ifbFunction = SmartIB32;2660 break;2661 }2662 } else2663 ifbFunction = NULL;2665 if(delta == NULL) {2666 delta = (u8*)malloc(322*242*4);2667 memset(delta, 255, 322*242*4);2668 }2670 if(!soundOffFlag)2671 soundInit();2673 autoFrameSkipLastTime = throttleLastTime = systemGetClock();2674 //printf("RLM: and now for the movie part!\n");2676 switch(useMovie)2677 {2678 case 1: // --recordMovie2679 VBAMovieCreate(movieFileName,2680 /*authorInfo*/"",2681 /*startFlags*/0,2682 /*controllerFlags*/MOVIE_CONTROLLER(0),2683 /*typeFlags*/(systemCartridgeType==IMAGE_GBA)?(MOVIE_TYPE_GBA):(GBC_CAPABLE?MOVIE_TYPE_GBC:MOVIE_TYPE_SGB));2684 break;2685 case 2: // --playMovie2686 VBAMovieOpen(movieFileName, false);2687 break;2688 case 3: // --watchMovie2689 VBAMovieOpen(movieFileName, true);2690 break;2691 default:2692 sdlReadBattery();2693 break;2694 }2695 //printf("RLM: still alive after movie switch\n");2696 SDL_WM_SetCaption("VisualBoyAdvance", NULL);2698 char *moviefile = getenv("AUTODEMO");2699 fprintf (stderr, "Checking for AUTODEMO...\n");2700 if (moviefile)2701 {2702 fprintf (stderr, "I got a filename OMG!\nCalling VBAMovieOpen...\n");2703 VBAMovieOpen(moviefile, true);2704 }2705 //step();2706 return 0;2707 }2709 // RLM2710 int runVBA(int argc, char **argv){2711 return main(argc, argv);2712 }2720 void systemMessage(int num, const char *msg, ...)2721 {2722 char buffer[2048];2723 va_list valist;2725 va_start(valist, msg);2726 vsprintf(buffer, msg, valist);2728 fprintf(stderr, "%s\n", buffer);2729 va_end(valist);2730 }2732 //On WIN32, this function messages requesting2733 //the window to be redrawn. Can this be ignored here?2734 void systemRefreshScreen(){}2736 void systemRenderFrame()2737 {2738 renderedFrames++;2739 VBAUpdateFrameCountDisplay();2740 VBAUpdateButtonPressDisplay();2742 if(yuv) {2743 Draw_Overlay(surface, sizeOption+1);2744 return;2745 }2747 SDL_LockSurface(surface);2749 for(int slot = 0 ; slot < 8 ; slot++)2750 {2751 if(screenMessage[slot]) {2752 if(systemCartridgeType == 1 && gbBorderOn) {2753 gbSgbRenderBorder();2754 }2755 if(((systemGetClock() - screenMessageTime[slot]) < screenMessageDuration[slot]) &&2756 !disableStatusMessages) {2757 drawText(pix, srcPitch, 10, srcHeight - 20*(slot+1),2758 screenMessageBuffer[slot]);2759 } else {2760 screenMessage[slot] = false;2761 }2762 }2763 }2765 if(ifbFunction) {2766 if(systemColorDepth == 16)2767 ifbFunction(pix+destWidth+4, destWidth+4, srcWidth, srcHeight);2768 else2769 ifbFunction(pix+destWidth*2+4, destWidth*2+4, srcWidth, srcHeight);2770 }2772 if(filterFunction) {2773 if(systemColorDepth == 16)2774 filterFunction(pix+destWidth+4,destWidth+4, delta,2775 (u8*)surface->pixels,surface->pitch,2776 srcWidth,2777 srcHeight);2778 else2779 filterFunction(pix+destWidth*2+4,2780 destWidth*2+4,2781 delta,2782 (u8*)surface->pixels,2783 surface->pitch,2784 srcWidth,2785 srcHeight);2786 } else {2787 int destPitch = surface->pitch;2788 u8 *src = pix;2789 u8 *dest = (u8*)surface->pixels;2790 int i;2791 u32 *stretcher = (u32 *)sdlStretcher;2792 if(systemColorDepth == 16)2793 src += srcPitch;2794 int option = sizeOption;2795 if(yuv)2796 option = 0;2797 switch(sizeOption) {2798 case 0:2799 for(i = 0; i < srcHeight; i++) {2800 SDL_CALL_STRETCHER;2801 src += srcPitch;2802 dest += destPitch;2803 }2804 break;2805 case 1:2806 for(i = 0; i < srcHeight; i++) {2807 SDL_CALL_STRETCHER;2808 dest += destPitch;2809 SDL_CALL_STRETCHER;2810 src += srcPitch;2811 dest += destPitch;2812 }2813 break;2814 case 2:2815 for(i = 0; i < srcHeight; i++) {2816 SDL_CALL_STRETCHER;2817 dest += destPitch;2818 SDL_CALL_STRETCHER;2819 dest += destPitch;2820 SDL_CALL_STRETCHER;2821 src += srcPitch;2822 dest += destPitch;2823 }2824 break;2825 case 3:2826 for(i = 0; i < srcHeight; i++) {2827 SDL_CALL_STRETCHER;2828 dest += destPitch;2829 SDL_CALL_STRETCHER;2830 dest += destPitch;2831 SDL_CALL_STRETCHER;2832 dest += destPitch;2833 SDL_CALL_STRETCHER;2834 src += srcPitch;2835 dest += destPitch;2836 }2837 break;2838 }2839 }2841 if(showSpeed && fullscreen) {2842 char buffer[50];2843 if(showSpeed == 1)2844 sprintf(buffer, "%d%%", systemSpeed);2845 else2846 sprintf(buffer, "%3d%%(%d, %d fps)", systemSpeed,2847 systemFrameSkip,2848 showRenderedFrames);2849 if(showSpeedTransparent)2850 drawTextTransp((u8*)surface->pixels,2851 surface->pitch,2852 10,2853 surface->h-20,2854 buffer);2855 else2856 drawText((u8*)surface->pixels,2857 surface->pitch,2858 10,2859 surface->h-20,2860 buffer);2861 }2863 SDL_UnlockSurface(surface);2864 // SDL_UpdateRect(surface, 0, 0, destWidth, destHeight);2865 SDL_Flip(surface);2866 }2868 bool systemReadJoypads()2869 {2870 return true;2871 }2873 // Kludge to make Lua call the right function.2874 u32 systemGetOriginalJoypad(int which, bool sensor){2875 return systemGetJoypad(which,sensor);2876 }2878 u32 systemGetJoypad(int which, bool sensor)2879 {2880 sensorOn = sensor;2881 if(which < 0 || which > 3)2882 which = sdlDefaultJoypad;2884 //VBAMovieUpdate(which);2885 //VBAMovieUpdateState();2886 u32 res = 0;2888 //----------------------------//2889 if (VBAMoviePlaying()){2890 // VBAMovieRead() overwrites currentButtons[i]2891 VBAMovieRead(which, sensor);2892 res = currentButtons[which];2893 return res;2894 }2895 //---------------------------//2896 //Temporary implementation, not sure if it's correct --Felipe2898 /*2899 if(sdlButtons[which][KEY_BUTTON_A])2900 res |= BUTTON_MASK_A;2901 if(sdlButtons[which][KEY_BUTTON_B])2902 res |= BUTTON_MASK_B;2903 if(sdlButtons[which][KEY_BUTTON_SELECT])2904 res |= BUTTON_MASK_SELECT;2905 if(sdlButtons[which][KEY_BUTTON_START])2906 res |= BUTTON_MASK_START;2907 if(sdlButtons[which][KEY_RIGHT])2908 res |= BUTTON_MASK_RIGHT;2909 if(sdlButtons[which][KEY_LEFT])2910 res |= BUTTON_MASK_LEFT;2911 if(sdlButtons[which][KEY_UP])2912 res |= BUTTON_MASK_UP;2913 if(sdlButtons[which][KEY_DOWN])2914 res |= BUTTON_MASK_DOWN;2915 if(sdlButtons[which][KEY_BUTTON_R])2916 res |= BUTTON_MASK_R;2917 if(sdlButtons[which][KEY_BUTTON_L])2918 res |= BUTTON_MASK_L;2919 */2920 /*2921 // disallow L+R or U+D of being pressed at the same time2922 if((res & 48) == 48)2923 res &= ~16;2924 if((res & 192) == 192)2925 res &= ~128;2926 */2927 /*2928 if(sdlbuttons[which][KEY_BUTTON_SPEED])2929 res |= 1024;2930 if(sdlButtons[which][KEY_BUTTON_CAPTURE])2931 res |= 2048;2932 */2933 res = currentButtons[which];2935 if(autoFire) {2936 res &= (~autoFire);2937 if(autoFireToggle)2938 res |= autoFire;2939 autoFireToggle = !autoFireToggle;2940 }2942 //if (res) fprintf(stdout,"%x\n",res);2944 return res;2945 }2947 void systemSetJoypad(int which, u32 buttons)2948 {2949 if(which < 0 || which > 3)2950 which = sdlDefaultJoypad;2951 /*2952 sdlButtons[which][KEY_BUTTON_A] = (buttons & 1) != 0;2953 sdlButtons[which][KEY_BUTTON_B] = (buttons & 2) != 0;2954 sdlButtons[which][KEY_BUTTON_SELECT] = (buttons & 4) != 0;2955 sdlButtons[which][KEY_BUTTON_START] = (buttons & 8) != 0;2956 sdlButtons[which][KEY_RIGHT] = (buttons & 16) != 0;2957 sdlButtons[which][KEY_LEFT] = (buttons & 32) != 0;2958 sdlButtons[which][KEY_UP] = (buttons & 64) != 0;2959 sdlButtons[which][KEY_DOWN] = (buttons & 128) != 0;2960 sdlButtons[which][KEY_BUTTON_R] = (buttons & 256) != 0;2961 sdlButtons[which][KEY_BUTTON_L] = (buttons & 512) != 0;2962 */2963 currentButtons[which]= buttons & 0x3ff;2964 }2966 void systemClearJoypads()2967 {2968 for (int i = 0; i < 4; ++i)2969 currentButtons[i] = 0;2971 //lastKeys = 0;2972 }2974 void systemSetTitle(const char *title)2975 {2976 SDL_WM_SetCaption(title, NULL);2977 }2979 void systemShowSpeed(int speed)2980 {2981 systemSpeed = speed;2983 showRenderedFrames = renderedFrames;2984 renderedFrames = 0;2986 if(!fullscreen && showSpeed) {2987 char buffer[80];2988 if(showSpeed == 1)2989 sprintf(buffer, "VisualBoyAdvance-%3d%%", systemSpeed);2990 else2991 sprintf(buffer, "VisualBoyAdvance-%3d%%(%d, %d fps)", systemSpeed,2992 systemFrameSkip,2993 showRenderedFrames);2995 systemSetTitle(buffer);2996 }2997 }2999 // FIXME: the timing3000 void systemFrame(/*int rate*/) //Looking at System.cpp, it looks like rate should be 6003001 {3002 u32 time = systemGetClock();3003 if(!wasPaused && autoFrameSkip && !throttle) {3004 u32 diff = time - autoFrameSkipLastTime;3005 int speed = 100;3007 if(diff)3008 speed = (1000000/600)/diff;3010 if(speed >= 98) {3011 frameskipadjust++;3013 if(frameskipadjust >= 3) {3014 frameskipadjust=0;3015 if(systemFrameSkip > 0)3016 systemFrameSkip--;3017 }3018 } else {3019 if(speed < 80)3020 frameskipadjust -= (90 - speed)/5;3021 else if(systemFrameSkip < 9)3022 frameskipadjust--;3024 if(frameskipadjust <= -2) {3025 frameskipadjust += 2;3026 if(systemFrameSkip < 9)3027 systemFrameSkip++;3028 }3029 }3030 }3031 if(!wasPaused && throttle) {3032 /*if(!speedup) {3033 u32 diff = time - throttleLastTime;3035 int target = (1000000.0/(600*throttle));3036 int d = (target - diff);3038 if(d > 0) {3039 SDL_Delay(d);3040 }3041 }3042 throttleLastTime = systemGetClock();3043 */3044 }3045 if(rewindMemory) {3046 if(++rewindCounter >= rewindTimer) {3047 rewindSaveNeeded = true;3048 rewindCounter = 0;3049 }3050 }3052 if(systemSaveUpdateCounter) {3053 if(--systemSaveUpdateCounter <= SYSTEM_SAVE_NOT_UPDATED) {3054 sdlWriteBattery();3055 systemSaveUpdateCounter = SYSTEM_SAVE_NOT_UPDATED;3056 }3057 }3059 wasPaused = false;3060 autoFrameSkipLastTime = time;3061 }3063 int systemFramesToSkip(){3064 return systemFrameSkip;3065 }3067 int systemScreenCapture(int a)3068 {3069 char buffer[2048];3071 if(captureFormat) {3072 if(captureDir[0])3073 sprintf(buffer, "%s/%s%02d.bmp", captureDir, sdlGetFilename(filename), a);3074 else3075 sprintf(buffer, "%s%02d.bmp", filename, a);3077 theEmulator.emuWriteBMP(buffer);3078 } else {3079 if(captureDir[0])3080 sprintf(buffer, "%s/%s%02d.png", captureDir, sdlGetFilename(filename), a);3081 else3082 sprintf(buffer, "%s%02d.png", filename, a);3083 theEmulator.emuWritePNG(buffer);3084 }3086 systemScreenMessage("Screen capture");3087 return a;3088 }3090 void soundCallback(void *,u8 *stream,int len){}3092 void systemSoundWriteToBuffer(){3093 soundDriver->write(soundFinalWave, soundBufferLen);3094 }3096 void systemSoundClearBuffer()3097 {3098 SDL_mutexP(mutex);3099 memset(sdlBuffer,0,soundBufferTotalLen);3100 sdlSoundLen=0;3101 printf("Hi\n");3102 SDL_mutexV(mutex);3103 }3105 bool systemSoundInit(){3106 systemSoundShutdown();3107 soundDriver = new SoundSDL();3108 if ( !soundDriver )3109 return false;3111 if (!soundDriver->init()) //<-- sound sample rate3112 return false;3114 if (!(soundDriver->setThrottle(throttle))){3115 fprintf(stderr,"Failed to set desired throttle, defaulting to 100 %%.\n");3116 if (!soundDriver->setThrottle(100)) return false;3117 }3118 soundPaused = true;3119 systemSoundOn = true;3120 return true;3121 }3123 void systemSoundShutdown(){3124 if (soundDriver)3125 {3126 delete soundDriver;3127 soundDriver = 0;3128 }3129 }3131 void systemSoundPause()3132 {3133 SDL_PauseAudio(1);3134 }3136 void systemSoundResume()3137 {3138 SDL_PauseAudio(0);3139 }3141 void systemSoundReset()3142 {3143 }3145 u32 systemGetClock()3146 {3147 return SDL_GetTicks();3148 }3150 void systemUpdateMotionSensor()3151 {3152 if(sdlMotionButtons[KEY_LEFT]) {3153 sensorX += 3;3154 if(sensorX > 2197)3155 sensorX = 2197;3156 if(sensorX < 2047)3157 sensorX = 2057;3158 } else if(sdlMotionButtons[KEY_RIGHT]) {3159 sensorX -= 3;3160 if(sensorX < 1897)3161 sensorX = 1897;3162 if(sensorX > 2047)3163 sensorX = 2037;3164 } else if(sensorX > 2047) {3165 sensorX -= 2;3166 if(sensorX < 2047)3167 sensorX = 2047;3168 } else {3169 sensorX += 2;3170 if(sensorX > 2047)3171 sensorX = 2047;3172 }3174 if(sdlMotionButtons[KEY_UP]) {3175 sensorY += 3;3176 if(sensorY > 2197)3177 sensorY = 2197;3178 if(sensorY < 2047)3179 sensorY = 2057;3180 } else if(sdlMotionButtons[KEY_DOWN]) {3181 sensorY -= 3;3182 if(sensorY < 1897)3183 sensorY = 1897;3184 if(sensorY > 2047)3185 sensorY = 2037;3186 } else if(sensorY > 2047) {3187 sensorY -= 2;3188 if(sensorY < 2047)3189 sensorY = 2047;3190 } else {3191 sensorY += 2;3192 if(sensorY > 2047)3193 sensorY = 2047;3194 }3195 }3197 void systemResetSensor()3198 {3199 sensorX = sensorY = INITIAL_SENSOR_VALUE;3200 }3202 int systemGetSensorX()3203 {3204 return sensorX;3205 }3207 int systemGetSensorY()3208 {3209 return sensorY;3210 }3212 void systemGbPrint(u8 *data,int pages,int feed,int palette, int contrast)3213 {3214 }3216 void systemScreenMessage(const char *msg, int slot, int duration, const char *colorList)3217 {3218 screenMessage[slot] = true;3219 screenMessageTime[slot] = systemGetClock();3220 screenMessageDuration[slot] = duration;3221 if(strlen(msg) > 20) {3222 strncpy(screenMessageBuffer[slot], msg, 20);3223 screenMessageBuffer[slot][20] = 0;3224 } else3225 strcpy(screenMessageBuffer[slot], msg);3226 }3228 bool systemSoundCanChangeQuality()3229 {3230 return false;3231 }3233 bool systemSoundSetQuality(int quality)3234 {3235 if (systemCartridgeType == 0)3236 soundSetQuality(quality);3237 else3238 gbSoundSetQuality(quality);3240 return true;3241 }3243 bool systemPauseOnFrame()3244 {3245 if(pauseNextFrame) {3246 paused = true;3247 pauseNextFrame = false;3248 return true;3249 }3250 return false;3251 }3253 // Code donated by Niels Wagenaar (BoycottAdvance)3255 // GBA screensize.3256 #define GBA_WIDTH 2403257 #define GBA_HEIGHT 1603259 void Init_Overlay(SDL_Surface *gbascreen, int overlaytype)3260 {3262 overlay = SDL_CreateYUVOverlay( GBA_WIDTH,3263 GBA_HEIGHT,3264 overlaytype, gbascreen);3265 fprintf(stderr, "Created %dx%dx%d %s %s overlay\n",3266 overlay->w,overlay->h,overlay->planes,3267 overlay->hw_overlay?"hardware":"software",3268 overlay->format==SDL_YV12_OVERLAY?"YV12":3269 overlay->format==SDL_IYUV_OVERLAY?"IYUV":3270 overlay->format==SDL_YUY2_OVERLAY?"YUY2":3271 overlay->format==SDL_UYVY_OVERLAY?"UYVY":3272 overlay->format==SDL_YVYU_OVERLAY?"YVYU":3273 "Unknown");3274 }3276 void Quit_Overlay(void)3277 {3279 SDL_FreeYUVOverlay(overlay);3280 }3282 /* NOTE: These RGB conversion functions are not intended for speed,3283 only as examples.3284 */3285 inline void RGBtoYUV(Uint8 *rgb, int *yuv)3286 {3287 yuv[0] = (int)((0.257 * rgb[0]) + (0.504 * rgb[1]) + (0.098 * rgb[2]) + 16);3288 yuv[1] = (int)(128 - (0.148 * rgb[0]) - (0.291 * rgb[1]) + (0.439 * rgb[2]));3289 yuv[2] = (int)(128 + (0.439 * rgb[0]) - (0.368 * rgb[1]) - (0.071 * rgb[2]));3290 }3292 inline void ConvertRGBtoYV12(SDL_Overlay *o)3293 {3294 int x,y;3295 int yuv[3];3296 Uint8 *p,*op[3];3298 SDL_LockYUVOverlay(o);3300 /* Black initialization */3301 /*3302 memset(o->pixels[0],0,o->pitches[0]*o->h);3303 memset(o->pixels[1],128,o->pitches[1]*((o->h+1)/2));3304 memset(o->pixels[2],128,o->pitches[2]*((o->h+1)/2));3305 */3307 /* Convert */3308 for(y=0; y<160 && y<o->h; y++) {3309 p=(Uint8 *)pix+srcPitch*y;3310 op[0]=o->pixels[0]+o->pitches[0]*y;3311 op[1]=o->pixels[1]+o->pitches[1]*(y/2);3312 op[2]=o->pixels[2]+o->pitches[2]*(y/2);3313 for(x=0; x<240 && x<o->w; x++) {3314 RGBtoYUV(p,yuv);3315 *(op[0]++)=yuv[0];3316 if(x%2==0 && y%2==0) {3317 *(op[1]++)=yuv[2];3318 *(op[2]++)=yuv[1];3319 }3320 p+=4;//s->format->BytesPerPixel;3321 }3322 }3324 SDL_UnlockYUVOverlay(o);3325 }3327 inline void ConvertRGBtoIYUV(SDL_Overlay *o)3328 {3329 int x,y;3330 int yuv[3];3331 Uint8 *p,*op[3];3333 SDL_LockYUVOverlay(o);3335 /* Black initialization */3336 /*3337 memset(o->pixels[0],0,o->pitches[0]*o->h);3338 memset(o->pixels[1],128,o->pitches[1]*((o->h+1)/2));3339 memset(o->pixels[2],128,o->pitches[2]*((o->h+1)/2));3340 */3342 /* Convert */3343 for(y=0; y<160 && y<o->h; y++) {3344 p=(Uint8 *)pix+srcPitch*y;3345 op[0]=o->pixels[0]+o->pitches[0]*y;3346 op[1]=o->pixels[1]+o->pitches[1]*(y/2);3347 op[2]=o->pixels[2]+o->pitches[2]*(y/2);3348 for(x=0; x<240 && x<o->w; x++) {3349 RGBtoYUV(p,yuv);3350 *(op[0]++)=yuv[0];3351 if(x%2==0 && y%2==0) {3352 *(op[1]++)=yuv[1];3353 *(op[2]++)=yuv[2];3354 }3355 p+=4; //s->format->BytesPerPixel;3356 }3357 }3359 SDL_UnlockYUVOverlay(o);3360 }3362 inline void ConvertRGBtoUYVY(SDL_Overlay *o)3363 {3364 int x,y;3365 int yuv[3];3366 Uint8 *p,*op;3368 SDL_LockYUVOverlay(o);3370 for(y=0; y<160 && y<o->h; y++) {3371 p=(Uint8 *)pix+srcPitch*y;3372 op=o->pixels[0]+o->pitches[0]*y;3373 for(x=0; x<240 && x<o->w; x++) {3374 RGBtoYUV(p,yuv);3375 if(x%2==0) {3376 *(op++)=yuv[1];3377 *(op++)=yuv[0];3378 *(op++)=yuv[2];3379 } else3380 *(op++)=yuv[0];3382 p+=4; //s->format->BytesPerPixel;3383 }3384 }3386 SDL_UnlockYUVOverlay(o);3387 }3389 inline void ConvertRGBtoYVYU(SDL_Overlay *o)3390 {3391 int x,y;3392 int yuv[3];3393 Uint8 *p,*op;3395 SDL_LockYUVOverlay(o);3397 for(y=0; y<160 && y<o->h; y++) {3398 p=(Uint8 *)pix+srcPitch*y;3399 op=o->pixels[0]+o->pitches[0]*y;3400 for(x=0; x<240 && x<o->w; x++) {3401 RGBtoYUV(p,yuv);3402 if(x%2==0) {3403 *(op++)=yuv[0];3404 *(op++)=yuv[2];3405 op[1]=yuv[1];3406 } else {3407 *op=yuv[0];3408 op+=2;3409 }3411 p+=4; //s->format->BytesPerPixel;3412 }3413 }3415 SDL_UnlockYUVOverlay(o);3416 }3418 inline void ConvertRGBtoYUY2(SDL_Overlay *o)3419 {3420 int x,y;3421 int yuv[3];3422 Uint8 *p,*op;3424 SDL_LockYUVOverlay(o);3426 for(y=0; y<160 && y<o->h; y++) {3427 p=(Uint8 *)pix+srcPitch*y;3428 op=o->pixels[0]+o->pitches[0]*y;3429 for(x=0; x<240 && x<o->w; x++) {3430 RGBtoYUV(p,yuv);3431 if(x%2==0) {3432 *(op++)=yuv[0];3433 *(op++)=yuv[1];3434 op[1]=yuv[2];3435 } else {3436 *op=yuv[0];3437 op+=2;3438 }3440 p+=4; //s->format->BytesPerPixel;3441 }3442 }3444 SDL_UnlockYUVOverlay(o);3445 }3447 inline void Convert32bit(SDL_Surface *display)3448 {3449 switch(overlay->format) {3450 case SDL_YV12_OVERLAY:3451 ConvertRGBtoYV12(overlay);3452 break;3453 case SDL_UYVY_OVERLAY:3454 ConvertRGBtoUYVY(overlay);3455 break;3456 case SDL_YVYU_OVERLAY:3457 ConvertRGBtoYVYU(overlay);3458 break;3459 case SDL_YUY2_OVERLAY:3460 ConvertRGBtoYUY2(overlay);3461 break;3462 case SDL_IYUV_OVERLAY:3463 ConvertRGBtoIYUV(overlay);3464 break;3465 default:3466 fprintf(stderr, "cannot convert RGB picture to obtained YUV format!\n");3467 exit(1);3468 break;3469 }3471 }3474 inline void Draw_Overlay(SDL_Surface *display, int size)3475 {3476 SDL_LockYUVOverlay(overlay);3478 Convert32bit(display);3480 overlay_rect.x = 0;3481 overlay_rect.y = 0;3482 overlay_rect.w = GBA_WIDTH * size;3483 overlay_rect.h = GBA_HEIGHT * size;3485 SDL_DisplayYUVOverlay(overlay, &overlay_rect);3486 SDL_UnlockYUVOverlay(overlay);3487 }3489 bool systemIsEmulating()3490 {3491 return emulating != 0;3492 }3494 void systemGbBorderOn()3495 {3496 srcWidth = 256;3497 srcHeight = 224;3498 gbBorderLineSkip = 256;3499 gbBorderColumnSkip = 48;3500 gbBorderRowSkip = 40;3502 destWidth = (sizeOption+1)*srcWidth;3503 destHeight = (sizeOption+1)*srcHeight;3505 surface = SDL_SetVideoMode(destWidth, destHeight, 16,3506 SDL_ANYFORMAT|SDL_HWSURFACE|SDL_DOUBLEBUF|3507 (fullscreen ? SDL_FULLSCREEN : 0));3508 #ifndef C_CORE3509 sdlMakeStretcher(srcWidth);3510 #else3511 switch(systemColorDepth) {3512 case 16:3513 sdlStretcher = sdlStretcher16[sizeOption];3514 break;3515 case 24:3516 sdlStretcher = sdlStretcher24[sizeOption];3517 break;3518 case 32:3519 sdlStretcher = sdlStretcher32[sizeOption];3520 break;3521 default:3522 fprintf(stderr, "Unsupported resolution: %d\n", systemColorDepth);3523 exit(-1);3524 }3525 #endif3527 if(systemColorDepth == 16) {3528 if(sdlCalculateMaskWidth(surface->format->Gmask) == 6) {3529 Init_2xSaI(565);3530 RGB_LOW_BITS_MASK = 0x821;3531 } else {3532 Init_2xSaI(555);3533 RGB_LOW_BITS_MASK = 0x421;3534 }3535 if(systemCartridgeType == 2) {3536 for(int i = 0; i < 0x10000; i++) {3537 systemColorMap16[i] = (((i >> 1) & 0x1f) << systemBlueShift) |3538 (((i & 0x7c0) >> 6) << systemGreenShift) |3539 (((i & 0xf800) >> 11) << systemRedShift);3540 }3541 } else {3542 for(int i = 0; i < 0x10000; i++) {3543 systemColorMap16[i] = ((i & 0x1f) << systemRedShift) |3544 (((i & 0x3e0) >> 5) << systemGreenShift) |3545 (((i & 0x7c00) >> 10) << systemBlueShift);3546 }3547 }3548 srcPitch = srcWidth * 2+4;3549 } else {3550 if(systemColorDepth != 32)3551 filterFunction = NULL;3552 RGB_LOW_BITS_MASK = 0x010101;3553 if(systemColorDepth == 32) {3554 Init_2xSaI(32);3555 }3556 for(int i = 0; i < 0x10000; i++) {3557 systemColorMap32[i] = ((i & 0x1f) << systemRedShift) |3558 (((i & 0x3e0) >> 5) << systemGreenShift) |3559 (((i & 0x7c00) >> 10) << systemBlueShift);3560 }3561 if(systemColorDepth == 32)3562 srcPitch = srcWidth*4 + 4;3563 else3564 srcPitch = srcWidth*3;3565 }3566 }3568 bool systemIsRunningGBA()3569 {3570 return (rom != NULL);3571 }3573 int systemGetDefaultJoypad()3574 {3575 return sdlDefaultJoypad;3576 }3578 bool systemIsPaused()3579 {3580 return paused;3581 }3583 void systemSetPause(bool pause)3584 {3585 paused = pause;3586 if (pause)3587 systemSoundPause();3588 else3589 systemSoundResume();3590 }3592 u16 checksumBIOS()3593 {3594 bool hasBIOS = false;3595 u8 * tempBIOS;3596 if(useBios)3597 {3598 tempBIOS = (u8 *)malloc(0x4000);3599 int size = 0x4000;3600 if(utilLoad(biosFileName,3601 utilIsGBABios,3602 tempBIOS,3603 size)) {3604 if(size == 0x4000)3605 hasBIOS = true;3606 }3607 }3609 u16 biosCheck = 0;3610 if(hasBIOS) {3611 for(int i = 0; i < 0x4000; i += 4)3612 biosCheck += *((u32 *)&tempBIOS[i]);3613 free(tempBIOS);3614 }3616 return biosCheck;3617 }3619 EmulatedSystemCounters systemCounters = {3620 0, //framecount3621 0, //lagcount3622 0, //extracount3623 true, //lagged3624 true //laggedLast3625 };3627 void VBAOnEnteringFrameBoundary()3628 {3629 //printf("RLM: Entering Frame Boundary\n");3630 CallRegisteredLuaFunctions(LUACALL_AFTEREMULATION);3632 if (VBALuaRunning())3633 {3634 VBALuaFrameBoundary();3635 }3637 //printf("RLM: Movie state update pending\n");3638 VBAMovieUpdateState();3639 //printf("RLM: Movie state updated\n");3640 }3642 void VBAOnExitingFrameBoundary()3643 {3644 ;3645 }