1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16#include "qemu/osdep.h"
17#include "hw/s390x/sclp.h"
18#include "qemu/module.h"
19#include "hw/s390x/event-facility.h"
20#include "sysemu/cpus.h"
21
22typedef struct ConfigMgtData {
23 EventBufferHeader ebh;
24 uint8_t reserved;
25 uint8_t event_qualifier;
26} QEMU_PACKED ConfigMgtData;
27
28#define EVENT_QUAL_CPU_CHANGE 1
29
30void raise_irq_cpu_hotplug(void)
31{
32 Object *obj = object_resolve_path_type("", TYPE_SCLP_CPU_HOTPLUG, NULL);
33
34 SCLP_EVENT(obj)->event_pending = true;
35
36
37 sclp_service_interrupt(0);
38}
39
40static sccb_mask_t send_mask(void)
41{
42 return SCLP_EVENT_MASK_CONFIG_MGT_DATA;
43}
44
45static sccb_mask_t receive_mask(void)
46{
47 return 0;
48}
49
50static int read_event_data(SCLPEvent *event, EventBufferHeader *evt_buf_hdr,
51 int *slen)
52{
53 ConfigMgtData *cdata = (ConfigMgtData *) evt_buf_hdr;
54 if (*slen < sizeof(ConfigMgtData)) {
55 return 0;
56 }
57
58
59 if (!event->event_pending) {
60 return 0;
61 }
62 event->event_pending = false;
63
64
65 cdata->ebh.length = cpu_to_be16(sizeof(ConfigMgtData));
66 cdata->ebh.type = SCLP_EVENT_CONFIG_MGT_DATA;
67 cdata->ebh.flags |= SCLP_EVENT_BUFFER_ACCEPTED;
68
69
70 cdata->event_qualifier = EVENT_QUAL_CPU_CHANGE;
71 *slen -= sizeof(ConfigMgtData);
72
73 return 1;
74}
75
76static void cpu_class_init(ObjectClass *oc, void *data)
77{
78 SCLPEventClass *k = SCLP_EVENT_CLASS(oc);
79 DeviceClass *dc = DEVICE_CLASS(oc);
80
81 k->get_send_mask = send_mask;
82 k->get_receive_mask = receive_mask;
83 k->read_event_data = read_event_data;
84 set_bit(DEVICE_CATEGORY_MISC, dc->categories);
85
86
87
88
89
90 dc->user_creatable = false;
91}
92
93static const TypeInfo sclp_cpu_info = {
94 .name = TYPE_SCLP_CPU_HOTPLUG,
95 .parent = TYPE_SCLP_EVENT,
96 .instance_size = sizeof(SCLPEvent),
97 .class_init = cpu_class_init,
98 .class_size = sizeof(SCLPEventClass),
99};
100
101static void sclp_cpu_register_types(void)
102{
103 type_register_static(&sclp_cpu_info);
104}
105
106type_init(sclp_cpu_register_types)
107