1 /*****************************************************************************/
5 /* Opcode and addressing mode definitions */
9 /* (C) 2001 Ullrich von Bassewitz */
11 /* D-70597 Stuttgart */
12 /* EMail: uz@cc65.org */
15 /* This software is provided 'as-is', without any expressed or implied */
16 /* warranty. In no event will the authors be held liable for any damages */
17 /* arising from the use of this software. */
19 /* Permission is granted to anyone to use this software for any purpose, */
20 /* including commercial applications, and to alter it and redistribute it */
21 /* freely, subject to the following restrictions: */
23 /* 1. The origin of this software must not be misrepresented; you must not */
24 /* claim that you wrote the original software. If you use this software */
25 /* in a product, an acknowledgment in the product documentation would be */
26 /* appreciated but is not required. */
27 /* 2. Altered source versions must be plainly marked as such, and must not */
28 /* be misrepresented as being the original software. */
29 /* 3. This notice may not be removed or altered from any source */
32 /*****************************************************************************/
51 /*****************************************************************************/
53 /*****************************************************************************/
57 /* Opcode description table */
58 const OPCDesc OPCTable[OPCODE_COUNT] = {
61 { OP65_ADC, /* opcode */
68 { OP65_AND, /* opcode */
75 { OP65_ASL, /* opcode */
82 { OP65_BCC, /* opcode */
89 { OP65_BCS, /* opcode */
96 { OP65_BEQ, /* opcode */
101 OF_CBRA | OF_ZBRA | OF_FBRA /* flags */
103 { OP65_BIT, /* opcode */
104 "bit", /* mnemonic */
110 { OP65_BMI, /* opcode */
111 "bmi", /* mnemonic */
115 OF_CBRA | OF_FBRA /* flags */
117 { OP65_BNE, /* opcode */
118 "bne", /* mnemonic */
122 OF_CBRA | OF_ZBRA | OF_FBRA /* flags */
124 { OP65_BPL, /* opcode */
125 "bpl", /* mnemonic */
129 OF_CBRA | OF_FBRA /* flags */
131 { OP65_BRA, /* opcode */
132 "bra", /* mnemonic */
138 { OP65_BRK, /* opcode */
139 "brk", /* mnemonic */
145 { OP65_BVC, /* opcode */
146 "bvc", /* mnemonic */
152 { OP65_BVS, /* opcode */
153 "bvs", /* mnemonic */
159 { OP65_CLC, /* opcode */
160 "clc", /* mnemonic */
166 { OP65_CLD, /* opcode */
167 "cld", /* mnemonic */
173 { OP65_CLI, /* opcode */
174 "cli", /* mnemonic */
180 { OP65_CLV, /* opcode */
181 "clv", /* mnemonic */
187 { OP65_CMP, /* opcode */
188 "cmp", /* mnemonic */
194 { OP65_CPX, /* opcode */
195 "cpx", /* mnemonic */
201 { OP65_CPY, /* opcode */
202 "cpy", /* mnemonic */
208 { OP65_DEA, /* opcode */
209 "dea", /* mnemonic */
213 OF_REG_INCDEC | OF_SETF /* flags */
215 { OP65_DEC, /* opcode */
216 "dec", /* mnemonic */
222 { OP65_DEX, /* opcode */
223 "dex", /* mnemonic */
227 OF_REG_INCDEC | OF_SETF /* flags */
229 { OP65_DEY, /* opcode */
230 "dey", /* mnemonic */
234 OF_REG_INCDEC | OF_SETF /* flags */
236 { OP65_EOR, /* opcode */
237 "eor", /* mnemonic */
243 { OP65_INA, /* opcode */
244 "ina", /* mnemonic */
248 OF_REG_INCDEC | OF_SETF /* flags */
250 { OP65_INC, /* opcode */
251 "inc", /* mnemonic */
257 { OP65_INX, /* opcode */
258 "inx", /* mnemonic */
262 OF_REG_INCDEC | OF_SETF /* flags */
264 { OP65_INY, /* opcode */
265 "iny", /* mnemonic */
269 OF_REG_INCDEC | OF_SETF /* flags */
271 { OP65_JCC, /* opcode */
272 "jcc", /* mnemonic */
276 OF_CBRA | OF_LBRA /* flags */
278 { OP65_JCS, /* opcode */
279 "jcs", /* mnemonic */
283 OF_CBRA | OF_LBRA /* flags */
285 { OP65_JEQ, /* opcode */
286 "jeq", /* mnemonic */
290 OF_CBRA | OF_LBRA | OF_ZBRA | OF_FBRA /* flags */
292 { OP65_JMI, /* opcode */
293 "jmi", /* mnemonic */
297 OF_CBRA | OF_LBRA | OF_FBRA /* flags */
299 { OP65_JMP, /* opcode */
300 "jmp", /* mnemonic */
304 OF_UBRA | OF_LBRA /* flags */
306 { OP65_JNE, /* opcode */
307 "jne", /* mnemonic */
311 OF_CBRA | OF_LBRA | OF_ZBRA | OF_FBRA /* flags */
313 { OP65_JPL, /* opcode */
314 "jpl", /* mnemonic */
318 OF_CBRA | OF_LBRA | OF_FBRA /* flags */
320 { OP65_JSR, /* opcode */
321 "jsr", /* mnemonic */
327 { OP65_JVC, /* opcode */
328 "jvc", /* mnemonic */
332 OF_CBRA | OF_LBRA /* flags */
334 { OP65_JVS, /* opcode */
335 "jvs", /* mnemonic */
339 OF_CBRA | OF_LBRA /* flags */
341 { OP65_LDA, /* opcode */
342 "lda", /* mnemonic */
346 OF_LOAD | OF_SETF /* flags */
348 { OP65_LDX, /* opcode */
349 "ldx", /* mnemonic */
353 OF_LOAD | OF_SETF /* flags */
355 { OP65_LDY, /* opcode */
356 "ldy", /* mnemonic */
360 OF_LOAD | OF_SETF /* flags */
362 { OP65_LSR, /* opcode */
363 "lsr", /* mnemonic */
369 { OP65_NOP, /* opcode */
370 "nop", /* mnemonic */
376 { OP65_ORA, /* opcode */
377 "ora", /* mnemonic */
383 { OP65_PHA, /* opcode */
384 "pha", /* mnemonic */
390 { OP65_PHP, /* opcode */
391 "php", /* mnemonic */
397 { OP65_PHX, /* opcode */
398 "phx", /* mnemonic */
404 { OP65_PHY, /* opcode */
405 "phy", /* mnemonic */
411 { OP65_PLA, /* opcode */
412 "pla", /* mnemonic */
418 { OP65_PLP, /* opcode */
419 "plp", /* mnemonic */
425 { OP65_PLX, /* opcode */
426 "plx", /* mnemonic */
432 { OP65_PLY, /* opcode */
433 "ply", /* mnemonic */
439 { OP65_ROL, /* opcode */
440 "rol", /* mnemonic */
446 { OP65_ROR, /* opcode */
447 "ror", /* mnemonic */
453 { OP65_RTI, /* opcode */
454 "rti", /* mnemonic */
460 { OP65_RTS, /* opcode */
461 "rts", /* mnemonic */
467 { OP65_SBC, /* opcode */
468 "sbc", /* mnemonic */
474 { OP65_SEC, /* opcode */
475 "sec", /* mnemonic */
481 { OP65_SED, /* opcode */
482 "sed", /* mnemonic */
488 { OP65_SEI, /* opcode */
489 "sei", /* mnemonic */
495 { OP65_STA, /* opcode */
496 "sta", /* mnemonic */
502 { OP65_STX, /* opcode */
503 "stx", /* mnemonic */
509 { OP65_STY, /* opcode */
510 "sty", /* mnemonic */
516 { OP65_TAX, /* opcode */
517 "tax", /* mnemonic */
521 OF_XFR | OF_SETF /* flags */
523 { OP65_TAY, /* opcode */
524 "tay", /* mnemonic */
528 OF_XFR | OF_SETF /* flags */
530 { OP65_TRB, /* opcode */
531 "trb", /* mnemonic */
537 { OP65_TSB, /* opcode */
538 "tsb", /* mnemonic */
544 { OP65_TSX, /* opcode */
545 "tsx", /* mnemonic */
549 OF_XFR | OF_SETF /* flags */
551 { OP65_TXA, /* opcode */
552 "txa", /* mnemonic */
556 OF_XFR | OF_SETF /* flags */
558 { OP65_TXS, /* opcode */
559 "txs", /* mnemonic */
565 { OP65_TYA, /* opcode */
566 "tya", /* mnemonic */
570 OF_XFR | OF_SETF /* flags */
576 /*****************************************************************************/
578 /*****************************************************************************/
582 static int FindCmp (const void* Key, const void* Desc)
583 /* Compare function for FindOpcode */
585 return strcmp (Key, ((OPCDesc*)Desc)->Mnemo);
590 const OPCDesc* FindOP65 (const char* M)
591 /* Find the given opcode and return the opcode number. If the opcode was not
592 * found, return NULL.
598 /* Check the length of the given string, then copy it into local
599 * storage, converting it to upper case.
601 char Mnemo[sizeof (OPCTable[0].Mnemo)];
603 if (Len >= sizeof (OPCTable[0].Mnemo)) {
604 /* Invalid length means invalid opcode */
607 for (I = 0; I < Len; ++I) {
608 Mnemo[I] = tolower (M[I]);
612 /* Search for the mnemonic in the table and return the result */
613 return bsearch (Mnemo, OPCTable+OP65_FIRST, OP65_COUNT,
614 sizeof (OPCTable[0]), FindCmp );
619 unsigned GetInsnSize (opc_t OPC, am_t AM)
620 /* Return the size of the given instruction */
622 /* Get the opcode desc and check the size given there */
623 const OPCDesc* D = &OPCTable[OPC];
628 /* Check the addressing mode. */
630 case AM65_IMP: return 1;
631 case AM65_ACC: return 1;
632 case AM65_IMM: return 2;
633 case AM65_ZP: return 2;
634 case AM65_ZPX: return 2;
635 case AM65_ABS: return 3;
636 case AM65_ABSX: return 3;
637 case AM65_ABSY: return 3;
638 case AM65_ZPX_IND: return 2;
639 case AM65_ZP_INDY: return 2;
640 case AM65_ZP_IND: return 2;
642 Internal ("Invalid addressing mode");
649 unsigned char GetAMUseInfo (am_t AM)
650 /* Get usage info for the given addressing mode (addressing modes that use
651 * index registers return REG_r info for these registers).
654 /* Check the addressing mode. */
656 case AM65_ACC: return REG_A;
657 case AM65_ZPX: return REG_X;
658 case AM65_ABSX: return REG_X;
659 case AM65_ABSY: return REG_Y;
660 case AM65_ZPX_IND: return REG_X;
661 case AM65_ZP_INDY: return REG_Y;
662 default: return REG_NONE;
668 opc_t GetInverseBranch (opc_t OPC)
669 /* Return a branch that reverse the condition of the branch given in OPC */
672 case OP65_BCC: return OP65_BCS;
673 case OP65_BCS: return OP65_BCC;
674 case OP65_BEQ: return OP65_BNE;
675 case OP65_BMI: return OP65_BPL;
676 case OP65_BNE: return OP65_BEQ;
677 case OP65_BPL: return OP65_BMI;
678 case OP65_BVC: return OP65_BVS;
679 case OP65_BVS: return OP65_BVC;
680 case OP65_JCC: return OP65_JCS;
681 case OP65_JCS: return OP65_JCC;
682 case OP65_JEQ: return OP65_JNE;
683 case OP65_JMI: return OP65_JPL;
684 case OP65_JNE: return OP65_JEQ;
685 case OP65_JPL: return OP65_JMI;
686 case OP65_JVC: return OP65_JVS;
687 case OP65_JVS: return OP65_JVC;
689 Internal ("GetInverseBranch: Invalid opcode: %d", OPC);
696 opc_t MakeShortBranch (opc_t OPC)
697 /* Return the short version of the given branch. If the branch is already
698 * a short branch, return the opcode unchanged.
703 case OP65_JCC: return OP65_BCC;
705 case OP65_JCS: return OP65_BCS;
707 case OP65_JEQ: return OP65_BEQ;
709 case OP65_JMI: return OP65_BMI;
711 case OP65_JNE: return OP65_BNE;
713 case OP65_JPL: return OP65_BPL;
715 case OP65_JVC: return OP65_BVC;
717 case OP65_JVS: return OP65_BVS;
719 case OP65_JMP: return (CPU == CPU_65C02)? OP65_BRA : OP65_JMP;
721 Internal ("MakeShortBranch: Invalid opcode: %d", OPC);
728 opc_t MakeLongBranch (opc_t OPC)
729 /* Return the long version of the given branch. If the branch is already
730 * a long branch, return the opcode unchanged.
735 case OP65_JCC: return OP65_JCC;
737 case OP65_JCS: return OP65_JCS;
739 case OP65_JEQ: return OP65_JEQ;
741 case OP65_JMI: return OP65_JMI;
743 case OP65_JNE: return OP65_JNE;
745 case OP65_JPL: return OP65_JPL;
747 case OP65_JVC: return OP65_JVC;
749 case OP65_JVS: return OP65_JVS;
751 case OP65_JMP: return OP65_JMP;
753 Internal ("MakeLongBranch: Invalid opcode: %d", OPC);
760 bc_t GetBranchCond (opc_t OPC)
761 /* Get the condition for the conditional branch in OPC */
764 case OP65_BCC: return BC_CC;
765 case OP65_BCS: return BC_CS;
766 case OP65_BEQ: return BC_EQ;
767 case OP65_BMI: return BC_MI;
768 case OP65_BNE: return BC_NE;
769 case OP65_BPL: return BC_PL;
770 case OP65_BVC: return BC_VC;
771 case OP65_BVS: return BC_VS;
772 case OP65_JCC: return BC_CC;
773 case OP65_JCS: return BC_CS;
774 case OP65_JEQ: return BC_EQ;
775 case OP65_JMI: return BC_MI;
776 case OP65_JNE: return BC_NE;
777 case OP65_JPL: return BC_PL;
778 case OP65_JVC: return BC_VC;
779 case OP65_JVS: return BC_VS;
781 Internal ("GetBranchCond: Invalid opcode: %d", OPC);
788 bc_t GetInverseCond (bc_t BC)
789 /* Return the inverse condition of the given one */
792 case BC_CC: return BC_CS;
793 case BC_CS: return BC_CC;
794 case BC_EQ: return BC_NE;
795 case BC_MI: return BC_PL;
796 case BC_NE: return BC_EQ;
797 case BC_PL: return BC_MI;
798 case BC_VC: return BC_VS;
799 case BC_VS: return BC_VC;
801 Internal ("GetInverseCond: Invalid condition: %d", BC);