xref: /qemu/chardev/char-parallel.c (revision a0e93dd8) 
1 /*
2  * QEMU System Emulator
3  *
4  * Copyright (c) 2003-2008 Fabrice Bellard
5  *
6  * Permission is hereby granted, free of charge, to any person obtaining a copy
7  * of this software and associated documentation files (the "Software"), to deal
8  * in the Software without restriction, including without limitation the rights
9  * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
10  * copies of the Software, and to permit persons to whom the Software is
11  * furnished to do so, subject to the following conditions:
12  *
13  * The above copyright notice and this permission notice shall be included in
14  * all copies or substantial portions of the Software.
15  *
16  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
19  * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20  * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
21  * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
22  * THE SOFTWARE.
23  */
24 
25 #include "qemu/osdep.h"
26 #include "chardev/char.h"
27 #include "qapi/error.h"
28 #include "qemu/module.h"
29 #include "qemu/option.h"
30 #include <sys/ioctl.h>
31 
32 #ifdef CONFIG_BSD
33 #if defined(__FreeBSD__) || defined(__FreeBSD_kernel__)
34 #include <dev/ppbus/ppi.h>
35 #include <dev/ppbus/ppbconf.h>
36 #elif defined(__DragonFly__)
37 #include <dev/misc/ppi/ppi.h>
38 #include <bus/ppbus/ppbconf.h>
39 #endif
40 #else
41 #ifdef __linux__
42 #include <linux/ppdev.h>
43 #include <linux/parport.h>
44 #endif
45 #endif
46 
47 #include "chardev/char-fd.h"
48 #include "chardev/char-parallel.h"
49 
50 #if defined(__linux__)
51 
52 typedef struct {
53     Chardev parent;
54     int fd;
55     int mode;
56 } ParallelChardev;
57 
58 #define PARALLEL_CHARDEV(obj) \
59     OBJECT_CHECK(ParallelChardev, (obj), TYPE_CHARDEV_PARALLEL)
60 
61 static int pp_hw_mode(ParallelChardev *s, uint16_t mode)
62 {
63     if (s->mode != mode) {
64         int m = mode;
65         if (ioctl(s->fd, PPSETMODE, &m) < 0) {
66             return 0;
67         }
68         s->mode = mode;
69     }
70     return 1;
71 }
72 
73 static int pp_ioctl(Chardev *chr, int cmd, void *arg)
74 {
75     ParallelChardev *drv = PARALLEL_CHARDEV(chr);
76     int fd = drv->fd;
77     uint8_t b;
78 
79     switch (cmd) {
80     case CHR_IOCTL_PP_READ_DATA:
81         if (ioctl(fd, PPRDATA, &b) < 0) {
82             return -ENOTSUP;
83         }
84         *(uint8_t *)arg = b;
85         break;
86     case CHR_IOCTL_PP_WRITE_DATA:
87         b = *(uint8_t *)arg;
88         if (ioctl(fd, PPWDATA, &b) < 0) {
89             return -ENOTSUP;
90         }
91         break;
92     case CHR_IOCTL_PP_READ_CONTROL:
93         if (ioctl(fd, PPRCONTROL, &b) < 0) {
94             return -ENOTSUP;
95         }
96         /* Linux gives only the lowest bits, and no way to know data
97            direction! For better compatibility set the fixed upper
98            bits. */
99         *(uint8_t *)arg = b | 0xc0;
100         break;
101     case CHR_IOCTL_PP_WRITE_CONTROL:
102         b = *(uint8_t *)arg;
103         if (ioctl(fd, PPWCONTROL, &b) < 0) {
104             return -ENOTSUP;
105         }
106         break;
107     case CHR_IOCTL_PP_READ_STATUS:
108         if (ioctl(fd, PPRSTATUS, &b) < 0) {
109             return -ENOTSUP;
110         }
111         *(uint8_t *)arg = b;
112         break;
113     case CHR_IOCTL_PP_DATA_DIR:
114         if (ioctl(fd, PPDATADIR, (int *)arg) < 0) {
115             return -ENOTSUP;
116         }
117         break;
118     case CHR_IOCTL_PP_EPP_READ_ADDR:
119         if (pp_hw_mode(drv, IEEE1284_MODE_EPP | IEEE1284_ADDR)) {
120             struct ParallelIOArg *parg = arg;
121             int n = read(fd, parg->buffer, parg->count);
122             if (n != parg->count) {
123                 return -EIO;
124             }
125         }
126         break;
127     case CHR_IOCTL_PP_EPP_READ:
128         if (pp_hw_mode(drv, IEEE1284_MODE_EPP)) {
129             struct ParallelIOArg *parg = arg;
130             int n = read(fd, parg->buffer, parg->count);
131             if (n != parg->count) {
132                 return -EIO;
133             }
134         }
135         break;
136     case CHR_IOCTL_PP_EPP_WRITE_ADDR:
137         if (pp_hw_mode(drv, IEEE1284_MODE_EPP | IEEE1284_ADDR)) {
138             struct ParallelIOArg *parg = arg;
139             int n = write(fd, parg->buffer, parg->count);
140             if (n != parg->count) {
141                 return -EIO;
142             }
143         }
144         break;
145     case CHR_IOCTL_PP_EPP_WRITE:
146         if (pp_hw_mode(drv, IEEE1284_MODE_EPP)) {
147             struct ParallelIOArg *parg = arg;
148             int n = write(fd, parg->buffer, parg->count);
149             if (n != parg->count) {
150                 return -EIO;
151             }
152         }
153         break;
154     default:
155         return -ENOTSUP;
156     }
157     return 0;
158 }
159 
160 static void qemu_chr_open_pp_fd(Chardev *chr,
161                                 int fd,
162                                 bool *be_opened,
163                                 Error **errp)
164 {
165     ParallelChardev *drv = PARALLEL_CHARDEV(chr);
166 
167     drv->fd = fd;
168 
169     if (ioctl(fd, PPCLAIM) < 0) {
170         error_setg_errno(errp, errno, "not a parallel port");
171         return;
172     }
173 
174     drv->mode = IEEE1284_MODE_COMPAT;
175 }
176 #endif /* __linux__ */
177 
178 #if defined(__FreeBSD__) || defined(__FreeBSD_kernel__) || defined(__DragonFly__)
179 
180 typedef struct {
181     Chardev parent;
182     int fd;
183 } ParallelChardev;
184 
185 #define PARALLEL_CHARDEV(obj)                                   \
186     OBJECT_CHECK(ParallelChardev, (obj), TYPE_CHARDEV_PARALLEL)
187 
188 static int pp_ioctl(Chardev *chr, int cmd, void *arg)
189 {
190     ParallelChardev *drv = PARALLEL_CHARDEV(chr);
191     uint8_t b;
192 
193     switch (cmd) {
194     case CHR_IOCTL_PP_READ_DATA:
195         if (ioctl(drv->fd, PPIGDATA, &b) < 0) {
196             return -ENOTSUP;
197         }
198         *(uint8_t *)arg = b;
199         break;
200     case CHR_IOCTL_PP_WRITE_DATA:
201         b = *(uint8_t *)arg;
202         if (ioctl(drv->fd, PPISDATA, &b) < 0) {
203             return -ENOTSUP;
204         }
205         break;
206     case CHR_IOCTL_PP_READ_CONTROL:
207         if (ioctl(drv->fd, PPIGCTRL, &b) < 0) {
208             return -ENOTSUP;
209         }
210         *(uint8_t *)arg = b;
211         break;
212     case CHR_IOCTL_PP_WRITE_CONTROL:
213         b = *(uint8_t *)arg;
214         if (ioctl(drv->fd, PPISCTRL, &b) < 0) {
215             return -ENOTSUP;
216         }
217         break;
218     case CHR_IOCTL_PP_READ_STATUS:
219         if (ioctl(drv->fd, PPIGSTATUS, &b) < 0) {
220             return -ENOTSUP;
221         }
222         *(uint8_t *)arg = b;
223         break;
224     default:
225         return -ENOTSUP;
226     }
227     return 0;
228 }
229 
230 static void qemu_chr_open_pp_fd(Chardev *chr,
231                                 int fd,
232                                 bool *be_opened,
233                                 Error **errp)
234 {
235     ParallelChardev *drv = PARALLEL_CHARDEV(chr);
236     drv->fd = fd;
237     *be_opened = false;
238 }
239 #endif
240 
241 #ifdef HAVE_CHARDEV_PARALLEL
242 static void qmp_chardev_open_parallel(Chardev *chr,
243                                       ChardevBackend *backend,
244                                       bool *be_opened,
245                                       Error **errp)
246 {
247     ChardevHostdev *parallel = backend->u.parallel.data;
248     int fd;
249 
250     fd = qmp_chardev_open_file_source(parallel->device, O_RDWR, errp);
251     if (fd < 0) {
252         return;
253     }
254     qemu_chr_open_pp_fd(chr, fd, be_opened, errp);
255 }
256 
257 static void qemu_chr_parse_parallel(QemuOpts *opts, ChardevBackend *backend,
258                                     Error **errp)
259 {
260     const char *device = qemu_opt_get(opts, "path");
261     ChardevHostdev *parallel;
262 
263     if (device == NULL) {
264         error_setg(errp, "chardev: parallel: no device path given");
265         return;
266     }
267     backend->type = CHARDEV_BACKEND_KIND_PARALLEL;
268     parallel = backend->u.parallel.data = g_new0(ChardevHostdev, 1);
269     qemu_chr_parse_common(opts, qapi_ChardevHostdev_base(parallel));
270     parallel->device = g_strdup(device);
271 }
272 
273 static void char_parallel_class_init(ObjectClass *oc, void *data)
274 {
275     ChardevClass *cc = CHARDEV_CLASS(oc);
276 
277     cc->parse = qemu_chr_parse_parallel;
278     cc->open = qmp_chardev_open_parallel;
279     cc->chr_ioctl = pp_ioctl;
280 }
281 
282 static void char_parallel_finalize(Object *obj)
283 {
284     Chardev *chr = CHARDEV(obj);
285     ParallelChardev *drv = PARALLEL_CHARDEV(chr);
286     int fd = drv->fd;
287 
288 #if defined(__linux__)
289     pp_hw_mode(drv, IEEE1284_MODE_COMPAT);
290     ioctl(fd, PPRELEASE);
291 #endif
292     close(fd);
293     qemu_chr_be_event(chr, CHR_EVENT_CLOSED);
294 }
295 
296 static const TypeInfo char_parallel_type_info = {
297     .name = TYPE_CHARDEV_PARALLEL,
298     .parent = TYPE_CHARDEV,
299     .instance_size = sizeof(ParallelChardev),
300     .instance_finalize = char_parallel_finalize,
301     .class_init = char_parallel_class_init,
302 };
303 
304 static void register_types(void)
305 {
306     type_register_static(&char_parallel_type_info);
307 }
308 
309 type_init(register_types);
310 
311 #endif  /* HAVE_CHARDEV_PARALLEL */
312