S390: ccw firmware: Add compiled blob
[qemu/agraf.git] / target-unicore32 / helper.c
blob61eb2c374a02747c1e93bb1dae012b7f9f034c79
1 /*
2 * Copyright (C) 2010-2012 Guan Xuetao
4 * This program is free software; you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License version 2 as
6 * published by the Free Software Foundation.
8 * Contributions from 2012-04-01 on are considered under GPL version 2,
9 * or (at your option) any later version.
12 #include "cpu.h"
13 #include "exec/gdbstub.h"
14 #include "helper.h"
15 #include "qemu/host-utils.h"
16 #ifndef CONFIG_USER_ONLY
17 #include "ui/console.h"
18 #endif
20 #undef DEBUG_UC32
22 #ifdef DEBUG_UC32
23 #define DPRINTF(fmt, ...) printf("%s: " fmt , __func__, ## __VA_ARGS__)
24 #else
25 #define DPRINTF(fmt, ...) do {} while (0)
26 #endif
28 CPUUniCore32State *uc32_cpu_init(const char *cpu_model)
30 UniCore32CPU *cpu;
31 CPUUniCore32State *env;
32 ObjectClass *oc;
34 oc = cpu_class_by_name(TYPE_UNICORE32_CPU, cpu_model);
35 if (oc == NULL) {
36 return NULL;
38 cpu = UNICORE32_CPU(object_new(object_class_get_name(oc)));
39 env = &cpu->env;
40 env->cpu_model_str = cpu_model;
42 object_property_set_bool(OBJECT(cpu), true, "realized", NULL);
44 return env;
47 uint32_t HELPER(clo)(uint32_t x)
49 return clo32(x);
52 uint32_t HELPER(clz)(uint32_t x)
54 return clz32(x);
57 #ifndef CONFIG_USER_ONLY
58 void helper_cp0_set(CPUUniCore32State *env, uint32_t val, uint32_t creg,
59 uint32_t cop)
62 * movc pp.nn, rn, #imm9
63 * rn: UCOP_REG_D
64 * nn: UCOP_REG_N
65 * 1: sys control reg.
66 * 2: page table base reg.
67 * 3: data fault status reg.
68 * 4: insn fault status reg.
69 * 5: cache op. reg.
70 * 6: tlb op. reg.
71 * imm9: split UCOP_IMM10 with bit5 is 0
73 switch (creg) {
74 case 1:
75 if (cop != 0) {
76 goto unrecognized;
78 env->cp0.c1_sys = val;
79 break;
80 case 2:
81 if (cop != 0) {
82 goto unrecognized;
84 env->cp0.c2_base = val;
85 break;
86 case 3:
87 if (cop != 0) {
88 goto unrecognized;
90 env->cp0.c3_faultstatus = val;
91 break;
92 case 4:
93 if (cop != 0) {
94 goto unrecognized;
96 env->cp0.c4_faultaddr = val;
97 break;
98 case 5:
99 switch (cop) {
100 case 28:
101 DPRINTF("Invalidate Entire I&D cache\n");
102 return;
103 case 20:
104 DPRINTF("Invalidate Entire Icache\n");
105 return;
106 case 12:
107 DPRINTF("Invalidate Entire Dcache\n");
108 return;
109 case 10:
110 DPRINTF("Clean Entire Dcache\n");
111 return;
112 case 14:
113 DPRINTF("Flush Entire Dcache\n");
114 return;
115 case 13:
116 DPRINTF("Invalidate Dcache line\n");
117 return;
118 case 11:
119 DPRINTF("Clean Dcache line\n");
120 return;
121 case 15:
122 DPRINTF("Flush Dcache line\n");
123 return;
125 break;
126 case 6:
127 if ((cop <= 6) && (cop >= 2)) {
128 /* invalid all tlb */
129 tlb_flush(env, 1);
130 return;
132 break;
133 default:
134 goto unrecognized;
136 return;
137 unrecognized:
138 DPRINTF("Wrong register (%d) or wrong operation (%d) in cp0_set!\n",
139 creg, cop);
142 uint32_t helper_cp0_get(CPUUniCore32State *env, uint32_t creg, uint32_t cop)
145 * movc rd, pp.nn, #imm9
146 * rd: UCOP_REG_D
147 * nn: UCOP_REG_N
148 * 0: cpuid and cachetype
149 * 1: sys control reg.
150 * 2: page table base reg.
151 * 3: data fault status reg.
152 * 4: insn fault status reg.
153 * imm9: split UCOP_IMM10 with bit5 is 0
155 switch (creg) {
156 case 0:
157 switch (cop) {
158 case 0:
159 return env->cp0.c0_cpuid;
160 case 1:
161 return env->cp0.c0_cachetype;
163 break;
164 case 1:
165 if (cop == 0) {
166 return env->cp0.c1_sys;
168 break;
169 case 2:
170 if (cop == 0) {
171 return env->cp0.c2_base;
173 break;
174 case 3:
175 if (cop == 0) {
176 return env->cp0.c3_faultstatus;
178 break;
179 case 4:
180 if (cop == 0) {
181 return env->cp0.c4_faultaddr;
183 break;
185 DPRINTF("Wrong register (%d) or wrong operation (%d) in cp0_set!\n",
186 creg, cop);
187 return 0;
190 #ifdef CONFIG_CURSES
192 * FIXME:
193 * 1. curses windows will be blank when switching back
194 * 2. backspace is not handled yet
196 static void putc_on_screen(unsigned char ch)
198 static WINDOW *localwin;
199 static int init;
201 if (!init) {
202 /* Assume 80 * 30 screen to minimize the implementation */
203 localwin = newwin(30, 80, 0, 0);
204 scrollok(localwin, TRUE);
205 init = TRUE;
208 if (isprint(ch)) {
209 wprintw(localwin, "%c", ch);
210 } else {
211 switch (ch) {
212 case '\n':
213 wprintw(localwin, "%c", ch);
214 break;
215 case '\r':
216 /* If '\r' is put before '\n', the curses window will destroy the
217 * last print line. And meanwhile, '\n' implifies '\r' inside. */
218 break;
219 default: /* Not handled, so just print it hex code */
220 wprintw(localwin, "-- 0x%x --", ch);
224 wrefresh(localwin);
226 #else
227 #define putc_on_screen(c) do { } while (0)
228 #endif
230 void helper_cp1_putc(target_ulong x)
232 putc_on_screen((unsigned char)x); /* Output to screen */
233 DPRINTF("%c", x); /* Output to stdout */
235 #endif
237 #ifdef CONFIG_USER_ONLY
238 void switch_mode(CPUUniCore32State *env, int mode)
240 if (mode != ASR_MODE_USER) {
241 cpu_abort(env, "Tried to switch out of user mode\n");
245 void uc32_cpu_do_interrupt(CPUState *cs)
247 UniCore32CPU *cpu = UNICORE32_CPU(cs);
248 CPUUniCore32State *env = &cpu->env;
250 cpu_abort(env, "NO interrupt in user mode\n");
253 int uc32_cpu_handle_mmu_fault(CPUUniCore32State *env, target_ulong address,
254 int access_type, int mmu_idx)
256 cpu_abort(env, "NO mmu fault in user mode\n");
257 return 1;
259 #endif