root / target-s390x / cpu.c @ d5627ce8
History | View | Annotate | Download (4.3 kB)
1 | 29e4bcb2 | Andreas Färber | /*
|
---|---|---|---|
2 | 29e4bcb2 | Andreas Färber | * QEMU S/390 CPU
|
3 | 29e4bcb2 | Andreas Färber | *
|
4 | 1ac1a749 | Andreas Färber | * Copyright (c) 2009 Ulrich Hecht
|
5 | 1ac1a749 | Andreas Färber | * Copyright (c) 2011 Alexander Graf
|
6 | 29e4bcb2 | Andreas Färber | * Copyright (c) 2012 SUSE LINUX Products GmbH
|
7 | 70bada03 | Jens Freimann | * Copyright (c) 2012 IBM Corp.
|
8 | 29e4bcb2 | Andreas Färber | *
|
9 | 29e4bcb2 | Andreas Färber | * This library is free software; you can redistribute it and/or
|
10 | 29e4bcb2 | Andreas Färber | * modify it under the terms of the GNU Lesser General Public
|
11 | 29e4bcb2 | Andreas Färber | * License as published by the Free Software Foundation; either
|
12 | 29e4bcb2 | Andreas Färber | * version 2.1 of the License, or (at your option) any later version.
|
13 | 29e4bcb2 | Andreas Färber | *
|
14 | 29e4bcb2 | Andreas Färber | * This library is distributed in the hope that it will be useful,
|
15 | 29e4bcb2 | Andreas Färber | * but WITHOUT ANY WARRANTY; without even the implied warranty of
|
16 | 29e4bcb2 | Andreas Färber | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
17 | 29e4bcb2 | Andreas Färber | * Lesser General Public License for more details.
|
18 | 29e4bcb2 | Andreas Färber | *
|
19 | 29e4bcb2 | Andreas Färber | * You should have received a copy of the GNU Lesser General Public
|
20 | 29e4bcb2 | Andreas Färber | * License along with this library; if not, see
|
21 | 29e4bcb2 | Andreas Färber | * <http://www.gnu.org/licenses/lgpl-2.1.html>
|
22 | 70bada03 | Jens Freimann | * Contributions after 2012-12-11 are licensed under the terms of the
|
23 | 70bada03 | Jens Freimann | * GNU GPL, version 2 or (at your option) any later version.
|
24 | 29e4bcb2 | Andreas Färber | */
|
25 | 29e4bcb2 | Andreas Färber | |
26 | 564b863d | Andreas Färber | #include "cpu.h" |
27 | 29e4bcb2 | Andreas Färber | #include "qemu-common.h" |
28 | 1de7afc9 | Paolo Bonzini | #include "qemu/timer.h" |
29 | 904e5fd5 | Viktor Mihajlovski | #ifndef CONFIG_USER_ONLY
|
30 | 70bada03 | Jens Freimann | #include "hw/hw.h" |
31 | 904e5fd5 | Viktor Mihajlovski | #include "sysemu/arch_init.h" |
32 | 904e5fd5 | Viktor Mihajlovski | #endif
|
33 | 904e5fd5 | Viktor Mihajlovski | |
34 | 70bada03 | Jens Freimann | #define CR0_RESET 0xE0UL |
35 | 70bada03 | Jens Freimann | #define CR14_RESET 0xC2000000UL; |
36 | 70bada03 | Jens Freimann | |
37 | 904e5fd5 | Viktor Mihajlovski | /* generate CPU information for cpu -? */
|
38 | 904e5fd5 | Viktor Mihajlovski | void s390_cpu_list(FILE *f, fprintf_function cpu_fprintf)
|
39 | 904e5fd5 | Viktor Mihajlovski | { |
40 | 904e5fd5 | Viktor Mihajlovski | #ifdef CONFIG_KVM
|
41 | 904e5fd5 | Viktor Mihajlovski | (*cpu_fprintf)(f, "s390 %16s\n", "host"); |
42 | 904e5fd5 | Viktor Mihajlovski | #endif
|
43 | 904e5fd5 | Viktor Mihajlovski | } |
44 | 29e4bcb2 | Andreas Färber | |
45 | 904e5fd5 | Viktor Mihajlovski | #ifndef CONFIG_USER_ONLY
|
46 | 904e5fd5 | Viktor Mihajlovski | CpuDefinitionInfoList *arch_query_cpu_definitions(Error **errp) |
47 | 904e5fd5 | Viktor Mihajlovski | { |
48 | 904e5fd5 | Viktor Mihajlovski | CpuDefinitionInfoList *entry; |
49 | 904e5fd5 | Viktor Mihajlovski | CpuDefinitionInfo *info; |
50 | 904e5fd5 | Viktor Mihajlovski | |
51 | 904e5fd5 | Viktor Mihajlovski | info = g_malloc0(sizeof(*info));
|
52 | 904e5fd5 | Viktor Mihajlovski | info->name = g_strdup("host");
|
53 | 904e5fd5 | Viktor Mihajlovski | |
54 | 904e5fd5 | Viktor Mihajlovski | entry = g_malloc0(sizeof(*entry));
|
55 | 904e5fd5 | Viktor Mihajlovski | entry->value = info; |
56 | 904e5fd5 | Viktor Mihajlovski | |
57 | 904e5fd5 | Viktor Mihajlovski | return entry;
|
58 | 904e5fd5 | Viktor Mihajlovski | } |
59 | 904e5fd5 | Viktor Mihajlovski | #endif
|
60 | 29e4bcb2 | Andreas Färber | |
61 | 1ac1a749 | Andreas Färber | /* CPUClass::reset() */
|
62 | 29e4bcb2 | Andreas Färber | static void s390_cpu_reset(CPUState *s) |
63 | 29e4bcb2 | Andreas Färber | { |
64 | 29e4bcb2 | Andreas Färber | S390CPU *cpu = S390_CPU(s); |
65 | 29e4bcb2 | Andreas Färber | S390CPUClass *scc = S390_CPU_GET_CLASS(cpu); |
66 | 29e4bcb2 | Andreas Färber | CPUS390XState *env = &cpu->env; |
67 | 29e4bcb2 | Andreas Färber | |
68 | 1ac1a749 | Andreas Färber | if (qemu_loglevel_mask(CPU_LOG_RESET)) {
|
69 | 55e5c285 | Andreas Färber | qemu_log("CPU Reset (CPU %d)\n", s->cpu_index);
|
70 | 1ac1a749 | Andreas Färber | log_cpu_state(env, 0);
|
71 | 1ac1a749 | Andreas Färber | } |
72 | 1ac1a749 | Andreas Färber | |
73 | 70bada03 | Jens Freimann | s390_del_running_cpu(env); |
74 | 70bada03 | Jens Freimann | |
75 | 29e4bcb2 | Andreas Färber | scc->parent_reset(s); |
76 | 29e4bcb2 | Andreas Färber | |
77 | 1ac1a749 | Andreas Färber | memset(env, 0, offsetof(CPUS390XState, breakpoints));
|
78 | 70bada03 | Jens Freimann | |
79 | 70bada03 | Jens Freimann | /* architectured initial values for CR 0 and 14 */
|
80 | 70bada03 | Jens Freimann | env->cregs[0] = CR0_RESET;
|
81 | 70bada03 | Jens Freimann | env->cregs[14] = CR14_RESET;
|
82 | 70bada03 | Jens Freimann | /* set halted to 1 to make sure we can add the cpu in
|
83 | 70bada03 | Jens Freimann | * s390_ipl_cpu code, where env->halted is set back to 0
|
84 | 70bada03 | Jens Freimann | * after incrementing the cpu counter */
|
85 | 70bada03 | Jens Freimann | #if !defined(CONFIG_USER_ONLY)
|
86 | 70bada03 | Jens Freimann | env->halted = 1;
|
87 | 70bada03 | Jens Freimann | #endif
|
88 | 1ac1a749 | Andreas Färber | tlb_flush(env, 1);
|
89 | 29e4bcb2 | Andreas Färber | } |
90 | 29e4bcb2 | Andreas Färber | |
91 | 70bada03 | Jens Freimann | #if !defined(CONFIG_USER_ONLY)
|
92 | 70bada03 | Jens Freimann | static void s390_cpu_machine_reset_cb(void *opaque) |
93 | 70bada03 | Jens Freimann | { |
94 | 70bada03 | Jens Freimann | S390CPU *cpu = opaque; |
95 | 70bada03 | Jens Freimann | |
96 | 70bada03 | Jens Freimann | cpu_reset(CPU(cpu)); |
97 | 70bada03 | Jens Freimann | } |
98 | 70bada03 | Jens Freimann | #endif
|
99 | 70bada03 | Jens Freimann | |
100 | 8f22e0df | Andreas Färber | static void s390_cpu_initfn(Object *obj) |
101 | 8f22e0df | Andreas Färber | { |
102 | 8f22e0df | Andreas Färber | S390CPU *cpu = S390_CPU(obj); |
103 | 8f22e0df | Andreas Färber | CPUS390XState *env = &cpu->env; |
104 | 8f22e0df | Andreas Färber | static int cpu_num = 0; |
105 | 8f22e0df | Andreas Färber | #if !defined(CONFIG_USER_ONLY)
|
106 | 8f22e0df | Andreas Färber | struct tm tm;
|
107 | 8f22e0df | Andreas Färber | #endif
|
108 | 8f22e0df | Andreas Färber | |
109 | 8f22e0df | Andreas Färber | cpu_exec_init(env); |
110 | 8f22e0df | Andreas Färber | #if !defined(CONFIG_USER_ONLY)
|
111 | 70bada03 | Jens Freimann | qemu_register_reset(s390_cpu_machine_reset_cb, cpu); |
112 | 8f22e0df | Andreas Färber | qemu_get_timedate(&tm, 0);
|
113 | 8f22e0df | Andreas Färber | env->tod_offset = TOD_UNIX_EPOCH + |
114 | 8f22e0df | Andreas Färber | (time2tod(mktimegm(&tm)) * 1000000000ULL);
|
115 | 8f22e0df | Andreas Färber | env->tod_basetime = 0;
|
116 | b8ba6799 | Andreas Färber | env->tod_timer = qemu_new_timer_ns(vm_clock, s390x_tod_timer, cpu); |
117 | b8ba6799 | Andreas Färber | env->cpu_timer = qemu_new_timer_ns(vm_clock, s390x_cpu_timer, cpu); |
118 | 70bada03 | Jens Freimann | /* set env->halted state to 1 to avoid decrementing the running
|
119 | 70bada03 | Jens Freimann | * cpu counter in s390_cpu_reset to a negative number at
|
120 | 70bada03 | Jens Freimann | * initial ipl */
|
121 | 70bada03 | Jens Freimann | env->halted = 1;
|
122 | 8f22e0df | Andreas Färber | #endif
|
123 | 8f22e0df | Andreas Färber | env->cpu_num = cpu_num++; |
124 | 8f22e0df | Andreas Färber | env->ext_index = -1;
|
125 | 8f22e0df | Andreas Färber | |
126 | 8f22e0df | Andreas Färber | cpu_reset(CPU(cpu)); |
127 | 8f22e0df | Andreas Färber | } |
128 | 8f22e0df | Andreas Färber | |
129 | d5627ce8 | Andreas Färber | static void s390_cpu_finalize(Object *obj) |
130 | d5627ce8 | Andreas Färber | { |
131 | d5627ce8 | Andreas Färber | #if !defined(CONFIG_USER_ONLY)
|
132 | d5627ce8 | Andreas Färber | S390CPU *cpu = S390_CPU(obj); |
133 | d5627ce8 | Andreas Färber | |
134 | d5627ce8 | Andreas Färber | qemu_unregister_reset(s390_cpu_machine_reset_cb, cpu); |
135 | d5627ce8 | Andreas Färber | #endif
|
136 | d5627ce8 | Andreas Färber | } |
137 | d5627ce8 | Andreas Färber | |
138 | 29e4bcb2 | Andreas Färber | static void s390_cpu_class_init(ObjectClass *oc, void *data) |
139 | 29e4bcb2 | Andreas Färber | { |
140 | 29e4bcb2 | Andreas Färber | S390CPUClass *scc = S390_CPU_CLASS(oc); |
141 | 29e4bcb2 | Andreas Färber | CPUClass *cc = CPU_CLASS(scc); |
142 | 29e4bcb2 | Andreas Färber | |
143 | 29e4bcb2 | Andreas Färber | scc->parent_reset = cc->reset; |
144 | 29e4bcb2 | Andreas Färber | cc->reset = s390_cpu_reset; |
145 | 29e4bcb2 | Andreas Färber | } |
146 | 29e4bcb2 | Andreas Färber | |
147 | 29e4bcb2 | Andreas Färber | static const TypeInfo s390_cpu_type_info = { |
148 | 29e4bcb2 | Andreas Färber | .name = TYPE_S390_CPU, |
149 | 29e4bcb2 | Andreas Färber | .parent = TYPE_CPU, |
150 | 29e4bcb2 | Andreas Färber | .instance_size = sizeof(S390CPU),
|
151 | 8f22e0df | Andreas Färber | .instance_init = s390_cpu_initfn, |
152 | d5627ce8 | Andreas Färber | .instance_finalize = s390_cpu_finalize, |
153 | 29e4bcb2 | Andreas Färber | .abstract = false,
|
154 | 29e4bcb2 | Andreas Färber | .class_size = sizeof(S390CPUClass),
|
155 | 29e4bcb2 | Andreas Färber | .class_init = s390_cpu_class_init, |
156 | 29e4bcb2 | Andreas Färber | }; |
157 | 29e4bcb2 | Andreas Färber | |
158 | 29e4bcb2 | Andreas Färber | static void s390_cpu_register_types(void) |
159 | 29e4bcb2 | Andreas Färber | { |
160 | 29e4bcb2 | Andreas Färber | type_register_static(&s390_cpu_type_info); |
161 | 29e4bcb2 | Andreas Färber | } |
162 | 29e4bcb2 | Andreas Färber | |
163 | 29e4bcb2 | Andreas Färber | type_init(s390_cpu_register_types) |