Linux Audio

Check our new training course

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