1
2
3
4
5
6
7
8
9
10
11
12
13
14
15#ifndef HW_S390_SCLP_EVENT_FACILITY_H
16#define HW_S390_SCLP_EVENT_FACILITY_H
17
18#include "hw/qdev.h"
19#include "qemu/thread.h"
20#include "hw/s390x/sclp.h"
21
22
23#define SCLP_EVENT_OPRTNS_COMMAND 0x01
24#define SCLP_EVENT_MESSAGE 0x02
25#define SCLP_EVENT_CONFIG_MGT_DATA 0x04
26#define SCLP_EVENT_PMSGCMD 0x09
27#define SCLP_EVENT_ASCII_CONSOLE_DATA 0x1a
28#define SCLP_EVENT_SIGNAL_QUIESCE 0x1d
29
30
31#define SCLP_EVENT_MASK_SIGNAL_QUIESCE 0x00000008
32#define SCLP_EVENT_MASK_MSG_ASCII 0x00000040
33#define SCLP_EVENT_MASK_CONFIG_MGT_DATA 0x10000000
34#define SCLP_EVENT_MASK_OP_CMD 0x80000000
35#define SCLP_EVENT_MASK_MSG 0x40000000
36#define SCLP_EVENT_MASK_PMSGCMD 0x00800000
37
38#define SCLP_UNCONDITIONAL_READ 0x00
39#define SCLP_SELECTIVE_READ 0x01
40
41#define TYPE_SCLP_EVENT "s390-sclp-event-type"
42#define SCLP_EVENT(obj) \
43 OBJECT_CHECK(SCLPEvent, (obj), TYPE_SCLP_EVENT)
44#define SCLP_EVENT_CLASS(klass) \
45 OBJECT_CLASS_CHECK(SCLPEventClass, (klass), TYPE_SCLP_EVENT)
46#define SCLP_EVENT_GET_CLASS(obj) \
47 OBJECT_GET_CLASS(SCLPEventClass, (obj), TYPE_SCLP_EVENT)
48
49#define TYPE_SCLP_CPU_HOTPLUG "sclp-cpu-hotplug"
50#define TYPE_SCLP_QUIESCE "sclpquiesce"
51
52#define SCLP_EVENT_MASK_LEN_MAX 1021
53
54typedef struct WriteEventMask {
55 SCCBHeader h;
56 uint16_t _reserved;
57 uint16_t mask_length;
58 uint8_t masks[];
59
60
61
62
63
64
65
66
67} QEMU_PACKED WriteEventMask;
68
69#define WEM_CP_RECEIVE_MASK(wem, mask_len) ((wem)->masks)
70#define WEM_CP_SEND_MASK(wem, mask_len) ((wem)->masks + (mask_len))
71#define WEM_RECEIVE_MASK(wem, mask_len) ((wem)->masks + 2 * (mask_len))
72#define WEM_SEND_MASK(wem, mask_len) ((wem)->masks + 3 * (mask_len))
73
74typedef struct EventBufferHeader {
75 uint16_t length;
76 uint8_t type;
77 uint8_t flags;
78 uint16_t _reserved;
79} QEMU_PACKED EventBufferHeader;
80
81typedef struct MdbHeader {
82 uint16_t length;
83 uint16_t type;
84 uint32_t tag;
85 uint32_t revision_code;
86} QEMU_PACKED MdbHeader;
87
88typedef struct MTO {
89 uint16_t line_type_flags;
90 uint8_t alarm_control;
91 uint8_t _reserved[3];
92 char message[];
93} QEMU_PACKED MTO;
94
95typedef struct GO {
96 uint32_t domid;
97 uint8_t hhmmss_time[8];
98 uint8_t th_time[3];
99 uint8_t _reserved_0;
100 uint8_t dddyyyy_date[7];
101 uint8_t _reserved_1;
102 uint16_t general_msg_flags;
103 uint8_t _reserved_2[10];
104 uint8_t originating_system_name[8];
105 uint8_t job_guest_name[8];
106} QEMU_PACKED GO;
107
108#define MESSAGE_TEXT 0x0004
109
110typedef struct MDBO {
111 uint16_t length;
112 uint16_t type;
113 union {
114 GO go;
115 MTO mto;
116 };
117} QEMU_PACKED MDBO;
118
119typedef struct MDB {
120 MdbHeader header;
121 MDBO mdbo[0];
122} QEMU_PACKED MDB;
123
124typedef struct SclpMsg {
125 EventBufferHeader header;
126 MDB mdb;
127} QEMU_PACKED SclpMsg;
128
129#define GDS_ID_MDSMU 0x1310
130#define GDS_ID_CPMSU 0x1212
131#define GDS_ID_TEXTCMD 0x1320
132
133typedef struct GdsVector {
134 uint16_t length;
135 uint16_t gds_id;
136} QEMU_PACKED GdsVector;
137
138#define GDS_KEY_SELFDEFTEXTMSG 0x31
139#define GDS_KEY_TEXTMSG 0x30
140
141typedef struct GdsSubvector {
142 uint8_t length;
143 uint8_t key;
144} QEMU_PACKED GdsSubvector;
145
146
147typedef struct MDMSU {
148 GdsVector mdmsu;
149 GdsVector cpmsu;
150 GdsVector text_command;
151 GdsSubvector self_def_text_message;
152 GdsSubvector text_message;
153} QEMU_PACKED MDMSU;
154
155typedef struct WriteEventData {
156 SCCBHeader h;
157 EventBufferHeader ebh;
158} QEMU_PACKED WriteEventData;
159
160typedef struct ReadEventData {
161 SCCBHeader h;
162 union {
163 uint32_t mask;
164 EventBufferHeader ebh;
165 };
166} QEMU_PACKED ReadEventData;
167
168typedef struct SCLPEvent {
169 DeviceState qdev;
170 bool event_pending;
171 char *name;
172} SCLPEvent;
173
174typedef struct SCLPEventClass {
175 DeviceClass parent_class;
176 int (*init)(SCLPEvent *event);
177 int (*exit)(SCLPEvent *event);
178
179
180 unsigned int (*get_send_mask)(void);
181
182
183 unsigned int (*get_receive_mask)(void);
184
185 int (*read_event_data)(SCLPEvent *event, EventBufferHeader *evt_buf_hdr,
186 int *slen);
187
188 int (*write_event_data)(SCLPEvent *event, EventBufferHeader *evt_buf_hdr);
189
190
191 bool (*can_handle_event)(uint8_t type);
192} SCLPEventClass;
193
194#define TYPE_SCLP_EVENT_FACILITY "s390-sclp-event-facility"
195#define EVENT_FACILITY(obj) \
196 OBJECT_CHECK(SCLPEventFacility, (obj), TYPE_SCLP_EVENT_FACILITY)
197#define EVENT_FACILITY_CLASS(klass) \
198 OBJECT_CLASS_CHECK(SCLPEventFacilityClass, (klass), \
199 TYPE_SCLP_EVENT_FACILITY)
200#define EVENT_FACILITY_GET_CLASS(obj) \
201 OBJECT_GET_CLASS(SCLPEventFacilityClass, (obj), \
202 TYPE_SCLP_EVENT_FACILITY)
203
204typedef struct SCLPEventFacilityClass {
205 SysBusDeviceClass parent_class;
206 void (*command_handler)(SCLPEventFacility *ef, SCCB *sccb, uint64_t code);
207 bool (*event_pending)(SCLPEventFacility *ef);
208} SCLPEventFacilityClass;
209
210#endif
211