frontend/plugin.c

   1 /*
   2  * (C) notaz, 2010
   3  *
   4  * This work is licensed under the terms of the GNU GPLv2 or later.
   5  * See the COPYING file in the top-level directory.
   6  */
   7
   8 #include <stdio.h>
   9 #include <string.h>
  10 #include <stdint.h>
  11
  12 #include "plugin_lib.h"
  13 #include "plugin.h"
  14 #include "psemu_plugin_defs.h"
  15 #include "../libpcsxcore/system.h"
  16 #include "../libpcsxcore/psxcommon.h"
  17 #include "../plugins/cdrcimg/cdrcimg.h"
  18
  19 // this can't be __stdcall like it was in PSEmu API as too many functions are mixed up
  20 #undef CALLBACK
  21 #define CALLBACK
  22
  23 /* CDR */
  24 struct CdrStat;
  25 static long CALLBACK CDRinit(void) { return 0; }
  26 static long CALLBACK CDRshutdown(void) { return 0; }
  27 static long CALLBACK CDRopen(void) { return 0; }
  28 static long CALLBACK CDRclose(void) { return 0; }
  29 static long CALLBACK CDRgetTN(unsigned char *_) { return 0; }
  30 static long CALLBACK CDRgetTD(unsigned char _, unsigned char *__) { return 0; }
  31 static boolean CALLBACK CDRreadTrack(unsigned char *_) { return FALSE; }
  32 static unsigned char * CALLBACK CDRgetBuffer(void) { return NULL; }
  33 static unsigned char * CALLBACK CDRgetBufferSub(int sector) { return NULL; }
  34 static long CALLBACK CDRconfigure(void) { return 0; }
  35 static long CALLBACK CDRtest(void) { return 0; }
  36 static void CALLBACK CDRabout(void) { return; }
  37 static long CALLBACK CDRplay(unsigned char *_) { return 0; }
  38 static long CALLBACK CDRstop(void) { return 0; }
  39 static long CALLBACK CDRsetfilename(char *_) { return 0; }
  40 static long CALLBACK CDRgetStatus(struct CdrStat *_) { return 0; }
  41 static char * CALLBACK CDRgetDriveLetter(void) { return NULL; }
  42 static long CALLBACK CDRreadCDDA(unsigned char _, unsigned char __, unsigned char ___, unsigned char *____) { return 0; }
  43 static long CALLBACK CDRgetTE(unsigned char _, unsigned char *__, unsigned char *___, unsigned char *____) { return 0; }
  44
  45 /* GPU */
  46 static void CALLBACK GPUdisplayText(char *_) { return; }
  47
  48 /* SPU */
  49 extern long CALLBACK SPUopen(void);
  50 extern long CALLBACK SPUinit(void);
  51 extern long CALLBACK SPUshutdown(void);
  52 extern long CALLBACK SPUclose(void);
  53 extern void CALLBACK SPUwriteRegister(unsigned long, unsigned short, unsigned int);
  54 extern unsigned short CALLBACK SPUreadRegister(unsigned long);
  55 extern void CALLBACK SPUwriteDMAMem(unsigned short *, int, unsigned int);
  56 extern void CALLBACK SPUreadDMAMem(unsigned short *, int, unsigned int);
  57 extern void CALLBACK SPUplayADPCMchannel(void *, unsigned int, int);
  58 extern void CALLBACK SPUregisterCallback(void (*cb)(void));
  59 extern void CALLBACK SPUregisterScheduleCb(void (*cb)(unsigned int));
  60 extern long CALLBACK SPUfreeze(unsigned int, void *, unsigned int);
  61 extern void CALLBACK SPUasync(unsigned int, unsigned int);
  62 extern int  CALLBACK SPUplayCDDAchannel(short *, int, unsigned int, int);
  63
  64 /* PAD */
  65 static long CALLBACK PADinit(long _) { return 0; }
  66 static long CALLBACK PADopen(unsigned long *_) { return 0; }
  67 static long CALLBACK PADshutdown(void) { return 0; }
  68 static long CALLBACK PADclose(void) { return 0; }
  69 static void CALLBACK PADsetSensitive(int _) { return; }
  70
  71 static long CALLBACK PADreadPort1(PadDataS *pad) {
  72         int pad_index = pad->requestPadIndex;
  73
  74         pad->controllerType = in_type[pad_index];
  75         pad->buttonStatus = ~in_keystate[pad_index];
  76
  77         pad->portMultitap = multitap1;
  78
  79         if (in_type[pad_index] == PSE_PAD_TYPE_ANALOGJOY || in_type[pad_index] == PSE_PAD_TYPE_ANALOGPAD || in_type[pad_index] == PSE_PAD_TYPE_NEGCON || in_type[pad_index] == PSE_PAD_TYPE_GUNCON)
  80         {
  81                 pad->leftJoyX = in_analog_left[pad_index][0];
  82                 pad->leftJoyY = in_analog_left[pad_index][1];
  83                 pad->rightJoyX = in_analog_right[pad_index][0];
  84                 pad->rightJoyY = in_analog_right[pad_index][1];
  85
  86                 pad->absoluteX = in_analog_left[pad_index][0];
  87                 pad->absoluteY = in_analog_left[pad_index][1];
  88         }
  89
  90         if (in_type[pad_index] == PSE_PAD_TYPE_MOUSE)
  91         {
  92                 pad->moveX = in_mouse[pad_index][0];
  93                 pad->moveY = in_mouse[pad_index][1];
  94         }
  95
  96         return 0;
  97 }
  98
  99 static long CALLBACK PADreadPort2(PadDataS *pad) {
 100         int pad_index = pad->requestPadIndex;
 101
 102         pad->controllerType = in_type[pad_index];
 103         pad->buttonStatus = ~in_keystate[pad_index];
 104
 105         pad->portMultitap = multitap2;
 106
 107         if (in_type[pad_index] == PSE_PAD_TYPE_ANALOGJOY || in_type[pad_index] == PSE_PAD_TYPE_ANALOGPAD || in_type[pad_index] == PSE_PAD_TYPE_NEGCON || in_type[pad_index] == PSE_PAD_TYPE_GUNCON)
 108         {
 109                 pad->leftJoyX = in_analog_left[pad_index][0];
 110                 pad->leftJoyY = in_analog_left[pad_index][1];
 111                 pad->rightJoyX = in_analog_right[pad_index][0];
 112                 pad->rightJoyY = in_analog_right[pad_index][1];
 113
 114                 pad->absoluteX = in_analog_left[pad_index][0];
 115                 pad->absoluteY = in_analog_left[pad_index][1];
 116         }
 117
 118         if (in_type[pad_index] == PSE_PAD_TYPE_MOUSE)
 119         {
 120                 pad->moveX = in_mouse[pad_index][0];
 121                 pad->moveY = in_mouse[pad_index][1];
 122         }
 123
 124         return 0;
 125 }
 126
 127 /* GPU */
 128 extern long GPUopen(unsigned long *, char *, char *);
 129 extern long GPUinit(void);
 130 extern long GPUshutdown(void);
 131 extern long GPUclose(void);
 132 extern void GPUwriteStatus(uint32_t);
 133 extern void GPUwriteData(uint32_t);
 134 extern void GPUwriteDataMem(uint32_t *, int);
 135 extern uint32_t GPUreadStatus(void);
 136 extern uint32_t GPUreadData(void);
 137 extern void GPUreadDataMem(uint32_t *, int);
 138 extern long GPUdmaChain(uint32_t *,uint32_t);
 139 extern void GPUupdateLace(void);
 140 extern long GPUfreeze(uint32_t, void *);
 141 extern void GPUvBlank(int, int);
 142 extern void GPUrearmedCallbacks(const struct rearmed_cbs *cbs);
 143
 144
 145 #define DIRECT(id, name) \
 146         { id, #name, name }
 147
 148 #define DIRECT_CDR(name) DIRECT(PLUGIN_CDR, name)
 149 #define DIRECT_SPU(name) DIRECT(PLUGIN_SPU, name)
 150 #define DIRECT_GPU(name) DIRECT(PLUGIN_GPU, name)
 151 #define DIRECT_PAD(name) DIRECT(PLUGIN_PAD, name)
 152
 153 static const struct {
 154         int id;
 155         const char *name;
 156         void *func;
 157 } plugin_funcs[] = {
 158         /* CDR */
 159         DIRECT_CDR(CDRinit),
 160         DIRECT_CDR(CDRshutdown),
 161         DIRECT_CDR(CDRopen),
 162         DIRECT_CDR(CDRclose),
 163         DIRECT_CDR(CDRtest),
 164         DIRECT_CDR(CDRgetTN),
 165         DIRECT_CDR(CDRgetTD),
 166         DIRECT_CDR(CDRreadTrack),
 167         DIRECT_CDR(CDRgetBuffer),
 168         DIRECT_CDR(CDRgetBufferSub),
 169         DIRECT_CDR(CDRplay),
 170         DIRECT_CDR(CDRstop),
 171         DIRECT_CDR(CDRgetStatus),
 172         DIRECT_CDR(CDRgetDriveLetter),
 173         DIRECT_CDR(CDRconfigure),
 174         DIRECT_CDR(CDRabout),
 175         DIRECT_CDR(CDRsetfilename),
 176         DIRECT_CDR(CDRreadCDDA),
 177         DIRECT_CDR(CDRgetTE),
 178         /* SPU */
 179         DIRECT_SPU(SPUinit),
 180         DIRECT_SPU(SPUshutdown),
 181         DIRECT_SPU(SPUopen),
 182         DIRECT_SPU(SPUclose),
 183         DIRECT_SPU(SPUwriteRegister),
 184         DIRECT_SPU(SPUreadRegister),
 185         DIRECT_SPU(SPUwriteDMAMem),
 186         DIRECT_SPU(SPUreadDMAMem),
 187         DIRECT_SPU(SPUplayADPCMchannel),
 188         DIRECT_SPU(SPUfreeze),
 189         DIRECT_SPU(SPUregisterCallback),
 190         DIRECT_SPU(SPUregisterScheduleCb),
 191         DIRECT_SPU(SPUasync),
 192         DIRECT_SPU(SPUplayCDDAchannel),
 193         /* PAD */
 194         DIRECT_PAD(PADinit),
 195         DIRECT_PAD(PADshutdown),
 196         DIRECT_PAD(PADopen),
 197         DIRECT_PAD(PADclose),
 198         DIRECT_PAD(PADsetSensitive),
 199         DIRECT_PAD(PADreadPort1),
 200         DIRECT_PAD(PADreadPort2),
 201 /*
 202         DIRECT_PAD(PADquery),
 203         DIRECT_PAD(PADconfigure),
 204         DIRECT_PAD(PADtest),
 205         DIRECT_PAD(PADabout),
 206         DIRECT_PAD(PADkeypressed),
 207         DIRECT_PAD(PADstartPoll),
 208         DIRECT_PAD(PADpoll),
 209 */
 210         /* GPU */
 211         DIRECT_GPU(GPUupdateLace),
 212         DIRECT_GPU(GPUinit),
 213         DIRECT_GPU(GPUshutdown),
 214         DIRECT_GPU(GPUopen),
 215         DIRECT_GPU(GPUclose),
 216         DIRECT_GPU(GPUreadStatus),
 217         DIRECT_GPU(GPUreadData),
 218         DIRECT_GPU(GPUreadDataMem),
 219         DIRECT_GPU(GPUwriteStatus),
 220         DIRECT_GPU(GPUwriteData),
 221         DIRECT_GPU(GPUwriteDataMem),
 222         DIRECT_GPU(GPUdmaChain),
 223         DIRECT_GPU(GPUfreeze),
 224         DIRECT_GPU(GPUvBlank),
 225         DIRECT_GPU(GPUrearmedCallbacks),
 226
 227         DIRECT_GPU(GPUdisplayText),
 228 /*
 229         DIRECT_GPU(GPUkeypressed),
 230         DIRECT_GPU(GPUmakeSnapshot),
 231         DIRECT_GPU(GPUconfigure),
 232         DIRECT_GPU(GPUtest),
 233         DIRECT_GPU(GPUabout),
 234         DIRECT_GPU(GPUgetScreenPic),
 235         DIRECT_GPU(GPUshowScreenPic),
 236 */
 237 };
 238
 239 void *plugin_link(enum builtint_plugins_e id, const char *sym)
 240 {
 241         int i;
 242
 243         if (id == PLUGIN_CDRCIMG)
 244                 return cdrcimg_get_sym(sym);
 245
 246         for (i = 0; i < ARRAY_SIZE(plugin_funcs); i++) {
 247                 if (id != plugin_funcs[i].id)
 248                         continue;
 249
 250                 if (strcmp(sym, plugin_funcs[i].name) != 0)
 251                         continue;
 252
 253                 return plugin_funcs[i].func;
 254         }
 255
 256         //fprintf(stderr, "plugin_link: missing symbol %d %s\n", id, sym);
 257         return NULL;
 258 }
 259
 260 void plugin_call_rearmed_cbs(void)
 261 {
 262         extern void *hGPUDriver;
 263         void (*rearmed_set_cbs)(const struct rearmed_cbs *cbs);
 264
 265         rearmed_set_cbs = SysLoadSym(hGPUDriver, "GPUrearmedCallbacks");
 266         if (rearmed_set_cbs != NULL)
 267                 rearmed_set_cbs(&pl_rearmed_cbs);
 268 }
 269
 270 #ifdef PCNT
 271
 272 /* basic profile stuff */
 273 #include "pcnt.h"
 274
 275 unsigned int pcounters[PCNT_CNT];
 276 unsigned int pcounter_starts[PCNT_CNT];
 277
 278 #define pc_hook_func(name, args, pargs, cnt) \
 279 extern void (*name) args; \
 280 static void (*o_##name) args; \
 281 static void w_##name args \
 282 { \
 283         unsigned int pc_start = pcnt_get(); \
 284         o_##name pargs; \
 285         pcounters[cnt] += pcnt_get() - pc_start; \
 286 }
 287
 288 #define pc_hook_func_ret(retn, name, args, pargs, cnt) \
 289 extern retn (*name) args; \
 290 static retn (*o_##name) args; \
 291 static retn w_##name args \
 292 { \
 293         retn ret; \
 294         unsigned int pc_start = pcnt_get(); \
 295         ret = o_##name pargs; \
 296         pcounters[cnt] += pcnt_get() - pc_start; \
 297         return ret; \
 298 }
 299
 300 pc_hook_func              (GPU_writeStatus, (uint32_t a0), (a0), PCNT_GPU)
 301 pc_hook_func              (GPU_writeData, (uint32_t a0), (a0), PCNT_GPU)
 302 pc_hook_func              (GPU_writeDataMem, (uint32_t *a0, int a1), (a0, a1), PCNT_GPU)
 303 pc_hook_func_ret(uint32_t, GPU_readStatus, (void), (), PCNT_GPU)
 304 pc_hook_func_ret(uint32_t, GPU_readData, (void), (), PCNT_GPU)
 305 pc_hook_func              (GPU_readDataMem, (uint32_t *a0, int a1), (a0, a1), PCNT_GPU)
 306 pc_hook_func_ret(long,     GPU_dmaChain, (uint32_t *a0, int32_t a1), (a0, a1), PCNT_GPU)
 307 pc_hook_func              (GPU_updateLace, (void), (), PCNT_GPU)
 308
 309 pc_hook_func              (SPU_writeRegister, (unsigned long a0, unsigned short a1, uint32_t a2), (a0, a1, a2), PCNT_SPU)
 310 pc_hook_func_ret(unsigned short,SPU_readRegister, (unsigned long a0), (a0), PCNT_SPU)
 311 pc_hook_func              (SPU_writeDMAMem, (unsigned short *a0, int a1, uint32_t a2), (a0, a1, a2), PCNT_SPU)
 312 pc_hook_func              (SPU_readDMAMem, (unsigned short *a0, int a1, uint32_t a2), (a0, a1, a2), PCNT_SPU)
 313 pc_hook_func              (SPU_playADPCMchannel, (void *a0, unsigned int a1, int a2), (a0, a1, a2), PCNT_SPU)
 314 pc_hook_func              (SPU_async, (uint32_t a0, uint32_t a1), (a0, a1), PCNT_SPU)
 315 pc_hook_func_ret(int,      SPU_playCDDAchannel, (short *a0, int a1, unsigned int a2, int a3), (a0, a1, a2, a3), PCNT_SPU)
 316
 317 #define hook_it(name) { \
 318         o_##name = name; \
 319         name = w_##name; \
 320 }
 321
 322 void pcnt_hook_plugins(void)
 323 {
 324         pcnt_init();
 325
 326         hook_it(GPU_writeStatus);
 327         hook_it(GPU_writeData);
 328         hook_it(GPU_writeDataMem);
 329         hook_it(GPU_readStatus);
 330         hook_it(GPU_readData);
 331         hook_it(GPU_readDataMem);
 332         hook_it(GPU_dmaChain);
 333         hook_it(GPU_updateLace);
 334         hook_it(SPU_writeRegister);
 335         hook_it(SPU_readRegister);
 336         hook_it(SPU_writeDMAMem);
 337         hook_it(SPU_readDMAMem);
 338         hook_it(SPU_playADPCMchannel);
 339         hook_it(SPU_async);
 340         hook_it(SPU_playCDDAchannel);
 341 }
 342
 343 // hooked into recompiler
 344 void pcnt_gte_start(int op)
 345 {
 346         pcnt_start(PCNT_GTE);
 347 }
 348
 349 void pcnt_gte_end(int op)
 350 {
 351         pcnt_end(PCNT_GTE);
 352 }
 353
 354 #endif