2 Copyright (C) 2002 Rice1964
4 This program is free software; you can redistribute it and/or
5 modify it under the terms of the GNU General Public License
6 as published by the Free Software Foundation; either version 2
7 of the License, or (at your option) any later version.
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program; if not, write to the Free Software
16 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
21 // This file implements the S2DEX ucode, Yoshi story is using this ucodes
23 #include "UcodeDefs.h"
27 uObjTxtr *gObjTxtr = NULL;
28 uObjTxtrTLUT *gObjTlut = NULL;
29 uint32 gObjTlutAddr = 0;
30 uObjMtx *gObjMtx = NULL;
31 uObjSubMtx *gSubObjMtx = NULL;
32 uObjMtxReal gObjMtxReal = {1, 0, 0, 1, 0, 0, 0, 0};
33 Matrix g_MtxReal(1,0,0,0, 0,1,0,0, 0,0,1,0, 0,0,0,1);
35 uint32 g_TxtLoadBy = CMD_LOAD_OBJ_TXTR;
38 // Yoshi's Story uses this - 0x02
39 void RSP_S2DEX_BG_COPY(Gfx *gfx)
41 SP_Timing(DP_Minimal16);
42 DP_Timing(DP_Minimal16);
44 uint32 dwAddr = RSPSegmentAddr((gfx->words.w1));
45 uObjBg *sbgPtr = (uObjBg*)(g_pRDRAMu8+dwAddr);
46 CRender::g_pRender->LoadObjBGCopy(*sbgPtr);
47 CRender::g_pRender->DrawObjBGCopy(*sbgPtr);
50 // Yoshi's Story uses this - 0x03
51 void RSP_S2DEX_OBJ_RECTANGLE(Gfx *gfx)
53 uint32 dwAddr = RSPSegmentAddr((gfx->words.w1));
54 uObjSprite *ptr = (uObjSprite*)(g_pRDRAMu8+dwAddr);
57 memcpy(&objtx.sprite,ptr,sizeof(uObjSprite));
59 if( g_TxtLoadBy == CMD_LOAD_OBJ_TXTR )
61 memcpy(&(objtx.txtr.block),&(gObjTxtr->block),sizeof(uObjTxtr));
62 CRender::g_pRender->LoadObjSprite(objtx,true);
68 CRender::g_pRender->DrawSprite(objtx, false);
69 //printf("*SEB* at RSP_S2DEX_OBJ_RECTANGLE\nptr=%08X, img=%08X, Tmem=%08X", dwAddr,objtx.txtr.block.image, ptr->imageAdrs);
72 if( (pauseAtNext && (eventToPause == NEXT_OBJ_TXT_CMD||eventToPause == NEXT_FLUSH_TRI)) || logTextures )
74 if( debuggerPauseCount > 0 )
76 if( debuggerPauseCount == 0 )
80 TRACE3("Paused at RSP_S2DEX_OBJ_RECTANGLE\nptr=%08X, img=%08X, Tmem=%08X\n",
81 dwAddr,objtx.txtr.block.image, ptr->imageAdrs);
82 CGraphicsContext::g_pGraphicsContext->UpdateFrame();
88 // Yoshi's Story uses this - 0x04
89 void RSP_S2DEX_OBJ_SPRITE(Gfx *gfx)
91 uint32 dwAddr = RSPSegmentAddr((gfx->words.w1));
92 uObjSprite *info = (uObjSprite*)(g_pRDRAMu8+dwAddr);
94 uint32 dwTile = gRSP.curTile;
95 status.bAllowLoadFromTMEM = false; // Because we need to use TLUT loaded by ObjTlut cmd
97 status.bAllowLoadFromTMEM = true;
99 //CRender::g_pRender->SetCombinerAndBlender();
101 uObjTxSprite drawinfo;
102 memcpy( &(drawinfo.sprite), info, sizeof(uObjSprite));
103 //printf("*SEB* at RSP_S2DEX_OBJ_SPRITE size=%ix%i\n",drawinfo.sprite.imageW/32, drawinfo.sprite.imageH/32);
104 CRender::g_pRender->DrawSpriteR(drawinfo, false, dwTile, 0, 0, drawinfo.sprite.imageW/32, drawinfo.sprite.imageH/32);
108 static BOOL bWarned = FALSE;
111 RSP_RDP_NOIMPL("RDP: RSP_S2DEX_OBJ_SPRITE (0x%08x 0x%08x)", (gfx->words.w0), (gfx->words.w1));
117 if( (pauseAtNext && (eventToPause == NEXT_OBJ_TXT_CMD||eventToPause == NEXT_FLUSH_TRI)) || logTextures )
119 eventToPause = false;
120 debuggerPause = true;
121 TRACE0("Paused at RSP_S2DEX_OBJ_SPRITE");
122 CGraphicsContext::g_pGraphicsContext->UpdateFrame();
127 // Yoshi's Story uses this - 0xb0
128 void RSP_S2DEX_SELECT_DL(Gfx *gfx)
130 //static BOOL bWarned = FALSE;
133 RSP_RDP_NOIMPL("RDP: RSP_S2DEX_SELECT_DL (0x%08x 0x%08x)", (gfx->words.w0), (gfx->words.w1));
137 DEBUGGER_PAUSE_AND_DUMP_COUNT_N(NEXT_OBJ_TXT_CMD, {DebuggerAppendMsg("Paused at RSP_S2DEX_SELECT_DL");});
140 void RSP_S2DEX_OBJ_RENDERMODE(Gfx *gfx)
143 static BOOL bWarned = FALSE;
146 RSP_RDP_NOIMPL("RDP: RSP_S2DEX_OBJ_RENDERMODE (0x%08x 0x%08x)", (gfx->words.w0), (gfx->words.w1));
152 // Yoshi's Story uses this - 0xb1
153 void RSP_GBI1_Tri2(Gfx *gfx);
154 void RSP_S2DEX_OBJ_RENDERMODE_2(Gfx *gfx)
156 if( ((gfx->words.w0)&0xFFFFFF) != 0 || ((gfx->words.w1)&0xFFFFFF00) != 0 )
158 // This is a TRI2 cmd
163 RSP_S2DEX_OBJ_RENDERMODE(gfx);
167 void DumpBlockParameters(uObjTxtrBlock &ptr)
170 typedef struct { //Intel format
171 uint32 type; // S2DEX_OBJLT_TXTRBLOCK divided into types.
172 uint64 *image; // The texture source address on DRAM.
174 uint16 tsize; // The Texture size. Specified by the macro GS_TB_TSIZE().
175 uint16 tmem; // The transferred TMEM word address. (8byteWORD)
177 uint16 sid; // STATE ID Multipled by 4. Either one of 0,4,8 and 12.
178 uint16 tline; // The width of the Texture 1-line. Specified by the macro GS_TB_TLINE()
180 uint32 flag; // STATE flag
181 uint32 mask; // STATE mask
182 } uObjTxtrBlock; // 24 bytes
185 DebuggerAppendMsg("uObjTxtrBlock Header in RDRAM: 0x%08X", (uint32) ((char *) &ptr - (char *) g_pRDRAMu8));
186 DebuggerAppendMsg("ImgAddr=0x%08X(0x%08X), tsize=0x%X, \nTMEM=0x%X, sid=%d, tline=%d, flag=0x%X, mask=0x%X\n\n",
187 RSPSegmentAddr(ptr.image), ptr.image, ptr.tsize, ptr.tmem, ptr.sid/4, ptr.tline, ptr.flag, ptr.mask);
190 void DumpSpriteParameters(uObjSprite &ptr)
193 typedef struct { // Intel format
194 uint16 scaleW; // Scaling of the u5.10 width direction.
195 short objX; // The x-coordinate of the upper-left end. s10.2 OBJ
197 uint16 paddingX; // Unused. Always 0.
198 uint16 imageW; // The width of the u10.5 texture. (The length of the S-direction.)
200 uint16 scaleH; // Scaling of the u5.10 height direction.
201 short objY; // The y-coordinate of the s10.2 OBJ upper-left end.
203 uint16 paddingY; // Unused. Always 0.
204 uint16 imageH; // The height of the u10.5 texture. (The length of the T-direction.)
206 uint16 imageAdrs; // The texture header position in TMEM. (In units of 64bit word.)
207 uint16 imageStride; // The folding width of the texel. (In units of 64bit word.)
209 uint8 imageFlags; // The display flag. S2DEX_OBJ_FLAG_FLIP*
210 uint8 imagePal; //The pallet number. 0-7
211 uint8 imageSiz; // The size of the texel. TXT_SIZE_*
212 uint8 imageFmt; // The format of the texel. TXT_FMT_*
213 } uObjSprite; // 24 bytes
216 if( logTextures || (pauseAtNext && eventToPause == NEXT_OBJ_TXT_CMD) )
218 DebuggerAppendMsg("uObjSprite Header in RDRAM: 0x%08X", (uint32) ((char *) &ptr - (char *) g_pRDRAMu8));
219 DebuggerAppendMsg("X=%d, Y=%d, W=%d, H=%d, scaleW=%f, scaleH=%f\n"
220 "TAddr=0x%X, Stride=%d, Flag=0x%X, Pal=%d, Fmt=%s-%db\n\n",
221 ptr.objX/4, ptr.objY/4, ptr.imageW/32, ptr.imageH/32, ptr.scaleW/1024.0f, ptr.scaleH/1024.0f,
222 ptr.imageAdrs, ptr.imageStride, ptr.imageFlags, ptr.imagePal, pszImgFormat[ptr.imageFmt], pnImgSize[ptr.imageSiz]);
226 void DumpTileParameters(uObjTxtrTile &tile)
230 void DumpTlutParameters(uObjTxtrTLUT &tlut)
233 typedef struct { // Intel Format
234 uint32 type; // S2DEX_OBJLT_TLUT divided into types.
237 uint16 pnum; // The loading pallet number -1.
238 uint16 phead; // The pallet number of the load header. Between 256 and 511.
240 uint16 sid; // STATE ID Multiplied by 4. Either one of 0,4,8 and 12.
241 uint16 zero; // Assign 0 all the time.
243 uint32 flag; // STATE flag
244 uint32 mask; // STATE mask
245 } uObjTxtrTLUT; // 24 bytes
247 DebuggerAppendMsg("ImgAddr=0x%08X(0x%08X), pnum=%d, phead=%d, sid=%d, flag=0x%X, mask=0x%X\n\n",
248 RSPSegmentAddr(tlut.image), tlut.image, tlut.pnum+1, tlut.phead, tlut.sid/4, tlut.flag, tlut.mask);
252 void DumpTxtrInfo(uObjTxtr *ptr)
254 if( logTextures || (pauseAtNext && eventToPause == NEXT_OBJ_TXT_CMD) )
256 DebuggerAppendMsg("uObjTxtr Header in RDRAM: 0x%08X", (uint32) ((char *) ptr - (char *) g_pRDRAMu8));
257 switch( ptr->block.type )
259 case S2DEX_OBJLT_TXTRBLOCK:
260 TRACE0("Loading ObjTxtr: type=BLOCK");
261 DumpBlockParameters(ptr->block);
263 case S2DEX_OBJLT_TXTRTILE:
264 TRACE0("Loading ObjTxtr: type=TILE");
265 DumpTileParameters(ptr->tile);
267 case S2DEX_OBJLT_TLUT:
268 TRACE0("Loading ObjTxtr: type=TLUT");
269 DumpTlutParameters(ptr->tlut);
275 void DumpObjMtx(bool fullmtx = true)
277 if( logTextures || (pauseAtNext && eventToPause == NEXT_OBJ_TXT_CMD) )
280 DebuggerAppendMsg("A=%X, B=%X, C=%X, D=%X, X=%X, Y=%X, BaseX=%X, BaseY=%X",
281 gObjMtx->A, gObjMtx->B, gObjMtx->C, gObjMtx->D, gObjMtx->X, gObjMtx->Y, gObjMtx->BaseScaleX, gObjMtx->BaseScaleY);
283 DebuggerAppendMsg("SubMatrix: X=%X, Y=%X, BaseX=%X, BaseY=%X", gSubObjMtx->X, gSubObjMtx->Y, gSubObjMtx->BaseScaleX, gSubObjMtx->BaseScaleY);
285 DebuggerAppendMsg("A=%f, B=%f, C=%f, D=%f, X=%f, Y=%f, BaseX=%f, BaseY=%f",
286 gObjMtxReal.A, gObjMtxReal.B, gObjMtxReal.C, gObjMtxReal.D, gObjMtxReal.X, gObjMtxReal.Y, gObjMtxReal.BaseScaleX, gObjMtxReal.BaseScaleY);
292 void ObjMtxTranslate(float &x, float &y)
294 float x1 = gObjMtxReal.A*x + gObjMtxReal.B*y + gObjMtxReal.X;
295 float y1 = gObjMtxReal.C*x + gObjMtxReal.D*y + gObjMtxReal.Y;
301 void RSP_S2DEX_SPObjLoadTxtr(Gfx *gfx)
303 gObjTxtr = (uObjTxtr*)(g_pRDRAMu8+(RSPSegmentAddr((gfx->words.w1))&(g_dwRamSize-1)));
304 if( gObjTxtr->block.type == S2DEX_OBJLT_TLUT )
306 gObjTlut = (uObjTxtrTLUT*)gObjTxtr;
307 gObjTlutAddr = (uint32)(RSPSegmentAddr(gObjTlut->image));
310 int size = gObjTlut->pnum+1;
311 int offset = gObjTlut->phead-0x100;
313 if( offset+size>0x100)
315 size = 0x100 - offset;
318 uint32 addr = (gObjTlutAddr);//&0xFFFFFFFC);
319 //if( addr & 3 ) addr = (addr&0xFFFFFFF0)+8;;
320 //uint16 *srcPal = (uint16*)(g_pRDRAMu8 + (addr& (g_dwRamSize-1)) );
322 for( int i=offset; i<offset+size; i++ )
324 g_wRDPTlut[i^1] = RDRAM_UHALF(addr);
326 //g_wRDPTlut[i] = (*(uint16 *)(addr+g_pRDRAMu8));
327 //g_wRDPTlut[i] = *(srcPal++);
333 g_TxtLoadBy = CMD_LOAD_OBJ_TXTR;
336 DEBUGGER_PAUSE_AT_COND_AND_DUMP_COUNT_N((eventToPause == NEXT_OBJ_TXT_CMD||eventToPause == NEXT_FLUSH_TRI),
338 DumpTxtrInfo(gObjTxtr);
339 TRACE0("Paused at RSP_S2DEX_SPObjLoadTxtr");
344 // Yoshi's Story uses this - 0xc2
345 void RSP_S2DEX_SPObjLoadTxSprite(Gfx *gfx)
347 uObjTxSprite* ptr = (uObjTxSprite*)(g_pRDRAMu8+(RSPSegmentAddr((gfx->words.w1))&(g_dwRamSize-1)));
348 gObjTxtr = (uObjTxtr*)ptr;
350 //Now draw the sprite
351 //printf("*SEB* at RSP_S2DEX_SPObjLoadTxSprite\n"); // used on intro, gives just white rectangles
352 CRender::g_pRender->LoadObjSprite(*ptr);
353 CRender::g_pRender->DrawSpriteR(*ptr);
355 DEBUGGER_PAUSE_AT_COND_AND_DUMP_COUNT_N((eventToPause == NEXT_OBJ_TXT_CMD||eventToPause == NEXT_FLUSH_TRI),
357 DumpTxtrInfo(gObjTxtr);
358 DumpSpriteParameters(ptr->sprite);
359 TRACE0("Paused at RSP_S2DEX_SPObjLoadTxSprite");
365 // Yoshi's Story uses this - 0xc3
366 void RSP_S2DEX_SPObjLoadTxRect(Gfx *gfx)
371 uObjTxSprite* ptr = (uObjTxSprite*)(g_pRDRAMu8+(RSPSegmentAddr((gfx->words.w1))&(g_dwRamSize-1)));
372 gObjTxtr = (uObjTxtr*)ptr;
374 //Now draw the sprite
375 CRender::g_pRender->LoadObjSprite(*ptr);
376 CRender::g_pRender->DrawSprite(*ptr, false);
378 DEBUGGER_PAUSE_AT_COND_AND_DUMP_COUNT_N((eventToPause == NEXT_OBJ_TXT_CMD||eventToPause == NEXT_FLUSH_TRI),
380 DumpTxtrInfo(gObjTxtr);
381 DumpSpriteParameters(ptr->sprite);
382 TRACE0("Paused at RSP_S2DEX_SPObjLoadTxRect");
387 // Yoshi's Story uses this - 0xc4
388 void RSP_S2DEX_SPObjLoadTxRectR(Gfx *gfx)
390 uObjTxSprite* ptr = (uObjTxSprite*)(g_pRDRAMu8+(RSPSegmentAddr((gfx->words.w1))&(g_dwRamSize-1)));
391 gObjTxtr = (uObjTxtr*)ptr;
393 //Now draw the sprite
394 CRender::g_pRender->LoadObjSprite(*ptr);
395 CRender::g_pRender->DrawSprite(*ptr, true);
397 DEBUGGER_PAUSE_AT_COND_AND_DUMP_COUNT_N((eventToPause == NEXT_OBJ_TXT_CMD||eventToPause == NEXT_FLUSH_TRI),
399 DumpTxtrInfo(gObjTxtr);
400 DumpSpriteParameters(ptr->sprite);
401 TRACE0("Paused at RSP_S2DEX_SPObjLoadTxRect");
406 void DLParser_TexRect(Gfx *gfx);
407 // Yoshi's Story uses this - 0xe4
408 void RSP_S2DEX_RDPHALF_0(Gfx *gfx)
410 //RDP: RSP_S2DEX_RDPHALF_0 (0xe449c0a8 0x003b40a4)
411 //0x001d3c88: e449c0a8 003b40a4 RDP_TEXRECT
412 //0x001d3c90: b4000000 00000000 RSP_RDPHALF_1
413 //0x001d3c98: b3000000 04000400 RSP_RDPHALF_2
415 uint32 dwPC = gDlistStack[gDlistStackPointer].pc; // This points to the next instruction
416 uint32 dwNextUcode = *(uint32 *)(g_pRDRAMu8 + dwPC);
418 if( (dwNextUcode>>24) != S2DEX_SELECT_DL )
420 // Pokemom Puzzle League
421 if( (dwNextUcode>>24) == 0xB4 )
423 DLParser_TexRect(gfx);
427 RSP_RDP_NOIMPL("RDP: RSP_S2DEX_RDPHALF_0 (0x%08x 0x%08x)", (gfx->words.w0), (gfx->words.w1));
432 RSP_RDP_NOIMPL("RDP: RSP_S2DEX_RDPHALF_0 (0x%08x 0x%08x)", (gfx->words.w0), (gfx->words.w1));
433 DEBUGGER_PAUSE_COUNT_N(NEXT_OBJ_TXT_CMD);
437 // Yoshi's Story uses this - 0x05
438 void RSP_S2DEX_OBJ_MOVEMEM(Gfx *gfx)
440 uint32 dwCommand = ((gfx->words.w0)>>16)&0xFF;
441 uint32 dwLength = ((gfx->words.w0)) &0xFFFF;
442 uint32 dwAddr = RSPSegmentAddr((gfx->words.w1));
444 if( dwAddr >= g_dwRamSize )
446 TRACE0("ObjMtx: memory ptr is invalid");
449 if( dwLength == 0 && dwCommand == 23 )
451 gObjMtx = (uObjMtx *)(dwAddr+g_pRDRAMu8);
452 gObjMtxReal.A = gObjMtx->A/65536.0f;
453 gObjMtxReal.B = gObjMtx->B/65536.0f;
454 gObjMtxReal.C = gObjMtx->C/65536.0f;
455 gObjMtxReal.D = gObjMtx->D/65536.0f;
456 gObjMtxReal.X = float(gObjMtx->X>>2);
457 gObjMtxReal.Y = float(gObjMtx->Y>>2);
458 gObjMtxReal.BaseScaleX = gObjMtx->BaseScaleX/1024.0f;
459 gObjMtxReal.BaseScaleY = gObjMtx->BaseScaleY/1024.0f;
465 else if( dwLength == 2 && dwCommand == 7 )
467 gSubObjMtx = (uObjSubMtx*)(dwAddr+g_pRDRAMu8);
468 gObjMtxReal.X = float(gSubObjMtx->X>>2);
469 gObjMtxReal.Y = float(gSubObjMtx->Y>>2);
470 gObjMtxReal.BaseScaleX = gSubObjMtx->BaseScaleX/1024.0f;
471 gObjMtxReal.BaseScaleY = gSubObjMtx->BaseScaleY/1024.0f;
478 g_MtxReal._11 = gObjMtxReal.A;
479 g_MtxReal._12 = gObjMtxReal.C;
481 g_MtxReal._14 = 0;//gObjMtxReal.X;
483 g_MtxReal._21 = gObjMtxReal.B;
484 g_MtxReal._22 = gObjMtxReal.D;
486 g_MtxReal._24 = 0;//gObjMtxReal.Y;
493 g_MtxReal._41 = gObjMtxReal.X;
494 g_MtxReal._42 = gObjMtxReal.Y;
498 DEBUGGER_PAUSE_COUNT_N(NEXT_OBJ_TXT_CMD);
501 // Yoshi's Story uses this - 0x01
502 extern void RSP_GBI0_Mtx(Gfx *gfx);
504 void RSP_S2DEX_BG_1CYC(Gfx *gfx)
506 SP_Timing(DP_Minimal16);
507 DP_Timing(DP_Minimal16);
509 uint32 dwAddr = RSPSegmentAddr((gfx->words.w1));
510 uObjScaleBg *sbgPtr = (uObjScaleBg *)(dwAddr+g_pRDRAMu8);
511 CRender::g_pRender->LoadObjBG1CYC(*sbgPtr);
512 CRender::g_pRender->DrawObjBG1CYC(*sbgPtr);
514 DEBUGGER_PAUSE_AT_COND_AND_DUMP_COUNT_N((eventToPause == NEXT_OBJ_TXT_CMD||eventToPause == NEXT_FLUSH_TRI||eventToPause == NEXT_OBJ_BG),
516 DebuggerAppendMsg("S2DEX BG 1CYC: %08X-%08X\n", (gfx->words.w0), (gfx->words.w1) );
517 TRACE0("Paused at RSP_S2DEX_BG_1CYC");
522 void RSP_S2DEX_BG_1CYC_2(Gfx *gfx)
524 if( ((gfx->words.w0)&0x00FFFFFF) != 0 )
530 RSP_S2DEX_BG_1CYC(gfx);
534 // Yoshi's Story uses this - 0xb2
535 void RSP_S2DEX_OBJ_RECTANGLE_R(Gfx *gfx)
537 uint32 dwAddr = RSPSegmentAddr((gfx->words.w1));
538 uObjSprite *ptr = (uObjSprite*)(g_pRDRAMu8+dwAddr);
541 memcpy(&objtx.sprite,ptr,sizeof(uObjSprite));
544 //uObjTxSprite* ptr = (uObjTxSprite*)(g_pRDRAMu8+(RSPSegmentAddr((gfx->words.w1))&(g_dwRamSize-1)));
545 //gObjTxtr = (uObjTxtr*)ptr;
547 //Now draw the sprite
548 if( g_TxtLoadBy == CMD_LOAD_OBJ_TXTR )
550 memcpy(&(objtx.txtr.block),&(gObjTxtr->block),sizeof(uObjTxtr));
551 //CRender::g_pRender->LoadObjSprite(*ptr,true);
552 CRender::g_pRender->LoadObjSprite(objtx,true);
558 //CRender::g_pRender->DrawSprite(*ptr, true);
559 CRender::g_pRender->DrawSprite(objtx, true);
561 DEBUGGER_PAUSE_AT_COND_AND_DUMP_COUNT_N((eventToPause == NEXT_OBJ_TXT_CMD||eventToPause == NEXT_FLUSH_TRI),
563 DumpTxtrInfo(gObjTxtr);
564 DumpSpriteParameters(*ptr);
565 TRACE0("Paused at RSP_S2DEX_OBJ_RECTANGLE_R");