![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to m88100disasm.cpp CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Isaki's NoNo m68k/m88k emulator] / nono / m88xx0|
Return to m88100disasm.cpp CVS log | Up to [Isaki's NoNo m68k/m88k emulator] / nono / m88xx0 |
1.1 root 1: //
2: // nono
1.1.1.2 root 3: // Copyright (C) 2020 nono project
4: // Licensed under nono-license.txt
1.1 root 5: //
6:
7: #include "m88100disasm.h"
1.1.1.2 root 8: #include "m88100acc.h"
1.1 root 9: #include "bus.h"
10:
11: #define OP_DEF(name) void __CONCAT(m88100disasm::op_,name)()
12: #define OP_FUNC(name) __CONCAT(op_,name)()
13:
1.1.1.8 ! root 14: // 別ニーモニックを使うなら true にする (外部から指定する)
! 15: /*static*/ bool m88100disasm::use_altname;
! 16:
1.1 root 17: // コンストラクタ
1.1.1.4 root 18: m88100disasm::m88100disasm(DebuggerMemoryStream& mem_)
19: : inherited(mem_)
1.1 root 20: {
21: }
22:
23: // デストラクタ
24: m88100disasm::~m88100disasm()
25: {
26: }
27:
28: // 逆アセンブルを実行
29: bool
1.1.1.4 root 30: m88100disasm::Exec()
1.1 root 31: {
32: ExecInit();
33:
34: opX = 0;
35: name.clear();
36: arg0.clear();
37: arg1.clear();
38: arg2.clear();
1.1.1.7 root 39: altname.clear();
40: altarg0.clear();
41: altarg1.clear();
42: altarg2.clear();
1.1 root 43:
1.1.1.4 root 44: xip = (uint32)mem.laddr;
1.1 root 45:
1.1.1.4 root 46: opX = mem.FetchInst();
47: uint32 op12 = m88kcpu::op32_to_12(opX);
1.1 root 48: switch (op12) {
49: #include "m88100switch.inc"
50: default:
1.1.1.2 root 51: name = "illegal";
52: break;
53: //OP_FUNC(illegal);
1.1 root 54: }
55:
56: // 出力文字列(ダンプ)
57: dump = string_format("%08x ", opX);
58:
59: // 出力文字列(命令)
60: text = name;
61: if (!arg0.empty() || !arg1.empty() || !arg2.empty()) {
62: // オペランドがどれかでもあればインデントする
63: int len = text.length();
64: if (len < 8) {
65: text += std::string(8 - len, ' ');
66: } else {
67: text += ' ';
68: }
69:
70: // arg0,1,2 の空でないやつを追加
71: std::string args;
72: if (!arg0.empty()) {
73: args += arg0;
74: }
75: if (!arg1.empty()) {
76: if (!args.empty()) {
77: args += ",";
1.1.1.6 root 78: while (args.length() % 4 != 0)
1.1 root 79: args += " ";
80: }
81: args += arg1;
82: }
83: if (!arg2.empty()) {
84: if (!args.empty()) {
85: args += ",";
1.1.1.6 root 86: while (args.length() % 4 != 0)
1.1 root 87: args += " ";
88: }
89: args += arg2;
90: }
91:
92: text += args;
93: }
94:
1.1.1.7 root 95: // 出力文字列(別名)
96: if (use_altname && !altname.empty()) {
97: if (altarg1.empty() && !altarg2.empty()) {
98: altarg1 = altarg2;
99: altarg2.clear();
100: }
101: // {mov rn, rn} -> {nop} は無条件に置換できるのでここでやる
102: if (altname == "mov" && altarg0 == altarg1 && altarg2.empty()) {
103: altname = "nop";
104: altarg0.clear();
105: altarg1.clear();
106: }
107:
108: alttext += "{" + altname;
109:
110: if (!altarg0.empty() || !altarg1.empty() || !altarg2.empty()) {
111: // オペランドがあればインデントする
112: int len = alttext.length();
113: if (len < 8) {
114: alttext += std::string(8 - len, ' ');
115: } else {
116: alttext += ' ';
117: }
118:
119: // altarg0,1,2 の空でないやつを追加
120: std::string altargs;
121: if (!altarg0.empty()) {
122: altargs += altarg0;
123: }
124: if (!altarg1.empty()) {
125: if (!altargs.empty()) {
126: altargs += ',';
127: while (altargs.length() % 4 != 0)
128: altargs += ' ';
129: }
130: altargs += altarg1;
131: }
132: if (!altarg2.empty()) {
133: if (!altargs.empty()) {
134: altargs += ',';
135: while (altargs.length() % 4 != 0)
136: altargs += ' ';
137: }
138: altargs += altarg2;
139: }
140:
141: alttext += altargs;
142: }
143: alttext += '}';
144: }
145:
1.1 root 146: // 出力バイナリ列
147: // bin は vector<uint8>。
148: bin.push_back( opX >> 24);
149: bin.push_back((opX >> 16) & 0xff);
150: bin.push_back((opX >> 8) & 0xff);
151: bin.push_back( opX & 0xff);
152:
153: return true;
154: }
155:
156: // フィールド部品
1.1.1.7 root 157: #define DD ((opX >> 21) & 0x1f)
158: #define S1 ((opX >> 16) & 0x1f)
159: #define S2 ( opX & 0x1f)
1.1 root 160: #define B5 ((opX >> 21) & 0x1f)
161: #define M5 ((opX >> 21) & 0x1f)
162: #define W5 ((opX >> 5) & 0x1f)
163: #define O5 ((opX ) & 0x1f)
1.1.1.7 root 164: #define CIO ((opX >> 8) & 0x03)
165: #define IMM16 (opX & 0x0000ffffU)
1.1 root 166: #define VEC9 (opX & 0x000001ffU)
167: #define D16 (((int32)(int16)opX) << 2)
168: #define D26 (((int32)(opX << 6)) >> 4)
169:
170: std::string
171: m88100disasm::rd()
172: {
173: return string_format("r%d", (opX >> 21) & 0x1f);
174: }
175:
176: std::string
177: m88100disasm::rs1()
178: {
179: return string_format("r%d", (opX >> 16) & 0x1f);
180: }
181:
182: std::string
183: m88100disasm::rs2()
184: {
185: return string_format("r%d", (opX ) & 0x1f);
186: }
187:
188: std::string
189: m88100disasm::imm16()
190: {
191: return string_format("#0x%04x", (opX & 0x0000ffff));
192: }
193:
194: std::string
195: m88100disasm::d16()
196: {
197: return string_format("0x%08x", xip + D16);
198: }
199:
1.1.1.6 root 200: std::string
201: m88100disasm::d26()
202: {
203: return string_format("0x%08x", xip + D26);
204: }
205:
1.1 root 206: // 制御レジスタ名
207: std::string
208: m88100disasm::crs()
209: {
1.1.1.2 root 210: // CRS フィールドは 6 bit。ただし CR20 までしか存在しない
1.1 root 211: uint32 cr = (opX >> 5) & 0x3f;
212: static const char *crnames[] = {
213: "pid", "psr", "epsr", "ssbr", // cr0..3
214: "sxip", "snip", "sfip", "vbr", // cr4..7
215: "dmt0", "dmd0", "dma0", // cr8..10
216: "dmt1", "dmd1", "dma1", // cr11..13
217: "dmt2", "dmd2", "dma2", // cr14..16
1.1.1.2 root 218: "sr0", "sr1", "sr2", "sr3", // cr17..20
1.1 root 219: };
220:
221: if (cr < countof(crnames)) {
222: return std::string(crnames[cr]);
223: } else {
224: return string_format("cr%d", cr); // こうなのか?
225: }
226: }
227:
228: // FPU 制御レジスタ名
229: std::string
230: m88100disasm::fcrs()
231: {
232: uint32 cr = (opX >> 5) & 0x3f;
233: static const char *fcrnames[] = {
234: "fpecr", // fcr0
235: "fphs1", // fcr1
236: "fpls1", // fcr2
237: "fphs2", // fcr3
238: "fpls2", // fcr4
239: "fppt", // fcr5
240: "fprh", // fcr6
241: "fprl", // fcr7
242: "fpit", // fcr8
243: };
244: if (cr < countof(fcrnames)) {
245: return std::string(fcrnames[cr]);
246: } else if (cr == 62) {
247: return "fpsr";
248: } else if (cr == 63) {
249: return "fpcr";
250: } else {
251: return string_format("fcr%d", cr);
252: }
253: }
254:
255: #define TD (5)
256: #define T1 (9)
257: #define T2 (7)
258:
259: // FPU サイズサフィックス t は TD、T1、T2
260: std::string
261: m88100disasm::fsize(uint32 t)
262: {
263: uint32 sz = (opX >> t) & 3;
264: return sz == 1 ? "d" : "s";
265: }
266:
267: // FPU サイズサフィックス (全部入り)
268: std::string
269: m88100disasm::fsize()
270: {
271: return fsize(TD) + fsize(T1) + fsize(T2);
272: }
273:
274: // "Width<Offset>"
275: std::string
276: m88100disasm::wo5()
277: {
278: uint32 w5 = W5 ?: 32;
279: uint32 o5 = O5;
280: return string_format("%d<%d>", w5, o5);
281: }
282:
283: // キャリーサフィックス
284: std::string
285: m88100disasm::cio()
286: {
287: uint32 c = (opX >> 8) & 3;
288: static const char *carrystr[] = {
289: "",
290: ".co",
1.1.1.2 root 291: ".ci",
1.1 root 292: ".cio",
293: };
294: return std::string(carrystr[c]);
295: }
296:
297: std::string
298: m88100disasm::b5()
299: {
300: return string_format("#%d", B5);
301: }
302:
303: std::string
304: m88100disasm::m5()
305: {
306: uint32 m = M5;
307: switch (m) {
308: case 0x02: return "eq0";
309: case 0x0d: return "ne0";
310: case 0x01: return "gt0";
311: case 0x0c: return "lt0";
312: case 0x03: return "ge0";
313: case 0x0e: return "le0";
314: default:
315: break;
316: }
317: return string_format("0x%02x", m); // ?
318: }
319:
320: std::string
321: m88100disasm::vec9()
322: {
323: return string_format("#0x%03x", VEC9);
324: }
325:
326: // エミュレータ的未実装 (最終的にはなくなる)
327: void
328: m88100disasm::op_unimpl()
329: {
330: name = "unimplemented";
331: }
332:
1.1.1.6 root 333: // ld_imm, st_imm, xmem_imm の共通部
334: // namebase にはサイズプレフィックスを含む。
335: void
336: m88100disasm::ops_ldst_imm(const std::string& namebase)
1.1 root 337: {
1.1.1.6 root 338: name = namebase;
1.1 root 339: arg0 = rd();
340: arg1 = rs1();
341: arg2 = imm16();
1.1.1.7 root 342:
343: altname = namebase;
344: altarg0 = rd();
345: if (IMM16 == 0) {
346: altarg1 = rs1();
347: } else {
348: altarg1 = rs1() + "," + imm16();
349: }
350: // 3文字目が 'a' になるのは lda しかない
351: if (namebase[2] != 'a') {
352: altarg1 = "(" + altarg1 + ")";
353: }
1.1 root 354: }
355:
1.1.1.6 root 356: // 000000_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
357: OP_DEF(xmem_bu_imm)
358: {
359: ops_ldst_imm("xmem.bu");
360: }
361:
1.1 root 362: // 000001_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
363: OP_DEF(xmem_w_imm)
364: {
1.1.1.6 root 365: ops_ldst_imm("xmem");
1.1 root 366: }
367:
368: // 000010_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
369: OP_DEF(ld_hu_imm)
370: {
1.1.1.6 root 371: ops_ldst_imm("ld.hu");
1.1 root 372: }
373:
374: // 000011_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
375: OP_DEF(ld_bu_imm)
376: {
1.1.1.6 root 377: ops_ldst_imm("ld.bu");
1.1 root 378: }
379:
380: // 000100_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
381: OP_DEF(ld_d_imm)
382: {
1.1.1.6 root 383: ops_ldst_imm("ld.d");
1.1 root 384: }
385:
386: // 000101_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
387: OP_DEF(ld_w_imm)
388: {
1.1.1.6 root 389: ops_ldst_imm("ld");
1.1 root 390: }
391:
392: // 000110_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
393: OP_DEF(ld_h_imm)
394: {
1.1.1.6 root 395: ops_ldst_imm("ld.h");
1.1 root 396: }
397:
398: // 000111_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
399: OP_DEF(ld_b_imm)
400: {
1.1.1.6 root 401: ops_ldst_imm("ld.b");
1.1 root 402: }
403:
404: // 001000_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
405: OP_DEF(st_d_imm)
406: {
1.1.1.6 root 407: ops_ldst_imm("st.d");
1.1 root 408: }
409:
410: // 001001_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
411: OP_DEF(st_w_imm)
412: {
1.1.1.6 root 413: ops_ldst_imm("st");
1.1 root 414: }
415:
416: // 001010_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
417: OP_DEF(st_h_imm)
418: {
1.1.1.6 root 419: ops_ldst_imm("st.h");
1.1 root 420: }
421:
422: // 001011_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
423: OP_DEF(st_b_imm)
424: {
1.1.1.6 root 425: ops_ldst_imm("st.b");
1.1 root 426: }
427:
428: // 001100_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
429: OP_DEF(lda_d_imm)
430: {
1.1.1.6 root 431: ops_ldst_imm("lda.d");
1.1 root 432: }
433:
434: // 001101_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
435: OP_DEF(lda_w_imm)
436: {
1.1.1.6 root 437: ops_ldst_imm("lda");
1.1 root 438: }
439:
440: // 001110_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
441: OP_DEF(lda_h_imm)
442: {
1.1.1.6 root 443: ops_ldst_imm("lda.h");
1.1 root 444: }
445:
446: // 001111_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
447: OP_DEF(lda_b_imm)
448: {
1.1.1.6 root 449: ops_ldst_imm("lda.b");
1.1 root 450: }
451:
452: // 010000_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
453: OP_DEF(and_imm)
454: {
455: name = "and";
456: arg0 = rd();
457: arg1 = rs1();
458: arg2 = imm16();
1.1.1.7 root 459:
460: // rd s1 imm
461: // ----------
462: // r0 * * nop
463: // rd r0 #imm clr rd
464: // rd rd #imm and rd, #ffff'imm
465: // rd s1 #imm and rd, s1, #ffff'imm
466:
467: if (DD == 0) {
468: altname = "nop";
469: } else if (S1 == 0) {
470: altname = "clr";
471: altarg0 = rd();
472: } else {
473: altname = "and";
474: altarg0 = rd();
475: if (DD != S1) {
476: altarg1 = rs1();
477: }
478: altarg2 = string_format("#0xffff%04x", IMM16);
479: }
1.1 root 480: }
481:
482: // 010001_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
483: OP_DEF(and_u_imm)
484: {
485: name = "and.u";
486: arg0 = rd();
487: arg1 = rs1();
488: arg2 = imm16();
1.1.1.7 root 489:
490: // rd s1 imm
491: // ----------
492: // r0 * * nop
493: // rd r0 #imm clr rd
494: // rd rd #imm and rd, #imm'ffff
495: // rd s1 #imm and rd, s1, #imm'ffff
496:
497: if (DD == 0) {
498: altname = "nop";
499: } else if (S1 == 0) {
500: altname = "clr";
501: altarg0 = rd();
502: } else {
503: altname = "and";
504: altarg0 = rd();
505: if (DD != S1) {
506: altarg1 = rs1();
507: }
508: altarg2 = imm16() + "ffff";
509: }
1.1 root 510: }
511:
512: // 010010_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
513: OP_DEF(mask_imm)
514: {
515: name = "mask";
516: arg0 = rd();
517: arg1 = rs1();
518: arg2 = imm16();
1.1.1.7 root 519:
520: // rd s1 imm
521: // ----------
522: // r0 * * nop
523: // rd r0 #imm clr rd
524: // rd rd #imm and rd, #0000'imm
525: // rd s1 #imm and rd, s1, #0000'imm
526:
527: if (DD == 0) {
528: altname = "nop";
529: } else if (S1 == 0) {
530: altname = "clr";
531: altarg0 = rd();
532: } else {
533: altname = "and";
534: altarg0 = rd();
535: if (DD != S1) {
536: altarg1 = rs1();
537: }
538: altarg2 = string_format("#0x0000%04x", IMM16);
539: }
1.1 root 540: }
541:
542: // 010011_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
543: OP_DEF(mask_u_imm)
544: {
545: name = "mask.u";
546: arg0 = rd();
547: arg1 = rs1();
548: arg2 = imm16();
1.1.1.7 root 549:
550: // rd s1 imm
551: // ----------
552: // r0 * * nop
553: // rd r0 #imm clr rd
554: // rd rd #imm and rd, #imm'0000
555: // rd s1 #imm and rd, s1, #imm'0000
556:
557: if (DD == 0) {
558: altname = "nop";
559: } else if (S1 == 0) {
560: altname = "clr";
561: altarg0 = rd();
562: } else {
563: altname = "and";
564: altarg0 = rd();
565: if (DD != S1) {
566: altarg1 = rs1();
567: }
568: altarg2 = imm16() + "0000";
569: }
1.1 root 570: }
571:
572: // 010100_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
573: OP_DEF(xor_imm)
574: {
575: name = "xor";
576: arg0 = rd();
577: arg1 = rs1();
578: arg2 = imm16();
1.1.1.7 root 579:
580: // rd s1 imm
581: // ----------
582: // r0 * * nop
583: // rd r0 #imm mov rd, #imm
584: // rd rd #imm xor rd, #imm
585: // rd s1 #imm xor rd, s1, #imm
586:
587: if (DD == 0) {
588: altname = "nop";
589: } else if (S1 == 0) {
590: altname = "mov";
591: altarg0 = rd();
592: altarg1 = imm16();
593: } else {
594: altname = "xor";
595: altarg0 = rd();
596: if (DD != S1) {
597: altarg1 = rs1();
598: }
599: altarg2 = imm16();
600: }
1.1 root 601: }
602:
603: // 010101_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
604: OP_DEF(xor_u_imm)
605: {
606: name = "xor.u";
607: arg0 = rd();
608: arg1 = rs1();
609: arg2 = imm16();
1.1.1.7 root 610:
611: // rd s1 imm
612: // ----------
613: // r0 * * nop
614: // rd r0 #imm mov rd, #imm'0000
615: // rd rd #imm xor rd, #imm'0000
616: // rd s1 #imm xor rd, s1, #imm'0000
617:
618: if (DD == 0) {
619: altname = "nop";
620: } else if (S1 == 0) {
621: altname = "mov";
622: altarg0 = rd();
623: altarg1 = imm16() + "0000";
624: } else {
625: altname = "xor";
626: altarg0 = rd();
627: if (DD != S1) {
628: altarg1 = rs1();
629: }
630: altarg2 = imm16() + "0000";
631: }
1.1 root 632: }
633:
634: // 010110_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
635: OP_DEF(or_imm)
636: {
637: name = "or";
638: arg0 = rd();
639: arg1 = rs1();
640: arg2 = imm16();
1.1.1.7 root 641:
642: // rd s1 imm
643: // ----------
644: // r0 * * nop
645: // rd r0 #imm mov rd, #imm
646: // rd rd #imm or rd, #imm
647: // rd s1 #imm or rd, s1, #imm
648:
649: if (DD == 0) {
650: altname = "nop";
651: } else if (S1 == 0) {
652: altname = "mov";
653: altarg0 = rd();
654: altarg1 = imm16();
655: } else {
656: altname = "or";
657: altarg0 = rd();
658: if (DD != S1) {
659: altarg1 = rs1();
660: }
661: altarg2 = imm16();
662: }
1.1 root 663: }
664:
665: // 010111_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
666: OP_DEF(or_u_imm)
667: {
668: name = "or.u";
669: arg0 = rd();
670: arg1 = rs1();
671: arg2 = imm16();
1.1.1.7 root 672:
673: // rd s1 imm
674: // ----------
675: // r0 * * nop
676: // rd r0 #imm mov rd, #imm'0000
677: // rd rd #imm or rd, #imm'0000
678: // rd s1 #imm or rd, s1, #imm'0000
679:
680: if (DD == 0) {
681: altname = "nop";
682: } else if (S1 == 0) {
683: altname = "mov";
684: altarg0 = rd();
685: altarg1 = imm16() + "0000";
686: } else {
687: altname = "or";
688: altarg0 = rd();
689: if (DD != S1) {
690: altarg1 = rs1();
691: }
692: altarg2 = imm16() + "0000";
693: }
1.1 root 694: }
695:
696: // 011000_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
697: OP_DEF(addu_imm)
698: {
699: name = "addu";
700: arg0 = rd();
701: arg1 = rs1();
702: arg2 = imm16();
1.1.1.7 root 703:
704: // rd s1 imm
705: // ----------
706: // r0 * * nop
707: // rd r0 #imm mov rd, #0000'imm
708: // rd rd #imm addu rd, #0000'imm
709: // rd s1 #imm addu rd, s1, #0000'imm
710:
711: if (DD == 0) {
712: altname = "nop";
713: } else if (S1 == 0) {
714: altname = "mov";
715: altarg0 = rd();
716: altarg1 = string_format("#0x0000%04x", IMM16);
717: } else {
718: altname = "addu";
719: altarg0 = rd();
720: if (DD != S1) {
721: altarg1 = rs1();
722: }
723: altarg2 = string_format("#0x0000%04x", IMM16);
724: }
1.1 root 725: }
726:
727: // 011001_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
728: OP_DEF(subu_imm)
729: {
730: name = "subu";
731: arg0 = rd();
732: arg1 = rs1();
733: arg2 = imm16();
1.1.1.7 root 734:
735: // rd s1 imm
736: // ----------
737: // r0 * * nop
738: // rd r0 #imm mov rd, #-imm
739: // rd rd #imm subu rd, #0000'imm
740: // rd s1 #imm subu rd, s1, #0000'imm
741:
742: if (DD == 0) {
743: altname = "nop";
744: } else if (S1 == 0) {
745: altname = "mov";
746: altarg0 = rd();
747: altarg1 = string_format("#0x%08x", -(int32)(uint32)IMM16);
748: } else {
749: altname = "subu";
750: altarg0 = rd();
751: if (DD != S1) {
752: altarg1 = rs1();
753: }
754: altarg2 = string_format("#0x0000%04x", IMM16);
755: }
1.1 root 756: }
757:
758: // 011010_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
759: OP_DEF(divu_imm)
760: {
761: name = "divu";
762: arg0 = rd();
763: arg1 = rs1();
764: arg2 = imm16();
1.1.1.7 root 765:
766: // 例外発生の可能性があるので r0 を含んでいたとしても別名にしない
767: altname = "divu";
768: altarg0 = rd();
769: if (DD != S1) {
770: altarg1 = rs1();
771: }
772: altarg2 = string_format("#0x0000%04x", IMM16);
1.1 root 773: }
774:
775: // 011011_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
776: OP_DEF(mul_imm)
777: {
778: name = "mul";
779: arg0 = rd();
780: arg1 = rs1();
781: arg2 = imm16();
1.1.1.7 root 782:
783: // 例外発生の可能性があるので r0 を含んでいたとしても別名にしない
784: altname = "mul";
785: altarg0 = rd();
786: if (DD != S1) {
787: altarg1 = rs1();
788: }
789: altarg2 = string_format("#0x0000%04x", IMM16);
1.1 root 790: }
791:
792: // 011100_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
793: OP_DEF(add_imm)
794: {
795: name = "add";
796: arg0 = rd();
797: arg1 = rs1();
798: arg2 = imm16();
1.1.1.7 root 799:
800: // 例外発生の可能性があるので r0 を含んでいたとしても別名にしない
801: altname = "adds";
802: altarg0 = rd();
803: if (DD != S1) {
804: altarg1 = rs1();
805: }
806: altarg2 = string_format("#0x0000%04x", IMM16);
1.1 root 807: }
808:
809: // 011101_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
810: OP_DEF(sub_imm)
811: {
812: name = "sub";
813: arg0 = rd();
814: arg1 = rs1();
815: arg2 = imm16();
1.1.1.7 root 816:
817: // 例外発生の可能性があるので r0 を含んでいたとしても別名にしない
818: altname = "subs";
819: altarg0 = rd();
820: if (DD != S1) {
821: altarg1 = rs1();
822: }
823: altarg2 = string_format("#0x0000%04x", IMM16);
1.1 root 824: }
825:
826: // 011110_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
827: OP_DEF(div_imm)
828: {
829: name = "div";
830: arg0 = rd();
831: arg1 = rs1();
832: arg2 = imm16();
1.1.1.7 root 833:
834: // 例外発生の可能性があるので r0 を含んでいたとしても別名にしない
835: altname = "div";
836: altarg0 = rd();
837: if (DD != S1) {
838: altarg1 = rs1();
839: }
840: altarg2 = string_format("#0x0000%04x", IMM16);
1.1 root 841: }
842:
843: // 011111_DDDDDSSSSS_nnnnnn_nnnnnnnnnn
844: OP_DEF(cmp_imm)
845: {
846: name = "cmp";
847: arg0 = rd();
848: arg1 = rs1();
849: arg2 = imm16();
1.1.1.7 root 850:
851: if (DD == 0) {
852: altname = "nop";
853: } else {
854: altname = "cmp";
855: altarg0 = rd();
856: altarg1 = rs1();
857: altarg2 = string_format("#0x0000%04x", IMM16);
858: }
1.1 root 859: }
860:
861: // 100000_DDDDDzzzzz_01000n_nnnnnzzzzz
862: OP_DEF(ldcr)
863: {
864: name = "ldcr";
865: arg0 = rd();
866: arg1 = crs();
867: }
868:
869: // 100000_DDDDDzzzzz_01001n_nnnnnzzzzz
870: OP_DEF(fldcr)
871: {
872: name = "fldcr";
873: arg0 = rd();
874: arg1 = fcrs();
875: }
876:
877: // 100000_zzzzzSSSSS_10000n_nnnnnsssss
878: OP_DEF(stcr)
879: {
880: uint32 s1 = (opX >> 16) & 0x1f;
881: uint32 s2 = (opX ) & 0x1f;
882: if (s1 == s2) {
883: name = "stcr";
884: arg1 = rs1();
885: arg2 = crs();
886: } else {
887: // どうすべ
888: OP_FUNC(unimpl);
889: }
890: }
891:
892: // 100000_zzzzzSSSSS_10001n_nnnnnsssss
893: OP_DEF(fstcr)
894: {
895: uint32 s1 = (opX >> 16) & 0x1f;
896: uint32 s2 = (opX ) & 0x1f;
897: if (s1 == s2) {
898: name = "fstcr";
899: arg1 = rs1();
900: arg2 = fcrs();
901: } else {
902: // どうすべ
903: OP_FUNC(unimpl);
904: }
905: }
906:
907: // 100000_DDDDDSSSSS_11000n_nnnnnsssss
908: OP_DEF(xcr)
909: {
910: uint32 s1 = (opX >> 16) & 0x1f;
911: uint32 s2 = (opX ) & 0x1f;
912: if (s1 == s2) {
913: name = "xcr";
914: arg0 = rd();
915: arg1 = rs1();
1.1.1.2 root 916: arg2 = crs();
1.1 root 917: } else {
918: // どうすべ
919: OP_FUNC(unimpl);
920: }
921: }
922:
923: // 100000_DDDDDSSSSS_11001n_nnnnnsssss
924: OP_DEF(fxcr)
925: {
926: uint32 s1 = (opX >> 16) & 0x1f;
927: uint32 s2 = (opX ) & 0x1f;
928: if (s1 == s2) {
929: name = "fxcr";
930: arg0 = rd();
931: arg1 = rs1();
932: arg2 = fcrs();
933: } else {
934: // どうすべ
935: OP_FUNC(unimpl);
936: }
937: }
938:
939: // 100001_DDDDDSSSSS_00000n_nnnnnsssss
940: OP_DEF(fmul)
941: {
942: name = "fmul." + fsize();
943: arg0 = rd();
944: arg1 = rs1();
945: arg2 = rs2();
946: }
947:
948: // 100001_DDDDD00000_001000_000nnsssss
949: OP_DEF(flt)
950: {
951: name = "flt." + fsize(TD) + "s";
952: arg0 = rd();
953: arg2 = rs2();
954: }
955:
956: // 100001_DDDDDSSSSS_00101n_nnnnnsssss
957: OP_DEF(fadd)
958: {
959: name = "fadd." + fsize();
960: arg0 = rd();
961: arg1 = rs1();
962: arg2 = rs2();
963: }
964:
965: // 100001_DDDDDSSSSS_00110n_nnnnnsssss
966: OP_DEF(fsub)
967: {
968: name = "fsub." + fsize();
969: arg0 = rd();
970: arg1 = rs1();
971: arg2 = rs2();
972: }
973:
974: // 100001_DDDDDSSSSS_00111n_nnnnnsssss
975: OP_DEF(fcmp)
976: {
977: name = "fcmp.s" + fsize(T1) + fsize(T2);
978: arg0 = rd();
979: arg1 = rs1();
980: arg2 = rs2();
981: }
982:
983: // 100001_DDDDD00000_010010_0nn00sssss
984: OP_DEF(int)
985: {
986: name = "int.s" + fsize(T2);
987: arg0 = rd();
988: arg1 = rs2();
989: }
990:
991: // 100001_DDDDD00000_010100_0nn00sssss
992: OP_DEF(nint)
993: {
994: name = "nint.s" + fsize(T2);
995: arg0 = rd();
996: arg1 = rs2();
997: }
998:
999: // 100001_DDDDD00000_010110_0nn00sssss
1000: OP_DEF(trnc)
1001: {
1002: name = "trnc.s" + fsize(T2);
1003: arg0 = rd();
1004: arg2 = rs2();
1005: }
1006:
1007: // 100001_DDDDDSSSSS_01110n_nnnnnsssss
1008: OP_DEF(fdiv)
1009: {
1010: name = "fdiv." + fsize();
1011: arg0 = rd();
1012: arg1 = rs1();
1013: arg2 = rs2();
1014: }
1015:
1016: // 110000_nnnnnnnnnn_nnnnnn_nnnnnnnnnn
1017: OP_DEF(br)
1018: {
1019: name = "br";
1.1.1.6 root 1020: arg0 = d26();
1.1 root 1021: }
1022:
1023: // 110001_nnnnnnnnnn_nnnnnn_nnnnnnnnnn
1024: OP_DEF(br_n)
1025: {
1026: name = "br.n";
1.1.1.6 root 1027: arg0 = d26();
1.1 root 1028: }
1029:
1030: // 110010_nnnnnnnnnn_nnnnnn_nnnnnnnnnn
1031: OP_DEF(bsr)
1032: {
1033: name = "bsr";
1.1.1.6 root 1034: arg0 = d26();
1.1 root 1035: }
1036:
1037: // 110011_nnnnnnnnnn_nnnnnn_nnnnnnnnnn
1038: OP_DEF(bsr_n)
1039: {
1040: name = "bsr.n";
1.1.1.6 root 1041: arg0 = d26();
1.1 root 1042: }
1043:
1044: // bb の共通部
1045: void
1046: m88100disasm::ops_bb(std::string namebase)
1047: {
1048: name = namebase;
1049: arg0 = b5();
1050: arg1 = rs1();
1051: arg2 = d16();
1052: }
1053:
1054: // 110100_nnnnnSSSSS_nnnnnn_nnnnnnnnnn
1055: OP_DEF(bb0)
1056: {
1057: ops_bb("bb0");
1058: }
1059:
1060: // 110101_nnnnnSSSSS_nnnnnn_nnnnnnnnnn
1061: OP_DEF(bb0_n)
1062: {
1063: ops_bb("bb0.n");
1064: }
1065:
1066: // 110110_nnnnnSSSSS_nnnnnn_nnnnnnnnnn
1067: OP_DEF(bb1)
1068: {
1069: ops_bb("bb1");
1070: }
1071:
1072: // 110111_nnnnnSSSSS_nnnnnn_nnnnnnnnnn
1073: OP_DEF(bb1_n)
1074: {
1075: ops_bb("bb1.n");
1076: }
1077:
1078: void
1079: m88100disasm::ops_bcnd(std::string namebase)
1080: {
1081: name = namebase;
1082: arg0 = m5();
1083: arg1 = rs1();
1084: arg2 = d16();
1085: }
1086:
1087: // 111010_MMMMMSSSSS_nnnnnn_nnnnnnnnnn
1088: OP_DEF(bcnd)
1089: {
1090: ops_bcnd("bcnd");
1091: }
1092:
1093: // 111011_MMMMMSSSSS_nnnnnn_nnnnnnnnnn
1094: OP_DEF(bcnd_n)
1095: {
1096: ops_bcnd("bcnd.n");
1097: }
1098:
1099: // 111100_DDDDDSSSSS_100000_wwwwwooooo
1100: OP_DEF(clr_1)
1101: {
1102: name = "clr";
1103: arg0 = rd();
1104: arg1 = rs1();
1105: arg2 = wo5();
1.1.1.7 root 1106:
1107: if (DD == 0) {
1108: altname = "nop";
1109: } else {
1110: altarg0 = rd();
1111: altarg1 = rs1();
1112: auto w5 = W5 ?: 32;
1113: if (w5 == 1) {
1114: altname = "bitclr";
1115: altarg2 = string_format("#%d", O5);
1116: } else {
1117: // XXX 表記はもうちょっと考える…
1118: altname = "bfclr";
1119: altarg2 = wo5();
1120: }
1121: }
1.1 root 1122: }
1123:
1124: // 111100_DDDDDSSSSS_100010_wwwwwooooo
1125: OP_DEF(set_1)
1126: {
1127: name = "set";
1128: arg0 = rd();
1129: arg1 = rs1();
1130: arg2 = wo5();
1.1.1.7 root 1131:
1132: if (DD == 0) {
1133: altname = "nop";
1134: } else {
1135: altarg0 = rd();
1136: altarg1 = rs1();
1137: auto w5 = W5 ?: 32;
1138: if (w5 == 1) {
1139: altname = "bitset";
1140: altarg2 = string_format("#%d", O5);
1141: } else {
1142: // XXX 表記はもうちょっと考える…
1143: altname = "bfset";
1144: altarg2 = wo5();
1145: }
1146: }
1.1 root 1147: }
1148:
1149: // 111100_DDDDDSSSSS_100100_wwwwwooooo
1150: OP_DEF(ext_1)
1151: {
1152: name = "ext";
1153: arg0 = rd();
1154: arg1 = rs1();
1155: arg2 = wo5();
1.1.1.7 root 1156:
1157: // rd s1 imm
1158: // ----------
1159: // r0 * * nop
1160: // rd r0 w:o clr rd
1161: // rd rd 32:o asr rd, #o
1162: // rd s1 32:o asr rd, s1, #o
1163: // rd rd w:o bfexts rd, w:o
1164: // rd s1 w:o bfexts rd, s1, w:o
1165:
1166: if (DD == 0) {
1167: altname = "nop";
1168: } else if (S1 == 0) {
1169: altname = "clr";
1170: altarg0 = rd();
1171: } else if (W5 == 0 || W5 + O5 >= 32) {
1172: // W5 + O5 >= 32 なら単純なシフトに相当
1173: altname = "asr";
1174: altarg0 = rd();
1175: if (DD != S1) {
1176: altarg1 = rs1();
1177: }
1178: altarg2 = string_format("#%d", O5);
1179: } else {
1180: altname = "bfexts";
1181: altarg0 = rd();
1182: if (DD != S1) {
1183: altarg1 = rs1();
1184: }
1185: altarg2 = wo5();
1186: }
1.1 root 1187: }
1188:
1189: // 111100_DDDDDSSSSS_100110_wwwwwooooo
1190: OP_DEF(extu_1)
1191: {
1192: name = "extu";
1193: arg0 = rd();
1194: arg1 = rs1();
1195: arg2 = wo5();
1.1.1.7 root 1196:
1197: // rd s1 imm
1198: // ----------
1199: // r0 * * nop
1200: // rd r0 w:o clr rd
1201: // rd rd 32:o lsr rd, #o
1202: // rd s1 32:o lsr rd, s1, #o
1203: // rd rd w:o bfextu rd, w:o
1204: // rd s1 w:o bfextu rd, s1, w:o
1205:
1206: if (DD == 0) {
1207: altname = "nop";
1208: } else if (S1 == 0) {
1209: altname = "clr";
1210: altarg0 = rd();
1211: } else if (W5 == 0 || W5 + O5 >= 32) {
1212: // W5 + O5 >= 32 なら単純なシフトに相当
1213: altname = "lsr";
1214: altarg0 = rd();
1215: if (DD != S1) {
1216: altarg1 = rs1();
1217: }
1218: altarg2 = string_format("#%d", O5);
1219: } else {
1220: altname = "bfextu";
1221: altarg0 = rd();
1222: if (DD != S1) {
1223: altarg1 = rs1();
1224: }
1225: altarg2 = wo5();
1226: }
1.1 root 1227: }
1228:
1229: // 111100_DDDDDSSSSS_101000_wwwwwooooo
1230: OP_DEF(mak_1)
1231: {
1232: name = "mak";
1233: arg0 = rd();
1234: arg1 = rs1();
1235: arg2 = wo5();
1.1.1.7 root 1236:
1237: // rd s1 imm
1238: // ----------
1239: // r0 * * nop
1240: // rd r0 w:o clr rd
1241: // rd rd 32:o lsl rd, #o
1242: // rd s1 32:o lsl rd, s1, #o
1243: // rd rd w:o bfmak rd, w:o
1244: // rd s1 w:o bfmak rd, s1, w:o
1245:
1246: if (DD == 0) {
1247: altname = "nop";
1248: } else if (S1 == 0) {
1249: altname = "clr";
1250: altarg0 = rd();
1251: } else if (W5 == 0 || W5 + O5 >= 32) {
1252: // W5 + O5 >= 32 なら単純なシフトに相当
1253: altname = "lsl";
1254: altarg0 = rd();
1255: if (DD != S1) {
1256: altarg1 = rs1();
1257: }
1258: altarg2 = string_format("#%d", O5);
1259: } else {
1260: // XXX 名前から動作が想像しづらいのがつらいのだが、とりあえず後回し
1261: altname = "bfmak";
1262: altarg0 = rd();
1263: if (DD != S1) {
1264: altarg1 = rs1();
1265: }
1266: altarg2 = wo5();
1267: }
1.1 root 1268: }
1269:
1270: // 111100_DDDDDSSSSS_101010_zzzzzooooo
1271: OP_DEF(rot_1)
1272: {
1273: name = "rot";
1274: arg0 = rd();
1275: arg1 = rs1();
1276: arg2 = string_format("<%d>", O5);
1.1.1.7 root 1277:
1278: // rd s1 offset
1279: // ----------
1280: // r0 * * nop
1281: // rd rd #0 nop
1282: // rd r0 * clr rd
1283: // rd rd 1-16 ror rd, #1-16
1284: // rd s1 1-16 ror rd, s1, #1-16
1285: // rd rd 17-31 rol rd, #1-15
1286: // rd s1 17-31 rol rd, s1, #1-15
1287:
1288: if (DD == 0) {
1289: altname = "nop";
1290: } else if (S1 == 0) {
1291: altname = "clr";
1292: altarg0 = rd();
1293: } else if (O5 == 0) {
1294: if (DD == S1) {
1295: altname = "nop";
1296: } else {
1297: altname = "clr";
1298: altarg0 = rd();
1299: }
1300: } else {
1301: // どう表記するのがいいかは状況によるかも知れないが
1302: // 1-16ビット(右)ローテートなら ror #0-16、
1303: // 17-31ビット(右)ローテートなら rol #1-15 としてみる
1304: auto offset = O5;
1305: if (offset > 16) {
1306: altname = "rol";
1307: offset = 32 - offset;
1308: } else {
1309: altname = "ror";
1310: }
1311: altarg0 = rd();
1312: if (DD != S1) {
1313: altarg1 = rs1();
1314: }
1315: altarg2 = string_format("#%d", offset);
1316: }
1.1 root 1317: }
1318:
1319: void
1320: m88100disasm::ops_tb(std::string namebase)
1321: {
1322: name = namebase;
1323: arg0 = b5();
1324: arg1 = rs1();
1325: arg2 = vec9();
1326: }
1327:
1328: // 111100_bbbbbSSSSS_110100_0vvvvvvvvv
1329: OP_DEF(tb0)
1330: {
1331: ops_tb("tb0");
1332: }
1333:
1334: // 111100_bbbbbSSSSS_110110_0vvvvvvvvv
1335: OP_DEF(tb1)
1336: {
1.1.1.7 root 1337: ops_tb("tb1");
1338:
1339: if (S1 == 0) {
1.1.1.2 root 1340: // tb1 *,r0,* はパイプライン同期を目的として使われる。
1341: // この形式はトラップは発生しない。
1342: if (VEC9 < 128) {
1.1.1.7 root 1343: altname = "ssync";
1.1.1.2 root 1344: } else {
1.1.1.7 root 1345: altname = "usync";
1.1.1.2 root 1346: }
1347: }
1.1 root 1348: }
1349:
1350: // 111100_MMMMMSSSSS_111010_0vvvvvvvvv
1351: OP_DEF(tcnd)
1352: {
1353: name = "tcnd";
1354: arg0 = m5();
1355: arg1 = rs1();
1356: arg2 = vec9();
1357: }
1358:
1359: // ld_reg, st_reg, xmem_reg の共通部
1.1.1.7 root 1360: // size は ".bu" などドットを含むサイズプレフィックス。
1.1 root 1361: void
1.1.1.7 root 1362: m88100disasm::ops_ldst_reg(const std::string& namebase, std::string size)
1.1 root 1363: {
1364: uint32 u = (opX >> 8) & 1;
1365: uint32 scaled = (opX >> 9) & 1;
1366:
1.1.1.7 root 1367: name = namebase + size;
1.1 root 1368: if (u) {
1369: name += ".usr";
1370: }
1371: arg0 = rd();
1372: arg1 = rs1();
1373: if (scaled == 0) {
1374: arg2 = rs2();
1375: } else {
1376: arg1 += "[" + rs2() + "]";
1377: }
1.1.1.7 root 1378:
1379: // 別名
1380: // ld.bu.usr はサフィックスの使い方が節操なさすぎるし
1381: // ld と ld.usr はわりと違う命令なので、違う命令のように見せる。
1382: altname = namebase;
1383: if (u) {
1384: altname += "usr";
1385: }
1386: altname += size;
1387: altarg0 = rd();
1388:
1389: // メモリアクセスはは括弧を付けて表す。
1390: // lda はメモリアクセスではないので括弧なしのまま。
1391: //
1392: // rs1 rs2 scaled
1393: // --------------
1394: // r* r0 * ld rd, (r*)
1395: // r0 s2 no ld rd, (s2)
1396: // s1 s2 no ld rd, (s1,s2)
1397: // r0 s2 yes ld rd, (r0[s2])
1398: // s1 s2 yes ld rd, (s1[s2])
1399: if (S2 == 0) {
1400: altarg1 = rs1();
1401: } else {
1402: if (scaled == 0) {
1403: if (S1 == 0) {
1404: altarg1 = rs2();
1405: } else {
1406: altarg1 = rs1() + "," + rs2();
1407: }
1408: } else {
1409: altarg1 = rs1() + "[" + rs2() + "]";
1410: }
1411: }
1412: // 3文字目が 'a' になるのは lda しかない
1413: if (namebase[2] != 'a') {
1414: altarg1 = "(" + altarg1 + ")";
1415: }
1.1 root 1416: }
1417:
1418: // 111101_DDDDDSSSSS_000000_xU000sssss
1419: OP_DEF(xmem_bu)
1420: {
1.1.1.7 root 1421: ops_ldst_reg("xmem", ".bu");
1.1 root 1422: }
1423:
1424: // 111101_DDDDDSSSSS_000001_xU000sssss
1425: OP_DEF(xmem_w)
1426: {
1.1.1.7 root 1427: ops_ldst_reg("xmem", "");
1.1 root 1428: }
1429:
1430: // 111101_DDDDDSSSSS_000010_xU000sssss
1431: OP_DEF(ld_hu)
1432: {
1.1.1.7 root 1433: ops_ldst_reg("ld", ".hu");
1.1 root 1434: }
1435:
1436: // 111101_DDDDDSSSSS_000011_xU000sssss
1437: OP_DEF(ld_bu)
1438: {
1.1.1.7 root 1439: ops_ldst_reg("ld", ".bu");
1.1 root 1440: }
1441:
1442: // 111101_DDDDDSSSSS_000100_xU000sssss
1443: OP_DEF(ld_d)
1444: {
1.1.1.7 root 1445: ops_ldst_reg("ld", ".d");
1.1 root 1446: }
1447:
1448: // 111101_DDDDDSSSSS_000101_xU000sssss
1449: OP_DEF(ld_w)
1450: {
1.1.1.7 root 1451: ops_ldst_reg("ld", "");
1.1 root 1452: }
1453:
1454: // 111101_DDDDDSSSSS_000110_xU000sssss
1455: OP_DEF(ld_h)
1456: {
1.1.1.7 root 1457: ops_ldst_reg("ld", ".h");
1.1 root 1458: }
1459:
1460: // 111101_DDDDDSSSSS_000111_xU000sssss
1461: OP_DEF(ld_b)
1462: {
1.1.1.7 root 1463: ops_ldst_reg("ld", ".b");
1.1 root 1464: }
1465:
1466: // 111101_DDDDDSSSSS_001000_xU000sssss
1467: OP_DEF(st_d)
1468: {
1.1.1.7 root 1469: ops_ldst_reg("st", ".d");
1.1 root 1470: }
1471:
1472: // 111101_DDDDDSSSSS_001001_xU000sssss
1473: OP_DEF(st_w)
1474: {
1.1.1.7 root 1475: ops_ldst_reg("st", "");
1.1 root 1476: }
1477:
1478: // 111101_DDDDDSSSSS_001010_xU000sssss
1479: OP_DEF(st_h)
1480: {
1.1.1.7 root 1481: ops_ldst_reg("st", ".h");
1.1 root 1482: }
1483:
1484: // 111101_DDDDDSSSSS_001011_xU000sssss
1485: OP_DEF(st_b)
1486: {
1.1.1.7 root 1487: ops_ldst_reg("st", ".b");
1.1 root 1488: }
1489:
1490: // 111101_DDDDDSSSSS_001100_xU000sssss
1491: OP_DEF(lda_d)
1492: {
1493: // XXX bit8 が 1 だとどうなるのか
1.1.1.7 root 1494: ops_ldst_reg("lda", ".d");
1.1 root 1495: }
1496:
1497: // 111101_DDDDDSSSSS_001101_xU000sssss
1498: OP_DEF(lda_w)
1499: {
1500: // XXX bit8 が 1 だとどうなるのか
1.1.1.7 root 1501: ops_ldst_reg("lda", "");
1.1 root 1502: }
1503:
1504: // 111101_DDDDDSSSSS_001110_xU000sssss
1505: OP_DEF(lda_h)
1506: {
1507: // XXX bit8 が 1 だとどうなるのか
1.1.1.7 root 1508: ops_ldst_reg("lda", ".h");
1.1 root 1509: }
1510:
1511: // 111101_DDDDDSSSSS_001111_xU000sssss
1512: OP_DEF(lda_b)
1513: {
1514: // XXX bit8 が 1 だとどうなるのか
1.1.1.7 root 1515: ops_ldst_reg("lda", ".b");
1.1 root 1516: }
1517:
1518: // 111101_DDDDDSSSSS_010000_00000sssss
1519: OP_DEF(and)
1520: {
1521: name = "and";
1522: arg0 = rd();
1523: arg1 = rs1();
1524: arg2 = rs2();
1.1.1.7 root 1525:
1526: // rd s1 s2
1527: // ----------
1528: // r0 * * nop
1529: // rd r0 * clr rd
1530: // rd * r0 clr rd
1531: // rd rd rd nop
1532: // rd s1 s1 mov rd, s1
1533: // rd rd s2 and rd, s2
1534: // rd s1 s2 and rd, s1, s2
1535:
1536: if (DD == 0) {
1537: altname = "nop";
1538: } else if (S1 == 0 || S2 == 0) {
1539: altname = "clr";
1540: altarg0 = rd();
1541: } else if (S1 == S2) {
1542: altname = "mov";
1543: altarg0 = rd();
1544: altarg1 = rs1();
1545: } else {
1546: altname = "and";
1547: altarg0 = rd();
1548: if (DD != S1) {
1549: altarg1 = rs1();
1550: }
1551: if (DD != S2) {
1552: altarg2 = rs2();
1553: }
1554: }
1.1 root 1555: }
1556:
1557: // 111101_DDDDDSSSSS_010001_00000sssss
1558: OP_DEF(and_c)
1559: {
1560: name = "and.c";
1561: arg0 = rd();
1562: arg1 = rs1();
1563: arg2 = rs2();
1.1.1.7 root 1564:
1565: // rd s1 s2
1566: // ----------
1567: // r0 * * nop
1568: // rd r0 * clr rd
1569: // rd s1 r0 mov rd, s1
1570: // rd rd r0 nop
1571: // rd s1 s1 clr rd
1572: // rd s1 s2 and rd, s1, ~s2
1573:
1574: if (DD == 0) {
1575: altname = "nop";
1576: } else if (S1 == 0) {
1577: altname = "clr";
1578: altarg0 = rd();
1579: } else if (S2 == 0) {
1580: altname = "mov";
1581: altarg0 = rd();
1582: altarg1 = rs1();
1583: } else if (S1 == S2) {
1584: altname = "clr";
1585: altarg0 = rd();
1586: } else {
1587: altname = "and";
1588: altarg0 = rd();
1589: if (DD != S1) {
1590: altarg1 = rs1();
1591: }
1592: altarg2 = "~" + rs2();
1593: }
1.1 root 1594: }
1595:
1596: // 111101_DDDDDSSSSS_010100_00000sssss
1597: OP_DEF(xor)
1598: {
1599: name = "xor";
1600: arg0 = rd();
1601: arg1 = rs1();
1602: arg2 = rs2();
1.1.1.7 root 1603:
1604: // rd s1 s2
1605: // ----------
1606: // r0 * * nop
1607: // rd s1 s1 clr rd
1608: // rd r0 s2 mov rd, s2
1609: // rd s1 r0 mov rd, s1
1610: // rd s1 s2 xor rd, s1, s2
1611:
1612: if (DD == 0) {
1613: altname = "nop";
1614: } else if (S1 == S2) {
1615: altname = "clr";
1616: altarg0 = rd();
1617: } else if (S1 == 0) {
1618: altname = "mov";
1619: altarg0 = rd();
1620: altarg1 = rs2();
1621: } else if (S2 == 0) {
1622: altname = "mov";
1623: altarg0 = rd();
1624: altarg1 = rs1();
1625: } else {
1626: altname = "xor";
1627: altarg0 = rd();
1628: if (DD != S1) {
1629: altarg1 = rs1();
1630: }
1631: if (DD != S2) {
1632: altarg2 = rs2();
1633: }
1634: }
1.1 root 1635: }
1636:
1637: // 111101_DDDDDSSSSS_010101_00000sssss
1638: OP_DEF(xor_c)
1639: {
1640: name = "xor.c";
1641: arg0 = rd();
1642: arg1 = rs1();
1643: arg2 = rs2();
1.1.1.7 root 1644:
1645: // rd s1 s2
1646: // ----------
1647: // r0 * * nop
1648: // rd s1 s1 mov rd, #0xffffffff
1649: // rd r0 s2 not rd, s2
1650: // rd s1 r0 not rd, s1
1651: // rd s1 s2 xor rd, s1, ~s2
1652:
1653: if (DD == 0) {
1654: altname = "nop";
1655: } else if (S1 == S2) {
1656: altname = "mov";
1657: altarg0 = rd();
1658: altarg1 = "#0xffffffff";
1659: } else if (S1 == 0) {
1660: altname = "not";
1661: altarg0 = rd();
1662: if (DD != S2) {
1663: altarg1 = rs2();
1664: }
1665: } else if (S2 == 0) {
1666: altname = "not";
1667: altarg0 = rd();
1668: if (DD != S1) {
1669: altarg1 = rs1();
1670: }
1671: } else {
1672: altname = "xor";
1673: altarg0 = rd();
1674: if (DD != S1) {
1675: altarg1 = rs1();
1676: }
1677: altarg2 = "~" + rs2();
1678: }
1.1 root 1679: }
1680:
1681: // 111101_DDDDDSSSSS_010110_00000sssss
1682: OP_DEF(or)
1683: {
1.1.1.7 root 1684: name = "or";
1685: arg0 = rd();
1686: arg1 = rs1();
1687: arg2 = rs2();
1688:
1689: // rd s1 s2
1690: // ----------
1691: // r0 * * nop
1692: // rd r0 r0 clr rd
1693: // rd s1 s1 mov rd, s1
1694: // rd s1 r0 mov rd, s1
1695: // rd r0 s2 mov rd, s2
1696: // rd s1 s2 or rd, s1, s2
1697:
1698: if (DD == 0) {
1699: altname = "nop";
1700: } else if (S1 == 0 && S2 == 0) {
1701: altname = "clr";
1702: altarg0 = rd();
1703: } else if (S1 == S2 || S2 == 0) {
1704: altname = "mov";
1705: altarg0 = rd();
1706: altarg1 = rs1();
1707: } else if (S1 == 0) {
1708: altname = "mov";
1709: altarg0 = rd();
1710: altarg1 = rs2();
1.1.1.2 root 1711: } else {
1.1.1.7 root 1712: altname = "or";
1713: altarg0 = rd();
1714: if (DD != S1) {
1715: altarg1 = rs1();
1716: }
1717: if (DD != S2) {
1718: altarg2 = rs2();
1719: }
1.1.1.2 root 1720: }
1.1 root 1721: }
1722:
1723: // 111101_DDDDDSSSSS_010111_00000sssss
1724: OP_DEF(or_c)
1725: {
1726: name = "or.c";
1727: arg0 = rd();
1728: arg1 = rs1();
1729: arg2 = rs2();
1.1.1.7 root 1730:
1731: // rd s1 s2
1732: // ----------
1733: // r0 * * nop
1734: // rd s1 r0 mov rd, #0xffffffff
1735: // rd s1 s1 mov rd, #0xffffffff
1736: // rd r0 s2 not rd, s2
1737: // rd s1 s2 or rd, s1, ~s2
1738:
1739: if (DD == 0) {
1740: altname = "nop";
1741: } else if (S2 == 0 || S1 == S2) {
1742: altname = "mov";
1743: altarg0 = rd();
1744: altarg1 = "#0xffffffff";
1745: } else if (S1 == 0) {
1746: altname = "not";
1747: altarg0 = rd();
1748: if (DD != S2) {
1749: altarg1 = rs2();
1750: }
1751: } else {
1752: altname = "or";
1753: altarg0 = rd();
1754: if (DD != S1) {
1755: altarg1 = rs1();
1756: }
1757: altarg2 = "~" + rs2();
1758: }
1.1 root 1759: }
1760:
1761: // 111101_DDDDDSSSSS_011000_nn000sssss
1762: OP_DEF(addu)
1763: {
1764: name = "addu" + cio();
1765: arg0 = rd();
1766: arg1 = rs1();
1767: arg2 = rs2();
1.1.1.7 root 1768:
1769: if (CIO == 0) {
1770: // addu 無印の場合
1771: //
1772: // rd s1 s2
1773: // ----------
1774: // r0 * * nop
1775: // rd r0 r0 clr rd
1776: // rd s1 r0 mov rd, s1
1777: // rd r0 s2 mov rd, s2
1778: // rd s1 s2 add rd, s1, s2
1779:
1780: if (DD == 0) {
1781: altname = "nop";
1782: } else if (S1 == 0 && S2 == 0) {
1783: altname = "clr";
1784: altarg0 = rd();
1785: } else if (S1 == 0 || S2 == 0) {
1786: altname = "mov";
1787: altarg0 = rd();
1788: if (S1 == 0) {
1789: altarg1 = rs2();
1790: }
1791: if (S2 == 0) {
1792: altarg1 = rs1();
1793: }
1794: } else if (DD == S1 && DD == S2) {
1795: altname = "addu";
1796: altarg0 = rd();
1797: altarg1 = rs2();
1798: } else {
1799: altname = "addu";
1800: altarg0 = rd();
1801: if (DD != S1) {
1802: altarg1 = rs1();
1803: }
1804: if (DD != S2) {
1805: altarg2 = rs2();
1806: }
1807: }
1808: } else {
1809: // addu キャリー込み .ci/co/cio のほうは 2 オペランドへの省略のみ。
1810: // XXX addu の2項は交換可なので addu r1, r2, r1 は addu r1, r2 と
1811: // 省略できていいがそれには未対応。
1812: altname = "addu" + cio();
1813: altarg0 = rd();
1814: if (DD != S1) {
1815: altarg1 = rs1();
1816: }
1817: altarg2 = rs2();
1818: }
1.1 root 1819: }
1820:
1821: // 111101_DDDDDSSSSS_011001_nn000sssss
1822: OP_DEF(subu)
1823: {
1824: name = "subu" + cio();
1825: arg0 = rd();
1826: arg1 = rs1();
1827: arg2 = rs2();
1.1.1.7 root 1828:
1829: if (CIO == 0) {
1830: // subu 無印の場合
1831: //
1832: // rd s1 s2
1833: // ----------
1834: // r0 * * nop
1835: // rd s1 s1 clr rd
1836: // rd s1 r0 mov rd, s1
1837: // rd s1 s2 subu rd, s1, s2
1838:
1839: if (DD == 0) {
1840: altname = "nop";
1841: } else if (S1 == S2) {
1842: altname = "clr";
1843: altarg0 = rd();
1844: } else if (S2 == 0) {
1845: altname = "mov";
1846: altarg0 = rd();
1847: altarg1 = rs1();
1848: } else {
1849: altname = "subu";
1850: altarg0 = rd();
1851: if (DD != S1) {
1852: altarg1 = rs1();
1853: }
1854: altarg2 = rs2();
1855: }
1856: } else {
1857: // subu キャリー込み .ci/co/cio のほうは 2 オペランドへの省略のみ。
1858: altname = "subu" + cio();
1859: altarg0 = rd();
1860: if (DD != S1) {
1861: altarg1 = rs1();
1862: }
1863: altarg2 = rs2();
1864: }
1.1 root 1865: }
1866:
1867: // 111101_DDDDDSSSSS_011010_zz000sssss
1868: OP_DEF(divu)
1869: {
1870: name = "divu";
1871: arg0 = rd();
1872: arg1 = rs1();
1873: arg2 = rs2();
1.1.1.7 root 1874:
1875: // 例外が起きる可能性があるので 2オペランドへの省略のみ
1876: altname = "divu";
1877: altarg0 = rd();
1878: if (DD != S1) {
1879: altarg1 = rs1();
1880: }
1881: altarg2 = rs2();
1.1 root 1882: }
1883:
1884: // 111101_DDDDDSSSSS_011011_zz000sssss
1885: OP_DEF(mul)
1886: {
1887: name = "mul";
1888: arg0 = rd();
1889: arg1 = rs1();
1890: arg2 = rs2();
1.1.1.7 root 1891:
1892: // 例外が起きる可能性があるので 2オペランドへの省略のみ
1893: altname = "mul";
1894: altarg0 = rd();
1895: if (DD != S1) {
1896: altarg1 = rs1();
1897: }
1898: altarg2 = rs2();
1.1 root 1899: }
1900:
1901: // 111101_DDDDDSSSSS_011100_nn000sssss
1902: OP_DEF(add)
1903: {
1904: name = "add" + cio();
1905: arg0 = rd();
1906: arg1 = rs1();
1907: arg2 = rs2();
1.1.1.7 root 1908:
1909: if (CIO == 0) {
1910: // add 無印は符号付きなので、より明示的な adds を使う。
1911: // 符号付き加算ではオーバーフローが起きる可能性があるため、
1912: // rD が r0 であってもただちに nop とはならない。
1913: // 一方 r0 を加算する場合は何も起きないので圧縮表記したい。
1914:
1915: // rd s1 s2
1916: // ----------
1917: // rd r0 r0 clr rd
1918: // r0 r0 rd nop
1919: // rd r0 rd nop
1920: // rd r0 s2 mov rd, s2
1921: // rd rd r0 nop
1922: // rd s1 r0 mov rd, s1
1923: // rd s1 s2 adds rd, s1, s2
1924:
1925: if (S1 == 0 && S2 == 0) {
1926: if (DD == 0) {
1927: altname = "nop";
1928: } else {
1929: altname = "clr";
1930: altarg0 = rd();
1931: }
1932: } else if (S1 == 0) {
1933: if (DD == 0) {
1934: altname = "nop";
1935: } else {
1936: altname = "mov";
1937: altarg0 = rd();
1938: altarg1 = rs2();
1939: }
1940: } else if (S2 == 0) {
1941: if (DD == 0) {
1942: altname = "nop";
1943: } else {
1944: altname = "mov";
1945: altarg0 = rd();
1946: altarg1 = rs1();
1947: }
1948: } else {
1949: altname = "adds";
1950: altarg0 = rd();
1951: if (DD != S1) {
1952: altarg1 = rs1();
1953: }
1954: altarg2 = rs2();
1955: }
1956: } else {
1957: // adds キャリー込み .ci/co/cio のほうは 2 オペランドへの省略のみ。
1958: altname = "adds" + cio();
1959: altarg0 = rd();
1960: if (DD != S1) {
1961: altarg1 = rs1();
1962: }
1963: altarg2 = rs2();
1964: }
1.1 root 1965: }
1966:
1967: // 111101_DDDDDSSSSS_011101_nn000sssss
1968: OP_DEF(sub)
1969: {
1970: name = "sub" + cio();
1971: arg0 = rd();
1972: arg1 = rs1();
1973: arg2 = rs2();
1.1.1.7 root 1974:
1975: if (CIO == 0) {
1976: // sub 無印は符号付きなので、より明示的な subs を使う。
1977: // 符号付き減算ではオーバーフローが起きる可能性があるため、
1978: // rD が r0 であってもただちに nop とはならない。
1979: // 一方 r0 を減算する場合は何も起きないので圧縮表記したい。
1980:
1981: // rd s1 s2
1982: // ----------
1983: // rd rd r0 nop
1984: // rd r0 r0 clr rd
1985: // rd s1 r0 mov rd, s1
1986: // rd s1 s2 subs rd, s1, s2
1987:
1988: if (S1 == 0 && S2 == 0) {
1989: if (DD == 0) {
1990: altname = "nop";
1991: } else {
1992: altname = "clr";
1993: altarg0 = rd();
1994: }
1995: } else if (S2 == 0) {
1996: if (DD == 0) {
1997: altname = "nop";
1998: } else {
1999: altname = "mov";
2000: altarg0 = rd();
2001: altarg1 = rs1();
2002: }
2003: } else {
2004: altname = "subs";
2005: altarg0 = rd();
2006: if (DD != S1) {
2007: altarg1 = rs1();
2008: }
2009: altarg2 = rs2();
2010: }
2011: } else {
2012: // subs キャリー込み .ci/co/cio のほうは 2 オペランドへの省略のみ。
2013: altname = "subs" + cio();
2014: altarg0 = rd();
2015: if (DD != S1) {
2016: altarg1 = rs1();
2017: }
2018: altarg2 = rs2();
2019: }
1.1 root 2020: }
2021:
2022: // 111101_DDDDDSSSSS_011110_zz000sssss
2023: OP_DEF(div)
2024: {
2025: name = "div";
2026: arg0 = rd();
2027: arg1 = rs1();
2028: arg2 = rs2();
1.1.1.7 root 2029:
2030: // 例外が起きる可能性があるので 2オペランドへの省略のみ
2031: altname = "div";
2032: altarg0 = rd();
2033: if (DD != S1) {
2034: altarg1 = rs1();
2035: }
2036: altarg2 = rs2();
1.1 root 2037: }
2038:
2039: // 111101_DDDDDSSSSS_011111_zz000sssss
2040: OP_DEF(cmp)
2041: {
2042: name = "cmp";
2043: arg0 = rd();
2044: arg1 = rs1();
2045: arg2 = rs2();
1.1.1.7 root 2046:
2047: // cmp r0,*,* 以外は別表記を用意する必要ない
2048: if (DD == 0) {
2049: altname = "nop";
2050: }
1.1 root 2051: }
2052:
2053: // 111101_DDDDDSSSSS_100000_00000sssss
2054: OP_DEF(clr_2)
2055: {
2056: name = "clr";
2057: arg0 = rd();
2058: arg1 = rs1();
2059: arg2 = rs2();
1.1.1.7 root 2060:
2061: // rd s1 s2
2062: // ----------
2063: // r0 * * nop
2064: // rd r0 s2 clr rd
2065: // rd s1 r0 mov rd, s1
2066: // rd rd s2 bfclr rd, s2
2067: // rd s1 s2 bfclr rd, s1, s2
2068:
2069: if (DD == 0) {
2070: altname = "nop";
2071: } else if (S1 == 0) {
2072: altname = "clr";
2073: altarg0 = rd();
2074: } else if (S2 == 0) {
2075: altname = "mov";
2076: altarg0 = rd();
2077: altarg1 = rs1();
2078: } else {
2079: altname = "bfclr";
2080: altarg0 = rd();
2081: if (DD != S1) {
2082: altarg1 = rs1();
2083: }
2084: altarg2 = rs2();
2085: }
1.1 root 2086: }
2087:
2088: // 111101_DDDDDSSSSS_100010_00000sssss
2089: OP_DEF(set_2)
2090: {
2091: name = "set";
2092: arg0 = rd();
2093: arg1 = rs1();
2094: arg2 = rs2();
1.1.1.7 root 2095:
2096: // rd s1 s2
2097: // ----------
2098: // r0 * * nop
2099: // rd s1 r0 mov rd, #0xffffffff
2100: // rd rd s2 bfset rd, s2
2101: // rd s1 s2 bfset rd, s1, s2
2102:
2103: if (DD == 0) {
2104: altname = "nop";
2105: } else if (S2 == 0) {
2106: altname = "mov";
2107: altarg0 = rd();
2108: altarg1 = "#0xffffffff";
2109: } else {
2110: altname = "bfset";
2111: altarg0 = rd();
2112: if (DD != S1) {
2113: altarg1 = rs1();
2114: }
2115: altarg2 = rs2();
2116: }
1.1 root 2117: }
2118:
2119: // 111101_DDDDDSSSSS_100100_00000sssss
2120: OP_DEF(ext_2)
2121: {
2122: name = "ext";
2123: arg0 = rd();
2124: arg1 = rs1();
2125: arg2 = rs2();
1.1.1.7 root 2126:
2127: // rd s1 s2
2128: // ----------
2129: // r0 * * nop
2130: // rd s1 r0 mov rd, s1
2131: // rd rd s2 bfexts rd, s2
2132: // rd s1 s2 bfexts rd, s1, s2
2133:
2134: if (DD == 0) {
2135: altname = "nop";
2136: } else if (S2 == 0) {
2137: altname = "mov";
2138: altarg0 = rd();
2139: altarg1 = rs1();
2140: } else {
2141: altname = "bfexts";
2142: altarg0 = rd();
2143: if (DD != S1) {
2144: altarg1 = rs1();
2145: }
2146: altarg2 = rs2();
2147: }
1.1 root 2148: }
2149:
2150: // 111101_DDDDDSSSSS_100110_00000sssss
2151: OP_DEF(extu_2)
2152: {
2153: name = "extu";
2154: arg0 = rd();
2155: arg1 = rs1();
2156: arg2 = rs2();
1.1.1.7 root 2157:
2158: // rd s1 s2
2159: // ----------
2160: // r0 * * nop
2161: // rd s1 r0 mov rd, s1
2162: // rd rd s2 bfextu rd, s2
2163: // rd s1 s2 bfextu rd, s1, s2
2164:
2165: if (DD == 0) {
2166: altname = "nop";
2167: } else if (S2 == 0) {
2168: altname = "mov";
2169: altarg0 = rd();
2170: altarg1 = rs1();
2171: } else {
2172: altname = "bfextu";
2173: altarg0 = rd();
2174: if (DD != S1) {
2175: altarg1 = rs1();
2176: }
2177: altarg2 = rs2();
2178: }
1.1 root 2179: }
2180:
2181: // 111101_DDDDDSSSSS_101000_00000sssss
2182: OP_DEF(mak_2)
2183: {
2184: name = "mak";
2185: arg0 = rd();
2186: arg1 = rs1();
2187: arg2 = rs2();
1.1.1.7 root 2188:
2189: // rd s1 s2
2190: // ----------
2191: // r0 * * nop
2192: // rd r0 s2 clr rd
2193: // rd s1 r0 mov rd, s1
2194: // rd s1 s2 bfmak rd, s1, s2
2195:
2196: if (DD == 0) {
2197: altname = "nop";
2198: } else if (S1 == 0) {
2199: altname = "clr";
2200: altarg0 = rd();
2201: } else if (S2 == 0) {
2202: altname = "mov";
2203: altarg0 = rd();
2204: altarg1 = rs1();
2205: } else {
2206: altname = "bfmak";
2207: altarg0 = rd();
2208: if (DD != S1) {
2209: altarg1 = rs1();
2210: }
2211: altarg2 = rs2();
2212: }
1.1 root 2213: }
2214:
2215: // 111101_DDDDDSSSSS_101010_00000sssss
2216: OP_DEF(rot_2)
2217: {
2218: name = "rot";
2219: arg0 = rd();
2220: arg1 = rs1();
2221: arg2 = rs2();
1.1.1.7 root 2222:
2223: // rd s1 s2
2224: // ----------
2225: // r0 * * nop
2226: // rd r0 s2 clr rd
2227: // rd s1 r0 mov rd, s1
2228: // rd s1 s2 ror rd, s1, s2
2229:
2230: if (DD == 0) {
2231: altname = "nop";
2232: } else if (S1 == 0) {
2233: altname = "clr";
2234: altarg0 = rd();
2235: } else if (S2 == 0) {
2236: altname = "mov";
2237: altarg0 = rd();
2238: altarg1 = rs1();
2239: } else {
2240: altname = "ror";
2241: altarg0 = rd();
2242: if (DD != S1) {
2243: altarg1 = rs1();
2244: }
2245: altarg2 = rs2();
2246: }
1.1 root 2247: }
2248:
2249: // 111101_zzzzzzzzzz_110000_00000sssss
2250: OP_DEF(jmp)
2251: {
2252: name = "jmp";
2253: arg0 = rs2();
2254: }
2255:
2256: // 111101_zzzzzzzzzz_110001_00000sssss
2257: OP_DEF(jmp_n)
2258: {
2259: name = "jmp.n";
2260: arg0 = rs2();
2261: }
2262:
2263: // 111101_zzzzzzzzzz_110010_00000sssss
2264: OP_DEF(jsr)
2265: {
2266: name = "jsr";
2267: arg0 = rs2();
2268: }
2269:
2270: // 111101_zzzzzzzzzz_110011_00000sssss
2271: OP_DEF(jsr_n)
2272: {
2273: name = "jsr.n";
2274: arg0 = rs2();
2275: }
2276:
1.1.1.2 root 2277: // 111101_DDDDDzzzzz_111010_00000sssss
2278: OP_DEF(ff1)
2279: {
2280: name = "ff1";
2281: arg0 = rd();
2282: arg1 = rs2();
1.1.1.7 root 2283:
2284: // rd s2
2285: // ------
2286: // r0 * nop
2287: // rd r0 mov rd, #32
2288: // rd s2 ff1 rd, s2
2289:
2290: if (DD == 0) {
2291: altname = "nop";
2292: } else if (S2 == 0) {
2293: altname = "mov";
2294: altarg0 = rd();
2295: altarg1 = "#32";
2296: } else {
2297: altname = "ff1";
2298: altarg0 = rd();
2299: altarg1 = rs2();
2300: }
1.1.1.2 root 2301: }
2302:
2303: // 111101_DDDDDzzzzz_111011_00000sssss
2304: OP_DEF(ff0)
2305: {
2306: name = "ff0";
2307: arg0 = rd();
2308: arg1 = rs2();
1.1.1.7 root 2309:
2310: // rd s2
2311: // ------
2312: // r0 * nop
2313: // rd r0 clr rd
2314: // rd s2 ff0 rd, s2
2315:
2316: if (DD == 0) {
2317: altname = "nop";
2318: } else if (S2 == 0) {
2319: altname = "clr";
2320: altarg0 = rd();
2321: } else {
2322: altname = "ff0";
2323: altarg0 = rd();
2324: altarg1 = rs2();
2325: }
1.1.1.2 root 2326: }
2327:
1.1 root 2328: // 111101_zzzzzzzzzz_111111_0000000000
2329: OP_DEF(rte)
2330: {
2331: name = "rte";
2332: }
2333:
2334: // 111101_zzzzzSSSSS_111110_00000SSSSS
2335: OP_DEF(tbnd_1)
2336: {
2337: name = "tbnd";
2338: arg1 = rs1();
2339: arg2 = rs2();
2340: }
2341:
2342: // 111110_zzzzzSSSSS_nnnnnn_nnnnnnnnnn
2343: OP_DEF(tbnd_2)
2344: {
2345: name = "tbnd";
2346: arg1 = rs1();
2347: arg2 = imm16();
2348: }
2349:
1.1.1.7 root 2350: // 111111_DDDDDSSSSS_000001_00nnnnnnnn
2351: OP_DEF(doscall)
1.1 root 2352: {
1.1.1.7 root 2353: name = "doscall";
2354: arg0 = rd();
2355: arg1 = rs1();
2356: arg2 = string_format("#0x%02x", (opX & 0xff));
1.1 root 2357: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.