Commit | Line | Data |
---|---|---|
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]) | |
b7159e1a | 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 (psxRegs.CP2C.p[26].sw.l) | |
158 | #define gteH (psxRegs.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 | ||
669fed93 | 179 | static 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 | 188 | static 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 | 200 | static 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 | 212 | static 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 | 221 | static 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 | ||
b7159e1a | 263 | |
264 | //senquack - n param should be unsigned (will be 'gteH' reg which is u16) | |
265 | #ifdef GTE_USE_NATIVE_DIVIDE | |
266 | INLINE u32 DIVIDE(u16 n, u16 d) { | |
267 | if (n < d * 2) { | |
268 | return ((u32)n << 16) / d; | |
269 | } | |
270 | return 0xffffffff; | |
271 | } | |
272 | #else | |
ef79bbde | 273 | #include "gte_divider.h" |
b7159e1a | 274 | #endif // GTE_USE_NATIVE_DIVIDE |
ef79bbde | 275 | |
59774ed0 | 276 | #ifndef FLAGLESS |
277 | ||
ef79bbde | 278 | static inline u32 MFC2(int reg) { |
eac38522 | 279 | psxCP2Regs *regs = &psxRegs.CP2; |
ef79bbde P |
280 | switch (reg) { |
281 | case 1: | |
282 | case 3: | |
283 | case 5: | |
284 | case 8: | |
285 | case 9: | |
286 | case 10: | |
287 | case 11: | |
288 | psxRegs.CP2D.r[reg] = (s32)psxRegs.CP2D.p[reg].sw.l; | |
289 | break; | |
290 | ||
291 | case 7: | |
292 | case 16: | |
293 | case 17: | |
294 | case 18: | |
295 | case 19: | |
296 | psxRegs.CP2D.r[reg] = (u32)psxRegs.CP2D.p[reg].w.l; | |
297 | break; | |
298 | ||
299 | case 15: | |
300 | psxRegs.CP2D.r[reg] = gteSXY2; | |
301 | break; | |
302 | ||
303 | case 28: | |
ef79bbde P |
304 | case 29: |
305 | psxRegs.CP2D.r[reg] = LIM(gteIR1 >> 7, 0x1f, 0, 0) | | |
306 | (LIM(gteIR2 >> 7, 0x1f, 0, 0) << 5) | | |
307 | (LIM(gteIR3 >> 7, 0x1f, 0, 0) << 10); | |
308 | break; | |
309 | } | |
310 | return psxRegs.CP2D.r[reg]; | |
311 | } | |
312 | ||
313 | static inline void MTC2(u32 value, int reg) { | |
eac38522 | 314 | psxCP2Regs *regs = &psxRegs.CP2; |
ef79bbde P |
315 | switch (reg) { |
316 | case 15: | |
317 | gteSXY0 = gteSXY1; | |
318 | gteSXY1 = gteSXY2; | |
319 | gteSXY2 = value; | |
320 | gteSXYP = value; | |
321 | break; | |
322 | ||
323 | case 28: | |
324 | gteIRGB = value; | |
325 | gteIR1 = (value & 0x1f) << 7; | |
326 | gteIR2 = (value & 0x3e0) << 2; | |
327 | gteIR3 = (value & 0x7c00) >> 3; | |
328 | break; | |
329 | ||
330 | case 30: | |
331 | { | |
332 | int a; | |
333 | gteLZCS = value; | |
334 | ||
335 | a = gteLZCS; | |
336 | if (a > 0) { | |
337 | int i; | |
338 | for (i = 31; (a & (1 << i)) == 0 && i >= 0; i--); | |
339 | gteLZCR = 31 - i; | |
340 | } else if (a < 0) { | |
341 | int i; | |
342 | a ^= 0xffffffff; | |
343 | for (i = 31; (a & (1 << i)) == 0 && i >= 0; i--); | |
344 | gteLZCR = 31 - i; | |
345 | } else { | |
346 | gteLZCR = 32; | |
347 | } | |
348 | } | |
349 | break; | |
350 | ||
ef79bbde P |
351 | case 31: |
352 | return; | |
353 | ||
354 | default: | |
355 | psxRegs.CP2D.r[reg] = value; | |
356 | } | |
357 | } | |
358 | ||
359 | static inline void CTC2(u32 value, int reg) { | |
360 | switch (reg) { | |
361 | case 4: | |
362 | case 12: | |
363 | case 20: | |
364 | case 26: | |
365 | case 27: | |
366 | case 29: | |
367 | case 30: | |
368 | value = (s32)(s16)value; | |
369 | break; | |
370 | ||
371 | case 31: | |
372 | value = value & 0x7ffff000; | |
373 | if (value & 0x7f87e000) value |= 0x80000000; | |
374 | break; | |
375 | } | |
376 | ||
377 | psxRegs.CP2C.r[reg] = value; | |
378 | } | |
379 | ||
380 | void gteMFC2() { | |
381 | if (!_Rt_) return; | |
382 | psxRegs.GPR.r[_Rt_] = MFC2(_Rd_); | |
383 | } | |
384 | ||
385 | void gteCFC2() { | |
386 | if (!_Rt_) return; | |
387 | psxRegs.GPR.r[_Rt_] = psxRegs.CP2C.r[_Rd_]; | |
388 | } | |
389 | ||
390 | void gteMTC2() { | |
391 | MTC2(psxRegs.GPR.r[_Rt_], _Rd_); | |
392 | } | |
393 | ||
394 | void gteCTC2() { | |
395 | CTC2(psxRegs.GPR.r[_Rt_], _Rd_); | |
396 | } | |
397 | ||
398 | #define _oB_ (psxRegs.GPR.r[_Rs_] + _Imm_) | |
399 | ||
400 | void gteLWC2() { | |
401 | MTC2(psxMemRead32(_oB_), _Rt_); | |
402 | } | |
403 | ||
404 | void gteSWC2() { | |
405 | psxMemWrite32(_oB_, MFC2(_Rt_)); | |
406 | } | |
407 | ||
59774ed0 | 408 | #endif // FLAGLESS |
409 | ||
3ebefe71 | 410 | #if 0 |
a2544c92 | 411 | #define DIVIDE DIVIDE_ |
412 | static u32 DIVIDE_(s16 n, u16 d) { | |
413 | if (n >= 0 && n < d * 2) { | |
414 | s32 n_ = n; | |
415 | return ((n_ << 16) + d / 2) / d; | |
416 | //return (u32)((float)(n_ << 16) / (float)d + (float)0.5); | |
417 | } | |
418 | return 0xffffffff; | |
419 | } | |
3ebefe71 | 420 | #endif |
a2544c92 | 421 | |
f74fb727 | 422 | void gteRTPS(psxCP2Regs *regs) { |
ef79bbde | 423 | int quotient; |
8cb04d22 | 424 | s64 tmp; |
ef79bbde P |
425 | |
426 | #ifdef GTE_LOG | |
427 | GTE_LOG("GTE RTPS\n"); | |
428 | #endif | |
429 | gteFLAG = 0; | |
430 | ||
431 | gteMAC1 = A1((((s64)gteTRX << 12) + (gteR11 * gteVX0) + (gteR12 * gteVY0) + (gteR13 * gteVZ0)) >> 12); | |
432 | gteMAC2 = A2((((s64)gteTRY << 12) + (gteR21 * gteVX0) + (gteR22 * gteVY0) + (gteR23 * gteVZ0)) >> 12); | |
433 | gteMAC3 = A3((((s64)gteTRZ << 12) + (gteR31 * gteVX0) + (gteR32 * gteVY0) + (gteR33 * gteVZ0)) >> 12); | |
434 | gteIR1 = limB1(gteMAC1, 0); | |
435 | gteIR2 = limB2(gteMAC2, 0); | |
436 | gteIR3 = limB3(gteMAC3, 0); | |
437 | gteSZ0 = gteSZ1; | |
438 | gteSZ1 = gteSZ2; | |
439 | gteSZ2 = gteSZ3; | |
440 | gteSZ3 = limD(gteMAC3); | |
441 | quotient = limE(DIVIDE(gteH, gteSZ3)); | |
442 | gteSXY0 = gteSXY1; | |
443 | gteSXY1 = gteSXY2; | |
444 | gteSX2 = limG1(F((s64)gteOFX + ((s64)gteIR1 * quotient)) >> 16); | |
445 | gteSY2 = limG2(F((s64)gteOFY + ((s64)gteIR2 * quotient)) >> 16); | |
446 | ||
8cb04d22 | 447 | tmp = (s64)gteDQB + ((s64)gteDQA * quotient); |
448 | gteMAC0 = F(tmp); | |
449 | gteIR0 = limH(tmp >> 12); | |
ef79bbde P |
450 | } |
451 | ||
f74fb727 | 452 | void gteRTPT(psxCP2Regs *regs) { |
ef79bbde P |
453 | int quotient; |
454 | int v; | |
455 | s32 vx, vy, vz; | |
8cb04d22 | 456 | s64 tmp; |
ef79bbde P |
457 | |
458 | #ifdef GTE_LOG | |
459 | GTE_LOG("GTE RTPT\n"); | |
460 | #endif | |
461 | gteFLAG = 0; | |
462 | ||
463 | gteSZ0 = gteSZ3; | |
464 | for (v = 0; v < 3; v++) { | |
465 | vx = VX(v); | |
466 | vy = VY(v); | |
467 | vz = VZ(v); | |
468 | gteMAC1 = A1((((s64)gteTRX << 12) + (gteR11 * vx) + (gteR12 * vy) + (gteR13 * vz)) >> 12); | |
469 | gteMAC2 = A2((((s64)gteTRY << 12) + (gteR21 * vx) + (gteR22 * vy) + (gteR23 * vz)) >> 12); | |
470 | gteMAC3 = A3((((s64)gteTRZ << 12) + (gteR31 * vx) + (gteR32 * vy) + (gteR33 * vz)) >> 12); | |
471 | gteIR1 = limB1(gteMAC1, 0); | |
472 | gteIR2 = limB2(gteMAC2, 0); | |
473 | gteIR3 = limB3(gteMAC3, 0); | |
474 | fSZ(v) = limD(gteMAC3); | |
475 | quotient = limE(DIVIDE(gteH, fSZ(v))); | |
476 | fSX(v) = limG1(F((s64)gteOFX + ((s64)gteIR1 * quotient)) >> 16); | |
477 | fSY(v) = limG2(F((s64)gteOFY + ((s64)gteIR2 * quotient)) >> 16); | |
478 | } | |
8cb04d22 | 479 | |
480 | tmp = (s64)gteDQB + ((s64)gteDQA * quotient); | |
481 | gteMAC0 = F(tmp); | |
482 | gteIR0 = limH(tmp >> 12); | |
ef79bbde P |
483 | } |
484 | ||
f74fb727 | 485 | void gteMVMVA(psxCP2Regs *regs) { |
ef79bbde P |
486 | int shift = 12 * GTE_SF(gteop); |
487 | int mx = GTE_MX(gteop); | |
488 | int v = GTE_V(gteop); | |
489 | int cv = GTE_CV(gteop); | |
490 | int lm = GTE_LM(gteop); | |
491 | s32 vx = VX(v); | |
492 | s32 vy = VY(v); | |
493 | s32 vz = VZ(v); | |
494 | ||
495 | #ifdef GTE_LOG | |
496 | GTE_LOG("GTE MVMVA\n"); | |
497 | #endif | |
498 | gteFLAG = 0; | |
499 | ||
500 | gteMAC1 = A1((((s64)CV1(cv) << 12) + (MX11(mx) * vx) + (MX12(mx) * vy) + (MX13(mx) * vz)) >> shift); | |
501 | gteMAC2 = A2((((s64)CV2(cv) << 12) + (MX21(mx) * vx) + (MX22(mx) * vy) + (MX23(mx) * vz)) >> shift); | |
502 | gteMAC3 = A3((((s64)CV3(cv) << 12) + (MX31(mx) * vx) + (MX32(mx) * vy) + (MX33(mx) * vz)) >> shift); | |
503 | ||
504 | gteIR1 = limB1(gteMAC1, lm); | |
505 | gteIR2 = limB2(gteMAC2, lm); | |
506 | gteIR3 = limB3(gteMAC3, lm); | |
507 | } | |
508 | ||
f74fb727 | 509 | void gteNCLIP(psxCP2Regs *regs) { |
ef79bbde P |
510 | #ifdef GTE_LOG |
511 | GTE_LOG("GTE NCLIP\n"); | |
512 | #endif | |
513 | gteFLAG = 0; | |
514 | ||
515 | gteMAC0 = F((s64)gteSX0 * (gteSY1 - gteSY2) + | |
516 | gteSX1 * (gteSY2 - gteSY0) + | |
517 | gteSX2 * (gteSY0 - gteSY1)); | |
518 | } | |
519 | ||
f74fb727 | 520 | void gteAVSZ3(psxCP2Regs *regs) { |
ef79bbde P |
521 | #ifdef GTE_LOG |
522 | GTE_LOG("GTE AVSZ3\n"); | |
523 | #endif | |
524 | gteFLAG = 0; | |
525 | ||
b3254af9 | 526 | gteMAC0 = F((s64)gteZSF3 * (gteSZ1 + gteSZ2 + gteSZ3)); |
ef79bbde P |
527 | gteOTZ = limD(gteMAC0 >> 12); |
528 | } | |
529 | ||
f74fb727 | 530 | void gteAVSZ4(psxCP2Regs *regs) { |
ef79bbde P |
531 | #ifdef GTE_LOG |
532 | GTE_LOG("GTE AVSZ4\n"); | |
533 | #endif | |
534 | gteFLAG = 0; | |
535 | ||
b3254af9 | 536 | gteMAC0 = F((s64)gteZSF4 * (gteSZ0 + gteSZ1 + gteSZ2 + gteSZ3)); |
ef79bbde P |
537 | gteOTZ = limD(gteMAC0 >> 12); |
538 | } | |
539 | ||
f74fb727 | 540 | void gteSQR(psxCP2Regs *regs) { |
ef79bbde P |
541 | int shift = 12 * GTE_SF(gteop); |
542 | int lm = GTE_LM(gteop); | |
543 | ||
544 | #ifdef GTE_LOG | |
545 | GTE_LOG("GTE SQR\n"); | |
546 | #endif | |
547 | gteFLAG = 0; | |
548 | ||
b3254af9 | 549 | gteMAC1 = (gteIR1 * gteIR1) >> shift; |
550 | gteMAC2 = (gteIR2 * gteIR2) >> shift; | |
551 | gteMAC3 = (gteIR3 * gteIR3) >> shift; | |
7384197d | 552 | gteIR1 = limB1(gteMAC1, lm); |
553 | gteIR2 = limB2(gteMAC2, lm); | |
554 | gteIR3 = limB3(gteMAC3, lm); | |
ef79bbde P |
555 | } |
556 | ||
f74fb727 | 557 | void gteNCCS(psxCP2Regs *regs) { |
ef79bbde P |
558 | #ifdef GTE_LOG |
559 | GTE_LOG("GTE NCCS\n"); | |
560 | #endif | |
561 | gteFLAG = 0; | |
562 | ||
b3254af9 | 563 | gteMAC1 = ((s64)(gteL11 * gteVX0) + (gteL12 * gteVY0) + (gteL13 * gteVZ0)) >> 12; |
564 | gteMAC2 = ((s64)(gteL21 * gteVX0) + (gteL22 * gteVY0) + (gteL23 * gteVZ0)) >> 12; | |
565 | gteMAC3 = ((s64)(gteL31 * gteVX0) + (gteL32 * gteVY0) + (gteL33 * gteVZ0)) >> 12; | |
ef79bbde P |
566 | gteIR1 = limB1(gteMAC1, 1); |
567 | gteIR2 = limB2(gteMAC2, 1); | |
568 | gteIR3 = limB3(gteMAC3, 1); | |
569 | gteMAC1 = A1((((s64)gteRBK << 12) + (gteLR1 * gteIR1) + (gteLR2 * gteIR2) + (gteLR3 * gteIR3)) >> 12); | |
570 | gteMAC2 = A2((((s64)gteGBK << 12) + (gteLG1 * gteIR1) + (gteLG2 * gteIR2) + (gteLG3 * gteIR3)) >> 12); | |
571 | gteMAC3 = A3((((s64)gteBBK << 12) + (gteLB1 * gteIR1) + (gteLB2 * gteIR2) + (gteLB3 * gteIR3)) >> 12); | |
572 | gteIR1 = limB1(gteMAC1, 1); | |
573 | gteIR2 = limB2(gteMAC2, 1); | |
574 | gteIR3 = limB3(gteMAC3, 1); | |
b3254af9 | 575 | gteMAC1 = ((s32)gteR * gteIR1) >> 8; |
576 | gteMAC2 = ((s32)gteG * gteIR2) >> 8; | |
577 | gteMAC3 = ((s32)gteB * gteIR3) >> 8; | |
578 | gteIR1 = gteMAC1; | |
579 | gteIR2 = gteMAC2; | |
580 | gteIR3 = gteMAC3; | |
ef79bbde P |
581 | |
582 | gteRGB0 = gteRGB1; | |
583 | gteRGB1 = gteRGB2; | |
584 | gteCODE2 = gteCODE; | |
585 | gteR2 = limC1(gteMAC1 >> 4); | |
586 | gteG2 = limC2(gteMAC2 >> 4); | |
587 | gteB2 = limC3(gteMAC3 >> 4); | |
588 | } | |
589 | ||
f74fb727 | 590 | void gteNCCT(psxCP2Regs *regs) { |
ef79bbde P |
591 | int v; |
592 | s32 vx, vy, vz; | |
593 | ||
594 | #ifdef GTE_LOG | |
595 | GTE_LOG("GTE NCCT\n"); | |
596 | #endif | |
597 | gteFLAG = 0; | |
598 | ||
599 | for (v = 0; v < 3; v++) { | |
600 | vx = VX(v); | |
601 | vy = VY(v); | |
602 | vz = VZ(v); | |
b3254af9 | 603 | gteMAC1 = ((s64)(gteL11 * vx) + (gteL12 * vy) + (gteL13 * vz)) >> 12; |
604 | gteMAC2 = ((s64)(gteL21 * vx) + (gteL22 * vy) + (gteL23 * vz)) >> 12; | |
605 | gteMAC3 = ((s64)(gteL31 * vx) + (gteL32 * vy) + (gteL33 * vz)) >> 12; | |
ef79bbde P |
606 | gteIR1 = limB1(gteMAC1, 1); |
607 | gteIR2 = limB2(gteMAC2, 1); | |
608 | gteIR3 = limB3(gteMAC3, 1); | |
609 | gteMAC1 = A1((((s64)gteRBK << 12) + (gteLR1 * gteIR1) + (gteLR2 * gteIR2) + (gteLR3 * gteIR3)) >> 12); | |
610 | gteMAC2 = A2((((s64)gteGBK << 12) + (gteLG1 * gteIR1) + (gteLG2 * gteIR2) + (gteLG3 * gteIR3)) >> 12); | |
611 | gteMAC3 = A3((((s64)gteBBK << 12) + (gteLB1 * gteIR1) + (gteLB2 * gteIR2) + (gteLB3 * gteIR3)) >> 12); | |
612 | gteIR1 = limB1(gteMAC1, 1); | |
613 | gteIR2 = limB2(gteMAC2, 1); | |
614 | gteIR3 = limB3(gteMAC3, 1); | |
b3254af9 | 615 | gteMAC1 = ((s32)gteR * gteIR1) >> 8; |
616 | gteMAC2 = ((s32)gteG * gteIR2) >> 8; | |
617 | gteMAC3 = ((s32)gteB * gteIR3) >> 8; | |
ef79bbde P |
618 | |
619 | gteRGB0 = gteRGB1; | |
620 | gteRGB1 = gteRGB2; | |
621 | gteCODE2 = gteCODE; | |
622 | gteR2 = limC1(gteMAC1 >> 4); | |
623 | gteG2 = limC2(gteMAC2 >> 4); | |
624 | gteB2 = limC3(gteMAC3 >> 4); | |
625 | } | |
b3254af9 | 626 | gteIR1 = gteMAC1; |
627 | gteIR2 = gteMAC2; | |
628 | gteIR3 = gteMAC3; | |
ef79bbde P |
629 | } |
630 | ||
f74fb727 | 631 | void gteNCDS(psxCP2Regs *regs) { |
ef79bbde P |
632 | #ifdef GTE_LOG |
633 | GTE_LOG("GTE NCDS\n"); | |
634 | #endif | |
635 | gteFLAG = 0; | |
636 | ||
b3254af9 | 637 | gteMAC1 = ((s64)(gteL11 * gteVX0) + (gteL12 * gteVY0) + (gteL13 * gteVZ0)) >> 12; |
638 | gteMAC2 = ((s64)(gteL21 * gteVX0) + (gteL22 * gteVY0) + (gteL23 * gteVZ0)) >> 12; | |
639 | gteMAC3 = ((s64)(gteL31 * gteVX0) + (gteL32 * gteVY0) + (gteL33 * gteVZ0)) >> 12; | |
ef79bbde P |
640 | gteIR1 = limB1(gteMAC1, 1); |
641 | gteIR2 = limB2(gteMAC2, 1); | |
642 | gteIR3 = limB3(gteMAC3, 1); | |
643 | gteMAC1 = A1((((s64)gteRBK << 12) + (gteLR1 * gteIR1) + (gteLR2 * gteIR2) + (gteLR3 * gteIR3)) >> 12); | |
644 | gteMAC2 = A2((((s64)gteGBK << 12) + (gteLG1 * gteIR1) + (gteLG2 * gteIR2) + (gteLG3 * gteIR3)) >> 12); | |
645 | gteMAC3 = A3((((s64)gteBBK << 12) + (gteLB1 * gteIR1) + (gteLB2 * gteIR2) + (gteLB3 * gteIR3)) >> 12); | |
646 | gteIR1 = limB1(gteMAC1, 1); | |
647 | gteIR2 = limB2(gteMAC2, 1); | |
648 | gteIR3 = limB3(gteMAC3, 1); | |
6c6c9590 | 649 | gteMAC1 = (((gteR << 4) * gteIR1) + (gteIR0 * limB1(A1U((s64)gteRFC - ((gteR * gteIR1) >> 8)), 0))) >> 12; |
650 | gteMAC2 = (((gteG << 4) * gteIR2) + (gteIR0 * limB2(A2U((s64)gteGFC - ((gteG * gteIR2) >> 8)), 0))) >> 12; | |
651 | gteMAC3 = (((gteB << 4) * gteIR3) + (gteIR0 * limB3(A3U((s64)gteBFC - ((gteB * gteIR3) >> 8)), 0))) >> 12; | |
ef79bbde P |
652 | gteIR1 = limB1(gteMAC1, 1); |
653 | gteIR2 = limB2(gteMAC2, 1); | |
654 | gteIR3 = limB3(gteMAC3, 1); | |
655 | ||
656 | gteRGB0 = gteRGB1; | |
657 | gteRGB1 = gteRGB2; | |
658 | gteCODE2 = gteCODE; | |
659 | gteR2 = limC1(gteMAC1 >> 4); | |
660 | gteG2 = limC2(gteMAC2 >> 4); | |
661 | gteB2 = limC3(gteMAC3 >> 4); | |
662 | } | |
663 | ||
f74fb727 | 664 | void gteNCDT(psxCP2Regs *regs) { |
ef79bbde P |
665 | int v; |
666 | s32 vx, vy, vz; | |
667 | ||
668 | #ifdef GTE_LOG | |
669 | GTE_LOG("GTE NCDT\n"); | |
670 | #endif | |
671 | gteFLAG = 0; | |
672 | ||
673 | for (v = 0; v < 3; v++) { | |
674 | vx = VX(v); | |
675 | vy = VY(v); | |
676 | vz = VZ(v); | |
b3254af9 | 677 | gteMAC1 = ((s64)(gteL11 * vx) + (gteL12 * vy) + (gteL13 * vz)) >> 12; |
678 | gteMAC2 = ((s64)(gteL21 * vx) + (gteL22 * vy) + (gteL23 * vz)) >> 12; | |
679 | gteMAC3 = ((s64)(gteL31 * vx) + (gteL32 * vy) + (gteL33 * vz)) >> 12; | |
ef79bbde P |
680 | gteIR1 = limB1(gteMAC1, 1); |
681 | gteIR2 = limB2(gteMAC2, 1); | |
682 | gteIR3 = limB3(gteMAC3, 1); | |
683 | gteMAC1 = A1((((s64)gteRBK << 12) + (gteLR1 * gteIR1) + (gteLR2 * gteIR2) + (gteLR3 * gteIR3)) >> 12); | |
684 | gteMAC2 = A2((((s64)gteGBK << 12) + (gteLG1 * gteIR1) + (gteLG2 * gteIR2) + (gteLG3 * gteIR3)) >> 12); | |
685 | gteMAC3 = A3((((s64)gteBBK << 12) + (gteLB1 * gteIR1) + (gteLB2 * gteIR2) + (gteLB3 * gteIR3)) >> 12); | |
686 | gteIR1 = limB1(gteMAC1, 1); | |
687 | gteIR2 = limB2(gteMAC2, 1); | |
688 | gteIR3 = limB3(gteMAC3, 1); | |
6c6c9590 | 689 | gteMAC1 = (((gteR << 4) * gteIR1) + (gteIR0 * limB1(A1U((s64)gteRFC - ((gteR * gteIR1) >> 8)), 0))) >> 12; |
690 | gteMAC2 = (((gteG << 4) * gteIR2) + (gteIR0 * limB2(A2U((s64)gteGFC - ((gteG * gteIR2) >> 8)), 0))) >> 12; | |
691 | gteMAC3 = (((gteB << 4) * gteIR3) + (gteIR0 * limB3(A3U((s64)gteBFC - ((gteB * gteIR3) >> 8)), 0))) >> 12; | |
ef79bbde P |
692 | |
693 | gteRGB0 = gteRGB1; | |
694 | gteRGB1 = gteRGB2; | |
695 | gteCODE2 = gteCODE; | |
696 | gteR2 = limC1(gteMAC1 >> 4); | |
697 | gteG2 = limC2(gteMAC2 >> 4); | |
698 | gteB2 = limC3(gteMAC3 >> 4); | |
699 | } | |
700 | gteIR1 = limB1(gteMAC1, 1); | |
701 | gteIR2 = limB2(gteMAC2, 1); | |
702 | gteIR3 = limB3(gteMAC3, 1); | |
703 | } | |
704 | ||
f74fb727 | 705 | void gteOP(psxCP2Regs *regs) { |
ef79bbde P |
706 | int shift = 12 * GTE_SF(gteop); |
707 | int lm = GTE_LM(gteop); | |
708 | ||
709 | #ifdef GTE_LOG | |
710 | GTE_LOG("GTE OP\n"); | |
711 | #endif | |
712 | gteFLAG = 0; | |
713 | ||
b3254af9 | 714 | gteMAC1 = ((gteR22 * gteIR3) - (gteR33 * gteIR2)) >> shift; |
715 | gteMAC2 = ((gteR33 * gteIR1) - (gteR11 * gteIR3)) >> shift; | |
716 | gteMAC3 = ((gteR11 * gteIR2) - (gteR22 * gteIR1)) >> shift; | |
ef79bbde P |
717 | gteIR1 = limB1(gteMAC1, lm); |
718 | gteIR2 = limB2(gteMAC2, lm); | |
719 | gteIR3 = limB3(gteMAC3, lm); | |
720 | } | |
721 | ||
f74fb727 | 722 | void gteDCPL(psxCP2Regs *regs) { |
ef79bbde P |
723 | int lm = GTE_LM(gteop); |
724 | ||
b3254af9 | 725 | s32 RIR1 = ((s32)gteR * gteIR1) >> 8; |
726 | s32 GIR2 = ((s32)gteG * gteIR2) >> 8; | |
727 | s32 BIR3 = ((s32)gteB * gteIR3) >> 8; | |
ef79bbde P |
728 | |
729 | #ifdef GTE_LOG | |
730 | GTE_LOG("GTE DCPL\n"); | |
731 | #endif | |
732 | gteFLAG = 0; | |
733 | ||
6c6c9590 | 734 | gteMAC1 = RIR1 + ((gteIR0 * limB1(A1U((s64)gteRFC - RIR1), 0)) >> 12); |
735 | gteMAC2 = GIR2 + ((gteIR0 * limB1(A2U((s64)gteGFC - GIR2), 0)) >> 12); | |
736 | gteMAC3 = BIR3 + ((gteIR0 * limB1(A3U((s64)gteBFC - BIR3), 0)) >> 12); | |
ef79bbde P |
737 | |
738 | gteIR1 = limB1(gteMAC1, lm); | |
739 | gteIR2 = limB2(gteMAC2, lm); | |
740 | gteIR3 = limB3(gteMAC3, lm); | |
741 | ||
742 | gteRGB0 = gteRGB1; | |
743 | gteRGB1 = gteRGB2; | |
744 | gteCODE2 = gteCODE; | |
745 | gteR2 = limC1(gteMAC1 >> 4); | |
746 | gteG2 = limC2(gteMAC2 >> 4); | |
747 | gteB2 = limC3(gteMAC3 >> 4); | |
748 | } | |
749 | ||
f74fb727 | 750 | void gteGPF(psxCP2Regs *regs) { |
ef79bbde P |
751 | int shift = 12 * GTE_SF(gteop); |
752 | ||
753 | #ifdef GTE_LOG | |
754 | GTE_LOG("GTE GPF\n"); | |
755 | #endif | |
756 | gteFLAG = 0; | |
757 | ||
b3254af9 | 758 | gteMAC1 = (gteIR0 * gteIR1) >> shift; |
759 | gteMAC2 = (gteIR0 * gteIR2) >> shift; | |
760 | gteMAC3 = (gteIR0 * gteIR3) >> shift; | |
ef79bbde P |
761 | gteIR1 = limB1(gteMAC1, 0); |
762 | gteIR2 = limB2(gteMAC2, 0); | |
763 | gteIR3 = limB3(gteMAC3, 0); | |
764 | ||
765 | gteRGB0 = gteRGB1; | |
766 | gteRGB1 = gteRGB2; | |
767 | gteCODE2 = gteCODE; | |
768 | gteR2 = limC1(gteMAC1 >> 4); | |
769 | gteG2 = limC2(gteMAC2 >> 4); | |
770 | gteB2 = limC3(gteMAC3 >> 4); | |
771 | } | |
772 | ||
f74fb727 | 773 | void gteGPL(psxCP2Regs *regs) { |
ef79bbde P |
774 | int shift = 12 * GTE_SF(gteop); |
775 | ||
776 | #ifdef GTE_LOG | |
777 | GTE_LOG("GTE GPL\n"); | |
778 | #endif | |
779 | gteFLAG = 0; | |
780 | ||
781 | gteMAC1 = A1((((s64)gteMAC1 << shift) + (gteIR0 * gteIR1)) >> shift); | |
782 | gteMAC2 = A2((((s64)gteMAC2 << shift) + (gteIR0 * gteIR2)) >> shift); | |
783 | gteMAC3 = A3((((s64)gteMAC3 << shift) + (gteIR0 * gteIR3)) >> shift); | |
784 | gteIR1 = limB1(gteMAC1, 0); | |
785 | gteIR2 = limB2(gteMAC2, 0); | |
786 | gteIR3 = limB3(gteMAC3, 0); | |
787 | ||
788 | gteRGB0 = gteRGB1; | |
789 | gteRGB1 = gteRGB2; | |
790 | gteCODE2 = gteCODE; | |
791 | gteR2 = limC1(gteMAC1 >> 4); | |
792 | gteG2 = limC2(gteMAC2 >> 4); | |
793 | gteB2 = limC3(gteMAC3 >> 4); | |
794 | } | |
795 | ||
f74fb727 | 796 | void gteDPCS(psxCP2Regs *regs) { |
ef79bbde P |
797 | int shift = 12 * GTE_SF(gteop); |
798 | ||
799 | #ifdef GTE_LOG | |
800 | GTE_LOG("GTE DPCS\n"); | |
801 | #endif | |
802 | gteFLAG = 0; | |
803 | ||
6c6c9590 | 804 | gteMAC1 = ((gteR << 16) + (gteIR0 * limB1(A1U(((s64)gteRFC - (gteR << 4)) << (12 - shift)), 0))) >> 12; |
805 | gteMAC2 = ((gteG << 16) + (gteIR0 * limB2(A2U(((s64)gteGFC - (gteG << 4)) << (12 - shift)), 0))) >> 12; | |
806 | gteMAC3 = ((gteB << 16) + (gteIR0 * limB3(A3U(((s64)gteBFC - (gteB << 4)) << (12 - shift)), 0))) >> 12; | |
ef79bbde P |
807 | |
808 | gteIR1 = limB1(gteMAC1, 0); | |
809 | gteIR2 = limB2(gteMAC2, 0); | |
810 | gteIR3 = limB3(gteMAC3, 0); | |
811 | gteRGB0 = gteRGB1; | |
812 | gteRGB1 = gteRGB2; | |
813 | gteCODE2 = gteCODE; | |
814 | gteR2 = limC1(gteMAC1 >> 4); | |
815 | gteG2 = limC2(gteMAC2 >> 4); | |
816 | gteB2 = limC3(gteMAC3 >> 4); | |
817 | } | |
818 | ||
f74fb727 | 819 | void gteDPCT(psxCP2Regs *regs) { |
ef79bbde P |
820 | int v; |
821 | ||
822 | #ifdef GTE_LOG | |
823 | GTE_LOG("GTE DPCT\n"); | |
824 | #endif | |
825 | gteFLAG = 0; | |
826 | ||
827 | for (v = 0; v < 3; v++) { | |
6c6c9590 | 828 | gteMAC1 = ((gteR0 << 16) + (gteIR0 * limB1(A1U((s64)gteRFC - (gteR0 << 4)), 0))) >> 12; |
829 | gteMAC2 = ((gteG0 << 16) + (gteIR0 * limB1(A2U((s64)gteGFC - (gteG0 << 4)), 0))) >> 12; | |
830 | gteMAC3 = ((gteB0 << 16) + (gteIR0 * limB1(A3U((s64)gteBFC - (gteB0 << 4)), 0))) >> 12; | |
ef79bbde P |
831 | |
832 | gteRGB0 = gteRGB1; | |
833 | gteRGB1 = gteRGB2; | |
834 | gteCODE2 = gteCODE; | |
835 | gteR2 = limC1(gteMAC1 >> 4); | |
836 | gteG2 = limC2(gteMAC2 >> 4); | |
837 | gteB2 = limC3(gteMAC3 >> 4); | |
838 | } | |
839 | gteIR1 = limB1(gteMAC1, 0); | |
840 | gteIR2 = limB2(gteMAC2, 0); | |
841 | gteIR3 = limB3(gteMAC3, 0); | |
842 | } | |
843 | ||
f74fb727 | 844 | void gteNCS(psxCP2Regs *regs) { |
ef79bbde P |
845 | #ifdef GTE_LOG |
846 | GTE_LOG("GTE NCS\n"); | |
847 | #endif | |
848 | gteFLAG = 0; | |
849 | ||
b3254af9 | 850 | gteMAC1 = ((s64)(gteL11 * gteVX0) + (gteL12 * gteVY0) + (gteL13 * gteVZ0)) >> 12; |
851 | gteMAC2 = ((s64)(gteL21 * gteVX0) + (gteL22 * gteVY0) + (gteL23 * gteVZ0)) >> 12; | |
852 | gteMAC3 = ((s64)(gteL31 * gteVX0) + (gteL32 * gteVY0) + (gteL33 * gteVZ0)) >> 12; | |
ef79bbde P |
853 | gteIR1 = limB1(gteMAC1, 1); |
854 | gteIR2 = limB2(gteMAC2, 1); | |
855 | gteIR3 = limB3(gteMAC3, 1); | |
856 | gteMAC1 = A1((((s64)gteRBK << 12) + (gteLR1 * gteIR1) + (gteLR2 * gteIR2) + (gteLR3 * gteIR3)) >> 12); | |
857 | gteMAC2 = A2((((s64)gteGBK << 12) + (gteLG1 * gteIR1) + (gteLG2 * gteIR2) + (gteLG3 * gteIR3)) >> 12); | |
858 | gteMAC3 = A3((((s64)gteBBK << 12) + (gteLB1 * gteIR1) + (gteLB2 * gteIR2) + (gteLB3 * gteIR3)) >> 12); | |
859 | gteIR1 = limB1(gteMAC1, 1); | |
860 | gteIR2 = limB2(gteMAC2, 1); | |
861 | gteIR3 = limB3(gteMAC3, 1); | |
862 | ||
863 | gteRGB0 = gteRGB1; | |
864 | gteRGB1 = gteRGB2; | |
865 | gteCODE2 = gteCODE; | |
866 | gteR2 = limC1(gteMAC1 >> 4); | |
867 | gteG2 = limC2(gteMAC2 >> 4); | |
868 | gteB2 = limC3(gteMAC3 >> 4); | |
869 | } | |
870 | ||
f74fb727 | 871 | void gteNCT(psxCP2Regs *regs) { |
ef79bbde P |
872 | int v; |
873 | s32 vx, vy, vz; | |
874 | ||
875 | #ifdef GTE_LOG | |
876 | GTE_LOG("GTE NCT\n"); | |
877 | #endif | |
878 | gteFLAG = 0; | |
879 | ||
880 | for (v = 0; v < 3; v++) { | |
881 | vx = VX(v); | |
882 | vy = VY(v); | |
883 | vz = VZ(v); | |
b3254af9 | 884 | gteMAC1 = ((s64)(gteL11 * vx) + (gteL12 * vy) + (gteL13 * vz)) >> 12; |
885 | gteMAC2 = ((s64)(gteL21 * vx) + (gteL22 * vy) + (gteL23 * vz)) >> 12; | |
886 | gteMAC3 = ((s64)(gteL31 * vx) + (gteL32 * vy) + (gteL33 * vz)) >> 12; | |
ef79bbde P |
887 | gteIR1 = limB1(gteMAC1, 1); |
888 | gteIR2 = limB2(gteMAC2, 1); | |
889 | gteIR3 = limB3(gteMAC3, 1); | |
890 | gteMAC1 = A1((((s64)gteRBK << 12) + (gteLR1 * gteIR1) + (gteLR2 * gteIR2) + (gteLR3 * gteIR3)) >> 12); | |
891 | gteMAC2 = A2((((s64)gteGBK << 12) + (gteLG1 * gteIR1) + (gteLG2 * gteIR2) + (gteLG3 * gteIR3)) >> 12); | |
892 | gteMAC3 = A3((((s64)gteBBK << 12) + (gteLB1 * gteIR1) + (gteLB2 * gteIR2) + (gteLB3 * gteIR3)) >> 12); | |
893 | gteRGB0 = gteRGB1; | |
894 | gteRGB1 = gteRGB2; | |
895 | gteCODE2 = gteCODE; | |
896 | gteR2 = limC1(gteMAC1 >> 4); | |
897 | gteG2 = limC2(gteMAC2 >> 4); | |
898 | gteB2 = limC3(gteMAC3 >> 4); | |
899 | } | |
900 | gteIR1 = limB1(gteMAC1, 1); | |
901 | gteIR2 = limB2(gteMAC2, 1); | |
902 | gteIR3 = limB3(gteMAC3, 1); | |
903 | } | |
904 | ||
f74fb727 | 905 | void gteCC(psxCP2Regs *regs) { |
ef79bbde P |
906 | #ifdef GTE_LOG |
907 | GTE_LOG("GTE CC\n"); | |
908 | #endif | |
909 | gteFLAG = 0; | |
910 | ||
911 | gteMAC1 = A1((((s64)gteRBK << 12) + (gteLR1 * gteIR1) + (gteLR2 * gteIR2) + (gteLR3 * gteIR3)) >> 12); | |
912 | gteMAC2 = A2((((s64)gteGBK << 12) + (gteLG1 * gteIR1) + (gteLG2 * gteIR2) + (gteLG3 * gteIR3)) >> 12); | |
913 | gteMAC3 = A3((((s64)gteBBK << 12) + (gteLB1 * gteIR1) + (gteLB2 * gteIR2) + (gteLB3 * gteIR3)) >> 12); | |
914 | gteIR1 = limB1(gteMAC1, 1); | |
915 | gteIR2 = limB2(gteMAC2, 1); | |
916 | gteIR3 = limB3(gteMAC3, 1); | |
b3254af9 | 917 | gteMAC1 = ((s32)gteR * gteIR1) >> 8; |
918 | gteMAC2 = ((s32)gteG * gteIR2) >> 8; | |
919 | gteMAC3 = ((s32)gteB * gteIR3) >> 8; | |
ef79bbde P |
920 | gteIR1 = limB1(gteMAC1, 1); |
921 | gteIR2 = limB2(gteMAC2, 1); | |
922 | gteIR3 = limB3(gteMAC3, 1); | |
923 | ||
924 | gteRGB0 = gteRGB1; | |
925 | gteRGB1 = gteRGB2; | |
926 | gteCODE2 = gteCODE; | |
927 | gteR2 = limC1(gteMAC1 >> 4); | |
928 | gteG2 = limC2(gteMAC2 >> 4); | |
929 | gteB2 = limC3(gteMAC3 >> 4); | |
930 | } | |
931 | ||
f74fb727 | 932 | void gteINTPL(psxCP2Regs *regs) { |
ef79bbde P |
933 | int shift = 12 * GTE_SF(gteop); |
934 | int lm = GTE_LM(gteop); | |
935 | ||
936 | #ifdef GTE_LOG | |
937 | GTE_LOG("GTE INTPL\n"); | |
938 | #endif | |
939 | gteFLAG = 0; | |
940 | ||
6c6c9590 | 941 | gteMAC1 = ((gteIR1 << 12) + (gteIR0 * limB1(A1U((s64)gteRFC - gteIR1), 0))) >> shift; |
942 | gteMAC2 = ((gteIR2 << 12) + (gteIR0 * limB2(A2U((s64)gteGFC - gteIR2), 0))) >> shift; | |
943 | gteMAC3 = ((gteIR3 << 12) + (gteIR0 * limB3(A3U((s64)gteBFC - gteIR3), 0))) >> shift; | |
ef79bbde P |
944 | gteIR1 = limB1(gteMAC1, lm); |
945 | gteIR2 = limB2(gteMAC2, lm); | |
946 | gteIR3 = limB3(gteMAC3, lm); | |
947 | gteRGB0 = gteRGB1; | |
948 | gteRGB1 = gteRGB2; | |
949 | gteCODE2 = gteCODE; | |
950 | gteR2 = limC1(gteMAC1 >> 4); | |
951 | gteG2 = limC2(gteMAC2 >> 4); | |
952 | gteB2 = limC3(gteMAC3 >> 4); | |
953 | } | |
954 | ||
f74fb727 | 955 | void gteCDP(psxCP2Regs *regs) { |
ef79bbde P |
956 | #ifdef GTE_LOG |
957 | GTE_LOG("GTE CDP\n"); | |
958 | #endif | |
959 | gteFLAG = 0; | |
960 | ||
961 | gteMAC1 = A1((((s64)gteRBK << 12) + (gteLR1 * gteIR1) + (gteLR2 * gteIR2) + (gteLR3 * gteIR3)) >> 12); | |
962 | gteMAC2 = A2((((s64)gteGBK << 12) + (gteLG1 * gteIR1) + (gteLG2 * gteIR2) + (gteLG3 * gteIR3)) >> 12); | |
963 | gteMAC3 = A3((((s64)gteBBK << 12) + (gteLB1 * gteIR1) + (gteLB2 * gteIR2) + (gteLB3 * gteIR3)) >> 12); | |
964 | gteIR1 = limB1(gteMAC1, 1); | |
965 | gteIR2 = limB2(gteMAC2, 1); | |
966 | gteIR3 = limB3(gteMAC3, 1); | |
6c6c9590 | 967 | gteMAC1 = (((gteR << 4) * gteIR1) + (gteIR0 * limB1(A1U((s64)gteRFC - ((gteR * gteIR1) >> 8)), 0))) >> 12; |
968 | gteMAC2 = (((gteG << 4) * gteIR2) + (gteIR0 * limB2(A2U((s64)gteGFC - ((gteG * gteIR2) >> 8)), 0))) >> 12; | |
969 | gteMAC3 = (((gteB << 4) * gteIR3) + (gteIR0 * limB3(A3U((s64)gteBFC - ((gteB * gteIR3) >> 8)), 0))) >> 12; | |
ef79bbde P |
970 | gteIR1 = limB1(gteMAC1, 1); |
971 | gteIR2 = limB2(gteMAC2, 1); | |
972 | gteIR3 = limB3(gteMAC3, 1); | |
973 | ||
974 | gteRGB0 = gteRGB1; | |
975 | gteRGB1 = gteRGB2; | |
976 | gteCODE2 = gteCODE; | |
977 | gteR2 = limC1(gteMAC1 >> 4); | |
978 | gteG2 = limC2(gteMAC2 >> 4); | |
979 | gteB2 = limC3(gteMAC3 >> 4); | |
980 | } | |
6c0eefaf | 981 | |
982 | /* decomposed/parametrized versions for the recompiler */ | |
983 | ||
984 | #ifndef FLAGLESS | |
985 | ||
986 | void gteSQR_part_noshift(psxCP2Regs *regs) { | |
987 | gteFLAG = 0; | |
988 | ||
989 | gteMAC1 = gteIR1 * gteIR1; | |
990 | gteMAC2 = gteIR2 * gteIR2; | |
991 | gteMAC3 = gteIR3 * gteIR3; | |
992 | } | |
993 | ||
994 | void gteSQR_part_shift(psxCP2Regs *regs) { | |
995 | gteFLAG = 0; | |
996 | ||
997 | gteMAC1 = (gteIR1 * gteIR1) >> 12; | |
998 | gteMAC2 = (gteIR2 * gteIR2) >> 12; | |
999 | gteMAC3 = (gteIR3 * gteIR3) >> 12; | |
1000 | } | |
1001 | ||
1002 | void gteOP_part_noshift(psxCP2Regs *regs) { | |
1003 | gteFLAG = 0; | |
1004 | ||
1005 | gteMAC1 = (gteR22 * gteIR3) - (gteR33 * gteIR2); | |
1006 | gteMAC2 = (gteR33 * gteIR1) - (gteR11 * gteIR3); | |
1007 | gteMAC3 = (gteR11 * gteIR2) - (gteR22 * gteIR1); | |
1008 | } | |
1009 | ||
1010 | void gteOP_part_shift(psxCP2Regs *regs) { | |
1011 | gteFLAG = 0; | |
1012 | ||
1013 | gteMAC1 = ((gteR22 * gteIR3) - (gteR33 * gteIR2)) >> 12; | |
1014 | gteMAC2 = ((gteR33 * gteIR1) - (gteR11 * gteIR3)) >> 12; | |
1015 | gteMAC3 = ((gteR11 * gteIR2) - (gteR22 * gteIR1)) >> 12; | |
1016 | } | |
1017 | ||
1018 | void gteDCPL_part(psxCP2Regs *regs) { | |
1019 | s32 RIR1 = ((s32)gteR * gteIR1) >> 8; | |
1020 | s32 GIR2 = ((s32)gteG * gteIR2) >> 8; | |
1021 | s32 BIR3 = ((s32)gteB * gteIR3) >> 8; | |
1022 | ||
1023 | gteFLAG = 0; | |
1024 | ||
1025 | gteMAC1 = RIR1 + ((gteIR0 * limB1(A1U((s64)gteRFC - RIR1), 0)) >> 12); | |
1026 | gteMAC2 = GIR2 + ((gteIR0 * limB1(A2U((s64)gteGFC - GIR2), 0)) >> 12); | |
1027 | gteMAC3 = BIR3 + ((gteIR0 * limB1(A3U((s64)gteBFC - BIR3), 0)) >> 12); | |
1028 | } | |
1029 | ||
1030 | void gteGPF_part_noshift(psxCP2Regs *regs) { | |
1031 | gteFLAG = 0; | |
1032 | ||
1033 | gteMAC1 = gteIR0 * gteIR1; | |
1034 | gteMAC2 = gteIR0 * gteIR2; | |
1035 | gteMAC3 = gteIR0 * gteIR3; | |
1036 | } | |
1037 | ||
1038 | void gteGPF_part_shift(psxCP2Regs *regs) { | |
1039 | gteFLAG = 0; | |
1040 | ||
1041 | gteMAC1 = (gteIR0 * gteIR1) >> 12; | |
1042 | gteMAC2 = (gteIR0 * gteIR2) >> 12; | |
1043 | gteMAC3 = (gteIR0 * gteIR3) >> 12; | |
1044 | } | |
1045 | ||
1046 | #endif // !FLAGLESS | |
1047 | ||
1048 | void gteGPL_part_noshift(psxCP2Regs *regs) { | |
1049 | gteFLAG = 0; | |
1050 | ||
1051 | gteMAC1 = A1((s64)gteMAC1 + (gteIR0 * gteIR1)); | |
1052 | gteMAC2 = A2((s64)gteMAC2 + (gteIR0 * gteIR2)); | |
1053 | gteMAC3 = A3((s64)gteMAC3 + (gteIR0 * gteIR3)); | |
1054 | } | |
1055 | ||
1056 | void gteGPL_part_shift(psxCP2Regs *regs) { | |
1057 | gteFLAG = 0; | |
1058 | ||
1059 | gteMAC1 = A1((s64)gteMAC1 + ((gteIR0 * gteIR1) >> 12)); | |
1060 | gteMAC2 = A2((s64)gteMAC2 + ((gteIR0 * gteIR2) >> 12)); | |
1061 | gteMAC3 = A3((s64)gteMAC3 + ((gteIR0 * gteIR3) >> 12)); | |
1062 | } | |
1063 | ||
1064 | void gteDPCS_part_noshift(psxCP2Regs *regs) { | |
1065 | int shift = 0; | |
1066 | ||
1067 | gteFLAG = 0; | |
1068 | ||
1069 | gteMAC1 = ((gteR << 16) + (gteIR0 * limB1(A1U((s64)gteRFC - (gteR << 4)) << (12 - shift), 0))) >> 12; | |
1070 | gteMAC2 = ((gteG << 16) + (gteIR0 * limB2(A2U((s64)gteGFC - (gteG << 4)) << (12 - shift), 0))) >> 12; | |
1071 | gteMAC3 = ((gteB << 16) + (gteIR0 * limB3(A3U((s64)gteBFC - (gteB << 4)) << (12 - shift), 0))) >> 12; | |
1072 | } | |
1073 | ||
1074 | void gteDPCS_part_shift(psxCP2Regs *regs) { | |
1075 | int shift = 12; | |
1076 | ||
1077 | gteFLAG = 0; | |
1078 | ||
1079 | gteMAC1 = ((gteR << 16) + (gteIR0 * limB1(A1U((s64)gteRFC - (gteR << 4)) << (12 - shift), 0))) >> 12; | |
1080 | gteMAC2 = ((gteG << 16) + (gteIR0 * limB2(A2U((s64)gteGFC - (gteG << 4)) << (12 - shift), 0))) >> 12; | |
1081 | gteMAC3 = ((gteB << 16) + (gteIR0 * limB3(A3U((s64)gteBFC - (gteB << 4)) << (12 - shift), 0))) >> 12; | |
1082 | } | |
1083 | ||
1084 | void gteINTPL_part_noshift(psxCP2Regs *regs) { | |
1085 | gteFLAG = 0; | |
1086 | ||
1087 | gteMAC1 = ((gteIR1 << 12) + (gteIR0 * limB1(A1U((s64)gteRFC - gteIR1), 0))); | |
1088 | gteMAC2 = ((gteIR2 << 12) + (gteIR0 * limB2(A2U((s64)gteGFC - gteIR2), 0))); | |
1089 | gteMAC3 = ((gteIR3 << 12) + (gteIR0 * limB3(A3U((s64)gteBFC - gteIR3), 0))); | |
1090 | } | |
1091 | ||
1092 | void gteINTPL_part_shift(psxCP2Regs *regs) { | |
1093 | gteFLAG = 0; | |
1094 | ||
1095 | gteMAC1 = ((gteIR1 << 12) + (gteIR0 * limB1(A1U((s64)gteRFC - gteIR1), 0))) >> 12; | |
1096 | gteMAC2 = ((gteIR2 << 12) + (gteIR0 * limB2(A2U((s64)gteGFC - gteIR2), 0))) >> 12; | |
1097 | gteMAC3 = ((gteIR3 << 12) + (gteIR0 * limB3(A3U((s64)gteBFC - gteIR3), 0))) >> 12; | |
1098 | } | |
1099 | ||
1100 | void gteMACtoRGB(psxCP2Regs *regs) { | |
1101 | gteRGB0 = gteRGB1; | |
1102 | gteRGB1 = gteRGB2; | |
1103 | gteCODE2 = gteCODE; | |
1104 | gteR2 = limC1(gteMAC1 >> 4); | |
1105 | gteG2 = limC2(gteMAC2 >> 4); | |
1106 | gteB2 = limC3(gteMAC3 >> 4); | |
1107 | } | |
1108 |