xref: /qemu/hw/ppc/spapr_events.c (revision 46f5ac20)
1 /*
2  * QEMU PowerPC pSeries Logical Partition (aka sPAPR) hardware System Emulator
3  *
4  * RTAS events handling
5  *
6  * Copyright (c) 2012 David Gibson, IBM Corporation.
7  *
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:
14  *
15  * The above copyright notice and this permission notice shall be included in
16  * all copies or substantial portions of the Software.
17  *
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.
25  *
26  */
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"
34 
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 "hw/ppc/spapr_ovec.h"
44 #include <libfdt.h>
45 
46 struct rtas_error_log {
47     uint32_t summary;
48 #define RTAS_LOG_VERSION_MASK                   0xff000000
49 #define   RTAS_LOG_VERSION_6                    0x06000000
50 #define RTAS_LOG_SEVERITY_MASK                  0x00e00000
51 #define   RTAS_LOG_SEVERITY_ALREADY_REPORTED    0x00c00000
52 #define   RTAS_LOG_SEVERITY_FATAL               0x00a00000
53 #define   RTAS_LOG_SEVERITY_ERROR               0x00800000
54 #define   RTAS_LOG_SEVERITY_ERROR_SYNC          0x00600000
55 #define   RTAS_LOG_SEVERITY_WARNING             0x00400000
56 #define   RTAS_LOG_SEVERITY_EVENT               0x00200000
57 #define   RTAS_LOG_SEVERITY_NO_ERROR            0x00000000
58 #define RTAS_LOG_DISPOSITION_MASK               0x00180000
59 #define   RTAS_LOG_DISPOSITION_FULLY_RECOVERED  0x00000000
60 #define   RTAS_LOG_DISPOSITION_LIMITED_RECOVERY 0x00080000
61 #define   RTAS_LOG_DISPOSITION_NOT_RECOVERED    0x00100000
62 #define RTAS_LOG_OPTIONAL_PART_PRESENT          0x00040000
63 #define RTAS_LOG_INITIATOR_MASK                 0x0000f000
64 #define   RTAS_LOG_INITIATOR_UNKNOWN            0x00000000
65 #define   RTAS_LOG_INITIATOR_CPU                0x00001000
66 #define   RTAS_LOG_INITIATOR_PCI                0x00002000
67 #define   RTAS_LOG_INITIATOR_MEMORY             0x00004000
68 #define   RTAS_LOG_INITIATOR_HOTPLUG            0x00006000
69 #define RTAS_LOG_TARGET_MASK                    0x00000f00
70 #define   RTAS_LOG_TARGET_UNKNOWN               0x00000000
71 #define   RTAS_LOG_TARGET_CPU                   0x00000100
72 #define   RTAS_LOG_TARGET_PCI                   0x00000200
73 #define   RTAS_LOG_TARGET_MEMORY                0x00000400
74 #define   RTAS_LOG_TARGET_HOTPLUG               0x00000600
75 #define RTAS_LOG_TYPE_MASK                      0x000000ff
76 #define   RTAS_LOG_TYPE_OTHER                   0x00000000
77 #define   RTAS_LOG_TYPE_RETRY                   0x00000001
78 #define   RTAS_LOG_TYPE_TCE_ERR                 0x00000002
79 #define   RTAS_LOG_TYPE_INTERN_DEV_FAIL         0x00000003
80 #define   RTAS_LOG_TYPE_TIMEOUT                 0x00000004
81 #define   RTAS_LOG_TYPE_DATA_PARITY             0x00000005
82 #define   RTAS_LOG_TYPE_ADDR_PARITY             0x00000006
83 #define   RTAS_LOG_TYPE_CACHE_PARITY            0x00000007
84 #define   RTAS_LOG_TYPE_ADDR_INVALID            0x00000008
85 #define   RTAS_LOG_TYPE_ECC_UNCORR              0x00000009
86 #define   RTAS_LOG_TYPE_ECC_CORR                0x0000000a
87 #define   RTAS_LOG_TYPE_EPOW                    0x00000040
88 #define   RTAS_LOG_TYPE_HOTPLUG                 0x000000e5
89     uint32_t extended_length;
90 } QEMU_PACKED;
91 
92 struct rtas_event_log_v6 {
93     uint8_t b0;
94 #define RTAS_LOG_V6_B0_VALID                          0x80
95 #define RTAS_LOG_V6_B0_UNRECOVERABLE_ERROR            0x40
96 #define RTAS_LOG_V6_B0_RECOVERABLE_ERROR              0x20
97 #define RTAS_LOG_V6_B0_DEGRADED_OPERATION             0x10
98 #define RTAS_LOG_V6_B0_PREDICTIVE_ERROR               0x08
99 #define RTAS_LOG_V6_B0_NEW_LOG                        0x04
100 #define RTAS_LOG_V6_B0_BIGENDIAN                      0x02
101     uint8_t _resv1;
102     uint8_t b2;
103 #define RTAS_LOG_V6_B2_POWERPC_FORMAT                 0x80
104 #define RTAS_LOG_V6_B2_LOG_FORMAT_MASK                0x0f
105 #define   RTAS_LOG_V6_B2_LOG_FORMAT_PLATFORM_EVENT    0x0e
106     uint8_t _resv2[9];
107     uint32_t company;
108 #define RTAS_LOG_V6_COMPANY_IBM                 0x49424d00 /* IBM<null> */
109 } QEMU_PACKED;
110 
111 struct rtas_event_log_v6_section_header {
112     uint16_t section_id;
113     uint16_t section_length;
114     uint8_t section_version;
115     uint8_t section_subtype;
116     uint16_t creator_component_id;
117 } QEMU_PACKED;
118 
119 struct rtas_event_log_v6_maina {
120 #define RTAS_LOG_V6_SECTION_ID_MAINA                0x5048 /* PH */
121     struct rtas_event_log_v6_section_header hdr;
122     uint32_t creation_date; /* BCD: YYYYMMDD */
123     uint32_t creation_time; /* BCD: HHMMSS00 */
124     uint8_t _platform1[8];
125     char creator_id;
126     uint8_t _resv1[2];
127     uint8_t section_count;
128     uint8_t _resv2[4];
129     uint8_t _platform2[8];
130     uint32_t plid;
131     uint8_t _platform3[4];
132 } QEMU_PACKED;
133 
134 struct rtas_event_log_v6_mainb {
135 #define RTAS_LOG_V6_SECTION_ID_MAINB                0x5548 /* UH */
136     struct rtas_event_log_v6_section_header hdr;
137     uint8_t subsystem_id;
138     uint8_t _platform1;
139     uint8_t event_severity;
140     uint8_t event_subtype;
141     uint8_t _platform2[4];
142     uint8_t _resv1[2];
143     uint16_t action_flags;
144     uint8_t _resv2[4];
145 } QEMU_PACKED;
146 
147 struct rtas_event_log_v6_epow {
148 #define RTAS_LOG_V6_SECTION_ID_EPOW                 0x4550 /* EP */
149     struct rtas_event_log_v6_section_header hdr;
150     uint8_t sensor_value;
151 #define RTAS_LOG_V6_EPOW_ACTION_RESET                    0
152 #define RTAS_LOG_V6_EPOW_ACTION_WARN_COOLING             1
153 #define RTAS_LOG_V6_EPOW_ACTION_WARN_POWER               2
154 #define RTAS_LOG_V6_EPOW_ACTION_SYSTEM_SHUTDOWN          3
155 #define RTAS_LOG_V6_EPOW_ACTION_SYSTEM_HALT              4
156 #define RTAS_LOG_V6_EPOW_ACTION_MAIN_ENCLOSURE           5
157 #define RTAS_LOG_V6_EPOW_ACTION_POWER_OFF                7
158     uint8_t event_modifier;
159 #define RTAS_LOG_V6_EPOW_MODIFIER_NORMAL                 1
160 #define RTAS_LOG_V6_EPOW_MODIFIER_ON_UPS                 2
161 #define RTAS_LOG_V6_EPOW_MODIFIER_CRITICAL               3
162 #define RTAS_LOG_V6_EPOW_MODIFIER_TEMPERATURE            4
163     uint8_t extended_modifier;
164 #define RTAS_LOG_V6_EPOW_XMODIFIER_SYSTEM_WIDE           0
165 #define RTAS_LOG_V6_EPOW_XMODIFIER_PARTITION_SPECIFIC    1
166     uint8_t _resv;
167     uint64_t reason_code;
168 } QEMU_PACKED;
169 
170 struct epow_log_full {
171     struct rtas_error_log hdr;
172     struct rtas_event_log_v6 v6hdr;
173     struct rtas_event_log_v6_maina maina;
174     struct rtas_event_log_v6_mainb mainb;
175     struct rtas_event_log_v6_epow epow;
176 } QEMU_PACKED;
177 
178 union drc_identifier {
179     uint32_t index;
180     uint32_t count;
181     struct {
182         uint32_t count;
183         uint32_t index;
184     } count_indexed;
185     char name[1];
186 } QEMU_PACKED;
187 
188 struct rtas_event_log_v6_hp {
189 #define RTAS_LOG_V6_SECTION_ID_HOTPLUG              0x4850 /* HP */
190     struct rtas_event_log_v6_section_header hdr;
191     uint8_t hotplug_type;
192 #define RTAS_LOG_V6_HP_TYPE_CPU                          1
193 #define RTAS_LOG_V6_HP_TYPE_MEMORY                       2
194 #define RTAS_LOG_V6_HP_TYPE_SLOT                         3
195 #define RTAS_LOG_V6_HP_TYPE_PHB                          4
196 #define RTAS_LOG_V6_HP_TYPE_PCI                          5
197     uint8_t hotplug_action;
198 #define RTAS_LOG_V6_HP_ACTION_ADD                        1
199 #define RTAS_LOG_V6_HP_ACTION_REMOVE                     2
200     uint8_t hotplug_identifier;
201 #define RTAS_LOG_V6_HP_ID_DRC_NAME                       1
202 #define RTAS_LOG_V6_HP_ID_DRC_INDEX                      2
203 #define RTAS_LOG_V6_HP_ID_DRC_COUNT                      3
204 #define RTAS_LOG_V6_HP_ID_DRC_COUNT_INDEXED              4
205     uint8_t reserved;
206     union drc_identifier drc_id;
207 } QEMU_PACKED;
208 
209 struct hp_log_full {
210     struct rtas_error_log hdr;
211     struct rtas_event_log_v6 v6hdr;
212     struct rtas_event_log_v6_maina maina;
213     struct rtas_event_log_v6_mainb mainb;
214     struct rtas_event_log_v6_hp hp;
215 } QEMU_PACKED;
216 
217 typedef enum EventClass {
218     EVENT_CLASS_INTERNAL_ERRORS     = 0,
219     EVENT_CLASS_EPOW                = 1,
220     EVENT_CLASS_RESERVED            = 2,
221     EVENT_CLASS_HOT_PLUG            = 3,
222     EVENT_CLASS_IO                  = 4,
223     EVENT_CLASS_MAX
224 } EventClassIndex;
225 #define EVENT_CLASS_MASK(index) (1 << (31 - index))
226 
227 static const char * const event_names[EVENT_CLASS_MAX] = {
228     [EVENT_CLASS_INTERNAL_ERRORS]       = "internal-errors",
229     [EVENT_CLASS_EPOW]                  = "epow-events",
230     [EVENT_CLASS_HOT_PLUG]              = "hot-plug-events",
231     [EVENT_CLASS_IO]                    = "ibm,io-events",
232 };
233 
234 struct sPAPREventSource {
235     int irq;
236     uint32_t mask;
237     bool enabled;
238 };
239 
240 static sPAPREventSource *spapr_event_sources_new(void)
241 {
242     return g_new0(sPAPREventSource, EVENT_CLASS_MAX);
243 }
244 
245 static void spapr_event_sources_register(sPAPREventSource *event_sources,
246                                         EventClassIndex index, int irq)
247 {
248     /* we only support 1 irq per event class at the moment */
249     g_assert(event_sources);
250     g_assert(!event_sources[index].enabled);
251     event_sources[index].irq = irq;
252     event_sources[index].mask = EVENT_CLASS_MASK(index);
253     event_sources[index].enabled = true;
254 }
255 
256 static const sPAPREventSource *
257 spapr_event_sources_get_source(sPAPREventSource *event_sources,
258                                EventClassIndex index)
259 {
260     g_assert(index < EVENT_CLASS_MAX);
261     g_assert(event_sources);
262 
263     return &event_sources[index];
264 }
265 
266 void spapr_dt_events(sPAPRMachineState *spapr, void *fdt)
267 {
268     uint32_t irq_ranges[EVENT_CLASS_MAX * 2];
269     int i, count = 0, event_sources;
270     sPAPREventSource *events = spapr->event_sources;
271 
272     g_assert(events);
273 
274     _FDT(event_sources = fdt_add_subnode(fdt, 0, "event-sources"));
275 
276     for (i = 0, count = 0; i < EVENT_CLASS_MAX; i++) {
277         int node_offset;
278         uint32_t interrupts[2];
279         const sPAPREventSource *source =
280             spapr_event_sources_get_source(events, i);
281         const char *source_name = event_names[i];
282 
283         if (!source->enabled) {
284             continue;
285         }
286 
287         interrupts[0] = cpu_to_be32(source->irq);
288         interrupts[1] = 0;
289 
290         _FDT(node_offset = fdt_add_subnode(fdt, event_sources, source_name));
291         _FDT(fdt_setprop(fdt, node_offset, "interrupts", interrupts,
292                          sizeof(interrupts)));
293 
294         irq_ranges[count++] = interrupts[0];
295         irq_ranges[count++] = cpu_to_be32(1);
296     }
297 
298     irq_ranges[count] = cpu_to_be32(count);
299     count++;
300 
301     _FDT((fdt_setprop(fdt, event_sources, "interrupt-controller", NULL, 0)));
302     _FDT((fdt_setprop_cell(fdt, event_sources, "#interrupt-cells", 2)));
303     _FDT((fdt_setprop(fdt, event_sources, "interrupt-ranges",
304                       irq_ranges, count * sizeof(uint32_t))));
305 }
306 
307 static const sPAPREventSource *
308 rtas_event_log_to_source(sPAPRMachineState *spapr, int log_type)
309 {
310     const sPAPREventSource *source;
311 
312     g_assert(spapr->event_sources);
313 
314     switch (log_type) {
315     case RTAS_LOG_TYPE_HOTPLUG:
316         source = spapr_event_sources_get_source(spapr->event_sources,
317                                                 EVENT_CLASS_HOT_PLUG);
318         if (spapr_ovec_test(spapr->ov5_cas, OV5_HP_EVT)) {
319             g_assert(source->enabled);
320             break;
321         }
322         /* fall back to epow for legacy hotplug interrupt source */
323     case RTAS_LOG_TYPE_EPOW:
324         source = spapr_event_sources_get_source(spapr->event_sources,
325                                                 EVENT_CLASS_EPOW);
326         break;
327     default:
328         source = NULL;
329     }
330 
331     return source;
332 }
333 
334 static int rtas_event_log_to_irq(sPAPRMachineState *spapr, int log_type)
335 {
336     const sPAPREventSource *source;
337 
338     source = rtas_event_log_to_source(spapr, log_type);
339     g_assert(source);
340     g_assert(source->enabled);
341 
342     return source->irq;
343 }
344 
345 static void rtas_event_log_queue(int log_type, void *data, bool exception)
346 {
347     sPAPRMachineState *spapr = SPAPR_MACHINE(qdev_get_machine());
348     sPAPREventLogEntry *entry = g_new(sPAPREventLogEntry, 1);
349 
350     g_assert(data);
351     entry->log_type = log_type;
352     entry->exception = exception;
353     entry->data = data;
354     QTAILQ_INSERT_TAIL(&spapr->pending_events, entry, next);
355 }
356 
357 static sPAPREventLogEntry *rtas_event_log_dequeue(uint32_t event_mask,
358                                                   bool exception)
359 {
360     sPAPRMachineState *spapr = SPAPR_MACHINE(qdev_get_machine());
361     sPAPREventLogEntry *entry = NULL;
362 
363     QTAILQ_FOREACH(entry, &spapr->pending_events, next) {
364         const sPAPREventSource *source =
365             rtas_event_log_to_source(spapr, entry->log_type);
366 
367         if (entry->exception != exception) {
368             continue;
369         }
370 
371         if (source->mask & event_mask) {
372             break;
373         }
374     }
375 
376     if (entry) {
377         QTAILQ_REMOVE(&spapr->pending_events, entry, next);
378     }
379 
380     return entry;
381 }
382 
383 static bool rtas_event_log_contains(uint32_t event_mask, bool exception)
384 {
385     sPAPRMachineState *spapr = SPAPR_MACHINE(qdev_get_machine());
386     sPAPREventLogEntry *entry = NULL;
387 
388     QTAILQ_FOREACH(entry, &spapr->pending_events, next) {
389         const sPAPREventSource *source =
390             rtas_event_log_to_source(spapr, entry->log_type);
391 
392         if (entry->exception != exception) {
393             continue;
394         }
395 
396         if (source->mask & event_mask) {
397             return true;
398         }
399     }
400 
401     return false;
402 }
403 
404 static uint32_t next_plid;
405 
406 static void spapr_init_v6hdr(struct rtas_event_log_v6 *v6hdr)
407 {
408     v6hdr->b0 = RTAS_LOG_V6_B0_VALID | RTAS_LOG_V6_B0_NEW_LOG
409         | RTAS_LOG_V6_B0_BIGENDIAN;
410     v6hdr->b2 = RTAS_LOG_V6_B2_POWERPC_FORMAT
411         | RTAS_LOG_V6_B2_LOG_FORMAT_PLATFORM_EVENT;
412     v6hdr->company = cpu_to_be32(RTAS_LOG_V6_COMPANY_IBM);
413 }
414 
415 static void spapr_init_maina(struct rtas_event_log_v6_maina *maina,
416                              int section_count)
417 {
418     sPAPRMachineState *spapr = SPAPR_MACHINE(qdev_get_machine());
419     struct tm tm;
420     int year;
421 
422     maina->hdr.section_id = cpu_to_be16(RTAS_LOG_V6_SECTION_ID_MAINA);
423     maina->hdr.section_length = cpu_to_be16(sizeof(*maina));
424     /* FIXME: section version, subtype and creator id? */
425     spapr_rtc_read(&spapr->rtc, &tm, NULL);
426     year = tm.tm_year + 1900;
427     maina->creation_date = cpu_to_be32((to_bcd(year / 100) << 24)
428                                        | (to_bcd(year % 100) << 16)
429                                        | (to_bcd(tm.tm_mon + 1) << 8)
430                                        | to_bcd(tm.tm_mday));
431     maina->creation_time = cpu_to_be32((to_bcd(tm.tm_hour) << 24)
432                                        | (to_bcd(tm.tm_min) << 16)
433                                        | (to_bcd(tm.tm_sec) << 8));
434     maina->creator_id = 'H'; /* Hypervisor */
435     maina->section_count = section_count;
436     maina->plid = next_plid++;
437 }
438 
439 static void spapr_powerdown_req(Notifier *n, void *opaque)
440 {
441     sPAPRMachineState *spapr = SPAPR_MACHINE(qdev_get_machine());
442     struct rtas_error_log *hdr;
443     struct rtas_event_log_v6 *v6hdr;
444     struct rtas_event_log_v6_maina *maina;
445     struct rtas_event_log_v6_mainb *mainb;
446     struct rtas_event_log_v6_epow *epow;
447     struct epow_log_full *new_epow;
448 
449     new_epow = g_malloc0(sizeof(*new_epow));
450     hdr = &new_epow->hdr;
451     v6hdr = &new_epow->v6hdr;
452     maina = &new_epow->maina;
453     mainb = &new_epow->mainb;
454     epow = &new_epow->epow;
455 
456     hdr->summary = cpu_to_be32(RTAS_LOG_VERSION_6
457                                | RTAS_LOG_SEVERITY_EVENT
458                                | RTAS_LOG_DISPOSITION_NOT_RECOVERED
459                                | RTAS_LOG_OPTIONAL_PART_PRESENT
460                                | RTAS_LOG_TYPE_EPOW);
461     hdr->extended_length = cpu_to_be32(sizeof(*new_epow)
462                                        - sizeof(new_epow->hdr));
463 
464     spapr_init_v6hdr(v6hdr);
465     spapr_init_maina(maina, 3 /* Main-A, Main-B and EPOW */);
466 
467     mainb->hdr.section_id = cpu_to_be16(RTAS_LOG_V6_SECTION_ID_MAINB);
468     mainb->hdr.section_length = cpu_to_be16(sizeof(*mainb));
469     /* FIXME: section version, subtype and creator id? */
470     mainb->subsystem_id = 0xa0; /* External environment */
471     mainb->event_severity = 0x00; /* Informational / non-error */
472     mainb->event_subtype = 0xd0; /* Normal shutdown */
473 
474     epow->hdr.section_id = cpu_to_be16(RTAS_LOG_V6_SECTION_ID_EPOW);
475     epow->hdr.section_length = cpu_to_be16(sizeof(*epow));
476     epow->hdr.section_version = 2; /* includes extended modifier */
477     /* FIXME: section subtype and creator id? */
478     epow->sensor_value = RTAS_LOG_V6_EPOW_ACTION_SYSTEM_SHUTDOWN;
479     epow->event_modifier = RTAS_LOG_V6_EPOW_MODIFIER_NORMAL;
480     epow->extended_modifier = RTAS_LOG_V6_EPOW_XMODIFIER_PARTITION_SPECIFIC;
481 
482     rtas_event_log_queue(RTAS_LOG_TYPE_EPOW, new_epow, true);
483 
484     qemu_irq_pulse(xics_get_qirq(XICS_FABRIC(spapr),
485                                  rtas_event_log_to_irq(spapr,
486                                                        RTAS_LOG_TYPE_EPOW)));
487 }
488 
489 static void spapr_hotplug_set_signalled(uint32_t drc_index)
490 {
491     sPAPRDRConnector *drc = spapr_dr_connector_by_index(drc_index);
492     sPAPRDRConnectorClass *drck = SPAPR_DR_CONNECTOR_GET_CLASS(drc);
493     drck->set_signalled(drc);
494 }
495 
496 static void spapr_hotplug_req_event(uint8_t hp_id, uint8_t hp_action,
497                                     sPAPRDRConnectorType drc_type,
498                                     union drc_identifier *drc_id)
499 {
500     sPAPRMachineState *spapr = SPAPR_MACHINE(qdev_get_machine());
501     struct hp_log_full *new_hp;
502     struct rtas_error_log *hdr;
503     struct rtas_event_log_v6 *v6hdr;
504     struct rtas_event_log_v6_maina *maina;
505     struct rtas_event_log_v6_mainb *mainb;
506     struct rtas_event_log_v6_hp *hp;
507 
508     new_hp = g_malloc0(sizeof(struct hp_log_full));
509     hdr = &new_hp->hdr;
510     v6hdr = &new_hp->v6hdr;
511     maina = &new_hp->maina;
512     mainb = &new_hp->mainb;
513     hp = &new_hp->hp;
514 
515     hdr->summary = cpu_to_be32(RTAS_LOG_VERSION_6
516                                | RTAS_LOG_SEVERITY_EVENT
517                                | RTAS_LOG_DISPOSITION_NOT_RECOVERED
518                                | RTAS_LOG_OPTIONAL_PART_PRESENT
519                                | RTAS_LOG_INITIATOR_HOTPLUG
520                                | RTAS_LOG_TYPE_HOTPLUG);
521     hdr->extended_length = cpu_to_be32(sizeof(*new_hp)
522                                        - sizeof(new_hp->hdr));
523 
524     spapr_init_v6hdr(v6hdr);
525     spapr_init_maina(maina, 3 /* Main-A, Main-B, HP */);
526 
527     mainb->hdr.section_id = cpu_to_be16(RTAS_LOG_V6_SECTION_ID_MAINB);
528     mainb->hdr.section_length = cpu_to_be16(sizeof(*mainb));
529     mainb->subsystem_id = 0x80; /* External environment */
530     mainb->event_severity = 0x00; /* Informational / non-error */
531     mainb->event_subtype = 0x00; /* Normal shutdown */
532 
533     hp->hdr.section_id = cpu_to_be16(RTAS_LOG_V6_SECTION_ID_HOTPLUG);
534     hp->hdr.section_length = cpu_to_be16(sizeof(*hp));
535     hp->hdr.section_version = 1; /* includes extended modifier */
536     hp->hotplug_action = hp_action;
537     hp->hotplug_identifier = hp_id;
538 
539     switch (drc_type) {
540     case SPAPR_DR_CONNECTOR_TYPE_PCI:
541         hp->hotplug_type = RTAS_LOG_V6_HP_TYPE_PCI;
542         if (hp->hotplug_action == RTAS_LOG_V6_HP_ACTION_ADD) {
543             spapr_hotplug_set_signalled(drc_id->index);
544         }
545         break;
546     case SPAPR_DR_CONNECTOR_TYPE_LMB:
547         hp->hotplug_type = RTAS_LOG_V6_HP_TYPE_MEMORY;
548         break;
549     case SPAPR_DR_CONNECTOR_TYPE_CPU:
550         hp->hotplug_type = RTAS_LOG_V6_HP_TYPE_CPU;
551         break;
552     default:
553         /* we shouldn't be signaling hotplug events for resources
554          * that don't support them
555          */
556         g_assert(false);
557         return;
558     }
559 
560     if (hp_id == RTAS_LOG_V6_HP_ID_DRC_COUNT) {
561         hp->drc_id.count = cpu_to_be32(drc_id->count);
562     } else if (hp_id == RTAS_LOG_V6_HP_ID_DRC_INDEX) {
563         hp->drc_id.index = cpu_to_be32(drc_id->index);
564     } else if (hp_id == RTAS_LOG_V6_HP_ID_DRC_COUNT_INDEXED) {
565         /* we should not be using count_indexed value unless the guest
566          * supports dedicated hotplug event source
567          */
568         g_assert(spapr_ovec_test(spapr->ov5_cas, OV5_HP_EVT));
569         hp->drc_id.count_indexed.count =
570             cpu_to_be32(drc_id->count_indexed.count);
571         hp->drc_id.count_indexed.index =
572             cpu_to_be32(drc_id->count_indexed.index);
573     }
574 
575     rtas_event_log_queue(RTAS_LOG_TYPE_HOTPLUG, new_hp, true);
576 
577     qemu_irq_pulse(xics_get_qirq(XICS_FABRIC(spapr),
578                                  rtas_event_log_to_irq(spapr,
579                                                        RTAS_LOG_TYPE_HOTPLUG)));
580 }
581 
582 void spapr_hotplug_req_add_by_index(sPAPRDRConnector *drc)
583 {
584     sPAPRDRConnectorClass *drck = SPAPR_DR_CONNECTOR_GET_CLASS(drc);
585     sPAPRDRConnectorType drc_type = drck->get_type(drc);
586     union drc_identifier drc_id;
587 
588     drc_id.index = drck->get_index(drc);
589     spapr_hotplug_req_event(RTAS_LOG_V6_HP_ID_DRC_INDEX,
590                             RTAS_LOG_V6_HP_ACTION_ADD, drc_type, &drc_id);
591 }
592 
593 void spapr_hotplug_req_remove_by_index(sPAPRDRConnector *drc)
594 {
595     sPAPRDRConnectorClass *drck = SPAPR_DR_CONNECTOR_GET_CLASS(drc);
596     sPAPRDRConnectorType drc_type = drck->get_type(drc);
597     union drc_identifier drc_id;
598 
599     drc_id.index = drck->get_index(drc);
600     spapr_hotplug_req_event(RTAS_LOG_V6_HP_ID_DRC_INDEX,
601                             RTAS_LOG_V6_HP_ACTION_REMOVE, drc_type, &drc_id);
602 }
603 
604 void spapr_hotplug_req_add_by_count(sPAPRDRConnectorType drc_type,
605                                        uint32_t count)
606 {
607     union drc_identifier drc_id;
608 
609     drc_id.count = count;
610     spapr_hotplug_req_event(RTAS_LOG_V6_HP_ID_DRC_COUNT,
611                             RTAS_LOG_V6_HP_ACTION_ADD, drc_type, &drc_id);
612 }
613 
614 void spapr_hotplug_req_remove_by_count(sPAPRDRConnectorType drc_type,
615                                           uint32_t count)
616 {
617     union drc_identifier drc_id;
618 
619     drc_id.count = count;
620     spapr_hotplug_req_event(RTAS_LOG_V6_HP_ID_DRC_COUNT,
621                             RTAS_LOG_V6_HP_ACTION_REMOVE, drc_type, &drc_id);
622 }
623 
624 void spapr_hotplug_req_add_by_count_indexed(sPAPRDRConnectorType drc_type,
625                                             uint32_t count, uint32_t index)
626 {
627     union drc_identifier drc_id;
628 
629     drc_id.count_indexed.count = count;
630     drc_id.count_indexed.index = index;
631     spapr_hotplug_req_event(RTAS_LOG_V6_HP_ID_DRC_COUNT_INDEXED,
632                             RTAS_LOG_V6_HP_ACTION_ADD, drc_type, &drc_id);
633 }
634 
635 void spapr_hotplug_req_remove_by_count_indexed(sPAPRDRConnectorType drc_type,
636                                                uint32_t count, uint32_t index)
637 {
638     union drc_identifier drc_id;
639 
640     drc_id.count_indexed.count = count;
641     drc_id.count_indexed.index = index;
642     spapr_hotplug_req_event(RTAS_LOG_V6_HP_ID_DRC_COUNT_INDEXED,
643                             RTAS_LOG_V6_HP_ACTION_REMOVE, drc_type, &drc_id);
644 }
645 
646 static void check_exception(PowerPCCPU *cpu, sPAPRMachineState *spapr,
647                             uint32_t token, uint32_t nargs,
648                             target_ulong args,
649                             uint32_t nret, target_ulong rets)
650 {
651     uint32_t mask, buf, len, event_len;
652     uint64_t xinfo;
653     sPAPREventLogEntry *event;
654     struct rtas_error_log *hdr;
655     int i;
656 
657     if ((nargs < 6) || (nargs > 7) || nret != 1) {
658         rtas_st(rets, 0, RTAS_OUT_PARAM_ERROR);
659         return;
660     }
661 
662     xinfo = rtas_ld(args, 1);
663     mask = rtas_ld(args, 2);
664     buf = rtas_ld(args, 4);
665     len = rtas_ld(args, 5);
666     if (nargs == 7) {
667         xinfo |= (uint64_t)rtas_ld(args, 6) << 32;
668     }
669 
670     event = rtas_event_log_dequeue(mask, true);
671     if (!event) {
672         goto out_no_events;
673     }
674 
675     hdr = event->data;
676     event_len = be32_to_cpu(hdr->extended_length) + sizeof(*hdr);
677 
678     if (event_len < len) {
679         len = event_len;
680     }
681 
682     cpu_physical_memory_write(buf, event->data, len);
683     rtas_st(rets, 0, RTAS_OUT_SUCCESS);
684     g_free(event->data);
685     g_free(event);
686 
687     /* according to PAPR+, the IRQ must be left asserted, or re-asserted, if
688      * there are still pending events to be fetched via check-exception. We
689      * do the latter here, since our code relies on edge-triggered
690      * interrupts.
691      */
692     for (i = 0; i < EVENT_CLASS_MAX; i++) {
693         if (rtas_event_log_contains(EVENT_CLASS_MASK(i), true)) {
694             const sPAPREventSource *source =
695                 spapr_event_sources_get_source(spapr->event_sources, i);
696 
697             g_assert(source->enabled);
698             qemu_irq_pulse(xics_get_qirq(XICS_FABRIC(spapr), source->irq));
699         }
700     }
701 
702     return;
703 
704 out_no_events:
705     rtas_st(rets, 0, RTAS_OUT_NO_ERRORS_FOUND);
706 }
707 
708 static void event_scan(PowerPCCPU *cpu, sPAPRMachineState *spapr,
709                        uint32_t token, uint32_t nargs,
710                        target_ulong args,
711                        uint32_t nret, target_ulong rets)
712 {
713     uint32_t mask, buf, len, event_len;
714     sPAPREventLogEntry *event;
715     struct rtas_error_log *hdr;
716 
717     if (nargs != 4 || nret != 1) {
718         rtas_st(rets, 0, RTAS_OUT_PARAM_ERROR);
719         return;
720     }
721 
722     mask = rtas_ld(args, 0);
723     buf = rtas_ld(args, 2);
724     len = rtas_ld(args, 3);
725 
726     event = rtas_event_log_dequeue(mask, false);
727     if (!event) {
728         goto out_no_events;
729     }
730 
731     hdr = event->data;
732     event_len = be32_to_cpu(hdr->extended_length) + sizeof(*hdr);
733 
734     if (event_len < len) {
735         len = event_len;
736     }
737 
738     cpu_physical_memory_write(buf, event->data, len);
739     rtas_st(rets, 0, RTAS_OUT_SUCCESS);
740     g_free(event->data);
741     g_free(event);
742     return;
743 
744 out_no_events:
745     rtas_st(rets, 0, RTAS_OUT_NO_ERRORS_FOUND);
746 }
747 
748 void spapr_events_init(sPAPRMachineState *spapr)
749 {
750     QTAILQ_INIT(&spapr->pending_events);
751 
752     spapr->event_sources = spapr_event_sources_new();
753 
754     spapr_event_sources_register(spapr->event_sources, EVENT_CLASS_EPOW,
755                                  spapr_ics_alloc(spapr->ics, 0, false,
756                                                   &error_fatal));
757 
758     /* NOTE: if machine supports modern/dedicated hotplug event source,
759      * we add it to the device-tree unconditionally. This means we may
760      * have cases where the source is enabled in QEMU, but unused by the
761      * guest because it does not support modern hotplug events, so we
762      * take care to rely on checking for negotiation of OV5_HP_EVT option
763      * before attempting to use it to signal events, rather than simply
764      * checking that it's enabled.
765      */
766     if (spapr->use_hotplug_event_source) {
767         spapr_event_sources_register(spapr->event_sources, EVENT_CLASS_HOT_PLUG,
768                                      spapr_ics_alloc(spapr->ics, 0, false,
769                                                       &error_fatal));
770     }
771 
772     spapr->epow_notifier.notify = spapr_powerdown_req;
773     qemu_register_powerdown_notifier(&spapr->epow_notifier);
774     spapr_rtas_register(RTAS_CHECK_EXCEPTION, "check-exception",
775                         check_exception);
776     spapr_rtas_register(RTAS_EVENT_SCAN, "event-scan", event_scan);
777 }
778