Linux Audio

Check our new training course

Loading...
v3.1
  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, &reg, sizeof (reg)))
509			return -EFAULT;
510		return 0;
511	case PPRDATA:
512		reg = parport_read_data (port);
513		if (copy_to_user (argp, &reg, sizeof (reg)))
514			return -EFAULT;
515		return 0;
516	case PPRCONTROL:
517		reg = parport_read_control (port);
518		if (copy_to_user (argp, &reg, 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 (&reg, argp, sizeof (reg)))
538			return -EFAULT;
539		parport_write_control (port, reg);
540		return 0;
541
542	case PPWDATA:
543		if (copy_from_user (&reg, 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 (&reg, 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 (&reg, 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);
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);