xref: /openbmc/linux/drivers/mmc/core/sdio_uart.c (revision 981ab3f1)
1 /*
2  * SDIO UART/GPS driver
3  *
4  * Based on drivers/serial/8250.c and drivers/serial/serial_core.c
5  * by Russell King.
6  *
7  * Author:	Nicolas Pitre
8  * Created:	June 15, 2007
9  * Copyright:	MontaVista Software, Inc.
10  *
11  * This program is free software; you can redistribute it and/or modify
12  * it under the terms of the GNU General Public License as published by
13  * the Free Software Foundation; either version 2 of the License, or (at
14  * your option) any later version.
15  */
16 
17 /*
18  * Note: Although this driver assumes a 16550A-like UART implementation,
19  * it is not possible to leverage the common 8250/16550 driver, nor the
20  * core UART infrastructure, as they assumes direct access to the hardware
21  * registers, often under a spinlock.  This is not possible in the SDIO
22  * context as SDIO access functions must be able to sleep.
23  *
24  * Because we need to lock the SDIO host to ensure an exclusive access to
25  * the card, we simply rely on that lock to also prevent and serialize
26  * concurrent access to the same port.
27  */
28 
29 #include <linux/module.h>
30 #include <linux/init.h>
31 #include <linux/kernel.h>
32 #include <linux/sched.h>
33 #include <linux/mutex.h>
34 #include <linux/seq_file.h>
35 #include <linux/serial_reg.h>
36 #include <linux/circ_buf.h>
37 #include <linux/tty.h>
38 #include <linux/tty_flip.h>
39 #include <linux/kfifo.h>
40 #include <linux/slab.h>
41 
42 #include <linux/mmc/core.h>
43 #include <linux/mmc/card.h>
44 #include <linux/mmc/sdio_func.h>
45 #include <linux/mmc/sdio_ids.h>
46 
47 
48 #define UART_NR		8	/* Number of UARTs this driver can handle */
49 
50 
51 #define FIFO_SIZE	PAGE_SIZE
52 #define WAKEUP_CHARS	256
53 
54 struct uart_icount {
55 	__u32	cts;
56 	__u32	dsr;
57 	__u32	rng;
58 	__u32	dcd;
59 	__u32	rx;
60 	__u32	tx;
61 	__u32	frame;
62 	__u32	overrun;
63 	__u32	parity;
64 	__u32	brk;
65 };
66 
67 struct sdio_uart_port {
68 	struct tty_port		port;
69 	unsigned int		index;
70 	struct sdio_func	*func;
71 	struct mutex		func_lock;
72 	struct task_struct	*in_sdio_uart_irq;
73 	unsigned int		regs_offset;
74 	struct kfifo		xmit_fifo;
75 	spinlock_t		write_lock;
76 	struct uart_icount	icount;
77 	unsigned int		uartclk;
78 	unsigned int		mctrl;
79 	unsigned int		rx_mctrl;
80 	unsigned int		read_status_mask;
81 	unsigned int		ignore_status_mask;
82 	unsigned char		x_char;
83 	unsigned char           ier;
84 	unsigned char           lcr;
85 };
86 
87 static struct sdio_uart_port *sdio_uart_table[UART_NR];
88 static DEFINE_SPINLOCK(sdio_uart_table_lock);
89 
90 static int sdio_uart_add_port(struct sdio_uart_port *port)
91 {
92 	int index, ret = -EBUSY;
93 
94 	mutex_init(&port->func_lock);
95 	spin_lock_init(&port->write_lock);
96 	if (kfifo_alloc(&port->xmit_fifo, FIFO_SIZE, GFP_KERNEL))
97 		return -ENOMEM;
98 
99 	spin_lock(&sdio_uart_table_lock);
100 	for (index = 0; index < UART_NR; index++) {
101 		if (!sdio_uart_table[index]) {
102 			port->index = index;
103 			sdio_uart_table[index] = port;
104 			ret = 0;
105 			break;
106 		}
107 	}
108 	spin_unlock(&sdio_uart_table_lock);
109 
110 	return ret;
111 }
112 
113 static struct sdio_uart_port *sdio_uart_port_get(unsigned index)
114 {
115 	struct sdio_uart_port *port;
116 
117 	if (index >= UART_NR)
118 		return NULL;
119 
120 	spin_lock(&sdio_uart_table_lock);
121 	port = sdio_uart_table[index];
122 	if (port)
123 		tty_port_get(&port->port);
124 	spin_unlock(&sdio_uart_table_lock);
125 
126 	return port;
127 }
128 
129 static void sdio_uart_port_put(struct sdio_uart_port *port)
130 {
131 	tty_port_put(&port->port);
132 }
133 
134 static void sdio_uart_port_remove(struct sdio_uart_port *port)
135 {
136 	struct sdio_func *func;
137 
138 	spin_lock(&sdio_uart_table_lock);
139 	sdio_uart_table[port->index] = NULL;
140 	spin_unlock(&sdio_uart_table_lock);
141 
142 	/*
143 	 * We're killing a port that potentially still is in use by
144 	 * the tty layer. Be careful to prevent any further access
145 	 * to the SDIO function and arrange for the tty layer to
146 	 * give up on that port ASAP.
147 	 * Beware: the lock ordering is critical.
148 	 */
149 	mutex_lock(&port->port.mutex);
150 	mutex_lock(&port->func_lock);
151 	func = port->func;
152 	sdio_claim_host(func);
153 	port->func = NULL;
154 	mutex_unlock(&port->func_lock);
155 	/* tty_hangup is async so is this safe as is ?? */
156 	tty_port_tty_hangup(&port->port, false);
157 	mutex_unlock(&port->port.mutex);
158 	sdio_release_irq(func);
159 	sdio_disable_func(func);
160 	sdio_release_host(func);
161 
162 	sdio_uart_port_put(port);
163 }
164 
165 static int sdio_uart_claim_func(struct sdio_uart_port *port)
166 {
167 	mutex_lock(&port->func_lock);
168 	if (unlikely(!port->func)) {
169 		mutex_unlock(&port->func_lock);
170 		return -ENODEV;
171 	}
172 	if (likely(port->in_sdio_uart_irq != current))
173 		sdio_claim_host(port->func);
174 	mutex_unlock(&port->func_lock);
175 	return 0;
176 }
177 
178 static inline void sdio_uart_release_func(struct sdio_uart_port *port)
179 {
180 	if (likely(port->in_sdio_uart_irq != current))
181 		sdio_release_host(port->func);
182 }
183 
184 static inline unsigned int sdio_in(struct sdio_uart_port *port, int offset)
185 {
186 	unsigned char c;
187 	c = sdio_readb(port->func, port->regs_offset + offset, NULL);
188 	return c;
189 }
190 
191 static inline void sdio_out(struct sdio_uart_port *port, int offset, int value)
192 {
193 	sdio_writeb(port->func, value, port->regs_offset + offset, NULL);
194 }
195 
196 static unsigned int sdio_uart_get_mctrl(struct sdio_uart_port *port)
197 {
198 	unsigned char status;
199 	unsigned int ret;
200 
201 	/* FIXME: What stops this losing the delta bits and breaking
202 	   sdio_uart_check_modem_status ? */
203 	status = sdio_in(port, UART_MSR);
204 
205 	ret = 0;
206 	if (status & UART_MSR_DCD)
207 		ret |= TIOCM_CAR;
208 	if (status & UART_MSR_RI)
209 		ret |= TIOCM_RNG;
210 	if (status & UART_MSR_DSR)
211 		ret |= TIOCM_DSR;
212 	if (status & UART_MSR_CTS)
213 		ret |= TIOCM_CTS;
214 	return ret;
215 }
216 
217 static void sdio_uart_write_mctrl(struct sdio_uart_port *port,
218 				  unsigned int mctrl)
219 {
220 	unsigned char mcr = 0;
221 
222 	if (mctrl & TIOCM_RTS)
223 		mcr |= UART_MCR_RTS;
224 	if (mctrl & TIOCM_DTR)
225 		mcr |= UART_MCR_DTR;
226 	if (mctrl & TIOCM_OUT1)
227 		mcr |= UART_MCR_OUT1;
228 	if (mctrl & TIOCM_OUT2)
229 		mcr |= UART_MCR_OUT2;
230 	if (mctrl & TIOCM_LOOP)
231 		mcr |= UART_MCR_LOOP;
232 
233 	sdio_out(port, UART_MCR, mcr);
234 }
235 
236 static inline void sdio_uart_update_mctrl(struct sdio_uart_port *port,
237 					  unsigned int set, unsigned int clear)
238 {
239 	unsigned int old;
240 
241 	old = port->mctrl;
242 	port->mctrl = (old & ~clear) | set;
243 	if (old != port->mctrl)
244 		sdio_uart_write_mctrl(port, port->mctrl);
245 }
246 
247 #define sdio_uart_set_mctrl(port, x)	sdio_uart_update_mctrl(port, x, 0)
248 #define sdio_uart_clear_mctrl(port, x)	sdio_uart_update_mctrl(port, 0, x)
249 
250 static void sdio_uart_change_speed(struct sdio_uart_port *port,
251 				   struct ktermios *termios,
252 				   struct ktermios *old)
253 {
254 	unsigned char cval, fcr = 0;
255 	unsigned int baud, quot;
256 
257 	switch (termios->c_cflag & CSIZE) {
258 	case CS5:
259 		cval = UART_LCR_WLEN5;
260 		break;
261 	case CS6:
262 		cval = UART_LCR_WLEN6;
263 		break;
264 	case CS7:
265 		cval = UART_LCR_WLEN7;
266 		break;
267 	default:
268 	case CS8:
269 		cval = UART_LCR_WLEN8;
270 		break;
271 	}
272 
273 	if (termios->c_cflag & CSTOPB)
274 		cval |= UART_LCR_STOP;
275 	if (termios->c_cflag & PARENB)
276 		cval |= UART_LCR_PARITY;
277 	if (!(termios->c_cflag & PARODD))
278 		cval |= UART_LCR_EPAR;
279 
280 	for (;;) {
281 		baud = tty_termios_baud_rate(termios);
282 		if (baud == 0)
283 			baud = 9600;  /* Special case: B0 rate. */
284 		if (baud <= port->uartclk)
285 			break;
286 		/*
287 		 * Oops, the quotient was zero.  Try again with the old
288 		 * baud rate if possible, otherwise default to 9600.
289 		 */
290 		termios->c_cflag &= ~CBAUD;
291 		if (old) {
292 			termios->c_cflag |= old->c_cflag & CBAUD;
293 			old = NULL;
294 		} else
295 			termios->c_cflag |= B9600;
296 	}
297 	quot = (2 * port->uartclk + baud) / (2 * baud);
298 
299 	if (baud < 2400)
300 		fcr = UART_FCR_ENABLE_FIFO | UART_FCR_TRIGGER_1;
301 	else
302 		fcr = UART_FCR_ENABLE_FIFO | UART_FCR_R_TRIG_10;
303 
304 	port->read_status_mask = UART_LSR_OE | UART_LSR_THRE | UART_LSR_DR;
305 	if (termios->c_iflag & INPCK)
306 		port->read_status_mask |= UART_LSR_FE | UART_LSR_PE;
307 	if (termios->c_iflag & (BRKINT | PARMRK))
308 		port->read_status_mask |= UART_LSR_BI;
309 
310 	/*
311 	 * Characters to ignore
312 	 */
313 	port->ignore_status_mask = 0;
314 	if (termios->c_iflag & IGNPAR)
315 		port->ignore_status_mask |= UART_LSR_PE | UART_LSR_FE;
316 	if (termios->c_iflag & IGNBRK) {
317 		port->ignore_status_mask |= UART_LSR_BI;
318 		/*
319 		 * If we're ignoring parity and break indicators,
320 		 * ignore overruns too (for real raw support).
321 		 */
322 		if (termios->c_iflag & IGNPAR)
323 			port->ignore_status_mask |= UART_LSR_OE;
324 	}
325 
326 	/*
327 	 * ignore all characters if CREAD is not set
328 	 */
329 	if ((termios->c_cflag & CREAD) == 0)
330 		port->ignore_status_mask |= UART_LSR_DR;
331 
332 	/*
333 	 * CTS flow control flag and modem status interrupts
334 	 */
335 	port->ier &= ~UART_IER_MSI;
336 	if ((termios->c_cflag & CRTSCTS) || !(termios->c_cflag & CLOCAL))
337 		port->ier |= UART_IER_MSI;
338 
339 	port->lcr = cval;
340 
341 	sdio_out(port, UART_IER, port->ier);
342 	sdio_out(port, UART_LCR, cval | UART_LCR_DLAB);
343 	sdio_out(port, UART_DLL, quot & 0xff);
344 	sdio_out(port, UART_DLM, quot >> 8);
345 	sdio_out(port, UART_LCR, cval);
346 	sdio_out(port, UART_FCR, fcr);
347 
348 	sdio_uart_write_mctrl(port, port->mctrl);
349 }
350 
351 static void sdio_uart_start_tx(struct sdio_uart_port *port)
352 {
353 	if (!(port->ier & UART_IER_THRI)) {
354 		port->ier |= UART_IER_THRI;
355 		sdio_out(port, UART_IER, port->ier);
356 	}
357 }
358 
359 static void sdio_uart_stop_tx(struct sdio_uart_port *port)
360 {
361 	if (port->ier & UART_IER_THRI) {
362 		port->ier &= ~UART_IER_THRI;
363 		sdio_out(port, UART_IER, port->ier);
364 	}
365 }
366 
367 static void sdio_uart_stop_rx(struct sdio_uart_port *port)
368 {
369 	port->ier &= ~UART_IER_RLSI;
370 	port->read_status_mask &= ~UART_LSR_DR;
371 	sdio_out(port, UART_IER, port->ier);
372 }
373 
374 static void sdio_uart_receive_chars(struct sdio_uart_port *port,
375 				    unsigned int *status)
376 {
377 	unsigned int ch, flag;
378 	int max_count = 256;
379 
380 	do {
381 		ch = sdio_in(port, UART_RX);
382 		flag = TTY_NORMAL;
383 		port->icount.rx++;
384 
385 		if (unlikely(*status & (UART_LSR_BI | UART_LSR_PE |
386 					UART_LSR_FE | UART_LSR_OE))) {
387 			/*
388 			 * For statistics only
389 			 */
390 			if (*status & UART_LSR_BI) {
391 				*status &= ~(UART_LSR_FE | UART_LSR_PE);
392 				port->icount.brk++;
393 			} else if (*status & UART_LSR_PE)
394 				port->icount.parity++;
395 			else if (*status & UART_LSR_FE)
396 				port->icount.frame++;
397 			if (*status & UART_LSR_OE)
398 				port->icount.overrun++;
399 
400 			/*
401 			 * Mask off conditions which should be ignored.
402 			 */
403 			*status &= port->read_status_mask;
404 			if (*status & UART_LSR_BI)
405 				flag = TTY_BREAK;
406 			else if (*status & UART_LSR_PE)
407 				flag = TTY_PARITY;
408 			else if (*status & UART_LSR_FE)
409 				flag = TTY_FRAME;
410 		}
411 
412 		if ((*status & port->ignore_status_mask & ~UART_LSR_OE) == 0)
413 			tty_insert_flip_char(&port->port, ch, flag);
414 
415 		/*
416 		 * Overrun is special.  Since it's reported immediately,
417 		 * it doesn't affect the current character.
418 		 */
419 		if (*status & ~port->ignore_status_mask & UART_LSR_OE)
420 			tty_insert_flip_char(&port->port, 0, TTY_OVERRUN);
421 
422 		*status = sdio_in(port, UART_LSR);
423 	} while ((*status & UART_LSR_DR) && (max_count-- > 0));
424 
425 	tty_flip_buffer_push(&port->port);
426 }
427 
428 static void sdio_uart_transmit_chars(struct sdio_uart_port *port)
429 {
430 	struct kfifo *xmit = &port->xmit_fifo;
431 	int count;
432 	struct tty_struct *tty;
433 	u8 iobuf[16];
434 	int len;
435 
436 	if (port->x_char) {
437 		sdio_out(port, UART_TX, port->x_char);
438 		port->icount.tx++;
439 		port->x_char = 0;
440 		return;
441 	}
442 
443 	tty = tty_port_tty_get(&port->port);
444 
445 	if (tty == NULL || !kfifo_len(xmit) ||
446 				tty->stopped || tty->hw_stopped) {
447 		sdio_uart_stop_tx(port);
448 		tty_kref_put(tty);
449 		return;
450 	}
451 
452 	len = kfifo_out_locked(xmit, iobuf, 16, &port->write_lock);
453 	for (count = 0; count < len; count++) {
454 		sdio_out(port, UART_TX, iobuf[count]);
455 		port->icount.tx++;
456 	}
457 
458 	len = kfifo_len(xmit);
459 	if (len < WAKEUP_CHARS) {
460 		tty_wakeup(tty);
461 		if (len == 0)
462 			sdio_uart_stop_tx(port);
463 	}
464 	tty_kref_put(tty);
465 }
466 
467 static void sdio_uart_check_modem_status(struct sdio_uart_port *port)
468 {
469 	int status;
470 	struct tty_struct *tty;
471 
472 	status = sdio_in(port, UART_MSR);
473 
474 	if ((status & UART_MSR_ANY_DELTA) == 0)
475 		return;
476 
477 	if (status & UART_MSR_TERI)
478 		port->icount.rng++;
479 	if (status & UART_MSR_DDSR)
480 		port->icount.dsr++;
481 	if (status & UART_MSR_DDCD) {
482 		port->icount.dcd++;
483 		/* DCD raise - wake for open */
484 		if (status & UART_MSR_DCD)
485 			wake_up_interruptible(&port->port.open_wait);
486 		else {
487 			/* DCD drop - hang up if tty attached */
488 			tty_port_tty_hangup(&port->port, false);
489 		}
490 	}
491 	if (status & UART_MSR_DCTS) {
492 		port->icount.cts++;
493 		tty = tty_port_tty_get(&port->port);
494 		if (tty && C_CRTSCTS(tty)) {
495 			int cts = (status & UART_MSR_CTS);
496 			if (tty->hw_stopped) {
497 				if (cts) {
498 					tty->hw_stopped = 0;
499 					sdio_uart_start_tx(port);
500 					tty_wakeup(tty);
501 				}
502 			} else {
503 				if (!cts) {
504 					tty->hw_stopped = 1;
505 					sdio_uart_stop_tx(port);
506 				}
507 			}
508 		}
509 		tty_kref_put(tty);
510 	}
511 }
512 
513 /*
514  * This handles the interrupt from one port.
515  */
516 static void sdio_uart_irq(struct sdio_func *func)
517 {
518 	struct sdio_uart_port *port = sdio_get_drvdata(func);
519 	unsigned int iir, lsr;
520 
521 	/*
522 	 * In a few places sdio_uart_irq() is called directly instead of
523 	 * waiting for the actual interrupt to be raised and the SDIO IRQ
524 	 * thread scheduled in order to reduce latency.  However, some
525 	 * interaction with the tty core may end up calling us back
526 	 * (serial echo, flow control, etc.) through those same places
527 	 * causing undesirable effects.  Let's stop the recursion here.
528 	 */
529 	if (unlikely(port->in_sdio_uart_irq == current))
530 		return;
531 
532 	iir = sdio_in(port, UART_IIR);
533 	if (iir & UART_IIR_NO_INT)
534 		return;
535 
536 	port->in_sdio_uart_irq = current;
537 	lsr = sdio_in(port, UART_LSR);
538 	if (lsr & UART_LSR_DR)
539 		sdio_uart_receive_chars(port, &lsr);
540 	sdio_uart_check_modem_status(port);
541 	if (lsr & UART_LSR_THRE)
542 		sdio_uart_transmit_chars(port);
543 	port->in_sdio_uart_irq = NULL;
544 }
545 
546 static int uart_carrier_raised(struct tty_port *tport)
547 {
548 	struct sdio_uart_port *port =
549 			container_of(tport, struct sdio_uart_port, port);
550 	unsigned int ret = sdio_uart_claim_func(port);
551 	if (ret)	/* Missing hardware shouldn't block for carrier */
552 		return 1;
553 	ret = sdio_uart_get_mctrl(port);
554 	sdio_uart_release_func(port);
555 	if (ret & TIOCM_CAR)
556 		return 1;
557 	return 0;
558 }
559 
560 /**
561  *	uart_dtr_rts		-	 port helper to set uart signals
562  *	@tport: tty port to be updated
563  *	@onoff: set to turn on DTR/RTS
564  *
565  *	Called by the tty port helpers when the modem signals need to be
566  *	adjusted during an open, close and hangup.
567  */
568 
569 static void uart_dtr_rts(struct tty_port *tport, int onoff)
570 {
571 	struct sdio_uart_port *port =
572 			container_of(tport, struct sdio_uart_port, port);
573 	int ret = sdio_uart_claim_func(port);
574 	if (ret)
575 		return;
576 	if (onoff == 0)
577 		sdio_uart_clear_mctrl(port, TIOCM_DTR | TIOCM_RTS);
578 	else
579 		sdio_uart_set_mctrl(port, TIOCM_DTR | TIOCM_RTS);
580 	sdio_uart_release_func(port);
581 }
582 
583 /**
584  *	sdio_uart_activate	-	start up hardware
585  *	@tport: tty port to activate
586  *	@tty: tty bound to this port
587  *
588  *	Activate a tty port. The port locking guarantees us this will be
589  *	run exactly once per set of opens, and if successful will see the
590  *	shutdown method run exactly once to match. Start up and shutdown are
591  *	protected from each other by the internal locking and will not run
592  *	at the same time even during a hangup event.
593  *
594  *	If we successfully start up the port we take an extra kref as we
595  *	will keep it around until shutdown when the kref is dropped.
596  */
597 
598 static int sdio_uart_activate(struct tty_port *tport, struct tty_struct *tty)
599 {
600 	struct sdio_uart_port *port =
601 			container_of(tport, struct sdio_uart_port, port);
602 	int ret;
603 
604 	/*
605 	 * Set the TTY IO error marker - we will only clear this
606 	 * once we have successfully opened the port.
607 	 */
608 	set_bit(TTY_IO_ERROR, &tty->flags);
609 
610 	kfifo_reset(&port->xmit_fifo);
611 
612 	ret = sdio_uart_claim_func(port);
613 	if (ret)
614 		return ret;
615 	ret = sdio_enable_func(port->func);
616 	if (ret)
617 		goto err1;
618 	ret = sdio_claim_irq(port->func, sdio_uart_irq);
619 	if (ret)
620 		goto err2;
621 
622 	/*
623 	 * Clear the FIFO buffers and disable them.
624 	 * (they will be reenabled in sdio_change_speed())
625 	 */
626 	sdio_out(port, UART_FCR, UART_FCR_ENABLE_FIFO);
627 	sdio_out(port, UART_FCR, UART_FCR_ENABLE_FIFO |
628 		       UART_FCR_CLEAR_RCVR | UART_FCR_CLEAR_XMIT);
629 	sdio_out(port, UART_FCR, 0);
630 
631 	/*
632 	 * Clear the interrupt registers.
633 	 */
634 	(void) sdio_in(port, UART_LSR);
635 	(void) sdio_in(port, UART_RX);
636 	(void) sdio_in(port, UART_IIR);
637 	(void) sdio_in(port, UART_MSR);
638 
639 	/*
640 	 * Now, initialize the UART
641 	 */
642 	sdio_out(port, UART_LCR, UART_LCR_WLEN8);
643 
644 	port->ier = UART_IER_RLSI|UART_IER_RDI|UART_IER_RTOIE|UART_IER_UUE;
645 	port->mctrl = TIOCM_OUT2;
646 
647 	sdio_uart_change_speed(port, &tty->termios, NULL);
648 
649 	if (C_BAUD(tty))
650 		sdio_uart_set_mctrl(port, TIOCM_RTS | TIOCM_DTR);
651 
652 	if (C_CRTSCTS(tty))
653 		if (!(sdio_uart_get_mctrl(port) & TIOCM_CTS))
654 			tty->hw_stopped = 1;
655 
656 	clear_bit(TTY_IO_ERROR, &tty->flags);
657 
658 	/* Kick the IRQ handler once while we're still holding the host lock */
659 	sdio_uart_irq(port->func);
660 
661 	sdio_uart_release_func(port);
662 	return 0;
663 
664 err2:
665 	sdio_disable_func(port->func);
666 err1:
667 	sdio_uart_release_func(port);
668 	return ret;
669 }
670 
671 /**
672  *	sdio_uart_shutdown	-	stop hardware
673  *	@tport: tty port to shut down
674  *
675  *	Deactivate a tty port. The port locking guarantees us this will be
676  *	run only if a successful matching activate already ran. The two are
677  *	protected from each other by the internal locking and will not run
678  *	at the same time even during a hangup event.
679  */
680 
681 static void sdio_uart_shutdown(struct tty_port *tport)
682 {
683 	struct sdio_uart_port *port =
684 			container_of(tport, struct sdio_uart_port, port);
685 	int ret;
686 
687 	ret = sdio_uart_claim_func(port);
688 	if (ret)
689 		return;
690 
691 	sdio_uart_stop_rx(port);
692 
693 	/* Disable interrupts from this port */
694 	sdio_release_irq(port->func);
695 	port->ier = 0;
696 	sdio_out(port, UART_IER, 0);
697 
698 	sdio_uart_clear_mctrl(port, TIOCM_OUT2);
699 
700 	/* Disable break condition and FIFOs. */
701 	port->lcr &= ~UART_LCR_SBC;
702 	sdio_out(port, UART_LCR, port->lcr);
703 	sdio_out(port, UART_FCR, UART_FCR_ENABLE_FIFO |
704 				 UART_FCR_CLEAR_RCVR |
705 				 UART_FCR_CLEAR_XMIT);
706 	sdio_out(port, UART_FCR, 0);
707 
708 	sdio_disable_func(port->func);
709 
710 	sdio_uart_release_func(port);
711 }
712 
713 static void sdio_uart_port_destroy(struct tty_port *tport)
714 {
715 	struct sdio_uart_port *port =
716 		container_of(tport, struct sdio_uart_port, port);
717 	kfifo_free(&port->xmit_fifo);
718 	kfree(port);
719 }
720 
721 /**
722  *	sdio_uart_install	-	install method
723  *	@driver: the driver in use (sdio_uart in our case)
724  *	@tty: the tty being bound
725  *
726  *	Look up and bind the tty and the driver together. Initialize
727  *	any needed private data (in our case the termios)
728  */
729 
730 static int sdio_uart_install(struct tty_driver *driver, struct tty_struct *tty)
731 {
732 	int idx = tty->index;
733 	struct sdio_uart_port *port = sdio_uart_port_get(idx);
734 	int ret = tty_standard_install(driver, tty);
735 
736 	if (ret == 0)
737 		/* This is the ref sdio_uart_port get provided */
738 		tty->driver_data = port;
739 	else
740 		sdio_uart_port_put(port);
741 	return ret;
742 }
743 
744 /**
745  *	sdio_uart_cleanup	-	called on the last tty kref drop
746  *	@tty: the tty being destroyed
747  *
748  *	Called asynchronously when the last reference to the tty is dropped.
749  *	We cannot destroy the tty->driver_data port kref until this point
750  */
751 
752 static void sdio_uart_cleanup(struct tty_struct *tty)
753 {
754 	struct sdio_uart_port *port = tty->driver_data;
755 	tty->driver_data = NULL;	/* Bug trap */
756 	sdio_uart_port_put(port);
757 }
758 
759 /*
760  *	Open/close/hangup is now entirely boilerplate
761  */
762 
763 static int sdio_uart_open(struct tty_struct *tty, struct file *filp)
764 {
765 	struct sdio_uart_port *port = tty->driver_data;
766 	return tty_port_open(&port->port, tty, filp);
767 }
768 
769 static void sdio_uart_close(struct tty_struct *tty, struct file * filp)
770 {
771 	struct sdio_uart_port *port = tty->driver_data;
772 	tty_port_close(&port->port, tty, filp);
773 }
774 
775 static void sdio_uart_hangup(struct tty_struct *tty)
776 {
777 	struct sdio_uart_port *port = tty->driver_data;
778 	tty_port_hangup(&port->port);
779 }
780 
781 static int sdio_uart_write(struct tty_struct *tty, const unsigned char *buf,
782 			   int count)
783 {
784 	struct sdio_uart_port *port = tty->driver_data;
785 	int ret;
786 
787 	if (!port->func)
788 		return -ENODEV;
789 
790 	ret = kfifo_in_locked(&port->xmit_fifo, buf, count, &port->write_lock);
791 	if (!(port->ier & UART_IER_THRI)) {
792 		int err = sdio_uart_claim_func(port);
793 		if (!err) {
794 			sdio_uart_start_tx(port);
795 			sdio_uart_irq(port->func);
796 			sdio_uart_release_func(port);
797 		} else
798 			ret = err;
799 	}
800 
801 	return ret;
802 }
803 
804 static int sdio_uart_write_room(struct tty_struct *tty)
805 {
806 	struct sdio_uart_port *port = tty->driver_data;
807 	return FIFO_SIZE - kfifo_len(&port->xmit_fifo);
808 }
809 
810 static int sdio_uart_chars_in_buffer(struct tty_struct *tty)
811 {
812 	struct sdio_uart_port *port = tty->driver_data;
813 	return kfifo_len(&port->xmit_fifo);
814 }
815 
816 static void sdio_uart_send_xchar(struct tty_struct *tty, char ch)
817 {
818 	struct sdio_uart_port *port = tty->driver_data;
819 
820 	port->x_char = ch;
821 	if (ch && !(port->ier & UART_IER_THRI)) {
822 		if (sdio_uart_claim_func(port) != 0)
823 			return;
824 		sdio_uart_start_tx(port);
825 		sdio_uart_irq(port->func);
826 		sdio_uart_release_func(port);
827 	}
828 }
829 
830 static void sdio_uart_throttle(struct tty_struct *tty)
831 {
832 	struct sdio_uart_port *port = tty->driver_data;
833 
834 	if (!I_IXOFF(tty) && !C_CRTSCTS(tty))
835 		return;
836 
837 	if (sdio_uart_claim_func(port) != 0)
838 		return;
839 
840 	if (I_IXOFF(tty)) {
841 		port->x_char = STOP_CHAR(tty);
842 		sdio_uart_start_tx(port);
843 	}
844 
845 	if (C_CRTSCTS(tty))
846 		sdio_uart_clear_mctrl(port, TIOCM_RTS);
847 
848 	sdio_uart_irq(port->func);
849 	sdio_uart_release_func(port);
850 }
851 
852 static void sdio_uart_unthrottle(struct tty_struct *tty)
853 {
854 	struct sdio_uart_port *port = tty->driver_data;
855 
856 	if (!I_IXOFF(tty) && !C_CRTSCTS(tty))
857 		return;
858 
859 	if (sdio_uart_claim_func(port) != 0)
860 		return;
861 
862 	if (I_IXOFF(tty)) {
863 		if (port->x_char) {
864 			port->x_char = 0;
865 		} else {
866 			port->x_char = START_CHAR(tty);
867 			sdio_uart_start_tx(port);
868 		}
869 	}
870 
871 	if (C_CRTSCTS(tty))
872 		sdio_uart_set_mctrl(port, TIOCM_RTS);
873 
874 	sdio_uart_irq(port->func);
875 	sdio_uart_release_func(port);
876 }
877 
878 static void sdio_uart_set_termios(struct tty_struct *tty,
879 						struct ktermios *old_termios)
880 {
881 	struct sdio_uart_port *port = tty->driver_data;
882 	unsigned int cflag = tty->termios.c_cflag;
883 
884 	if (sdio_uart_claim_func(port) != 0)
885 		return;
886 
887 	sdio_uart_change_speed(port, &tty->termios, old_termios);
888 
889 	/* Handle transition to B0 status */
890 	if ((old_termios->c_cflag & CBAUD) && !(cflag & CBAUD))
891 		sdio_uart_clear_mctrl(port, TIOCM_RTS | TIOCM_DTR);
892 
893 	/* Handle transition away from B0 status */
894 	if (!(old_termios->c_cflag & CBAUD) && (cflag & CBAUD)) {
895 		unsigned int mask = TIOCM_DTR;
896 		if (!(cflag & CRTSCTS) || !tty_throttled(tty))
897 			mask |= TIOCM_RTS;
898 		sdio_uart_set_mctrl(port, mask);
899 	}
900 
901 	/* Handle turning off CRTSCTS */
902 	if ((old_termios->c_cflag & CRTSCTS) && !(cflag & CRTSCTS)) {
903 		tty->hw_stopped = 0;
904 		sdio_uart_start_tx(port);
905 	}
906 
907 	/* Handle turning on CRTSCTS */
908 	if (!(old_termios->c_cflag & CRTSCTS) && (cflag & CRTSCTS)) {
909 		if (!(sdio_uart_get_mctrl(port) & TIOCM_CTS)) {
910 			tty->hw_stopped = 1;
911 			sdio_uart_stop_tx(port);
912 		}
913 	}
914 
915 	sdio_uart_release_func(port);
916 }
917 
918 static int sdio_uart_break_ctl(struct tty_struct *tty, int break_state)
919 {
920 	struct sdio_uart_port *port = tty->driver_data;
921 	int result;
922 
923 	result = sdio_uart_claim_func(port);
924 	if (result != 0)
925 		return result;
926 
927 	if (break_state == -1)
928 		port->lcr |= UART_LCR_SBC;
929 	else
930 		port->lcr &= ~UART_LCR_SBC;
931 	sdio_out(port, UART_LCR, port->lcr);
932 
933 	sdio_uart_release_func(port);
934 	return 0;
935 }
936 
937 static int sdio_uart_tiocmget(struct tty_struct *tty)
938 {
939 	struct sdio_uart_port *port = tty->driver_data;
940 	int result;
941 
942 	result = sdio_uart_claim_func(port);
943 	if (!result) {
944 		result = port->mctrl | sdio_uart_get_mctrl(port);
945 		sdio_uart_release_func(port);
946 	}
947 
948 	return result;
949 }
950 
951 static int sdio_uart_tiocmset(struct tty_struct *tty,
952 			      unsigned int set, unsigned int clear)
953 {
954 	struct sdio_uart_port *port = tty->driver_data;
955 	int result;
956 
957 	result = sdio_uart_claim_func(port);
958 	if (!result) {
959 		sdio_uart_update_mctrl(port, set, clear);
960 		sdio_uart_release_func(port);
961 	}
962 
963 	return result;
964 }
965 
966 static int sdio_uart_proc_show(struct seq_file *m, void *v)
967 {
968 	int i;
969 
970 	seq_printf(m, "serinfo:1.0 driver%s%s revision:%s\n",
971 		       "", "", "");
972 	for (i = 0; i < UART_NR; i++) {
973 		struct sdio_uart_port *port = sdio_uart_port_get(i);
974 		if (port) {
975 			seq_printf(m, "%d: uart:SDIO", i);
976 			if (capable(CAP_SYS_ADMIN)) {
977 				seq_printf(m, " tx:%d rx:%d",
978 					      port->icount.tx, port->icount.rx);
979 				if (port->icount.frame)
980 					seq_printf(m, " fe:%d",
981 						      port->icount.frame);
982 				if (port->icount.parity)
983 					seq_printf(m, " pe:%d",
984 						      port->icount.parity);
985 				if (port->icount.brk)
986 					seq_printf(m, " brk:%d",
987 						      port->icount.brk);
988 				if (port->icount.overrun)
989 					seq_printf(m, " oe:%d",
990 						      port->icount.overrun);
991 				if (port->icount.cts)
992 					seq_printf(m, " cts:%d",
993 						      port->icount.cts);
994 				if (port->icount.dsr)
995 					seq_printf(m, " dsr:%d",
996 						      port->icount.dsr);
997 				if (port->icount.rng)
998 					seq_printf(m, " rng:%d",
999 						      port->icount.rng);
1000 				if (port->icount.dcd)
1001 					seq_printf(m, " dcd:%d",
1002 						      port->icount.dcd);
1003 			}
1004 			sdio_uart_port_put(port);
1005 			seq_putc(m, '\n');
1006 		}
1007 	}
1008 	return 0;
1009 }
1010 
1011 static int sdio_uart_proc_open(struct inode *inode, struct file *file)
1012 {
1013 	return single_open(file, sdio_uart_proc_show, NULL);
1014 }
1015 
1016 static const struct file_operations sdio_uart_proc_fops = {
1017 	.owner		= THIS_MODULE,
1018 	.open		= sdio_uart_proc_open,
1019 	.read		= seq_read,
1020 	.llseek		= seq_lseek,
1021 	.release	= single_release,
1022 };
1023 
1024 static const struct tty_port_operations sdio_uart_port_ops = {
1025 	.dtr_rts = uart_dtr_rts,
1026 	.carrier_raised = uart_carrier_raised,
1027 	.shutdown = sdio_uart_shutdown,
1028 	.activate = sdio_uart_activate,
1029 	.destruct = sdio_uart_port_destroy,
1030 };
1031 
1032 static const struct tty_operations sdio_uart_ops = {
1033 	.open			= sdio_uart_open,
1034 	.close			= sdio_uart_close,
1035 	.write			= sdio_uart_write,
1036 	.write_room		= sdio_uart_write_room,
1037 	.chars_in_buffer	= sdio_uart_chars_in_buffer,
1038 	.send_xchar		= sdio_uart_send_xchar,
1039 	.throttle		= sdio_uart_throttle,
1040 	.unthrottle		= sdio_uart_unthrottle,
1041 	.set_termios		= sdio_uart_set_termios,
1042 	.hangup			= sdio_uart_hangup,
1043 	.break_ctl		= sdio_uart_break_ctl,
1044 	.tiocmget		= sdio_uart_tiocmget,
1045 	.tiocmset		= sdio_uart_tiocmset,
1046 	.install		= sdio_uart_install,
1047 	.cleanup		= sdio_uart_cleanup,
1048 	.proc_fops		= &sdio_uart_proc_fops,
1049 };
1050 
1051 static struct tty_driver *sdio_uart_tty_driver;
1052 
1053 static int sdio_uart_probe(struct sdio_func *func,
1054 			   const struct sdio_device_id *id)
1055 {
1056 	struct sdio_uart_port *port;
1057 	int ret;
1058 
1059 	port = kzalloc(sizeof(struct sdio_uart_port), GFP_KERNEL);
1060 	if (!port)
1061 		return -ENOMEM;
1062 
1063 	if (func->class == SDIO_CLASS_UART) {
1064 		pr_warn("%s: need info on UART class basic setup\n",
1065 			sdio_func_id(func));
1066 		kfree(port);
1067 		return -ENOSYS;
1068 	} else if (func->class == SDIO_CLASS_GPS) {
1069 		/*
1070 		 * We need tuple 0x91.  It contains SUBTPL_SIOREG
1071 		 * and SUBTPL_RCVCAPS.
1072 		 */
1073 		struct sdio_func_tuple *tpl;
1074 		for (tpl = func->tuples; tpl; tpl = tpl->next) {
1075 			if (tpl->code != 0x91)
1076 				continue;
1077 			if (tpl->size < 10)
1078 				continue;
1079 			if (tpl->data[1] == 0)  /* SUBTPL_SIOREG */
1080 				break;
1081 		}
1082 		if (!tpl) {
1083 			pr_warn("%s: can't find tuple 0x91 subtuple 0 (SUBTPL_SIOREG) for GPS class\n",
1084 				sdio_func_id(func));
1085 			kfree(port);
1086 			return -EINVAL;
1087 		}
1088 		pr_debug("%s: Register ID = 0x%02x, Exp ID = 0x%02x\n",
1089 		       sdio_func_id(func), tpl->data[2], tpl->data[3]);
1090 		port->regs_offset = (tpl->data[4] << 0) |
1091 				    (tpl->data[5] << 8) |
1092 				    (tpl->data[6] << 16);
1093 		pr_debug("%s: regs offset = 0x%x\n",
1094 		       sdio_func_id(func), port->regs_offset);
1095 		port->uartclk = tpl->data[7] * 115200;
1096 		if (port->uartclk == 0)
1097 			port->uartclk = 115200;
1098 		pr_debug("%s: clk %d baudcode %u 4800-div %u\n",
1099 		       sdio_func_id(func), port->uartclk,
1100 		       tpl->data[7], tpl->data[8] | (tpl->data[9] << 8));
1101 	} else {
1102 		kfree(port);
1103 		return -EINVAL;
1104 	}
1105 
1106 	port->func = func;
1107 	sdio_set_drvdata(func, port);
1108 	tty_port_init(&port->port);
1109 	port->port.ops = &sdio_uart_port_ops;
1110 
1111 	ret = sdio_uart_add_port(port);
1112 	if (ret) {
1113 		kfree(port);
1114 	} else {
1115 		struct device *dev;
1116 		dev = tty_port_register_device(&port->port,
1117 				sdio_uart_tty_driver, port->index, &func->dev);
1118 		if (IS_ERR(dev)) {
1119 			sdio_uart_port_remove(port);
1120 			ret = PTR_ERR(dev);
1121 		}
1122 	}
1123 
1124 	return ret;
1125 }
1126 
1127 static void sdio_uart_remove(struct sdio_func *func)
1128 {
1129 	struct sdio_uart_port *port = sdio_get_drvdata(func);
1130 
1131 	tty_unregister_device(sdio_uart_tty_driver, port->index);
1132 	sdio_uart_port_remove(port);
1133 }
1134 
1135 static const struct sdio_device_id sdio_uart_ids[] = {
1136 	{ SDIO_DEVICE_CLASS(SDIO_CLASS_UART)		},
1137 	{ SDIO_DEVICE_CLASS(SDIO_CLASS_GPS)		},
1138 	{ /* end: all zeroes */				},
1139 };
1140 
1141 MODULE_DEVICE_TABLE(sdio, sdio_uart_ids);
1142 
1143 static struct sdio_driver sdio_uart_driver = {
1144 	.probe		= sdio_uart_probe,
1145 	.remove		= sdio_uart_remove,
1146 	.name		= "sdio_uart",
1147 	.id_table	= sdio_uart_ids,
1148 };
1149 
1150 static int __init sdio_uart_init(void)
1151 {
1152 	int ret;
1153 	struct tty_driver *tty_drv;
1154 
1155 	sdio_uart_tty_driver = tty_drv = alloc_tty_driver(UART_NR);
1156 	if (!tty_drv)
1157 		return -ENOMEM;
1158 
1159 	tty_drv->driver_name = "sdio_uart";
1160 	tty_drv->name =   "ttySDIO";
1161 	tty_drv->major = 0;  /* dynamically allocated */
1162 	tty_drv->minor_start = 0;
1163 	tty_drv->type = TTY_DRIVER_TYPE_SERIAL;
1164 	tty_drv->subtype = SERIAL_TYPE_NORMAL;
1165 	tty_drv->flags = TTY_DRIVER_REAL_RAW | TTY_DRIVER_DYNAMIC_DEV;
1166 	tty_drv->init_termios = tty_std_termios;
1167 	tty_drv->init_termios.c_cflag = B4800 | CS8 | CREAD | HUPCL | CLOCAL;
1168 	tty_drv->init_termios.c_ispeed = 4800;
1169 	tty_drv->init_termios.c_ospeed = 4800;
1170 	tty_set_operations(tty_drv, &sdio_uart_ops);
1171 
1172 	ret = tty_register_driver(tty_drv);
1173 	if (ret)
1174 		goto err1;
1175 
1176 	ret = sdio_register_driver(&sdio_uart_driver);
1177 	if (ret)
1178 		goto err2;
1179 
1180 	return 0;
1181 
1182 err2:
1183 	tty_unregister_driver(tty_drv);
1184 err1:
1185 	put_tty_driver(tty_drv);
1186 	return ret;
1187 }
1188 
1189 static void __exit sdio_uart_exit(void)
1190 {
1191 	sdio_unregister_driver(&sdio_uart_driver);
1192 	tty_unregister_driver(sdio_uart_tty_driver);
1193 	put_tty_driver(sdio_uart_tty_driver);
1194 }
1195 
1196 module_init(sdio_uart_init);
1197 module_exit(sdio_uart_exit);
1198 
1199 MODULE_AUTHOR("Nicolas Pitre");
1200 MODULE_LICENSE("GPL");
1201