Merge remote-tracking branch 'remotes/pmaydell/tags/pull-target-arm-20161004' into...
[qemu/kevin.git] / hw / ppc / spapr_events.c
blob4c7b6aeab6302b8acd6a20c787688181fa06740d
1 /*
2 * QEMU PowerPC pSeries Logical Partition (aka sPAPR) hardware System Emulator
4 * RTAS events handling
6 * Copyright (c) 2012 David Gibson, IBM Corporation.
8 * Permission is hereby granted, free of charge, to any person obtaining a copy
9 * of this software and associated documentation files (the "Software"), to deal
10 * in the Software without restriction, including without limitation the rights
11 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
12 * copies of the Software, and to permit persons to whom the Software is
13 * furnished to do so, subject to the following conditions:
15 * The above copyright notice and this permission notice shall be included in
16 * all copies or substantial portions of the Software.
18 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
19 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
20 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
21 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
22 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
23 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
24 * THE SOFTWARE.
27 #include "qemu/osdep.h"
28 #include "qapi/error.h"
29 #include "cpu.h"
30 #include "sysemu/sysemu.h"
31 #include "sysemu/char.h"
32 #include "hw/qdev.h"
33 #include "sysemu/device_tree.h"
35 #include "hw/ppc/fdt.h"
36 #include "hw/ppc/spapr.h"
37 #include "hw/ppc/spapr_vio.h"
38 #include "hw/pci/pci.h"
39 #include "hw/pci-host/spapr.h"
40 #include "hw/ppc/spapr_drc.h"
41 #include "qemu/help_option.h"
42 #include "qemu/bcd.h"
43 #include <libfdt.h>
45 struct rtas_error_log {
46 uint32_t summary;
47 #define RTAS_LOG_VERSION_MASK 0xff000000
48 #define RTAS_LOG_VERSION_6 0x06000000
49 #define RTAS_LOG_SEVERITY_MASK 0x00e00000
50 #define RTAS_LOG_SEVERITY_ALREADY_REPORTED 0x00c00000
51 #define RTAS_LOG_SEVERITY_FATAL 0x00a00000
52 #define RTAS_LOG_SEVERITY_ERROR 0x00800000
53 #define RTAS_LOG_SEVERITY_ERROR_SYNC 0x00600000
54 #define RTAS_LOG_SEVERITY_WARNING 0x00400000
55 #define RTAS_LOG_SEVERITY_EVENT 0x00200000
56 #define RTAS_LOG_SEVERITY_NO_ERROR 0x00000000
57 #define RTAS_LOG_DISPOSITION_MASK 0x00180000
58 #define RTAS_LOG_DISPOSITION_FULLY_RECOVERED 0x00000000
59 #define RTAS_LOG_DISPOSITION_LIMITED_RECOVERY 0x00080000
60 #define RTAS_LOG_DISPOSITION_NOT_RECOVERED 0x00100000
61 #define RTAS_LOG_OPTIONAL_PART_PRESENT 0x00040000
62 #define RTAS_LOG_INITIATOR_MASK 0x0000f000
63 #define RTAS_LOG_INITIATOR_UNKNOWN 0x00000000
64 #define RTAS_LOG_INITIATOR_CPU 0x00001000
65 #define RTAS_LOG_INITIATOR_PCI 0x00002000
66 #define RTAS_LOG_INITIATOR_MEMORY 0x00004000
67 #define RTAS_LOG_INITIATOR_HOTPLUG 0x00006000
68 #define RTAS_LOG_TARGET_MASK 0x00000f00
69 #define RTAS_LOG_TARGET_UNKNOWN 0x00000000
70 #define RTAS_LOG_TARGET_CPU 0x00000100
71 #define RTAS_LOG_TARGET_PCI 0x00000200
72 #define RTAS_LOG_TARGET_MEMORY 0x00000400
73 #define RTAS_LOG_TARGET_HOTPLUG 0x00000600
74 #define RTAS_LOG_TYPE_MASK 0x000000ff
75 #define RTAS_LOG_TYPE_OTHER 0x00000000
76 #define RTAS_LOG_TYPE_RETRY 0x00000001
77 #define RTAS_LOG_TYPE_TCE_ERR 0x00000002
78 #define RTAS_LOG_TYPE_INTERN_DEV_FAIL 0x00000003
79 #define RTAS_LOG_TYPE_TIMEOUT 0x00000004
80 #define RTAS_LOG_TYPE_DATA_PARITY 0x00000005
81 #define RTAS_LOG_TYPE_ADDR_PARITY 0x00000006
82 #define RTAS_LOG_TYPE_CACHE_PARITY 0x00000007
83 #define RTAS_LOG_TYPE_ADDR_INVALID 0x00000008
84 #define RTAS_LOG_TYPE_ECC_UNCORR 0x00000009
85 #define RTAS_LOG_TYPE_ECC_CORR 0x0000000a
86 #define RTAS_LOG_TYPE_EPOW 0x00000040
87 #define RTAS_LOG_TYPE_HOTPLUG 0x000000e5
88 uint32_t extended_length;
89 } QEMU_PACKED;
91 struct rtas_event_log_v6 {
92 uint8_t b0;
93 #define RTAS_LOG_V6_B0_VALID 0x80
94 #define RTAS_LOG_V6_B0_UNRECOVERABLE_ERROR 0x40
95 #define RTAS_LOG_V6_B0_RECOVERABLE_ERROR 0x20
96 #define RTAS_LOG_V6_B0_DEGRADED_OPERATION 0x10
97 #define RTAS_LOG_V6_B0_PREDICTIVE_ERROR 0x08
98 #define RTAS_LOG_V6_B0_NEW_LOG 0x04
99 #define RTAS_LOG_V6_B0_BIGENDIAN 0x02
100 uint8_t _resv1;
101 uint8_t b2;
102 #define RTAS_LOG_V6_B2_POWERPC_FORMAT 0x80
103 #define RTAS_LOG_V6_B2_LOG_FORMAT_MASK 0x0f
104 #define RTAS_LOG_V6_B2_LOG_FORMAT_PLATFORM_EVENT 0x0e
105 uint8_t _resv2[9];
106 uint32_t company;
107 #define RTAS_LOG_V6_COMPANY_IBM 0x49424d00 /* IBM<null> */
108 } QEMU_PACKED;
110 struct rtas_event_log_v6_section_header {
111 uint16_t section_id;
112 uint16_t section_length;
113 uint8_t section_version;
114 uint8_t section_subtype;
115 uint16_t creator_component_id;
116 } QEMU_PACKED;
118 struct rtas_event_log_v6_maina {
119 #define RTAS_LOG_V6_SECTION_ID_MAINA 0x5048 /* PH */
120 struct rtas_event_log_v6_section_header hdr;
121 uint32_t creation_date; /* BCD: YYYYMMDD */
122 uint32_t creation_time; /* BCD: HHMMSS00 */
123 uint8_t _platform1[8];
124 char creator_id;
125 uint8_t _resv1[2];
126 uint8_t section_count;
127 uint8_t _resv2[4];
128 uint8_t _platform2[8];
129 uint32_t plid;
130 uint8_t _platform3[4];
131 } QEMU_PACKED;
133 struct rtas_event_log_v6_mainb {
134 #define RTAS_LOG_V6_SECTION_ID_MAINB 0x5548 /* UH */
135 struct rtas_event_log_v6_section_header hdr;
136 uint8_t subsystem_id;
137 uint8_t _platform1;
138 uint8_t event_severity;
139 uint8_t event_subtype;
140 uint8_t _platform2[4];
141 uint8_t _resv1[2];
142 uint16_t action_flags;
143 uint8_t _resv2[4];
144 } QEMU_PACKED;
146 struct rtas_event_log_v6_epow {
147 #define RTAS_LOG_V6_SECTION_ID_EPOW 0x4550 /* EP */
148 struct rtas_event_log_v6_section_header hdr;
149 uint8_t sensor_value;
150 #define RTAS_LOG_V6_EPOW_ACTION_RESET 0
151 #define RTAS_LOG_V6_EPOW_ACTION_WARN_COOLING 1
152 #define RTAS_LOG_V6_EPOW_ACTION_WARN_POWER 2
153 #define RTAS_LOG_V6_EPOW_ACTION_SYSTEM_SHUTDOWN 3
154 #define RTAS_LOG_V6_EPOW_ACTION_SYSTEM_HALT 4
155 #define RTAS_LOG_V6_EPOW_ACTION_MAIN_ENCLOSURE 5
156 #define RTAS_LOG_V6_EPOW_ACTION_POWER_OFF 7
157 uint8_t event_modifier;
158 #define RTAS_LOG_V6_EPOW_MODIFIER_NORMAL 1
159 #define RTAS_LOG_V6_EPOW_MODIFIER_ON_UPS 2
160 #define RTAS_LOG_V6_EPOW_MODIFIER_CRITICAL 3
161 #define RTAS_LOG_V6_EPOW_MODIFIER_TEMPERATURE 4
162 uint8_t extended_modifier;
163 #define RTAS_LOG_V6_EPOW_XMODIFIER_SYSTEM_WIDE 0
164 #define RTAS_LOG_V6_EPOW_XMODIFIER_PARTITION_SPECIFIC 1
165 uint8_t _resv;
166 uint64_t reason_code;
167 } QEMU_PACKED;
169 struct epow_log_full {
170 struct rtas_error_log hdr;
171 struct rtas_event_log_v6 v6hdr;
172 struct rtas_event_log_v6_maina maina;
173 struct rtas_event_log_v6_mainb mainb;
174 struct rtas_event_log_v6_epow epow;
175 } QEMU_PACKED;
177 struct rtas_event_log_v6_hp {
178 #define RTAS_LOG_V6_SECTION_ID_HOTPLUG 0x4850 /* HP */
179 struct rtas_event_log_v6_section_header hdr;
180 uint8_t hotplug_type;
181 #define RTAS_LOG_V6_HP_TYPE_CPU 1
182 #define RTAS_LOG_V6_HP_TYPE_MEMORY 2
183 #define RTAS_LOG_V6_HP_TYPE_SLOT 3
184 #define RTAS_LOG_V6_HP_TYPE_PHB 4
185 #define RTAS_LOG_V6_HP_TYPE_PCI 5
186 uint8_t hotplug_action;
187 #define RTAS_LOG_V6_HP_ACTION_ADD 1
188 #define RTAS_LOG_V6_HP_ACTION_REMOVE 2
189 uint8_t hotplug_identifier;
190 #define RTAS_LOG_V6_HP_ID_DRC_NAME 1
191 #define RTAS_LOG_V6_HP_ID_DRC_INDEX 2
192 #define RTAS_LOG_V6_HP_ID_DRC_COUNT 3
193 uint8_t reserved;
194 union {
195 uint32_t index;
196 uint32_t count;
197 char name[1];
198 } drc;
199 } QEMU_PACKED;
201 struct hp_log_full {
202 struct rtas_error_log hdr;
203 struct rtas_event_log_v6 v6hdr;
204 struct rtas_event_log_v6_maina maina;
205 struct rtas_event_log_v6_mainb mainb;
206 struct rtas_event_log_v6_hp hp;
207 } QEMU_PACKED;
209 #define EVENT_MASK_INTERNAL_ERRORS 0x80000000
210 #define EVENT_MASK_EPOW 0x40000000
211 #define EVENT_MASK_HOTPLUG 0x10000000
212 #define EVENT_MASK_IO 0x08000000
214 void spapr_events_fdt_skel(void *fdt, uint32_t check_exception_irq)
216 uint32_t irq_ranges[] = {cpu_to_be32(check_exception_irq), cpu_to_be32(1)};
217 uint32_t interrupts[] = {cpu_to_be32(check_exception_irq), 0};
219 _FDT((fdt_begin_node(fdt, "event-sources")));
221 _FDT((fdt_property(fdt, "interrupt-controller", NULL, 0)));
222 _FDT((fdt_property_cell(fdt, "#interrupt-cells", 2)));
223 _FDT((fdt_property(fdt, "interrupt-ranges",
224 irq_ranges, sizeof(irq_ranges))));
226 _FDT((fdt_begin_node(fdt, "epow-events")));
227 _FDT((fdt_property(fdt, "interrupts", interrupts, sizeof(interrupts))));
228 _FDT((fdt_end_node(fdt)));
230 _FDT((fdt_end_node(fdt)));
233 static void rtas_event_log_queue(int log_type, void *data, bool exception)
235 sPAPRMachineState *spapr = SPAPR_MACHINE(qdev_get_machine());
236 sPAPREventLogEntry *entry = g_new(sPAPREventLogEntry, 1);
238 g_assert(data);
239 entry->log_type = log_type;
240 entry->exception = exception;
241 entry->data = data;
242 QTAILQ_INSERT_TAIL(&spapr->pending_events, entry, next);
245 static sPAPREventLogEntry *rtas_event_log_dequeue(uint32_t event_mask,
246 bool exception)
248 sPAPRMachineState *spapr = SPAPR_MACHINE(qdev_get_machine());
249 sPAPREventLogEntry *entry = NULL;
251 /* we only queue EPOW events atm. */
252 if ((event_mask & EVENT_MASK_EPOW) == 0) {
253 return NULL;
256 QTAILQ_FOREACH(entry, &spapr->pending_events, next) {
257 if (entry->exception != exception) {
258 continue;
261 /* EPOW and hotplug events are surfaced in the same manner */
262 if (entry->log_type == RTAS_LOG_TYPE_EPOW ||
263 entry->log_type == RTAS_LOG_TYPE_HOTPLUG) {
264 break;
268 if (entry) {
269 QTAILQ_REMOVE(&spapr->pending_events, entry, next);
272 return entry;
275 static bool rtas_event_log_contains(uint32_t event_mask, bool exception)
277 sPAPRMachineState *spapr = SPAPR_MACHINE(qdev_get_machine());
278 sPAPREventLogEntry *entry = NULL;
280 /* we only queue EPOW events atm. */
281 if ((event_mask & EVENT_MASK_EPOW) == 0) {
282 return false;
285 QTAILQ_FOREACH(entry, &spapr->pending_events, next) {
286 if (entry->exception != exception) {
287 continue;
290 /* EPOW and hotplug events are surfaced in the same manner */
291 if (entry->log_type == RTAS_LOG_TYPE_EPOW ||
292 entry->log_type == RTAS_LOG_TYPE_HOTPLUG) {
293 return true;
297 return false;
300 static uint32_t next_plid;
302 static void spapr_init_v6hdr(struct rtas_event_log_v6 *v6hdr)
304 v6hdr->b0 = RTAS_LOG_V6_B0_VALID | RTAS_LOG_V6_B0_NEW_LOG
305 | RTAS_LOG_V6_B0_BIGENDIAN;
306 v6hdr->b2 = RTAS_LOG_V6_B2_POWERPC_FORMAT
307 | RTAS_LOG_V6_B2_LOG_FORMAT_PLATFORM_EVENT;
308 v6hdr->company = cpu_to_be32(RTAS_LOG_V6_COMPANY_IBM);
311 static void spapr_init_maina(struct rtas_event_log_v6_maina *maina,
312 int section_count)
314 sPAPRMachineState *spapr = SPAPR_MACHINE(qdev_get_machine());
315 struct tm tm;
316 int year;
318 maina->hdr.section_id = cpu_to_be16(RTAS_LOG_V6_SECTION_ID_MAINA);
319 maina->hdr.section_length = cpu_to_be16(sizeof(*maina));
320 /* FIXME: section version, subtype and creator id? */
321 spapr_rtc_read(spapr->rtc, &tm, NULL);
322 year = tm.tm_year + 1900;
323 maina->creation_date = cpu_to_be32((to_bcd(year / 100) << 24)
324 | (to_bcd(year % 100) << 16)
325 | (to_bcd(tm.tm_mon + 1) << 8)
326 | to_bcd(tm.tm_mday));
327 maina->creation_time = cpu_to_be32((to_bcd(tm.tm_hour) << 24)
328 | (to_bcd(tm.tm_min) << 16)
329 | (to_bcd(tm.tm_sec) << 8));
330 maina->creator_id = 'H'; /* Hypervisor */
331 maina->section_count = section_count;
332 maina->plid = next_plid++;
335 static void spapr_powerdown_req(Notifier *n, void *opaque)
337 sPAPRMachineState *spapr = SPAPR_MACHINE(qdev_get_machine());
338 struct rtas_error_log *hdr;
339 struct rtas_event_log_v6 *v6hdr;
340 struct rtas_event_log_v6_maina *maina;
341 struct rtas_event_log_v6_mainb *mainb;
342 struct rtas_event_log_v6_epow *epow;
343 struct epow_log_full *new_epow;
345 new_epow = g_malloc0(sizeof(*new_epow));
346 hdr = &new_epow->hdr;
347 v6hdr = &new_epow->v6hdr;
348 maina = &new_epow->maina;
349 mainb = &new_epow->mainb;
350 epow = &new_epow->epow;
352 hdr->summary = cpu_to_be32(RTAS_LOG_VERSION_6
353 | RTAS_LOG_SEVERITY_EVENT
354 | RTAS_LOG_DISPOSITION_NOT_RECOVERED
355 | RTAS_LOG_OPTIONAL_PART_PRESENT
356 | RTAS_LOG_TYPE_EPOW);
357 hdr->extended_length = cpu_to_be32(sizeof(*new_epow)
358 - sizeof(new_epow->hdr));
360 spapr_init_v6hdr(v6hdr);
361 spapr_init_maina(maina, 3 /* Main-A, Main-B and EPOW */);
363 mainb->hdr.section_id = cpu_to_be16(RTAS_LOG_V6_SECTION_ID_MAINB);
364 mainb->hdr.section_length = cpu_to_be16(sizeof(*mainb));
365 /* FIXME: section version, subtype and creator id? */
366 mainb->subsystem_id = 0xa0; /* External environment */
367 mainb->event_severity = 0x00; /* Informational / non-error */
368 mainb->event_subtype = 0xd0; /* Normal shutdown */
370 epow->hdr.section_id = cpu_to_be16(RTAS_LOG_V6_SECTION_ID_EPOW);
371 epow->hdr.section_length = cpu_to_be16(sizeof(*epow));
372 epow->hdr.section_version = 2; /* includes extended modifier */
373 /* FIXME: section subtype and creator id? */
374 epow->sensor_value = RTAS_LOG_V6_EPOW_ACTION_SYSTEM_SHUTDOWN;
375 epow->event_modifier = RTAS_LOG_V6_EPOW_MODIFIER_NORMAL;
376 epow->extended_modifier = RTAS_LOG_V6_EPOW_XMODIFIER_PARTITION_SPECIFIC;
378 rtas_event_log_queue(RTAS_LOG_TYPE_EPOW, new_epow, true);
380 qemu_irq_pulse(xics_get_qirq(spapr->xics, spapr->check_exception_irq));
383 static void spapr_hotplug_set_signalled(uint32_t drc_index)
385 sPAPRDRConnector *drc = spapr_dr_connector_by_index(drc_index);
386 sPAPRDRConnectorClass *drck = SPAPR_DR_CONNECTOR_GET_CLASS(drc);
387 drck->set_signalled(drc);
390 static void spapr_hotplug_req_event(uint8_t hp_id, uint8_t hp_action,
391 sPAPRDRConnectorType drc_type,
392 uint32_t drc)
394 sPAPRMachineState *spapr = SPAPR_MACHINE(qdev_get_machine());
395 struct hp_log_full *new_hp;
396 struct rtas_error_log *hdr;
397 struct rtas_event_log_v6 *v6hdr;
398 struct rtas_event_log_v6_maina *maina;
399 struct rtas_event_log_v6_mainb *mainb;
400 struct rtas_event_log_v6_hp *hp;
402 new_hp = g_malloc0(sizeof(struct hp_log_full));
403 hdr = &new_hp->hdr;
404 v6hdr = &new_hp->v6hdr;
405 maina = &new_hp->maina;
406 mainb = &new_hp->mainb;
407 hp = &new_hp->hp;
409 hdr->summary = cpu_to_be32(RTAS_LOG_VERSION_6
410 | RTAS_LOG_SEVERITY_EVENT
411 | RTAS_LOG_DISPOSITION_NOT_RECOVERED
412 | RTAS_LOG_OPTIONAL_PART_PRESENT
413 | RTAS_LOG_INITIATOR_HOTPLUG
414 | RTAS_LOG_TYPE_HOTPLUG);
415 hdr->extended_length = cpu_to_be32(sizeof(*new_hp)
416 - sizeof(new_hp->hdr));
418 spapr_init_v6hdr(v6hdr);
419 spapr_init_maina(maina, 3 /* Main-A, Main-B, HP */);
421 mainb->hdr.section_id = cpu_to_be16(RTAS_LOG_V6_SECTION_ID_MAINB);
422 mainb->hdr.section_length = cpu_to_be16(sizeof(*mainb));
423 mainb->subsystem_id = 0x80; /* External environment */
424 mainb->event_severity = 0x00; /* Informational / non-error */
425 mainb->event_subtype = 0x00; /* Normal shutdown */
427 hp->hdr.section_id = cpu_to_be16(RTAS_LOG_V6_SECTION_ID_HOTPLUG);
428 hp->hdr.section_length = cpu_to_be16(sizeof(*hp));
429 hp->hdr.section_version = 1; /* includes extended modifier */
430 hp->hotplug_action = hp_action;
431 hp->hotplug_identifier = hp_id;
433 switch (drc_type) {
434 case SPAPR_DR_CONNECTOR_TYPE_PCI:
435 hp->hotplug_type = RTAS_LOG_V6_HP_TYPE_PCI;
436 if (hp->hotplug_action == RTAS_LOG_V6_HP_ACTION_ADD) {
437 spapr_hotplug_set_signalled(drc);
439 break;
440 case SPAPR_DR_CONNECTOR_TYPE_LMB:
441 hp->hotplug_type = RTAS_LOG_V6_HP_TYPE_MEMORY;
442 break;
443 case SPAPR_DR_CONNECTOR_TYPE_CPU:
444 hp->hotplug_type = RTAS_LOG_V6_HP_TYPE_CPU;
445 break;
446 default:
447 /* we shouldn't be signaling hotplug events for resources
448 * that don't support them
450 g_assert(false);
451 return;
454 if (hp_id == RTAS_LOG_V6_HP_ID_DRC_COUNT) {
455 hp->drc.count = cpu_to_be32(drc);
456 } else if (hp_id == RTAS_LOG_V6_HP_ID_DRC_INDEX) {
457 hp->drc.index = cpu_to_be32(drc);
460 rtas_event_log_queue(RTAS_LOG_TYPE_HOTPLUG, new_hp, true);
462 qemu_irq_pulse(xics_get_qirq(spapr->xics, spapr->check_exception_irq));
465 void spapr_hotplug_req_add_by_index(sPAPRDRConnector *drc)
467 sPAPRDRConnectorClass *drck = SPAPR_DR_CONNECTOR_GET_CLASS(drc);
468 sPAPRDRConnectorType drc_type = drck->get_type(drc);
469 uint32_t index = drck->get_index(drc);
471 spapr_hotplug_req_event(RTAS_LOG_V6_HP_ID_DRC_INDEX,
472 RTAS_LOG_V6_HP_ACTION_ADD, drc_type, index);
475 void spapr_hotplug_req_remove_by_index(sPAPRDRConnector *drc)
477 sPAPRDRConnectorClass *drck = SPAPR_DR_CONNECTOR_GET_CLASS(drc);
478 sPAPRDRConnectorType drc_type = drck->get_type(drc);
479 uint32_t index = drck->get_index(drc);
481 spapr_hotplug_req_event(RTAS_LOG_V6_HP_ID_DRC_INDEX,
482 RTAS_LOG_V6_HP_ACTION_REMOVE, drc_type, index);
485 void spapr_hotplug_req_add_by_count(sPAPRDRConnectorType drc_type,
486 uint32_t count)
488 spapr_hotplug_req_event(RTAS_LOG_V6_HP_ID_DRC_COUNT,
489 RTAS_LOG_V6_HP_ACTION_ADD, drc_type, count);
492 void spapr_hotplug_req_remove_by_count(sPAPRDRConnectorType drc_type,
493 uint32_t count)
495 spapr_hotplug_req_event(RTAS_LOG_V6_HP_ID_DRC_COUNT,
496 RTAS_LOG_V6_HP_ACTION_REMOVE, drc_type, count);
499 static void check_exception(PowerPCCPU *cpu, sPAPRMachineState *spapr,
500 uint32_t token, uint32_t nargs,
501 target_ulong args,
502 uint32_t nret, target_ulong rets)
504 uint32_t mask, buf, len, event_len;
505 uint64_t xinfo;
506 sPAPREventLogEntry *event;
507 struct rtas_error_log *hdr;
509 if ((nargs < 6) || (nargs > 7) || nret != 1) {
510 rtas_st(rets, 0, RTAS_OUT_PARAM_ERROR);
511 return;
514 xinfo = rtas_ld(args, 1);
515 mask = rtas_ld(args, 2);
516 buf = rtas_ld(args, 4);
517 len = rtas_ld(args, 5);
518 if (nargs == 7) {
519 xinfo |= (uint64_t)rtas_ld(args, 6) << 32;
522 event = rtas_event_log_dequeue(mask, true);
523 if (!event) {
524 goto out_no_events;
527 hdr = event->data;
528 event_len = be32_to_cpu(hdr->extended_length) + sizeof(*hdr);
530 if (event_len < len) {
531 len = event_len;
534 cpu_physical_memory_write(buf, event->data, len);
535 rtas_st(rets, 0, RTAS_OUT_SUCCESS);
536 g_free(event->data);
537 g_free(event);
539 /* according to PAPR+, the IRQ must be left asserted, or re-asserted, if
540 * there are still pending events to be fetched via check-exception. We
541 * do the latter here, since our code relies on edge-triggered
542 * interrupts.
544 if (rtas_event_log_contains(mask, true)) {
545 qemu_irq_pulse(xics_get_qirq(spapr->xics, spapr->check_exception_irq));
548 return;
550 out_no_events:
551 rtas_st(rets, 0, RTAS_OUT_NO_ERRORS_FOUND);
554 static void event_scan(PowerPCCPU *cpu, sPAPRMachineState *spapr,
555 uint32_t token, uint32_t nargs,
556 target_ulong args,
557 uint32_t nret, target_ulong rets)
559 uint32_t mask, buf, len, event_len;
560 sPAPREventLogEntry *event;
561 struct rtas_error_log *hdr;
563 if (nargs != 4 || nret != 1) {
564 rtas_st(rets, 0, RTAS_OUT_PARAM_ERROR);
565 return;
568 mask = rtas_ld(args, 0);
569 buf = rtas_ld(args, 2);
570 len = rtas_ld(args, 3);
572 event = rtas_event_log_dequeue(mask, false);
573 if (!event) {
574 goto out_no_events;
577 hdr = event->data;
578 event_len = be32_to_cpu(hdr->extended_length) + sizeof(*hdr);
580 if (event_len < len) {
581 len = event_len;
584 cpu_physical_memory_write(buf, event->data, len);
585 rtas_st(rets, 0, RTAS_OUT_SUCCESS);
586 g_free(event->data);
587 g_free(event);
588 return;
590 out_no_events:
591 rtas_st(rets, 0, RTAS_OUT_NO_ERRORS_FOUND);
594 void spapr_events_init(sPAPRMachineState *spapr)
596 QTAILQ_INIT(&spapr->pending_events);
597 spapr->check_exception_irq = xics_spapr_alloc(spapr->xics, 0, 0, false,
598 &error_fatal);
599 spapr->epow_notifier.notify = spapr_powerdown_req;
600 qemu_register_powerdown_notifier(&spapr->epow_notifier);
601 spapr_rtas_register(RTAS_CHECK_EXCEPTION, "check-exception",
602 check_exception);
603 spapr_rtas_register(RTAS_EVENT_SCAN, "event-scan", event_scan);