notaz.gp2x.de / pcsx_rearmed.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
gte: Fix gteH division and sign extension (from PCSX4ALL)
[pcsx_rearmed.git] / libpcsxcore / gte.c
CommitLineData
ef79bbde
P		 1/***************************************************************************
2 * PCSX-Revolution - PlayStation Emulator for Nintendo Wii *
3 * Copyright (C) 2009-2010 PCSX-Revolution Dev Team *
4 * <http://code.google.com/p/pcsx-revolution/> *
5 * *
6 * This program is free software; you can redistribute it and/or modify *
7 * it under the terms of the GNU General Public License as published by *
8 * the Free Software Foundation; either version 2 of the License, or *
9 * (at your option) any later version. *
10 * *
11 * This program is distributed in the hope that it will be useful, *
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of *
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
14 * GNU General Public License for more details. *
15 * *
16 * You should have received a copy of the GNU General Public License *
17 * along with this program; if not, write to the *
18 * Free Software Foundation, Inc., *
19 * 51 Franklin Street, Fifth Floor, Boston, MA 02111-1307 USA. *
20 ***************************************************************************/
21
22/*
23* GTE functions.
24*/
25
26#include "gte.h"
27#include "psxmem.h"
28
f74fb727 29#define VX(n) (n < 3 ? regs->CP2D.p[n << 1].sw.l : regs->CP2D.p[9].sw.l)
30#define VY(n) (n < 3 ? regs->CP2D.p[n << 1].sw.h : regs->CP2D.p[10].sw.l)
31#define VZ(n) (n < 3 ? regs->CP2D.p[(n << 1) + 1].sw.l : regs->CP2D.p[11].sw.l)
32#define MX11(n) (n < 3 ? regs->CP2C.p[(n << 3)].sw.l : 0)
33#define MX12(n) (n < 3 ? regs->CP2C.p[(n << 3)].sw.h : 0)
34#define MX13(n) (n < 3 ? regs->CP2C.p[(n << 3) + 1].sw.l : 0)
35#define MX21(n) (n < 3 ? regs->CP2C.p[(n << 3) + 1].sw.h : 0)
36#define MX22(n) (n < 3 ? regs->CP2C.p[(n << 3) + 2].sw.l : 0)
37#define MX23(n) (n < 3 ? regs->CP2C.p[(n << 3) + 2].sw.h : 0)
38#define MX31(n) (n < 3 ? regs->CP2C.p[(n << 3) + 3].sw.l : 0)
39#define MX32(n) (n < 3 ? regs->CP2C.p[(n << 3) + 3].sw.h : 0)
40#define MX33(n) (n < 3 ? regs->CP2C.p[(n << 3) + 4].sw.l : 0)
41#define CV1(n) (n < 3 ? (s32)regs->CP2C.r[(n << 3) + 5] : 0)
42#define CV2(n) (n < 3 ? (s32)regs->CP2C.r[(n << 3) + 6] : 0)
43#define CV3(n) (n < 3 ? (s32)regs->CP2C.r[(n << 3) + 7] : 0)
44
45#define fSX(n) ((regs->CP2D.p)[((n) + 12)].sw.l)
46#define fSY(n) ((regs->CP2D.p)[((n) + 12)].sw.h)
47#define fSZ(n) ((regs->CP2D.p)[((n) + 17)].w.l) /* (n == 0) => SZ1; */
48
49#define gteVXY0 (regs->CP2D.r[0])
50#define gteVX0 (regs->CP2D.p[0].sw.l)
51#define gteVY0 (regs->CP2D.p[0].sw.h)
52#define gteVZ0 (regs->CP2D.p[1].sw.l)
53#define gteVXY1 (regs->CP2D.r[2])
54#define gteVX1 (regs->CP2D.p[2].sw.l)
55#define gteVY1 (regs->CP2D.p[2].sw.h)
56#define gteVZ1 (regs->CP2D.p[3].sw.l)
57#define gteVXY2 (regs->CP2D.r[4])
58#define gteVX2 (regs->CP2D.p[4].sw.l)
59#define gteVY2 (regs->CP2D.p[4].sw.h)
60#define gteVZ2 (regs->CP2D.p[5].sw.l)
61#define gteRGB (regs->CP2D.r[6])
62#define gteR (regs->CP2D.p[6].b.l)
63#define gteG (regs->CP2D.p[6].b.h)
64#define gteB (regs->CP2D.p[6].b.h2)
65#define gteCODE (regs->CP2D.p[6].b.h3)
66#define gteOTZ (regs->CP2D.p[7].w.l)
67#define gteIR0 (regs->CP2D.p[8].sw.l)
68#define gteIR1 (regs->CP2D.p[9].sw.l)
69#define gteIR2 (regs->CP2D.p[10].sw.l)
70#define gteIR3 (regs->CP2D.p[11].sw.l)
71#define gteSXY0 (regs->CP2D.r[12])
72#define gteSX0 (regs->CP2D.p[12].sw.l)
73#define gteSY0 (regs->CP2D.p[12].sw.h)
74#define gteSXY1 (regs->CP2D.r[13])
75#define gteSX1 (regs->CP2D.p[13].sw.l)
76#define gteSY1 (regs->CP2D.p[13].sw.h)
77#define gteSXY2 (regs->CP2D.r[14])
78#define gteSX2 (regs->CP2D.p[14].sw.l)
79#define gteSY2 (regs->CP2D.p[14].sw.h)
80#define gteSXYP (regs->CP2D.r[15])
81#define gteSXP (regs->CP2D.p[15].sw.l)
82#define gteSYP (regs->CP2D.p[15].sw.h)
83#define gteSZ0 (regs->CP2D.p[16].w.l)
84#define gteSZ1 (regs->CP2D.p[17].w.l)
85#define gteSZ2 (regs->CP2D.p[18].w.l)
86#define gteSZ3 (regs->CP2D.p[19].w.l)
87#define gteRGB0 (regs->CP2D.r[20])
88#define gteR0 (regs->CP2D.p[20].b.l)
89#define gteG0 (regs->CP2D.p[20].b.h)
90#define gteB0 (regs->CP2D.p[20].b.h2)
91#define gteCODE0 (regs->CP2D.p[20].b.h3)
92#define gteRGB1 (regs->CP2D.r[21])
93#define gteR1 (regs->CP2D.p[21].b.l)
94#define gteG1 (regs->CP2D.p[21].b.h)
95#define gteB1 (regs->CP2D.p[21].b.h2)
96#define gteCODE1 (regs->CP2D.p[21].b.h3)
97#define gteRGB2 (regs->CP2D.r[22])
98#define gteR2 (regs->CP2D.p[22].b.l)
99#define gteG2 (regs->CP2D.p[22].b.h)
100#define gteB2 (regs->CP2D.p[22].b.h2)
101#define gteCODE2 (regs->CP2D.p[22].b.h3)
102#define gteRES1 (regs->CP2D.r[23])
103#define gteMAC0 (((s32 *)regs->CP2D.r)[24])
104#define gteMAC1 (((s32 *)regs->CP2D.r)[25])
105#define gteMAC2 (((s32 *)regs->CP2D.r)[26])
106#define gteMAC3 (((s32 *)regs->CP2D.r)[27])
107#define gteIRGB (regs->CP2D.r[28])
108#define gteORGB (regs->CP2D.r[29])
109#define gteLZCS (regs->CP2D.r[30])
110#define gteLZCR (regs->CP2D.r[31])
111
112#define gteR11R12 (((s32 *)regs->CP2C.r)[0])
113#define gteR22R23 (((s32 *)regs->CP2C.r)[2])
114#define gteR11 (regs->CP2C.p[0].sw.l)
115#define gteR12 (regs->CP2C.p[0].sw.h)
116#define gteR13 (regs->CP2C.p[1].sw.l)
117#define gteR21 (regs->CP2C.p[1].sw.h)
118#define gteR22 (regs->CP2C.p[2].sw.l)
119#define gteR23 (regs->CP2C.p[2].sw.h)
120#define gteR31 (regs->CP2C.p[3].sw.l)
121#define gteR32 (regs->CP2C.p[3].sw.h)
122#define gteR33 (regs->CP2C.p[4].sw.l)
123#define gteTRX (((s32 *)regs->CP2C.r)[5])
124#define gteTRY (((s32 *)regs->CP2C.r)[6])
125#define gteTRZ (((s32 *)regs->CP2C.r)[7])
126#define gteL11 (regs->CP2C.p[8].sw.l)
127#define gteL12 (regs->CP2C.p[8].sw.h)
128#define gteL13 (regs->CP2C.p[9].sw.l)
129#define gteL21 (regs->CP2C.p[9].sw.h)
130#define gteL22 (regs->CP2C.p[10].sw.l)
131#define gteL23 (regs->CP2C.p[10].sw.h)
132#define gteL31 (regs->CP2C.p[11].sw.l)
133#define gteL32 (regs->CP2C.p[11].sw.h)
134#define gteL33 (regs->CP2C.p[12].sw.l)
135#define gteRBK (((s32 *)regs->CP2C.r)[13])
136#define gteGBK (((s32 *)regs->CP2C.r)[14])
137#define gteBBK (((s32 *)regs->CP2C.r)[15])
138#define gteLR1 (regs->CP2C.p[16].sw.l)
139#define gteLR2 (regs->CP2C.p[16].sw.h)
140#define gteLR3 (regs->CP2C.p[17].sw.l)
141#define gteLG1 (regs->CP2C.p[17].sw.h)
142#define gteLG2 (regs->CP2C.p[18].sw.l)
143#define gteLG3 (regs->CP2C.p[18].sw.h)
144#define gteLB1 (regs->CP2C.p[19].sw.l)
145#define gteLB2 (regs->CP2C.p[19].sw.h)
146#define gteLB3 (regs->CP2C.p[20].sw.l)
147#define gteRFC (((s32 *)regs->CP2C.r)[21])
148#define gteGFC (((s32 *)regs->CP2C.r)[22])
149#define gteBFC (((s32 *)regs->CP2C.r)[23])
150#define gteOFX (((s32 *)regs->CP2C.r)[24])
151#define gteOFY (((s32 *)regs->CP2C.r)[25])
3df12a81 152// senquack - gteH register is u16, not s16, and used in GTE that way.
153// HOWEVER when read back by CPU using CFC2, it will be incorrectly
154// sign-extended by bug in original hardware, according to Nocash docs
155// GTE section 'Screen Offset and Distance'. The emulator does this
156// sign extension when it is loaded to GTE by CTC2.
157//#define gteH (regs->CP2C.p[26].sw.l)
158#define gteH (regs->CP2C.p[26].w.l)
f74fb727 159#define gteDQA (regs->CP2C.p[27].sw.l)
160#define gteDQB (((s32 *)regs->CP2C.r)[28])
161#define gteZSF3 (regs->CP2C.p[29].sw.l)
162#define gteZSF4 (regs->CP2C.p[30].sw.l)
163#define gteFLAG (regs->CP2C.r[31])
ef79bbde
P		 164
165#define GTE_OP(op) ((op >> 20) & 31)
166#define GTE_SF(op) ((op >> 19) & 1)
167#define GTE_MX(op) ((op >> 17) & 3)
168#define GTE_V(op) ((op >> 15) & 3)
169#define GTE_CV(op) ((op >> 13) & 3)
170#define GTE_CD(op) ((op >> 11) & 3) /* not used */
171#define GTE_LM(op) ((op >> 10) & 1)
172#define GTE_CT(op) ((op >> 6) & 15) /* not used */
173#define GTE_FUNCT(op) (op & 63)
174
175#define gteop (psxRegs.code & 0x1ffffff)
176
59774ed0 177#ifndef FLAGLESS
178
e2a9a9a5 179static inline s64 BOUNDS_(psxCP2Regs *regs, s64 n_value, s64 n_max, int n_maxflag, s64 n_min, int n_minflag) {
ef79bbde
P		 180 if (n_value > n_max) {
181 gteFLAG |= n_maxflag;
182 } else if (n_value < n_min) {
183 gteFLAG |= n_minflag;
184 }
185 return n_value;
186}
187
f74fb727 188static inline s32 LIM_(psxCP2Regs *regs, s32 value, s32 max, s32 min, u32 flag) {
ef79bbde
P		 189 s32 ret = value;
190 if (value > max) {
191 gteFLAG |= flag;
192 ret = max;
193 } else if (value < min) {
194 gteFLAG |= flag;
195 ret = min;
196 }
197 return ret;
198}
199
f74fb727 200static inline u32 limE_(psxCP2Regs *regs, u32 result) {
59774ed0 201 if (result > 0x1ffff) {
202 gteFLAG |= (1 << 31) | (1 << 17);
203 return 0x1ffff;
204 }
205 return result;
206}
207
208#else
209
f74fb727 210#define BOUNDS_(regs, a, ...) (a)
59774ed0 211
f74fb727 212static inline s32 LIM_(psxCP2Regs *regs, s32 value, s32 max, s32 min, u32 flag_unused) {
59774ed0 213 s32 ret = value;
214 if (value > max)
215 ret = max;
216 else if (value < min)
217 ret = min;
218 return ret;
219}
220
f74fb727 221static inline u32 limE_(psxCP2Regs *regs, u32 result) {
bedfea38 222 if (result > 0x1ffff)
223 return 0x1ffff;
224 return result;
225}
59774ed0 226
227#endif
228
f74fb727 229#define BOUNDS(n_value,n_max,n_maxflag,n_min,n_minflag) \
230 BOUNDS_(regs,n_value,n_max,n_maxflag,n_min,n_minflag)
231#define LIM(value,max,min,flag) \
232 LIM_(regs,value,max,min,flag)
233#define limE(result) \
234 limE_(regs,result)
235
ef79bbde
P		 236#define A1(a) BOUNDS((a), 0x7fffffff, (1 << 30), -(s64)0x80000000, (1 << 31) | (1 << 27))
237#define A2(a) BOUNDS((a), 0x7fffffff, (1 << 29), -(s64)0x80000000, (1 << 31) | (1 << 26))
238#define A3(a) BOUNDS((a), 0x7fffffff, (1 << 28), -(s64)0x80000000, (1 << 31) | (1 << 25))
239#define limB1(a, l) LIM((a), 0x7fff, -0x8000 * !l, (1 << 31) | (1 << 24))
240#define limB2(a, l) LIM((a), 0x7fff, -0x8000 * !l, (1 << 31) | (1 << 23))
241#define limB3(a, l) LIM((a), 0x7fff, -0x8000 * !l, (1 << 22))
242#define limC1(a) LIM((a), 0x00ff, 0x0000, (1 << 21))
243#define limC2(a) LIM((a), 0x00ff, 0x0000, (1 << 20))
244#define limC3(a) LIM((a), 0x00ff, 0x0000, (1 << 19))
245#define limD(a) LIM((a), 0xffff, 0x0000, (1 << 31) | (1 << 18))
246
ef79bbde
P		 247#define F(a) BOUNDS((a), 0x7fffffff, (1 << 31) | (1 << 16), -(s64)0x80000000, (1 << 31) | (1 << 15))
248#define limG1(a) LIM((a), 0x3ff, -0x400, (1 << 31) | (1 << 14))
249#define limG2(a) LIM((a), 0x3ff, -0x400, (1 << 31) | (1 << 13))
7384197d 250#define limH(a) LIM((a), 0x1000, 0x0000, (1 << 12))
ef79bbde 251
6c6c9590 252#ifndef __arm__
253#define A1U A1
254#define A2U A2
255#define A3U A3
256#else
257/* these are unlikely to be hit and usually waste cycles, don't want them on ARM */
258#define A1U(x) (x)
259#define A2U(x) (x)
260#define A3U(x) (x)
261#endif
262
3df12a81 263//senquack - n param should be unsigned (will be 'gteH' reg which is u16)
264#ifdef GTE_USE_NATIVE_DIVIDE
265INLINE u32 DIVIDE(u16 n, u16 d) {
266 if (n < d * 2) {
267 return ((u32)n << 16) / d;
268 }
269 return 0xffffffff;
270}
271#else
ef79bbde 272#include "gte_divider.h"
3df12a81 273#endif // GTE_USE_NATIVE_DIVIDE
ef79bbde 274
59774ed0 275#ifndef FLAGLESS
276
6f1edc3c 277u32 MFC2(int reg) {
eac38522 278 psxCP2Regs *regs = &psxRegs.CP2;
ef79bbde
P		 279 switch (reg) {
280 case 1:
281 case 3:
282 case 5:
283 case 8:
284 case 9:
285 case 10:
286 case 11:
287 psxRegs.CP2D.r[reg] = (s32)psxRegs.CP2D.p[reg].sw.l;
288 break;
289
290 case 7:
291 case 16:
292 case 17:
293 case 18:
294 case 19:
295 psxRegs.CP2D.r[reg] = (u32)psxRegs.CP2D.p[reg].w.l;
296 break;
297
298 case 15:
299 psxRegs.CP2D.r[reg] = gteSXY2;
300 break;
301
302 case 28:
ef79bbde
P		 303 case 29:
304 psxRegs.CP2D.r[reg] = LIM(gteIR1 >> 7, 0x1f, 0, 0) |
305 (LIM(gteIR2 >> 7, 0x1f, 0, 0) << 5) |
306 (LIM(gteIR3 >> 7, 0x1f, 0, 0) << 10);
307 break;
308 }
309 return psxRegs.CP2D.r[reg];
310}
311
6f1edc3c 312void MTC2(u32 value, int reg) {
eac38522 313 psxCP2Regs *regs = &psxRegs.CP2;
ef79bbde
P		 314 switch (reg) {
315 case 15:
316 gteSXY0 = gteSXY1;
317 gteSXY1 = gteSXY2;
318 gteSXY2 = value;
319 gteSXYP = value;
320 break;
321
322 case 28:
323 gteIRGB = value;
324 gteIR1 = (value & 0x1f) << 7;
325 gteIR2 = (value & 0x3e0) << 2;
326 gteIR3 = (value & 0x7c00) >> 3;
327 break;
328
329 case 30:
330 {
331 int a;
332 gteLZCS = value;
333
334 a = gteLZCS;
335 if (a > 0) {
336 int i;
337 for (i = 31; (a & (1 << i)) == 0 && i >= 0; i--);
338 gteLZCR = 31 - i;
339 } else if (a < 0) {
340 int i;
341 a ^= 0xffffffff;
342 for (i = 31; (a & (1 << i)) == 0 && i >= 0; i--);
343 gteLZCR = 31 - i;
344 } else {
345 gteLZCR = 32;
346 }
347 }
348 break;
349
ef79bbde
P		 350 case 31:
351 return;
352
353 default:
354 psxRegs.CP2D.r[reg] = value;
355 }
356}
357
6f1edc3c 358void CTC2(u32 value, int reg) {
ef79bbde
P		 359 switch (reg) {
360 case 4:
361 case 12:
362 case 20:
363 case 26:
364 case 27:
365 case 29:
366 case 30:
367 value = (s32)(s16)value;
368 break;
369
370 case 31:
371 value = value & 0x7ffff000;
372 if (value & 0x7f87e000) value |= 0x80000000;
373 break;
374 }
375
376 psxRegs.CP2C.r[reg] = value;
377}
378
379void gteMFC2() {
380 if (!_Rt_) return;
381 psxRegs.GPR.r[_Rt_] = MFC2(_Rd_);
382}
383
384void gteCFC2() {
385 if (!_Rt_) return;
386 psxRegs.GPR.r[_Rt_] = psxRegs.CP2C.r[_Rd_];
387}
388
389void gteMTC2() {
390 MTC2(psxRegs.GPR.r[_Rt_], _Rd_);
391}
392
393void gteCTC2() {
394 CTC2(psxRegs.GPR.r[_Rt_], _Rd_);
395}
396
397#define _oB_ (psxRegs.GPR.r[_Rs_] + _Imm_)
398
399void gteLWC2() {
400 MTC2(psxMemRead32(_oB_), _Rt_);
401}
402
403void gteSWC2() {
404 psxMemWrite32(_oB_, MFC2(_Rt_));
405}
406
59774ed0 407#endif // FLAGLESS
408
3ebefe71 409#if 0
a2544c92 410#define DIVIDE DIVIDE_
411static u32 DIVIDE_(s16 n, u16 d) {
412 if (n >= 0 && n < d * 2) {
413 s32 n_ = n;
414 return ((n_ << 16) + d / 2) / d;
415 //return (u32)((float)(n_ << 16) / (float)d + (float)0.5);
416 }
417 return 0xffffffff;
418}
3ebefe71 419#endif
a2544c92 420
f74fb727 421void gteRTPS(psxCP2Regs *regs) {
ef79bbde 422 int quotient;
e2a9a9a5 423 s64 tmp;
ef79bbde
P		 424
425#ifdef GTE_LOG
426 GTE_LOG("GTE RTPS\n");
427#endif
428 gteFLAG = 0;
429
430 gteMAC1 = A1((((s64)gteTRX << 12) + (gteR11 * gteVX0) + (gteR12 * gteVY0) + (gteR13 * gteVZ0)) >> 12);
431 gteMAC2 = A2((((s64)gteTRY << 12) + (gteR21 * gteVX0) + (gteR22 * gteVY0) + (gteR23 * gteVZ0)) >> 12);
432 gteMAC3 = A3((((s64)gteTRZ << 12) + (gteR31 * gteVX0) + (gteR32 * gteVY0) + (gteR33 * gteVZ0)) >> 12);
433 gteIR1 = limB1(gteMAC1, 0);
434 gteIR2 = limB2(gteMAC2, 0);
435 gteIR3 = limB3(gteMAC3, 0);
436 gteSZ0 = gteSZ1;
437 gteSZ1 = gteSZ2;
438 gteSZ2 = gteSZ3;
439 gteSZ3 = limD(gteMAC3);
440 quotient = limE(DIVIDE(gteH, gteSZ3));
441 gteSXY0 = gteSXY1;
442 gteSXY1 = gteSXY2;
443 gteSX2 = limG1(F((s64)gteOFX + ((s64)gteIR1 * quotient)) >> 16);
444 gteSY2 = limG2(F((s64)gteOFY + ((s64)gteIR2 * quotient)) >> 16);
445
e2a9a9a5 446 tmp = (s64)gteDQB + ((s64)gteDQA * quotient);
447 gteMAC0 = F(tmp);
448 gteIR0 = limH(tmp >> 12);
ef79bbde
P		 449}
450
f74fb727 451void gteRTPT(psxCP2Regs *regs) {
ef79bbde
P		 452 int quotient;
453 int v;
454 s32 vx, vy, vz;
e2a9a9a5 455 s64 tmp;
ef79bbde
P		 456
457#ifdef GTE_LOG
458 GTE_LOG("GTE RTPT\n");
459#endif
460 gteFLAG = 0;
461
462 gteSZ0 = gteSZ3;
463 for (v = 0; v < 3; v++) {
464 vx = VX(v);
465 vy = VY(v);
466 vz = VZ(v);
467 gteMAC1 = A1((((s64)gteTRX << 12) + (gteR11 * vx) + (gteR12 * vy) + (gteR13 * vz)) >> 12);
468 gteMAC2 = A2((((s64)gteTRY << 12) + (gteR21 * vx) + (gteR22 * vy) + (gteR23 * vz)) >> 12);
469 gteMAC3 = A3((((s64)gteTRZ << 12) + (gteR31 * vx) + (gteR32 * vy) + (gteR33 * vz)) >> 12);
470 gteIR1 = limB1(gteMAC1, 0);
471 gteIR2 = limB2(gteMAC2, 0);
472 gteIR3 = limB3(gteMAC3, 0);
473 fSZ(v) = limD(gteMAC3);
474 quotient = limE(DIVIDE(gteH, fSZ(v)));
475 fSX(v) = limG1(F((s64)gteOFX + ((s64)gteIR1 * quotient)) >> 16);
476 fSY(v) = limG2(F((s64)gteOFY + ((s64)gteIR2 * quotient)) >> 16);
477 }
e2a9a9a5 478
479 tmp = (s64)gteDQB + ((s64)gteDQA * quotient);
480 gteMAC0 = F(tmp);
481 gteIR0 = limH(tmp >> 12);
ef79bbde
P		 482}
483
f74fb727 484void gteMVMVA(psxCP2Regs *regs) {
ef79bbde
P		 485 int shift = 12 * GTE_SF(gteop);
486 int mx = GTE_MX(gteop);
487 int v = GTE_V(gteop);
488 int cv = GTE_CV(gteop);
489 int lm = GTE_LM(gteop);
490 s32 vx = VX(v);
491 s32 vy = VY(v);
492 s32 vz = VZ(v);
493
494#ifdef GTE_LOG
495 GTE_LOG("GTE MVMVA\n");
496#endif
497 gteFLAG = 0;
498
499 gteMAC1 = A1((((s64)CV1(cv) << 12) + (MX11(mx) * vx) + (MX12(mx) * vy) + (MX13(mx) * vz)) >> shift);
500 gteMAC2 = A2((((s64)CV2(cv) << 12) + (MX21(mx) * vx) + (MX22(mx) * vy) + (MX23(mx) * vz)) >> shift);
501 gteMAC3 = A3((((s64)CV3(cv) << 12) + (MX31(mx) * vx) + (MX32(mx) * vy) + (MX33(mx) * vz)) >> shift);
502
503 gteIR1 = limB1(gteMAC1, lm);
504 gteIR2 = limB2(gteMAC2, lm);
505 gteIR3 = limB3(gteMAC3, lm);
506}
507
f74fb727 508void gteNCLIP(psxCP2Regs *regs) {
ef79bbde
P		 509#ifdef GTE_LOG
510 GTE_LOG("GTE NCLIP\n");
511#endif
512 gteFLAG = 0;
513
514 gteMAC0 = F((s64)gteSX0 * (gteSY1 - gteSY2) +
515 gteSX1 * (gteSY2 - gteSY0) +
516 gteSX2 * (gteSY0 - gteSY1));
517}
518
f74fb727 519void gteAVSZ3(psxCP2Regs *regs) {
ef79bbde
P		 520#ifdef GTE_LOG
521 GTE_LOG("GTE AVSZ3\n");
522#endif
523 gteFLAG = 0;
524
b3254af9 525 gteMAC0 = F((s64)gteZSF3 * (gteSZ1 + gteSZ2 + gteSZ3));
ef79bbde
P		 526 gteOTZ = limD(gteMAC0 >> 12);
527}
528
f74fb727 529void gteAVSZ4(psxCP2Regs *regs) {
ef79bbde
P		 530#ifdef GTE_LOG
531 GTE_LOG("GTE AVSZ4\n");
532#endif
533 gteFLAG = 0;
534
b3254af9 535 gteMAC0 = F((s64)gteZSF4 * (gteSZ0 + gteSZ1 + gteSZ2 + gteSZ3));
ef79bbde
P		 536 gteOTZ = limD(gteMAC0 >> 12);
537}
538
f74fb727 539void gteSQR(psxCP2Regs *regs) {
ef79bbde
P		 540 int shift = 12 * GTE_SF(gteop);
541 int lm = GTE_LM(gteop);
542
543#ifdef GTE_LOG
544 GTE_LOG("GTE SQR\n");
545#endif
546 gteFLAG = 0;
547
b3254af9 548 gteMAC1 = (gteIR1 * gteIR1) >> shift;
549 gteMAC2 = (gteIR2 * gteIR2) >> shift;
550 gteMAC3 = (gteIR3 * gteIR3) >> shift;
7384197d 551 gteIR1 = limB1(gteMAC1, lm);
552 gteIR2 = limB2(gteMAC2, lm);
553 gteIR3 = limB3(gteMAC3, lm);
ef79bbde
P		 554}
555
f74fb727 556void gteNCCS(psxCP2Regs *regs) {
ef79bbde
P		 557#ifdef GTE_LOG
558 GTE_LOG("GTE NCCS\n");
559#endif
560 gteFLAG = 0;
561
b3254af9 562 gteMAC1 = ((s64)(gteL11 * gteVX0) + (gteL12 * gteVY0) + (gteL13 * gteVZ0)) >> 12;
563 gteMAC2 = ((s64)(gteL21 * gteVX0) + (gteL22 * gteVY0) + (gteL23 * gteVZ0)) >> 12;
564 gteMAC3 = ((s64)(gteL31 * gteVX0) + (gteL32 * gteVY0) + (gteL33 * gteVZ0)) >> 12;
ef79bbde
P		 565 gteIR1 = limB1(gteMAC1, 1);
566 gteIR2 = limB2(gteMAC2, 1);
567 gteIR3 = limB3(gteMAC3, 1);
568 gteMAC1 = A1((((s64)gteRBK << 12) + (gteLR1 * gteIR1) + (gteLR2 * gteIR2) + (gteLR3 * gteIR3)) >> 12);
569 gteMAC2 = A2((((s64)gteGBK << 12) + (gteLG1 * gteIR1) + (gteLG2 * gteIR2) + (gteLG3 * gteIR3)) >> 12);
570 gteMAC3 = A3((((s64)gteBBK << 12) + (gteLB1 * gteIR1) + (gteLB2 * gteIR2) + (gteLB3 * gteIR3)) >> 12);
571 gteIR1 = limB1(gteMAC1, 1);
572 gteIR2 = limB2(gteMAC2, 1);
573 gteIR3 = limB3(gteMAC3, 1);
b3254af9 574 gteMAC1 = ((s32)gteR * gteIR1) >> 8;
575 gteMAC2 = ((s32)gteG * gteIR2) >> 8;
576 gteMAC3 = ((s32)gteB * gteIR3) >> 8;
577 gteIR1 = gteMAC1;
578 gteIR2 = gteMAC2;
579 gteIR3 = gteMAC3;
ef79bbde
P		 580
581 gteRGB0 = gteRGB1;
582 gteRGB1 = gteRGB2;
583 gteCODE2 = gteCODE;
584 gteR2 = limC1(gteMAC1 >> 4);
585 gteG2 = limC2(gteMAC2 >> 4);
586 gteB2 = limC3(gteMAC3 >> 4);
587}
588
f74fb727 589void gteNCCT(psxCP2Regs *regs) {
ef79bbde
P		 590 int v;
591 s32 vx, vy, vz;
592
593#ifdef GTE_LOG
594 GTE_LOG("GTE NCCT\n");
595#endif
596 gteFLAG = 0;
597
598 for (v = 0; v < 3; v++) {
599 vx = VX(v);
600 vy = VY(v);
601 vz = VZ(v);
b3254af9 602 gteMAC1 = ((s64)(gteL11 * vx) + (gteL12 * vy) + (gteL13 * vz)) >> 12;
603 gteMAC2 = ((s64)(gteL21 * vx) + (gteL22 * vy) + (gteL23 * vz)) >> 12;
604 gteMAC3 = ((s64)(gteL31 * vx) + (gteL32 * vy) + (gteL33 * vz)) >> 12;
ef79bbde
P		 605 gteIR1 = limB1(gteMAC1, 1);
606 gteIR2 = limB2(gteMAC2, 1);
607 gteIR3 = limB3(gteMAC3, 1);
608 gteMAC1 = A1((((s64)gteRBK << 12) + (gteLR1 * gteIR1) + (gteLR2 * gteIR2) + (gteLR3 * gteIR3)) >> 12);
609 gteMAC2 = A2((((s64)gteGBK << 12) + (gteLG1 * gteIR1) + (gteLG2 * gteIR2) + (gteLG3 * gteIR3)) >> 12);
610 gteMAC3 = A3((((s64)gteBBK << 12) + (gteLB1 * gteIR1) + (gteLB2 * gteIR2) + (gteLB3 * gteIR3)) >> 12);
611 gteIR1 = limB1(gteMAC1, 1);
612 gteIR2 = limB2(gteMAC2, 1);
613 gteIR3 = limB3(gteMAC3, 1);
b3254af9 614 gteMAC1 = ((s32)gteR * gteIR1) >> 8;
615 gteMAC2 = ((s32)gteG * gteIR2) >> 8;
616 gteMAC3 = ((s32)gteB * gteIR3) >> 8;
ef79bbde
P		 617
618 gteRGB0 = gteRGB1;
619 gteRGB1 = gteRGB2;
620 gteCODE2 = gteCODE;
621 gteR2 = limC1(gteMAC1 >> 4);
622 gteG2 = limC2(gteMAC2 >> 4);
623 gteB2 = limC3(gteMAC3 >> 4);
624 }
b3254af9 625 gteIR1 = gteMAC1;
626 gteIR2 = gteMAC2;
627 gteIR3 = gteMAC3;
ef79bbde
P		 628}
629
f74fb727 630void gteNCDS(psxCP2Regs *regs) {
ef79bbde
P		 631#ifdef GTE_LOG
632 GTE_LOG("GTE NCDS\n");
633#endif
634 gteFLAG = 0;
635
b3254af9 636 gteMAC1 = ((s64)(gteL11 * gteVX0) + (gteL12 * gteVY0) + (gteL13 * gteVZ0)) >> 12;
637 gteMAC2 = ((s64)(gteL21 * gteVX0) + (gteL22 * gteVY0) + (gteL23 * gteVZ0)) >> 12;
638 gteMAC3 = ((s64)(gteL31 * gteVX0) + (gteL32 * gteVY0) + (gteL33 * gteVZ0)) >> 12;
ef79bbde
P		 639 gteIR1 = limB1(gteMAC1, 1);
640 gteIR2 = limB2(gteMAC2, 1);
641 gteIR3 = limB3(gteMAC3, 1);
642 gteMAC1 = A1((((s64)gteRBK << 12) + (gteLR1 * gteIR1) + (gteLR2 * gteIR2) + (gteLR3 * gteIR3)) >> 12);
643 gteMAC2 = A2((((s64)gteGBK << 12) + (gteLG1 * gteIR1) + (gteLG2 * gteIR2) + (gteLG3 * gteIR3)) >> 12);
644 gteMAC3 = A3((((s64)gteBBK << 12) + (gteLB1 * gteIR1) + (gteLB2 * gteIR2) + (gteLB3 * gteIR3)) >> 12);
645 gteIR1 = limB1(gteMAC1, 1);
646 gteIR2 = limB2(gteMAC2, 1);
647 gteIR3 = limB3(gteMAC3, 1);
6c6c9590 648 gteMAC1 = (((gteR << 4) * gteIR1) + (gteIR0 * limB1(A1U((s64)gteRFC - ((gteR * gteIR1) >> 8)), 0))) >> 12;
649 gteMAC2 = (((gteG << 4) * gteIR2) + (gteIR0 * limB2(A2U((s64)gteGFC - ((gteG * gteIR2) >> 8)), 0))) >> 12;
650 gteMAC3 = (((gteB << 4) * gteIR3) + (gteIR0 * limB3(A3U((s64)gteBFC - ((gteB * gteIR3) >> 8)), 0))) >> 12;
ef79bbde
P		 651 gteIR1 = limB1(gteMAC1, 1);
652 gteIR2 = limB2(gteMAC2, 1);
653 gteIR3 = limB3(gteMAC3, 1);
654
655 gteRGB0 = gteRGB1;
656 gteRGB1 = gteRGB2;
657 gteCODE2 = gteCODE;
658 gteR2 = limC1(gteMAC1 >> 4);
659 gteG2 = limC2(gteMAC2 >> 4);
660 gteB2 = limC3(gteMAC3 >> 4);
661}
662
f74fb727 663void gteNCDT(psxCP2Regs *regs) {
ef79bbde
P		 664 int v;
665 s32 vx, vy, vz;
666
667#ifdef GTE_LOG
668 GTE_LOG("GTE NCDT\n");
669#endif
670 gteFLAG = 0;
671
672 for (v = 0; v < 3; v++) {
673 vx = VX(v);
674 vy = VY(v);
675 vz = VZ(v);
b3254af9 676 gteMAC1 = ((s64)(gteL11 * vx) + (gteL12 * vy) + (gteL13 * vz)) >> 12;
677 gteMAC2 = ((s64)(gteL21 * vx) + (gteL22 * vy) + (gteL23 * vz)) >> 12;
678 gteMAC3 = ((s64)(gteL31 * vx) + (gteL32 * vy) + (gteL33 * vz)) >> 12;
ef79bbde
P		 679 gteIR1 = limB1(gteMAC1, 1);
680 gteIR2 = limB2(gteMAC2, 1);
681 gteIR3 = limB3(gteMAC3, 1);
682 gteMAC1 = A1((((s64)gteRBK << 12) + (gteLR1 * gteIR1) + (gteLR2 * gteIR2) + (gteLR3 * gteIR3)) >> 12);
683 gteMAC2 = A2((((s64)gteGBK << 12) + (gteLG1 * gteIR1) + (gteLG2 * gteIR2) + (gteLG3 * gteIR3)) >> 12);
684 gteMAC3 = A3((((s64)gteBBK << 12) + (gteLB1 * gteIR1) + (gteLB2 * gteIR2) + (gteLB3 * gteIR3)) >> 12);
685 gteIR1 = limB1(gteMAC1, 1);
686 gteIR2 = limB2(gteMAC2, 1);
687 gteIR3 = limB3(gteMAC3, 1);
6c6c9590 688 gteMAC1 = (((gteR << 4) * gteIR1) + (gteIR0 * limB1(A1U((s64)gteRFC - ((gteR * gteIR1) >> 8)), 0))) >> 12;
689 gteMAC2 = (((gteG << 4) * gteIR2) + (gteIR0 * limB2(A2U((s64)gteGFC - ((gteG * gteIR2) >> 8)), 0))) >> 12;
690 gteMAC3 = (((gteB << 4) * gteIR3) + (gteIR0 * limB3(A3U((s64)gteBFC - ((gteB * gteIR3) >> 8)), 0))) >> 12;
ef79bbde
P		 691
692 gteRGB0 = gteRGB1;
693 gteRGB1 = gteRGB2;
694 gteCODE2 = gteCODE;
695 gteR2 = limC1(gteMAC1 >> 4);
696 gteG2 = limC2(gteMAC2 >> 4);
697 gteB2 = limC3(gteMAC3 >> 4);
698 }
699 gteIR1 = limB1(gteMAC1, 1);
700 gteIR2 = limB2(gteMAC2, 1);
701 gteIR3 = limB3(gteMAC3, 1);
702}
703
f74fb727 704void gteOP(psxCP2Regs *regs) {
ef79bbde
P		 705 int shift = 12 * GTE_SF(gteop);
706 int lm = GTE_LM(gteop);
707
708#ifdef GTE_LOG
709 GTE_LOG("GTE OP\n");
710#endif
711 gteFLAG = 0;
712
b3254af9 713 gteMAC1 = ((gteR22 * gteIR3) - (gteR33 * gteIR2)) >> shift;
714 gteMAC2 = ((gteR33 * gteIR1) - (gteR11 * gteIR3)) >> shift;
715 gteMAC3 = ((gteR11 * gteIR2) - (gteR22 * gteIR1)) >> shift;
ef79bbde
P		 716 gteIR1 = limB1(gteMAC1, lm);
717 gteIR2 = limB2(gteMAC2, lm);
718 gteIR3 = limB3(gteMAC3, lm);
719}
720
f74fb727 721void gteDCPL(psxCP2Regs *regs) {
ef79bbde
P		 722 int lm = GTE_LM(gteop);
723
b3254af9 724 s32 RIR1 = ((s32)gteR * gteIR1) >> 8;
725 s32 GIR2 = ((s32)gteG * gteIR2) >> 8;
726 s32 BIR3 = ((s32)gteB * gteIR3) >> 8;
ef79bbde
P		 727
728#ifdef GTE_LOG
729 GTE_LOG("GTE DCPL\n");
730#endif
731 gteFLAG = 0;
732
6c6c9590 733 gteMAC1 = RIR1 + ((gteIR0 * limB1(A1U((s64)gteRFC - RIR1), 0)) >> 12);
734 gteMAC2 = GIR2 + ((gteIR0 * limB1(A2U((s64)gteGFC - GIR2), 0)) >> 12);
735 gteMAC3 = BIR3 + ((gteIR0 * limB1(A3U((s64)gteBFC - BIR3), 0)) >> 12);
ef79bbde
P		 736
737 gteIR1 = limB1(gteMAC1, lm);
738 gteIR2 = limB2(gteMAC2, lm);
739 gteIR3 = limB3(gteMAC3, lm);
740
741 gteRGB0 = gteRGB1;
742 gteRGB1 = gteRGB2;
743 gteCODE2 = gteCODE;
744 gteR2 = limC1(gteMAC1 >> 4);
745 gteG2 = limC2(gteMAC2 >> 4);
746 gteB2 = limC3(gteMAC3 >> 4);
747}
748
f74fb727 749void gteGPF(psxCP2Regs *regs) {
ef79bbde
P		 750 int shift = 12 * GTE_SF(gteop);
751
752#ifdef GTE_LOG
753 GTE_LOG("GTE GPF\n");
754#endif
755 gteFLAG = 0;
756
b3254af9 757 gteMAC1 = (gteIR0 * gteIR1) >> shift;
758 gteMAC2 = (gteIR0 * gteIR2) >> shift;
759 gteMAC3 = (gteIR0 * gteIR3) >> shift;
ef79bbde
P		 760 gteIR1 = limB1(gteMAC1, 0);
761 gteIR2 = limB2(gteMAC2, 0);
762 gteIR3 = limB3(gteMAC3, 0);
763
764 gteRGB0 = gteRGB1;
765 gteRGB1 = gteRGB2;
766 gteCODE2 = gteCODE;
767 gteR2 = limC1(gteMAC1 >> 4);
768 gteG2 = limC2(gteMAC2 >> 4);
769 gteB2 = limC3(gteMAC3 >> 4);
770}
771
f74fb727 772void gteGPL(psxCP2Regs *regs) {
ef79bbde
P		 773 int shift = 12 * GTE_SF(gteop);
774
775#ifdef GTE_LOG
776 GTE_LOG("GTE GPL\n");
777#endif
778 gteFLAG = 0;
779
780 gteMAC1 = A1((((s64)gteMAC1 << shift) + (gteIR0 * gteIR1)) >> shift);
781 gteMAC2 = A2((((s64)gteMAC2 << shift) + (gteIR0 * gteIR2)) >> shift);
782 gteMAC3 = A3((((s64)gteMAC3 << shift) + (gteIR0 * gteIR3)) >> shift);
783 gteIR1 = limB1(gteMAC1, 0);
784 gteIR2 = limB2(gteMAC2, 0);
785 gteIR3 = limB3(gteMAC3, 0);
786
787 gteRGB0 = gteRGB1;
788 gteRGB1 = gteRGB2;
789 gteCODE2 = gteCODE;
790 gteR2 = limC1(gteMAC1 >> 4);
791 gteG2 = limC2(gteMAC2 >> 4);
792 gteB2 = limC3(gteMAC3 >> 4);
793}
794
f74fb727 795void gteDPCS(psxCP2Regs *regs) {
ef79bbde
P		 796 int shift = 12 * GTE_SF(gteop);
797
798#ifdef GTE_LOG
799 GTE_LOG("GTE DPCS\n");
800#endif
801 gteFLAG = 0;
802
6c6c9590 803 gteMAC1 = ((gteR << 16) + (gteIR0 * limB1(A1U(((s64)gteRFC - (gteR << 4)) << (12 - shift)), 0))) >> 12;
804 gteMAC2 = ((gteG << 16) + (gteIR0 * limB2(A2U(((s64)gteGFC - (gteG << 4)) << (12 - shift)), 0))) >> 12;
805 gteMAC3 = ((gteB << 16) + (gteIR0 * limB3(A3U(((s64)gteBFC - (gteB << 4)) << (12 - shift)), 0))) >> 12;
ef79bbde
P		 806
807 gteIR1 = limB1(gteMAC1, 0);
808 gteIR2 = limB2(gteMAC2, 0);
809 gteIR3 = limB3(gteMAC3, 0);
810 gteRGB0 = gteRGB1;
811 gteRGB1 = gteRGB2;
812 gteCODE2 = gteCODE;
813 gteR2 = limC1(gteMAC1 >> 4);
814 gteG2 = limC2(gteMAC2 >> 4);
815 gteB2 = limC3(gteMAC3 >> 4);
816}
817
f74fb727 818void gteDPCT(psxCP2Regs *regs) {
ef79bbde
P		 819 int v;
820
821#ifdef GTE_LOG
822 GTE_LOG("GTE DPCT\n");
823#endif
824 gteFLAG = 0;
825
826 for (v = 0; v < 3; v++) {
6c6c9590 827 gteMAC1 = ((gteR0 << 16) + (gteIR0 * limB1(A1U((s64)gteRFC - (gteR0 << 4)), 0))) >> 12;
828 gteMAC2 = ((gteG0 << 16) + (gteIR0 * limB1(A2U((s64)gteGFC - (gteG0 << 4)), 0))) >> 12;
829 gteMAC3 = ((gteB0 << 16) + (gteIR0 * limB1(A3U((s64)gteBFC - (gteB0 << 4)), 0))) >> 12;
ef79bbde
P		 830
831 gteRGB0 = gteRGB1;
832 gteRGB1 = gteRGB2;
833 gteCODE2 = gteCODE;
834 gteR2 = limC1(gteMAC1 >> 4);
835 gteG2 = limC2(gteMAC2 >> 4);
836 gteB2 = limC3(gteMAC3 >> 4);
837 }
838 gteIR1 = limB1(gteMAC1, 0);
839 gteIR2 = limB2(gteMAC2, 0);
840 gteIR3 = limB3(gteMAC3, 0);
841}
842
f74fb727 843void gteNCS(psxCP2Regs *regs) {
ef79bbde
P		 844#ifdef GTE_LOG
845 GTE_LOG("GTE NCS\n");
846#endif
847 gteFLAG = 0;
848
b3254af9 849 gteMAC1 = ((s64)(gteL11 * gteVX0) + (gteL12 * gteVY0) + (gteL13 * gteVZ0)) >> 12;
850 gteMAC2 = ((s64)(gteL21 * gteVX0) + (gteL22 * gteVY0) + (gteL23 * gteVZ0)) >> 12;
851 gteMAC3 = ((s64)(gteL31 * gteVX0) + (gteL32 * gteVY0) + (gteL33 * gteVZ0)) >> 12;
ef79bbde
P		 852 gteIR1 = limB1(gteMAC1, 1);
853 gteIR2 = limB2(gteMAC2, 1);
854 gteIR3 = limB3(gteMAC3, 1);
855 gteMAC1 = A1((((s64)gteRBK << 12) + (gteLR1 * gteIR1) + (gteLR2 * gteIR2) + (gteLR3 * gteIR3)) >> 12);
856 gteMAC2 = A2((((s64)gteGBK << 12) + (gteLG1 * gteIR1) + (gteLG2 * gteIR2) + (gteLG3 * gteIR3)) >> 12);
857 gteMAC3 = A3((((s64)gteBBK << 12) + (gteLB1 * gteIR1) + (gteLB2 * gteIR2) + (gteLB3 * gteIR3)) >> 12);
858 gteIR1 = limB1(gteMAC1, 1);
859 gteIR2 = limB2(gteMAC2, 1);
860 gteIR3 = limB3(gteMAC3, 1);
861
862 gteRGB0 = gteRGB1;
863 gteRGB1 = gteRGB2;
864 gteCODE2 = gteCODE;
865 gteR2 = limC1(gteMAC1 >> 4);
866 gteG2 = limC2(gteMAC2 >> 4);
867 gteB2 = limC3(gteMAC3 >> 4);
868}
869
f74fb727 870void gteNCT(psxCP2Regs *regs) {
ef79bbde
P		 871 int v;
872 s32 vx, vy, vz;
873
874#ifdef GTE_LOG
875 GTE_LOG("GTE NCT\n");
876#endif
877 gteFLAG = 0;
878
879 for (v = 0; v < 3; v++) {
880 vx = VX(v);
881 vy = VY(v);
882 vz = VZ(v);
b3254af9 883 gteMAC1 = ((s64)(gteL11 * vx) + (gteL12 * vy) + (gteL13 * vz)) >> 12;
884 gteMAC2 = ((s64)(gteL21 * vx) + (gteL22 * vy) + (gteL23 * vz)) >> 12;
885 gteMAC3 = ((s64)(gteL31 * vx) + (gteL32 * vy) + (gteL33 * vz)) >> 12;
ef79bbde
P		 886 gteIR1 = limB1(gteMAC1, 1);
887 gteIR2 = limB2(gteMAC2, 1);
888 gteIR3 = limB3(gteMAC3, 1);
889 gteMAC1 = A1((((s64)gteRBK << 12) + (gteLR1 * gteIR1) + (gteLR2 * gteIR2) + (gteLR3 * gteIR3)) >> 12);
890 gteMAC2 = A2((((s64)gteGBK << 12) + (gteLG1 * gteIR1) + (gteLG2 * gteIR2) + (gteLG3 * gteIR3)) >> 12);
891 gteMAC3 = A3((((s64)gteBBK << 12) + (gteLB1 * gteIR1) + (gteLB2 * gteIR2) + (gteLB3 * gteIR3)) >> 12);
892 gteRGB0 = gteRGB1;
893 gteRGB1 = gteRGB2;
894 gteCODE2 = gteCODE;
895 gteR2 = limC1(gteMAC1 >> 4);
896 gteG2 = limC2(gteMAC2 >> 4);
897 gteB2 = limC3(gteMAC3 >> 4);
898 }
899 gteIR1 = limB1(gteMAC1, 1);
900 gteIR2 = limB2(gteMAC2, 1);
901 gteIR3 = limB3(gteMAC3, 1);
902}
903
f74fb727 904void gteCC(psxCP2Regs *regs) {
ef79bbde
P		 905#ifdef GTE_LOG
906 GTE_LOG("GTE CC\n");
907#endif
908 gteFLAG = 0;
909
910 gteMAC1 = A1((((s64)gteRBK << 12) + (gteLR1 * gteIR1) + (gteLR2 * gteIR2) + (gteLR3 * gteIR3)) >> 12);
911 gteMAC2 = A2((((s64)gteGBK << 12) + (gteLG1 * gteIR1) + (gteLG2 * gteIR2) + (gteLG3 * gteIR3)) >> 12);
912 gteMAC3 = A3((((s64)gteBBK << 12) + (gteLB1 * gteIR1) + (gteLB2 * gteIR2) + (gteLB3 * gteIR3)) >> 12);
913 gteIR1 = limB1(gteMAC1, 1);
914 gteIR2 = limB2(gteMAC2, 1);
915 gteIR3 = limB3(gteMAC3, 1);
b3254af9 916 gteMAC1 = ((s32)gteR * gteIR1) >> 8;
917 gteMAC2 = ((s32)gteG * gteIR2) >> 8;
918 gteMAC3 = ((s32)gteB * gteIR3) >> 8;
ef79bbde
P		 919 gteIR1 = limB1(gteMAC1, 1);
920 gteIR2 = limB2(gteMAC2, 1);
921 gteIR3 = limB3(gteMAC3, 1);
922
923 gteRGB0 = gteRGB1;
924 gteRGB1 = gteRGB2;
925 gteCODE2 = gteCODE;
926 gteR2 = limC1(gteMAC1 >> 4);
927 gteG2 = limC2(gteMAC2 >> 4);
928 gteB2 = limC3(gteMAC3 >> 4);
929}
930
f74fb727 931void gteINTPL(psxCP2Regs *regs) {
ef79bbde
P		 932 int shift = 12 * GTE_SF(gteop);
933 int lm = GTE_LM(gteop);
934
935#ifdef GTE_LOG
936 GTE_LOG("GTE INTPL\n");
937#endif
938 gteFLAG = 0;
939
6c6c9590 940 gteMAC1 = ((gteIR1 << 12) + (gteIR0 * limB1(A1U((s64)gteRFC - gteIR1), 0))) >> shift;
941 gteMAC2 = ((gteIR2 << 12) + (gteIR0 * limB2(A2U((s64)gteGFC - gteIR2), 0))) >> shift;
942 gteMAC3 = ((gteIR3 << 12) + (gteIR0 * limB3(A3U((s64)gteBFC - gteIR3), 0))) >> shift;
ef79bbde
P		 943 gteIR1 = limB1(gteMAC1, lm);
944 gteIR2 = limB2(gteMAC2, lm);
945 gteIR3 = limB3(gteMAC3, lm);
946 gteRGB0 = gteRGB1;
947 gteRGB1 = gteRGB2;
948 gteCODE2 = gteCODE;
949 gteR2 = limC1(gteMAC1 >> 4);
950 gteG2 = limC2(gteMAC2 >> 4);
951 gteB2 = limC3(gteMAC3 >> 4);
952}
953
f74fb727 954void gteCDP(psxCP2Regs *regs) {
ef79bbde
P		 955#ifdef GTE_LOG
956 GTE_LOG("GTE CDP\n");
957#endif
958 gteFLAG = 0;
959
960 gteMAC1 = A1((((s64)gteRBK << 12) + (gteLR1 * gteIR1) + (gteLR2 * gteIR2) + (gteLR3 * gteIR3)) >> 12);
961 gteMAC2 = A2((((s64)gteGBK << 12) + (gteLG1 * gteIR1) + (gteLG2 * gteIR2) + (gteLG3 * gteIR3)) >> 12);
962 gteMAC3 = A3((((s64)gteBBK << 12) + (gteLB1 * gteIR1) + (gteLB2 * gteIR2) + (gteLB3 * gteIR3)) >> 12);
963 gteIR1 = limB1(gteMAC1, 1);
964 gteIR2 = limB2(gteMAC2, 1);
965 gteIR3 = limB3(gteMAC3, 1);
6c6c9590 966 gteMAC1 = (((gteR << 4) * gteIR1) + (gteIR0 * limB1(A1U((s64)gteRFC - ((gteR * gteIR1) >> 8)), 0))) >> 12;
967 gteMAC2 = (((gteG << 4) * gteIR2) + (gteIR0 * limB2(A2U((s64)gteGFC - ((gteG * gteIR2) >> 8)), 0))) >> 12;
968 gteMAC3 = (((gteB << 4) * gteIR3) + (gteIR0 * limB3(A3U((s64)gteBFC - ((gteB * gteIR3) >> 8)), 0))) >> 12;
ef79bbde
P		 969 gteIR1 = limB1(gteMAC1, 1);
970 gteIR2 = limB2(gteMAC2, 1);
971 gteIR3 = limB3(gteMAC3, 1);
972
973 gteRGB0 = gteRGB1;
974 gteRGB1 = gteRGB2;
975 gteCODE2 = gteCODE;
976 gteR2 = limC1(gteMAC1 >> 4);
977 gteG2 = limC2(gteMAC2 >> 4);
978 gteB2 = limC3(gteMAC3 >> 4);
979}
6c0eefaf 980
981/* decomposed/parametrized versions for the recompiler */
982
983#ifndef FLAGLESS
984
985void gteSQR_part_noshift(psxCP2Regs *regs) {
986 gteFLAG = 0;
987
988 gteMAC1 = gteIR1 * gteIR1;
989 gteMAC2 = gteIR2 * gteIR2;
990 gteMAC3 = gteIR3 * gteIR3;
991}
992
993void gteSQR_part_shift(psxCP2Regs *regs) {
994 gteFLAG = 0;
995
996 gteMAC1 = (gteIR1 * gteIR1) >> 12;
997 gteMAC2 = (gteIR2 * gteIR2) >> 12;
998 gteMAC3 = (gteIR3 * gteIR3) >> 12;
999}
1000
1001void gteOP_part_noshift(psxCP2Regs *regs) {
1002 gteFLAG = 0;
1003
1004 gteMAC1 = (gteR22 * gteIR3) - (gteR33 * gteIR2);
1005 gteMAC2 = (gteR33 * gteIR1) - (gteR11 * gteIR3);
1006 gteMAC3 = (gteR11 * gteIR2) - (gteR22 * gteIR1);
1007}
1008
1009void gteOP_part_shift(psxCP2Regs *regs) {
1010 gteFLAG = 0;
1011
1012 gteMAC1 = ((gteR22 * gteIR3) - (gteR33 * gteIR2)) >> 12;
1013 gteMAC2 = ((gteR33 * gteIR1) - (gteR11 * gteIR3)) >> 12;
1014 gteMAC3 = ((gteR11 * gteIR2) - (gteR22 * gteIR1)) >> 12;
1015}
1016
1017void gteDCPL_part(psxCP2Regs *regs) {
1018 s32 RIR1 = ((s32)gteR * gteIR1) >> 8;
1019 s32 GIR2 = ((s32)gteG * gteIR2) >> 8;
1020 s32 BIR3 = ((s32)gteB * gteIR3) >> 8;
1021
1022 gteFLAG = 0;
1023
1024 gteMAC1 = RIR1 + ((gteIR0 * limB1(A1U((s64)gteRFC - RIR1), 0)) >> 12);
1025 gteMAC2 = GIR2 + ((gteIR0 * limB1(A2U((s64)gteGFC - GIR2), 0)) >> 12);
1026 gteMAC3 = BIR3 + ((gteIR0 * limB1(A3U((s64)gteBFC - BIR3), 0)) >> 12);
1027}
1028
1029void gteGPF_part_noshift(psxCP2Regs *regs) {
1030 gteFLAG = 0;
1031
1032 gteMAC1 = gteIR0 * gteIR1;
1033 gteMAC2 = gteIR0 * gteIR2;
1034 gteMAC3 = gteIR0 * gteIR3;
1035}
1036
1037void gteGPF_part_shift(psxCP2Regs *regs) {
1038 gteFLAG = 0;
1039
1040 gteMAC1 = (gteIR0 * gteIR1) >> 12;
1041 gteMAC2 = (gteIR0 * gteIR2) >> 12;
1042 gteMAC3 = (gteIR0 * gteIR3) >> 12;
1043}
1044
1045#endif // !FLAGLESS
1046
1047void gteGPL_part_noshift(psxCP2Regs *regs) {
1048 gteFLAG = 0;
1049
1050 gteMAC1 = A1((s64)gteMAC1 + (gteIR0 * gteIR1));
1051 gteMAC2 = A2((s64)gteMAC2 + (gteIR0 * gteIR2));
1052 gteMAC3 = A3((s64)gteMAC3 + (gteIR0 * gteIR3));
1053}
1054
1055void gteGPL_part_shift(psxCP2Regs *regs) {
1056 gteFLAG = 0;
1057
1058 gteMAC1 = A1((s64)gteMAC1 + ((gteIR0 * gteIR1) >> 12));
1059 gteMAC2 = A2((s64)gteMAC2 + ((gteIR0 * gteIR2) >> 12));
1060 gteMAC3 = A3((s64)gteMAC3 + ((gteIR0 * gteIR3) >> 12));
1061}
1062
1063void gteDPCS_part_noshift(psxCP2Regs *regs) {
1064 int shift = 0;
1065
1066 gteFLAG = 0;
1067
1068 gteMAC1 = ((gteR << 16) + (gteIR0 * limB1(A1U((s64)gteRFC - (gteR << 4)) << (12 - shift), 0))) >> 12;
1069 gteMAC2 = ((gteG << 16) + (gteIR0 * limB2(A2U((s64)gteGFC - (gteG << 4)) << (12 - shift), 0))) >> 12;
1070 gteMAC3 = ((gteB << 16) + (gteIR0 * limB3(A3U((s64)gteBFC - (gteB << 4)) << (12 - shift), 0))) >> 12;
1071}
1072
1073void gteDPCS_part_shift(psxCP2Regs *regs) {
1074 int shift = 12;
1075
1076 gteFLAG = 0;
1077
1078 gteMAC1 = ((gteR << 16) + (gteIR0 * limB1(A1U((s64)gteRFC - (gteR << 4)) << (12 - shift), 0))) >> 12;
1079 gteMAC2 = ((gteG << 16) + (gteIR0 * limB2(A2U((s64)gteGFC - (gteG << 4)) << (12 - shift), 0))) >> 12;
1080 gteMAC3 = ((gteB << 16) + (gteIR0 * limB3(A3U((s64)gteBFC - (gteB << 4)) << (12 - shift), 0))) >> 12;
1081}
1082
1083void gteINTPL_part_noshift(psxCP2Regs *regs) {
1084 gteFLAG = 0;
1085
1086 gteMAC1 = ((gteIR1 << 12) + (gteIR0 * limB1(A1U((s64)gteRFC - gteIR1), 0)));
1087 gteMAC2 = ((gteIR2 << 12) + (gteIR0 * limB2(A2U((s64)gteGFC - gteIR2), 0)));
1088 gteMAC3 = ((gteIR3 << 12) + (gteIR0 * limB3(A3U((s64)gteBFC - gteIR3), 0)));
1089}
1090
1091void gteINTPL_part_shift(psxCP2Regs *regs) {
1092 gteFLAG = 0;
1093
1094 gteMAC1 = ((gteIR1 << 12) + (gteIR0 * limB1(A1U((s64)gteRFC - gteIR1), 0))) >> 12;
1095 gteMAC2 = ((gteIR2 << 12) + (gteIR0 * limB2(A2U((s64)gteGFC - gteIR2), 0))) >> 12;
1096 gteMAC3 = ((gteIR3 << 12) + (gteIR0 * limB3(A3U((s64)gteBFC - gteIR3), 0))) >> 12;
1097}
1098
1099void gteMACtoRGB(psxCP2Regs *regs) {
1100 gteRGB0 = gteRGB1;
1101 gteRGB1 = gteRGB2;
1102 gteCODE2 = gteCODE;
1103 gteR2 = limC1(gteMAC1 >> 4);
1104 gteG2 = limC2(gteMAC2 >> 4);
1105 gteB2 = limC3(gteMAC3 >> 4);
1106}
1107
ARM optimized PCSX fork