idc scripts

[megadrive.git] / idc / mida_s68k.idc

diff --git a/idc/mida_s68k.idc b/idc/mida_s68k.idc
new file mode 100755 (executable)
index 0000000..80a9767
--- /dev/null
+++ b/idc/mida_s68k.idc
@@ -0,0 +1,178 @@
+//\r
+//     IDC File to disassemble Sega Genesis/Megadrive rom\r
+//     by Kaneda\r
+//\r
+//     Useage:\r
+//       launch IDA with "idag -a -p68000 -Smida.idc"\r
+//       Select your .bin file\r
+//       Press OK to the 2 dialog boxes following\r
+//\r
+//     0.1 (12 Nov 2004 ): Initial release\r
+//  0.2 (01 Jun 2005 ): Support for start adress <0x200 (skip header)\r
+//\r
+//     Update on http://www.consoledev.fr.st\r
+//\r
+\r
+#include <idc.idc>\r
+\r
+//-------------------------------------------------------------------------\r
+static CW(off,name,cmt) {\r
+  auto x;\r
+  x = off;\r
+  MakeWord(x);\r
+  MakeName(x,name);\r
+  MakeRptCmt(x,cmt);\r
+}\r
+\r
+//-------------------------------------------------------------------------\r
+static CD(off,name,cmt) {\r
+  auto x;\r
+  x = off;\r
+  MakeDword(x);\r
+  MakeName(x,name);\r
+  MakeRptCmt(x,cmt);\r
+}\r
+\r
+//-------------------------------------------------------------------------\r
+static CB(off,name,cmt) {\r
+  auto x;\r
+  x = off;\r
+  MakeByte(x);\r
+  MakeName(x,name);\r
+  MakeRptCmt(x,cmt);\r
+}\r
+\r
+static CS(off,end,name,cmt) {\r
+  auto x;\r
+  x = off;\r
+  MakeStr(x, end);\r
+  MakeName(x,name);\r
+  MakeRptCmt(x,cmt);\r
+}\r
+\r
+static mdVector(  ) {\r
+auto i, addr;\r
+\r
+CD(0x00, "initStack", "Initial Stack");\r
+CD(0x04, "startAddress", "Start Address");\r
+CD(0x08, "", "Bus Error");\r
+CD(0x0C, "", "Address Error");\r
+CD(0x10, "", "Illegal instruction");\r
+CD(0x14, "", "Zero Divide");\r
+CD(0x18, "", "CHK instruction");\r
+CD(0x1C, "", "TRAPV instruction");\r
+CD(0x20, "", "Privilege Violation");\r
+CD(0x24, "", "Trace");\r
+CD(0x28, "", "Line 1010 Emulator");\r
+CD(0x2C, "", "Line 1111 Emulator");\r
+CD(0x30, "", "Reserved");\r
+CD(0x34, "", "Reserved");\r
+CD(0x38, "", "Reserved");\r
+CD(0x3C, "", "Unitialized Interrrupt");\r
+CD(0x40, "", "Reserved");\r
+CD(0x44, "", "Reserved");\r
+CD(0x48, "", "Reserved");\r
+CD(0x4C, "", "Reserved");\r
+CD(0x50, "", "Reserved");\r
+CD(0x54, "", "Reserved");\r
+CD(0x58, "", "Reserved");\r
+CD(0x5C, "", "Reserved");\r
+CD(0x60, "", "Spurious Interrupt");\r
+CD(0x64, "", "Level 1/gfx interrupt");\r
+CD(0x68, "", "Level 2/md interrupt");\r
+CD(0x6C, "", "Level 3/timer interrupt");\r
+CD(0x70, "", "Level 4/cdd interrupt");\r
+CD(0x74, "", "Level 5/cdc interrupt");\r
+CD(0x78, "", "Level 6/subcode interrupt");\r
+CD(0x7C, "", "Level 7 interrupt");\r
+\r
+i=0x80;\r
+while (i <= 0xBC){\r
+  CD(i,"", "Trap");\r
+  i = i+1;\r
+}\r
+\r
+i=0xC0;\r
+while (i <= 0xFF){\r
+  CD(i,"", "Reserved");\r
+  i = i+1;\r
+  }\r
+\r
+for ( i=0x08; i< 0x200; i=i+4 ) {\r
+  addr = Dword( i );\r
+  MakeCode(addr);\r
+  }\r
+}\r
+\r
+static mdHeader( ) {\r
+auto addr;\r
+\r
+addr =  Dword( 0x04 );\r
+if (addr < 0x200)\r
+{\r
+       Warning("Start address unusual");\r
+    return;\r
+}\r
+CS(0x100,0x110,"","");\r
+ CS(0x110,0x120,"","");\r
+ CS(0x120,0x130,"","");\r
+ CS(0x130,0x140,"","");\r
+ CS(0x140,0x150,"","");\r
+ CS(0x150,0x160,"","");\r
+ CS(0x160,0x170,"","");\r
+ CS(0x170,0x180,"","");\r
+ CS(0x180,0x18D,"","Serial Number");\r
+ CW(0x18E, "CheckSum","");\r
+ CS(0x190,0x1A0,"","");\r
+ CD(0x1A0, "RomStartAdr", "Rom Start Adress");\r
+ CD(0x1A4, "RomEndAdr", "Rom End Adress");\r
+ CD(0x1A8, "RamStartAdr", "Ram Start Adress");\r
+ CD(0x1AC, "RamEndAdr", "Ram End Adress");\r
+ CS(0x1B0, 0x1BC, "", "SRam data");\r
+ CS(0x1BC, 0x1C8, "", "Modem data");\r
+ CS(0x1C8, 0x1DC, "", "Memo");\r
+ CS(0x1DC, 0x1F0, "", "");\r
+ CS(0x1F0, 0x200, "Country", "Countries codes");\r
+ }\r
+ \r
+static mdAddress( ){\r
+ // CD(0xC00000, "VDP_Data","");\r
+}\r
+ \r
+//-------------------------------------------------------------------------\r
+static MakeIrq(addr,name) {\r
+  MakeName(addr,name);\r
+  //MakeCode(addr);\r
+  MakeFunction(addr,BADADDR);\r
+   Wait( );\r
+}\r
+\r
+static main() {\r
+  auto addr;\r
+  \r
+  SetPrcsr( "68000");\r
+\r
+  SegCreate(0x000000,0x07FFFF,0,1,0,2);\r
+  SegRename(0x000000,"prg_ram");\r
+\r
+  SegCreate(0xFE0000,0xFE3FFF,0,1,0,2);\r
+  SegRename(0xFE0000,"bram");\r
+\r
+  SegCreate(0xFF0000,0xFF3FFF,0,1,0,2);\r
+  SegRename(0xFF0000,"pcm");\r
+\r
+  SegCreate(0xFF8000,0xFF81FF,0,1,0,2);\r
+  SegRename(0xFF8000,"regs");\r
+  \r
+  mdVector( );\r
+  mdHeader( );\r
+  mdAddress( );\r
+\r
+  MakeIrq(Dword(0x04), "main");\r
+  MakeIrq(Dword(0x64), "gfx_irq");\r
+  MakeIrq(Dword(0x68), "md_irq");\r
+  MakeIrq(Dword(0x6c), "timer_irq");\r
+  MakeIrq(Dword(0x70), "cdd_irq");\r
+  MakeIrq(Dword(0x74), "cdc_irq");\r
+  MakeIrq(Dword(0x78), "subcode_irq");\r
+}\r