psxbios: Add checks to memcpy.
[pcsx_rearmed.git] / plugins / dfxvideo / gpulib_if.c
1 /***************************************************************************
2     copyright            : (C) 2001 by Pete Bernert, 2011 notaz
3
4  ***************************************************************************/
5 /***************************************************************************
6  *                                                                         *
7  *   This program is free software; you can redistribute it and/or modify  *
8  *   it under the terms of the GNU General Public License as published by  *
9  *   the Free Software Foundation; either version 2 of the License, or     *
10  *   (at your option) any later version. See also the license.txt file for *
11  *   additional informations.                                              *
12  *                                                                         *
13  ***************************************************************************/
14
15 #include <stdio.h>
16 #include <stdlib.h>
17 #include <string.h>
18 #include "../gpulib/gpu.h"
19
20 #define u32 uint32_t
21
22 #define INFO_TW        0
23 #define INFO_DRAWSTART 1
24 #define INFO_DRAWEND   2
25 #define INFO_DRAWOFF   3
26
27 #define SHADETEXBIT(x) ((x>>24) & 0x1)
28 #define SEMITRANSBIT(x) ((x>>25) & 0x1)
29 #define PSXRGB(r,g,b) ((g<<10)|(b<<5)|r)
30
31 #define DATAREGISTERMODES unsigned short
32
33 #define DR_NORMAL        0
34 #define DR_VRAMTRANSFER  1
35
36 #define GPUSTATUS_READYFORVRAM        0x08000000
37
38 // byteswappings
39
40 #define SWAP16(x) ({ uint16_t y=(x); (((y)>>8 & 0xff) | ((y)<<8 & 0xff00)); })
41 #define SWAP32(x) ({ uint32_t y=(x); (((y)>>24 & 0xfful) | ((y)>>8 & 0xff00ul) | ((y)<<8 & 0xff0000ul) | ((y)<<24 & 0xff000000ul)); })
42
43 #ifdef __BIG_ENDIAN__
44
45 // big endian config
46 #define HOST2LE32(x) SWAP32(x)
47 #define HOST2BE32(x) (x)
48 #define LE2HOST32(x) SWAP32(x)
49 #define BE2HOST32(x) (x)
50
51 #define HOST2LE16(x) SWAP16(x)
52 #define HOST2BE16(x) (x)
53 #define LE2HOST16(x) SWAP16(x)
54 #define BE2HOST16(x) (x)
55
56 #else
57
58 // little endian config
59 #define HOST2LE32(x) (x)
60 #define HOST2BE32(x) SWAP32(x)
61 #define LE2HOST32(x) (x)
62 #define BE2HOST32(x) SWAP32(x)
63
64 #define HOST2LE16(x) (x)
65 #define HOST2BE16(x) SWAP16(x)
66 #define LE2HOST16(x) (x)
67 #define BE2HOST16(x) SWAP16(x)
68
69 #endif
70
71 #define GETLEs16(X) ((int16_t)GETLE16((uint16_t *)X))
72 #define GETLEs32(X) ((int16_t)GETLE32((uint16_t *)X))
73
74 #define GETLE16(X) LE2HOST16(*(uint16_t *)X)
75 #define GETLE32_(X) LE2HOST32(*(uint32_t *)X)
76 #define GETLE16D(X) ({uint32_t val = GETLE32(X); (val<<16 | val >> 16);})
77 #define PUTLE16(X, Y) do{*((uint16_t *)X)=HOST2LE16((uint16_t)Y);}while(0)
78 #define PUTLE32_(X, Y) do{*((uint32_t *)X)=HOST2LE16((uint32_t)Y);}while(0)
79 #ifdef __arm__
80 #define GETLE32(X) (*(uint16_t *)(X)|(((uint16_t *)(X))[1]<<16))
81 #define PUTLE32(X, Y) do{uint16_t *p_=(uint16_t *)(X);uint32_t y_=Y;p_[0]=y_;p_[1]=y_>>16;}while(0)
82 #else
83 #define GETLE32 GETLE32_
84 #define PUTLE32 PUTLE32_
85 #endif
86
87 /////////////////////////////////////////////////////////////////////////////
88
89 typedef struct VRAMLOADTTAG
90 {
91  short x;
92  short y;
93  short Width;
94  short Height;
95  short RowsRemaining;
96  short ColsRemaining;
97  unsigned short *ImagePtr;
98 } VRAMLoad_t;
99
100 /////////////////////////////////////////////////////////////////////////////
101
102 typedef struct PSXPOINTTAG
103 {
104  int32_t x;
105  int32_t y;
106 } PSXPoint_t;
107
108 typedef struct PSXSPOINTTAG
109 {
110  short x;
111  short y;
112 } PSXSPoint_t;
113
114 typedef struct PSXRECTTAG
115 {
116  short x0;
117  short x1;
118  short y0;
119  short y1;
120 } PSXRect_t;
121
122 // linux defines for some windows stuff
123
124 #define FALSE 0
125 #define TRUE 1
126 #define BOOL unsigned short
127 #define LOWORD(l)           ((unsigned short)(l))
128 #define HIWORD(l)           ((unsigned short)(((uint32_t)(l) >> 16) & 0xFFFF))
129 #define max(a,b)            (((a) > (b)) ? (a) : (b))
130 #define min(a,b)            (((a) < (b)) ? (a) : (b))
131 #define DWORD uint32_t
132 #ifndef __int64
133 #define __int64 long long int
134 #endif
135
136 typedef struct RECTTAG
137 {
138  int left;
139  int top;
140  int right;
141  int bottom;
142 }RECT;
143
144 /////////////////////////////////////////////////////////////////////////////
145
146 typedef struct TWINTAG
147 {
148  PSXRect_t  Position;
149  int xmask, ymask;
150 } TWin_t;
151
152 /////////////////////////////////////////////////////////////////////////////
153
154 typedef struct PSXDISPLAYTAG
155 {
156  PSXPoint_t  DisplayModeNew;
157  PSXPoint_t  DisplayMode;
158  PSXPoint_t  DisplayPosition;
159  PSXPoint_t  DisplayEnd;
160
161  int32_t        Double;
162  int32_t        Height;
163  int32_t        PAL;
164  int32_t        InterlacedNew;
165  int32_t        Interlaced;
166  int32_t        RGB24New;
167  int32_t        RGB24;
168  PSXSPoint_t DrawOffset;
169  int32_t        Disabled;
170  PSXRect_t   Range;
171
172 } PSXDisplay_t;
173
174 /////////////////////////////////////////////////////////////////////////////
175
176 // draw.c
177
178 extern int32_t           GlobalTextAddrX,GlobalTextAddrY,GlobalTextTP;
179 extern int32_t           GlobalTextABR,GlobalTextPAGE;
180 extern short          ly0,lx0,ly1,lx1,ly2,lx2,ly3,lx3;
181 extern long           lLowerpart;
182 extern BOOL           bCheckMask;
183 extern unsigned short sSetMask;
184 extern unsigned long  lSetMask;
185 extern short          g_m1;
186 extern short          g_m2;
187 extern short          g_m3;
188 extern short          DrawSemiTrans;
189
190 // prim.c
191
192 extern BOOL           bUsingTWin;
193 extern TWin_t         TWin;
194 extern void (*primTableJ[256])(unsigned char *);
195 extern void (*primTableSkip[256])(unsigned char *);
196 extern unsigned short  usMirror;
197 extern int            iDither;
198 extern uint32_t  dwCfgFixes;
199 extern uint32_t  dwActFixes;
200 extern int            iUseFixes;
201 extern int            iUseDither;
202 extern BOOL           bDoVSyncUpdate;
203 extern int32_t           drawX;
204 extern int32_t           drawY;
205 extern int32_t           drawW;
206 extern int32_t           drawH;
207
208 // gpu.h
209
210 #define OPAQUEON   10
211 #define OPAQUEOFF  11
212
213 #define KEY_RESETTEXSTORE 1
214 #define KEY_SHOWFPS       2
215 #define KEY_RESETOPAQUE   4
216 #define KEY_RESETDITHER   8
217 #define KEY_RESETFILTER   16
218 #define KEY_RESETADVBLEND 32
219 #define KEY_BADTEXTURES   128
220 #define KEY_CHECKTHISOUT  256
221
222 #if !defined(__BIG_ENDIAN__) || defined(__x86_64__) || defined(__i386__)
223 #ifndef __LITTLE_ENDIAN__
224 #define __LITTLE_ENDIAN__
225 #endif
226 #endif
227
228 #ifdef __LITTLE_ENDIAN__
229 #define RED(x) (x & 0xff)
230 #define BLUE(x) ((x>>16) & 0xff)
231 #define GREEN(x) ((x>>8) & 0xff)
232 #define COLOR(x) (x & 0xffffff)
233 #elif defined __BIG_ENDIAN__
234 #define RED(x) ((x>>24) & 0xff)
235 #define BLUE(x) ((x>>8) & 0xff)
236 #define GREEN(x) ((x>>16) & 0xff)
237 #define COLOR(x) SWAP32(x & 0xffffff)
238 #endif
239
240 PSXDisplay_t      PSXDisplay;
241 unsigned char  *psxVub;
242 signed   char  *psxVsb;
243 unsigned short *psxVuw;
244 unsigned short *psxVuw_eom;
245 signed   short *psxVsw;
246 uint32_t *psxVul;
247 int32_t  *psxVsl;
248
249 long              lGPUstatusRet;
250 uint32_t          lGPUInfoVals[16];
251
252 VRAMLoad_t        VRAMWrite;
253 VRAMLoad_t        VRAMRead;
254
255 DATAREGISTERMODES DataWriteMode;
256 DATAREGISTERMODES DataReadMode;
257
258 BOOL           bCheckMask = FALSE;
259 unsigned short sSetMask = 0;
260 unsigned long  lSetMask = 0;
261 long           lLowerpart;
262
263 #include "soft.c"
264 #include "prim.c"
265
266 /////////////////////////////////////////////////////////////////////////////
267
268 static void set_vram(void *vram)
269 {
270  psxVub=vram;
271
272  psxVsb=(signed char *)psxVub;                         // different ways of accessing PSX VRAM
273  psxVsw=(signed short *)psxVub;
274  psxVsl=(int32_t *)psxVub;
275  psxVuw=(unsigned short *)psxVub;
276  psxVul=(uint32_t *)psxVub;
277
278  psxVuw_eom=psxVuw+1024*512;                           // pre-calc of end of vram
279 }
280
281 int renderer_init(void)
282 {
283  set_vram(gpu.vram);
284
285  PSXDisplay.RGB24        = FALSE;                      // init some stuff
286  PSXDisplay.Interlaced   = FALSE;
287  PSXDisplay.DrawOffset.x = 0;
288  PSXDisplay.DrawOffset.y = 0;
289  PSXDisplay.DisplayMode.x= 320;
290  PSXDisplay.DisplayMode.y= 240;
291  PSXDisplay.Disabled     = FALSE;
292  PSXDisplay.Range.x0=0;
293  PSXDisplay.Range.x1=0;
294  PSXDisplay.Double = 1;
295
296  DataWriteMode = DR_NORMAL;
297  lGPUstatusRet = 0x14802000;
298
299  return 0;
300 }
301
302 void renderer_finish(void)
303 {
304 }
305
306 void renderer_notify_res_change(void)
307 {
308 }
309
310 extern const unsigned char cmd_lengths[256];
311
312 int do_cmd_list(unsigned int *list, int list_len, int *last_cmd)
313 {
314   unsigned int cmd = 0, len;
315   unsigned int *list_start = list;
316   unsigned int *list_end = list + list_len;
317
318   for (; list < list_end; list += 1 + len)
319   {
320     cmd = *list >> 24;
321     len = cmd_lengths[cmd];
322     if (list + 1 + len > list_end) {
323       cmd = -1;
324       break;
325     }
326
327 #ifndef TEST
328     if (cmd == 0xa0 || cmd == 0xc0)
329       break; // image i/o, forward to upper layer
330     else if ((cmd & 0xf8) == 0xe0)
331       gpu.ex_regs[cmd & 7] = list[0];
332 #endif
333
334     primTableJ[cmd]((void *)list);
335
336     switch(cmd)
337     {
338       case 0x48 ... 0x4F:
339       {
340         u32 num_vertexes = 2;
341         u32 *list_position = &(list[3]);
342
343         while(1)
344         {
345           if(list_position >= list_end) {
346             cmd = -1;
347             goto breakloop;
348           }
349
350           if((*list_position & 0xf000f000) == 0x50005000)
351             break;
352
353           list_position++;
354           num_vertexes++;
355         }
356
357         len += (num_vertexes - 2);
358         break;
359       }
360
361       case 0x58 ... 0x5F:
362       {
363         u32 num_vertexes = 2;
364         u32 *list_position = &(list[4]);
365
366         while(1)
367         {
368           if(list_position >= list_end) {
369             cmd = -1;
370             goto breakloop;
371           }
372
373           if((*list_position & 0xf000f000) == 0x50005000)
374             break;
375
376           list_position += 2;
377           num_vertexes++;
378         }
379
380         len += (num_vertexes - 2) * 2;
381         break;
382       }
383
384 #ifdef TEST
385       case 0xA0:          //  sys -> vid
386       {
387         short *slist = (void *)list;
388         u32 load_width = slist[4];
389         u32 load_height = slist[5];
390         u32 load_size = load_width * load_height;
391
392         len += load_size / 2;
393         break;
394       }
395 #endif
396     }
397   }
398
399 breakloop:
400   gpu.ex_regs[1] &= ~0x1ff;
401   gpu.ex_regs[1] |= lGPUstatusRet & 0x1ff;
402
403   *last_cmd = cmd;
404   return list - list_start;
405 }
406
407 void renderer_sync_ecmds(uint32_t *ecmds)
408 {
409   cmdTexturePage((unsigned char *)&ecmds[1]);
410   cmdTextureWindow((unsigned char *)&ecmds[2]);
411   cmdDrawAreaStart((unsigned char *)&ecmds[3]);
412   cmdDrawAreaEnd((unsigned char *)&ecmds[4]);
413   cmdDrawOffset((unsigned char *)&ecmds[5]);
414   cmdSTP((unsigned char *)&ecmds[6]);
415 }
416
417 void renderer_update_caches(int x, int y, int w, int h)
418 {
419 }
420
421 void renderer_flush_queues(void)
422 {
423 }
424
425 void renderer_set_interlace(int enable, int is_odd)
426 {
427 }
428
429 #include "../../frontend/plugin_lib.h"
430
431 void renderer_set_config(const struct rearmed_cbs *cbs)
432 {
433  iUseDither = cbs->gpu_peops.iUseDither;
434  dwActFixes = cbs->gpu_peops.dwActFixes;
435  if (cbs->pl_set_gpu_caps)
436   cbs->pl_set_gpu_caps(0);
437  set_vram(gpu.vram);
438 }