Loading...
1/*
2 * linux/drivers/char/ppdev.c
3 *
4 * This is the code behind /dev/parport* -- it allows a user-space
5 * application to use the parport subsystem.
6 *
7 * Copyright (C) 1998-2000, 2002 Tim Waugh <tim@cyberelk.net>
8 *
9 * This program is free software; you can redistribute it and/or
10 * modify it under the terms of the GNU General Public License
11 * as published by the Free Software Foundation; either version
12 * 2 of the License, or (at your option) any later version.
13 *
14 * A /dev/parportx device node represents an arbitrary device
15 * on port 'x'. The following operations are possible:
16 *
17 * open do nothing, set up default IEEE 1284 protocol to be COMPAT
18 * close release port and unregister device (if necessary)
19 * ioctl
20 * EXCL register device exclusively (may fail)
21 * CLAIM (register device first time) parport_claim_or_block
22 * RELEASE parport_release
23 * SETMODE set the IEEE 1284 protocol to use for read/write
24 * SETPHASE set the IEEE 1284 phase of a particular mode. Not to be
25 * confused with ioctl(fd, SETPHASER, &stun). ;-)
26 * DATADIR data_forward / data_reverse
27 * WDATA write_data
28 * RDATA read_data
29 * WCONTROL write_control
30 * RCONTROL read_control
31 * FCONTROL frob_control
32 * RSTATUS read_status
33 * NEGOT parport_negotiate
34 * YIELD parport_yield_blocking
35 * WCTLONIRQ on interrupt, set control lines
36 * CLRIRQ clear (and return) interrupt count
37 * SETTIME sets device timeout (struct timeval)
38 * GETTIME gets device timeout (struct timeval)
39 * GETMODES gets hardware supported modes (unsigned int)
40 * GETMODE gets the current IEEE1284 mode
41 * GETPHASE gets the current IEEE1284 phase
42 * GETFLAGS gets current (user-visible) flags
43 * SETFLAGS sets current (user-visible) flags
44 * read/write read or write in current IEEE 1284 protocol
45 * select wait for interrupt (in readfds)
46 *
47 * Changes:
48 * Added SETTIME/GETTIME ioctl, Fred Barnes, 1999.
49 *
50 * Arnaldo Carvalho de Melo <acme@conectiva.com.br> 2000/08/25
51 * - On error, copy_from_user and copy_to_user do not return -EFAULT,
52 * They return the positive number of bytes *not* copied due to address
53 * space errors.
54 *
55 * Added GETMODES/GETMODE/GETPHASE ioctls, Fred Barnes <frmb2@ukc.ac.uk>, 03/01/2001.
56 * Added GETFLAGS/SETFLAGS ioctls, Fred Barnes, 04/2001
57 */
58
59#include <linux/module.h>
60#include <linux/init.h>
61#include <linux/sched.h>
62#include <linux/device.h>
63#include <linux/ioctl.h>
64#include <linux/parport.h>
65#include <linux/ctype.h>
66#include <linux/poll.h>
67#include <linux/slab.h>
68#include <linux/major.h>
69#include <linux/ppdev.h>
70#include <linux/mutex.h>
71#include <linux/uaccess.h>
72
73#define PP_VERSION "ppdev: user-space parallel port driver"
74#define CHRDEV "ppdev"
75
76struct pp_struct {
77 struct pardevice * pdev;
78 wait_queue_head_t irq_wait;
79 atomic_t irqc;
80 unsigned int flags;
81 int irqresponse;
82 unsigned char irqctl;
83 struct ieee1284_info state;
84 struct ieee1284_info saved_state;
85 long default_inactivity;
86};
87
88/* pp_struct.flags bitfields */
89#define PP_CLAIMED (1<<0)
90#define PP_EXCL (1<<1)
91
92/* Other constants */
93#define PP_INTERRUPT_TIMEOUT (10 * HZ) /* 10s */
94#define PP_BUFFER_SIZE 1024
95#define PARDEVICE_MAX 8
96
97/* ROUND_UP macro from fs/select.c */
98#define ROUND_UP(x,y) (((x)+(y)-1)/(y))
99
100static DEFINE_MUTEX(pp_do_mutex);
101static inline void pp_enable_irq (struct pp_struct *pp)
102{
103 struct parport *port = pp->pdev->port;
104 port->ops->enable_irq (port);
105}
106
107static ssize_t pp_read (struct file * file, char __user * buf, size_t count,
108 loff_t * ppos)
109{
110 unsigned int minor = iminor(file->f_path.dentry->d_inode);
111 struct pp_struct *pp = file->private_data;
112 char * kbuffer;
113 ssize_t bytes_read = 0;
114 struct parport *pport;
115 int mode;
116
117 if (!(pp->flags & PP_CLAIMED)) {
118 /* Don't have the port claimed */
119 pr_debug(CHRDEV "%x: claim the port first\n", minor);
120 return -EINVAL;
121 }
122
123 /* Trivial case. */
124 if (count == 0)
125 return 0;
126
127 kbuffer = kmalloc(min_t(size_t, count, PP_BUFFER_SIZE), GFP_KERNEL);
128 if (!kbuffer) {
129 return -ENOMEM;
130 }
131 pport = pp->pdev->port;
132 mode = pport->ieee1284.mode & ~(IEEE1284_DEVICEID | IEEE1284_ADDR);
133
134 parport_set_timeout (pp->pdev,
135 (file->f_flags & O_NONBLOCK) ?
136 PARPORT_INACTIVITY_O_NONBLOCK :
137 pp->default_inactivity);
138
139 while (bytes_read == 0) {
140 ssize_t need = min_t(unsigned long, count, PP_BUFFER_SIZE);
141
142 if (mode == IEEE1284_MODE_EPP) {
143 /* various specials for EPP mode */
144 int flags = 0;
145 size_t (*fn)(struct parport *, void *, size_t, int);
146
147 if (pp->flags & PP_W91284PIC) {
148 flags |= PARPORT_W91284PIC;
149 }
150 if (pp->flags & PP_FASTREAD) {
151 flags |= PARPORT_EPP_FAST;
152 }
153 if (pport->ieee1284.mode & IEEE1284_ADDR) {
154 fn = pport->ops->epp_read_addr;
155 } else {
156 fn = pport->ops->epp_read_data;
157 }
158 bytes_read = (*fn)(pport, kbuffer, need, flags);
159 } else {
160 bytes_read = parport_read (pport, kbuffer, need);
161 }
162
163 if (bytes_read != 0)
164 break;
165
166 if (file->f_flags & O_NONBLOCK) {
167 bytes_read = -EAGAIN;
168 break;
169 }
170
171 if (signal_pending (current)) {
172 bytes_read = -ERESTARTSYS;
173 break;
174 }
175
176 cond_resched();
177 }
178
179 parport_set_timeout (pp->pdev, pp->default_inactivity);
180
181 if (bytes_read > 0 && copy_to_user (buf, kbuffer, bytes_read))
182 bytes_read = -EFAULT;
183
184 kfree (kbuffer);
185 pp_enable_irq (pp);
186 return bytes_read;
187}
188
189static ssize_t pp_write (struct file * file, const char __user * buf,
190 size_t count, loff_t * ppos)
191{
192 unsigned int minor = iminor(file->f_path.dentry->d_inode);
193 struct pp_struct *pp = file->private_data;
194 char * kbuffer;
195 ssize_t bytes_written = 0;
196 ssize_t wrote;
197 int mode;
198 struct parport *pport;
199
200 if (!(pp->flags & PP_CLAIMED)) {
201 /* Don't have the port claimed */
202 pr_debug(CHRDEV "%x: claim the port first\n", minor);
203 return -EINVAL;
204 }
205
206 kbuffer = kmalloc(min_t(size_t, count, PP_BUFFER_SIZE), GFP_KERNEL);
207 if (!kbuffer) {
208 return -ENOMEM;
209 }
210 pport = pp->pdev->port;
211 mode = pport->ieee1284.mode & ~(IEEE1284_DEVICEID | IEEE1284_ADDR);
212
213 parport_set_timeout (pp->pdev,
214 (file->f_flags & O_NONBLOCK) ?
215 PARPORT_INACTIVITY_O_NONBLOCK :
216 pp->default_inactivity);
217
218 while (bytes_written < count) {
219 ssize_t n = min_t(unsigned long, count - bytes_written, PP_BUFFER_SIZE);
220
221 if (copy_from_user (kbuffer, buf + bytes_written, n)) {
222 bytes_written = -EFAULT;
223 break;
224 }
225
226 if ((pp->flags & PP_FASTWRITE) && (mode == IEEE1284_MODE_EPP)) {
227 /* do a fast EPP write */
228 if (pport->ieee1284.mode & IEEE1284_ADDR) {
229 wrote = pport->ops->epp_write_addr (pport,
230 kbuffer, n, PARPORT_EPP_FAST);
231 } else {
232 wrote = pport->ops->epp_write_data (pport,
233 kbuffer, n, PARPORT_EPP_FAST);
234 }
235 } else {
236 wrote = parport_write (pp->pdev->port, kbuffer, n);
237 }
238
239 if (wrote <= 0) {
240 if (!bytes_written) {
241 bytes_written = wrote;
242 }
243 break;
244 }
245
246 bytes_written += wrote;
247
248 if (file->f_flags & O_NONBLOCK) {
249 if (!bytes_written)
250 bytes_written = -EAGAIN;
251 break;
252 }
253
254 if (signal_pending (current)) {
255 if (!bytes_written) {
256 bytes_written = -EINTR;
257 }
258 break;
259 }
260
261 cond_resched();
262 }
263
264 parport_set_timeout (pp->pdev, pp->default_inactivity);
265
266 kfree (kbuffer);
267 pp_enable_irq (pp);
268 return bytes_written;
269}
270
271static void pp_irq (void *private)
272{
273 struct pp_struct *pp = private;
274
275 if (pp->irqresponse) {
276 parport_write_control (pp->pdev->port, pp->irqctl);
277 pp->irqresponse = 0;
278 }
279
280 atomic_inc (&pp->irqc);
281 wake_up_interruptible (&pp->irq_wait);
282}
283
284static int register_device (int minor, struct pp_struct *pp)
285{
286 struct parport *port;
287 struct pardevice * pdev = NULL;
288 char *name;
289 int fl;
290
291 name = kasprintf(GFP_KERNEL, CHRDEV "%x", minor);
292 if (name == NULL)
293 return -ENOMEM;
294
295 port = parport_find_number (minor);
296 if (!port) {
297 printk (KERN_WARNING "%s: no associated port!\n", name);
298 kfree (name);
299 return -ENXIO;
300 }
301
302 fl = (pp->flags & PP_EXCL) ? PARPORT_FLAG_EXCL : 0;
303 pdev = parport_register_device (port, name, NULL,
304 NULL, pp_irq, fl, pp);
305 parport_put_port (port);
306
307 if (!pdev) {
308 printk (KERN_WARNING "%s: failed to register device!\n", name);
309 kfree (name);
310 return -ENXIO;
311 }
312
313 pp->pdev = pdev;
314 pr_debug("%s: registered pardevice\n", name);
315 return 0;
316}
317
318static enum ieee1284_phase init_phase (int mode)
319{
320 switch (mode & ~(IEEE1284_DEVICEID
321 | IEEE1284_ADDR)) {
322 case IEEE1284_MODE_NIBBLE:
323 case IEEE1284_MODE_BYTE:
324 return IEEE1284_PH_REV_IDLE;
325 }
326 return IEEE1284_PH_FWD_IDLE;
327}
328
329static int pp_do_ioctl(struct file *file, unsigned int cmd, unsigned long arg)
330{
331 unsigned int minor = iminor(file->f_path.dentry->d_inode);
332 struct pp_struct *pp = file->private_data;
333 struct parport * port;
334 void __user *argp = (void __user *)arg;
335
336 /* First handle the cases that don't take arguments. */
337 switch (cmd) {
338 case PPCLAIM:
339 {
340 struct ieee1284_info *info;
341 int ret;
342
343 if (pp->flags & PP_CLAIMED) {
344 pr_debug(CHRDEV "%x: you've already got it!\n", minor);
345 return -EINVAL;
346 }
347
348 /* Deferred device registration. */
349 if (!pp->pdev) {
350 int err = register_device (minor, pp);
351 if (err) {
352 return err;
353 }
354 }
355
356 ret = parport_claim_or_block (pp->pdev);
357 if (ret < 0)
358 return ret;
359
360 pp->flags |= PP_CLAIMED;
361
362 /* For interrupt-reporting to work, we need to be
363 * informed of each interrupt. */
364 pp_enable_irq (pp);
365
366 /* We may need to fix up the state machine. */
367 info = &pp->pdev->port->ieee1284;
368 pp->saved_state.mode = info->mode;
369 pp->saved_state.phase = info->phase;
370 info->mode = pp->state.mode;
371 info->phase = pp->state.phase;
372 pp->default_inactivity = parport_set_timeout (pp->pdev, 0);
373 parport_set_timeout (pp->pdev, pp->default_inactivity);
374
375 return 0;
376 }
377 case PPEXCL:
378 if (pp->pdev) {
379 pr_debug(CHRDEV "%x: too late for PPEXCL; "
380 "already registered\n", minor);
381 if (pp->flags & PP_EXCL)
382 /* But it's not really an error. */
383 return 0;
384 /* There's no chance of making the driver happy. */
385 return -EINVAL;
386 }
387
388 /* Just remember to register the device exclusively
389 * when we finally do the registration. */
390 pp->flags |= PP_EXCL;
391 return 0;
392 case PPSETMODE:
393 {
394 int mode;
395 if (copy_from_user (&mode, argp, sizeof (mode)))
396 return -EFAULT;
397 /* FIXME: validate mode */
398 pp->state.mode = mode;
399 pp->state.phase = init_phase (mode);
400
401 if (pp->flags & PP_CLAIMED) {
402 pp->pdev->port->ieee1284.mode = mode;
403 pp->pdev->port->ieee1284.phase = pp->state.phase;
404 }
405
406 return 0;
407 }
408 case PPGETMODE:
409 {
410 int mode;
411
412 if (pp->flags & PP_CLAIMED) {
413 mode = pp->pdev->port->ieee1284.mode;
414 } else {
415 mode = pp->state.mode;
416 }
417 if (copy_to_user (argp, &mode, sizeof (mode))) {
418 return -EFAULT;
419 }
420 return 0;
421 }
422 case PPSETPHASE:
423 {
424 int phase;
425 if (copy_from_user (&phase, argp, sizeof (phase))) {
426 return -EFAULT;
427 }
428 /* FIXME: validate phase */
429 pp->state.phase = phase;
430
431 if (pp->flags & PP_CLAIMED) {
432 pp->pdev->port->ieee1284.phase = phase;
433 }
434
435 return 0;
436 }
437 case PPGETPHASE:
438 {
439 int phase;
440
441 if (pp->flags & PP_CLAIMED) {
442 phase = pp->pdev->port->ieee1284.phase;
443 } else {
444 phase = pp->state.phase;
445 }
446 if (copy_to_user (argp, &phase, sizeof (phase))) {
447 return -EFAULT;
448 }
449 return 0;
450 }
451 case PPGETMODES:
452 {
453 unsigned int modes;
454
455 port = parport_find_number (minor);
456 if (!port)
457 return -ENODEV;
458
459 modes = port->modes;
460 parport_put_port(port);
461 if (copy_to_user (argp, &modes, sizeof (modes))) {
462 return -EFAULT;
463 }
464 return 0;
465 }
466 case PPSETFLAGS:
467 {
468 int uflags;
469
470 if (copy_from_user (&uflags, argp, sizeof (uflags))) {
471 return -EFAULT;
472 }
473 pp->flags &= ~PP_FLAGMASK;
474 pp->flags |= (uflags & PP_FLAGMASK);
475 return 0;
476 }
477 case PPGETFLAGS:
478 {
479 int uflags;
480
481 uflags = pp->flags & PP_FLAGMASK;
482 if (copy_to_user (argp, &uflags, sizeof (uflags))) {
483 return -EFAULT;
484 }
485 return 0;
486 }
487 } /* end switch() */
488
489 /* Everything else requires the port to be claimed, so check
490 * that now. */
491 if ((pp->flags & PP_CLAIMED) == 0) {
492 pr_debug(CHRDEV "%x: claim the port first\n", minor);
493 return -EINVAL;
494 }
495
496 port = pp->pdev->port;
497 switch (cmd) {
498 struct ieee1284_info *info;
499 unsigned char reg;
500 unsigned char mask;
501 int mode;
502 int ret;
503 struct timeval par_timeout;
504 long to_jiffies;
505
506 case PPRSTATUS:
507 reg = parport_read_status (port);
508 if (copy_to_user (argp, ®, sizeof (reg)))
509 return -EFAULT;
510 return 0;
511 case PPRDATA:
512 reg = parport_read_data (port);
513 if (copy_to_user (argp, ®, sizeof (reg)))
514 return -EFAULT;
515 return 0;
516 case PPRCONTROL:
517 reg = parport_read_control (port);
518 if (copy_to_user (argp, ®, sizeof (reg)))
519 return -EFAULT;
520 return 0;
521 case PPYIELD:
522 parport_yield_blocking (pp->pdev);
523 return 0;
524
525 case PPRELEASE:
526 /* Save the state machine's state. */
527 info = &pp->pdev->port->ieee1284;
528 pp->state.mode = info->mode;
529 pp->state.phase = info->phase;
530 info->mode = pp->saved_state.mode;
531 info->phase = pp->saved_state.phase;
532 parport_release (pp->pdev);
533 pp->flags &= ~PP_CLAIMED;
534 return 0;
535
536 case PPWCONTROL:
537 if (copy_from_user (®, argp, sizeof (reg)))
538 return -EFAULT;
539 parport_write_control (port, reg);
540 return 0;
541
542 case PPWDATA:
543 if (copy_from_user (®, argp, sizeof (reg)))
544 return -EFAULT;
545 parport_write_data (port, reg);
546 return 0;
547
548 case PPFCONTROL:
549 if (copy_from_user (&mask, argp,
550 sizeof (mask)))
551 return -EFAULT;
552 if (copy_from_user (®, 1 + (unsigned char __user *) arg,
553 sizeof (reg)))
554 return -EFAULT;
555 parport_frob_control (port, mask, reg);
556 return 0;
557
558 case PPDATADIR:
559 if (copy_from_user (&mode, argp, sizeof (mode)))
560 return -EFAULT;
561 if (mode)
562 port->ops->data_reverse (port);
563 else
564 port->ops->data_forward (port);
565 return 0;
566
567 case PPNEGOT:
568 if (copy_from_user (&mode, argp, sizeof (mode)))
569 return -EFAULT;
570 switch ((ret = parport_negotiate (port, mode))) {
571 case 0: break;
572 case -1: /* handshake failed, peripheral not IEEE 1284 */
573 ret = -EIO;
574 break;
575 case 1: /* handshake succeeded, peripheral rejected mode */
576 ret = -ENXIO;
577 break;
578 }
579 pp_enable_irq (pp);
580 return ret;
581
582 case PPWCTLONIRQ:
583 if (copy_from_user (®, argp, sizeof (reg)))
584 return -EFAULT;
585
586 /* Remember what to set the control lines to, for next
587 * time we get an interrupt. */
588 pp->irqctl = reg;
589 pp->irqresponse = 1;
590 return 0;
591
592 case PPCLRIRQ:
593 ret = atomic_read (&pp->irqc);
594 if (copy_to_user (argp, &ret, sizeof (ret)))
595 return -EFAULT;
596 atomic_sub (ret, &pp->irqc);
597 return 0;
598
599 case PPSETTIME:
600 if (copy_from_user (&par_timeout, argp, sizeof(struct timeval))) {
601 return -EFAULT;
602 }
603 /* Convert to jiffies, place in pp->pdev->timeout */
604 if ((par_timeout.tv_sec < 0) || (par_timeout.tv_usec < 0)) {
605 return -EINVAL;
606 }
607 to_jiffies = ROUND_UP(par_timeout.tv_usec, 1000000/HZ);
608 to_jiffies += par_timeout.tv_sec * (long)HZ;
609 if (to_jiffies <= 0) {
610 return -EINVAL;
611 }
612 pp->pdev->timeout = to_jiffies;
613 return 0;
614
615 case PPGETTIME:
616 to_jiffies = pp->pdev->timeout;
617 memset(&par_timeout, 0, sizeof(par_timeout));
618 par_timeout.tv_sec = to_jiffies / HZ;
619 par_timeout.tv_usec = (to_jiffies % (long)HZ) * (1000000/HZ);
620 if (copy_to_user (argp, &par_timeout, sizeof(struct timeval)))
621 return -EFAULT;
622 return 0;
623
624 default:
625 pr_debug(CHRDEV "%x: What? (cmd=0x%x)\n", minor, cmd);
626 return -EINVAL;
627 }
628
629 /* Keep the compiler happy */
630 return 0;
631}
632
633static long pp_ioctl(struct file *file, unsigned int cmd, unsigned long arg)
634{
635 long ret;
636 mutex_lock(&pp_do_mutex);
637 ret = pp_do_ioctl(file, cmd, arg);
638 mutex_unlock(&pp_do_mutex);
639 return ret;
640}
641
642static int pp_open (struct inode * inode, struct file * file)
643{
644 unsigned int minor = iminor(inode);
645 struct pp_struct *pp;
646
647 if (minor >= PARPORT_MAX)
648 return -ENXIO;
649
650 pp = kmalloc (sizeof (struct pp_struct), GFP_KERNEL);
651 if (!pp)
652 return -ENOMEM;
653
654 pp->state.mode = IEEE1284_MODE_COMPAT;
655 pp->state.phase = init_phase (pp->state.mode);
656 pp->flags = 0;
657 pp->irqresponse = 0;
658 atomic_set (&pp->irqc, 0);
659 init_waitqueue_head (&pp->irq_wait);
660
661 /* Defer the actual device registration until the first claim.
662 * That way, we know whether or not the driver wants to have
663 * exclusive access to the port (PPEXCL).
664 */
665 pp->pdev = NULL;
666 file->private_data = pp;
667
668 return 0;
669}
670
671static int pp_release (struct inode * inode, struct file * file)
672{
673 unsigned int minor = iminor(inode);
674 struct pp_struct *pp = file->private_data;
675 int compat_negot;
676
677 compat_negot = 0;
678 if (!(pp->flags & PP_CLAIMED) && pp->pdev &&
679 (pp->state.mode != IEEE1284_MODE_COMPAT)) {
680 struct ieee1284_info *info;
681
682 /* parport released, but not in compatibility mode */
683 parport_claim_or_block (pp->pdev);
684 pp->flags |= PP_CLAIMED;
685 info = &pp->pdev->port->ieee1284;
686 pp->saved_state.mode = info->mode;
687 pp->saved_state.phase = info->phase;
688 info->mode = pp->state.mode;
689 info->phase = pp->state.phase;
690 compat_negot = 1;
691 } else if ((pp->flags & PP_CLAIMED) && pp->pdev &&
692 (pp->pdev->port->ieee1284.mode != IEEE1284_MODE_COMPAT)) {
693 compat_negot = 2;
694 }
695 if (compat_negot) {
696 parport_negotiate (pp->pdev->port, IEEE1284_MODE_COMPAT);
697 pr_debug(CHRDEV "%x: negotiated back to compatibility "
698 "mode because user-space forgot\n", minor);
699 }
700
701 if (pp->flags & PP_CLAIMED) {
702 struct ieee1284_info *info;
703
704 info = &pp->pdev->port->ieee1284;
705 pp->state.mode = info->mode;
706 pp->state.phase = info->phase;
707 info->mode = pp->saved_state.mode;
708 info->phase = pp->saved_state.phase;
709 parport_release (pp->pdev);
710 if (compat_negot != 1) {
711 pr_debug(CHRDEV "%x: released pardevice "
712 "because user-space forgot\n", minor);
713 }
714 }
715
716 if (pp->pdev) {
717 const char *name = pp->pdev->name;
718 parport_unregister_device (pp->pdev);
719 kfree (name);
720 pp->pdev = NULL;
721 pr_debug(CHRDEV "%x: unregistered pardevice\n", minor);
722 }
723
724 kfree (pp);
725
726 return 0;
727}
728
729/* No kernel lock held - fine */
730static unsigned int pp_poll (struct file * file, poll_table * wait)
731{
732 struct pp_struct *pp = file->private_data;
733 unsigned int mask = 0;
734
735 poll_wait (file, &pp->irq_wait, wait);
736 if (atomic_read (&pp->irqc))
737 mask |= POLLIN | POLLRDNORM;
738
739 return mask;
740}
741
742static struct class *ppdev_class;
743
744static const struct file_operations pp_fops = {
745 .owner = THIS_MODULE,
746 .llseek = no_llseek,
747 .read = pp_read,
748 .write = pp_write,
749 .poll = pp_poll,
750 .unlocked_ioctl = pp_ioctl,
751 .open = pp_open,
752 .release = pp_release,
753};
754
755static void pp_attach(struct parport *port)
756{
757 device_create(ppdev_class, port->dev, MKDEV(PP_MAJOR, port->number),
758 NULL, "parport%d", port->number);
759}
760
761static void pp_detach(struct parport *port)
762{
763 device_destroy(ppdev_class, MKDEV(PP_MAJOR, port->number));
764}
765
766static struct parport_driver pp_driver = {
767 .name = CHRDEV,
768 .attach = pp_attach,
769 .detach = pp_detach,
770};
771
772static int __init ppdev_init (void)
773{
774 int err = 0;
775
776 if (register_chrdev (PP_MAJOR, CHRDEV, &pp_fops)) {
777 printk (KERN_WARNING CHRDEV ": unable to get major %d\n",
778 PP_MAJOR);
779 return -EIO;
780 }
781 ppdev_class = class_create(THIS_MODULE, CHRDEV);
782 if (IS_ERR(ppdev_class)) {
783 err = PTR_ERR(ppdev_class);
784 goto out_chrdev;
785 }
786 if (parport_register_driver(&pp_driver)) {
787 printk (KERN_WARNING CHRDEV ": unable to register with parport\n");
788 goto out_class;
789 }
790
791 printk (KERN_INFO PP_VERSION "\n");
792 goto out;
793
794out_class:
795 class_destroy(ppdev_class);
796out_chrdev:
797 unregister_chrdev(PP_MAJOR, CHRDEV);
798out:
799 return err;
800}
801
802static void __exit ppdev_cleanup (void)
803{
804 /* Clean up all parport stuff */
805 parport_unregister_driver(&pp_driver);
806 class_destroy(ppdev_class);
807 unregister_chrdev (PP_MAJOR, CHRDEV);
808}
809
810module_init(ppdev_init);
811module_exit(ppdev_cleanup);
812
813MODULE_LICENSE("GPL");
814MODULE_ALIAS_CHARDEV_MAJOR(PP_MAJOR);
1// SPDX-License-Identifier: GPL-2.0-or-later
2/*
3 * linux/drivers/char/ppdev.c
4 *
5 * This is the code behind /dev/parport* -- it allows a user-space
6 * application to use the parport subsystem.
7 *
8 * Copyright (C) 1998-2000, 2002 Tim Waugh <tim@cyberelk.net>
9 *
10 * A /dev/parportx device node represents an arbitrary device
11 * on port 'x'. The following operations are possible:
12 *
13 * open do nothing, set up default IEEE 1284 protocol to be COMPAT
14 * close release port and unregister device (if necessary)
15 * ioctl
16 * EXCL register device exclusively (may fail)
17 * CLAIM (register device first time) parport_claim_or_block
18 * RELEASE parport_release
19 * SETMODE set the IEEE 1284 protocol to use for read/write
20 * SETPHASE set the IEEE 1284 phase of a particular mode. Not to be
21 * confused with ioctl(fd, SETPHASER, &stun). ;-)
22 * DATADIR data_forward / data_reverse
23 * WDATA write_data
24 * RDATA read_data
25 * WCONTROL write_control
26 * RCONTROL read_control
27 * FCONTROL frob_control
28 * RSTATUS read_status
29 * NEGOT parport_negotiate
30 * YIELD parport_yield_blocking
31 * WCTLONIRQ on interrupt, set control lines
32 * CLRIRQ clear (and return) interrupt count
33 * SETTIME sets device timeout (struct timeval)
34 * GETTIME gets device timeout (struct timeval)
35 * GETMODES gets hardware supported modes (unsigned int)
36 * GETMODE gets the current IEEE1284 mode
37 * GETPHASE gets the current IEEE1284 phase
38 * GETFLAGS gets current (user-visible) flags
39 * SETFLAGS sets current (user-visible) flags
40 * read/write read or write in current IEEE 1284 protocol
41 * select wait for interrupt (in readfds)
42 *
43 * Changes:
44 * Added SETTIME/GETTIME ioctl, Fred Barnes, 1999.
45 *
46 * Arnaldo Carvalho de Melo <acme@conectiva.com.br> 2000/08/25
47 * - On error, copy_from_user and copy_to_user do not return -EFAULT,
48 * They return the positive number of bytes *not* copied due to address
49 * space errors.
50 *
51 * Added GETMODES/GETMODE/GETPHASE ioctls, Fred Barnes <frmb2@ukc.ac.uk>, 03/01/2001.
52 * Added GETFLAGS/SETFLAGS ioctls, Fred Barnes, 04/2001
53 */
54
55#include <linux/module.h>
56#include <linux/init.h>
57#include <linux/sched/signal.h>
58#include <linux/device.h>
59#include <linux/ioctl.h>
60#include <linux/parport.h>
61#include <linux/ctype.h>
62#include <linux/poll.h>
63#include <linux/slab.h>
64#include <linux/major.h>
65#include <linux/ppdev.h>
66#include <linux/mutex.h>
67#include <linux/uaccess.h>
68#include <linux/compat.h>
69
70#define PP_VERSION "ppdev: user-space parallel port driver"
71#define CHRDEV "ppdev"
72
73struct pp_struct {
74 struct pardevice *pdev;
75 wait_queue_head_t irq_wait;
76 atomic_t irqc;
77 unsigned int flags;
78 int irqresponse;
79 unsigned char irqctl;
80 struct ieee1284_info state;
81 struct ieee1284_info saved_state;
82 long default_inactivity;
83 int index;
84};
85
86/* should we use PARDEVICE_MAX here? */
87static struct device *devices[PARPORT_MAX];
88
89static DEFINE_IDA(ida_index);
90
91/* pp_struct.flags bitfields */
92#define PP_CLAIMED (1<<0)
93#define PP_EXCL (1<<1)
94
95/* Other constants */
96#define PP_INTERRUPT_TIMEOUT (10 * HZ) /* 10s */
97#define PP_BUFFER_SIZE 1024
98#define PARDEVICE_MAX 8
99
100static DEFINE_MUTEX(pp_do_mutex);
101
102/* define fixed sized ioctl cmd for y2038 migration */
103#define PPGETTIME32 _IOR(PP_IOCTL, 0x95, s32[2])
104#define PPSETTIME32 _IOW(PP_IOCTL, 0x96, s32[2])
105#define PPGETTIME64 _IOR(PP_IOCTL, 0x95, s64[2])
106#define PPSETTIME64 _IOW(PP_IOCTL, 0x96, s64[2])
107
108static inline void pp_enable_irq(struct pp_struct *pp)
109{
110 struct parport *port = pp->pdev->port;
111
112 port->ops->enable_irq(port);
113}
114
115static ssize_t pp_read(struct file *file, char __user *buf, size_t count,
116 loff_t *ppos)
117{
118 unsigned int minor = iminor(file_inode(file));
119 struct pp_struct *pp = file->private_data;
120 char *kbuffer;
121 ssize_t bytes_read = 0;
122 struct parport *pport;
123 int mode;
124
125 if (!(pp->flags & PP_CLAIMED)) {
126 /* Don't have the port claimed */
127 pr_debug(CHRDEV "%x: claim the port first\n", minor);
128 return -EINVAL;
129 }
130
131 /* Trivial case. */
132 if (count == 0)
133 return 0;
134
135 kbuffer = kmalloc(min_t(size_t, count, PP_BUFFER_SIZE), GFP_KERNEL);
136 if (!kbuffer)
137 return -ENOMEM;
138 pport = pp->pdev->port;
139 mode = pport->ieee1284.mode & ~(IEEE1284_DEVICEID | IEEE1284_ADDR);
140
141 parport_set_timeout(pp->pdev,
142 (file->f_flags & O_NONBLOCK) ?
143 PARPORT_INACTIVITY_O_NONBLOCK :
144 pp->default_inactivity);
145
146 while (bytes_read == 0) {
147 ssize_t need = min_t(unsigned long, count, PP_BUFFER_SIZE);
148
149 if (mode == IEEE1284_MODE_EPP) {
150 /* various specials for EPP mode */
151 int flags = 0;
152 size_t (*fn)(struct parport *, void *, size_t, int);
153
154 if (pp->flags & PP_W91284PIC)
155 flags |= PARPORT_W91284PIC;
156 if (pp->flags & PP_FASTREAD)
157 flags |= PARPORT_EPP_FAST;
158 if (pport->ieee1284.mode & IEEE1284_ADDR)
159 fn = pport->ops->epp_read_addr;
160 else
161 fn = pport->ops->epp_read_data;
162 bytes_read = (*fn)(pport, kbuffer, need, flags);
163 } else {
164 bytes_read = parport_read(pport, kbuffer, need);
165 }
166
167 if (bytes_read != 0)
168 break;
169
170 if (file->f_flags & O_NONBLOCK) {
171 bytes_read = -EAGAIN;
172 break;
173 }
174
175 if (signal_pending(current)) {
176 bytes_read = -ERESTARTSYS;
177 break;
178 }
179
180 cond_resched();
181 }
182
183 parport_set_timeout(pp->pdev, pp->default_inactivity);
184
185 if (bytes_read > 0 && copy_to_user(buf, kbuffer, bytes_read))
186 bytes_read = -EFAULT;
187
188 kfree(kbuffer);
189 pp_enable_irq(pp);
190 return bytes_read;
191}
192
193static ssize_t pp_write(struct file *file, const char __user *buf,
194 size_t count, loff_t *ppos)
195{
196 unsigned int minor = iminor(file_inode(file));
197 struct pp_struct *pp = file->private_data;
198 char *kbuffer;
199 ssize_t bytes_written = 0;
200 ssize_t wrote;
201 int mode;
202 struct parport *pport;
203
204 if (!(pp->flags & PP_CLAIMED)) {
205 /* Don't have the port claimed */
206 pr_debug(CHRDEV "%x: claim the port first\n", minor);
207 return -EINVAL;
208 }
209
210 kbuffer = kmalloc(min_t(size_t, count, PP_BUFFER_SIZE), GFP_KERNEL);
211 if (!kbuffer)
212 return -ENOMEM;
213
214 pport = pp->pdev->port;
215 mode = pport->ieee1284.mode & ~(IEEE1284_DEVICEID | IEEE1284_ADDR);
216
217 parport_set_timeout(pp->pdev,
218 (file->f_flags & O_NONBLOCK) ?
219 PARPORT_INACTIVITY_O_NONBLOCK :
220 pp->default_inactivity);
221
222 while (bytes_written < count) {
223 ssize_t n = min_t(unsigned long, count - bytes_written, PP_BUFFER_SIZE);
224
225 if (copy_from_user(kbuffer, buf + bytes_written, n)) {
226 bytes_written = -EFAULT;
227 break;
228 }
229
230 if ((pp->flags & PP_FASTWRITE) && (mode == IEEE1284_MODE_EPP)) {
231 /* do a fast EPP write */
232 if (pport->ieee1284.mode & IEEE1284_ADDR) {
233 wrote = pport->ops->epp_write_addr(pport,
234 kbuffer, n, PARPORT_EPP_FAST);
235 } else {
236 wrote = pport->ops->epp_write_data(pport,
237 kbuffer, n, PARPORT_EPP_FAST);
238 }
239 } else {
240 wrote = parport_write(pp->pdev->port, kbuffer, n);
241 }
242
243 if (wrote <= 0) {
244 if (!bytes_written)
245 bytes_written = wrote;
246 break;
247 }
248
249 bytes_written += wrote;
250
251 if (file->f_flags & O_NONBLOCK) {
252 if (!bytes_written)
253 bytes_written = -EAGAIN;
254 break;
255 }
256
257 if (signal_pending(current))
258 break;
259
260 cond_resched();
261 }
262
263 parport_set_timeout(pp->pdev, pp->default_inactivity);
264
265 kfree(kbuffer);
266 pp_enable_irq(pp);
267 return bytes_written;
268}
269
270static void pp_irq(void *private)
271{
272 struct pp_struct *pp = private;
273
274 if (pp->irqresponse) {
275 parport_write_control(pp->pdev->port, pp->irqctl);
276 pp->irqresponse = 0;
277 }
278
279 atomic_inc(&pp->irqc);
280 wake_up_interruptible(&pp->irq_wait);
281}
282
283static int register_device(int minor, struct pp_struct *pp)
284{
285 struct parport *port;
286 struct pardevice *pdev = NULL;
287 char *name;
288 struct pardev_cb ppdev_cb;
289 int rc = 0, index;
290
291 name = kasprintf(GFP_KERNEL, CHRDEV "%x", minor);
292 if (name == NULL)
293 return -ENOMEM;
294
295 port = parport_find_number(minor);
296 if (!port) {
297 pr_warn("%s: no associated port!\n", name);
298 rc = -ENXIO;
299 goto err;
300 }
301
302 index = ida_simple_get(&ida_index, 0, 0, GFP_KERNEL);
303 memset(&ppdev_cb, 0, sizeof(ppdev_cb));
304 ppdev_cb.irq_func = pp_irq;
305 ppdev_cb.flags = (pp->flags & PP_EXCL) ? PARPORT_FLAG_EXCL : 0;
306 ppdev_cb.private = pp;
307 pdev = parport_register_dev_model(port, name, &ppdev_cb, index);
308 parport_put_port(port);
309
310 if (!pdev) {
311 pr_warn("%s: failed to register device!\n", name);
312 rc = -ENXIO;
313 ida_simple_remove(&ida_index, index);
314 goto err;
315 }
316
317 pp->pdev = pdev;
318 pp->index = index;
319 dev_dbg(&pdev->dev, "registered pardevice\n");
320err:
321 kfree(name);
322 return rc;
323}
324
325static enum ieee1284_phase init_phase(int mode)
326{
327 switch (mode & ~(IEEE1284_DEVICEID
328 | IEEE1284_ADDR)) {
329 case IEEE1284_MODE_NIBBLE:
330 case IEEE1284_MODE_BYTE:
331 return IEEE1284_PH_REV_IDLE;
332 }
333 return IEEE1284_PH_FWD_IDLE;
334}
335
336static int pp_set_timeout(struct pardevice *pdev, long tv_sec, int tv_usec)
337{
338 long to_jiffies;
339
340 if ((tv_sec < 0) || (tv_usec < 0))
341 return -EINVAL;
342
343 to_jiffies = usecs_to_jiffies(tv_usec);
344 to_jiffies += tv_sec * HZ;
345 if (to_jiffies <= 0)
346 return -EINVAL;
347
348 pdev->timeout = to_jiffies;
349 return 0;
350}
351
352static int pp_do_ioctl(struct file *file, unsigned int cmd, unsigned long arg)
353{
354 unsigned int minor = iminor(file_inode(file));
355 struct pp_struct *pp = file->private_data;
356 struct parport *port;
357 void __user *argp = (void __user *)arg;
358
359 /* First handle the cases that don't take arguments. */
360 switch (cmd) {
361 case PPCLAIM:
362 {
363 struct ieee1284_info *info;
364 int ret;
365
366 if (pp->flags & PP_CLAIMED) {
367 dev_dbg(&pp->pdev->dev, "you've already got it!\n");
368 return -EINVAL;
369 }
370
371 /* Deferred device registration. */
372 if (!pp->pdev) {
373 int err = register_device(minor, pp);
374
375 if (err)
376 return err;
377 }
378
379 ret = parport_claim_or_block(pp->pdev);
380 if (ret < 0)
381 return ret;
382
383 pp->flags |= PP_CLAIMED;
384
385 /* For interrupt-reporting to work, we need to be
386 * informed of each interrupt. */
387 pp_enable_irq(pp);
388
389 /* We may need to fix up the state machine. */
390 info = &pp->pdev->port->ieee1284;
391 pp->saved_state.mode = info->mode;
392 pp->saved_state.phase = info->phase;
393 info->mode = pp->state.mode;
394 info->phase = pp->state.phase;
395 pp->default_inactivity = parport_set_timeout(pp->pdev, 0);
396 parport_set_timeout(pp->pdev, pp->default_inactivity);
397
398 return 0;
399 }
400 case PPEXCL:
401 if (pp->pdev) {
402 dev_dbg(&pp->pdev->dev,
403 "too late for PPEXCL; already registered\n");
404 if (pp->flags & PP_EXCL)
405 /* But it's not really an error. */
406 return 0;
407 /* There's no chance of making the driver happy. */
408 return -EINVAL;
409 }
410
411 /* Just remember to register the device exclusively
412 * when we finally do the registration. */
413 pp->flags |= PP_EXCL;
414 return 0;
415 case PPSETMODE:
416 {
417 int mode;
418
419 if (copy_from_user(&mode, argp, sizeof(mode)))
420 return -EFAULT;
421 /* FIXME: validate mode */
422 pp->state.mode = mode;
423 pp->state.phase = init_phase(mode);
424
425 if (pp->flags & PP_CLAIMED) {
426 pp->pdev->port->ieee1284.mode = mode;
427 pp->pdev->port->ieee1284.phase = pp->state.phase;
428 }
429
430 return 0;
431 }
432 case PPGETMODE:
433 {
434 int mode;
435
436 if (pp->flags & PP_CLAIMED)
437 mode = pp->pdev->port->ieee1284.mode;
438 else
439 mode = pp->state.mode;
440
441 if (copy_to_user(argp, &mode, sizeof(mode)))
442 return -EFAULT;
443 return 0;
444 }
445 case PPSETPHASE:
446 {
447 int phase;
448
449 if (copy_from_user(&phase, argp, sizeof(phase)))
450 return -EFAULT;
451
452 /* FIXME: validate phase */
453 pp->state.phase = phase;
454
455 if (pp->flags & PP_CLAIMED)
456 pp->pdev->port->ieee1284.phase = phase;
457
458 return 0;
459 }
460 case PPGETPHASE:
461 {
462 int phase;
463
464 if (pp->flags & PP_CLAIMED)
465 phase = pp->pdev->port->ieee1284.phase;
466 else
467 phase = pp->state.phase;
468 if (copy_to_user(argp, &phase, sizeof(phase)))
469 return -EFAULT;
470 return 0;
471 }
472 case PPGETMODES:
473 {
474 unsigned int modes;
475
476 port = parport_find_number(minor);
477 if (!port)
478 return -ENODEV;
479
480 modes = port->modes;
481 parport_put_port(port);
482 if (copy_to_user(argp, &modes, sizeof(modes)))
483 return -EFAULT;
484 return 0;
485 }
486 case PPSETFLAGS:
487 {
488 int uflags;
489
490 if (copy_from_user(&uflags, argp, sizeof(uflags)))
491 return -EFAULT;
492 pp->flags &= ~PP_FLAGMASK;
493 pp->flags |= (uflags & PP_FLAGMASK);
494 return 0;
495 }
496 case PPGETFLAGS:
497 {
498 int uflags;
499
500 uflags = pp->flags & PP_FLAGMASK;
501 if (copy_to_user(argp, &uflags, sizeof(uflags)))
502 return -EFAULT;
503 return 0;
504 }
505 } /* end switch() */
506
507 /* Everything else requires the port to be claimed, so check
508 * that now. */
509 if ((pp->flags & PP_CLAIMED) == 0) {
510 pr_debug(CHRDEV "%x: claim the port first\n", minor);
511 return -EINVAL;
512 }
513
514 port = pp->pdev->port;
515 switch (cmd) {
516 struct ieee1284_info *info;
517 unsigned char reg;
518 unsigned char mask;
519 int mode;
520 s32 time32[2];
521 s64 time64[2];
522 struct timespec64 ts;
523 int ret;
524
525 case PPRSTATUS:
526 reg = parport_read_status(port);
527 if (copy_to_user(argp, ®, sizeof(reg)))
528 return -EFAULT;
529 return 0;
530 case PPRDATA:
531 reg = parport_read_data(port);
532 if (copy_to_user(argp, ®, sizeof(reg)))
533 return -EFAULT;
534 return 0;
535 case PPRCONTROL:
536 reg = parport_read_control(port);
537 if (copy_to_user(argp, ®, sizeof(reg)))
538 return -EFAULT;
539 return 0;
540 case PPYIELD:
541 parport_yield_blocking(pp->pdev);
542 return 0;
543
544 case PPRELEASE:
545 /* Save the state machine's state. */
546 info = &pp->pdev->port->ieee1284;
547 pp->state.mode = info->mode;
548 pp->state.phase = info->phase;
549 info->mode = pp->saved_state.mode;
550 info->phase = pp->saved_state.phase;
551 parport_release(pp->pdev);
552 pp->flags &= ~PP_CLAIMED;
553 return 0;
554
555 case PPWCONTROL:
556 if (copy_from_user(®, argp, sizeof(reg)))
557 return -EFAULT;
558 parport_write_control(port, reg);
559 return 0;
560
561 case PPWDATA:
562 if (copy_from_user(®, argp, sizeof(reg)))
563 return -EFAULT;
564 parport_write_data(port, reg);
565 return 0;
566
567 case PPFCONTROL:
568 if (copy_from_user(&mask, argp,
569 sizeof(mask)))
570 return -EFAULT;
571 if (copy_from_user(®, 1 + (unsigned char __user *) arg,
572 sizeof(reg)))
573 return -EFAULT;
574 parport_frob_control(port, mask, reg);
575 return 0;
576
577 case PPDATADIR:
578 if (copy_from_user(&mode, argp, sizeof(mode)))
579 return -EFAULT;
580 if (mode)
581 port->ops->data_reverse(port);
582 else
583 port->ops->data_forward(port);
584 return 0;
585
586 case PPNEGOT:
587 if (copy_from_user(&mode, argp, sizeof(mode)))
588 return -EFAULT;
589 switch ((ret = parport_negotiate(port, mode))) {
590 case 0: break;
591 case -1: /* handshake failed, peripheral not IEEE 1284 */
592 ret = -EIO;
593 break;
594 case 1: /* handshake succeeded, peripheral rejected mode */
595 ret = -ENXIO;
596 break;
597 }
598 pp_enable_irq(pp);
599 return ret;
600
601 case PPWCTLONIRQ:
602 if (copy_from_user(®, argp, sizeof(reg)))
603 return -EFAULT;
604
605 /* Remember what to set the control lines to, for next
606 * time we get an interrupt. */
607 pp->irqctl = reg;
608 pp->irqresponse = 1;
609 return 0;
610
611 case PPCLRIRQ:
612 ret = atomic_read(&pp->irqc);
613 if (copy_to_user(argp, &ret, sizeof(ret)))
614 return -EFAULT;
615 atomic_sub(ret, &pp->irqc);
616 return 0;
617
618 case PPSETTIME32:
619 if (copy_from_user(time32, argp, sizeof(time32)))
620 return -EFAULT;
621
622 return pp_set_timeout(pp->pdev, time32[0], time32[1]);
623
624 case PPSETTIME64:
625 if (copy_from_user(time64, argp, sizeof(time64)))
626 return -EFAULT;
627
628 return pp_set_timeout(pp->pdev, time64[0], time64[1]);
629
630 case PPGETTIME32:
631 jiffies_to_timespec64(pp->pdev->timeout, &ts);
632 time32[0] = ts.tv_sec;
633 time32[1] = ts.tv_nsec / NSEC_PER_USEC;
634 if ((time32[0] < 0) || (time32[1] < 0))
635 return -EINVAL;
636
637 if (copy_to_user(argp, time32, sizeof(time32)))
638 return -EFAULT;
639
640 return 0;
641
642 case PPGETTIME64:
643 jiffies_to_timespec64(pp->pdev->timeout, &ts);
644 time64[0] = ts.tv_sec;
645 time64[1] = ts.tv_nsec / NSEC_PER_USEC;
646 if ((time64[0] < 0) || (time64[1] < 0))
647 return -EINVAL;
648
649 if (copy_to_user(argp, time64, sizeof(time64)))
650 return -EFAULT;
651
652 return 0;
653
654 default:
655 dev_dbg(&pp->pdev->dev, "What? (cmd=0x%x)\n", cmd);
656 return -EINVAL;
657 }
658
659 /* Keep the compiler happy */
660 return 0;
661}
662
663static long pp_ioctl(struct file *file, unsigned int cmd, unsigned long arg)
664{
665 long ret;
666
667 mutex_lock(&pp_do_mutex);
668 ret = pp_do_ioctl(file, cmd, arg);
669 mutex_unlock(&pp_do_mutex);
670 return ret;
671}
672
673#ifdef CONFIG_COMPAT
674static long pp_compat_ioctl(struct file *file, unsigned int cmd,
675 unsigned long arg)
676{
677 return pp_ioctl(file, cmd, (unsigned long)compat_ptr(arg));
678}
679#endif
680
681static int pp_open(struct inode *inode, struct file *file)
682{
683 unsigned int minor = iminor(inode);
684 struct pp_struct *pp;
685
686 if (minor >= PARPORT_MAX)
687 return -ENXIO;
688
689 pp = kmalloc(sizeof(struct pp_struct), GFP_KERNEL);
690 if (!pp)
691 return -ENOMEM;
692
693 pp->state.mode = IEEE1284_MODE_COMPAT;
694 pp->state.phase = init_phase(pp->state.mode);
695 pp->flags = 0;
696 pp->irqresponse = 0;
697 atomic_set(&pp->irqc, 0);
698 init_waitqueue_head(&pp->irq_wait);
699
700 /* Defer the actual device registration until the first claim.
701 * That way, we know whether or not the driver wants to have
702 * exclusive access to the port (PPEXCL).
703 */
704 pp->pdev = NULL;
705 file->private_data = pp;
706
707 return 0;
708}
709
710static int pp_release(struct inode *inode, struct file *file)
711{
712 unsigned int minor = iminor(inode);
713 struct pp_struct *pp = file->private_data;
714 int compat_negot;
715
716 compat_negot = 0;
717 if (!(pp->flags & PP_CLAIMED) && pp->pdev &&
718 (pp->state.mode != IEEE1284_MODE_COMPAT)) {
719 struct ieee1284_info *info;
720
721 /* parport released, but not in compatibility mode */
722 parport_claim_or_block(pp->pdev);
723 pp->flags |= PP_CLAIMED;
724 info = &pp->pdev->port->ieee1284;
725 pp->saved_state.mode = info->mode;
726 pp->saved_state.phase = info->phase;
727 info->mode = pp->state.mode;
728 info->phase = pp->state.phase;
729 compat_negot = 1;
730 } else if ((pp->flags & PP_CLAIMED) && pp->pdev &&
731 (pp->pdev->port->ieee1284.mode != IEEE1284_MODE_COMPAT)) {
732 compat_negot = 2;
733 }
734 if (compat_negot) {
735 parport_negotiate(pp->pdev->port, IEEE1284_MODE_COMPAT);
736 dev_dbg(&pp->pdev->dev,
737 "negotiated back to compatibility mode because user-space forgot\n");
738 }
739
740 if ((pp->flags & PP_CLAIMED) && pp->pdev) {
741 struct ieee1284_info *info;
742
743 info = &pp->pdev->port->ieee1284;
744 pp->state.mode = info->mode;
745 pp->state.phase = info->phase;
746 info->mode = pp->saved_state.mode;
747 info->phase = pp->saved_state.phase;
748 parport_release(pp->pdev);
749 if (compat_negot != 1) {
750 pr_debug(CHRDEV "%x: released pardevice "
751 "because user-space forgot\n", minor);
752 }
753 }
754
755 if (pp->pdev) {
756 parport_unregister_device(pp->pdev);
757 ida_simple_remove(&ida_index, pp->index);
758 pp->pdev = NULL;
759 pr_debug(CHRDEV "%x: unregistered pardevice\n", minor);
760 }
761
762 kfree(pp);
763
764 return 0;
765}
766
767/* No kernel lock held - fine */
768static __poll_t pp_poll(struct file *file, poll_table *wait)
769{
770 struct pp_struct *pp = file->private_data;
771 __poll_t mask = 0;
772
773 poll_wait(file, &pp->irq_wait, wait);
774 if (atomic_read(&pp->irqc))
775 mask |= EPOLLIN | EPOLLRDNORM;
776
777 return mask;
778}
779
780static struct class *ppdev_class;
781
782static const struct file_operations pp_fops = {
783 .owner = THIS_MODULE,
784 .llseek = no_llseek,
785 .read = pp_read,
786 .write = pp_write,
787 .poll = pp_poll,
788 .unlocked_ioctl = pp_ioctl,
789#ifdef CONFIG_COMPAT
790 .compat_ioctl = pp_compat_ioctl,
791#endif
792 .open = pp_open,
793 .release = pp_release,
794};
795
796static void pp_attach(struct parport *port)
797{
798 struct device *ret;
799
800 if (devices[port->number])
801 return;
802
803 ret = device_create(ppdev_class, port->dev,
804 MKDEV(PP_MAJOR, port->number), NULL,
805 "parport%d", port->number);
806 if (IS_ERR(ret)) {
807 pr_err("Failed to create device parport%d\n",
808 port->number);
809 return;
810 }
811 devices[port->number] = ret;
812}
813
814static void pp_detach(struct parport *port)
815{
816 if (!devices[port->number])
817 return;
818
819 device_destroy(ppdev_class, MKDEV(PP_MAJOR, port->number));
820 devices[port->number] = NULL;
821}
822
823static int pp_probe(struct pardevice *par_dev)
824{
825 struct device_driver *drv = par_dev->dev.driver;
826 int len = strlen(drv->name);
827
828 if (strncmp(par_dev->name, drv->name, len))
829 return -ENODEV;
830
831 return 0;
832}
833
834static struct parport_driver pp_driver = {
835 .name = CHRDEV,
836 .probe = pp_probe,
837 .match_port = pp_attach,
838 .detach = pp_detach,
839 .devmodel = true,
840};
841
842static int __init ppdev_init(void)
843{
844 int err = 0;
845
846 if (register_chrdev(PP_MAJOR, CHRDEV, &pp_fops)) {
847 pr_warn(CHRDEV ": unable to get major %d\n", PP_MAJOR);
848 return -EIO;
849 }
850 ppdev_class = class_create(THIS_MODULE, CHRDEV);
851 if (IS_ERR(ppdev_class)) {
852 err = PTR_ERR(ppdev_class);
853 goto out_chrdev;
854 }
855 err = parport_register_driver(&pp_driver);
856 if (err < 0) {
857 pr_warn(CHRDEV ": unable to register with parport\n");
858 goto out_class;
859 }
860
861 pr_info(PP_VERSION "\n");
862 goto out;
863
864out_class:
865 class_destroy(ppdev_class);
866out_chrdev:
867 unregister_chrdev(PP_MAJOR, CHRDEV);
868out:
869 return err;
870}
871
872static void __exit ppdev_cleanup(void)
873{
874 /* Clean up all parport stuff */
875 parport_unregister_driver(&pp_driver);
876 class_destroy(ppdev_class);
877 unregister_chrdev(PP_MAJOR, CHRDEV);
878}
879
880module_init(ppdev_init);
881module_exit(ppdev_cleanup);
882
883MODULE_LICENSE("GPL");
884MODULE_ALIAS_CHARDEV_MAJOR(PP_MAJOR);