1 /*
2 * Emulated ccw-attached 3270 implementation
3 *
4 * Copyright 2017 IBM Corp.
5 * Author(s): Yang Chen <bjcyang@linux.vnet.ibm.com>
6 * Jing Liu <liujbjl@linux.vnet.ibm.com>
7 *
8 * This work is licensed under the terms of the GNU GPL, version 2 or (at
9 * your option) any later version. See the COPYING file in the top-level
10 * directory.
11 */
12
13 #include "qemu/osdep.h"
14 #include "qapi/error.h"
15 #include "qemu/module.h"
16 #include "hw/s390x/css.h"
17 #include "hw/s390x/css-bridge.h"
18 #include "hw/qdev-properties.h"
19 #include "hw/s390x/3270-ccw.h"
20
21 /* Handle READ ccw commands from guest */
handle_payload_3270_read(EmulatedCcw3270Device * dev,CCW1 * ccw)22 static int handle_payload_3270_read(EmulatedCcw3270Device *dev, CCW1 *ccw)
23 {
24 EmulatedCcw3270Class *ck = EMULATED_CCW_3270_GET_CLASS(dev);
25 CcwDevice *ccw_dev = CCW_DEVICE(dev);
26 int len;
27
28 if (!ccw->cda) {
29 return -EFAULT;
30 }
31
32 len = ck->read_payload_3270(dev);
33 if (len < 0) {
34 return len;
35 }
36 ccw_dev->sch->curr_status.scsw.count = ccw->count - len;
37
38 return 0;
39 }
40
41 /* Handle WRITE ccw commands to write data to client */
handle_payload_3270_write(EmulatedCcw3270Device * dev,CCW1 * ccw)42 static int handle_payload_3270_write(EmulatedCcw3270Device *dev, CCW1 *ccw)
43 {
44 EmulatedCcw3270Class *ck = EMULATED_CCW_3270_GET_CLASS(dev);
45 CcwDevice *ccw_dev = CCW_DEVICE(dev);
46 int len;
47
48 if (!ccw->cda) {
49 return -EFAULT;
50 }
51
52 len = ck->write_payload_3270(dev, ccw->cmd_code);
53
54 if (len <= 0) {
55 return len ? len : -EIO;
56 }
57
58 ccw_dev->sch->curr_status.scsw.count = ccw->count - len;
59 return 0;
60 }
61
emulated_ccw_3270_cb(SubchDev * sch,CCW1 ccw)62 static int emulated_ccw_3270_cb(SubchDev *sch, CCW1 ccw)
63 {
64 int rc = 0;
65 EmulatedCcw3270Device *dev = sch->driver_data;
66
67 switch (ccw.cmd_code) {
68 case TC_WRITESF:
69 case TC_WRITE:
70 case TC_EWRITE:
71 case TC_EWRITEA:
72 rc = handle_payload_3270_write(dev, &ccw);
73 break;
74 case TC_RDBUF:
75 case TC_READMOD:
76 rc = handle_payload_3270_read(dev, &ccw);
77 break;
78 default:
79 rc = -ENOSYS;
80 break;
81 }
82
83 if (rc == -EIO) {
84 /* I/O error, specific devices generate specific conditions */
85 SCHIB *schib = &sch->curr_status;
86
87 sch->curr_status.scsw.dstat = SCSW_DSTAT_UNIT_CHECK;
88 sch->sense_data[0] = 0x40; /* intervention-req */
89 schib->scsw.ctrl &= ~SCSW_ACTL_START_PEND;
90 schib->scsw.ctrl &= ~SCSW_CTRL_MASK_STCTL;
91 schib->scsw.ctrl |= SCSW_STCTL_PRIMARY | SCSW_STCTL_SECONDARY |
92 SCSW_STCTL_ALERT | SCSW_STCTL_STATUS_PEND;
93 }
94
95 return rc;
96 }
97
emulated_ccw_3270_realize(DeviceState * ds,Error ** errp)98 static void emulated_ccw_3270_realize(DeviceState *ds, Error **errp)
99 {
100 uint16_t chpid;
101 EmulatedCcw3270Device *dev = EMULATED_CCW_3270(ds);
102 EmulatedCcw3270Class *ck = EMULATED_CCW_3270_GET_CLASS(dev);
103 CcwDevice *cdev = CCW_DEVICE(ds);
104 CCWDeviceClass *cdk = CCW_DEVICE_GET_CLASS(cdev);
105 SubchDev *sch;
106 Error *err = NULL;
107
108 sch = css_create_sch(cdev->devno, errp);
109 if (!sch) {
110 return;
111 }
112
113 if (!ck->init) {
114 goto out_err;
115 }
116
117 sch->driver_data = dev;
118 cdev->sch = sch;
119 chpid = css_find_free_chpid(sch->cssid);
120
121 if (chpid > MAX_CHPID) {
122 error_setg(&err, "No available chpid to use.");
123 goto out_err;
124 }
125
126 sch->id.reserved = 0xff;
127 sch->id.cu_type = EMULATED_CCW_3270_CU_TYPE;
128 css_sch_build_virtual_schib(sch, (uint8_t)chpid,
129 EMULATED_CCW_3270_CHPID_TYPE);
130 sch->do_subchannel_work = do_subchannel_work_virtual;
131 sch->ccw_cb = emulated_ccw_3270_cb;
132 sch->irb_cb = build_irb_virtual;
133
134 ck->init(dev, &err);
135 if (err) {
136 goto out_err;
137 }
138
139 cdk->realize(cdev, &err);
140 if (err) {
141 goto out_err;
142 }
143
144 return;
145
146 out_err:
147 error_propagate(errp, err);
148 css_subch_assign(sch->cssid, sch->ssid, sch->schid, sch->devno, NULL);
149 cdev->sch = NULL;
150 g_free(sch);
151 }
152
153 static Property emulated_ccw_3270_properties[] = {
154 DEFINE_PROP_END_OF_LIST(),
155 };
156
emulated_ccw_3270_class_init(ObjectClass * klass,void * data)157 static void emulated_ccw_3270_class_init(ObjectClass *klass, void *data)
158 {
159 DeviceClass *dc = DEVICE_CLASS(klass);
160
161 device_class_set_props(dc, emulated_ccw_3270_properties);
162 dc->realize = emulated_ccw_3270_realize;
163 dc->hotpluggable = false;
164 set_bit(DEVICE_CATEGORY_DISPLAY, dc->categories);
165 }
166
167 static const TypeInfo emulated_ccw_3270_info = {
168 .name = TYPE_EMULATED_CCW_3270,
169 .parent = TYPE_CCW_DEVICE,
170 .instance_size = sizeof(EmulatedCcw3270Device),
171 .class_init = emulated_ccw_3270_class_init,
172 .class_size = sizeof(EmulatedCcw3270Class),
173 .abstract = true,
174 };
175
emulated_ccw_register(void)176 static void emulated_ccw_register(void)
177 {
178 type_register_static(&emulated_ccw_3270_info);
179 }
180
181 type_init(emulated_ccw_register)
182