1075d047eSYoshinori Sato /*
2075d047eSYoshinori Sato * RX emulation
3075d047eSYoshinori Sato *
4075d047eSYoshinori Sato * Copyright (c) 2019 Yoshinori Sato
5075d047eSYoshinori Sato *
6075d047eSYoshinori Sato * This program is free software; you can redistribute it and/or modify it
7075d047eSYoshinori Sato * under the terms and conditions of the GNU General Public License,
8075d047eSYoshinori Sato * version 2 or later, as published by the Free Software Foundation.
9075d047eSYoshinori Sato *
10075d047eSYoshinori Sato * This program is distributed in the hope it will be useful, but WITHOUT
11075d047eSYoshinori Sato * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
12075d047eSYoshinori Sato * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
13075d047eSYoshinori Sato * more details.
14075d047eSYoshinori Sato *
15075d047eSYoshinori Sato * You should have received a copy of the GNU General Public License along with
16075d047eSYoshinori Sato * this program. If not, see <http://www.gnu.org/licenses/>.
17075d047eSYoshinori Sato */
18075d047eSYoshinori Sato
19075d047eSYoshinori Sato #include "qemu/osdep.h"
20075d047eSYoshinori Sato #include "qemu/bitops.h"
21075d047eSYoshinori Sato #include "cpu.h"
22075d047eSYoshinori Sato #include "exec/log.h"
23075d047eSYoshinori Sato #include "exec/cpu_ldst.h"
24075d047eSYoshinori Sato #include "hw/irq.h"
25075d047eSYoshinori Sato
rx_cpu_unpack_psw(CPURXState * env,uint32_t psw,int rte)26075d047eSYoshinori Sato void rx_cpu_unpack_psw(CPURXState *env, uint32_t psw, int rte)
27075d047eSYoshinori Sato {
28075d047eSYoshinori Sato if (env->psw_pm == 0) {
29075d047eSYoshinori Sato env->psw_ipl = FIELD_EX32(psw, PSW, IPL);
30075d047eSYoshinori Sato if (rte) {
31075d047eSYoshinori Sato /* PSW.PM can write RTE and RTFI */
32075d047eSYoshinori Sato env->psw_pm = FIELD_EX32(psw, PSW, PM);
33075d047eSYoshinori Sato }
34075d047eSYoshinori Sato env->psw_u = FIELD_EX32(psw, PSW, U);
35075d047eSYoshinori Sato env->psw_i = FIELD_EX32(psw, PSW, I);
36075d047eSYoshinori Sato }
37075d047eSYoshinori Sato env->psw_o = FIELD_EX32(psw, PSW, O) << 31;
38075d047eSYoshinori Sato env->psw_s = FIELD_EX32(psw, PSW, S) << 31;
39075d047eSYoshinori Sato env->psw_z = 1 - FIELD_EX32(psw, PSW, Z);
40075d047eSYoshinori Sato env->psw_c = FIELD_EX32(psw, PSW, C);
41075d047eSYoshinori Sato }
42075d047eSYoshinori Sato
4365c575b6SPhilippe Mathieu-Daudé #ifndef CONFIG_USER_ONLY
4465c575b6SPhilippe Mathieu-Daudé
45075d047eSYoshinori Sato #define INT_FLAGS (CPU_INTERRUPT_HARD | CPU_INTERRUPT_FIR)
rx_cpu_do_interrupt(CPUState * cs)46075d047eSYoshinori Sato void rx_cpu_do_interrupt(CPUState *cs)
47075d047eSYoshinori Sato {
4838688fdbSEduardo Habkost RXCPU *cpu = RX_CPU(cs);
49075d047eSYoshinori Sato CPURXState *env = &cpu->env;
50075d047eSYoshinori Sato int do_irq = cs->interrupt_request & INT_FLAGS;
51075d047eSYoshinori Sato uint32_t save_psw;
52075d047eSYoshinori Sato
53075d047eSYoshinori Sato env->in_sleep = 0;
54075d047eSYoshinori Sato
55075d047eSYoshinori Sato if (env->psw_u) {
56075d047eSYoshinori Sato env->usp = env->regs[0];
57075d047eSYoshinori Sato } else {
58075d047eSYoshinori Sato env->isp = env->regs[0];
59075d047eSYoshinori Sato }
60075d047eSYoshinori Sato save_psw = rx_cpu_pack_psw(env);
61075d047eSYoshinori Sato env->psw_pm = env->psw_i = env->psw_u = 0;
62075d047eSYoshinori Sato
63075d047eSYoshinori Sato if (do_irq) {
64075d047eSYoshinori Sato if (do_irq & CPU_INTERRUPT_FIR) {
65075d047eSYoshinori Sato env->bpc = env->pc;
66075d047eSYoshinori Sato env->bpsw = save_psw;
67075d047eSYoshinori Sato env->pc = env->fintv;
68075d047eSYoshinori Sato env->psw_ipl = 15;
69075d047eSYoshinori Sato cs->interrupt_request &= ~CPU_INTERRUPT_FIR;
70075d047eSYoshinori Sato qemu_set_irq(env->ack, env->ack_irq);
71075d047eSYoshinori Sato qemu_log_mask(CPU_LOG_INT, "fast interrupt raised\n");
72075d047eSYoshinori Sato } else if (do_irq & CPU_INTERRUPT_HARD) {
73075d047eSYoshinori Sato env->isp -= 4;
74075d047eSYoshinori Sato cpu_stl_data(env, env->isp, save_psw);
75075d047eSYoshinori Sato env->isp -= 4;
76075d047eSYoshinori Sato cpu_stl_data(env, env->isp, env->pc);
77075d047eSYoshinori Sato env->pc = cpu_ldl_data(env, env->intb + env->ack_irq * 4);
78075d047eSYoshinori Sato env->psw_ipl = env->ack_ipl;
79075d047eSYoshinori Sato cs->interrupt_request &= ~CPU_INTERRUPT_HARD;
80075d047eSYoshinori Sato qemu_set_irq(env->ack, env->ack_irq);
81075d047eSYoshinori Sato qemu_log_mask(CPU_LOG_INT,
82075d047eSYoshinori Sato "interrupt 0x%02x raised\n", env->ack_irq);
83075d047eSYoshinori Sato }
84075d047eSYoshinori Sato } else {
85075d047eSYoshinori Sato uint32_t vec = cs->exception_index;
86075d047eSYoshinori Sato const char *expname = "unknown exception";
87075d047eSYoshinori Sato
88075d047eSYoshinori Sato env->isp -= 4;
89075d047eSYoshinori Sato cpu_stl_data(env, env->isp, save_psw);
90075d047eSYoshinori Sato env->isp -= 4;
91075d047eSYoshinori Sato cpu_stl_data(env, env->isp, env->pc);
92075d047eSYoshinori Sato
93075d047eSYoshinori Sato if (vec < 0x100) {
94075d047eSYoshinori Sato env->pc = cpu_ldl_data(env, 0xffffffc0 + vec * 4);
95075d047eSYoshinori Sato } else {
96075d047eSYoshinori Sato env->pc = cpu_ldl_data(env, env->intb + (vec & 0xff) * 4);
97075d047eSYoshinori Sato }
98075d047eSYoshinori Sato switch (vec) {
99075d047eSYoshinori Sato case 20:
100075d047eSYoshinori Sato expname = "privilege violation";
101075d047eSYoshinori Sato break;
102075d047eSYoshinori Sato case 21:
103075d047eSYoshinori Sato expname = "access exception";
104075d047eSYoshinori Sato break;
105075d047eSYoshinori Sato case 23:
106075d047eSYoshinori Sato expname = "illegal instruction";
107075d047eSYoshinori Sato break;
108075d047eSYoshinori Sato case 25:
109075d047eSYoshinori Sato expname = "fpu exception";
110075d047eSYoshinori Sato break;
111075d047eSYoshinori Sato case 30:
112075d047eSYoshinori Sato expname = "non-maskable interrupt";
113075d047eSYoshinori Sato break;
114075d047eSYoshinori Sato case 0x100 ... 0x1ff:
115075d047eSYoshinori Sato expname = "unconditional trap";
116075d047eSYoshinori Sato }
117075d047eSYoshinori Sato qemu_log_mask(CPU_LOG_INT, "exception 0x%02x [%s] raised\n",
118075d047eSYoshinori Sato (vec & 0xff), expname);
119075d047eSYoshinori Sato }
120075d047eSYoshinori Sato env->regs[0] = env->isp;
121075d047eSYoshinori Sato }
122075d047eSYoshinori Sato
rx_cpu_exec_interrupt(CPUState * cs,int interrupt_request)123075d047eSYoshinori Sato bool rx_cpu_exec_interrupt(CPUState *cs, int interrupt_request)
124075d047eSYoshinori Sato {
12538688fdbSEduardo Habkost RXCPU *cpu = RX_CPU(cs);
126075d047eSYoshinori Sato CPURXState *env = &cpu->env;
127075d047eSYoshinori Sato int accept = 0;
128075d047eSYoshinori Sato /* hardware interrupt (Normal) */
129075d047eSYoshinori Sato if ((interrupt_request & CPU_INTERRUPT_HARD) &&
130075d047eSYoshinori Sato env->psw_i && (env->psw_ipl < env->req_ipl)) {
131075d047eSYoshinori Sato env->ack_irq = env->req_irq;
132075d047eSYoshinori Sato env->ack_ipl = env->req_ipl;
133075d047eSYoshinori Sato accept = 1;
134075d047eSYoshinori Sato }
135075d047eSYoshinori Sato /* hardware interrupt (FIR) */
136075d047eSYoshinori Sato if ((interrupt_request & CPU_INTERRUPT_FIR) &&
137075d047eSYoshinori Sato env->psw_i && (env->psw_ipl < 15)) {
138075d047eSYoshinori Sato accept = 1;
139075d047eSYoshinori Sato }
140075d047eSYoshinori Sato if (accept) {
141075d047eSYoshinori Sato rx_cpu_do_interrupt(cs);
142075d047eSYoshinori Sato return true;
143075d047eSYoshinori Sato }
144075d047eSYoshinori Sato return false;
145075d047eSYoshinori Sato }
146075d047eSYoshinori Sato
rx_cpu_get_phys_page_debug(CPUState * cs,vaddr addr)147075d047eSYoshinori Sato hwaddr rx_cpu_get_phys_page_debug(CPUState *cs, vaddr addr)
148075d047eSYoshinori Sato {
149075d047eSYoshinori Sato return addr;
150075d047eSYoshinori Sato }
151*6d2d454aSPhilippe Mathieu-Daudé
152*6d2d454aSPhilippe Mathieu-Daudé #endif /* !CONFIG_USER_ONLY */
153