1
2
3
4
5
6
7
8
9
10
11
12
13#ifndef HW_S390_IPL_H
14#define HW_S390_IPL_H
15
16#include "cpu.h"
17#include "exec/address-spaces.h"
18#include "hw/qdev-core.h"
19#include "qom/object.h"
20
21struct IPLBlockPVComp {
22 uint64_t tweak_pref;
23 uint64_t addr;
24 uint64_t size;
25} QEMU_PACKED;
26typedef struct IPLBlockPVComp IPLBlockPVComp;
27
28struct IPLBlockPV {
29 uint8_t reserved18[87];
30 uint8_t version;
31 uint32_t reserved70;
32 uint32_t num_comp;
33 uint64_t pv_header_addr;
34 uint64_t pv_header_len;
35 struct IPLBlockPVComp components[0];
36} QEMU_PACKED;
37typedef struct IPLBlockPV IPLBlockPV;
38
39struct IplBlockCcw {
40 uint8_t reserved0[85];
41 uint8_t ssid;
42 uint16_t devno;
43 uint8_t vm_flags;
44 uint8_t reserved3[3];
45 uint32_t vm_parm_len;
46 uint8_t nss_name[8];
47 uint8_t vm_parm[64];
48 uint8_t reserved4[8];
49} QEMU_PACKED;
50typedef struct IplBlockCcw IplBlockCcw;
51
52struct IplBlockFcp {
53 uint8_t reserved1[305 - 1];
54 uint8_t opt;
55 uint8_t reserved2[3];
56 uint16_t reserved3;
57 uint16_t devno;
58 uint8_t reserved4[4];
59 uint64_t wwpn;
60 uint64_t lun;
61 uint32_t bootprog;
62 uint8_t reserved5[12];
63 uint64_t br_lba;
64 uint32_t scp_data_len;
65 uint8_t reserved6[260];
66 uint8_t scp_data[0];
67} QEMU_PACKED;
68typedef struct IplBlockFcp IplBlockFcp;
69
70struct IplBlockQemuScsi {
71 uint32_t lun;
72 uint16_t target;
73 uint16_t channel;
74 uint8_t reserved0[77];
75 uint8_t ssid;
76 uint16_t devno;
77} QEMU_PACKED;
78typedef struct IplBlockQemuScsi IplBlockQemuScsi;
79
80#define DIAG308_FLAGS_LP_VALID 0x80
81
82union IplParameterBlock {
83 struct {
84 uint32_t len;
85 uint8_t reserved0[3];
86 uint8_t version;
87 uint32_t blk0_len;
88 uint8_t pbt;
89 uint8_t flags;
90 uint16_t reserved01;
91 uint8_t loadparm[8];
92 union {
93 IplBlockCcw ccw;
94 IplBlockFcp fcp;
95 IPLBlockPV pv;
96 IplBlockQemuScsi scsi;
97 };
98 } QEMU_PACKED;
99 struct {
100 uint8_t reserved1[110];
101 uint16_t devno;
102 uint8_t reserved2[88];
103 uint8_t reserved_ext[4096 - 200];
104 } QEMU_PACKED;
105} QEMU_PACKED;
106typedef union IplParameterBlock IplParameterBlock;
107
108int s390_ipl_set_loadparm(uint8_t *loadparm);
109void s390_ipl_update_diag308(IplParameterBlock *iplb);
110int s390_ipl_prepare_pv_header(void);
111int s390_ipl_pv_unpack(void);
112void s390_ipl_prepare_cpu(S390CPU *cpu);
113IplParameterBlock *s390_ipl_get_iplb(void);
114IplParameterBlock *s390_ipl_get_iplb_pv(void);
115
116enum s390_reset {
117
118 S390_RESET_EXTERNAL = 0,
119 S390_RESET_REIPL,
120 S390_RESET_MODIFIED_CLEAR,
121 S390_RESET_LOAD_NORMAL,
122 S390_RESET_PV,
123};
124void s390_ipl_reset_request(CPUState *cs, enum s390_reset reset_type);
125void s390_ipl_get_reset_request(CPUState **cs, enum s390_reset *reset_type);
126void s390_ipl_clear_reset_request(void);
127
128#define QIPL_ADDRESS 0xcc
129
130
131#define QIPL_FLAG_BM_OPTS_CMD 0x80
132#define QIPL_FLAG_BM_OPTS_ZIPL 0x40
133
134
135
136
137
138
139
140
141
142
143
144
145
146struct QemuIplParameters {
147 uint8_t qipl_flags;
148 uint8_t reserved1[3];
149 uint64_t netboot_start_addr;
150 uint32_t boot_menu_timeout;
151 uint8_t reserved2[12];
152} QEMU_PACKED;
153typedef struct QemuIplParameters QemuIplParameters;
154
155#define TYPE_S390_IPL "s390-ipl"
156OBJECT_DECLARE_SIMPLE_TYPE(S390IPLState, S390_IPL)
157
158struct S390IPLState {
159
160 DeviceState parent_obj;
161 IplParameterBlock iplb;
162 IplParameterBlock iplb_pv;
163 QemuIplParameters qipl;
164 uint64_t start_addr;
165 uint64_t compat_start_addr;
166 uint64_t bios_start_addr;
167 uint64_t compat_bios_start_addr;
168 bool enforce_bios;
169 bool iplb_valid;
170 bool iplb_valid_pv;
171 bool netboot;
172
173 enum s390_reset reset_type;
174 int reset_cpu_index;
175
176
177 char *kernel;
178 char *initrd;
179 char *cmdline;
180 char *firmware;
181 char *netboot_fw;
182 uint8_t cssid;
183 uint8_t ssid;
184 uint16_t devno;
185 bool iplbext_migration;
186};
187QEMU_BUILD_BUG_MSG(offsetof(S390IPLState, iplb) & 3, "alignment of iplb wrong");
188
189#define DIAG_308_RC_OK 0x0001
190#define DIAG_308_RC_NO_CONF 0x0102
191#define DIAG_308_RC_INVALID 0x0402
192#define DIAG_308_RC_NO_PV_CONF 0x0902
193#define DIAG_308_RC_INVAL_FOR_PV 0x0a02
194
195#define DIAG308_RESET_MOD_CLR 0
196#define DIAG308_RESET_LOAD_NORM 1
197#define DIAG308_LOAD_CLEAR 3
198#define DIAG308_LOAD_NORMAL_DUMP 4
199#define DIAG308_SET 5
200#define DIAG308_STORE 6
201#define DIAG308_PV_SET 8
202#define DIAG308_PV_STORE 9
203#define DIAG308_PV_START 10
204
205#define S390_IPL_TYPE_FCP 0x00
206#define S390_IPL_TYPE_CCW 0x02
207#define S390_IPL_TYPE_PV 0x05
208#define S390_IPL_TYPE_QEMU_SCSI 0xff
209
210#define S390_IPLB_HEADER_LEN 8
211#define S390_IPLB_MIN_PV_LEN 148
212#define S390_IPLB_MIN_CCW_LEN 200
213#define S390_IPLB_MIN_FCP_LEN 384
214#define S390_IPLB_MIN_QEMU_SCSI_LEN 200
215
216static inline bool iplb_valid_len(IplParameterBlock *iplb)
217{
218 return be32_to_cpu(iplb->len) <= sizeof(IplParameterBlock);
219}
220
221static inline bool ipl_valid_pv_components(IplParameterBlock *iplb)
222{
223 IPLBlockPV *ipib_pv = &iplb->pv;
224 int i;
225
226 if (ipib_pv->num_comp == 0) {
227 return false;
228 }
229
230 for (i = 0; i < ipib_pv->num_comp; i++) {
231
232 if (ipib_pv->components[i].addr & ~TARGET_PAGE_MASK) {
233 return false;
234 }
235
236
237 if (i < ipib_pv->num_comp - 1 &&
238 ipib_pv->components[i].tweak_pref >=
239 ipib_pv->components[i + 1].tweak_pref) {
240 return false;
241 }
242 }
243 return true;
244}
245
246static inline bool ipl_valid_pv_header(IplParameterBlock *iplb)
247{
248 IPLBlockPV *ipib_pv = &iplb->pv;
249
250 if (ipib_pv->pv_header_len > 2 * TARGET_PAGE_SIZE) {
251 return false;
252 }
253
254 if (!address_space_access_valid(&address_space_memory,
255 ipib_pv->pv_header_addr,
256 ipib_pv->pv_header_len,
257 false,
258 MEMTXATTRS_UNSPECIFIED)) {
259 return false;
260 }
261
262 return true;
263}
264
265static inline bool iplb_valid_pv(IplParameterBlock *iplb)
266{
267 if (iplb->pbt != S390_IPL_TYPE_PV ||
268 be32_to_cpu(iplb->len) < S390_IPLB_MIN_PV_LEN) {
269 return false;
270 }
271 if (!ipl_valid_pv_header(iplb)) {
272 return false;
273 }
274 return ipl_valid_pv_components(iplb);
275}
276
277static inline bool iplb_valid(IplParameterBlock *iplb)
278{
279 switch (iplb->pbt) {
280 case S390_IPL_TYPE_FCP:
281 return be32_to_cpu(iplb->len) >= S390_IPLB_MIN_FCP_LEN;
282 case S390_IPL_TYPE_CCW:
283 return be32_to_cpu(iplb->len) >= S390_IPLB_MIN_CCW_LEN;
284 default:
285 return false;
286 }
287}
288
289#endif
290
