![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to das.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Research Unix] / researchv10no / cmd / adb / seq|
Return to das.c CVS log | Up to [Research Unix] / researchv10no / cmd / adb / seq |
1.1 ! root 1: /* ! 2: * print an instruction ! 3: */ ! 4: ! 5: #include "defs.h" ! 6: ! 7: typedef unsigned char uchar; ! 8: typedef unsigned short ushort; ! 9: typedef unsigned long ulong; ! 10: static ADDR p; ! 11: static int isp; ! 12: long ddisp(); ! 13: ! 14: #define IHEX 0 /* give up */ ! 15: #define IDISP 1 /* 1 displacement op */ ! 16: #define IFF 2 /* float, float */ ! 17: #define IIF 3 /* int, float */ ! 18: #define IFI 4 /* float, int */ ! 19: #define III 5 /* int, int */ ! 20: #define III3 6 /* int, int; 3 byte instr */ ! 21: #define II 7 /* int */ ! 22: #define IMD 8 /* enter: reg mask, disp */ ! 23: #define IN 9 /* exit, restore: rev reg mask */ ! 24: #define IQI 10 /* quick, int */ ! 25: #define IIID3 11 /* int, int, disp; 3 byte instr */ ! 26: #define INONE 12 /* no operands */ ! 27: #define IDPC 13 /* pc-relative displacement */ ! 28: #define II3 14 /* int; 3 byte */ ! 29: #define IRII 15 /* reg, int, int */ ! 30: #define IRIID 16 /* reg, int, int, disp */ ! 31: #define IM 17 /* reg mask (save) */ ! 32: #define IDMOD 18 /* disp which is really a module number */ ! 33: #define INONE3 19 /* 3-byte no-operand (string stuff) */ ! 34: #define II3X 20 /* 3 byte 1 operand sort of (sfsr) */ ! 35: #define IMR 21 /* mem mgt instructions */ ! 36: #define IPR 22 /* preg instructions */ ! 37: #define ICFG 23 /* setcfg */ ! 38: ! 39: static ! 40: struct ! 41: { ! 42: uchar f; ! 43: ushort m; ! 44: ushort v; ! 45: char *s; ! 46: } t[] = { ! 47: /* begin */ ! 48: III3, 0x3fff, 0x304e, "absb", ! 49: III3, 0x3fff, 0x334e, "absd", ! 50: IFF, 0x3fff, 0x35be, "absf", ! 51: IFF, 0x3fff, 0x34be, "absl", ! 52: III3, 0x3fff, 0x314e, "absw", ! 53: IQI, 0x3f, 0x4c, "acbb", ! 54: IQI, 0x3f, 0x4d, "acbw", ! 55: IQI, 0x3f, 0x4f, "acbd", ! 56: III, 0x3f, 0x00, "addb", ! 57: III, 0x3f, 0x01, "addw", ! 58: III, 0x3f, 0x03, "addd", ! 59: III, 0x3f, 0x10, "addcb", ! 60: III, 0x3f, 0x13, "addcd", ! 61: III, 0x3f, 0x11, "addcw", ! 62: IFF, 0x3fff, 0x01be, "addf", ! 63: IFF, 0x3fff, 0x00be, "addl", ! 64: III3, 0x3fff, 0x3c4e, "addpb", ! 65: III3, 0x3fff, 0x3f4e, "addpd", ! 66: III3, 0x3fff, 0x3d4e, "addpw", ! 67: IQI, 0x3f, 0x0c, "addqb", ! 68: IQI, 0x3f, 0x0d, "addqw", ! 69: IQI, 0x3f, 0x0f, "addqd", ! 70: III, 0x3f, 0x24, "addrb", ! 71: III, 0x3f, 0x27, "addrd", ! 72: III, 0x3f, 0x25, "addrw", ! 73: II, 0x7ff, 0x57c, "adjspb", ! 74: II, 0x7ff, 0x57f, "adjspd", ! 75: II, 0x7ff, 0x57d, "adjspw", ! 76: III, 0x3f, 0x28, "andb", ! 77: III, 0x3f, 0x2b, "andd", ! 78: III, 0x3f, 0x29, "andw", ! 79: III3, 0x3fff, 0x044e, "ashb", ! 80: III3, 0x3fff, 0x074e, "ashd", ! 81: III3, 0x3fff, 0x054e, "ashw", ! 82: IDPC, 0xff, 0x3a, "bcc", ! 83: IDPC, 0xff, 0x2a, "bcs", ! 84: IDPC, 0xff, 0x0a, "beq", ! 85: IDPC, 0xff, 0x1a, "bne", ! 86: IDPC, 0xff, 0x9a, "bfc", ! 87: IDPC, 0xff, 0x8a, "bfs", ! 88: IDPC, 0xff, 0xda, "bge", ! 89: IDPC, 0xff, 0x6a, "bgt", ! 90: IDPC, 0xff, 0x4a, "bhi", ! 91: IDPC, 0xff, 0xba, "bhs", ! 92: IDPC, 0xff, 0x5a, "bls", ! 93: IDPC, 0xff, 0x7a, "ble", ! 94: IDPC, 0xff, 0xaa, "blo", ! 95: IDPC, 0xff, 0xca, "blt", ! 96: III, 0x3f, 0x08, "bicb", ! 97: III, 0x3f, 0x09, "bicw", ! 98: III, 0x3f, 0x0b, "bicd", ! 99: II, 0x3ff, 0x17c, "bicpsrb", ! 100: II, 0x3ff, 0x17d, "bicpsrw", ! 101: II, 0x3ff, 0x37c, "bispsrb", ! 102: II, 0x3ff, 0x37d, "bispsrw", ! 103: INONE, 0xff, 0xf2, "bpt", ! 104: IDPC, 0xff, 0xea, "br", ! 105: IDPC, 0xff, 0x02, "bsr", ! 106: II, 0x7ff, 0x77c, "caseb", ! 107: II, 0x7ff, 0x77d, "casew", ! 108: II, 0x7ff, 0x77f, "cased", ! 109: III3, 0x3fff, 0x084e, "cbitb", ! 110: III3, 0x3fff, 0x0b4e, "cbitd", ! 111: III3, 0x3fff, 0x0c4e, "cbitib", ! 112: III3, 0x3fff, 0x0f4e, "cbitid", ! 113: III3, 0x3fff, 0x0d4e, "cbitiw", ! 114: III3, 0x3fff, 0x094e, "cbitw", ! 115: IRII, 0x7ff, 0x0ee, "checkb", ! 116: IRII, 0x7ff, 0x1ee, "checkw", ! 117: IRII, 0x7ff, 0x3ee, "checkd", ! 118: III, 0x3f, 0x04, "cmpb", ! 119: III, 0x3f, 0x05, "cmpw", ! 120: III, 0x3f, 0x07, "cmpd", ! 121: IFF, 0x3fff, 0x09be, "cmpf", ! 122: IFF, 0x3fff, 0x08be, "cmpl", ! 123: IIID3, 0x3fff, 0x04ce, "cmpmb", ! 124: IIID3, 0x3fff, 0x05ce, "cmpmw", ! 125: IIID3, 0x3fff, 0x07ce, "cmpmd", ! 126: IQI, 0x7f, 0x1c, "cmpqb", ! 127: IQI, 0x7f, 0x1d, "cmpqw", ! 128: IQI, 0x7f, 0x1f, "cmpqd", ! 129: INONE3, 0xffffff, 0x00040e, "cmpsb", ! 130: INONE3, 0xffffff, 0x00050e, "cmpsw", ! 131: INONE3, 0xffffff, 0x00070e, "cmpsd", ! 132: INONE3, 0xffffff, 0x00840e, "cmpst", ! 133: INONE3, 0xffffff, 0x01040e, "cmpsbb", ! 134: INONE3, 0xffffff, 0x01050e, "cmpswb", ! 135: INONE3, 0xffffff, 0x01070e, "cmpsdb", ! 136: INONE3, 0xffffff, 0x01840e, "cmpstb", ! 137: INONE3, 0xffffff, 0x02040e, "cmpsbw", ! 138: INONE3, 0xffffff, 0x02050e, "cmpsww", ! 139: INONE3, 0xffffff, 0x02070e, "cmpsdw", ! 140: INONE3, 0xffffff, 0x02840e, "cmpstw", ! 141: INONE3, 0xffffff, 0x03040e, "cmpsbbw", ! 142: INONE3, 0xffffff, 0x03050e, "cmpswbw", ! 143: INONE3, 0xffffff, 0x03070e, "cmpsdbw", ! 144: INONE3, 0xffffff, 0x03840e, "cmpstbw", ! 145: INONE3, 0xffffff, 0x06040e, "cmpsbu", ! 146: INONE3, 0xffffff, 0x06050e, "cmpswu", ! 147: INONE3, 0xffffff, 0x06070e, "cmpsdu", ! 148: INONE3, 0xffffff, 0x06840e, "cmpstu", ! 149: INONE3, 0xffffff, 0x07040e, "cmpsbbu", ! 150: INONE3, 0xffffff, 0x07050e, "cmpswbu", ! 151: INONE3, 0xffffff, 0x07070e, "cmpsdbu", ! 152: INONE3, 0xffffff, 0x07840e, "cmpstbu", ! 153: III3, 0x3fff, 0x344e, "comb", ! 154: III3, 0x3fff, 0x374e, "comd", ! 155: III3, 0x3fff, 0x354e, "comw", ! 156: IRII, 0x7ff, 0x36e, "cvtp", ! 157: IDMOD, 0xff, 0x22, "cxp", ! 158: II, 0x3ff, 0x07f, "cxpd", ! 159: III3, 0x3fff, 0x2cce, "deib", ! 160: III3, 0x3fff, 0x2dce, "deiw", ! 161: III3, 0x3fff, 0x2dce, "deid", ! 162: INONE, 0xff, 0xc2, "dia", ! 163: III3, 0x3fff, 0x3cce, "divb", ! 164: III3, 0x3fff, 0x3fce, "divd", ! 165: IFF, 0x3fff, 0x21be, "divf", ! 166: IFF, 0x3fff, 0x20be, "divl", ! 167: III3, 0x3fff, 0x3dce, "divw", ! 168: IMD, 0xff, 0x82, "enter", ! 169: IN, 0xff, 0x92, "exit", ! 170: IRIID, 0x7ff, 0x02e, "extb", ! 171: IRIID, 0x7ff, 0x12e, "extw", ! 172: IRIID, 0x7ff, 0x32e, "extd", ! 173: III3, 0x3fff, 0x0cce, "extsb", ! 174: III3, 0x3fff, 0x0dce, "extsw", ! 175: III3, 0x3fff, 0x0fce, "extsd", ! 176: III3, 0x3fff, 0x046e, "ffsb", ! 177: III3, 0x3fff, 0x056e, "ffsw", ! 178: III3, 0x3fff, 0x076e, "ffsd", ! 179: INONE, 0xff, 0xd2, "flag", ! 180: IFI, 0x3fff, 0x3c3e, "floorfb", ! 181: IFI, 0x3fff, 0x3f3e, "floorfd", ! 182: IFI, 0x3fff, 0x3d3e, "floorfw", ! 183: IFI, 0x3fff, 0x383e, "floorlb", ! 184: IFI, 0x3fff, 0x3b3e, "floorld", ! 185: IFI, 0x3fff, 0x393e, "floorlw", ! 186: III3, 0x3fff, 0x384e, "ibitb", ! 187: III3, 0x3fff, 0x3b4e, "ibitd", ! 188: III3, 0x3fff, 0x394e, "ibitw", ! 189: IRII, 0x7ff, 0x42e, "indexb", ! 190: IRII, 0x7ff, 0x52e, "indexw", ! 191: IRII, 0x7ff, 0x72e, "indexd", ! 192: IRIID, 0x7ff, 0x0ae, "insb", ! 193: IRIID, 0x7ff, 0x1ae, "insw", ! 194: IRIID, 0x7ff, 0x3ae, "insd", ! 195: III3, 0x3fff, 0x08ce, "inssb", ! 196: III3, 0x3fff, 0x09ce, "inssw", ! 197: III3, 0x3fff, 0x0bce, "inssd", ! 198: II, 0x7ff, 0x67f, "jsr", ! 199: II, 0x3ff, 0x27f, "jump", ! 200: II3, 0x7ffff, 0x00f3e, "lfsr", ! 201: IMR, 0x7fff, 0x0b1e, "lmr", ! 202: IPR, 0x7f, 0x6c, "lprb", ! 203: IPR, 0x7f, 0x6d, "lprw", ! 204: IPR, 0x7f, 0x6f, "lprd", ! 205: III3, 0x3fff, 0x144e, "lshb", ! 206: III3, 0x3fff, 0x174e, "lshd", ! 207: III3, 0x3fff, 0x154e, "lshw", ! 208: III3, 0x3ff, 0x24ce, "meib", ! 209: III3, 0x3ff, 0x25ce, "meiw", ! 210: III3, 0x3ff, 0x27ce, "meid", ! 211: III3, 0x3fff, 0x38ce, "modb", ! 212: III3, 0x3fff, 0x3bce, "modd", ! 213: III3, 0x3fff, 0x39ce, "modw", ! 214: III, 0x3f, 0x14, "movb", ! 215: IIF, 0x3fff, 0x043e, "movbf", ! 216: IIF, 0x3fff, 0x003e, "movbl", ! 217: III, 0x3f, 0x17, "movd", ! 218: IIF, 0x3fff, 0x073e, "movdf", ! 219: IIF, 0x3fff, 0x033e, "movdl", ! 220: IFF, 0x3fff, 0x05be, "movf", ! 221: IIF, 0x3fff, 0x1b3e, "movfl", ! 222: IFF, 0x3fff, 0x04be, "movl", ! 223: IIF, 0x3fff, 0x163e, "movlf", ! 224: III, 0x3f, 0x15, "movw", ! 225: IIF, 0x3fff, 0x053e, "movwf", ! 226: IIF, 0x3fff, 0x013e, "movwl", ! 227: III3, 0x3fff, 0x1cce, "movxbd", ! 228: III3, 0x3fff, 0x10ce, "movxbw", ! 229: III3, 0x3fff, 0x1dce, "movxwd", ! 230: III3, 0x3fff, 0x18ce, "movzbd", ! 231: III3, 0x3fff, 0x14ce, "movzbw", ! 232: III3, 0x3fff, 0x19ce, "movzwd", ! 233: III3, 0x3fff, 0x00ce, "movmb", ! 234: III3, 0x3fff, 0x01ce, "movmw", ! 235: III3, 0x3fff, 0x03ce, "movmd", ! 236: IQI, 0x7f, 0x5c, "movqb", ! 237: IQI, 0x7f, 0x5d, "movqw", ! 238: IQI, 0x7f, 0x5f, "movqd", ! 239: INONE3, 0xffffff, 0x00000e, "movsb", ! 240: INONE3, 0xffffff, 0x00010e, "movsw", ! 241: INONE3, 0xffffff, 0x00030e, "movsd", ! 242: INONE3, 0xffffff, 0x00800e, "movst", ! 243: INONE3, 0xffffff, 0x01000e, "movsbb", ! 244: INONE3, 0xffffff, 0x01010e, "movswb", ! 245: INONE3, 0xffffff, 0x01030e, "movsdb", ! 246: INONE3, 0xffffff, 0x01800e, "movstb", ! 247: INONE3, 0xffffff, 0x02000e, "movsbw", ! 248: INONE3, 0xffffff, 0x02010e, "movsww", ! 249: INONE3, 0xffffff, 0x02030e, "movsdw", ! 250: INONE3, 0xffffff, 0x02800e, "movstw", ! 251: INONE3, 0xffffff, 0x03000e, "movsbbw", ! 252: INONE3, 0xffffff, 0x03010e, "movswbw", ! 253: INONE3, 0xffffff, 0x03030e, "movsdbw", ! 254: INONE3, 0xffffff, 0x03800e, "movstbw", ! 255: INONE3, 0xffffff, 0x06000e, "movsbu", ! 256: INONE3, 0xffffff, 0x06010e, "movswu", ! 257: INONE3, 0xffffff, 0x06030e, "movsdu", ! 258: INONE3, 0xffffff, 0x06800e, "movstu", ! 259: INONE3, 0xffffff, 0x07000e, "movsbbu", ! 260: INONE3, 0xffffff, 0x07010e, "movswbu", ! 261: INONE3, 0xffffff, 0x07030e, "movsdbu", ! 262: INONE3, 0xffffff, 0x07800e, "movstbu", ! 263: III3, 0x3fff, 0x0cae, "movsub", ! 264: III3, 0x3fff, 0x0dae, "movsuw", ! 265: III3, 0x3fff, 0x0fae, "movsud", ! 266: III3, 0x3fff, 0x1cae, "movusb", ! 267: III3, 0x3fff, 0x1dae, "movusw", ! 268: III3, 0x3fff, 0x1fae, "movusd", ! 269: III3, 0x3fff, 0x20ce, "mulb", ! 270: III3, 0x3fff, 0x23ce, "muld", ! 271: IFF, 0x3fff, 0x31be, "mulf", ! 272: IFF, 0x3fff, 0x30be, "mull", ! 273: III3, 0x3fff, 0x21ce, "mulw", ! 274: III3, 0x3fff, 0x204e, "negb", ! 275: III3, 0x3fff, 0x234e, "negd", ! 276: IFF, 0x3fff, 0x15be, "negf", ! 277: IFF, 0x3fff, 0x14be, "negl", ! 278: III3, 0x3fff, 0x214e, "negw", ! 279: INONE, 0xff, 0xa2, "nop", ! 280: III3, 0x3fff, 0x244e, "notb", ! 281: III3, 0x3fff, 0x274e, "notd", ! 282: III3, 0x3fff, 0x254e, "notw", ! 283: III, 0x3f, 0x18, "orb", ! 284: III, 0x3f, 0x1b, "ord", ! 285: III, 0x3f, 0x19, "orw", ! 286: III3, 0x3fff, 0x30ce, "quob", ! 287: III3, 0x3fff, 0x33ce, "quod", ! 288: III3, 0x3fff, 0x31ce, "quow", ! 289: II3, 0x7ffff, 0x0031e, "rdval", ! 290: III3, 0x3fff, 0x34ce, "remb", ! 291: III3, 0x3fff, 0x37ce, "remd", ! 292: III3, 0x3fff, 0x35ce, "remw", ! 293: IN, 0xff, 0x72, "restore", ! 294: IDISP, 0xff, 0x12, "ret", ! 295: INONE, 0xff, 0x52, "reti", ! 296: INONE, 0xff, 0x42, "rett", ! 297: III3, 0x3fff, 0x004e, "rotb", ! 298: III3, 0x3fff, 0x034e, "rotd", ! 299: III3, 0x3fff, 0x014e, "rotw", ! 300: IFI, 0x3fff, 0x243e, "roundfb", ! 301: IFI, 0x3fff, 0x273e, "roundfd", ! 302: IFI, 0x3fff, 0x253e, "roundfw", ! 303: IFI, 0x3fff, 0x203e, "roundlb", ! 304: IFI, 0x3fff, 0x233e, "roundld", ! 305: IFI, 0x3fff, 0x213e, "roundlw", ! 306: IDISP, 0xff, 0x32, "rxp", ! 307: II, 0x7ff, 0x1bc, "sccb", ! 308: II, 0x7ff, 0x1bf, "sccd", ! 309: II, 0x7ff, 0x1bd, "sccw", ! 310: II, 0x7ff, 0x13c, "scsb", ! 311: II, 0x7ff, 0x13f, "scsd", ! 312: II, 0x7ff, 0x13d, "scsw", ! 313: II, 0x7ff, 0x03c, "seqb", ! 314: II, 0x7ff, 0x03f, "seqd", ! 315: II, 0x7ff, 0x03d, "seqw", ! 316: II, 0x7ff, 0x4bc, "sfcb", ! 317: II, 0x7ff, 0x4bf, "sfcd", ! 318: II, 0x7ff, 0x4bd, "sfcw", ! 319: II, 0x7ff, 0x43c, "sfsb", ! 320: II, 0x7ff, 0x43f, "sfsd", ! 321: II, 0x7ff, 0x43d, "sfsw", ! 322: II, 0x7ff, 0x6bc, "sgeb", ! 323: II, 0x7ff, 0x6bf, "sged", ! 324: II, 0x7ff, 0x6bd, "sgew", ! 325: II, 0x7ff, 0x33c, "sgtb", ! 326: II, 0x7ff, 0x33f, "sgtd", ! 327: II, 0x7ff, 0x33d, "sgtw", ! 328: II, 0x7ff, 0x23c, "shib", ! 329: II, 0x7ff, 0x23f, "shid", ! 330: II, 0x7ff, 0x23d, "shiw", ! 331: II, 0x7ff, 0x5bc, "shsb", ! 332: II, 0x7ff, 0x5bf, "shsd", ! 333: II, 0x7ff, 0x5bd, "shsw", ! 334: II, 0x7ff, 0x3bc, "sleb", ! 335: II, 0x7ff, 0x3bf, "sled", ! 336: II, 0x7ff, 0x3bd, "slew", ! 337: II, 0x7ff, 0x53c, "slob", ! 338: II, 0x7ff, 0x53f, "slod", ! 339: II, 0x7ff, 0x53d, "slow", ! 340: II, 0x7ff, 0x2bc, "slsb", ! 341: II, 0x7ff, 0x2bf, "slsd", ! 342: II, 0x7ff, 0x2bd, "slsw", ! 343: II, 0x7ff, 0x63c, "sltb", ! 344: II, 0x7ff, 0x63f, "sltd", ! 345: II, 0x7ff, 0x63d, "sltw", ! 346: II, 0x7ff, 0x0bc, "sneb", ! 347: II, 0x7ff, 0x0bf, "sned", ! 348: II, 0x7ff, 0x0bd, "snew", ! 349: IM, 0xff, 0x62, "save", ! 350: III3, 0x3fff, 0x184e, "sbitb", ! 351: III3, 0x3fff, 0x1b4e, "sbitd", ! 352: III3, 0x3fff, 0x1c4e, "sbitib", ! 353: III3, 0x3fff, 0x1f4e, "sbitid", ! 354: III3, 0x3fff, 0x1d4e, "sbitiw", ! 355: III3, 0x3fff, 0x194e, "sbitw", ! 356: ICFG, 0xf87fff, 0x000b0e, "setcfg", ! 357: II3X, 0xf83fff, 0x00373e, "sfsr", ! 358: INONE3, 0xffffff, 0x000c0e, "skpsb", ! 359: INONE3, 0xffffff, 0x000d0e, "skpsw", ! 360: INONE3, 0xffffff, 0x000f0e, "skpsd", ! 361: INONE3, 0xffffff, 0x008c0e, "skpst", ! 362: INONE3, 0xffffff, 0x010c0e, "skpsbb", ! 363: INONE3, 0xffffff, 0x010d0e, "skpswb", ! 364: INONE3, 0xffffff, 0x010f0e, "skpsdb", ! 365: INONE3, 0xffffff, 0x018c0e, "skpstb", ! 366: INONE3, 0xffffff, 0x020c0e, "skpsbw", ! 367: INONE3, 0xffffff, 0x020d0e, "skpsww", ! 368: INONE3, 0xffffff, 0x020f0e, "skpsdw", ! 369: INONE3, 0xffffff, 0x028c0e, "skpstw", ! 370: INONE3, 0xffffff, 0x030c0e, "skpsbbw", ! 371: INONE3, 0xffffff, 0x030d0e, "skpswbw", ! 372: INONE3, 0xffffff, 0x030f0e, "skpsdbw", ! 373: INONE3, 0xffffff, 0x038c0e, "skpstbw", ! 374: INONE3, 0xffffff, 0x060c0e, "skpsbu", ! 375: INONE3, 0xffffff, 0x060d0e, "skpswu", ! 376: INONE3, 0xffffff, 0x060f0e, "skpsdu", ! 377: INONE3, 0xffffff, 0x068c0e, "skpstu", ! 378: INONE3, 0xffffff, 0x070c0e, "skpsbbu", ! 379: INONE3, 0xffffff, 0x070d0e, "skpswbu", ! 380: INONE3, 0xffffff, 0x070f0e, "skpsdbu", ! 381: INONE3, 0xffffff, 0x078c0e, "skpstbu", ! 382: IMR, 0x7fff, 0x0f1e, "smr", ! 383: IPR, 0x7f, 0x2c, "sprb", ! 384: IPR, 0x7f, 0x2d, "sprw", ! 385: IPR, 0x7f, 0x2f, "sprd", ! 386: III, 0x3f, 0x20, "subb", ! 387: III, 0x3f, 0x30, "subcb", ! 388: III, 0x3f, 0x33, "subcd", ! 389: III, 0x3f, 0x31, "subcw", ! 390: III, 0x3f, 0x23, "subd", ! 391: IFF, 0x3fff, 0x11be, "subf", ! 392: IFF, 0x3fff, 0x10be, "subl", ! 393: III3, 0x3fff, 0x2c4e, "subpb", ! 394: III3, 0x3fff, 0x2f4e, "subpd", ! 395: III3, 0x3fff, 0x2d4e, "subpw", ! 396: III, 0x3f, 0x21, "subw", ! 397: INONE, 0xff, 0xe2, "svc", ! 398: III, 0x3f, 0x34, "tbitb", ! 399: III, 0x3f, 0x37, "tbitd", ! 400: III, 0x3f, 0x35, "tbitw", ! 401: IFI, 0x3fff, 0x2c3e, "truncfb", ! 402: IFI, 0x3fff, 0x2f3e, "truncfd", ! 403: IFI, 0x3fff, 0x2d3e, "truncfw", ! 404: IFI, 0x3fff, 0x283e, "trunclb", ! 405: IFI, 0x3fff, 0x2b3e, "truncld", ! 406: IFI, 0x3fff, 0x293e, "trunclw", ! 407: INONE, 0xff, 0xb2, "wait", ! 408: II3, 0x7ffff, 0x0071e, "wrval", ! 409: III, 0x3f, 0x38, "xorb", ! 410: III, 0x3f, 0x3b, "xord", ! 411: III, 0x3f, 0x39, "xorw", ! 412: /* end */ ! 413: IHEX, 0x0, 0x0, "hex", ! 414: }; ! 415: ! 416: printins(asp) ! 417: int asp; ! 418: { ! 419: register long o; ! 420: register i, f; ! 421: ADDR orig; ! 422: ! 423: isp = asp; ! 424: o = ltow(lget(dot, asp)); ! 425: p = dot; ! 426: orig = dot; ! 427: for(i=0; t[i].f; i++) ! 428: if((o&t[i].m) == t[i].v) ! 429: break; ! 430: printf("%s ", t[i].s); ! 431: switch(t[i].f) { ! 432: case IHEX: ! 433: p += 1; ! 434: printf("%02x", o & 0377); ! 435: break; ! 436: ! 437: case INONE: ! 438: p += 1; ! 439: break; ! 440: ! 441: case INONE3: ! 442: p += 3; ! 443: break; ! 444: ! 445: case IDISP: ! 446: p += 1; ! 447: psymoff((WORD)ddisp(), isp, ""); ! 448: break; ! 449: ! 450: case IDMOD: ! 451: p += 1; ! 452: psymoff((WORD)mtotext(ddisp(), isp), isp, ""); ! 453: break; ! 454: ! 455: case IDPC: ! 456: p += 1; ! 457: psymoff((WORD)(ddisp()+dot), isp, ""); ! 458: break; ! 459: ! 460: case IFF: ! 461: p += 3; ! 462: f = (o>>8)|2; ! 463: addr2((int)(o>>14), f, f); ! 464: break; ! 465: ! 466: case IIF: ! 467: p += 3; ! 468: i = (o>>8); ! 469: f = (o>>10)|2; ! 470: addr2((int)(o>>14), i, f); ! 471: break; ! 472: ! 473: case IFI: ! 474: p += 3; ! 475: i = (o>>8); ! 476: f = (o>>10)|2; ! 477: addr2((int)(o>>14), f, i); ! 478: break; ! 479: ! 480: case III: ! 481: p += 2; ! 482: i = o; ! 483: addr2((int)(o>>6), i, i); ! 484: break; ! 485: ! 486: case III3: ! 487: p += 3; ! 488: i = (o>>8); ! 489: addr2((int)(o>>14), i, i); ! 490: break; ! 491: ! 492: case IIID3: ! 493: p += 3; ! 494: i = (o>>8); ! 495: addr2((int)(o>>14), i, i); ! 496: printf(",%r", ddisp()); ! 497: break; ! 498: ! 499: case II: ! 500: p += 2; ! 501: i = o; ! 502: dgen((int)(o>>11), i, -1); ! 503: break; ! 504: ! 505: case II3: ! 506: p += 3; ! 507: dgen((int)(o>>19), 3, -1); ! 508: break; ! 509: ! 510: case II3X: ! 511: p += 3; ! 512: dgen((int)(o>>14), 3, -1); ! 513: break; ! 514: ! 515: case IMD: ! 516: p += 2; ! 517: mask((int)(o>>8)&0xff); ! 518: printf(",%R", ddisp()); ! 519: break; ! 520: ! 521: case IM: ! 522: p += 2; ! 523: mask((int)(o>>8)&0xff); ! 524: break; ! 525: ! 526: case IN: ! 527: p += 2; ! 528: rmask((int)(o>>8)&0xff); ! 529: break; ! 530: ! 531: case IQI: ! 532: p += 2; ! 533: i = o; ! 534: printf("$"); ! 535: quick((int)(o>>7)); ! 536: printf(","); ! 537: dgen((int)(o>>11), o, -1); ! 538: break; ! 539: ! 540: case IRII: ! 541: p += 3; ! 542: printf("r%d,", (int)(o>>11)&0x7); ! 543: i = o; ! 544: addr2((int)(o>>14), i, i); ! 545: break; ! 546: ! 547: case IRIID: ! 548: p += 3; ! 549: printf("r%d,", (int)(o>>11)&0x7); ! 550: i = o; ! 551: addr2((int)(o>>14), i, i); ! 552: printf(","); ! 553: psymoff((WORD)ddisp(), isp, ""); ! 554: break; ! 555: ! 556: case ICFG: ! 557: p += 3; ! 558: printf("["); ! 559: if (o & 0x8000) ! 560: printf("I"); ! 561: if (o & 0x10000) ! 562: printf("F"); ! 563: if (o & 0x20000) ! 564: printf("M"); ! 565: if (o & 0x40000) ! 566: printf("C"); ! 567: printf("]"); ! 568: break; ! 569: ! 570: case IPR: ! 571: p += 2; ! 572: prreg((o >> 7) & 0xf); ! 573: printf(","); ! 574: dgen(o >> 11, o, -1); ! 575: break; ! 576: ! 577: case IMR: ! 578: p += 1; ! 579: prmr((o >> 15) & 0xf); ! 580: printf(","); ! 581: dgen(o >> 19, 3, -1); ! 582: break; ! 583: } ! 584: dotinc = p - orig; ! 585: } ! 586: ! 587: static ! 588: addr2(o, i1, i2) ! 589: { ! 590: register x1, x2, t; ! 591: ! 592: x1 = -1; ! 593: x2 = -1; ! 594: t = (o >> 5) & 0x1f; ! 595: if (28 <= t && t <= 31) /* index mode */ ! 596: x1 = cget(p++, isp); ! 597: t = o & 0x1f; ! 598: if (28 <= t && t <= 31) ! 599: x2 = cget(p++, isp); ! 600: dgen(o>>5, i1, x1); ! 601: printf(","); ! 602: dgen(o, i2, x2); ! 603: } ! 604: ! 605: static ! 606: dgen(g, i, t) ! 607: { ! 608: register long v, v1; ! 609: register uchar pp; ! 610: ! 611: switch(g &= 0x1f) { ! 612: default: ! 613: printf("gok%d", g & 0x1f); ! 614: break; ! 615: ! 616: case 0: ! 617: case 1: ! 618: case 2: ! 619: case 3: ! 620: case 4: ! 621: case 5: ! 622: case 6: ! 623: case 7: ! 624: printf("r%d", g); ! 625: break; ! 626: ! 627: case 8: ! 628: case 9: ! 629: case 10: ! 630: case 11: ! 631: case 12: ! 632: case 13: ! 633: case 14: ! 634: case 15: ! 635: v = ddisp(); ! 636: psymoff((WORD)v, isp, ""); ! 637: printf("(r%d)", g-8); ! 638: break; ! 639: ! 640: case 16: ! 641: case 17: ! 642: case 18: ! 643: v = ddisp(); ! 644: v1 = ddisp(); ! 645: psymoff((WORD)v1, isp, "("); ! 646: psymoff((WORD)v, isp, ""); ! 647: printf("(%c%c))", "fss"[g-16], "ppb"[g-16]); ! 648: break; ! 649: ! 650: case 20: ! 651: v = 0; ! 652: pp = cget(p, isp); ! 653: if(pp & 0200) ! 654: switch(i & 3) { ! 655: case 2: break; ! 656: case 3: break; ! 657: case 1: v = 0xffff0000L; break; ! 658: case 0: v = 0xffffff00L; break; ! 659: } ! 660: switch(i & 3) { ! 661: case 2: p += 4; ! 662: case 3: v |= (long)cget(p++, isp) << 24; ! 663: v |= (long)cget(p++, isp) << 16; ! 664: case 1: v |= (long)cget(p++, isp) << 8; ! 665: case 0: v |= (long)cget(p++, isp); ! 666: } ! 667: printf("$"); ! 668: psymoff((WORD)v, isp, ""); ! 669: break; ! 670: ! 671: case 21: ! 672: v = ddisp(); ! 673: printf("*"); ! 674: psymoff((WORD)v, isp, ""); ! 675: break; ! 676: ! 677: case 22: ! 678: v = ddisp(); ! 679: v1 = ddisp(); ! 680: psymoff((WORD)(mtodata(v, isp)+v1), isp, ""); ! 681: break; ! 682: ! 683: case 23: ! 684: printf("tos"); ! 685: break; ! 686: ! 687: case 24: ! 688: case 25: ! 689: case 26: ! 690: case 27: ! 691: v = ddisp(); ! 692: psymoff((WORD)v, isp, ""); ! 693: printf("(%c%c)", "fssp"[g-24], "ppbp"[g-24]); ! 694: break; ! 695: ! 696: case 28: ! 697: case 29: ! 698: case 30: ! 699: case 31: ! 700: if (t == -1) ! 701: t = cget(p++, isp); ! 702: dgen(t>>3, i, -1); ! 703: printf("[r%d:%c]", t&07, "bwdq"[g&03]); ! 704: break; ! 705: } ! 706: } ! 707: ! 708: static long ! 709: ddisp() ! 710: { ! 711: register long o; ! 712: ! 713: o = cget(p++, isp); ! 714: if(!(o & 0x80)) { ! 715: if(o & 0x40) ! 716: o |= 0xffffff80; ! 717: return o; ! 718: } ! 719: o = (o<<8) | cget(p++, isp); ! 720: if(!(o & 0x4000)) { ! 721: o &= 0x3fff; ! 722: if(o & 0x2000) ! 723: o |= 0xffffc000; ! 724: return o; ! 725: } ! 726: o = (o<<8) | cget(p++, isp); ! 727: o = (o<<8) | cget(p++, isp); ! 728: o &= 0x3fffffff; ! 729: if(o & 0x20000000) ! 730: o |= 0xc0000000; ! 731: return o; ! 732: } ! 733: ! 734: static ! 735: mask(m) ! 736: register int m; ! 737: { ! 738: register int i; ! 739: int first = 0; ! 740: ! 741: m &= 0xff; ! 742: printf("["); ! 743: for (i = 0; m; i++) { ! 744: if (m & (1<<i)) { ! 745: if (first++) ! 746: printf(","); ! 747: printf("r%d", i); ! 748: } ! 749: m &=~ (1<<i); ! 750: } ! 751: printf("]"); ! 752: } ! 753: ! 754: static ! 755: rmask(m) ! 756: register int m; ! 757: { ! 758: register int i; ! 759: int first = 0; ! 760: ! 761: m &= 0xff; ! 762: printf("["); ! 763: for (i = 0; m; i++) { ! 764: if (m & (0x80>>i)) { ! 765: if (first++) ! 766: printf(","); ! 767: printf("r%d", i); ! 768: } ! 769: m &=~ (0x80>>i); ! 770: } ! 771: printf("]"); ! 772: } ! 773: ! 774: static ! 775: quick(q) ! 776: register int q; ! 777: { ! 778: ! 779: q &= 0xf; ! 780: if (q & 0x8) ! 781: q |= ~0x7; ! 782: printf("%r", q); ! 783: } ! 784: ! 785: static char *pmrtab[] = { ! 786: "bpr0", "bpr1", "2", "3", ! 787: "pf0", "pf1", "6", "7", ! 788: "sc", "9", "msr", "bcnt", ! 789: "ptb0", "ptb1", "#d", "eia", ! 790: }; ! 791: ! 792: static ! 793: prmr(r) ! 794: int r; ! 795: { ! 796: ! 797: printf("%s", pmrtab[r]); ! 798: } ! 799: ! 800: static char *pregtab[] = { ! 801: "upsr", "1", "2", "3", ! 802: "4", "5", "6", "7", ! 803: "fp", "sp", "sb", "#b", ! 804: "#c", "psr", "intbase", "mod", ! 805: }; ! 806: ! 807: static ! 808: prreg(r) ! 809: int r; ! 810: { ! 811: ! 812: printf("%s", pregtab[r]); ! 813: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.