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