2 * CRIS emulation for qemu: main translation routines.
4 * Copyright (c) 2008 AXIS Communications AB
5 * Written by Edgar E. Iglesias.
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; either
10 * version 2 of the License, or (at your option) any later version.
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
17 * You should have received a copy of the GNU Lesser General Public
18 * License along with this library; if not, write to the Free Software
19 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
34 #include "crisv32-decode.h"
50 #define BUG() (gen_BUG(dc, __FILE__, __LINE__))
51 #define BUG_ON(x) ({if (x) BUG();})
55 /* Used by the decoder. */
56 #define EXTRACT_FIELD(src, start, end) \
57 (((src) >> start) & ((1 << (end - start + 1)) - 1))
59 #define CC_MASK_NZ 0xc
60 #define CC_MASK_NZV 0xe
61 #define CC_MASK_NZVC 0xf
62 #define CC_MASK_RNZV 0x10e
64 TCGv cpu_env
, cpu_T
[2];
66 /* This is the state at translation time. */
67 typedef struct DisasContext
{
69 target_ulong pc
, insn_pc
;
76 unsigned int zsize
, zzsize
;
87 uint32_t tb_entry_flags
;
89 int memidx
; /* user or kernel mode. */
98 struct TranslationBlock
*tb
;
99 int singlestep_enabled
;
102 void cris_prepare_jmp (DisasContext
*dc
, uint32_t dst
);
103 static void gen_BUG(DisasContext
*dc
, char *file
, int line
)
105 printf ("BUG: pc=%x %s %d\n", dc
->pc
, file
, line
);
106 fprintf (logfile
, "BUG: pc=%x %s %d\n", dc
->pc
, file
, line
);
107 cpu_dump_state (dc
->env
, stdout
, fprintf
, 0);
109 cris_prepare_jmp (dc
, 0x70000000 + line
);
112 #ifdef CONFIG_USER_ONLY
113 #define GEN_OP_LD(width, reg) \
114 void gen_op_ld##width##_T0_##reg (DisasContext *dc) { \
115 gen_op_ld##width##_T0_##reg##_raw(); \
117 #define GEN_OP_ST(width, reg) \
118 void gen_op_st##width##_##reg##_T1 (DisasContext *dc) { \
119 gen_op_st##width##_##reg##_T1_raw(); \
122 #define GEN_OP_LD(width, reg) \
123 void gen_op_ld##width##_T0_##reg (DisasContext *dc) { \
124 if (dc->memidx) gen_op_ld##width##_T0_##reg##_kernel(); \
125 else gen_op_ld##width##_T0_##reg##_user();\
127 #define GEN_OP_ST(width, reg) \
128 void gen_op_st##width##_##reg##_T1 (DisasContext *dc) { \
129 if (dc->memidx) gen_op_st##width##_##reg##_T1_kernel(); \
130 else gen_op_st##width##_##reg##_T1_user();\
143 /* We need this table to handle preg-moves with implicit width. */
155 #define t_gen_mov_TN_env(tn, member) \
156 _t_gen_mov_TN_env((tn), offsetof(CPUState, (member)))
157 #define t_gen_mov_env_TN(member, tn) \
158 _t_gen_mov_env_TN(offsetof(CPUState, (member)), (tn))
160 #define t_gen_mov_TN_reg(tn, regno) \
161 _t_gen_mov_TN_env((tn), offsetof(CPUState, regs[regno]))
162 #define t_gen_mov_reg_TN(regno, tn) \
163 _t_gen_mov_env_TN(offsetof(CPUState, regs[regno]), (tn))
165 static inline void _t_gen_mov_TN_env(TCGv tn
, int offset
)
167 tcg_gen_ld_tl(tn
, cpu_env
, offset
);
169 static inline void _t_gen_mov_env_TN(int offset
, TCGv tn
)
171 tcg_gen_st_tl(tn
, cpu_env
, offset
);
174 static inline void t_gen_mov_TN_preg(TCGv tn
, int r
)
176 if (r
== PR_BZ
|| r
== PR_WZ
|| r
== PR_DZ
)
177 tcg_gen_mov_tl(tn
, tcg_const_i32(0));
179 tcg_gen_mov_tl(tn
, tcg_const_i32(32));
181 tcg_gen_ld_tl(tn
, cpu_env
, offsetof(CPUState
, pregs
[r
]));
183 static inline void t_gen_mov_preg_TN(int r
, TCGv tn
)
185 if (r
== PR_BZ
|| r
== PR_WZ
|| r
== PR_DZ
)
188 tcg_gen_st_tl(tn
, cpu_env
, offsetof(CPUState
, pregs
[r
]));
191 static inline void t_gen_mov_TN_im(TCGv tn
, int32_t val
)
193 tcg_gen_movi_tl(tn
, val
);
196 static void t_gen_lsl(TCGv d
, TCGv a
, TCGv b
)
200 l1
= gen_new_label();
201 /* Speculative shift. */
202 tcg_gen_shl_tl(d
, a
, b
);
203 tcg_gen_brcond_tl(TCG_COND_LE
, b
, tcg_const_i32(31), l1
);
204 /* Clear dst if shift operands were to large. */
205 tcg_gen_movi_tl(d
, 0);
209 static void t_gen_lsr(TCGv d
, TCGv a
, TCGv b
)
213 l1
= gen_new_label();
214 /* Speculative shift. */
215 tcg_gen_shr_tl(d
, a
, b
);
216 tcg_gen_brcond_tl(TCG_COND_LE
, b
, tcg_const_i32(31), l1
);
217 /* Clear dst if shift operands were to large. */
218 tcg_gen_movi_tl(d
, 0);
222 static void t_gen_asr(TCGv d
, TCGv a
, TCGv b
)
226 l1
= gen_new_label();
227 /* Speculative shift. */
228 tcg_gen_sar_tl(d
, a
, b
);
229 tcg_gen_brcond_tl(TCG_COND_LE
, b
, tcg_const_i32(31), l1
);
230 /* Clear dst if shift operands were to large. */
231 tcg_gen_movi_tl(d
, 0);
232 tcg_gen_brcond_tl(TCG_COND_LT
, b
, tcg_const_i32(0x80000000), l1
);
233 tcg_gen_movi_tl(d
, 0xffffffff);
237 static void gen_goto_tb(DisasContext
*dc
, int n
, target_ulong dest
)
239 TranslationBlock
*tb
;
241 if ((tb
->pc
& TARGET_PAGE_MASK
) == (dest
& TARGET_PAGE_MASK
)) {
243 tcg_gen_movi_tl(cpu_T
[0], dest
);
245 tcg_gen_exit_tb((long)tb
+ n
);
252 /* Sign extend at translation time. */
253 static int sign_extend(unsigned int val
, unsigned int width
)
265 static inline void cris_clear_x_flag(DisasContext
*dc
)
269 ccs
= tcg_temp_new(TCG_TYPE_TL
);
271 t_gen_mov_TN_preg(ccs
, PR_CCS
);
272 tcg_gen_andi_i32(ccs
, ccs
, ~X_FLAG
);
273 t_gen_mov_preg_TN(PR_CCS
, ccs
);
278 static void cris_evaluate_flags(DisasContext
*dc
)
280 if (!dc
->flags_live
) {
284 gen_op_evaluate_flags_mcp ();
287 gen_op_evaluate_flags_muls ();
290 gen_op_evaluate_flags_mulu ();
296 gen_op_evaluate_flags_move_4();
299 gen_op_evaluate_flags_move_2();
302 gen_op_evaluate_flags ();
312 gen_op_evaluate_flags_alu_4 ();
315 gen_op_evaluate_flags ();
325 static void cris_cc_mask(DisasContext
*dc
, unsigned int mask
)
329 /* Check if we need to evaluate the condition codes due to
331 ovl
= (dc
->cc_mask
^ mask
) & ~mask
;
333 /* TODO: optimize this case. It trigs all the time. */
334 cris_evaluate_flags (dc
);
342 gen_op_update_cc_mask(mask
);
347 static void cris_update_cc_op(DisasContext
*dc
, int op
)
350 gen_op_update_cc_op(op
);
353 static void cris_update_cc_size(DisasContext
*dc
, int size
)
356 gen_op_update_cc_size_im(size
);
359 /* op is the operation.
360 T0, T1 are the operands.
361 dst is the destination reg.
363 static void crisv32_alu_op(DisasContext
*dc
, int op
, int rd
, int size
)
367 cris_update_cc_op(dc
, op
);
368 cris_update_cc_size(dc
, size
);
369 gen_op_update_cc_x(dc
->flagx_live
, dc
->flags_x
);
370 gen_op_update_cc_dest_T0();
373 /* Emit the ALU insns. */
377 tcg_gen_add_tl(cpu_T
[0], cpu_T
[0], cpu_T
[1]);
378 /* Extended arithmetics. */
381 else if (dc
->flags_x
)
385 tcg_gen_add_tl(cpu_T
[0], cpu_T
[0], cpu_T
[1]);
389 tcg_gen_add_tl(cpu_T
[0], cpu_T
[0], cpu_T
[1]);
393 tcg_gen_sub_tl(cpu_T
[1], tcg_const_i32(0), cpu_T
[1]);
394 tcg_gen_add_tl(cpu_T
[0], cpu_T
[0], cpu_T
[1]);
395 /* CRIS flag evaluation needs ~src. */
396 tcg_gen_sub_tl(cpu_T
[1], tcg_const_i32(0), cpu_T
[1]);
399 /* Extended arithmetics. */
402 else if (dc
->flags_x
)
406 tcg_gen_mov_tl(cpu_T
[0], cpu_T
[1]);
409 tcg_gen_or_tl(cpu_T
[0], cpu_T
[0], cpu_T
[1]);
412 tcg_gen_and_tl(cpu_T
[0], cpu_T
[0], cpu_T
[1]);
415 tcg_gen_xor_tl(cpu_T
[0], cpu_T
[0], cpu_T
[1]);
418 t_gen_lsl(cpu_T
[0], cpu_T
[0], cpu_T
[1]);
421 t_gen_lsr(cpu_T
[0], cpu_T
[0], cpu_T
[1]);
424 t_gen_asr(cpu_T
[0], cpu_T
[0], cpu_T
[1]);
427 /* TCG-FIXME: this is not optimal. Many archs have
429 tcg_gen_sub_tl(cpu_T
[0], tcg_const_i32(0), cpu_T
[1]);
430 /* Extended arithmetics. */
447 gen_op_dstep_T0_T1();
450 gen_op_bound_T0_T1();
453 tcg_gen_sub_tl(cpu_T
[1], tcg_const_i32(0), cpu_T
[1]);
454 tcg_gen_add_tl(cpu_T
[0], cpu_T
[0], cpu_T
[1]);
455 /* CRIS flag evaluation needs ~src. */
456 tcg_gen_sub_tl(cpu_T
[1], tcg_const_i32(0), cpu_T
[1]);
457 /* CRIS flag evaluation needs ~src. */
460 /* Extended arithmetics. */
465 fprintf (logfile
, "illegal ALU op.\n");
471 gen_op_update_cc_src_T1();
474 tcg_gen_andi_tl(cpu_T
[0], cpu_T
[0], 0xff);
476 tcg_gen_andi_tl(cpu_T
[0], cpu_T
[0], 0xffff);
481 t_gen_mov_reg_TN(rd
, cpu_T
[0]);
483 tcg_gen_mov_tl(cpu_T
[1], cpu_T
[0]);
484 t_gen_mov_TN_reg(cpu_T
[0], rd
);
486 tcg_gen_andi_tl(cpu_T
[0], cpu_T
[0], ~0xff);
488 tcg_gen_andi_tl(cpu_T
[0], cpu_T
[0], ~0xffff);
489 tcg_gen_or_tl(cpu_T
[0], cpu_T
[0], cpu_T
[1]);
490 t_gen_mov_reg_TN(rd
, cpu_T
[0]);
491 tcg_gen_mov_tl(cpu_T
[0], cpu_T
[1]);
495 gen_op_update_cc_result_T0();
498 /* TODO: Optimize this. */
500 cris_evaluate_flags(dc
);
504 static int arith_cc(DisasContext
*dc
)
508 case CC_OP_ADD
: return 1;
509 case CC_OP_SUB
: return 1;
510 case CC_OP_LSL
: return 1;
511 case CC_OP_LSR
: return 1;
512 case CC_OP_ASR
: return 1;
513 case CC_OP_CMP
: return 1;
521 static void gen_tst_cc (DisasContext
*dc
, int cond
)
525 /* TODO: optimize more condition codes. */
526 arith_opt
= arith_cc(dc
) && !dc
->flags_live
;
530 gen_op_tst_cc_eq_fast ();
532 cris_evaluate_flags(dc
);
538 gen_op_tst_cc_ne_fast ();
540 cris_evaluate_flags(dc
);
545 cris_evaluate_flags(dc
);
549 cris_evaluate_flags(dc
);
553 cris_evaluate_flags(dc
);
557 cris_evaluate_flags(dc
);
562 gen_op_tst_cc_pl_fast ();
564 cris_evaluate_flags(dc
);
570 gen_op_tst_cc_mi_fast ();
572 cris_evaluate_flags(dc
);
577 cris_evaluate_flags(dc
);
581 cris_evaluate_flags(dc
);
585 cris_evaluate_flags(dc
);
589 cris_evaluate_flags(dc
);
593 cris_evaluate_flags(dc
);
597 cris_evaluate_flags(dc
);
601 cris_evaluate_flags(dc
);
605 cris_evaluate_flags(dc
);
606 gen_op_movl_T0_im (1);
614 static void cris_prepare_cc_branch (DisasContext
*dc
, int offset
, int cond
)
616 /* This helps us re-schedule the micro-code to insns in delay-slots
617 before the actual jump. */
618 dc
->delayed_branch
= 2;
619 dc
->delayed_pc
= dc
->pc
+ offset
;
623 gen_tst_cc (dc
, cond
);
624 gen_op_evaluate_bcc ();
626 gen_op_movl_T0_im (dc
->delayed_pc
);
627 gen_op_movl_btarget_T0 ();
630 /* Dynamic jumps, when the dest is in a live reg for example. */
631 void cris_prepare_dyn_jmp (DisasContext
*dc
)
633 /* This helps us re-schedule the micro-code to insns in delay-slots
634 before the actual jump. */
635 dc
->delayed_branch
= 2;
640 void cris_prepare_jmp (DisasContext
*dc
, uint32_t dst
)
642 /* This helps us re-schedule the micro-code to insns in delay-slots
643 before the actual jump. */
644 dc
->delayed_branch
= 2;
645 dc
->delayed_pc
= dst
;
650 void gen_load_T0_T0 (DisasContext
*dc
, unsigned int size
, int sign
)
654 gen_op_ldb_T0_T0(dc
);
656 gen_op_ldub_T0_T0(dc
);
658 else if (size
== 2) {
660 gen_op_ldw_T0_T0(dc
);
662 gen_op_lduw_T0_T0(dc
);
665 gen_op_ldl_T0_T0(dc
);
669 void gen_store_T0_T1 (DisasContext
*dc
, unsigned int size
)
671 /* Remember, operands are flipped. CRIS has reversed order. */
673 gen_op_stb_T0_T1(dc
);
675 else if (size
== 2) {
676 gen_op_stw_T0_T1(dc
);
679 gen_op_stl_T0_T1(dc
);
682 static inline void t_gen_sext(TCGv d
, TCGv s
, int size
)
685 tcg_gen_ext8s_i32(d
, s
);
687 tcg_gen_ext16s_i32(d
, s
);
690 static inline void t_gen_zext(TCGv d
, TCGv s
, int size
)
692 /* TCG-FIXME: this is not optimal. Many archs have fast zext insns. */
694 tcg_gen_andi_i32(d
, s
, 0xff);
696 tcg_gen_andi_i32(d
, s
, 0xffff);
700 static char memsize_char(int size
)
704 case 1: return 'b'; break;
705 case 2: return 'w'; break;
706 case 4: return 'd'; break;
714 static unsigned int memsize_z(DisasContext
*dc
)
716 return dc
->zsize
+ 1;
719 static unsigned int memsize_zz(DisasContext
*dc
)
730 static void do_postinc (DisasContext
*dc
, int size
)
734 t_gen_mov_TN_reg(cpu_T
[0], dc
->op1
);
735 gen_op_addl_T0_im(size
);
736 t_gen_mov_reg_TN(dc
->op1
, cpu_T
[0]);
740 static void dec_prep_move_r(DisasContext
*dc
, int rs
, int rd
,
743 t_gen_mov_TN_reg(cpu_T
[1], rs
);
745 t_gen_sext(cpu_T
[1], cpu_T
[1], size
);
747 t_gen_zext(cpu_T
[1], cpu_T
[1], size
);
750 /* Prepare T0 and T1 for a register alu operation.
751 s_ext decides if the operand1 should be sign-extended or zero-extended when
753 static void dec_prep_alu_r(DisasContext
*dc
, int rs
, int rd
,
756 dec_prep_move_r(dc
, rs
, rd
, size
, s_ext
);
758 t_gen_mov_TN_reg(cpu_T
[0], rd
);
760 t_gen_sext(cpu_T
[0], cpu_T
[0], size
);
762 t_gen_zext(cpu_T
[0], cpu_T
[0], size
);
765 /* Prepare T0 and T1 for a memory + alu operation.
766 s_ext decides if the operand1 should be sign-extended or zero-extended when
768 static int dec_prep_alu_m(DisasContext
*dc
, int s_ext
, int memsize
)
777 is_imm
= rs
== 15 && dc
->postinc
;
779 /* Load [$rs] onto T1. */
781 insn_len
= 2 + memsize
;
785 imm
= ldl_code(dc
->pc
+ 2);
788 imm
= sign_extend(imm
, (memsize
* 8) - 1);
796 DIS(fprintf (logfile
, "imm=%x rd=%d sext=%d ms=%d\n",
797 imm
, rd
, s_ext
, memsize
));
798 tcg_gen_movi_tl(cpu_T
[1], imm
);
801 t_gen_mov_TN_reg(cpu_T
[0], rs
);
802 gen_load_T0_T0(dc
, memsize
, 0);
803 tcg_gen_mov_tl(cpu_T
[1], cpu_T
[0]);
805 t_gen_sext(cpu_T
[1], cpu_T
[1], memsize
);
807 t_gen_zext(cpu_T
[1], cpu_T
[1], memsize
);
810 /* put dest in T0. */
811 t_gen_mov_TN_reg(cpu_T
[0], rd
);
816 static const char *cc_name(int cc
)
818 static char *cc_names
[16] = {
819 "cc", "cs", "ne", "eq", "vc", "vs", "pl", "mi",
820 "ls", "hi", "ge", "lt", "gt", "le", "a", "p"
827 static unsigned int dec_bccq(DisasContext
*dc
)
831 uint32_t cond
= dc
->op2
;
834 offset
= EXTRACT_FIELD (dc
->ir
, 1, 7);
835 sign
= EXTRACT_FIELD(dc
->ir
, 0, 0);
840 offset
= sign_extend(offset
, 8);
842 /* op2 holds the condition-code. */
844 cris_prepare_cc_branch (dc
, offset
, cond
);
847 static unsigned int dec_addoq(DisasContext
*dc
)
851 dc
->op1
= EXTRACT_FIELD(dc
->ir
, 0, 7);
852 imm
= sign_extend(dc
->op1
, 7);
854 DIS(fprintf (logfile
, "addoq %d, $r%u\n", imm
, dc
->op2
));
856 /* Fetch register operand, */
857 t_gen_mov_TN_reg(cpu_T
[0], dc
->op2
);
858 tcg_gen_movi_tl(cpu_T
[1], imm
);
859 crisv32_alu_op(dc
, CC_OP_ADD
, R_ACR
, 4);
862 static unsigned int dec_addq(DisasContext
*dc
)
864 DIS(fprintf (logfile
, "addq %u, $r%u\n", dc
->op1
, dc
->op2
));
866 dc
->op1
= EXTRACT_FIELD(dc
->ir
, 0, 5);
868 cris_cc_mask(dc
, CC_MASK_NZVC
);
869 /* Fetch register operand, */
870 t_gen_mov_TN_reg(cpu_T
[0], dc
->op2
);
871 tcg_gen_movi_tl(cpu_T
[1], dc
->op1
);
872 crisv32_alu_op(dc
, CC_OP_ADD
, dc
->op2
, 4);
875 static unsigned int dec_moveq(DisasContext
*dc
)
879 dc
->op1
= EXTRACT_FIELD(dc
->ir
, 0, 5);
880 imm
= sign_extend(dc
->op1
, 5);
881 DIS(fprintf (logfile
, "moveq %d, $r%u\n", imm
, dc
->op2
));
883 t_gen_mov_reg_TN(dc
->op2
, tcg_const_i32(imm
));
884 if (!dc
->flagx_live
|| dc
->flags_x
)
885 cris_clear_x_flag(dc
);
888 static unsigned int dec_subq(DisasContext
*dc
)
890 dc
->op1
= EXTRACT_FIELD(dc
->ir
, 0, 5);
892 DIS(fprintf (logfile
, "subq %u, $r%u\n", dc
->op1
, dc
->op2
));
894 cris_cc_mask(dc
, CC_MASK_NZVC
);
895 /* Fetch register operand, */
896 t_gen_mov_TN_reg(cpu_T
[0], dc
->op2
);
897 t_gen_mov_TN_im(cpu_T
[1], dc
->op1
);
898 crisv32_alu_op(dc
, CC_OP_SUB
, dc
->op2
, 4);
901 static unsigned int dec_cmpq(DisasContext
*dc
)
904 dc
->op1
= EXTRACT_FIELD(dc
->ir
, 0, 5);
905 imm
= sign_extend(dc
->op1
, 5);
907 DIS(fprintf (logfile
, "cmpq %d, $r%d\n", imm
, dc
->op2
));
908 cris_cc_mask(dc
, CC_MASK_NZVC
);
909 t_gen_mov_TN_reg(cpu_T
[0], dc
->op2
);
910 t_gen_mov_TN_im(cpu_T
[1], imm
);
911 crisv32_alu_op(dc
, CC_OP_CMP
, dc
->op2
, 4);
914 static unsigned int dec_andq(DisasContext
*dc
)
917 dc
->op1
= EXTRACT_FIELD(dc
->ir
, 0, 5);
918 imm
= sign_extend(dc
->op1
, 5);
920 DIS(fprintf (logfile
, "andq %d, $r%d\n", imm
, dc
->op2
));
921 cris_cc_mask(dc
, CC_MASK_NZ
);
922 t_gen_mov_TN_reg(cpu_T
[0], dc
->op2
);
923 t_gen_mov_TN_im(cpu_T
[1], imm
);
924 crisv32_alu_op(dc
, CC_OP_AND
, dc
->op2
, 4);
927 static unsigned int dec_orq(DisasContext
*dc
)
930 dc
->op1
= EXTRACT_FIELD(dc
->ir
, 0, 5);
931 imm
= sign_extend(dc
->op1
, 5);
932 DIS(fprintf (logfile
, "orq %d, $r%d\n", imm
, dc
->op2
));
933 cris_cc_mask(dc
, CC_MASK_NZ
);
934 t_gen_mov_TN_reg(cpu_T
[0], dc
->op2
);
935 t_gen_mov_TN_im(cpu_T
[1], imm
);
936 crisv32_alu_op(dc
, CC_OP_OR
, dc
->op2
, 4);
939 static unsigned int dec_btstq(DisasContext
*dc
)
941 dc
->op1
= EXTRACT_FIELD(dc
->ir
, 0, 4);
942 DIS(fprintf (logfile
, "btstq %u, $r%d\n", dc
->op1
, dc
->op2
));
943 cris_cc_mask(dc
, CC_MASK_NZ
);
944 t_gen_mov_TN_reg(cpu_T
[0], dc
->op2
);
945 t_gen_mov_TN_im(cpu_T
[1], dc
->op1
);
946 crisv32_alu_op(dc
, CC_OP_BTST
, dc
->op2
, 4);
948 cris_update_cc_op(dc
, CC_OP_FLAGS
);
949 gen_op_movl_flags_T0();
953 static unsigned int dec_asrq(DisasContext
*dc
)
955 dc
->op1
= EXTRACT_FIELD(dc
->ir
, 0, 4);
956 DIS(fprintf (logfile
, "asrq %u, $r%d\n", dc
->op1
, dc
->op2
));
957 cris_cc_mask(dc
, CC_MASK_NZ
);
958 t_gen_mov_TN_reg(cpu_T
[0], dc
->op2
);
959 t_gen_mov_TN_im(cpu_T
[1], dc
->op1
);
960 crisv32_alu_op(dc
, CC_OP_ASR
, dc
->op2
, 4);
963 static unsigned int dec_lslq(DisasContext
*dc
)
965 dc
->op1
= EXTRACT_FIELD(dc
->ir
, 0, 4);
966 DIS(fprintf (logfile
, "lslq %u, $r%d\n", dc
->op1
, dc
->op2
));
968 cris_cc_mask(dc
, CC_MASK_NZ
);
969 t_gen_mov_TN_reg(cpu_T
[0], dc
->op2
);
970 t_gen_mov_TN_im(cpu_T
[1], dc
->op1
);
971 crisv32_alu_op(dc
, CC_OP_LSL
, dc
->op2
, 4);
974 static unsigned int dec_lsrq(DisasContext
*dc
)
976 dc
->op1
= EXTRACT_FIELD(dc
->ir
, 0, 4);
977 DIS(fprintf (logfile
, "lsrq %u, $r%d\n", dc
->op1
, dc
->op2
));
979 cris_cc_mask(dc
, CC_MASK_NZ
);
980 t_gen_mov_TN_reg(cpu_T
[0], dc
->op2
);
981 t_gen_mov_TN_im(cpu_T
[1], dc
->op1
);
982 crisv32_alu_op(dc
, CC_OP_LSR
, dc
->op2
, 4);
986 static unsigned int dec_move_r(DisasContext
*dc
)
988 int size
= memsize_zz(dc
);
990 DIS(fprintf (logfile
, "move.%c $r%u, $r%u\n",
991 memsize_char(size
), dc
->op1
, dc
->op2
));
993 cris_cc_mask(dc
, CC_MASK_NZ
);
994 dec_prep_move_r(dc
, dc
->op1
, dc
->op2
, size
, 0);
995 crisv32_alu_op(dc
, CC_OP_MOVE
, dc
->op2
, size
);
999 static unsigned int dec_scc_r(DisasContext
*dc
)
1003 DIS(fprintf (logfile
, "s%s $r%u\n",
1004 cc_name(cond
), dc
->op1
));
1008 gen_tst_cc (dc
, cond
);
1009 gen_op_movl_T1_T0();
1012 gen_op_movl_T1_im(1);
1014 cris_cc_mask(dc
, 0);
1015 crisv32_alu_op(dc
, CC_OP_MOVE
, dc
->op1
, 4);
1019 static unsigned int dec_and_r(DisasContext
*dc
)
1021 int size
= memsize_zz(dc
);
1023 DIS(fprintf (logfile
, "and.%c $r%u, $r%u\n",
1024 memsize_char(size
), dc
->op1
, dc
->op2
));
1025 cris_cc_mask(dc
, CC_MASK_NZ
);
1026 dec_prep_alu_r(dc
, dc
->op1
, dc
->op2
, size
, 0);
1027 crisv32_alu_op(dc
, CC_OP_AND
, dc
->op2
, size
);
1031 static unsigned int dec_lz_r(DisasContext
*dc
)
1033 DIS(fprintf (logfile
, "lz $r%u, $r%u\n",
1035 cris_cc_mask(dc
, CC_MASK_NZ
);
1036 dec_prep_alu_r(dc
, dc
->op1
, dc
->op2
, 4, 0);
1037 crisv32_alu_op(dc
, CC_OP_LZ
, dc
->op2
, 4);
1041 static unsigned int dec_lsl_r(DisasContext
*dc
)
1043 int size
= memsize_zz(dc
);
1045 DIS(fprintf (logfile
, "lsl.%c $r%u, $r%u\n",
1046 memsize_char(size
), dc
->op1
, dc
->op2
));
1047 cris_cc_mask(dc
, CC_MASK_NZ
);
1048 dec_prep_alu_r(dc
, dc
->op1
, dc
->op2
, size
, 0);
1049 tcg_gen_andi_tl(cpu_T
[1], cpu_T
[1], 63);
1050 crisv32_alu_op(dc
, CC_OP_LSL
, dc
->op2
, size
);
1054 static unsigned int dec_lsr_r(DisasContext
*dc
)
1056 int size
= memsize_zz(dc
);
1058 DIS(fprintf (logfile
, "lsr.%c $r%u, $r%u\n",
1059 memsize_char(size
), dc
->op1
, dc
->op2
));
1060 cris_cc_mask(dc
, CC_MASK_NZ
);
1061 dec_prep_alu_r(dc
, dc
->op1
, dc
->op2
, size
, 0);
1062 tcg_gen_andi_tl(cpu_T
[1], cpu_T
[1], 63);
1063 crisv32_alu_op(dc
, CC_OP_LSR
, dc
->op2
, size
);
1067 static unsigned int dec_asr_r(DisasContext
*dc
)
1069 int size
= memsize_zz(dc
);
1071 DIS(fprintf (logfile
, "asr.%c $r%u, $r%u\n",
1072 memsize_char(size
), dc
->op1
, dc
->op2
));
1073 cris_cc_mask(dc
, CC_MASK_NZ
);
1074 dec_prep_alu_r(dc
, dc
->op1
, dc
->op2
, size
, 1);
1075 tcg_gen_andi_tl(cpu_T
[1], cpu_T
[1], 63);
1076 crisv32_alu_op(dc
, CC_OP_ASR
, dc
->op2
, size
);
1080 static unsigned int dec_muls_r(DisasContext
*dc
)
1082 int size
= memsize_zz(dc
);
1084 DIS(fprintf (logfile
, "muls.%c $r%u, $r%u\n",
1085 memsize_char(size
), dc
->op1
, dc
->op2
));
1086 cris_cc_mask(dc
, CC_MASK_NZV
);
1087 dec_prep_alu_r(dc
, dc
->op1
, dc
->op2
, size
, 1);
1088 t_gen_sext(cpu_T
[0], cpu_T
[0], size
);
1089 crisv32_alu_op(dc
, CC_OP_MULS
, dc
->op2
, 4);
1093 static unsigned int dec_mulu_r(DisasContext
*dc
)
1095 int size
= memsize_zz(dc
);
1097 DIS(fprintf (logfile
, "mulu.%c $r%u, $r%u\n",
1098 memsize_char(size
), dc
->op1
, dc
->op2
));
1099 cris_cc_mask(dc
, CC_MASK_NZV
);
1100 dec_prep_alu_r(dc
, dc
->op1
, dc
->op2
, size
, 0);
1101 t_gen_zext(cpu_T
[0], cpu_T
[0], size
);
1102 crisv32_alu_op(dc
, CC_OP_MULU
, dc
->op2
, 4);
1107 static unsigned int dec_dstep_r(DisasContext
*dc
)
1109 DIS(fprintf (logfile
, "dstep $r%u, $r%u\n", dc
->op1
, dc
->op2
));
1110 cris_cc_mask(dc
, CC_MASK_NZ
);
1111 t_gen_mov_TN_reg(cpu_T
[1], dc
->op1
);
1112 t_gen_mov_TN_reg(cpu_T
[0], dc
->op2
);
1113 crisv32_alu_op(dc
, CC_OP_DSTEP
, dc
->op2
, 4);
1117 static unsigned int dec_xor_r(DisasContext
*dc
)
1119 int size
= memsize_zz(dc
);
1120 DIS(fprintf (logfile
, "xor.%c $r%u, $r%u\n",
1121 memsize_char(size
), dc
->op1
, dc
->op2
));
1122 BUG_ON(size
!= 4); /* xor is dword. */
1123 cris_cc_mask(dc
, CC_MASK_NZ
);
1124 dec_prep_alu_r(dc
, dc
->op1
, dc
->op2
, size
, 0);
1125 crisv32_alu_op(dc
, CC_OP_XOR
, dc
->op2
, 4);
1129 static unsigned int dec_bound_r(DisasContext
*dc
)
1131 int size
= memsize_zz(dc
);
1132 DIS(fprintf (logfile
, "bound.%c $r%u, $r%u\n",
1133 memsize_char(size
), dc
->op1
, dc
->op2
));
1134 cris_cc_mask(dc
, CC_MASK_NZ
);
1135 /* TODO: needs optmimization. */
1136 dec_prep_alu_r(dc
, dc
->op1
, dc
->op2
, size
, 0);
1137 /* rd should be 4. */
1138 t_gen_mov_TN_reg(cpu_T
[0], dc
->op2
);
1139 crisv32_alu_op(dc
, CC_OP_BOUND
, dc
->op2
, 4);
1143 static unsigned int dec_cmp_r(DisasContext
*dc
)
1145 int size
= memsize_zz(dc
);
1146 DIS(fprintf (logfile
, "cmp.%c $r%u, $r%u\n",
1147 memsize_char(size
), dc
->op1
, dc
->op2
));
1148 cris_cc_mask(dc
, CC_MASK_NZVC
);
1149 dec_prep_alu_r(dc
, dc
->op1
, dc
->op2
, size
, 0);
1150 crisv32_alu_op(dc
, CC_OP_CMP
, dc
->op2
, size
);
1154 static unsigned int dec_abs_r(DisasContext
*dc
)
1156 DIS(fprintf (logfile
, "abs $r%u, $r%u\n",
1158 cris_cc_mask(dc
, CC_MASK_NZ
);
1159 dec_prep_move_r(dc
, dc
->op1
, dc
->op2
, 4, 0);
1160 gen_op_absl_T1_T1();
1161 crisv32_alu_op(dc
, CC_OP_MOVE
, dc
->op2
, 4);
1165 static unsigned int dec_add_r(DisasContext
*dc
)
1167 int size
= memsize_zz(dc
);
1168 DIS(fprintf (logfile
, "add.%c $r%u, $r%u\n",
1169 memsize_char(size
), dc
->op1
, dc
->op2
));
1170 cris_cc_mask(dc
, CC_MASK_NZVC
);
1171 dec_prep_alu_r(dc
, dc
->op1
, dc
->op2
, size
, 0);
1172 crisv32_alu_op(dc
, CC_OP_ADD
, dc
->op2
, size
);
1176 static unsigned int dec_addc_r(DisasContext
*dc
)
1178 DIS(fprintf (logfile
, "addc $r%u, $r%u\n",
1180 cris_evaluate_flags(dc
);
1181 cris_cc_mask(dc
, CC_MASK_NZVC
);
1182 dec_prep_alu_r(dc
, dc
->op1
, dc
->op2
, 4, 0);
1183 crisv32_alu_op(dc
, CC_OP_ADDC
, dc
->op2
, 4);
1187 static unsigned int dec_mcp_r(DisasContext
*dc
)
1189 DIS(fprintf (logfile
, "mcp $p%u, $r%u\n",
1191 cris_evaluate_flags(dc
);
1192 cris_cc_mask(dc
, CC_MASK_RNZV
);
1193 t_gen_mov_TN_reg(cpu_T
[0], dc
->op1
);
1194 t_gen_mov_TN_preg(cpu_T
[1], dc
->op2
);
1195 crisv32_alu_op(dc
, CC_OP_MCP
, dc
->op1
, 4);
1200 static char * swapmode_name(int mode
, char *modename
) {
1203 modename
[i
++] = 'n';
1205 modename
[i
++] = 'w';
1207 modename
[i
++] = 'b';
1209 modename
[i
++] = 'r';
1215 static unsigned int dec_swap_r(DisasContext
*dc
)
1217 DIS(char modename
[4]);
1218 DIS(fprintf (logfile
, "swap%s $r%u\n",
1219 swapmode_name(dc
->op2
, modename
), dc
->op1
));
1221 cris_cc_mask(dc
, CC_MASK_NZ
);
1222 t_gen_mov_TN_reg(cpu_T
[0], dc
->op1
);
1226 gen_op_swapw_T0_T0();
1228 gen_op_swapb_T0_T0();
1230 gen_op_swapr_T0_T0();
1231 gen_op_movl_T1_T0();
1232 crisv32_alu_op(dc
, CC_OP_MOVE
, dc
->op1
, 4);
1236 static unsigned int dec_or_r(DisasContext
*dc
)
1238 int size
= memsize_zz(dc
);
1239 DIS(fprintf (logfile
, "or.%c $r%u, $r%u\n",
1240 memsize_char(size
), dc
->op1
, dc
->op2
));
1241 cris_cc_mask(dc
, CC_MASK_NZ
);
1242 dec_prep_alu_r(dc
, dc
->op1
, dc
->op2
, size
, 0);
1243 crisv32_alu_op(dc
, CC_OP_OR
, dc
->op2
, size
);
1247 static unsigned int dec_addi_r(DisasContext
*dc
)
1249 DIS(fprintf (logfile
, "addi.%c $r%u, $r%u\n",
1250 memsize_char(memsize_zz(dc
)), dc
->op2
, dc
->op1
));
1251 cris_cc_mask(dc
, 0);
1252 dec_prep_alu_r(dc
, dc
->op1
, dc
->op2
, 4, 0);
1253 t_gen_lsl(cpu_T
[0], cpu_T
[0], tcg_const_i32(dc
->zzsize
));
1254 tcg_gen_add_tl(cpu_T
[0], cpu_T
[0], cpu_T
[1]);
1255 t_gen_mov_reg_TN(dc
->op1
, cpu_T
[0]);
1259 static unsigned int dec_addi_acr(DisasContext
*dc
)
1261 DIS(fprintf (logfile
, "addi.%c $r%u, $r%u, $acr\n",
1262 memsize_char(memsize_zz(dc
)), dc
->op2
, dc
->op1
));
1263 cris_cc_mask(dc
, 0);
1264 dec_prep_alu_r(dc
, dc
->op1
, dc
->op2
, 4, 0);
1265 t_gen_lsl(cpu_T
[0], cpu_T
[0], tcg_const_i32(dc
->zzsize
));
1267 tcg_gen_add_tl(cpu_T
[0], cpu_T
[0], cpu_T
[1]);
1268 t_gen_mov_reg_TN(R_ACR
, cpu_T
[0]);
1272 static unsigned int dec_neg_r(DisasContext
*dc
)
1274 int size
= memsize_zz(dc
);
1275 DIS(fprintf (logfile
, "neg.%c $r%u, $r%u\n",
1276 memsize_char(size
), dc
->op1
, dc
->op2
));
1277 cris_cc_mask(dc
, CC_MASK_NZVC
);
1278 dec_prep_alu_r(dc
, dc
->op1
, dc
->op2
, size
, 0);
1279 crisv32_alu_op(dc
, CC_OP_NEG
, dc
->op2
, size
);
1283 static unsigned int dec_btst_r(DisasContext
*dc
)
1285 DIS(fprintf (logfile
, "btst $r%u, $r%u\n",
1287 cris_cc_mask(dc
, CC_MASK_NZ
);
1288 dec_prep_alu_r(dc
, dc
->op1
, dc
->op2
, 4, 0);
1289 crisv32_alu_op(dc
, CC_OP_BTST
, dc
->op2
, 4);
1291 cris_update_cc_op(dc
, CC_OP_FLAGS
);
1292 gen_op_movl_flags_T0();
1297 static unsigned int dec_sub_r(DisasContext
*dc
)
1299 int size
= memsize_zz(dc
);
1300 DIS(fprintf (logfile
, "sub.%c $r%u, $r%u\n",
1301 memsize_char(size
), dc
->op1
, dc
->op2
));
1302 cris_cc_mask(dc
, CC_MASK_NZVC
);
1303 dec_prep_alu_r(dc
, dc
->op1
, dc
->op2
, size
, 0);
1304 crisv32_alu_op(dc
, CC_OP_SUB
, dc
->op2
, size
);
1308 /* Zero extension. From size to dword. */
1309 static unsigned int dec_movu_r(DisasContext
*dc
)
1311 int size
= memsize_z(dc
);
1312 DIS(fprintf (logfile
, "movu.%c $r%u, $r%u\n",
1316 cris_cc_mask(dc
, CC_MASK_NZ
);
1317 dec_prep_move_r(dc
, dc
->op1
, dc
->op2
, size
, 0);
1318 crisv32_alu_op(dc
, CC_OP_MOVE
, dc
->op2
, 4);
1322 /* Sign extension. From size to dword. */
1323 static unsigned int dec_movs_r(DisasContext
*dc
)
1325 int size
= memsize_z(dc
);
1326 DIS(fprintf (logfile
, "movs.%c $r%u, $r%u\n",
1330 cris_cc_mask(dc
, CC_MASK_NZ
);
1331 t_gen_mov_TN_reg(cpu_T
[0], dc
->op1
);
1332 /* Size can only be qi or hi. */
1333 t_gen_sext(cpu_T
[1], cpu_T
[0], size
);
1334 crisv32_alu_op(dc
, CC_OP_MOVE
, dc
->op2
, 4);
1338 /* zero extension. From size to dword. */
1339 static unsigned int dec_addu_r(DisasContext
*dc
)
1341 int size
= memsize_z(dc
);
1342 DIS(fprintf (logfile
, "addu.%c $r%u, $r%u\n",
1346 cris_cc_mask(dc
, CC_MASK_NZVC
);
1347 t_gen_mov_TN_reg(cpu_T
[1], dc
->op1
);
1348 /* Size can only be qi or hi. */
1349 t_gen_zext(cpu_T
[1], cpu_T
[1], size
);
1350 t_gen_mov_TN_reg(cpu_T
[0], dc
->op2
);
1351 crisv32_alu_op(dc
, CC_OP_ADD
, dc
->op2
, 4);
1355 /* Sign extension. From size to dword. */
1356 static unsigned int dec_adds_r(DisasContext
*dc
)
1358 int size
= memsize_z(dc
);
1359 DIS(fprintf (logfile
, "adds.%c $r%u, $r%u\n",
1363 cris_cc_mask(dc
, CC_MASK_NZVC
);
1364 t_gen_mov_TN_reg(cpu_T
[1], dc
->op1
);
1365 /* Size can only be qi or hi. */
1366 t_gen_sext(cpu_T
[1], cpu_T
[1], size
);
1367 t_gen_mov_TN_reg(cpu_T
[0], dc
->op2
);
1369 crisv32_alu_op(dc
, CC_OP_ADD
, dc
->op2
, 4);
1373 /* Zero extension. From size to dword. */
1374 static unsigned int dec_subu_r(DisasContext
*dc
)
1376 int size
= memsize_z(dc
);
1377 DIS(fprintf (logfile
, "subu.%c $r%u, $r%u\n",
1381 cris_cc_mask(dc
, CC_MASK_NZVC
);
1382 t_gen_mov_TN_reg(cpu_T
[1], dc
->op1
);
1383 /* Size can only be qi or hi. */
1384 t_gen_zext(cpu_T
[1], cpu_T
[1], size
);
1385 t_gen_mov_TN_reg(cpu_T
[0], dc
->op2
);
1386 crisv32_alu_op(dc
, CC_OP_SUB
, dc
->op2
, 4);
1390 /* Sign extension. From size to dword. */
1391 static unsigned int dec_subs_r(DisasContext
*dc
)
1393 int size
= memsize_z(dc
);
1394 DIS(fprintf (logfile
, "subs.%c $r%u, $r%u\n",
1398 cris_cc_mask(dc
, CC_MASK_NZVC
);
1399 t_gen_mov_TN_reg(cpu_T
[1], dc
->op1
);
1400 /* Size can only be qi or hi. */
1401 t_gen_sext(cpu_T
[1], cpu_T
[1], size
);
1402 t_gen_mov_TN_reg(cpu_T
[0], dc
->op2
);
1403 crisv32_alu_op(dc
, CC_OP_SUB
, dc
->op2
, 4);
1407 static unsigned int dec_setclrf(DisasContext
*dc
)
1410 int set
= (~dc
->opcode
>> 2) & 1;
1412 flags
= (EXTRACT_FIELD(dc
->ir
, 12, 15) << 4)
1413 | EXTRACT_FIELD(dc
->ir
, 0, 3);
1414 DIS(fprintf (logfile
, "set=%d flags=%x\n", set
, flags
));
1415 if (set
&& flags
== 0)
1416 DIS(fprintf (logfile
, "nop\n"));
1417 else if (!set
&& (flags
& 0x20))
1418 DIS(fprintf (logfile
, "di\n"));
1420 DIS(fprintf (logfile
, "%sf %x\n",
1421 set
? "set" : "clr",
1424 if (set
&& (flags
& X_FLAG
)) {
1429 /* Simply decode the flags. */
1430 cris_evaluate_flags (dc
);
1431 cris_update_cc_op(dc
, CC_OP_FLAGS
);
1433 gen_op_setf (flags
);
1435 gen_op_clrf (flags
);
1440 static unsigned int dec_move_rs(DisasContext
*dc
)
1442 DIS(fprintf (logfile
, "move $r%u, $s%u\n", dc
->op1
, dc
->op2
));
1443 cris_cc_mask(dc
, 0);
1444 t_gen_mov_TN_reg(cpu_T
[0], dc
->op1
);
1445 gen_op_movl_sreg_T0(dc
->op2
);
1447 #if !defined(CONFIG_USER_ONLY)
1449 gen_op_movl_tlb_hi_T0();
1450 else if (dc
->op2
== 5) { /* srs is checked at runtime. */
1451 tcg_gen_helper_0_1(helper_tlb_update
, cpu_T
[0]);
1452 gen_op_movl_tlb_lo_T0();
1457 static unsigned int dec_move_sr(DisasContext
*dc
)
1459 DIS(fprintf (logfile
, "move $s%u, $r%u\n", dc
->op2
, dc
->op1
));
1460 cris_cc_mask(dc
, 0);
1461 gen_op_movl_T0_sreg(dc
->op2
);
1462 tcg_gen_mov_tl(cpu_T
[1], cpu_T
[0]);
1463 crisv32_alu_op(dc
, CC_OP_MOVE
, dc
->op1
, 4);
1466 static unsigned int dec_move_rp(DisasContext
*dc
)
1468 DIS(fprintf (logfile
, "move $r%u, $p%u\n", dc
->op1
, dc
->op2
));
1469 cris_cc_mask(dc
, 0);
1470 t_gen_mov_TN_reg(cpu_T
[0], dc
->op1
);
1471 t_gen_mov_preg_TN(dc
->op2
, cpu_T
[0]);
1474 static unsigned int dec_move_pr(DisasContext
*dc
)
1476 DIS(fprintf (logfile
, "move $p%u, $r%u\n", dc
->op1
, dc
->op2
));
1477 cris_cc_mask(dc
, 0);
1478 /* Support register 0 is hardwired to zero.
1479 Treat it specially. */
1481 tcg_gen_movi_tl(cpu_T
[1], 0);
1483 t_gen_mov_TN_preg(cpu_T
[1], dc
->op2
);
1484 crisv32_alu_op(dc
, CC_OP_MOVE
, dc
->op1
, preg_sizes
[dc
->op2
]);
1488 static unsigned int dec_move_mr(DisasContext
*dc
)
1490 int memsize
= memsize_zz(dc
);
1492 DIS(fprintf (logfile
, "move.%c [$r%u%s, $r%u\n",
1493 memsize_char(memsize
),
1494 dc
->op1
, dc
->postinc
? "+]" : "]",
1497 cris_cc_mask(dc
, CC_MASK_NZ
);
1498 insn_len
= dec_prep_alu_m(dc
, 0, memsize
);
1499 crisv32_alu_op(dc
, CC_OP_MOVE
, dc
->op2
, memsize
);
1500 do_postinc(dc
, memsize
);
1504 static unsigned int dec_movs_m(DisasContext
*dc
)
1506 int memsize
= memsize_z(dc
);
1508 DIS(fprintf (logfile
, "movs.%c [$r%u%s, $r%u\n",
1509 memsize_char(memsize
),
1510 dc
->op1
, dc
->postinc
? "+]" : "]",
1514 cris_cc_mask(dc
, CC_MASK_NZ
);
1515 insn_len
= dec_prep_alu_m(dc
, 1, memsize
);
1516 crisv32_alu_op(dc
, CC_OP_MOVE
, dc
->op2
, 4);
1517 do_postinc(dc
, memsize
);
1521 static unsigned int dec_addu_m(DisasContext
*dc
)
1523 int memsize
= memsize_z(dc
);
1525 DIS(fprintf (logfile
, "addu.%c [$r%u%s, $r%u\n",
1526 memsize_char(memsize
),
1527 dc
->op1
, dc
->postinc
? "+]" : "]",
1531 cris_cc_mask(dc
, CC_MASK_NZVC
);
1532 insn_len
= dec_prep_alu_m(dc
, 0, memsize
);
1533 crisv32_alu_op(dc
, CC_OP_ADD
, dc
->op2
, 4);
1534 do_postinc(dc
, memsize
);
1538 static unsigned int dec_adds_m(DisasContext
*dc
)
1540 int memsize
= memsize_z(dc
);
1542 DIS(fprintf (logfile
, "adds.%c [$r%u%s, $r%u\n",
1543 memsize_char(memsize
),
1544 dc
->op1
, dc
->postinc
? "+]" : "]",
1548 cris_cc_mask(dc
, CC_MASK_NZVC
);
1549 insn_len
= dec_prep_alu_m(dc
, 1, memsize
);
1550 crisv32_alu_op(dc
, CC_OP_ADD
, dc
->op2
, 4);
1551 do_postinc(dc
, memsize
);
1555 static unsigned int dec_subu_m(DisasContext
*dc
)
1557 int memsize
= memsize_z(dc
);
1559 DIS(fprintf (logfile
, "subu.%c [$r%u%s, $r%u\n",
1560 memsize_char(memsize
),
1561 dc
->op1
, dc
->postinc
? "+]" : "]",
1565 cris_cc_mask(dc
, CC_MASK_NZVC
);
1566 insn_len
= dec_prep_alu_m(dc
, 0, memsize
);
1567 crisv32_alu_op(dc
, CC_OP_SUB
, dc
->op2
, 4);
1568 do_postinc(dc
, memsize
);
1572 static unsigned int dec_subs_m(DisasContext
*dc
)
1574 int memsize
= memsize_z(dc
);
1576 DIS(fprintf (logfile
, "subs.%c [$r%u%s, $r%u\n",
1577 memsize_char(memsize
),
1578 dc
->op1
, dc
->postinc
? "+]" : "]",
1582 cris_cc_mask(dc
, CC_MASK_NZVC
);
1583 insn_len
= dec_prep_alu_m(dc
, 1, memsize
);
1584 crisv32_alu_op(dc
, CC_OP_SUB
, dc
->op2
, 4);
1585 do_postinc(dc
, memsize
);
1589 static unsigned int dec_movu_m(DisasContext
*dc
)
1591 int memsize
= memsize_z(dc
);
1594 DIS(fprintf (logfile
, "movu.%c [$r%u%s, $r%u\n",
1595 memsize_char(memsize
),
1596 dc
->op1
, dc
->postinc
? "+]" : "]",
1599 cris_cc_mask(dc
, CC_MASK_NZ
);
1600 insn_len
= dec_prep_alu_m(dc
, 0, memsize
);
1601 crisv32_alu_op(dc
, CC_OP_MOVE
, dc
->op2
, 4);
1602 do_postinc(dc
, memsize
);
1606 static unsigned int dec_cmpu_m(DisasContext
*dc
)
1608 int memsize
= memsize_z(dc
);
1610 DIS(fprintf (logfile
, "cmpu.%c [$r%u%s, $r%u\n",
1611 memsize_char(memsize
),
1612 dc
->op1
, dc
->postinc
? "+]" : "]",
1615 cris_cc_mask(dc
, CC_MASK_NZVC
);
1616 insn_len
= dec_prep_alu_m(dc
, 0, memsize
);
1617 crisv32_alu_op(dc
, CC_OP_CMP
, dc
->op2
, 4);
1618 do_postinc(dc
, memsize
);
1622 static unsigned int dec_cmps_m(DisasContext
*dc
)
1624 int memsize
= memsize_z(dc
);
1626 DIS(fprintf (logfile
, "cmps.%c [$r%u%s, $r%u\n",
1627 memsize_char(memsize
),
1628 dc
->op1
, dc
->postinc
? "+]" : "]",
1631 cris_cc_mask(dc
, CC_MASK_NZVC
);
1632 insn_len
= dec_prep_alu_m(dc
, 1, memsize
);
1633 crisv32_alu_op(dc
, CC_OP_CMP
, dc
->op2
, memsize_zz(dc
));
1634 do_postinc(dc
, memsize
);
1638 static unsigned int dec_cmp_m(DisasContext
*dc
)
1640 int memsize
= memsize_zz(dc
);
1642 DIS(fprintf (logfile
, "cmp.%c [$r%u%s, $r%u\n",
1643 memsize_char(memsize
),
1644 dc
->op1
, dc
->postinc
? "+]" : "]",
1647 cris_cc_mask(dc
, CC_MASK_NZVC
);
1648 insn_len
= dec_prep_alu_m(dc
, 0, memsize
);
1649 crisv32_alu_op(dc
, CC_OP_CMP
, dc
->op2
, memsize_zz(dc
));
1650 do_postinc(dc
, memsize
);
1654 static unsigned int dec_test_m(DisasContext
*dc
)
1656 int memsize
= memsize_zz(dc
);
1658 DIS(fprintf (logfile
, "test.%d [$r%u%s] op2=%x\n",
1659 memsize_char(memsize
),
1660 dc
->op1
, dc
->postinc
? "+]" : "]",
1663 cris_cc_mask(dc
, CC_MASK_NZ
);
1665 insn_len
= dec_prep_alu_m(dc
, 0, memsize
);
1666 tcg_gen_mov_tl(cpu_T
[0], cpu_T
[1]);
1667 tcg_gen_movi_tl(cpu_T
[1], 0);
1668 crisv32_alu_op(dc
, CC_OP_CMP
, dc
->op2
, memsize_zz(dc
));
1669 do_postinc(dc
, memsize
);
1673 static unsigned int dec_and_m(DisasContext
*dc
)
1675 int memsize
= memsize_zz(dc
);
1677 DIS(fprintf (logfile
, "and.%d [$r%u%s, $r%u\n",
1678 memsize_char(memsize
),
1679 dc
->op1
, dc
->postinc
? "+]" : "]",
1682 cris_cc_mask(dc
, CC_MASK_NZ
);
1683 insn_len
= dec_prep_alu_m(dc
, 0, memsize
);
1684 crisv32_alu_op(dc
, CC_OP_AND
, dc
->op2
, memsize_zz(dc
));
1685 do_postinc(dc
, memsize
);
1689 static unsigned int dec_add_m(DisasContext
*dc
)
1691 int memsize
= memsize_zz(dc
);
1693 DIS(fprintf (logfile
, "add.%d [$r%u%s, $r%u\n",
1694 memsize_char(memsize
),
1695 dc
->op1
, dc
->postinc
? "+]" : "]",
1698 cris_cc_mask(dc
, CC_MASK_NZVC
);
1699 insn_len
= dec_prep_alu_m(dc
, 0, memsize
);
1700 crisv32_alu_op(dc
, CC_OP_ADD
, dc
->op2
, memsize_zz(dc
));
1701 do_postinc(dc
, memsize
);
1705 static unsigned int dec_addo_m(DisasContext
*dc
)
1707 int memsize
= memsize_zz(dc
);
1709 DIS(fprintf (logfile
, "add.%d [$r%u%s, $r%u\n",
1710 memsize_char(memsize
),
1711 dc
->op1
, dc
->postinc
? "+]" : "]",
1714 cris_cc_mask(dc
, 0);
1715 insn_len
= dec_prep_alu_m(dc
, 1, memsize
);
1716 crisv32_alu_op(dc
, CC_OP_ADD
, R_ACR
, 4);
1717 do_postinc(dc
, memsize
);
1721 static unsigned int dec_bound_m(DisasContext
*dc
)
1723 int memsize
= memsize_zz(dc
);
1725 DIS(fprintf (logfile
, "bound.%d [$r%u%s, $r%u\n",
1726 memsize_char(memsize
),
1727 dc
->op1
, dc
->postinc
? "+]" : "]",
1730 cris_cc_mask(dc
, CC_MASK_NZ
);
1731 insn_len
= dec_prep_alu_m(dc
, 0, memsize
);
1732 crisv32_alu_op(dc
, CC_OP_BOUND
, dc
->op2
, 4);
1733 do_postinc(dc
, memsize
);
1737 static unsigned int dec_addc_mr(DisasContext
*dc
)
1740 DIS(fprintf (logfile
, "addc [$r%u%s, $r%u\n",
1741 dc
->op1
, dc
->postinc
? "+]" : "]",
1744 cris_evaluate_flags(dc
);
1745 cris_cc_mask(dc
, CC_MASK_NZVC
);
1746 insn_len
= dec_prep_alu_m(dc
, 0, 4);
1747 crisv32_alu_op(dc
, CC_OP_ADDC
, dc
->op2
, 4);
1752 static unsigned int dec_sub_m(DisasContext
*dc
)
1754 int memsize
= memsize_zz(dc
);
1756 DIS(fprintf (logfile
, "sub.%c [$r%u%s, $r%u ir=%x zz=%x\n",
1757 memsize_char(memsize
),
1758 dc
->op1
, dc
->postinc
? "+]" : "]",
1759 dc
->op2
, dc
->ir
, dc
->zzsize
));
1761 cris_cc_mask(dc
, CC_MASK_NZVC
);
1762 insn_len
= dec_prep_alu_m(dc
, 0, memsize
);
1763 crisv32_alu_op(dc
, CC_OP_SUB
, dc
->op2
, memsize
);
1764 do_postinc(dc
, memsize
);
1768 static unsigned int dec_or_m(DisasContext
*dc
)
1770 int memsize
= memsize_zz(dc
);
1772 DIS(fprintf (logfile
, "or.%d [$r%u%s, $r%u pc=%x\n",
1773 memsize_char(memsize
),
1774 dc
->op1
, dc
->postinc
? "+]" : "]",
1777 cris_cc_mask(dc
, CC_MASK_NZ
);
1778 insn_len
= dec_prep_alu_m(dc
, 0, memsize
);
1779 crisv32_alu_op(dc
, CC_OP_OR
, dc
->op2
, memsize_zz(dc
));
1780 do_postinc(dc
, memsize
);
1784 static unsigned int dec_move_mp(DisasContext
*dc
)
1786 int memsize
= memsize_zz(dc
);
1789 DIS(fprintf (logfile
, "move.%c [$r%u%s, $p%u\n",
1790 memsize_char(memsize
),
1792 dc
->postinc
? "+]" : "]",
1795 cris_cc_mask(dc
, 0);
1796 insn_len
= dec_prep_alu_m(dc
, 0, memsize
);
1797 t_gen_mov_preg_TN(dc
->op2
, cpu_T
[1]);
1799 do_postinc(dc
, memsize
);
1803 static unsigned int dec_move_pm(DisasContext
*dc
)
1807 memsize
= preg_sizes
[dc
->op2
];
1809 DIS(fprintf (logfile
, "move.%c $p%u, [$r%u%s\n",
1810 memsize_char(memsize
),
1811 dc
->op2
, dc
->op1
, dc
->postinc
? "+]" : "]"));
1813 cris_cc_mask(dc
, 0);
1814 /* prepare store. Address in T0, value in T1. */
1815 t_gen_mov_TN_preg(cpu_T
[1], dc
->op2
);
1816 t_gen_mov_TN_reg(cpu_T
[0], dc
->op1
);
1817 gen_store_T0_T1(dc
, memsize
);
1820 tcg_gen_addi_tl(cpu_T
[0], cpu_T
[0], memsize
);
1821 t_gen_mov_reg_TN(dc
->op1
, cpu_T
[0]);
1826 static unsigned int dec_movem_mr(DisasContext
*dc
)
1830 DIS(fprintf (logfile
, "movem [$r%u%s, $r%u\n", dc
->op1
,
1831 dc
->postinc
? "+]" : "]", dc
->op2
));
1833 cris_cc_mask(dc
, 0);
1834 /* fetch the address into T0 and T1. */
1835 t_gen_mov_TN_reg(cpu_T
[1], dc
->op1
);
1836 for (i
= 0; i
<= dc
->op2
; i
++) {
1837 /* Perform the load onto regnum i. Always dword wide. */
1838 tcg_gen_mov_tl(cpu_T
[0], cpu_T
[1]);
1839 gen_load_T0_T0(dc
, 4, 0);
1840 t_gen_mov_reg_TN(i
, cpu_T
[0]);
1841 tcg_gen_addi_tl(cpu_T
[1], cpu_T
[1], 4);
1843 /* writeback the updated pointer value. */
1845 t_gen_mov_reg_TN(dc
->op1
, cpu_T
[1]);
1849 static unsigned int dec_movem_rm(DisasContext
*dc
)
1853 DIS(fprintf (logfile
, "movem $r%u, [$r%u%s\n", dc
->op2
, dc
->op1
,
1854 dc
->postinc
? "+]" : "]"));
1856 cris_cc_mask(dc
, 0);
1857 for (i
= 0; i
<= dc
->op2
; i
++) {
1858 /* Fetch register i into T1. */
1859 t_gen_mov_TN_reg(cpu_T
[1], i
);
1860 /* Fetch the address into T0. */
1861 t_gen_mov_TN_reg(cpu_T
[0], dc
->op1
);
1863 tcg_gen_addi_tl(cpu_T
[0], cpu_T
[0], i
* 4);
1864 /* Perform the store. */
1865 gen_store_T0_T1(dc
, 4);
1868 /* T0 should point to the last written addr, advance one more
1870 tcg_gen_addi_tl(cpu_T
[0], cpu_T
[0], 4);
1871 /* writeback the updated pointer value. */
1872 t_gen_mov_reg_TN(dc
->op1
, cpu_T
[0]);
1877 static unsigned int dec_move_rm(DisasContext
*dc
)
1881 memsize
= memsize_zz(dc
);
1883 DIS(fprintf (logfile
, "move.%d $r%u, [$r%u]\n",
1884 memsize
, dc
->op2
, dc
->op1
));
1886 cris_cc_mask(dc
, 0);
1887 /* prepare store. */
1888 t_gen_mov_TN_reg(cpu_T
[0], dc
->op1
);
1889 t_gen_mov_TN_reg(cpu_T
[1], dc
->op2
);
1890 gen_store_T0_T1(dc
, memsize
);
1893 tcg_gen_addi_tl(cpu_T
[0], cpu_T
[0], memsize
);
1894 t_gen_mov_reg_TN(dc
->op1
, cpu_T
[0]);
1899 static unsigned int dec_lapcq(DisasContext
*dc
)
1901 DIS(fprintf (logfile
, "lapcq %x, $r%u\n",
1902 dc
->pc
+ dc
->op1
*2, dc
->op2
));
1903 cris_cc_mask(dc
, 0);
1904 tcg_gen_movi_tl(cpu_T
[1], dc
->pc
+ dc
->op1
* 2);
1905 crisv32_alu_op(dc
, CC_OP_MOVE
, dc
->op2
, 4);
1909 static unsigned int dec_lapc_im(DisasContext
*dc
)
1916 cris_cc_mask(dc
, 0);
1917 imm
= ldl_code(dc
->pc
+ 2);
1918 DIS(fprintf (logfile
, "lapc 0x%x, $r%u\n", imm
+ dc
->pc
, dc
->op2
));
1919 t_gen_mov_reg_TN(rd
, tcg_const_i32(dc
->pc
+ imm
));
1923 /* Jump to special reg. */
1924 static unsigned int dec_jump_p(DisasContext
*dc
)
1926 DIS(fprintf (logfile
, "jump $p%u\n", dc
->op2
));
1927 cris_cc_mask(dc
, 0);
1928 /* Store the return address in Pd. */
1929 t_gen_mov_TN_preg(cpu_T
[0], dc
->op2
);
1930 gen_op_movl_btarget_T0();
1931 cris_prepare_dyn_jmp(dc
);
1935 /* Jump and save. */
1936 static unsigned int dec_jas_r(DisasContext
*dc
)
1938 DIS(fprintf (logfile
, "jas $r%u, $p%u\n", dc
->op1
, dc
->op2
));
1939 cris_cc_mask(dc
, 0);
1940 /* Stor the return address in Pd. */
1941 t_gen_mov_TN_reg(cpu_T
[0], dc
->op1
);
1942 gen_op_movl_btarget_T0();
1943 tcg_gen_movi_tl(cpu_T
[0], dc
->pc
+ 4);
1944 t_gen_mov_preg_TN(dc
->op2
, cpu_T
[0]);
1945 cris_prepare_dyn_jmp(dc
);
1949 static unsigned int dec_jas_im(DisasContext
*dc
)
1953 imm
= ldl_code(dc
->pc
+ 2);
1955 DIS(fprintf (logfile
, "jas 0x%x\n", imm
));
1956 cris_cc_mask(dc
, 0);
1957 /* Stor the return address in Pd. */
1958 tcg_gen_movi_tl(cpu_T
[0], imm
);
1959 gen_op_movl_btarget_T0();
1960 tcg_gen_movi_tl(cpu_T
[0], dc
->pc
+ 8);
1961 t_gen_mov_preg_TN(dc
->op2
, cpu_T
[0]);
1962 cris_prepare_dyn_jmp(dc
);
1966 static unsigned int dec_jasc_im(DisasContext
*dc
)
1970 imm
= ldl_code(dc
->pc
+ 2);
1972 DIS(fprintf (logfile
, "jasc 0x%x\n", imm
));
1973 cris_cc_mask(dc
, 0);
1974 /* Stor the return address in Pd. */
1975 tcg_gen_movi_tl(cpu_T
[0], imm
);
1976 gen_op_movl_btarget_T0();
1977 tcg_gen_movi_tl(cpu_T
[0], dc
->pc
+ 8 + 4);
1978 t_gen_mov_preg_TN(dc
->op2
, cpu_T
[0]);
1979 cris_prepare_dyn_jmp(dc
);
1983 static unsigned int dec_jasc_r(DisasContext
*dc
)
1985 DIS(fprintf (logfile
, "jasc_r $r%u, $p%u\n", dc
->op1
, dc
->op2
));
1986 cris_cc_mask(dc
, 0);
1987 /* Stor the return address in Pd. */
1988 t_gen_mov_TN_reg(cpu_T
[0], dc
->op1
);
1989 gen_op_movl_btarget_T0();
1990 tcg_gen_movi_tl(cpu_T
[0], dc
->pc
+ 4 + 4);
1991 t_gen_mov_preg_TN(dc
->op2
, cpu_T
[0]);
1992 cris_prepare_dyn_jmp(dc
);
1996 static unsigned int dec_bcc_im(DisasContext
*dc
)
1999 uint32_t cond
= dc
->op2
;
2001 offset
= ldl_code(dc
->pc
+ 2);
2002 offset
= sign_extend(offset
, 15);
2004 DIS(fprintf (logfile
, "b%s %d pc=%x dst=%x\n",
2005 cc_name(cond
), offset
,
2006 dc
->pc
, dc
->pc
+ offset
));
2008 cris_cc_mask(dc
, 0);
2009 /* op2 holds the condition-code. */
2010 cris_prepare_cc_branch (dc
, offset
, cond
);
2014 static unsigned int dec_bas_im(DisasContext
*dc
)
2019 simm
= ldl_code(dc
->pc
+ 2);
2021 DIS(fprintf (logfile
, "bas 0x%x, $p%u\n", dc
->pc
+ simm
, dc
->op2
));
2022 cris_cc_mask(dc
, 0);
2023 /* Stor the return address in Pd. */
2024 tcg_gen_movi_tl(cpu_T
[0], dc
->pc
+ simm
);
2025 gen_op_movl_btarget_T0();
2026 tcg_gen_movi_tl(cpu_T
[0], dc
->pc
+ 8);
2027 t_gen_mov_preg_TN(dc
->op2
, cpu_T
[0]);
2028 cris_prepare_dyn_jmp(dc
);
2032 static unsigned int dec_basc_im(DisasContext
*dc
)
2035 simm
= ldl_code(dc
->pc
+ 2);
2037 DIS(fprintf (logfile
, "basc 0x%x, $p%u\n", dc
->pc
+ simm
, dc
->op2
));
2038 cris_cc_mask(dc
, 0);
2039 /* Stor the return address in Pd. */
2040 tcg_gen_movi_tl(cpu_T
[0], dc
->pc
+ simm
);
2041 gen_op_movl_btarget_T0();
2042 tcg_gen_movi_tl(cpu_T
[0], dc
->pc
+ 12);
2043 t_gen_mov_preg_TN(dc
->op2
, cpu_T
[0]);
2044 cris_prepare_dyn_jmp(dc
);
2048 static unsigned int dec_rfe_etc(DisasContext
*dc
)
2050 DIS(fprintf (logfile
, "rfe_etc opc=%x pc=0x%x op1=%d op2=%d\n",
2051 dc
->opcode
, dc
->pc
, dc
->op1
, dc
->op2
));
2053 cris_cc_mask(dc
, 0);
2055 if (dc
->op2
== 15) /* ignore halt. */
2058 switch (dc
->op2
& 7) {
2061 cris_evaluate_flags(dc
);
2062 gen_op_ccs_rshift();
2070 tcg_gen_movi_tl(cpu_T
[0], dc
->pc
);
2071 gen_op_movl_pc_T0();
2072 /* Breaks start at 16 in the exception vector. */
2073 gen_op_break_im(dc
->op1
+ 16);
2074 dc
->is_jmp
= DISAS_SWI
;
2077 printf ("op2=%x\n", dc
->op2
);
2085 static unsigned int dec_ftag_fidx_d_m(DisasContext
*dc
)
2087 /* Ignore D-cache flushes. */
2091 static unsigned int dec_ftag_fidx_i_m(DisasContext
*dc
)
2093 /* Ignore I-cache flushes. */
2097 static unsigned int dec_null(DisasContext
*dc
)
2099 printf ("unknown insn pc=%x opc=%x op1=%x op2=%x\n",
2100 dc
->pc
, dc
->opcode
, dc
->op1
, dc
->op2
);
2106 struct decoder_info
{
2111 unsigned int (*dec
)(DisasContext
*dc
);
2113 /* Order matters here. */
2114 {DEC_MOVEQ
, dec_moveq
},
2115 {DEC_BTSTQ
, dec_btstq
},
2116 {DEC_CMPQ
, dec_cmpq
},
2117 {DEC_ADDOQ
, dec_addoq
},
2118 {DEC_ADDQ
, dec_addq
},
2119 {DEC_SUBQ
, dec_subq
},
2120 {DEC_ANDQ
, dec_andq
},
2122 {DEC_ASRQ
, dec_asrq
},
2123 {DEC_LSLQ
, dec_lslq
},
2124 {DEC_LSRQ
, dec_lsrq
},
2125 {DEC_BCCQ
, dec_bccq
},
2127 {DEC_BCC_IM
, dec_bcc_im
},
2128 {DEC_JAS_IM
, dec_jas_im
},
2129 {DEC_JAS_R
, dec_jas_r
},
2130 {DEC_JASC_IM
, dec_jasc_im
},
2131 {DEC_JASC_R
, dec_jasc_r
},
2132 {DEC_BAS_IM
, dec_bas_im
},
2133 {DEC_BASC_IM
, dec_basc_im
},
2134 {DEC_JUMP_P
, dec_jump_p
},
2135 {DEC_LAPC_IM
, dec_lapc_im
},
2136 {DEC_LAPCQ
, dec_lapcq
},
2138 {DEC_RFE_ETC
, dec_rfe_etc
},
2139 {DEC_ADDC_MR
, dec_addc_mr
},
2141 {DEC_MOVE_MP
, dec_move_mp
},
2142 {DEC_MOVE_PM
, dec_move_pm
},
2143 {DEC_MOVEM_MR
, dec_movem_mr
},
2144 {DEC_MOVEM_RM
, dec_movem_rm
},
2145 {DEC_MOVE_PR
, dec_move_pr
},
2146 {DEC_SCC_R
, dec_scc_r
},
2147 {DEC_SETF
, dec_setclrf
},
2148 {DEC_CLEARF
, dec_setclrf
},
2150 {DEC_MOVE_SR
, dec_move_sr
},
2151 {DEC_MOVE_RP
, dec_move_rp
},
2152 {DEC_SWAP_R
, dec_swap_r
},
2153 {DEC_ABS_R
, dec_abs_r
},
2154 {DEC_LZ_R
, dec_lz_r
},
2155 {DEC_MOVE_RS
, dec_move_rs
},
2156 {DEC_BTST_R
, dec_btst_r
},
2157 {DEC_ADDC_R
, dec_addc_r
},
2159 {DEC_DSTEP_R
, dec_dstep_r
},
2160 {DEC_XOR_R
, dec_xor_r
},
2161 {DEC_MCP_R
, dec_mcp_r
},
2162 {DEC_CMP_R
, dec_cmp_r
},
2164 {DEC_ADDI_R
, dec_addi_r
},
2165 {DEC_ADDI_ACR
, dec_addi_acr
},
2167 {DEC_ADD_R
, dec_add_r
},
2168 {DEC_SUB_R
, dec_sub_r
},
2170 {DEC_ADDU_R
, dec_addu_r
},
2171 {DEC_ADDS_R
, dec_adds_r
},
2172 {DEC_SUBU_R
, dec_subu_r
},
2173 {DEC_SUBS_R
, dec_subs_r
},
2174 {DEC_LSL_R
, dec_lsl_r
},
2176 {DEC_AND_R
, dec_and_r
},
2177 {DEC_OR_R
, dec_or_r
},
2178 {DEC_BOUND_R
, dec_bound_r
},
2179 {DEC_ASR_R
, dec_asr_r
},
2180 {DEC_LSR_R
, dec_lsr_r
},
2182 {DEC_MOVU_R
, dec_movu_r
},
2183 {DEC_MOVS_R
, dec_movs_r
},
2184 {DEC_NEG_R
, dec_neg_r
},
2185 {DEC_MOVE_R
, dec_move_r
},
2187 {DEC_FTAG_FIDX_I_M
, dec_ftag_fidx_i_m
},
2188 {DEC_FTAG_FIDX_D_M
, dec_ftag_fidx_d_m
},
2190 {DEC_MULS_R
, dec_muls_r
},
2191 {DEC_MULU_R
, dec_mulu_r
},
2193 {DEC_ADDU_M
, dec_addu_m
},
2194 {DEC_ADDS_M
, dec_adds_m
},
2195 {DEC_SUBU_M
, dec_subu_m
},
2196 {DEC_SUBS_M
, dec_subs_m
},
2198 {DEC_CMPU_M
, dec_cmpu_m
},
2199 {DEC_CMPS_M
, dec_cmps_m
},
2200 {DEC_MOVU_M
, dec_movu_m
},
2201 {DEC_MOVS_M
, dec_movs_m
},
2203 {DEC_CMP_M
, dec_cmp_m
},
2204 {DEC_ADDO_M
, dec_addo_m
},
2205 {DEC_BOUND_M
, dec_bound_m
},
2206 {DEC_ADD_M
, dec_add_m
},
2207 {DEC_SUB_M
, dec_sub_m
},
2208 {DEC_AND_M
, dec_and_m
},
2209 {DEC_OR_M
, dec_or_m
},
2210 {DEC_MOVE_RM
, dec_move_rm
},
2211 {DEC_TEST_M
, dec_test_m
},
2212 {DEC_MOVE_MR
, dec_move_mr
},
2217 static inline unsigned int
2218 cris_decoder(DisasContext
*dc
)
2220 unsigned int insn_len
= 2;
2224 /* Load a halfword onto the instruction register. */
2225 tmp
= ldl_code(dc
->pc
);
2226 dc
->ir
= tmp
& 0xffff;
2228 /* Now decode it. */
2229 dc
->opcode
= EXTRACT_FIELD(dc
->ir
, 4, 11);
2230 dc
->op1
= EXTRACT_FIELD(dc
->ir
, 0, 3);
2231 dc
->op2
= EXTRACT_FIELD(dc
->ir
, 12, 15);
2232 dc
->zsize
= EXTRACT_FIELD(dc
->ir
, 4, 4);
2233 dc
->zzsize
= EXTRACT_FIELD(dc
->ir
, 4, 5);
2234 dc
->postinc
= EXTRACT_FIELD(dc
->ir
, 10, 10);
2236 /* Large switch for all insns. */
2237 for (i
= 0; i
< sizeof decinfo
/ sizeof decinfo
[0]; i
++) {
2238 if ((dc
->opcode
& decinfo
[i
].mask
) == decinfo
[i
].bits
)
2240 insn_len
= decinfo
[i
].dec(dc
);
2248 static void check_breakpoint(CPUState
*env
, DisasContext
*dc
)
2251 if (env
->nb_breakpoints
> 0) {
2252 for(j
= 0; j
< env
->nb_breakpoints
; j
++) {
2253 if (env
->breakpoints
[j
] == dc
->pc
) {
2254 cris_evaluate_flags (dc
);
2255 tcg_gen_movi_tl(cpu_T
[0], dc
->pc
);
2256 gen_op_movl_pc_T0();
2258 dc
->is_jmp
= DISAS_UPDATE
;
2264 /* generate intermediate code for basic block 'tb'. */
2265 struct DisasContext ctx
;
2267 gen_intermediate_code_internal(CPUState
*env
, TranslationBlock
*tb
,
2270 uint16_t *gen_opc_end
;
2272 unsigned int insn_len
;
2274 struct DisasContext
*dc
= &ctx
;
2275 uint32_t next_page_start
;
2281 gen_opc_end
= gen_opc_buf
+ OPC_MAX_SIZE
;
2283 dc
->is_jmp
= DISAS_NEXT
;
2285 dc
->singlestep_enabled
= env
->singlestep_enabled
;
2288 next_page_start
= (pc_start
& TARGET_PAGE_MASK
) + TARGET_PAGE_SIZE
;
2292 check_breakpoint(env
, dc
);
2293 if (dc
->is_jmp
== DISAS_JUMP
2294 || dc
->is_jmp
== DISAS_SWI
)
2298 j
= gen_opc_ptr
- gen_opc_buf
;
2302 gen_opc_instr_start
[lj
++] = 0;
2304 gen_opc_pc
[lj
] = dc
->pc
;
2305 gen_opc_instr_start
[lj
] = 1;
2308 insn_len
= cris_decoder(dc
);
2309 STATS(gen_op_exec_insn());
2312 || (dc
->flagx_live
&&
2313 !(dc
->cc_op
== CC_OP_FLAGS
&& dc
->flags_x
))) {
2314 cris_clear_x_flag(dc
);
2317 /* Check for delayed branches here. If we do it before
2318 actually genereating any host code, the simulator will just
2319 loop doing nothing for on this program location. */
2320 if (dc
->delayed_branch
) {
2321 dc
->delayed_branch
--;
2322 if (dc
->delayed_branch
== 0)
2324 if (dc
->bcc
== CC_A
) {
2326 dc
->is_jmp
= DISAS_UPDATE
;
2329 /* Conditional jmp. */
2330 gen_op_cc_jmp (dc
->delayed_pc
, dc
->pc
);
2331 dc
->is_jmp
= DISAS_UPDATE
;
2336 if (env
->singlestep_enabled
)
2338 } while (!dc
->is_jmp
&& gen_opc_ptr
< gen_opc_end
2339 && dc
->pc
< next_page_start
);
2342 gen_op_movl_T0_im((long)dc
->pc
);
2343 gen_op_movl_pc_T0();
2346 cris_evaluate_flags (dc
);
2348 if (__builtin_expect(env
->singlestep_enabled
, 0)) {
2351 switch(dc
->is_jmp
) {
2353 gen_goto_tb(dc
, 1, dc
->pc
);
2358 /* indicate that the hash table must be used
2359 to find the next TB */
2364 /* nothing more to generate */
2368 *gen_opc_ptr
= INDEX_op_end
;
2370 j
= gen_opc_ptr
- gen_opc_buf
;
2373 gen_opc_instr_start
[lj
++] = 0;
2375 tb
->size
= dc
->pc
- pc_start
;
2379 if (loglevel
& CPU_LOG_TB_IN_ASM
) {
2380 fprintf(logfile
, "--------------\n");
2381 fprintf(logfile
, "IN: %s\n", lookup_symbol(pc_start
));
2382 target_disas(logfile
, pc_start
, dc
->pc
+ 4 - pc_start
, 0);
2383 fprintf(logfile
, "\n");
2389 int gen_intermediate_code (CPUState
*env
, struct TranslationBlock
*tb
)
2391 return gen_intermediate_code_internal(env
, tb
, 0);
2394 int gen_intermediate_code_pc (CPUState
*env
, struct TranslationBlock
*tb
)
2396 return gen_intermediate_code_internal(env
, tb
, 1);
2399 void cpu_dump_state (CPUState
*env
, FILE *f
,
2400 int (*cpu_fprintf
)(FILE *f
, const char *fmt
, ...),
2409 cpu_fprintf(f
, "PC=%x CCS=%x btaken=%d btarget=%x\n"
2410 "cc_op=%d cc_src=%d cc_dest=%d cc_result=%x cc_mask=%x\n"
2412 env
->pc
, env
->pregs
[PR_CCS
], env
->btaken
, env
->btarget
,
2414 env
->cc_src
, env
->cc_dest
, env
->cc_result
, env
->cc_mask
,
2415 env
->debug1
, env
->debug2
, env
->debug3
);
2417 for (i
= 0; i
< 16; i
++) {
2418 cpu_fprintf(f
, "r%2.2d=%8.8x ", i
, env
->regs
[i
]);
2419 if ((i
+ 1) % 4 == 0)
2420 cpu_fprintf(f
, "\n");
2422 cpu_fprintf(f
, "\nspecial regs:\n");
2423 for (i
= 0; i
< 16; i
++) {
2424 cpu_fprintf(f
, "p%2.2d=%8.8x ", i
, env
->pregs
[i
]);
2425 if ((i
+ 1) % 4 == 0)
2426 cpu_fprintf(f
, "\n");
2428 srs
= env
->pregs
[PR_SRS
];
2429 cpu_fprintf(f
, "\nsupport function regs bank %d:\n", srs
);
2431 for (i
= 0; i
< 16; i
++) {
2432 cpu_fprintf(f
, "s%2.2d=%8.8x ",
2433 i
, env
->sregs
[srs
][i
]);
2434 if ((i
+ 1) % 4 == 0)
2435 cpu_fprintf(f
, "\n");
2438 cpu_fprintf(f
, "\n\n");
2442 static void tcg_macro_func(TCGContext
*s
, int macro_id
, const int *dead_args
)
2446 CPUCRISState
*cpu_cris_init (const char *cpu_model
)
2450 env
= qemu_mallocz(sizeof(CPUCRISState
));
2455 tcg_set_macro_func(&tcg_ctx
, tcg_macro_func
);
2456 cpu_env
= tcg_global_reg_new(TCG_TYPE_PTR
, TCG_AREG0
, "env");
2457 #if TARGET_LONG_BITS > HOST_LONG_BITS
2458 cpu_T
[0] = tcg_global_mem_new(TCG_TYPE_TL
,
2459 TCG_AREG0
, offsetof(CPUState
, t0
), "T0");
2460 cpu_T
[1] = tcg_global_mem_new(TCG_TYPE_TL
,
2461 TCG_AREG0
, offsetof(CPUState
, t1
), "T1");
2463 cpu_T
[0] = tcg_global_reg_new(TCG_TYPE_TL
, TCG_AREG1
, "T0");
2464 cpu_T
[1] = tcg_global_reg_new(TCG_TYPE_TL
, TCG_AREG2
, "T1");
2471 void cpu_reset (CPUCRISState
*env
)
2473 memset(env
, 0, offsetof(CPUCRISState
, breakpoints
));