Mercurial > vba-clojure
view src/sdl/SDL.cpp @ 51:abd94449d4bf
created list of stuff to do
| author | Robert McIntyre <rlm@mit.edu> |
|---|---|
| date | Wed, 07 Mar 2012 01:55:55 -0600 |
| parents | 139178c4d843 |
| children | 9d0ec2614443 |
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 }2046 int main(int argc, char **argv)2047 {2048 fprintf(stderr, "VisualBoyAdvance version %s [SDL]\n", PACKAGE_VERSION);2050 arg0 = argv[0];2052 captureDir[0] = 0;2053 saveDir[0] = 0;2054 batteryDir[0] = 0;2055 ipsname[0] = 0;2057 int op = -1;2059 frameSkip = 2;2060 gbBorderOn = 0;2062 parseDebug = true;2064 sdlReadPreferences();2066 sdlPrintUsage = 0;2068 while((op = getopt_long(argc,2069 argv,2070 "FNT:Y:G:D:b:c:df:hi:p::s:t:v:1234",2071 sdlOptions,2072 NULL)) != -1) {2073 switch(op) {2074 case 0:2075 // long option already processed by getopt_long2076 break;2077 case 'b':2078 useBios = true;2079 if(optarg == NULL) {2080 fprintf(stderr, "Missing BIOS file name\n");2081 exit(-1);2082 }2083 strcpy(biosFileName, optarg);2084 break;2085 case 'c':2086 {2087 if(optarg == NULL) {2088 fprintf(stderr, "Missing config file name\n");2089 exit(-1);2090 }2091 FILE *f = fopen(optarg, "r");2092 if(f == NULL) {2093 fprintf(stderr, "File not found %s\n", optarg);2094 exit(-1);2095 }2096 sdlReadPreferences(f);2097 fclose(f);2098 }2099 break;2100 case 'd':2101 debugger = true;2102 break;2103 case 'h':2104 sdlPrintUsage = 1;2105 break;2106 case 'i':2107 if(optarg == NULL) {2108 fprintf(stderr, "Missing IPS name\n");2109 exit(-1);2110 strcpy(ipsname, optarg);2111 }2112 break;2113 case 'Y':2114 yuv = true;2115 if(optarg) {2116 yuvType = atoi(optarg);2117 switch(yuvType) {2118 case 0:2119 yuvType = SDL_YV12_OVERLAY;2120 break;2121 case 1:2122 yuvType = SDL_UYVY_OVERLAY;2123 break;2124 case 2:2125 yuvType = SDL_YVYU_OVERLAY;2126 break;2127 case 3:2128 yuvType = SDL_YUY2_OVERLAY;2129 break;2130 case 4:2131 yuvType = SDL_IYUV_OVERLAY;2132 break;2133 default:2134 yuvType = SDL_YV12_OVERLAY;2135 }2136 } else2137 yuvType = SDL_YV12_OVERLAY;2138 break;2139 case 'G':2140 dbgMain = remoteStubMain;2141 dbgSignal = remoteStubSignal;2142 dbgOutput = remoteOutput;2143 debugger = true;2144 debuggerStub = true;2145 if(optarg) {2146 char *s = optarg;2147 if(strncmp(s,"tcp:", 4) == 0) {2148 s+=4;2149 int port = atoi(s);2150 remoteSetProtocol(0);2151 remoteSetPort(port);2152 } else if(strcmp(s,"tcp") == 0) {2153 remoteSetProtocol(0);2154 } else if(strcmp(s, "pipe") == 0) {2155 remoteSetProtocol(1);2156 } else {2157 fprintf(stderr, "Unknown protocol %s\n", s);2158 exit(-1);2159 }2160 } else {2161 remoteSetProtocol(0);2162 }2163 break;2164 case 'N':2165 parseDebug = false;2166 break;2167 case 'D':2168 if(optarg) {2169 systemDebug = atoi(optarg);2170 } else {2171 systemDebug = 1;2172 }2173 break;2174 case 'F':2175 fullscreen = 1;2176 mouseCounter = 120;2177 break;2178 case 'f':2179 if(optarg) {2180 filter = atoi(optarg);2181 } else {2182 filter = 0;2183 }2184 break;2186 case 'r':2187 if(optarg == NULL) {2188 fprintf(stderr, "ERROR: --recordmovie ('r') needs movie filename as option\n");2189 exit(-1);2190 }2191 strcpy(movieFileName, optarg);2192 useMovie = 1;2193 break;2194 case 'p': // play without read-only (editable)2195 fprintf (stderr, "-p got called!\n");2196 if(optarg == NULL) {2197 fprintf(stderr, "ERROR: --playmovie ('p') needs movie filename as option\n");2198 exit(-1);2199 }2200 strcpy(movieFileName, optarg);2201 useMovie = 2;2202 break;2203 case 'w': // play with read-only2204 fprintf (stderr, "-w got called!\n");2205 if(optarg == NULL) {2206 fprintf(stderr, "ERROR: --watchmovie ('w') needs movie filename as option\n");2207 exit(-1);2208 }2209 strcpy(movieFileName, optarg);2210 useMovie = 3;2211 break;2213 case 'P':2214 #ifdef PROFILING2215 if(optarg) {2216 cpuEnableProfiling(atoi(optarg));2217 } else2218 cpuEnableProfiling(100);2219 #endif2220 break;2221 case 'S':2222 sdlFlashSize = atoi(optarg);2223 if(sdlFlashSize < 0 || sdlFlashSize > 1)2224 sdlFlashSize = 0;2225 break;2226 case 's':2227 if(optarg) {2228 int a = atoi(optarg);2229 if(a >= 0 && a <= 9) {2230 gbFrameSkip = a;2231 frameSkip = a;2232 }2233 } else {2234 frameSkip = 2;2235 gbFrameSkip = 0;2236 }2237 break;2238 case 't':2239 if(optarg) {2240 int a = atoi(optarg);2241 if(a < 0 || a > 5)2242 a = 0;2243 cpuSaveType = a;2244 }2245 break;2246 case 'T':2247 if(optarg) {2248 int t = atoi(optarg);2249 throttle = t;2250 }2251 break;2252 case 'v':2253 if(optarg) {2254 systemVerbose = atoi(optarg);2255 } else2256 systemVerbose = 0;2257 break;2258 case '1':2259 sizeOption = 0;2260 break;2261 case '2':2262 sizeOption = 1;2263 break;2264 case '3':2265 sizeOption = 2;2266 break;2267 case '4':2268 sizeOption = 3;2269 break;2270 case '?':2271 sdlPrintUsage = 1;2272 break;2273 }2274 }2276 //printf("RLM: derpy loves you!\n");2277 //printf("RLM: useMovie: %d (1 is record)\n", useMovie);2278 if(sdlPrintUsage) {2279 usage(argv[0]);2280 exit(-1);2281 }2283 #ifdef MMX2284 if(disableMMX)2285 cpu_mmx = 0;2286 #endif2288 if(rewindTimer)2289 rewindMemory = (char *)malloc(8*REWIND_SIZE);2291 if(sdlFlashSize == 0)2292 flashSetSize(0x10000);2293 else2294 flashSetSize(0x20000);2296 rtcEnable(sdlRtcEnable ? true : false);2297 agbPrintEnable(sdlAgbPrint ? true : false);2299 if(!debuggerStub) {2300 if(optind >= argc) {2301 systemMessage(0,"Missing image name");2302 usage(argv[0]);2303 exit(-1);2304 }2305 }2307 if(filter) {2308 sizeOption = 1;2309 }2311 for(int i = 0; i < 24;) {2312 systemGbPalette[i++] = (0x1f) | (0x1f << 5) | (0x1f << 10);2313 systemGbPalette[i++] = (0x15) | (0x15 << 5) | (0x15 << 10);2314 systemGbPalette[i++] = (0x0c) | (0x0c << 5) | (0x0c << 10);2315 systemGbPalette[i++] = 0;2316 }2318 systemSaveUpdateCounter = SYSTEM_SAVE_NOT_UPDATED;2320 if(optind < argc)2321 {2322 szFile = argv[optind];2323 file_run();2324 //printf("RLM: file_run() done\n");2325 }2326 else2327 {2328 systemCartridgeType = 0;2329 strcpy(filename, "gnu_stub");2330 rom = (u8 *)malloc(0x2000000);2331 workRAM = (u8 *)calloc(1, 0x40000);2332 bios = (u8 *)calloc(1,0x4000);2333 internalRAM = (u8 *)calloc(1,0x8000);2334 paletteRAM = (u8 *)calloc(1,0x400);2335 vram = (u8 *)calloc(1, 0x20000);2336 oam = (u8 *)calloc(1, 0x400);2337 pix = (u8 *)calloc(1, 4 * 240 * 160);2338 ioMem = (u8 *)calloc(1, 0x400);2340 theEmulator = GBASystem;2342 //CPUInit(biosFileName, useBios);2343 CPUInit();2344 CPUReset();2345 }2347 if(debuggerStub)2348 remoteInit();2350 int flags = SDL_INIT_VIDEO|SDL_INIT_AUDIO|2351 SDL_INIT_TIMER|SDL_INIT_NOPARACHUTE;2353 if(soundOffFlag)2354 flags ^= SDL_INIT_AUDIO;2356 if(SDL_Init(flags)) {2357 systemMessage(0, "Failed to init SDL: %s", SDL_GetError());2358 exit(-1);2359 }2361 if(SDL_InitSubSystem(SDL_INIT_JOYSTICK)) {2362 systemMessage(0, "Failed to init joystick support: %s", SDL_GetError());2363 }2365 sdlCheckKeys();2367 if(systemCartridgeType == 0) {2368 srcWidth = 240;2369 srcHeight = 160;2370 systemFrameSkip = frameSkip;2371 } else if (systemCartridgeType == 1) {2372 if(gbBorderOn) {2373 srcWidth = 256;2374 srcHeight = 224;2375 gbBorderLineSkip = 256;2376 gbBorderColumnSkip = 48;2377 gbBorderRowSkip = 40;2378 } else {2379 srcWidth = 160;2380 srcHeight = 144;2381 gbBorderLineSkip = 160;2382 gbBorderColumnSkip = 0;2383 gbBorderRowSkip = 0;2384 }2385 systemFrameSkip = gbFrameSkip;2386 } else {2387 srcWidth = 320;2388 srcHeight = 240;2389 }2391 destWidth = (sizeOption+1)*srcWidth;2392 destHeight = (sizeOption+1)*srcHeight;2394 surface = SDL_SetVideoMode(destWidth, destHeight, 16,2395 SDL_ANYFORMAT|SDL_HWSURFACE|SDL_DOUBLEBUF|2396 (fullscreen ? SDL_FULLSCREEN : 0));2398 if(surface == NULL) {2399 systemMessage(0, "Failed to set video mode");2400 SDL_Quit();2401 exit(-1);2402 }2404 systemRedShift = sdlCalculateShift(surface->format->Rmask);2405 systemGreenShift = sdlCalculateShift(surface->format->Gmask);2406 systemBlueShift = sdlCalculateShift(surface->format->Bmask);2408 systemColorDepth = surface->format->BitsPerPixel;2409 if(systemColorDepth == 15)2410 systemColorDepth = 16;2412 if(yuv) {2413 Init_Overlay(surface, yuvType);2414 systemColorDepth = 32;2415 systemRedShift = 3;2416 systemGreenShift = 11;2417 systemBlueShift = 19;2418 }2420 if(systemColorDepth != 16 && systemColorDepth != 24 &&2421 systemColorDepth != 32) {2422 fprintf(stderr,"Unsupported color depth '%d'.\nOnly 16, 24 and 32 bit color depths are supported\n", systemColorDepth);2423 exit(-1);2424 }2426 #ifndef C_CORE2427 sdlMakeStretcher(srcWidth);2428 #else2429 switch(systemColorDepth) {2430 case 16:2431 sdlStretcher = sdlStretcher16[sizeOption];2432 break;2433 case 24:2434 sdlStretcher = sdlStretcher24[sizeOption];2435 break;2436 case 32:2437 sdlStretcher = sdlStretcher32[sizeOption];2438 break;2439 default:2440 fprintf(stderr, "Unsupported resolution: %d\n", systemColorDepth);2441 exit(-1);2442 }2443 #endif2445 fprintf(stderr,"Color depth: %d\n", systemColorDepth);2447 if(systemColorDepth == 16) {2448 if(sdlCalculateMaskWidth(surface->format->Gmask) == 6) {2449 Init_2xSaI(565);2450 RGB_LOW_BITS_MASK = 0x821;2451 } else {2452 Init_2xSaI(555);2453 RGB_LOW_BITS_MASK = 0x421;2454 }2455 if(systemCartridgeType == 2) {2456 for(int i = 0; i < 0x10000; i++) {2457 systemColorMap16[i] = (((i >> 1) & 0x1f) << systemBlueShift) |2458 (((i & 0x7c0) >> 6) << systemGreenShift) |2459 (((i & 0xf800) >> 11) << systemRedShift);2460 }2461 } else {2462 for(int i = 0; i < 0x10000; i++) {2463 systemColorMap16[i] = ((i & 0x1f) << systemRedShift) |2464 (((i & 0x3e0) >> 5) << systemGreenShift) |2465 (((i & 0x7c00) >> 10) << systemBlueShift);2466 }2467 }2468 srcPitch = srcWidth * 2+4;2469 } else {2470 if(systemColorDepth != 32)2471 filterFunction = NULL;2472 RGB_LOW_BITS_MASK = 0x010101;2473 if(systemColorDepth == 32) {2474 Init_2xSaI(32);2475 }2476 for(int i = 0; i < 0x10000; i++) {2477 systemColorMap32[i] = ((i & 0x1f) << systemRedShift) |2478 (((i & 0x3e0) >> 5) << systemGreenShift) |2479 (((i & 0x7c00) >> 10) << systemBlueShift);2480 }2481 if(systemColorDepth == 32)2482 srcPitch = srcWidth*4 + 4;2483 else2484 srcPitch = srcWidth*3;2485 }2487 if(systemColorDepth != 32) {2488 switch(filter) {2489 case 0:2490 filterFunction = NULL;2491 break;2492 case 1:2493 filterFunction = ScanlinesTV;2494 break;2495 case 2:2496 filterFunction = _2xSaI;2497 break;2498 case 3:2499 filterFunction = Super2xSaI;2500 break;2501 case 4:2502 filterFunction = SuperEagle;2503 break;2504 case 5:2505 filterFunction = Pixelate2x16;2506 break;2507 case 6:2508 filterFunction = MotionBlur;2509 break;2510 case 7:2511 filterFunction = AdMame2x;2512 break;2513 case 8:2514 filterFunction = Simple2x16;2515 break;2516 case 9:2517 filterFunction = Bilinear;2518 break;2519 case 10:2520 filterFunction = BilinearPlus;2521 break;2522 case 11:2523 filterFunction = Scanlines;2524 break;2525 case 12:2526 filterFunction = hq2x;2527 break;2528 case 13:2529 filterFunction = lq2x;2530 break;2531 default:2532 filterFunction = NULL;2533 break;2534 }2535 } else {2536 switch(filter) {2537 case 0:2538 filterFunction = NULL;2539 break;2540 case 1:2541 filterFunction = ScanlinesTV32;2542 break;2543 case 2:2544 filterFunction = _2xSaI32;2545 break;2546 case 3:2547 filterFunction = Super2xSaI32;2548 break;2549 case 4:2550 filterFunction = SuperEagle32;2551 break;2552 case 5:2553 filterFunction = Pixelate2x32;2554 break;2555 case 6:2556 filterFunction = MotionBlur32;2557 break;2558 case 7:2559 filterFunction = AdMame2x32;2560 break;2561 case 8:2562 filterFunction = Simple2x32;2563 break;2564 case 9:2565 filterFunction = Bilinear32;2566 break;2567 case 10:2568 filterFunction = BilinearPlus32;2569 break;2570 case 11:2571 filterFunction = Scanlines32;2572 break;2573 case 12:2574 filterFunction = hq2x32;2575 break;2576 case 13:2577 filterFunction = lq2x32;2578 break;2579 default:2580 filterFunction = NULL;2581 break;2582 }2583 }2585 if(systemColorDepth == 16) {2586 switch(ifbType) {2587 case 0:2588 default:2589 ifbFunction = NULL;2590 break;2591 case 1:2592 ifbFunction = MotionBlurIB;2593 break;2594 case 2:2595 ifbFunction = SmartIB;2596 break;2597 }2598 } else if(systemColorDepth == 32) {2599 switch(ifbType) {2600 case 0:2601 default:2602 ifbFunction = NULL;2603 break;2604 case 1:2605 ifbFunction = MotionBlurIB32;2606 break;2607 case 2:2608 ifbFunction = SmartIB32;2609 break;2610 }2611 } else2612 ifbFunction = NULL;2614 if(delta == NULL) {2615 delta = (u8*)malloc(322*242*4);2616 memset(delta, 255, 322*242*4);2617 }2619 if(!soundOffFlag)2620 soundInit();2622 autoFrameSkipLastTime = throttleLastTime = systemGetClock();2623 //printf("RLM: and now for the movie part!\n");2625 switch(useMovie)2626 {2627 case 1: // --recordMovie2628 VBAMovieCreate(movieFileName,2629 /*authorInfo*/"",2630 /*startFlags*/0,2631 /*controllerFlags*/MOVIE_CONTROLLER(0),2632 /*typeFlags*/(systemCartridgeType==IMAGE_GBA)?(MOVIE_TYPE_GBA):(GBC_CAPABLE?MOVIE_TYPE_GBC:MOVIE_TYPE_SGB));2633 break;2634 case 2: // --playMovie2635 VBAMovieOpen(movieFileName, false);2636 break;2637 case 3: // --watchMovie2638 VBAMovieOpen(movieFileName, true);2639 break;2640 default:2641 sdlReadBattery();2642 break;2643 }2644 //printf("RLM: still alive after movie switch\n");2645 SDL_WM_SetCaption("VisualBoyAdvance", NULL);2647 char *moviefile = getenv("AUTODEMO");2648 fprintf (stderr, "Checking for AUTODEMO...\n");2649 if (moviefile)2650 {2651 fprintf (stderr, "I got a filename OMG!\nCalling VBAMovieOpen...\n");2652 VBAMovieOpen(moviefile, true);2653 }2655 while(emulating) {2656 if(!paused && active) {2657 if(debugger && theEmulator.emuHasDebugger)2658 dbgMain();2659 else {2660 //printf("RLM: emulator main\n");2661 theEmulator.emuMain(theEmulator.emuCount);2662 //printf("RLM: emulator main called\n");2663 if(rewindSaveNeeded && rewindMemory && theEmulator.emuWriteMemState) {2664 rewindCount++;2665 if(rewindCount > 8)2666 rewindCount = 8;2667 if(theEmulator.emuWriteMemState &&2668 theEmulator.emuWriteMemState(&rewindMemory[rewindPos*REWIND_SIZE],2669 REWIND_SIZE)) {2670 rewindPos = ++rewindPos & 7;2671 if(rewindCount == 8)2672 rewindTopPos = ++rewindTopPos & 7;2673 }2674 }2676 rewindSaveNeeded = false;2677 }2678 } else {2679 SDL_Delay(500);2680 }2681 sdlPollEvents();2682 if(mouseCounter) {2683 mouseCounter--;2684 if(mouseCounter == 0)2685 SDL_ShowCursor(SDL_DISABLE);2686 }2687 }2689 emulating = 0;2690 fprintf(stderr,"Shutting down\n");2691 remoteCleanUp();2692 soundShutdown();2694 if(gbRom != NULL || rom != NULL) {2695 sdlWriteBattery();2696 theEmulator.emuCleanUp();2697 }2699 if(delta) {2700 free(delta);2701 delta = NULL;2702 }2704 SDL_Quit();2705 return 0;2706 }2708 // RLM2709 int runVBA(int argc, char **argv){2710 return main(argc, argv);2711 }2714 void systemMessage(int num, const char *msg, ...)2715 {2716 char buffer[2048];2717 va_list valist;2719 va_start(valist, msg);2720 vsprintf(buffer, msg, valist);2722 fprintf(stderr, "%s\n", buffer);2723 va_end(valist);2724 }2726 //On WIN32, this function messages requesting2727 //the window to be redrawn. Can this be ignored here?2728 void systemRefreshScreen(){}2730 void systemRenderFrame()2731 {2732 renderedFrames++;2733 VBAUpdateFrameCountDisplay();2734 VBAUpdateButtonPressDisplay();2736 if(yuv) {2737 Draw_Overlay(surface, sizeOption+1);2738 return;2739 }2741 SDL_LockSurface(surface);2743 for(int slot = 0 ; slot < 8 ; slot++)2744 {2745 if(screenMessage[slot]) {2746 if(systemCartridgeType == 1 && gbBorderOn) {2747 gbSgbRenderBorder();2748 }2749 if(((systemGetClock() - screenMessageTime[slot]) < screenMessageDuration[slot]) &&2750 !disableStatusMessages) {2751 drawText(pix, srcPitch, 10, srcHeight - 20*(slot+1),2752 screenMessageBuffer[slot]);2753 } else {2754 screenMessage[slot] = false;2755 }2756 }2757 }2759 if(ifbFunction) {2760 if(systemColorDepth == 16)2761 ifbFunction(pix+destWidth+4, destWidth+4, srcWidth, srcHeight);2762 else2763 ifbFunction(pix+destWidth*2+4, destWidth*2+4, srcWidth, srcHeight);2764 }2766 if(filterFunction) {2767 if(systemColorDepth == 16)2768 filterFunction(pix+destWidth+4,destWidth+4, delta,2769 (u8*)surface->pixels,surface->pitch,2770 srcWidth,2771 srcHeight);2772 else2773 filterFunction(pix+destWidth*2+4,2774 destWidth*2+4,2775 delta,2776 (u8*)surface->pixels,2777 surface->pitch,2778 srcWidth,2779 srcHeight);2780 } else {2781 int destPitch = surface->pitch;2782 u8 *src = pix;2783 u8 *dest = (u8*)surface->pixels;2784 int i;2785 u32 *stretcher = (u32 *)sdlStretcher;2786 if(systemColorDepth == 16)2787 src += srcPitch;2788 int option = sizeOption;2789 if(yuv)2790 option = 0;2791 switch(sizeOption) {2792 case 0:2793 for(i = 0; i < srcHeight; i++) {2794 SDL_CALL_STRETCHER;2795 src += srcPitch;2796 dest += destPitch;2797 }2798 break;2799 case 1:2800 for(i = 0; i < srcHeight; i++) {2801 SDL_CALL_STRETCHER;2802 dest += destPitch;2803 SDL_CALL_STRETCHER;2804 src += srcPitch;2805 dest += destPitch;2806 }2807 break;2808 case 2:2809 for(i = 0; i < srcHeight; i++) {2810 SDL_CALL_STRETCHER;2811 dest += destPitch;2812 SDL_CALL_STRETCHER;2813 dest += destPitch;2814 SDL_CALL_STRETCHER;2815 src += srcPitch;2816 dest += destPitch;2817 }2818 break;2819 case 3:2820 for(i = 0; i < srcHeight; i++) {2821 SDL_CALL_STRETCHER;2822 dest += destPitch;2823 SDL_CALL_STRETCHER;2824 dest += destPitch;2825 SDL_CALL_STRETCHER;2826 dest += destPitch;2827 SDL_CALL_STRETCHER;2828 src += srcPitch;2829 dest += destPitch;2830 }2831 break;2832 }2833 }2835 if(showSpeed && fullscreen) {2836 char buffer[50];2837 if(showSpeed == 1)2838 sprintf(buffer, "%d%%", systemSpeed);2839 else2840 sprintf(buffer, "%3d%%(%d, %d fps)", systemSpeed,2841 systemFrameSkip,2842 showRenderedFrames);2843 if(showSpeedTransparent)2844 drawTextTransp((u8*)surface->pixels,2845 surface->pitch,2846 10,2847 surface->h-20,2848 buffer);2849 else2850 drawText((u8*)surface->pixels,2851 surface->pitch,2852 10,2853 surface->h-20,2854 buffer);2855 }2857 SDL_UnlockSurface(surface);2858 // SDL_UpdateRect(surface, 0, 0, destWidth, destHeight);2859 SDL_Flip(surface);2860 }2862 bool systemReadJoypads()2863 {2864 return true;2865 }2867 // Kludge to make Lua call the right function.2868 u32 systemGetOriginalJoypad(int which, bool sensor){2869 return systemGetJoypad(which,sensor);2870 }2872 u32 systemGetJoypad(int which, bool sensor)2873 {2874 sensorOn = sensor;2875 if(which < 0 || which > 3)2876 which = sdlDefaultJoypad;2878 //VBAMovieUpdate(which);2879 //VBAMovieUpdateState();2880 u32 res = 0;2882 //----------------------------//2883 if (VBAMoviePlaying()){2884 // VBAMovieRead() overwrites currentButtons[i]2885 VBAMovieRead(which, sensor);2886 res = currentButtons[which];2887 return res;2888 }2889 //---------------------------//2890 //Temporary implementation, not sure if it's correct --Felipe2892 /*2893 if(sdlButtons[which][KEY_BUTTON_A])2894 res |= BUTTON_MASK_A;2895 if(sdlButtons[which][KEY_BUTTON_B])2896 res |= BUTTON_MASK_B;2897 if(sdlButtons[which][KEY_BUTTON_SELECT])2898 res |= BUTTON_MASK_SELECT;2899 if(sdlButtons[which][KEY_BUTTON_START])2900 res |= BUTTON_MASK_START;2901 if(sdlButtons[which][KEY_RIGHT])2902 res |= BUTTON_MASK_RIGHT;2903 if(sdlButtons[which][KEY_LEFT])2904 res |= BUTTON_MASK_LEFT;2905 if(sdlButtons[which][KEY_UP])2906 res |= BUTTON_MASK_UP;2907 if(sdlButtons[which][KEY_DOWN])2908 res |= BUTTON_MASK_DOWN;2909 if(sdlButtons[which][KEY_BUTTON_R])2910 res |= BUTTON_MASK_R;2911 if(sdlButtons[which][KEY_BUTTON_L])2912 res |= BUTTON_MASK_L;2913 */2914 /*2915 // disallow L+R or U+D of being pressed at the same time2916 if((res & 48) == 48)2917 res &= ~16;2918 if((res & 192) == 192)2919 res &= ~128;2920 */2921 /*2922 if(sdlbuttons[which][KEY_BUTTON_SPEED])2923 res |= 1024;2924 if(sdlButtons[which][KEY_BUTTON_CAPTURE])2925 res |= 2048;2926 */2927 res = currentButtons[which];2929 if(autoFire) {2930 res &= (~autoFire);2931 if(autoFireToggle)2932 res |= autoFire;2933 autoFireToggle = !autoFireToggle;2934 }2936 //if (res) fprintf(stdout,"%x\n",res);2938 return res;2939 }2941 void systemSetJoypad(int which, u32 buttons)2942 {2943 if(which < 0 || which > 3)2944 which = sdlDefaultJoypad;2945 /*2946 sdlButtons[which][KEY_BUTTON_A] = (buttons & 1) != 0;2947 sdlButtons[which][KEY_BUTTON_B] = (buttons & 2) != 0;2948 sdlButtons[which][KEY_BUTTON_SELECT] = (buttons & 4) != 0;2949 sdlButtons[which][KEY_BUTTON_START] = (buttons & 8) != 0;2950 sdlButtons[which][KEY_RIGHT] = (buttons & 16) != 0;2951 sdlButtons[which][KEY_LEFT] = (buttons & 32) != 0;2952 sdlButtons[which][KEY_UP] = (buttons & 64) != 0;2953 sdlButtons[which][KEY_DOWN] = (buttons & 128) != 0;2954 sdlButtons[which][KEY_BUTTON_R] = (buttons & 256) != 0;2955 sdlButtons[which][KEY_BUTTON_L] = (buttons & 512) != 0;2956 */2957 currentButtons[which]= buttons & 0x3ff;2958 }2960 void systemClearJoypads()2961 {2962 for (int i = 0; i < 4; ++i)2963 currentButtons[i] = 0;2965 //lastKeys = 0;2966 }2968 void systemSetTitle(const char *title)2969 {2970 SDL_WM_SetCaption(title, NULL);2971 }2973 void systemShowSpeed(int speed)2974 {2975 systemSpeed = speed;2977 showRenderedFrames = renderedFrames;2978 renderedFrames = 0;2980 if(!fullscreen && showSpeed) {2981 char buffer[80];2982 if(showSpeed == 1)2983 sprintf(buffer, "VisualBoyAdvance-%3d%%", systemSpeed);2984 else2985 sprintf(buffer, "VisualBoyAdvance-%3d%%(%d, %d fps)", systemSpeed,2986 systemFrameSkip,2987 showRenderedFrames);2989 systemSetTitle(buffer);2990 }2991 }2993 // FIXME: the timing2994 void systemFrame(/*int rate*/) //Looking at System.cpp, it looks like rate should be 6002995 {2996 u32 time = systemGetClock();2997 if(!wasPaused && autoFrameSkip && !throttle) {2998 u32 diff = time - autoFrameSkipLastTime;2999 int speed = 100;3001 if(diff)3002 speed = (1000000/600)/diff;3004 if(speed >= 98) {3005 frameskipadjust++;3007 if(frameskipadjust >= 3) {3008 frameskipadjust=0;3009 if(systemFrameSkip > 0)3010 systemFrameSkip--;3011 }3012 } else {3013 if(speed < 80)3014 frameskipadjust -= (90 - speed)/5;3015 else if(systemFrameSkip < 9)3016 frameskipadjust--;3018 if(frameskipadjust <= -2) {3019 frameskipadjust += 2;3020 if(systemFrameSkip < 9)3021 systemFrameSkip++;3022 }3023 }3024 }3025 if(!wasPaused && throttle) {3026 /*if(!speedup) {3027 u32 diff = time - throttleLastTime;3029 int target = (1000000.0/(600*throttle));3030 int d = (target - diff);3032 if(d > 0) {3033 SDL_Delay(d);3034 }3035 }3036 throttleLastTime = systemGetClock();3037 */3038 }3039 if(rewindMemory) {3040 if(++rewindCounter >= rewindTimer) {3041 rewindSaveNeeded = true;3042 rewindCounter = 0;3043 }3044 }3046 if(systemSaveUpdateCounter) {3047 if(--systemSaveUpdateCounter <= SYSTEM_SAVE_NOT_UPDATED) {3048 sdlWriteBattery();3049 systemSaveUpdateCounter = SYSTEM_SAVE_NOT_UPDATED;3050 }3051 }3053 wasPaused = false;3054 autoFrameSkipLastTime = time;3055 }3057 int systemFramesToSkip(){3058 return systemFrameSkip;3059 }3061 int systemScreenCapture(int a)3062 {3063 char buffer[2048];3065 if(captureFormat) {3066 if(captureDir[0])3067 sprintf(buffer, "%s/%s%02d.bmp", captureDir, sdlGetFilename(filename), a);3068 else3069 sprintf(buffer, "%s%02d.bmp", filename, a);3071 theEmulator.emuWriteBMP(buffer);3072 } else {3073 if(captureDir[0])3074 sprintf(buffer, "%s/%s%02d.png", captureDir, sdlGetFilename(filename), a);3075 else3076 sprintf(buffer, "%s%02d.png", filename, a);3077 theEmulator.emuWritePNG(buffer);3078 }3080 systemScreenMessage("Screen capture");3081 return a;3082 }3084 void soundCallback(void *,u8 *stream,int len){}3086 void systemSoundWriteToBuffer(){3087 soundDriver->write(soundFinalWave, soundBufferLen);3088 }3090 void systemSoundClearBuffer()3091 {3092 SDL_mutexP(mutex);3093 memset(sdlBuffer,0,soundBufferTotalLen);3094 sdlSoundLen=0;3095 printf("Hi\n");3096 SDL_mutexV(mutex);3097 }3099 bool systemSoundInit(){3100 systemSoundShutdown();3101 soundDriver = new SoundSDL();3102 if ( !soundDriver )3103 return false;3105 if (!soundDriver->init()) //<-- sound sample rate3106 return false;3108 if (!(soundDriver->setThrottle(throttle))){3109 fprintf(stderr,"Failed to set desired throttle, defaulting to 100 %%.\n");3110 if (!soundDriver->setThrottle(100)) return false;3111 }3112 soundPaused = true;3113 systemSoundOn = true;3114 return true;3115 }3117 void systemSoundShutdown(){3118 if (soundDriver)3119 {3120 delete soundDriver;3121 soundDriver = 0;3122 }3123 }3125 void systemSoundPause()3126 {3127 SDL_PauseAudio(1);3128 }3130 void systemSoundResume()3131 {3132 SDL_PauseAudio(0);3133 }3135 void systemSoundReset()3136 {3137 }3139 u32 systemGetClock()3140 {3141 return SDL_GetTicks();3142 }3144 void systemUpdateMotionSensor()3145 {3146 if(sdlMotionButtons[KEY_LEFT]) {3147 sensorX += 3;3148 if(sensorX > 2197)3149 sensorX = 2197;3150 if(sensorX < 2047)3151 sensorX = 2057;3152 } else if(sdlMotionButtons[KEY_RIGHT]) {3153 sensorX -= 3;3154 if(sensorX < 1897)3155 sensorX = 1897;3156 if(sensorX > 2047)3157 sensorX = 2037;3158 } else if(sensorX > 2047) {3159 sensorX -= 2;3160 if(sensorX < 2047)3161 sensorX = 2047;3162 } else {3163 sensorX += 2;3164 if(sensorX > 2047)3165 sensorX = 2047;3166 }3168 if(sdlMotionButtons[KEY_UP]) {3169 sensorY += 3;3170 if(sensorY > 2197)3171 sensorY = 2197;3172 if(sensorY < 2047)3173 sensorY = 2057;3174 } else if(sdlMotionButtons[KEY_DOWN]) {3175 sensorY -= 3;3176 if(sensorY < 1897)3177 sensorY = 1897;3178 if(sensorY > 2047)3179 sensorY = 2037;3180 } else if(sensorY > 2047) {3181 sensorY -= 2;3182 if(sensorY < 2047)3183 sensorY = 2047;3184 } else {3185 sensorY += 2;3186 if(sensorY > 2047)3187 sensorY = 2047;3188 }3189 }3191 void systemResetSensor()3192 {3193 sensorX = sensorY = INITIAL_SENSOR_VALUE;3194 }3196 int systemGetSensorX()3197 {3198 return sensorX;3199 }3201 int systemGetSensorY()3202 {3203 return sensorY;3204 }3206 void systemGbPrint(u8 *data,int pages,int feed,int palette, int contrast)3207 {3208 }3210 void systemScreenMessage(const char *msg, int slot, int duration, const char *colorList)3211 {3212 screenMessage[slot] = true;3213 screenMessageTime[slot] = systemGetClock();3214 screenMessageDuration[slot] = duration;3215 if(strlen(msg) > 20) {3216 strncpy(screenMessageBuffer[slot], msg, 20);3217 screenMessageBuffer[slot][20] = 0;3218 } else3219 strcpy(screenMessageBuffer[slot], msg);3220 }3222 bool systemSoundCanChangeQuality()3223 {3224 return false;3225 }3227 bool systemSoundSetQuality(int quality)3228 {3229 if (systemCartridgeType == 0)3230 soundSetQuality(quality);3231 else3232 gbSoundSetQuality(quality);3234 return true;3235 }3237 bool systemPauseOnFrame()3238 {3239 if(pauseNextFrame) {3240 paused = true;3241 pauseNextFrame = false;3242 return true;3243 }3244 return false;3245 }3247 // Code donated by Niels Wagenaar (BoycottAdvance)3249 // GBA screensize.3250 #define GBA_WIDTH 2403251 #define GBA_HEIGHT 1603253 void Init_Overlay(SDL_Surface *gbascreen, int overlaytype)3254 {3256 overlay = SDL_CreateYUVOverlay( GBA_WIDTH,3257 GBA_HEIGHT,3258 overlaytype, gbascreen);3259 fprintf(stderr, "Created %dx%dx%d %s %s overlay\n",3260 overlay->w,overlay->h,overlay->planes,3261 overlay->hw_overlay?"hardware":"software",3262 overlay->format==SDL_YV12_OVERLAY?"YV12":3263 overlay->format==SDL_IYUV_OVERLAY?"IYUV":3264 overlay->format==SDL_YUY2_OVERLAY?"YUY2":3265 overlay->format==SDL_UYVY_OVERLAY?"UYVY":3266 overlay->format==SDL_YVYU_OVERLAY?"YVYU":3267 "Unknown");3268 }3270 void Quit_Overlay(void)3271 {3273 SDL_FreeYUVOverlay(overlay);3274 }3276 /* NOTE: These RGB conversion functions are not intended for speed,3277 only as examples.3278 */3279 inline void RGBtoYUV(Uint8 *rgb, int *yuv)3280 {3281 yuv[0] = (int)((0.257 * rgb[0]) + (0.504 * rgb[1]) + (0.098 * rgb[2]) + 16);3282 yuv[1] = (int)(128 - (0.148 * rgb[0]) - (0.291 * rgb[1]) + (0.439 * rgb[2]));3283 yuv[2] = (int)(128 + (0.439 * rgb[0]) - (0.368 * rgb[1]) - (0.071 * rgb[2]));3284 }3286 inline void ConvertRGBtoYV12(SDL_Overlay *o)3287 {3288 int x,y;3289 int yuv[3];3290 Uint8 *p,*op[3];3292 SDL_LockYUVOverlay(o);3294 /* Black initialization */3295 /*3296 memset(o->pixels[0],0,o->pitches[0]*o->h);3297 memset(o->pixels[1],128,o->pitches[1]*((o->h+1)/2));3298 memset(o->pixels[2],128,o->pitches[2]*((o->h+1)/2));3299 */3301 /* Convert */3302 for(y=0; y<160 && y<o->h; y++) {3303 p=(Uint8 *)pix+srcPitch*y;3304 op[0]=o->pixels[0]+o->pitches[0]*y;3305 op[1]=o->pixels[1]+o->pitches[1]*(y/2);3306 op[2]=o->pixels[2]+o->pitches[2]*(y/2);3307 for(x=0; x<240 && x<o->w; x++) {3308 RGBtoYUV(p,yuv);3309 *(op[0]++)=yuv[0];3310 if(x%2==0 && y%2==0) {3311 *(op[1]++)=yuv[2];3312 *(op[2]++)=yuv[1];3313 }3314 p+=4;//s->format->BytesPerPixel;3315 }3316 }3318 SDL_UnlockYUVOverlay(o);3319 }3321 inline void ConvertRGBtoIYUV(SDL_Overlay *o)3322 {3323 int x,y;3324 int yuv[3];3325 Uint8 *p,*op[3];3327 SDL_LockYUVOverlay(o);3329 /* Black initialization */3330 /*3331 memset(o->pixels[0],0,o->pitches[0]*o->h);3332 memset(o->pixels[1],128,o->pitches[1]*((o->h+1)/2));3333 memset(o->pixels[2],128,o->pitches[2]*((o->h+1)/2));3334 */3336 /* Convert */3337 for(y=0; y<160 && y<o->h; y++) {3338 p=(Uint8 *)pix+srcPitch*y;3339 op[0]=o->pixels[0]+o->pitches[0]*y;3340 op[1]=o->pixels[1]+o->pitches[1]*(y/2);3341 op[2]=o->pixels[2]+o->pitches[2]*(y/2);3342 for(x=0; x<240 && x<o->w; x++) {3343 RGBtoYUV(p,yuv);3344 *(op[0]++)=yuv[0];3345 if(x%2==0 && y%2==0) {3346 *(op[1]++)=yuv[1];3347 *(op[2]++)=yuv[2];3348 }3349 p+=4; //s->format->BytesPerPixel;3350 }3351 }3353 SDL_UnlockYUVOverlay(o);3354 }3356 inline void ConvertRGBtoUYVY(SDL_Overlay *o)3357 {3358 int x,y;3359 int yuv[3];3360 Uint8 *p,*op;3362 SDL_LockYUVOverlay(o);3364 for(y=0; y<160 && y<o->h; y++) {3365 p=(Uint8 *)pix+srcPitch*y;3366 op=o->pixels[0]+o->pitches[0]*y;3367 for(x=0; x<240 && x<o->w; x++) {3368 RGBtoYUV(p,yuv);3369 if(x%2==0) {3370 *(op++)=yuv[1];3371 *(op++)=yuv[0];3372 *(op++)=yuv[2];3373 } else3374 *(op++)=yuv[0];3376 p+=4; //s->format->BytesPerPixel;3377 }3378 }3380 SDL_UnlockYUVOverlay(o);3381 }3383 inline void ConvertRGBtoYVYU(SDL_Overlay *o)3384 {3385 int x,y;3386 int yuv[3];3387 Uint8 *p,*op;3389 SDL_LockYUVOverlay(o);3391 for(y=0; y<160 && y<o->h; y++) {3392 p=(Uint8 *)pix+srcPitch*y;3393 op=o->pixels[0]+o->pitches[0]*y;3394 for(x=0; x<240 && x<o->w; x++) {3395 RGBtoYUV(p,yuv);3396 if(x%2==0) {3397 *(op++)=yuv[0];3398 *(op++)=yuv[2];3399 op[1]=yuv[1];3400 } else {3401 *op=yuv[0];3402 op+=2;3403 }3405 p+=4; //s->format->BytesPerPixel;3406 }3407 }3409 SDL_UnlockYUVOverlay(o);3410 }3412 inline void ConvertRGBtoYUY2(SDL_Overlay *o)3413 {3414 int x,y;3415 int yuv[3];3416 Uint8 *p,*op;3418 SDL_LockYUVOverlay(o);3420 for(y=0; y<160 && y<o->h; y++) {3421 p=(Uint8 *)pix+srcPitch*y;3422 op=o->pixels[0]+o->pitches[0]*y;3423 for(x=0; x<240 && x<o->w; x++) {3424 RGBtoYUV(p,yuv);3425 if(x%2==0) {3426 *(op++)=yuv[0];3427 *(op++)=yuv[1];3428 op[1]=yuv[2];3429 } else {3430 *op=yuv[0];3431 op+=2;3432 }3434 p+=4; //s->format->BytesPerPixel;3435 }3436 }3438 SDL_UnlockYUVOverlay(o);3439 }3441 inline void Convert32bit(SDL_Surface *display)3442 {3443 switch(overlay->format) {3444 case SDL_YV12_OVERLAY:3445 ConvertRGBtoYV12(overlay);3446 break;3447 case SDL_UYVY_OVERLAY:3448 ConvertRGBtoUYVY(overlay);3449 break;3450 case SDL_YVYU_OVERLAY:3451 ConvertRGBtoYVYU(overlay);3452 break;3453 case SDL_YUY2_OVERLAY:3454 ConvertRGBtoYUY2(overlay);3455 break;3456 case SDL_IYUV_OVERLAY:3457 ConvertRGBtoIYUV(overlay);3458 break;3459 default:3460 fprintf(stderr, "cannot convert RGB picture to obtained YUV format!\n");3461 exit(1);3462 break;3463 }3465 }3468 inline void Draw_Overlay(SDL_Surface *display, int size)3469 {3470 SDL_LockYUVOverlay(overlay);3472 Convert32bit(display);3474 overlay_rect.x = 0;3475 overlay_rect.y = 0;3476 overlay_rect.w = GBA_WIDTH * size;3477 overlay_rect.h = GBA_HEIGHT * size;3479 SDL_DisplayYUVOverlay(overlay, &overlay_rect);3480 SDL_UnlockYUVOverlay(overlay);3481 }3483 bool systemIsEmulating()3484 {3485 return emulating != 0;3486 }3488 void systemGbBorderOn()3489 {3490 srcWidth = 256;3491 srcHeight = 224;3492 gbBorderLineSkip = 256;3493 gbBorderColumnSkip = 48;3494 gbBorderRowSkip = 40;3496 destWidth = (sizeOption+1)*srcWidth;3497 destHeight = (sizeOption+1)*srcHeight;3499 surface = SDL_SetVideoMode(destWidth, destHeight, 16,3500 SDL_ANYFORMAT|SDL_HWSURFACE|SDL_DOUBLEBUF|3501 (fullscreen ? SDL_FULLSCREEN : 0));3502 #ifndef C_CORE3503 sdlMakeStretcher(srcWidth);3504 #else3505 switch(systemColorDepth) {3506 case 16:3507 sdlStretcher = sdlStretcher16[sizeOption];3508 break;3509 case 24:3510 sdlStretcher = sdlStretcher24[sizeOption];3511 break;3512 case 32:3513 sdlStretcher = sdlStretcher32[sizeOption];3514 break;3515 default:3516 fprintf(stderr, "Unsupported resolution: %d\n", systemColorDepth);3517 exit(-1);3518 }3519 #endif3521 if(systemColorDepth == 16) {3522 if(sdlCalculateMaskWidth(surface->format->Gmask) == 6) {3523 Init_2xSaI(565);3524 RGB_LOW_BITS_MASK = 0x821;3525 } else {3526 Init_2xSaI(555);3527 RGB_LOW_BITS_MASK = 0x421;3528 }3529 if(systemCartridgeType == 2) {3530 for(int i = 0; i < 0x10000; i++) {3531 systemColorMap16[i] = (((i >> 1) & 0x1f) << systemBlueShift) |3532 (((i & 0x7c0) >> 6) << systemGreenShift) |3533 (((i & 0xf800) >> 11) << systemRedShift);3534 }3535 } else {3536 for(int i = 0; i < 0x10000; i++) {3537 systemColorMap16[i] = ((i & 0x1f) << systemRedShift) |3538 (((i & 0x3e0) >> 5) << systemGreenShift) |3539 (((i & 0x7c00) >> 10) << systemBlueShift);3540 }3541 }3542 srcPitch = srcWidth * 2+4;3543 } else {3544 if(systemColorDepth != 32)3545 filterFunction = NULL;3546 RGB_LOW_BITS_MASK = 0x010101;3547 if(systemColorDepth == 32) {3548 Init_2xSaI(32);3549 }3550 for(int i = 0; i < 0x10000; i++) {3551 systemColorMap32[i] = ((i & 0x1f) << systemRedShift) |3552 (((i & 0x3e0) >> 5) << systemGreenShift) |3553 (((i & 0x7c00) >> 10) << systemBlueShift);3554 }3555 if(systemColorDepth == 32)3556 srcPitch = srcWidth*4 + 4;3557 else3558 srcPitch = srcWidth*3;3559 }3560 }3562 bool systemIsRunningGBA()3563 {3564 return (rom != NULL);3565 }3567 int systemGetDefaultJoypad()3568 {3569 return sdlDefaultJoypad;3570 }3572 bool systemIsPaused()3573 {3574 return paused;3575 }3577 void systemSetPause(bool pause)3578 {3579 paused = pause;3580 if (pause)3581 systemSoundPause();3582 else3583 systemSoundResume();3584 }3586 u16 checksumBIOS()3587 {3588 bool hasBIOS = false;3589 u8 * tempBIOS;3590 if(useBios)3591 {3592 tempBIOS = (u8 *)malloc(0x4000);3593 int size = 0x4000;3594 if(utilLoad(biosFileName,3595 utilIsGBABios,3596 tempBIOS,3597 size)) {3598 if(size == 0x4000)3599 hasBIOS = true;3600 }3601 }3603 u16 biosCheck = 0;3604 if(hasBIOS) {3605 for(int i = 0; i < 0x4000; i += 4)3606 biosCheck += *((u32 *)&tempBIOS[i]);3607 free(tempBIOS);3608 }3610 return biosCheck;3611 }3613 EmulatedSystemCounters systemCounters = {3614 0, //framecount3615 0, //lagcount3616 0, //extracount3617 true, //lagged3618 true //laggedLast3619 };3621 void VBAOnEnteringFrameBoundary()3622 {3623 //printf("RLM: Entering Frame Boundary\n");3624 CallRegisteredLuaFunctions(LUACALL_AFTEREMULATION);3626 if (VBALuaRunning())3627 {3628 VBALuaFrameBoundary();3629 }3631 //printf("RLM: Movie state update pending\n");3632 VBAMovieUpdateState();3633 //printf("RLM: Movie state updated\n");3634 }3636 void VBAOnExitingFrameBoundary()3637 {3638 ;3639 }