]>
Commit | Line | Data |
---|---|---|
c643603a RH |
1 | /* |
2 | * HPPA interrupt helper routines | |
3 | * | |
4 | * Copyright (c) 2017 Richard Henderson | |
5 | * | |
6 | * This library is free software; you can redistribute it and/or | |
7 | * modify it under the terms of the GNU Lesser General Public | |
8 | * License as published by the Free Software Foundation; either | |
d6ea4236 | 9 | * version 2.1 of the License, or (at your option) any later version. |
c643603a RH |
10 | * |
11 | * This library is distributed in the hope that it will be useful, | |
12 | * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
13 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
14 | * Lesser General Public License for more details. | |
15 | * | |
16 | * You should have received a copy of the GNU Lesser General Public | |
17 | * License along with this library; if not, see <http://www.gnu.org/licenses/>. | |
18 | */ | |
19 | ||
20 | #include "qemu/osdep.h" | |
c643603a | 21 | #include "cpu.h" |
c643603a RH |
22 | #include "migration/cpu.h" |
23 | ||
24 | #if TARGET_REGISTER_BITS == 64 | |
25 | #define qemu_put_betr qemu_put_be64 | |
26 | #define qemu_get_betr qemu_get_be64 | |
27 | #define VMSTATE_UINTTL_V(_f, _s, _v) \ | |
28 | VMSTATE_UINT64_V(_f, _s, _v) | |
29 | #define VMSTATE_UINTTL_ARRAY_V(_f, _s, _n, _v) \ | |
30 | VMSTATE_UINT64_ARRAY_V(_f, _s, _n, _v) | |
31 | #else | |
32 | #define qemu_put_betr qemu_put_be32 | |
33 | #define qemu_get_betr qemu_get_be32 | |
34 | #define VMSTATE_UINTTR_V(_f, _s, _v) \ | |
35 | VMSTATE_UINT32_V(_f, _s, _v) | |
36 | #define VMSTATE_UINTTR_ARRAY_V(_f, _s, _n, _v) \ | |
37 | VMSTATE_UINT32_ARRAY_V(_f, _s, _n, _v) | |
38 | #endif | |
39 | ||
40 | #define VMSTATE_UINTTR(_f, _s) \ | |
41 | VMSTATE_UINTTR_V(_f, _s, 0) | |
42 | #define VMSTATE_UINTTR_ARRAY(_f, _s, _n) \ | |
43 | VMSTATE_UINTTR_ARRAY_V(_f, _s, _n, 0) | |
44 | ||
45 | ||
03fee66f MAL |
46 | static int get_psw(QEMUFile *f, void *opaque, size_t size, |
47 | const VMStateField *field) | |
c643603a RH |
48 | { |
49 | CPUHPPAState *env = opaque; | |
50 | cpu_hppa_put_psw(env, qemu_get_betr(f)); | |
51 | return 0; | |
52 | } | |
53 | ||
54 | static int put_psw(QEMUFile *f, void *opaque, size_t size, | |
3ddba9a9 | 55 | const VMStateField *field, JSONWriter *vmdesc) |
c643603a RH |
56 | { |
57 | CPUHPPAState *env = opaque; | |
58 | qemu_put_betr(f, cpu_hppa_get_psw(env)); | |
59 | return 0; | |
60 | } | |
61 | ||
62 | static const VMStateInfo vmstate_psw = { | |
63 | .name = "psw", | |
64 | .get = get_psw, | |
65 | .put = put_psw, | |
66 | }; | |
67 | ||
68 | /* FIXME: Use the PA2.0 format, which is a superset of the PA1.1 format. */ | |
03fee66f MAL |
69 | static int get_tlb(QEMUFile *f, void *opaque, size_t size, |
70 | const VMStateField *field) | |
c643603a RH |
71 | { |
72 | hppa_tlb_entry *ent = opaque; | |
73 | uint32_t val; | |
74 | ||
75 | memset(ent, 0, sizeof(*ent)); | |
76 | ||
77 | ent->va_b = qemu_get_be64(f); | |
78 | ent->pa = qemu_get_betr(f); | |
79 | val = qemu_get_be32(f); | |
80 | ||
81 | ent->entry_valid = extract32(val, 0, 1); | |
82 | ent->access_id = extract32(val, 1, 18); | |
83 | ent->u = extract32(val, 19, 1); | |
84 | ent->ar_pl2 = extract32(val, 20, 2); | |
85 | ent->ar_pl1 = extract32(val, 22, 2); | |
86 | ent->ar_type = extract32(val, 24, 3); | |
87 | ent->b = extract32(val, 27, 1); | |
88 | ent->d = extract32(val, 28, 1); | |
89 | ent->t = extract32(val, 29, 1); | |
90 | ||
91 | ent->va_e = ent->va_b + TARGET_PAGE_SIZE - 1; | |
92 | return 0; | |
93 | } | |
94 | ||
95 | static int put_tlb(QEMUFile *f, void *opaque, size_t size, | |
3ddba9a9 | 96 | const VMStateField *field, JSONWriter *vmdesc) |
c643603a RH |
97 | { |
98 | hppa_tlb_entry *ent = opaque; | |
99 | uint32_t val = 0; | |
100 | ||
101 | if (ent->entry_valid) { | |
102 | val = 1; | |
103 | val = deposit32(val, 1, 18, ent->access_id); | |
104 | val = deposit32(val, 19, 1, ent->u); | |
105 | val = deposit32(val, 20, 2, ent->ar_pl2); | |
106 | val = deposit32(val, 22, 2, ent->ar_pl1); | |
107 | val = deposit32(val, 24, 3, ent->ar_type); | |
108 | val = deposit32(val, 27, 1, ent->b); | |
109 | val = deposit32(val, 28, 1, ent->d); | |
110 | val = deposit32(val, 29, 1, ent->t); | |
111 | } | |
112 | ||
113 | qemu_put_be64(f, ent->va_b); | |
114 | qemu_put_betr(f, ent->pa); | |
115 | qemu_put_be32(f, val); | |
116 | return 0; | |
117 | } | |
118 | ||
119 | static const VMStateInfo vmstate_tlb = { | |
120 | .name = "tlb entry", | |
121 | .get = get_tlb, | |
122 | .put = put_tlb, | |
123 | }; | |
124 | ||
125 | static VMStateField vmstate_env_fields[] = { | |
126 | VMSTATE_UINTTR_ARRAY(gr, CPUHPPAState, 32), | |
127 | VMSTATE_UINT64_ARRAY(fr, CPUHPPAState, 32), | |
128 | VMSTATE_UINT64_ARRAY(sr, CPUHPPAState, 8), | |
129 | VMSTATE_UINTTR_ARRAY(cr, CPUHPPAState, 32), | |
130 | VMSTATE_UINTTR_ARRAY(cr_back, CPUHPPAState, 2), | |
131 | VMSTATE_UINTTR_ARRAY(shadow, CPUHPPAState, 7), | |
132 | ||
133 | /* Save the architecture value of the psw, not the internally | |
134 | expanded version. Since this architecture value does not | |
135 | exist in memory to be stored, this requires a but of hoop | |
136 | jumping. We want OFFSET=0 so that we effectively pass ENV | |
137 | to the helper functions, and we need to fill in the name by | |
138 | hand since there's no field of that name. */ | |
139 | { | |
140 | .name = "psw", | |
141 | .version_id = 0, | |
142 | .size = sizeof(uint64_t), | |
143 | .info = &vmstate_psw, | |
144 | .flags = VMS_SINGLE, | |
145 | .offset = 0 | |
146 | }, | |
147 | ||
148 | VMSTATE_UINTTR(iaoq_f, CPUHPPAState), | |
149 | VMSTATE_UINTTR(iaoq_b, CPUHPPAState), | |
150 | VMSTATE_UINT64(iasq_f, CPUHPPAState), | |
151 | VMSTATE_UINT64(iasq_b, CPUHPPAState), | |
152 | ||
153 | VMSTATE_UINT32(fr0_shadow, CPUHPPAState), | |
154 | ||
155 | VMSTATE_ARRAY(tlb, CPUHPPAState, ARRAY_SIZE(((CPUHPPAState *)0)->tlb), | |
156 | 0, vmstate_tlb, hppa_tlb_entry), | |
157 | VMSTATE_UINT32(tlb_last, CPUHPPAState), | |
158 | ||
159 | VMSTATE_END_OF_LIST() | |
160 | }; | |
161 | ||
162 | static const VMStateDescription vmstate_env = { | |
163 | .name = "env", | |
164 | .version_id = 1, | |
165 | .minimum_version_id = 1, | |
166 | .fields = vmstate_env_fields, | |
167 | }; | |
168 | ||
169 | static VMStateField vmstate_cpu_fields[] = { | |
170 | VMSTATE_CPU(), | |
171 | VMSTATE_STRUCT(env, HPPACPU, 1, vmstate_env, CPUHPPAState), | |
172 | VMSTATE_END_OF_LIST() | |
173 | }; | |
174 | ||
175 | const VMStateDescription vmstate_hppa_cpu = { | |
176 | .name = "cpu", | |
177 | .version_id = 1, | |
178 | .minimum_version_id = 1, | |
179 | .fields = vmstate_cpu_fields, | |
180 | }; |