1 /*
2  * n_tty.c --- implements the N_TTY line discipline.
3  *
4  * This code used to be in tty_io.c, but things are getting hairy
5  * enough that it made sense to split things off.  (The N_TTY
6  * processing has changed so much that it's hardly recognizable,
7  * anyway...)
8  *
9  * Note that the open routine for N_TTY is guaranteed never to return
10  * an error.  This is because Linux will fall back to setting a line
11  * to N_TTY if it can not switch to any other line discipline.
12  *
13  * Written by Theodore Ts'o, Copyright 1994.
14  *
15  * This file also contains code originally written by Linus Torvalds,
16  * Copyright 1991, 1992, 1993, and by Julian Cowley, Copyright 1994.
17  *
18  * This file may be redistributed under the terms of the GNU General Public
19  * License.
20  *
21  * Reduced memory usage for older ARM systems  - Russell King.
22  *
23  * 2000/01/20   Fixed SMP locking on put_tty_queue using bits of
24  *		the patch by Andrew J. Kroll <ag784@freenet.buffalo.edu>
25  *		who actually finally proved there really was a race.
26  *
27  * 2002/03/18   Implemented n_tty_wakeup to send SIGIO POLL_OUTs to
28  *		waiting writing processes-Sapan Bhatia <sapan@corewars.org>.
29  *		Also fixed a bug in BLOCKING mode where n_tty_write returns
30  *		EAGAIN
31  */
32 
33 #include <linux/types.h>
34 #include <linux/major.h>
35 #include <linux/errno.h>
36 #include <linux/signal.h>
37 #include <linux/fcntl.h>
38 #include <linux/sched.h>
39 #include <linux/interrupt.h>
40 #include <linux/tty.h>
41 #include <linux/timer.h>
42 #include <linux/ctype.h>
43 #include <linux/mm.h>
44 #include <linux/string.h>
45 #include <linux/slab.h>
46 #include <linux/poll.h>
47 #include <linux/bitops.h>
48 #include <linux/audit.h>
49 #include <linux/file.h>
50 #include <linux/uaccess.h>
51 #include <linux/module.h>
52 #include <linux/ratelimit.h>
53 #include <linux/vmalloc.h>
54 
55 
56 /* number of characters left in xmit buffer before select has we have room */
57 #define WAKEUP_CHARS 256
58 
59 /*
60  * This defines the low- and high-watermarks for throttling and
61  * unthrottling the TTY driver.  These watermarks are used for
62  * controlling the space in the read buffer.
63  */
64 #define TTY_THRESHOLD_THROTTLE		128 /* now based on remaining room */
65 #define TTY_THRESHOLD_UNTHROTTLE	128
66 
67 /*
68  * Special byte codes used in the echo buffer to represent operations
69  * or special handling of characters.  Bytes in the echo buffer that
70  * are not part of such special blocks are treated as normal character
71  * codes.
72  */
73 #define ECHO_OP_START 0xff
74 #define ECHO_OP_MOVE_BACK_COL 0x80
75 #define ECHO_OP_SET_CANON_COL 0x81
76 #define ECHO_OP_ERASE_TAB 0x82
77 
78 #define ECHO_COMMIT_WATERMARK	256
79 #define ECHO_BLOCK		256
80 #define ECHO_DISCARD_WATERMARK	N_TTY_BUF_SIZE - (ECHO_BLOCK + 32)
81 
82 
83 #undef N_TTY_TRACE
84 #ifdef N_TTY_TRACE
85 # define n_tty_trace(f, args...)	trace_printk(f, ##args)
86 #else
87 # define n_tty_trace(f, args...)
88 #endif
89 
90 struct n_tty_data {
91 	/* producer-published */
92 	size_t read_head;
93 	size_t commit_head;
94 	size_t canon_head;
95 	size_t echo_head;
96 	size_t echo_commit;
97 	size_t echo_mark;
98 	DECLARE_BITMAP(char_map, 256);
99 
100 	/* private to n_tty_receive_overrun (single-threaded) */
101 	unsigned long overrun_time;
102 	int num_overrun;
103 
104 	/* non-atomic */
105 	bool no_room;
106 
107 	/* must hold exclusive termios_rwsem to reset these */
108 	unsigned char lnext:1, erasing:1, raw:1, real_raw:1, icanon:1;
109 	unsigned char push:1;
110 
111 	/* shared by producer and consumer */
112 	char read_buf[N_TTY_BUF_SIZE];
113 	DECLARE_BITMAP(read_flags, N_TTY_BUF_SIZE);
114 	unsigned char echo_buf[N_TTY_BUF_SIZE];
115 
116 	int minimum_to_wake;
117 
118 	/* consumer-published */
119 	size_t read_tail;
120 	size_t line_start;
121 
122 	/* protected by output lock */
123 	unsigned int column;
124 	unsigned int canon_column;
125 	size_t echo_tail;
126 
127 	struct mutex atomic_read_lock;
128 	struct mutex output_lock;
129 };
130 
read_cnt(struct n_tty_data * ldata)131 static inline size_t read_cnt(struct n_tty_data *ldata)
132 {
133 	return ldata->read_head - ldata->read_tail;
134 }
135 
read_buf(struct n_tty_data * ldata,size_t i)136 static inline unsigned char read_buf(struct n_tty_data *ldata, size_t i)
137 {
138 	return ldata->read_buf[i & (N_TTY_BUF_SIZE - 1)];
139 }
140 
read_buf_addr(struct n_tty_data * ldata,size_t i)141 static inline unsigned char *read_buf_addr(struct n_tty_data *ldata, size_t i)
142 {
143 	return &ldata->read_buf[i & (N_TTY_BUF_SIZE - 1)];
144 }
145 
echo_buf(struct n_tty_data * ldata,size_t i)146 static inline unsigned char echo_buf(struct n_tty_data *ldata, size_t i)
147 {
148 	return ldata->echo_buf[i & (N_TTY_BUF_SIZE - 1)];
149 }
150 
echo_buf_addr(struct n_tty_data * ldata,size_t i)151 static inline unsigned char *echo_buf_addr(struct n_tty_data *ldata, size_t i)
152 {
153 	return &ldata->echo_buf[i & (N_TTY_BUF_SIZE - 1)];
154 }
155 
tty_put_user(struct tty_struct * tty,unsigned char x,unsigned char __user * ptr)156 static inline int tty_put_user(struct tty_struct *tty, unsigned char x,
157 			       unsigned char __user *ptr)
158 {
159 	struct n_tty_data *ldata = tty->disc_data;
160 
161 	tty_audit_add_data(tty, &x, 1, ldata->icanon);
162 	return put_user(x, ptr);
163 }
164 
tty_copy_to_user(struct tty_struct * tty,void __user * to,const void * from,unsigned long n)165 static inline int tty_copy_to_user(struct tty_struct *tty,
166 					void __user *to,
167 					const void *from,
168 					unsigned long n)
169 {
170 	struct n_tty_data *ldata = tty->disc_data;
171 
172 	tty_audit_add_data(tty, from, n, ldata->icanon);
173 	return copy_to_user(to, from, n);
174 }
175 
176 /**
177  *	n_tty_kick_worker - start input worker (if required)
178  *	@tty: terminal
179  *
180  *	Re-schedules the flip buffer work if it may have stopped
181  *
182  *	Caller holds exclusive termios_rwsem
183  *	   or
184  *	n_tty_read()/consumer path:
185  *		holds non-exclusive termios_rwsem
186  */
187 
n_tty_kick_worker(struct tty_struct * tty)188 static void n_tty_kick_worker(struct tty_struct *tty)
189 {
190 	struct n_tty_data *ldata = tty->disc_data;
191 
192 	/* Did the input worker stop? Restart it */
193 	if (unlikely(ldata->no_room)) {
194 		ldata->no_room = 0;
195 
196 		WARN_RATELIMIT(tty->port->itty == NULL,
197 				"scheduling with invalid itty\n");
198 		/* see if ldisc has been killed - if so, this means that
199 		 * even though the ldisc has been halted and ->buf.work
200 		 * cancelled, ->buf.work is about to be rescheduled
201 		 */
202 		WARN_RATELIMIT(test_bit(TTY_LDISC_HALTED, &tty->flags),
203 			       "scheduling buffer work for halted ldisc\n");
204 		tty_buffer_restart_work(tty->port);
205 	}
206 }
207 
chars_in_buffer(struct tty_struct * tty)208 static ssize_t chars_in_buffer(struct tty_struct *tty)
209 {
210 	struct n_tty_data *ldata = tty->disc_data;
211 	ssize_t n = 0;
212 
213 	if (!ldata->icanon)
214 		n = ldata->commit_head - ldata->read_tail;
215 	else
216 		n = ldata->canon_head - ldata->read_tail;
217 	return n;
218 }
219 
220 /**
221  *	n_tty_write_wakeup	-	asynchronous I/O notifier
222  *	@tty: tty device
223  *
224  *	Required for the ptys, serial driver etc. since processes
225  *	that attach themselves to the master and rely on ASYNC
226  *	IO must be woken up
227  */
228 
n_tty_write_wakeup(struct tty_struct * tty)229 static void n_tty_write_wakeup(struct tty_struct *tty)
230 {
231 	if (tty->fasync && test_and_clear_bit(TTY_DO_WRITE_WAKEUP, &tty->flags))
232 		kill_fasync(&tty->fasync, SIGIO, POLL_OUT);
233 }
234 
n_tty_check_throttle(struct tty_struct * tty)235 static void n_tty_check_throttle(struct tty_struct *tty)
236 {
237 	struct n_tty_data *ldata = tty->disc_data;
238 
239 	/*
240 	 * Check the remaining room for the input canonicalization
241 	 * mode.  We don't want to throttle the driver if we're in
242 	 * canonical mode and don't have a newline yet!
243 	 */
244 	if (ldata->icanon && ldata->canon_head == ldata->read_tail)
245 		return;
246 
247 	while (1) {
248 		int throttled;
249 		tty_set_flow_change(tty, TTY_THROTTLE_SAFE);
250 		if (N_TTY_BUF_SIZE - read_cnt(ldata) >= TTY_THRESHOLD_THROTTLE)
251 			break;
252 		throttled = tty_throttle_safe(tty);
253 		if (!throttled)
254 			break;
255 	}
256 	__tty_set_flow_change(tty, 0);
257 }
258 
n_tty_check_unthrottle(struct tty_struct * tty)259 static void n_tty_check_unthrottle(struct tty_struct *tty)
260 {
261 	if (tty->driver->type == TTY_DRIVER_TYPE_PTY) {
262 		if (chars_in_buffer(tty) > TTY_THRESHOLD_UNTHROTTLE)
263 			return;
264 		if (!tty->count)
265 			return;
266 		n_tty_kick_worker(tty);
267 		tty_wakeup(tty->link);
268 		return;
269 	}
270 
271 	/* If there is enough space in the read buffer now, let the
272 	 * low-level driver know. We use chars_in_buffer() to
273 	 * check the buffer, as it now knows about canonical mode.
274 	 * Otherwise, if the driver is throttled and the line is
275 	 * longer than TTY_THRESHOLD_UNTHROTTLE in canonical mode,
276 	 * we won't get any more characters.
277 	 */
278 
279 	while (1) {
280 		int unthrottled;
281 		tty_set_flow_change(tty, TTY_UNTHROTTLE_SAFE);
282 		if (chars_in_buffer(tty) > TTY_THRESHOLD_UNTHROTTLE)
283 			break;
284 		if (!tty->count)
285 			break;
286 		n_tty_kick_worker(tty);
287 		unthrottled = tty_unthrottle_safe(tty);
288 		if (!unthrottled)
289 			break;
290 	}
291 	__tty_set_flow_change(tty, 0);
292 }
293 
294 /**
295  *	put_tty_queue		-	add character to tty
296  *	@c: character
297  *	@ldata: n_tty data
298  *
299  *	Add a character to the tty read_buf queue.
300  *
301  *	n_tty_receive_buf()/producer path:
302  *		caller holds non-exclusive termios_rwsem
303  */
304 
put_tty_queue(unsigned char c,struct n_tty_data * ldata)305 static inline void put_tty_queue(unsigned char c, struct n_tty_data *ldata)
306 {
307 	*read_buf_addr(ldata, ldata->read_head) = c;
308 	ldata->read_head++;
309 }
310 
311 /**
312  *	reset_buffer_flags	-	reset buffer state
313  *	@tty: terminal to reset
314  *
315  *	Reset the read buffer counters and clear the flags.
316  *	Called from n_tty_open() and n_tty_flush_buffer().
317  *
318  *	Locking: caller holds exclusive termios_rwsem
319  *		 (or locking is not required)
320  */
321 
reset_buffer_flags(struct n_tty_data * ldata)322 static void reset_buffer_flags(struct n_tty_data *ldata)
323 {
324 	ldata->read_head = ldata->canon_head = ldata->read_tail = 0;
325 	ldata->echo_head = ldata->echo_tail = ldata->echo_commit = 0;
326 	ldata->commit_head = 0;
327 	ldata->echo_mark = 0;
328 	ldata->line_start = 0;
329 
330 	ldata->erasing = 0;
331 	bitmap_zero(ldata->read_flags, N_TTY_BUF_SIZE);
332 	ldata->push = 0;
333 }
334 
n_tty_packet_mode_flush(struct tty_struct * tty)335 static void n_tty_packet_mode_flush(struct tty_struct *tty)
336 {
337 	unsigned long flags;
338 
339 	if (tty->link->packet) {
340 		spin_lock_irqsave(&tty->ctrl_lock, flags);
341 		tty->ctrl_status |= TIOCPKT_FLUSHREAD;
342 		spin_unlock_irqrestore(&tty->ctrl_lock, flags);
343 		wake_up_interruptible(&tty->link->read_wait);
344 	}
345 }
346 
347 /**
348  *	n_tty_flush_buffer	-	clean input queue
349  *	@tty:	terminal device
350  *
351  *	Flush the input buffer. Called when the tty layer wants the
352  *	buffer flushed (eg at hangup) or when the N_TTY line discipline
353  *	internally has to clean the pending queue (for example some signals).
354  *
355  *	Holds termios_rwsem to exclude producer/consumer while
356  *	buffer indices are reset.
357  *
358  *	Locking: ctrl_lock, exclusive termios_rwsem
359  */
360 
n_tty_flush_buffer(struct tty_struct * tty)361 static void n_tty_flush_buffer(struct tty_struct *tty)
362 {
363 	down_write(&tty->termios_rwsem);
364 	reset_buffer_flags(tty->disc_data);
365 	n_tty_kick_worker(tty);
366 
367 	if (tty->link)
368 		n_tty_packet_mode_flush(tty);
369 	up_write(&tty->termios_rwsem);
370 }
371 
372 /**
373  *	n_tty_chars_in_buffer	-	report available bytes
374  *	@tty: tty device
375  *
376  *	Report the number of characters buffered to be delivered to user
377  *	at this instant in time.
378  *
379  *	Locking: exclusive termios_rwsem
380  */
381 
n_tty_chars_in_buffer(struct tty_struct * tty)382 static ssize_t n_tty_chars_in_buffer(struct tty_struct *tty)
383 {
384 	ssize_t n;
385 
386 	WARN_ONCE(1, "%s is deprecated and scheduled for removal.", __func__);
387 
388 	down_write(&tty->termios_rwsem);
389 	n = chars_in_buffer(tty);
390 	up_write(&tty->termios_rwsem);
391 	return n;
392 }
393 
394 /**
395  *	is_utf8_continuation	-	utf8 multibyte check
396  *	@c: byte to check
397  *
398  *	Returns true if the utf8 character 'c' is a multibyte continuation
399  *	character. We use this to correctly compute the on screen size
400  *	of the character when printing
401  */
402 
is_utf8_continuation(unsigned char c)403 static inline int is_utf8_continuation(unsigned char c)
404 {
405 	return (c & 0xc0) == 0x80;
406 }
407 
408 /**
409  *	is_continuation		-	multibyte check
410  *	@c: byte to check
411  *
412  *	Returns true if the utf8 character 'c' is a multibyte continuation
413  *	character and the terminal is in unicode mode.
414  */
415 
is_continuation(unsigned char c,struct tty_struct * tty)416 static inline int is_continuation(unsigned char c, struct tty_struct *tty)
417 {
418 	return I_IUTF8(tty) && is_utf8_continuation(c);
419 }
420 
421 /**
422  *	do_output_char			-	output one character
423  *	@c: character (or partial unicode symbol)
424  *	@tty: terminal device
425  *	@space: space available in tty driver write buffer
426  *
427  *	This is a helper function that handles one output character
428  *	(including special characters like TAB, CR, LF, etc.),
429  *	doing OPOST processing and putting the results in the
430  *	tty driver's write buffer.
431  *
432  *	Note that Linux currently ignores TABDLY, CRDLY, VTDLY, FFDLY
433  *	and NLDLY.  They simply aren't relevant in the world today.
434  *	If you ever need them, add them here.
435  *
436  *	Returns the number of bytes of buffer space used or -1 if
437  *	no space left.
438  *
439  *	Locking: should be called under the output_lock to protect
440  *		 the column state and space left in the buffer
441  */
442 
do_output_char(unsigned char c,struct tty_struct * tty,int space)443 static int do_output_char(unsigned char c, struct tty_struct *tty, int space)
444 {
445 	struct n_tty_data *ldata = tty->disc_data;
446 	int	spaces;
447 
448 	if (!space)
449 		return -1;
450 
451 	switch (c) {
452 	case '\n':
453 		if (O_ONLRET(tty))
454 			ldata->column = 0;
455 		if (O_ONLCR(tty)) {
456 			if (space < 2)
457 				return -1;
458 			ldata->canon_column = ldata->column = 0;
459 			tty->ops->write(tty, "\r\n", 2);
460 			return 2;
461 		}
462 		ldata->canon_column = ldata->column;
463 		break;
464 	case '\r':
465 		if (O_ONOCR(tty) && ldata->column == 0)
466 			return 0;
467 		if (O_OCRNL(tty)) {
468 			c = '\n';
469 			if (O_ONLRET(tty))
470 				ldata->canon_column = ldata->column = 0;
471 			break;
472 		}
473 		ldata->canon_column = ldata->column = 0;
474 		break;
475 	case '\t':
476 		spaces = 8 - (ldata->column & 7);
477 		if (O_TABDLY(tty) == XTABS) {
478 			if (space < spaces)
479 				return -1;
480 			ldata->column += spaces;
481 			tty->ops->write(tty, "        ", spaces);
482 			return spaces;
483 		}
484 		ldata->column += spaces;
485 		break;
486 	case '\b':
487 		if (ldata->column > 0)
488 			ldata->column--;
489 		break;
490 	default:
491 		if (!iscntrl(c)) {
492 			if (O_OLCUC(tty))
493 				c = toupper(c);
494 			if (!is_continuation(c, tty))
495 				ldata->column++;
496 		}
497 		break;
498 	}
499 
500 	tty_put_char(tty, c);
501 	return 1;
502 }
503 
504 /**
505  *	process_output			-	output post processor
506  *	@c: character (or partial unicode symbol)
507  *	@tty: terminal device
508  *
509  *	Output one character with OPOST processing.
510  *	Returns -1 when the output device is full and the character
511  *	must be retried.
512  *
513  *	Locking: output_lock to protect column state and space left
514  *		 (also, this is called from n_tty_write under the
515  *		  tty layer write lock)
516  */
517 
process_output(unsigned char c,struct tty_struct * tty)518 static int process_output(unsigned char c, struct tty_struct *tty)
519 {
520 	struct n_tty_data *ldata = tty->disc_data;
521 	int	space, retval;
522 
523 	mutex_lock(&ldata->output_lock);
524 
525 	space = tty_write_room(tty);
526 	retval = do_output_char(c, tty, space);
527 
528 	mutex_unlock(&ldata->output_lock);
529 	if (retval < 0)
530 		return -1;
531 	else
532 		return 0;
533 }
534 
535 /**
536  *	process_output_block		-	block post processor
537  *	@tty: terminal device
538  *	@buf: character buffer
539  *	@nr: number of bytes to output
540  *
541  *	Output a block of characters with OPOST processing.
542  *	Returns the number of characters output.
543  *
544  *	This path is used to speed up block console writes, among other
545  *	things when processing blocks of output data. It handles only
546  *	the simple cases normally found and helps to generate blocks of
547  *	symbols for the console driver and thus improve performance.
548  *
549  *	Locking: output_lock to protect column state and space left
550  *		 (also, this is called from n_tty_write under the
551  *		  tty layer write lock)
552  */
553 
process_output_block(struct tty_struct * tty,const unsigned char * buf,unsigned int nr)554 static ssize_t process_output_block(struct tty_struct *tty,
555 				    const unsigned char *buf, unsigned int nr)
556 {
557 	struct n_tty_data *ldata = tty->disc_data;
558 	int	space;
559 	int	i;
560 	const unsigned char *cp;
561 
562 	mutex_lock(&ldata->output_lock);
563 
564 	space = tty_write_room(tty);
565 	if (!space) {
566 		mutex_unlock(&ldata->output_lock);
567 		return 0;
568 	}
569 	if (nr > space)
570 		nr = space;
571 
572 	for (i = 0, cp = buf; i < nr; i++, cp++) {
573 		unsigned char c = *cp;
574 
575 		switch (c) {
576 		case '\n':
577 			if (O_ONLRET(tty))
578 				ldata->column = 0;
579 			if (O_ONLCR(tty))
580 				goto break_out;
581 			ldata->canon_column = ldata->column;
582 			break;
583 		case '\r':
584 			if (O_ONOCR(tty) && ldata->column == 0)
585 				goto break_out;
586 			if (O_OCRNL(tty))
587 				goto break_out;
588 			ldata->canon_column = ldata->column = 0;
589 			break;
590 		case '\t':
591 			goto break_out;
592 		case '\b':
593 			if (ldata->column > 0)
594 				ldata->column--;
595 			break;
596 		default:
597 			if (!iscntrl(c)) {
598 				if (O_OLCUC(tty))
599 					goto break_out;
600 				if (!is_continuation(c, tty))
601 					ldata->column++;
602 			}
603 			break;
604 		}
605 	}
606 break_out:
607 	i = tty->ops->write(tty, buf, i);
608 
609 	mutex_unlock(&ldata->output_lock);
610 	return i;
611 }
612 
613 /**
614  *	process_echoes	-	write pending echo characters
615  *	@tty: terminal device
616  *
617  *	Write previously buffered echo (and other ldisc-generated)
618  *	characters to the tty.
619  *
620  *	Characters generated by the ldisc (including echoes) need to
621  *	be buffered because the driver's write buffer can fill during
622  *	heavy program output.  Echoing straight to the driver will
623  *	often fail under these conditions, causing lost characters and
624  *	resulting mismatches of ldisc state information.
625  *
626  *	Since the ldisc state must represent the characters actually sent
627  *	to the driver at the time of the write, operations like certain
628  *	changes in column state are also saved in the buffer and executed
629  *	here.
630  *
631  *	A circular fifo buffer is used so that the most recent characters
632  *	are prioritized.  Also, when control characters are echoed with a
633  *	prefixed "^", the pair is treated atomically and thus not separated.
634  *
635  *	Locking: callers must hold output_lock
636  */
637 
__process_echoes(struct tty_struct * tty)638 static size_t __process_echoes(struct tty_struct *tty)
639 {
640 	struct n_tty_data *ldata = tty->disc_data;
641 	int	space, old_space;
642 	size_t tail;
643 	unsigned char c;
644 
645 	old_space = space = tty_write_room(tty);
646 
647 	tail = ldata->echo_tail;
648 	while (ldata->echo_commit != tail) {
649 		c = echo_buf(ldata, tail);
650 		if (c == ECHO_OP_START) {
651 			unsigned char op;
652 			int no_space_left = 0;
653 
654 			/*
655 			 * If the buffer byte is the start of a multi-byte
656 			 * operation, get the next byte, which is either the
657 			 * op code or a control character value.
658 			 */
659 			op = echo_buf(ldata, tail + 1);
660 
661 			switch (op) {
662 				unsigned int num_chars, num_bs;
663 
664 			case ECHO_OP_ERASE_TAB:
665 				num_chars = echo_buf(ldata, tail + 2);
666 
667 				/*
668 				 * Determine how many columns to go back
669 				 * in order to erase the tab.
670 				 * This depends on the number of columns
671 				 * used by other characters within the tab
672 				 * area.  If this (modulo 8) count is from
673 				 * the start of input rather than from a
674 				 * previous tab, we offset by canon column.
675 				 * Otherwise, tab spacing is normal.
676 				 */
677 				if (!(num_chars & 0x80))
678 					num_chars += ldata->canon_column;
679 				num_bs = 8 - (num_chars & 7);
680 
681 				if (num_bs > space) {
682 					no_space_left = 1;
683 					break;
684 				}
685 				space -= num_bs;
686 				while (num_bs--) {
687 					tty_put_char(tty, '\b');
688 					if (ldata->column > 0)
689 						ldata->column--;
690 				}
691 				tail += 3;
692 				break;
693 
694 			case ECHO_OP_SET_CANON_COL:
695 				ldata->canon_column = ldata->column;
696 				tail += 2;
697 				break;
698 
699 			case ECHO_OP_MOVE_BACK_COL:
700 				if (ldata->column > 0)
701 					ldata->column--;
702 				tail += 2;
703 				break;
704 
705 			case ECHO_OP_START:
706 				/* This is an escaped echo op start code */
707 				if (!space) {
708 					no_space_left = 1;
709 					break;
710 				}
711 				tty_put_char(tty, ECHO_OP_START);
712 				ldata->column++;
713 				space--;
714 				tail += 2;
715 				break;
716 
717 			default:
718 				/*
719 				 * If the op is not a special byte code,
720 				 * it is a ctrl char tagged to be echoed
721 				 * as "^X" (where X is the letter
722 				 * representing the control char).
723 				 * Note that we must ensure there is
724 				 * enough space for the whole ctrl pair.
725 				 *
726 				 */
727 				if (space < 2) {
728 					no_space_left = 1;
729 					break;
730 				}
731 				tty_put_char(tty, '^');
732 				tty_put_char(tty, op ^ 0100);
733 				ldata->column += 2;
734 				space -= 2;
735 				tail += 2;
736 			}
737 
738 			if (no_space_left)
739 				break;
740 		} else {
741 			if (O_OPOST(tty)) {
742 				int retval = do_output_char(c, tty, space);
743 				if (retval < 0)
744 					break;
745 				space -= retval;
746 			} else {
747 				if (!space)
748 					break;
749 				tty_put_char(tty, c);
750 				space -= 1;
751 			}
752 			tail += 1;
753 		}
754 	}
755 
756 	/* If the echo buffer is nearly full (so that the possibility exists
757 	 * of echo overrun before the next commit), then discard enough
758 	 * data at the tail to prevent a subsequent overrun */
759 	while (ldata->echo_commit - tail >= ECHO_DISCARD_WATERMARK) {
760 		if (echo_buf(ldata, tail) == ECHO_OP_START) {
761 			if (echo_buf(ldata, tail + 1) == ECHO_OP_ERASE_TAB)
762 				tail += 3;
763 			else
764 				tail += 2;
765 		} else
766 			tail++;
767 	}
768 
769 	ldata->echo_tail = tail;
770 	return old_space - space;
771 }
772 
commit_echoes(struct tty_struct * tty)773 static void commit_echoes(struct tty_struct *tty)
774 {
775 	struct n_tty_data *ldata = tty->disc_data;
776 	size_t nr, old, echoed;
777 	size_t head;
778 
779 	head = ldata->echo_head;
780 	ldata->echo_mark = head;
781 	old = ldata->echo_commit - ldata->echo_tail;
782 
783 	/* Process committed echoes if the accumulated # of bytes
784 	 * is over the threshold (and try again each time another
785 	 * block is accumulated) */
786 	nr = head - ldata->echo_tail;
787 	if (nr < ECHO_COMMIT_WATERMARK || (nr % ECHO_BLOCK > old % ECHO_BLOCK))
788 		return;
789 
790 	mutex_lock(&ldata->output_lock);
791 	ldata->echo_commit = head;
792 	echoed = __process_echoes(tty);
793 	mutex_unlock(&ldata->output_lock);
794 
795 	if (echoed && tty->ops->flush_chars)
796 		tty->ops->flush_chars(tty);
797 }
798 
process_echoes(struct tty_struct * tty)799 static void process_echoes(struct tty_struct *tty)
800 {
801 	struct n_tty_data *ldata = tty->disc_data;
802 	size_t echoed;
803 
804 	if (ldata->echo_mark == ldata->echo_tail)
805 		return;
806 
807 	mutex_lock(&ldata->output_lock);
808 	ldata->echo_commit = ldata->echo_mark;
809 	echoed = __process_echoes(tty);
810 	mutex_unlock(&ldata->output_lock);
811 
812 	if (echoed && tty->ops->flush_chars)
813 		tty->ops->flush_chars(tty);
814 }
815 
816 /* NB: echo_mark and echo_head should be equivalent here */
flush_echoes(struct tty_struct * tty)817 static void flush_echoes(struct tty_struct *tty)
818 {
819 	struct n_tty_data *ldata = tty->disc_data;
820 
821 	if ((!L_ECHO(tty) && !L_ECHONL(tty)) ||
822 	    ldata->echo_commit == ldata->echo_head)
823 		return;
824 
825 	mutex_lock(&ldata->output_lock);
826 	ldata->echo_commit = ldata->echo_head;
827 	__process_echoes(tty);
828 	mutex_unlock(&ldata->output_lock);
829 }
830 
831 /**
832  *	add_echo_byte	-	add a byte to the echo buffer
833  *	@c: unicode byte to echo
834  *	@ldata: n_tty data
835  *
836  *	Add a character or operation byte to the echo buffer.
837  */
838 
add_echo_byte(unsigned char c,struct n_tty_data * ldata)839 static inline void add_echo_byte(unsigned char c, struct n_tty_data *ldata)
840 {
841 	*echo_buf_addr(ldata, ldata->echo_head++) = c;
842 }
843 
844 /**
845  *	echo_move_back_col	-	add operation to move back a column
846  *	@ldata: n_tty data
847  *
848  *	Add an operation to the echo buffer to move back one column.
849  */
850 
echo_move_back_col(struct n_tty_data * ldata)851 static void echo_move_back_col(struct n_tty_data *ldata)
852 {
853 	add_echo_byte(ECHO_OP_START, ldata);
854 	add_echo_byte(ECHO_OP_MOVE_BACK_COL, ldata);
855 }
856 
857 /**
858  *	echo_set_canon_col	-	add operation to set the canon column
859  *	@ldata: n_tty data
860  *
861  *	Add an operation to the echo buffer to set the canon column
862  *	to the current column.
863  */
864 
echo_set_canon_col(struct n_tty_data * ldata)865 static void echo_set_canon_col(struct n_tty_data *ldata)
866 {
867 	add_echo_byte(ECHO_OP_START, ldata);
868 	add_echo_byte(ECHO_OP_SET_CANON_COL, ldata);
869 }
870 
871 /**
872  *	echo_erase_tab	-	add operation to erase a tab
873  *	@num_chars: number of character columns already used
874  *	@after_tab: true if num_chars starts after a previous tab
875  *	@ldata: n_tty data
876  *
877  *	Add an operation to the echo buffer to erase a tab.
878  *
879  *	Called by the eraser function, which knows how many character
880  *	columns have been used since either a previous tab or the start
881  *	of input.  This information will be used later, along with
882  *	canon column (if applicable), to go back the correct number
883  *	of columns.
884  */
885 
echo_erase_tab(unsigned int num_chars,int after_tab,struct n_tty_data * ldata)886 static void echo_erase_tab(unsigned int num_chars, int after_tab,
887 			   struct n_tty_data *ldata)
888 {
889 	add_echo_byte(ECHO_OP_START, ldata);
890 	add_echo_byte(ECHO_OP_ERASE_TAB, ldata);
891 
892 	/* We only need to know this modulo 8 (tab spacing) */
893 	num_chars &= 7;
894 
895 	/* Set the high bit as a flag if num_chars is after a previous tab */
896 	if (after_tab)
897 		num_chars |= 0x80;
898 
899 	add_echo_byte(num_chars, ldata);
900 }
901 
902 /**
903  *	echo_char_raw	-	echo a character raw
904  *	@c: unicode byte to echo
905  *	@tty: terminal device
906  *
907  *	Echo user input back onto the screen. This must be called only when
908  *	L_ECHO(tty) is true. Called from the driver receive_buf path.
909  *
910  *	This variant does not treat control characters specially.
911  */
912 
echo_char_raw(unsigned char c,struct n_tty_data * ldata)913 static void echo_char_raw(unsigned char c, struct n_tty_data *ldata)
914 {
915 	if (c == ECHO_OP_START) {
916 		add_echo_byte(ECHO_OP_START, ldata);
917 		add_echo_byte(ECHO_OP_START, ldata);
918 	} else {
919 		add_echo_byte(c, ldata);
920 	}
921 }
922 
923 /**
924  *	echo_char	-	echo a character
925  *	@c: unicode byte to echo
926  *	@tty: terminal device
927  *
928  *	Echo user input back onto the screen. This must be called only when
929  *	L_ECHO(tty) is true. Called from the driver receive_buf path.
930  *
931  *	This variant tags control characters to be echoed as "^X"
932  *	(where X is the letter representing the control char).
933  */
934 
echo_char(unsigned char c,struct tty_struct * tty)935 static void echo_char(unsigned char c, struct tty_struct *tty)
936 {
937 	struct n_tty_data *ldata = tty->disc_data;
938 
939 	if (c == ECHO_OP_START) {
940 		add_echo_byte(ECHO_OP_START, ldata);
941 		add_echo_byte(ECHO_OP_START, ldata);
942 	} else {
943 		if (L_ECHOCTL(tty) && iscntrl(c) && c != '\t')
944 			add_echo_byte(ECHO_OP_START, ldata);
945 		add_echo_byte(c, ldata);
946 	}
947 }
948 
949 /**
950  *	finish_erasing		-	complete erase
951  *	@ldata: n_tty data
952  */
953 
finish_erasing(struct n_tty_data * ldata)954 static inline void finish_erasing(struct n_tty_data *ldata)
955 {
956 	if (ldata->erasing) {
957 		echo_char_raw('/', ldata);
958 		ldata->erasing = 0;
959 	}
960 }
961 
962 /**
963  *	eraser		-	handle erase function
964  *	@c: character input
965  *	@tty: terminal device
966  *
967  *	Perform erase and necessary output when an erase character is
968  *	present in the stream from the driver layer. Handles the complexities
969  *	of UTF-8 multibyte symbols.
970  *
971  *	n_tty_receive_buf()/producer path:
972  *		caller holds non-exclusive termios_rwsem
973  */
974 
eraser(unsigned char c,struct tty_struct * tty)975 static void eraser(unsigned char c, struct tty_struct *tty)
976 {
977 	struct n_tty_data *ldata = tty->disc_data;
978 	enum { ERASE, WERASE, KILL } kill_type;
979 	size_t head;
980 	size_t cnt;
981 	int seen_alnums;
982 
983 	if (ldata->read_head == ldata->canon_head) {
984 		/* process_output('\a', tty); */ /* what do you think? */
985 		return;
986 	}
987 	if (c == ERASE_CHAR(tty))
988 		kill_type = ERASE;
989 	else if (c == WERASE_CHAR(tty))
990 		kill_type = WERASE;
991 	else {
992 		if (!L_ECHO(tty)) {
993 			ldata->read_head = ldata->canon_head;
994 			return;
995 		}
996 		if (!L_ECHOK(tty) || !L_ECHOKE(tty) || !L_ECHOE(tty)) {
997 			ldata->read_head = ldata->canon_head;
998 			finish_erasing(ldata);
999 			echo_char(KILL_CHAR(tty), tty);
1000 			/* Add a newline if ECHOK is on and ECHOKE is off. */
1001 			if (L_ECHOK(tty))
1002 				echo_char_raw('\n', ldata);
1003 			return;
1004 		}
1005 		kill_type = KILL;
1006 	}
1007 
1008 	seen_alnums = 0;
1009 	while (ldata->read_head != ldata->canon_head) {
1010 		head = ldata->read_head;
1011 
1012 		/* erase a single possibly multibyte character */
1013 		do {
1014 			head--;
1015 			c = read_buf(ldata, head);
1016 		} while (is_continuation(c, tty) && head != ldata->canon_head);
1017 
1018 		/* do not partially erase */
1019 		if (is_continuation(c, tty))
1020 			break;
1021 
1022 		if (kill_type == WERASE) {
1023 			/* Equivalent to BSD's ALTWERASE. */
1024 			if (isalnum(c) || c == '_')
1025 				seen_alnums++;
1026 			else if (seen_alnums)
1027 				break;
1028 		}
1029 		cnt = ldata->read_head - head;
1030 		ldata->read_head = head;
1031 		if (L_ECHO(tty)) {
1032 			if (L_ECHOPRT(tty)) {
1033 				if (!ldata->erasing) {
1034 					echo_char_raw('\\', ldata);
1035 					ldata->erasing = 1;
1036 				}
1037 				/* if cnt > 1, output a multi-byte character */
1038 				echo_char(c, tty);
1039 				while (--cnt > 0) {
1040 					head++;
1041 					echo_char_raw(read_buf(ldata, head), ldata);
1042 					echo_move_back_col(ldata);
1043 				}
1044 			} else if (kill_type == ERASE && !L_ECHOE(tty)) {
1045 				echo_char(ERASE_CHAR(tty), tty);
1046 			} else if (c == '\t') {
1047 				unsigned int num_chars = 0;
1048 				int after_tab = 0;
1049 				size_t tail = ldata->read_head;
1050 
1051 				/*
1052 				 * Count the columns used for characters
1053 				 * since the start of input or after a
1054 				 * previous tab.
1055 				 * This info is used to go back the correct
1056 				 * number of columns.
1057 				 */
1058 				while (tail != ldata->canon_head) {
1059 					tail--;
1060 					c = read_buf(ldata, tail);
1061 					if (c == '\t') {
1062 						after_tab = 1;
1063 						break;
1064 					} else if (iscntrl(c)) {
1065 						if (L_ECHOCTL(tty))
1066 							num_chars += 2;
1067 					} else if (!is_continuation(c, tty)) {
1068 						num_chars++;
1069 					}
1070 				}
1071 				echo_erase_tab(num_chars, after_tab, ldata);
1072 			} else {
1073 				if (iscntrl(c) && L_ECHOCTL(tty)) {
1074 					echo_char_raw('\b', ldata);
1075 					echo_char_raw(' ', ldata);
1076 					echo_char_raw('\b', ldata);
1077 				}
1078 				if (!iscntrl(c) || L_ECHOCTL(tty)) {
1079 					echo_char_raw('\b', ldata);
1080 					echo_char_raw(' ', ldata);
1081 					echo_char_raw('\b', ldata);
1082 				}
1083 			}
1084 		}
1085 		if (kill_type == ERASE)
1086 			break;
1087 	}
1088 	if (ldata->read_head == ldata->canon_head && L_ECHO(tty))
1089 		finish_erasing(ldata);
1090 }
1091 
1092 /**
1093  *	isig		-	handle the ISIG optio
1094  *	@sig: signal
1095  *	@tty: terminal
1096  *
1097  *	Called when a signal is being sent due to terminal input.
1098  *	Called from the driver receive_buf path so serialized.
1099  *
1100  *	Performs input and output flush if !NOFLSH. In this context, the echo
1101  *	buffer is 'output'. The signal is processed first to alert any current
1102  *	readers or writers to discontinue and exit their i/o loops.
1103  *
1104  *	Locking: ctrl_lock
1105  */
1106 
__isig(int sig,struct tty_struct * tty)1107 static void __isig(int sig, struct tty_struct *tty)
1108 {
1109 	struct pid *tty_pgrp = tty_get_pgrp(tty);
1110 	if (tty_pgrp) {
1111 		kill_pgrp(tty_pgrp, sig, 1);
1112 		put_pid(tty_pgrp);
1113 	}
1114 }
1115 
isig(int sig,struct tty_struct * tty)1116 static void isig(int sig, struct tty_struct *tty)
1117 {
1118 	struct n_tty_data *ldata = tty->disc_data;
1119 
1120 	if (L_NOFLSH(tty)) {
1121 		/* signal only */
1122 		__isig(sig, tty);
1123 
1124 	} else { /* signal and flush */
1125 		up_read(&tty->termios_rwsem);
1126 		down_write(&tty->termios_rwsem);
1127 
1128 		__isig(sig, tty);
1129 
1130 		/* clear echo buffer */
1131 		mutex_lock(&ldata->output_lock);
1132 		ldata->echo_head = ldata->echo_tail = 0;
1133 		ldata->echo_mark = ldata->echo_commit = 0;
1134 		mutex_unlock(&ldata->output_lock);
1135 
1136 		/* clear output buffer */
1137 		tty_driver_flush_buffer(tty);
1138 
1139 		/* clear input buffer */
1140 		reset_buffer_flags(tty->disc_data);
1141 
1142 		/* notify pty master of flush */
1143 		if (tty->link)
1144 			n_tty_packet_mode_flush(tty);
1145 
1146 		up_write(&tty->termios_rwsem);
1147 		down_read(&tty->termios_rwsem);
1148 	}
1149 }
1150 
1151 /**
1152  *	n_tty_receive_break	-	handle break
1153  *	@tty: terminal
1154  *
1155  *	An RS232 break event has been hit in the incoming bitstream. This
1156  *	can cause a variety of events depending upon the termios settings.
1157  *
1158  *	n_tty_receive_buf()/producer path:
1159  *		caller holds non-exclusive termios_rwsem
1160  *
1161  *	Note: may get exclusive termios_rwsem if flushing input buffer
1162  */
1163 
n_tty_receive_break(struct tty_struct * tty)1164 static void n_tty_receive_break(struct tty_struct *tty)
1165 {
1166 	struct n_tty_data *ldata = tty->disc_data;
1167 
1168 	if (I_IGNBRK(tty))
1169 		return;
1170 	if (I_BRKINT(tty)) {
1171 		isig(SIGINT, tty);
1172 		return;
1173 	}
1174 	if (I_PARMRK(tty)) {
1175 		put_tty_queue('\377', ldata);
1176 		put_tty_queue('\0', ldata);
1177 	}
1178 	put_tty_queue('\0', ldata);
1179 }
1180 
1181 /**
1182  *	n_tty_receive_overrun	-	handle overrun reporting
1183  *	@tty: terminal
1184  *
1185  *	Data arrived faster than we could process it. While the tty
1186  *	driver has flagged this the bits that were missed are gone
1187  *	forever.
1188  *
1189  *	Called from the receive_buf path so single threaded. Does not
1190  *	need locking as num_overrun and overrun_time are function
1191  *	private.
1192  */
1193 
n_tty_receive_overrun(struct tty_struct * tty)1194 static void n_tty_receive_overrun(struct tty_struct *tty)
1195 {
1196 	struct n_tty_data *ldata = tty->disc_data;
1197 
1198 	ldata->num_overrun++;
1199 	if (time_after(jiffies, ldata->overrun_time + HZ) ||
1200 			time_after(ldata->overrun_time, jiffies)) {
1201 		printk(KERN_WARNING "%s: %d input overrun(s)\n",
1202 			tty_name(tty),
1203 			ldata->num_overrun);
1204 		ldata->overrun_time = jiffies;
1205 		ldata->num_overrun = 0;
1206 	}
1207 }
1208 
1209 /**
1210  *	n_tty_receive_parity_error	-	error notifier
1211  *	@tty: terminal device
1212  *	@c: character
1213  *
1214  *	Process a parity error and queue the right data to indicate
1215  *	the error case if necessary.
1216  *
1217  *	n_tty_receive_buf()/producer path:
1218  *		caller holds non-exclusive termios_rwsem
1219  */
n_tty_receive_parity_error(struct tty_struct * tty,unsigned char c)1220 static void n_tty_receive_parity_error(struct tty_struct *tty, unsigned char c)
1221 {
1222 	struct n_tty_data *ldata = tty->disc_data;
1223 
1224 	if (I_INPCK(tty)) {
1225 		if (I_IGNPAR(tty))
1226 			return;
1227 		if (I_PARMRK(tty)) {
1228 			put_tty_queue('\377', ldata);
1229 			put_tty_queue('\0', ldata);
1230 			put_tty_queue(c, ldata);
1231 		} else
1232 			put_tty_queue('\0', ldata);
1233 	} else
1234 		put_tty_queue(c, ldata);
1235 }
1236 
1237 static void
n_tty_receive_signal_char(struct tty_struct * tty,int signal,unsigned char c)1238 n_tty_receive_signal_char(struct tty_struct *tty, int signal, unsigned char c)
1239 {
1240 	isig(signal, tty);
1241 	if (I_IXON(tty))
1242 		start_tty(tty);
1243 	if (L_ECHO(tty)) {
1244 		echo_char(c, tty);
1245 		commit_echoes(tty);
1246 	} else
1247 		process_echoes(tty);
1248 	return;
1249 }
1250 
1251 /**
1252  *	n_tty_receive_char	-	perform processing
1253  *	@tty: terminal device
1254  *	@c: character
1255  *
1256  *	Process an individual character of input received from the driver.
1257  *	This is serialized with respect to itself by the rules for the
1258  *	driver above.
1259  *
1260  *	n_tty_receive_buf()/producer path:
1261  *		caller holds non-exclusive termios_rwsem
1262  *		publishes canon_head if canonical mode is active
1263  *
1264  *	Returns 1 if LNEXT was received, else returns 0
1265  */
1266 
1267 static int
n_tty_receive_char_special(struct tty_struct * tty,unsigned char c)1268 n_tty_receive_char_special(struct tty_struct *tty, unsigned char c)
1269 {
1270 	struct n_tty_data *ldata = tty->disc_data;
1271 
1272 	if (I_IXON(tty)) {
1273 		if (c == START_CHAR(tty)) {
1274 			start_tty(tty);
1275 			process_echoes(tty);
1276 			return 0;
1277 		}
1278 		if (c == STOP_CHAR(tty)) {
1279 			stop_tty(tty);
1280 			return 0;
1281 		}
1282 	}
1283 
1284 	if (L_ISIG(tty)) {
1285 		if (c == INTR_CHAR(tty)) {
1286 			n_tty_receive_signal_char(tty, SIGINT, c);
1287 			return 0;
1288 		} else if (c == QUIT_CHAR(tty)) {
1289 			n_tty_receive_signal_char(tty, SIGQUIT, c);
1290 			return 0;
1291 		} else if (c == SUSP_CHAR(tty)) {
1292 			n_tty_receive_signal_char(tty, SIGTSTP, c);
1293 			return 0;
1294 		}
1295 	}
1296 
1297 	if (tty->stopped && !tty->flow_stopped && I_IXON(tty) && I_IXANY(tty)) {
1298 		start_tty(tty);
1299 		process_echoes(tty);
1300 	}
1301 
1302 	if (c == '\r') {
1303 		if (I_IGNCR(tty))
1304 			return 0;
1305 		if (I_ICRNL(tty))
1306 			c = '\n';
1307 	} else if (c == '\n' && I_INLCR(tty))
1308 		c = '\r';
1309 
1310 	if (ldata->icanon) {
1311 		if (c == ERASE_CHAR(tty) || c == KILL_CHAR(tty) ||
1312 		    (c == WERASE_CHAR(tty) && L_IEXTEN(tty))) {
1313 			eraser(c, tty);
1314 			commit_echoes(tty);
1315 			return 0;
1316 		}
1317 		if (c == LNEXT_CHAR(tty) && L_IEXTEN(tty)) {
1318 			ldata->lnext = 1;
1319 			if (L_ECHO(tty)) {
1320 				finish_erasing(ldata);
1321 				if (L_ECHOCTL(tty)) {
1322 					echo_char_raw('^', ldata);
1323 					echo_char_raw('\b', ldata);
1324 					commit_echoes(tty);
1325 				}
1326 			}
1327 			return 1;
1328 		}
1329 		if (c == REPRINT_CHAR(tty) && L_ECHO(tty) && L_IEXTEN(tty)) {
1330 			size_t tail = ldata->canon_head;
1331 
1332 			finish_erasing(ldata);
1333 			echo_char(c, tty);
1334 			echo_char_raw('\n', ldata);
1335 			while (tail != ldata->read_head) {
1336 				echo_char(read_buf(ldata, tail), tty);
1337 				tail++;
1338 			}
1339 			commit_echoes(tty);
1340 			return 0;
1341 		}
1342 		if (c == '\n') {
1343 			if (L_ECHO(tty) || L_ECHONL(tty)) {
1344 				echo_char_raw('\n', ldata);
1345 				commit_echoes(tty);
1346 			}
1347 			goto handle_newline;
1348 		}
1349 		if (c == EOF_CHAR(tty)) {
1350 			c = __DISABLED_CHAR;
1351 			goto handle_newline;
1352 		}
1353 		if ((c == EOL_CHAR(tty)) ||
1354 		    (c == EOL2_CHAR(tty) && L_IEXTEN(tty))) {
1355 			/*
1356 			 * XXX are EOL_CHAR and EOL2_CHAR echoed?!?
1357 			 */
1358 			if (L_ECHO(tty)) {
1359 				/* Record the column of first canon char. */
1360 				if (ldata->canon_head == ldata->read_head)
1361 					echo_set_canon_col(ldata);
1362 				echo_char(c, tty);
1363 				commit_echoes(tty);
1364 			}
1365 			/*
1366 			 * XXX does PARMRK doubling happen for
1367 			 * EOL_CHAR and EOL2_CHAR?
1368 			 */
1369 			if (c == (unsigned char) '\377' && I_PARMRK(tty))
1370 				put_tty_queue(c, ldata);
1371 
1372 handle_newline:
1373 			set_bit(ldata->read_head & (N_TTY_BUF_SIZE - 1), ldata->read_flags);
1374 			put_tty_queue(c, ldata);
1375 			smp_store_release(&ldata->canon_head, ldata->read_head);
1376 			kill_fasync(&tty->fasync, SIGIO, POLL_IN);
1377 			wake_up_interruptible_poll(&tty->read_wait, POLLIN);
1378 			return 0;
1379 		}
1380 	}
1381 
1382 	if (L_ECHO(tty)) {
1383 		finish_erasing(ldata);
1384 		if (c == '\n')
1385 			echo_char_raw('\n', ldata);
1386 		else {
1387 			/* Record the column of first canon char. */
1388 			if (ldata->canon_head == ldata->read_head)
1389 				echo_set_canon_col(ldata);
1390 			echo_char(c, tty);
1391 		}
1392 		commit_echoes(tty);
1393 	}
1394 
1395 	/* PARMRK doubling check */
1396 	if (c == (unsigned char) '\377' && I_PARMRK(tty))
1397 		put_tty_queue(c, ldata);
1398 
1399 	put_tty_queue(c, ldata);
1400 	return 0;
1401 }
1402 
1403 static inline void
n_tty_receive_char_inline(struct tty_struct * tty,unsigned char c)1404 n_tty_receive_char_inline(struct tty_struct *tty, unsigned char c)
1405 {
1406 	struct n_tty_data *ldata = tty->disc_data;
1407 
1408 	if (tty->stopped && !tty->flow_stopped && I_IXON(tty) && I_IXANY(tty)) {
1409 		start_tty(tty);
1410 		process_echoes(tty);
1411 	}
1412 	if (L_ECHO(tty)) {
1413 		finish_erasing(ldata);
1414 		/* Record the column of first canon char. */
1415 		if (ldata->canon_head == ldata->read_head)
1416 			echo_set_canon_col(ldata);
1417 		echo_char(c, tty);
1418 		commit_echoes(tty);
1419 	}
1420 	/* PARMRK doubling check */
1421 	if (c == (unsigned char) '\377' && I_PARMRK(tty))
1422 		put_tty_queue(c, ldata);
1423 	put_tty_queue(c, ldata);
1424 }
1425 
n_tty_receive_char(struct tty_struct * tty,unsigned char c)1426 static void n_tty_receive_char(struct tty_struct *tty, unsigned char c)
1427 {
1428 	n_tty_receive_char_inline(tty, c);
1429 }
1430 
1431 static inline void
n_tty_receive_char_fast(struct tty_struct * tty,unsigned char c)1432 n_tty_receive_char_fast(struct tty_struct *tty, unsigned char c)
1433 {
1434 	struct n_tty_data *ldata = tty->disc_data;
1435 
1436 	if (tty->stopped && !tty->flow_stopped && I_IXON(tty) && I_IXANY(tty)) {
1437 		start_tty(tty);
1438 		process_echoes(tty);
1439 	}
1440 	if (L_ECHO(tty)) {
1441 		finish_erasing(ldata);
1442 		/* Record the column of first canon char. */
1443 		if (ldata->canon_head == ldata->read_head)
1444 			echo_set_canon_col(ldata);
1445 		echo_char(c, tty);
1446 		commit_echoes(tty);
1447 	}
1448 	put_tty_queue(c, ldata);
1449 }
1450 
n_tty_receive_char_closing(struct tty_struct * tty,unsigned char c)1451 static void n_tty_receive_char_closing(struct tty_struct *tty, unsigned char c)
1452 {
1453 	if (I_ISTRIP(tty))
1454 		c &= 0x7f;
1455 	if (I_IUCLC(tty) && L_IEXTEN(tty))
1456 		c = tolower(c);
1457 
1458 	if (I_IXON(tty)) {
1459 		if (c == STOP_CHAR(tty))
1460 			stop_tty(tty);
1461 		else if (c == START_CHAR(tty) ||
1462 			 (tty->stopped && !tty->flow_stopped && I_IXANY(tty) &&
1463 			  c != INTR_CHAR(tty) && c != QUIT_CHAR(tty) &&
1464 			  c != SUSP_CHAR(tty))) {
1465 			start_tty(tty);
1466 			process_echoes(tty);
1467 		}
1468 	}
1469 }
1470 
1471 static void
n_tty_receive_char_flagged(struct tty_struct * tty,unsigned char c,char flag)1472 n_tty_receive_char_flagged(struct tty_struct *tty, unsigned char c, char flag)
1473 {
1474 	switch (flag) {
1475 	case TTY_BREAK:
1476 		n_tty_receive_break(tty);
1477 		break;
1478 	case TTY_PARITY:
1479 	case TTY_FRAME:
1480 		n_tty_receive_parity_error(tty, c);
1481 		break;
1482 	case TTY_OVERRUN:
1483 		n_tty_receive_overrun(tty);
1484 		break;
1485 	default:
1486 		printk(KERN_ERR "%s: unknown flag %d\n",
1487 		       tty_name(tty), flag);
1488 		break;
1489 	}
1490 }
1491 
1492 static void
n_tty_receive_char_lnext(struct tty_struct * tty,unsigned char c,char flag)1493 n_tty_receive_char_lnext(struct tty_struct *tty, unsigned char c, char flag)
1494 {
1495 	struct n_tty_data *ldata = tty->disc_data;
1496 
1497 	ldata->lnext = 0;
1498 	if (likely(flag == TTY_NORMAL)) {
1499 		if (I_ISTRIP(tty))
1500 			c &= 0x7f;
1501 		if (I_IUCLC(tty) && L_IEXTEN(tty))
1502 			c = tolower(c);
1503 		n_tty_receive_char(tty, c);
1504 	} else
1505 		n_tty_receive_char_flagged(tty, c, flag);
1506 }
1507 
1508 static void
n_tty_receive_buf_real_raw(struct tty_struct * tty,const unsigned char * cp,char * fp,int count)1509 n_tty_receive_buf_real_raw(struct tty_struct *tty, const unsigned char *cp,
1510 			   char *fp, int count)
1511 {
1512 	struct n_tty_data *ldata = tty->disc_data;
1513 	size_t n, head;
1514 
1515 	head = ldata->read_head & (N_TTY_BUF_SIZE - 1);
1516 	n = min_t(size_t, count, N_TTY_BUF_SIZE - head);
1517 	memcpy(read_buf_addr(ldata, head), cp, n);
1518 	ldata->read_head += n;
1519 	cp += n;
1520 	count -= n;
1521 
1522 	head = ldata->read_head & (N_TTY_BUF_SIZE - 1);
1523 	n = min_t(size_t, count, N_TTY_BUF_SIZE - head);
1524 	memcpy(read_buf_addr(ldata, head), cp, n);
1525 	ldata->read_head += n;
1526 }
1527 
1528 static void
n_tty_receive_buf_raw(struct tty_struct * tty,const unsigned char * cp,char * fp,int count)1529 n_tty_receive_buf_raw(struct tty_struct *tty, const unsigned char *cp,
1530 		      char *fp, int count)
1531 {
1532 	struct n_tty_data *ldata = tty->disc_data;
1533 	char flag = TTY_NORMAL;
1534 
1535 	while (count--) {
1536 		if (fp)
1537 			flag = *fp++;
1538 		if (likely(flag == TTY_NORMAL))
1539 			put_tty_queue(*cp++, ldata);
1540 		else
1541 			n_tty_receive_char_flagged(tty, *cp++, flag);
1542 	}
1543 }
1544 
1545 static void
n_tty_receive_buf_closing(struct tty_struct * tty,const unsigned char * cp,char * fp,int count)1546 n_tty_receive_buf_closing(struct tty_struct *tty, const unsigned char *cp,
1547 			  char *fp, int count)
1548 {
1549 	char flag = TTY_NORMAL;
1550 
1551 	while (count--) {
1552 		if (fp)
1553 			flag = *fp++;
1554 		if (likely(flag == TTY_NORMAL))
1555 			n_tty_receive_char_closing(tty, *cp++);
1556 		else
1557 			n_tty_receive_char_flagged(tty, *cp++, flag);
1558 	}
1559 }
1560 
1561 static void
n_tty_receive_buf_standard(struct tty_struct * tty,const unsigned char * cp,char * fp,int count)1562 n_tty_receive_buf_standard(struct tty_struct *tty, const unsigned char *cp,
1563 			  char *fp, int count)
1564 {
1565 	struct n_tty_data *ldata = tty->disc_data;
1566 	char flag = TTY_NORMAL;
1567 
1568 	while (count--) {
1569 		if (fp)
1570 			flag = *fp++;
1571 		if (likely(flag == TTY_NORMAL)) {
1572 			unsigned char c = *cp++;
1573 
1574 			if (I_ISTRIP(tty))
1575 				c &= 0x7f;
1576 			if (I_IUCLC(tty) && L_IEXTEN(tty))
1577 				c = tolower(c);
1578 			if (L_EXTPROC(tty)) {
1579 				put_tty_queue(c, ldata);
1580 				continue;
1581 			}
1582 			if (!test_bit(c, ldata->char_map))
1583 				n_tty_receive_char_inline(tty, c);
1584 			else if (n_tty_receive_char_special(tty, c) && count) {
1585 				if (fp)
1586 					flag = *fp++;
1587 				n_tty_receive_char_lnext(tty, *cp++, flag);
1588 				count--;
1589 			}
1590 		} else
1591 			n_tty_receive_char_flagged(tty, *cp++, flag);
1592 	}
1593 }
1594 
1595 static void
n_tty_receive_buf_fast(struct tty_struct * tty,const unsigned char * cp,char * fp,int count)1596 n_tty_receive_buf_fast(struct tty_struct *tty, const unsigned char *cp,
1597 		       char *fp, int count)
1598 {
1599 	struct n_tty_data *ldata = tty->disc_data;
1600 	char flag = TTY_NORMAL;
1601 
1602 	while (count--) {
1603 		if (fp)
1604 			flag = *fp++;
1605 		if (likely(flag == TTY_NORMAL)) {
1606 			unsigned char c = *cp++;
1607 
1608 			if (!test_bit(c, ldata->char_map))
1609 				n_tty_receive_char_fast(tty, c);
1610 			else if (n_tty_receive_char_special(tty, c) && count) {
1611 				if (fp)
1612 					flag = *fp++;
1613 				n_tty_receive_char_lnext(tty, *cp++, flag);
1614 				count--;
1615 			}
1616 		} else
1617 			n_tty_receive_char_flagged(tty, *cp++, flag);
1618 	}
1619 }
1620 
__receive_buf(struct tty_struct * tty,const unsigned char * cp,char * fp,int count)1621 static void __receive_buf(struct tty_struct *tty, const unsigned char *cp,
1622 			  char *fp, int count)
1623 {
1624 	struct n_tty_data *ldata = tty->disc_data;
1625 	bool preops = I_ISTRIP(tty) || (I_IUCLC(tty) && L_IEXTEN(tty));
1626 
1627 	if (ldata->real_raw)
1628 		n_tty_receive_buf_real_raw(tty, cp, fp, count);
1629 	else if (ldata->raw || (L_EXTPROC(tty) && !preops))
1630 		n_tty_receive_buf_raw(tty, cp, fp, count);
1631 	else if (tty->closing && !L_EXTPROC(tty))
1632 		n_tty_receive_buf_closing(tty, cp, fp, count);
1633 	else {
1634 		if (ldata->lnext) {
1635 			char flag = TTY_NORMAL;
1636 
1637 			if (fp)
1638 				flag = *fp++;
1639 			n_tty_receive_char_lnext(tty, *cp++, flag);
1640 			count--;
1641 		}
1642 
1643 		if (!preops && !I_PARMRK(tty))
1644 			n_tty_receive_buf_fast(tty, cp, fp, count);
1645 		else
1646 			n_tty_receive_buf_standard(tty, cp, fp, count);
1647 
1648 		flush_echoes(tty);
1649 		if (tty->ops->flush_chars)
1650 			tty->ops->flush_chars(tty);
1651 	}
1652 
1653 	if (ldata->icanon && !L_EXTPROC(tty))
1654 		return;
1655 
1656 	/* publish read_head to consumer */
1657 	smp_store_release(&ldata->commit_head, ldata->read_head);
1658 
1659 	if ((read_cnt(ldata) >= ldata->minimum_to_wake) || L_EXTPROC(tty)) {
1660 		kill_fasync(&tty->fasync, SIGIO, POLL_IN);
1661 		wake_up_interruptible_poll(&tty->read_wait, POLLIN);
1662 	}
1663 }
1664 
1665 /**
1666  *	n_tty_receive_buf_common	-	process input
1667  *	@tty: device to receive input
1668  *	@cp: input chars
1669  *	@fp: flags for each char (if NULL, all chars are TTY_NORMAL)
1670  *	@count: number of input chars in @cp
1671  *
1672  *	Called by the terminal driver when a block of characters has
1673  *	been received. This function must be called from soft contexts
1674  *	not from interrupt context. The driver is responsible for making
1675  *	calls one at a time and in order (or using flush_to_ldisc)
1676  *
1677  *	Returns the # of input chars from @cp which were processed.
1678  *
1679  *	In canonical mode, the maximum line length is 4096 chars (including
1680  *	the line termination char); lines longer than 4096 chars are
1681  *	truncated. After 4095 chars, input data is still processed but
1682  *	not stored. Overflow processing ensures the tty can always
1683  *	receive more input until at least one line can be read.
1684  *
1685  *	In non-canonical mode, the read buffer will only accept 4095 chars;
1686  *	this provides the necessary space for a newline char if the input
1687  *	mode is switched to canonical.
1688  *
1689  *	Note it is possible for the read buffer to _contain_ 4096 chars
1690  *	in non-canonical mode: the read buffer could already contain the
1691  *	maximum canon line of 4096 chars when the mode is switched to
1692  *	non-canonical.
1693  *
1694  *	n_tty_receive_buf()/producer path:
1695  *		claims non-exclusive termios_rwsem
1696  *		publishes commit_head or canon_head
1697  */
1698 static int
n_tty_receive_buf_common(struct tty_struct * tty,const unsigned char * cp,char * fp,int count,int flow)1699 n_tty_receive_buf_common(struct tty_struct *tty, const unsigned char *cp,
1700 			 char *fp, int count, int flow)
1701 {
1702 	struct n_tty_data *ldata = tty->disc_data;
1703 	int room, n, rcvd = 0, overflow;
1704 
1705 	down_read(&tty->termios_rwsem);
1706 
1707 	while (1) {
1708 		/*
1709 		 * When PARMRK is set, each input char may take up to 3 chars
1710 		 * in the read buf; reduce the buffer space avail by 3x
1711 		 *
1712 		 * If we are doing input canonicalization, and there are no
1713 		 * pending newlines, let characters through without limit, so
1714 		 * that erase characters will be handled.  Other excess
1715 		 * characters will be beeped.
1716 		 *
1717 		 * paired with store in *_copy_from_read_buf() -- guarantees
1718 		 * the consumer has loaded the data in read_buf up to the new
1719 		 * read_tail (so this producer will not overwrite unread data)
1720 		 */
1721 		size_t tail = smp_load_acquire(&ldata->read_tail);
1722 
1723 		room = N_TTY_BUF_SIZE - (ldata->read_head - tail);
1724 		if (I_PARMRK(tty))
1725 			room = (room + 2) / 3;
1726 		room--;
1727 		if (room <= 0) {
1728 			overflow = ldata->icanon && ldata->canon_head == tail;
1729 			if (overflow && room < 0)
1730 				ldata->read_head--;
1731 			room = overflow;
1732 			ldata->no_room = flow && !room;
1733 		} else
1734 			overflow = 0;
1735 
1736 		n = min(count, room);
1737 		if (!n)
1738 			break;
1739 
1740 		/* ignore parity errors if handling overflow */
1741 		if (!overflow || !fp || *fp != TTY_PARITY)
1742 			__receive_buf(tty, cp, fp, n);
1743 
1744 		cp += n;
1745 		if (fp)
1746 			fp += n;
1747 		count -= n;
1748 		rcvd += n;
1749 	}
1750 
1751 	tty->receive_room = room;
1752 
1753 	/* Unthrottle if handling overflow on pty */
1754 	if (tty->driver->type == TTY_DRIVER_TYPE_PTY) {
1755 		if (overflow) {
1756 			tty_set_flow_change(tty, TTY_UNTHROTTLE_SAFE);
1757 			tty_unthrottle_safe(tty);
1758 			__tty_set_flow_change(tty, 0);
1759 		}
1760 	} else
1761 		n_tty_check_throttle(tty);
1762 
1763 	up_read(&tty->termios_rwsem);
1764 
1765 	return rcvd;
1766 }
1767 
n_tty_receive_buf(struct tty_struct * tty,const unsigned char * cp,char * fp,int count)1768 static void n_tty_receive_buf(struct tty_struct *tty, const unsigned char *cp,
1769 			      char *fp, int count)
1770 {
1771 	n_tty_receive_buf_common(tty, cp, fp, count, 0);
1772 }
1773 
n_tty_receive_buf2(struct tty_struct * tty,const unsigned char * cp,char * fp,int count)1774 static int n_tty_receive_buf2(struct tty_struct *tty, const unsigned char *cp,
1775 			      char *fp, int count)
1776 {
1777 	return n_tty_receive_buf_common(tty, cp, fp, count, 1);
1778 }
1779 
is_ignored(int sig)1780 int is_ignored(int sig)
1781 {
1782 	return (sigismember(&current->blocked, sig) ||
1783 		current->sighand->action[sig-1].sa.sa_handler == SIG_IGN);
1784 }
1785 
1786 /**
1787  *	n_tty_set_termios	-	termios data changed
1788  *	@tty: terminal
1789  *	@old: previous data
1790  *
1791  *	Called by the tty layer when the user changes termios flags so
1792  *	that the line discipline can plan ahead. This function cannot sleep
1793  *	and is protected from re-entry by the tty layer. The user is
1794  *	guaranteed that this function will not be re-entered or in progress
1795  *	when the ldisc is closed.
1796  *
1797  *	Locking: Caller holds tty->termios_rwsem
1798  */
1799 
n_tty_set_termios(struct tty_struct * tty,struct ktermios * old)1800 static void n_tty_set_termios(struct tty_struct *tty, struct ktermios *old)
1801 {
1802 	struct n_tty_data *ldata = tty->disc_data;
1803 
1804 	if (!old || (old->c_lflag ^ tty->termios.c_lflag) & ICANON) {
1805 		bitmap_zero(ldata->read_flags, N_TTY_BUF_SIZE);
1806 		ldata->line_start = ldata->read_tail;
1807 		if (!L_ICANON(tty) || !read_cnt(ldata)) {
1808 			ldata->canon_head = ldata->read_tail;
1809 			ldata->push = 0;
1810 		} else {
1811 			set_bit((ldata->read_head - 1) & (N_TTY_BUF_SIZE - 1),
1812 				ldata->read_flags);
1813 			ldata->canon_head = ldata->read_head;
1814 			ldata->push = 1;
1815 		}
1816 		ldata->commit_head = ldata->read_head;
1817 		ldata->erasing = 0;
1818 		ldata->lnext = 0;
1819 	}
1820 
1821 	ldata->icanon = (L_ICANON(tty) != 0);
1822 
1823 	if (I_ISTRIP(tty) || I_IUCLC(tty) || I_IGNCR(tty) ||
1824 	    I_ICRNL(tty) || I_INLCR(tty) || L_ICANON(tty) ||
1825 	    I_IXON(tty) || L_ISIG(tty) || L_ECHO(tty) ||
1826 	    I_PARMRK(tty)) {
1827 		bitmap_zero(ldata->char_map, 256);
1828 
1829 		if (I_IGNCR(tty) || I_ICRNL(tty))
1830 			set_bit('\r', ldata->char_map);
1831 		if (I_INLCR(tty))
1832 			set_bit('\n', ldata->char_map);
1833 
1834 		if (L_ICANON(tty)) {
1835 			set_bit(ERASE_CHAR(tty), ldata->char_map);
1836 			set_bit(KILL_CHAR(tty), ldata->char_map);
1837 			set_bit(EOF_CHAR(tty), ldata->char_map);
1838 			set_bit('\n', ldata->char_map);
1839 			set_bit(EOL_CHAR(tty), ldata->char_map);
1840 			if (L_IEXTEN(tty)) {
1841 				set_bit(WERASE_CHAR(tty), ldata->char_map);
1842 				set_bit(LNEXT_CHAR(tty), ldata->char_map);
1843 				set_bit(EOL2_CHAR(tty), ldata->char_map);
1844 				if (L_ECHO(tty))
1845 					set_bit(REPRINT_CHAR(tty),
1846 						ldata->char_map);
1847 			}
1848 		}
1849 		if (I_IXON(tty)) {
1850 			set_bit(START_CHAR(tty), ldata->char_map);
1851 			set_bit(STOP_CHAR(tty), ldata->char_map);
1852 		}
1853 		if (L_ISIG(tty)) {
1854 			set_bit(INTR_CHAR(tty), ldata->char_map);
1855 			set_bit(QUIT_CHAR(tty), ldata->char_map);
1856 			set_bit(SUSP_CHAR(tty), ldata->char_map);
1857 		}
1858 		clear_bit(__DISABLED_CHAR, ldata->char_map);
1859 		ldata->raw = 0;
1860 		ldata->real_raw = 0;
1861 	} else {
1862 		ldata->raw = 1;
1863 		if ((I_IGNBRK(tty) || (!I_BRKINT(tty) && !I_PARMRK(tty))) &&
1864 		    (I_IGNPAR(tty) || !I_INPCK(tty)) &&
1865 		    (tty->driver->flags & TTY_DRIVER_REAL_RAW))
1866 			ldata->real_raw = 1;
1867 		else
1868 			ldata->real_raw = 0;
1869 	}
1870 	/*
1871 	 * Fix tty hang when I_IXON(tty) is cleared, but the tty
1872 	 * been stopped by STOP_CHAR(tty) before it.
1873 	 */
1874 	if (!I_IXON(tty) && old && (old->c_iflag & IXON) && !tty->flow_stopped) {
1875 		start_tty(tty);
1876 		process_echoes(tty);
1877 	}
1878 
1879 	/* The termios change make the tty ready for I/O */
1880 	wake_up_interruptible(&tty->write_wait);
1881 	wake_up_interruptible(&tty->read_wait);
1882 }
1883 
1884 /**
1885  *	n_tty_close		-	close the ldisc for this tty
1886  *	@tty: device
1887  *
1888  *	Called from the terminal layer when this line discipline is
1889  *	being shut down, either because of a close or becsuse of a
1890  *	discipline change. The function will not be called while other
1891  *	ldisc methods are in progress.
1892  */
1893 
n_tty_close(struct tty_struct * tty)1894 static void n_tty_close(struct tty_struct *tty)
1895 {
1896 	struct n_tty_data *ldata = tty->disc_data;
1897 
1898 	if (tty->link)
1899 		n_tty_packet_mode_flush(tty);
1900 
1901 	vfree(ldata);
1902 	tty->disc_data = NULL;
1903 }
1904 
1905 /**
1906  *	n_tty_open		-	open an ldisc
1907  *	@tty: terminal to open
1908  *
1909  *	Called when this line discipline is being attached to the
1910  *	terminal device. Can sleep. Called serialized so that no
1911  *	other events will occur in parallel. No further open will occur
1912  *	until a close.
1913  */
1914 
n_tty_open(struct tty_struct * tty)1915 static int n_tty_open(struct tty_struct *tty)
1916 {
1917 	struct n_tty_data *ldata;
1918 
1919 	/* Currently a malloc failure here can panic */
1920 	ldata = vmalloc(sizeof(*ldata));
1921 	if (!ldata)
1922 		goto err;
1923 
1924 	ldata->overrun_time = jiffies;
1925 	mutex_init(&ldata->atomic_read_lock);
1926 	mutex_init(&ldata->output_lock);
1927 
1928 	tty->disc_data = ldata;
1929 	reset_buffer_flags(tty->disc_data);
1930 	ldata->column = 0;
1931 	ldata->canon_column = 0;
1932 	ldata->minimum_to_wake = 1;
1933 	ldata->num_overrun = 0;
1934 	ldata->no_room = 0;
1935 	ldata->lnext = 0;
1936 	tty->closing = 0;
1937 	/* indicate buffer work may resume */
1938 	clear_bit(TTY_LDISC_HALTED, &tty->flags);
1939 	n_tty_set_termios(tty, NULL);
1940 	tty_unthrottle(tty);
1941 
1942 	return 0;
1943 err:
1944 	return -ENOMEM;
1945 }
1946 
input_available_p(struct tty_struct * tty,int poll)1947 static inline int input_available_p(struct tty_struct *tty, int poll)
1948 {
1949 	struct n_tty_data *ldata = tty->disc_data;
1950 	int amt = poll && !TIME_CHAR(tty) && MIN_CHAR(tty) ? MIN_CHAR(tty) : 1;
1951 
1952 	if (ldata->icanon && !L_EXTPROC(tty))
1953 		return ldata->canon_head != ldata->read_tail;
1954 	else
1955 		return ldata->commit_head - ldata->read_tail >= amt;
1956 }
1957 
1958 /**
1959  *	copy_from_read_buf	-	copy read data directly
1960  *	@tty: terminal device
1961  *	@b: user data
1962  *	@nr: size of data
1963  *
1964  *	Helper function to speed up n_tty_read.  It is only called when
1965  *	ICANON is off; it copies characters straight from the tty queue to
1966  *	user space directly.  It can be profitably called twice; once to
1967  *	drain the space from the tail pointer to the (physical) end of the
1968  *	buffer, and once to drain the space from the (physical) beginning of
1969  *	the buffer to head pointer.
1970  *
1971  *	Called under the ldata->atomic_read_lock sem
1972  *
1973  *	n_tty_read()/consumer path:
1974  *		caller holds non-exclusive termios_rwsem
1975  *		read_tail published
1976  */
1977 
copy_from_read_buf(struct tty_struct * tty,unsigned char __user ** b,size_t * nr)1978 static int copy_from_read_buf(struct tty_struct *tty,
1979 				      unsigned char __user **b,
1980 				      size_t *nr)
1981 
1982 {
1983 	struct n_tty_data *ldata = tty->disc_data;
1984 	int retval;
1985 	size_t n;
1986 	bool is_eof;
1987 	size_t head = smp_load_acquire(&ldata->commit_head);
1988 	size_t tail = ldata->read_tail & (N_TTY_BUF_SIZE - 1);
1989 
1990 	retval = 0;
1991 	n = min(head - ldata->read_tail, N_TTY_BUF_SIZE - tail);
1992 	n = min(*nr, n);
1993 	if (n) {
1994 		retval = copy_to_user(*b, read_buf_addr(ldata, tail), n);
1995 		n -= retval;
1996 		is_eof = n == 1 && read_buf(ldata, tail) == EOF_CHAR(tty);
1997 		tty_audit_add_data(tty, read_buf_addr(ldata, tail), n,
1998 				ldata->icanon);
1999 		smp_store_release(&ldata->read_tail, ldata->read_tail + n);
2000 		/* Turn single EOF into zero-length read */
2001 		if (L_EXTPROC(tty) && ldata->icanon && is_eof &&
2002 		    (head == ldata->read_tail))
2003 			n = 0;
2004 		*b += n;
2005 		*nr -= n;
2006 	}
2007 	return retval;
2008 }
2009 
2010 /**
2011  *	canon_copy_from_read_buf	-	copy read data in canonical mode
2012  *	@tty: terminal device
2013  *	@b: user data
2014  *	@nr: size of data
2015  *
2016  *	Helper function for n_tty_read.  It is only called when ICANON is on;
2017  *	it copies one line of input up to and including the line-delimiting
2018  *	character into the user-space buffer.
2019  *
2020  *	NB: When termios is changed from non-canonical to canonical mode and
2021  *	the read buffer contains data, n_tty_set_termios() simulates an EOF
2022  *	push (as if C-d were input) _without_ the DISABLED_CHAR in the buffer.
2023  *	This causes data already processed as input to be immediately available
2024  *	as input although a newline has not been received.
2025  *
2026  *	Called under the atomic_read_lock mutex
2027  *
2028  *	n_tty_read()/consumer path:
2029  *		caller holds non-exclusive termios_rwsem
2030  *		read_tail published
2031  */
2032 
canon_copy_from_read_buf(struct tty_struct * tty,unsigned char __user ** b,size_t * nr)2033 static int canon_copy_from_read_buf(struct tty_struct *tty,
2034 				    unsigned char __user **b,
2035 				    size_t *nr)
2036 {
2037 	struct n_tty_data *ldata = tty->disc_data;
2038 	size_t n, size, more, c;
2039 	size_t eol;
2040 	size_t tail;
2041 	int ret, found = 0;
2042 
2043 	/* N.B. avoid overrun if nr == 0 */
2044 	if (!*nr)
2045 		return 0;
2046 
2047 	n = min(*nr + 1, smp_load_acquire(&ldata->canon_head) - ldata->read_tail);
2048 
2049 	tail = ldata->read_tail & (N_TTY_BUF_SIZE - 1);
2050 	size = min_t(size_t, tail + n, N_TTY_BUF_SIZE);
2051 
2052 	n_tty_trace("%s: nr:%zu tail:%zu n:%zu size:%zu\n",
2053 		    __func__, *nr, tail, n, size);
2054 
2055 	eol = find_next_bit(ldata->read_flags, size, tail);
2056 	more = n - (size - tail);
2057 	if (eol == N_TTY_BUF_SIZE && more) {
2058 		/* scan wrapped without finding set bit */
2059 		eol = find_next_bit(ldata->read_flags, more, 0);
2060 		if (eol != more)
2061 			found = 1;
2062 	} else if (eol != size)
2063 		found = 1;
2064 
2065 	size = N_TTY_BUF_SIZE - tail;
2066 	n = eol - tail;
2067 	if (n > N_TTY_BUF_SIZE)
2068 		n += N_TTY_BUF_SIZE;
2069 	c = n + found;
2070 
2071 	if (!found || read_buf(ldata, eol) != __DISABLED_CHAR) {
2072 		c = min(*nr, c);
2073 		n = c;
2074 	}
2075 
2076 	n_tty_trace("%s: eol:%zu found:%d n:%zu c:%zu size:%zu more:%zu\n",
2077 		    __func__, eol, found, n, c, size, more);
2078 
2079 	if (n > size) {
2080 		ret = tty_copy_to_user(tty, *b, read_buf_addr(ldata, tail), size);
2081 		if (ret)
2082 			return -EFAULT;
2083 		ret = tty_copy_to_user(tty, *b + size, ldata->read_buf, n - size);
2084 	} else
2085 		ret = tty_copy_to_user(tty, *b, read_buf_addr(ldata, tail), n);
2086 
2087 	if (ret)
2088 		return -EFAULT;
2089 	*b += n;
2090 	*nr -= n;
2091 
2092 	if (found)
2093 		clear_bit(eol, ldata->read_flags);
2094 	smp_store_release(&ldata->read_tail, ldata->read_tail + c);
2095 
2096 	if (found) {
2097 		if (!ldata->push)
2098 			ldata->line_start = ldata->read_tail;
2099 		else
2100 			ldata->push = 0;
2101 		tty_audit_push(tty);
2102 	}
2103 	return 0;
2104 }
2105 
2106 extern ssize_t redirected_tty_write(struct file *, const char __user *,
2107 							size_t, loff_t *);
2108 
2109 /**
2110  *	job_control		-	check job control
2111  *	@tty: tty
2112  *	@file: file handle
2113  *
2114  *	Perform job control management checks on this file/tty descriptor
2115  *	and if appropriate send any needed signals and return a negative
2116  *	error code if action should be taken.
2117  *
2118  *	Locking: redirected write test is safe
2119  *		 current->signal->tty check is safe
2120  *		 ctrl_lock to safely reference tty->pgrp
2121  */
2122 
job_control(struct tty_struct * tty,struct file * file)2123 static int job_control(struct tty_struct *tty, struct file *file)
2124 {
2125 	/* Job control check -- must be done at start and after
2126 	   every sleep (POSIX.1 7.1.1.4). */
2127 	/* NOTE: not yet done after every sleep pending a thorough
2128 	   check of the logic of this change. -- jlc */
2129 	/* don't stop on /dev/console */
2130 	if (file->f_op->write == redirected_tty_write)
2131 		return 0;
2132 
2133 	return __tty_check_change(tty, SIGTTIN);
2134 }
2135 
2136 
2137 /**
2138  *	n_tty_read		-	read function for tty
2139  *	@tty: tty device
2140  *	@file: file object
2141  *	@buf: userspace buffer pointer
2142  *	@nr: size of I/O
2143  *
2144  *	Perform reads for the line discipline. We are guaranteed that the
2145  *	line discipline will not be closed under us but we may get multiple
2146  *	parallel readers and must handle this ourselves. We may also get
2147  *	a hangup. Always called in user context, may sleep.
2148  *
2149  *	This code must be sure never to sleep through a hangup.
2150  *
2151  *	n_tty_read()/consumer path:
2152  *		claims non-exclusive termios_rwsem
2153  *		publishes read_tail
2154  */
2155 
n_tty_read(struct tty_struct * tty,struct file * file,unsigned char __user * buf,size_t nr)2156 static ssize_t n_tty_read(struct tty_struct *tty, struct file *file,
2157 			 unsigned char __user *buf, size_t nr)
2158 {
2159 	struct n_tty_data *ldata = tty->disc_data;
2160 	unsigned char __user *b = buf;
2161 	DEFINE_WAIT_FUNC(wait, woken_wake_function);
2162 	int c;
2163 	int minimum, time;
2164 	ssize_t retval = 0;
2165 	long timeout;
2166 	int packet;
2167 	size_t tail;
2168 
2169 	c = job_control(tty, file);
2170 	if (c < 0)
2171 		return c;
2172 
2173 	/*
2174 	 *	Internal serialization of reads.
2175 	 */
2176 	if (file->f_flags & O_NONBLOCK) {
2177 		if (!mutex_trylock(&ldata->atomic_read_lock))
2178 			return -EAGAIN;
2179 	} else {
2180 		if (mutex_lock_interruptible(&ldata->atomic_read_lock))
2181 			return -ERESTARTSYS;
2182 	}
2183 
2184 	down_read(&tty->termios_rwsem);
2185 
2186 	minimum = time = 0;
2187 	timeout = MAX_SCHEDULE_TIMEOUT;
2188 	if (!ldata->icanon) {
2189 		minimum = MIN_CHAR(tty);
2190 		if (minimum) {
2191 			time = (HZ / 10) * TIME_CHAR(tty);
2192 			if (time)
2193 				ldata->minimum_to_wake = 1;
2194 			else if (!waitqueue_active(&tty->read_wait) ||
2195 				 (ldata->minimum_to_wake > minimum))
2196 				ldata->minimum_to_wake = minimum;
2197 		} else {
2198 			timeout = (HZ / 10) * TIME_CHAR(tty);
2199 			ldata->minimum_to_wake = minimum = 1;
2200 		}
2201 	}
2202 
2203 	packet = tty->packet;
2204 	tail = ldata->read_tail;
2205 
2206 	add_wait_queue(&tty->read_wait, &wait);
2207 	while (nr) {
2208 		/* First test for status change. */
2209 		if (packet && tty->link->ctrl_status) {
2210 			unsigned char cs;
2211 			if (b != buf)
2212 				break;
2213 			spin_lock_irq(&tty->link->ctrl_lock);
2214 			cs = tty->link->ctrl_status;
2215 			tty->link->ctrl_status = 0;
2216 			spin_unlock_irq(&tty->link->ctrl_lock);
2217 			if (tty_put_user(tty, cs, b++)) {
2218 				retval = -EFAULT;
2219 				b--;
2220 				break;
2221 			}
2222 			nr--;
2223 			break;
2224 		}
2225 
2226 		if (((minimum - (b - buf)) < ldata->minimum_to_wake) &&
2227 		    ((minimum - (b - buf)) >= 1))
2228 			ldata->minimum_to_wake = (minimum - (b - buf));
2229 
2230 		if (!input_available_p(tty, 0)) {
2231 			up_read(&tty->termios_rwsem);
2232 			tty_buffer_flush_work(tty->port);
2233 			down_read(&tty->termios_rwsem);
2234 			if (!input_available_p(tty, 0)) {
2235 				if (test_bit(TTY_OTHER_CLOSED, &tty->flags)) {
2236 					retval = -EIO;
2237 					break;
2238 				}
2239 				if (tty_hung_up_p(file))
2240 					break;
2241 				if (!timeout)
2242 					break;
2243 				if (file->f_flags & O_NONBLOCK) {
2244 					retval = -EAGAIN;
2245 					break;
2246 				}
2247 				if (signal_pending(current)) {
2248 					retval = -ERESTARTSYS;
2249 					break;
2250 				}
2251 				up_read(&tty->termios_rwsem);
2252 
2253 				timeout = wait_woken(&wait, TASK_INTERRUPTIBLE,
2254 						timeout);
2255 
2256 				down_read(&tty->termios_rwsem);
2257 				continue;
2258 			}
2259 		}
2260 
2261 		if (ldata->icanon && !L_EXTPROC(tty)) {
2262 			retval = canon_copy_from_read_buf(tty, &b, &nr);
2263 			if (retval)
2264 				break;
2265 		} else {
2266 			int uncopied;
2267 
2268 			/* Deal with packet mode. */
2269 			if (packet && b == buf) {
2270 				if (tty_put_user(tty, TIOCPKT_DATA, b++)) {
2271 					retval = -EFAULT;
2272 					b--;
2273 					break;
2274 				}
2275 				nr--;
2276 			}
2277 
2278 			uncopied = copy_from_read_buf(tty, &b, &nr);
2279 			uncopied += copy_from_read_buf(tty, &b, &nr);
2280 			if (uncopied) {
2281 				retval = -EFAULT;
2282 				break;
2283 			}
2284 		}
2285 
2286 		n_tty_check_unthrottle(tty);
2287 
2288 		if (b - buf >= minimum)
2289 			break;
2290 		if (time)
2291 			timeout = time;
2292 	}
2293 	if (tail != ldata->read_tail)
2294 		n_tty_kick_worker(tty);
2295 	up_read(&tty->termios_rwsem);
2296 
2297 	remove_wait_queue(&tty->read_wait, &wait);
2298 	if (!waitqueue_active(&tty->read_wait))
2299 		ldata->minimum_to_wake = minimum;
2300 
2301 	mutex_unlock(&ldata->atomic_read_lock);
2302 
2303 	if (b - buf)
2304 		retval = b - buf;
2305 
2306 	return retval;
2307 }
2308 
2309 /**
2310  *	n_tty_write		-	write function for tty
2311  *	@tty: tty device
2312  *	@file: file object
2313  *	@buf: userspace buffer pointer
2314  *	@nr: size of I/O
2315  *
2316  *	Write function of the terminal device.  This is serialized with
2317  *	respect to other write callers but not to termios changes, reads
2318  *	and other such events.  Since the receive code will echo characters,
2319  *	thus calling driver write methods, the output_lock is used in
2320  *	the output processing functions called here as well as in the
2321  *	echo processing function to protect the column state and space
2322  *	left in the buffer.
2323  *
2324  *	This code must be sure never to sleep through a hangup.
2325  *
2326  *	Locking: output_lock to protect column state and space left
2327  *		 (note that the process_output*() functions take this
2328  *		  lock themselves)
2329  */
2330 
n_tty_write(struct tty_struct * tty,struct file * file,const unsigned char * buf,size_t nr)2331 static ssize_t n_tty_write(struct tty_struct *tty, struct file *file,
2332 			   const unsigned char *buf, size_t nr)
2333 {
2334 	const unsigned char *b = buf;
2335 	DEFINE_WAIT_FUNC(wait, woken_wake_function);
2336 	int c;
2337 	ssize_t retval = 0;
2338 
2339 	/* Job control check -- must be done at start (POSIX.1 7.1.1.4). */
2340 	if (L_TOSTOP(tty) && file->f_op->write != redirected_tty_write) {
2341 		retval = tty_check_change(tty);
2342 		if (retval)
2343 			return retval;
2344 	}
2345 
2346 	down_read(&tty->termios_rwsem);
2347 
2348 	/* Write out any echoed characters that are still pending */
2349 	process_echoes(tty);
2350 
2351 	add_wait_queue(&tty->write_wait, &wait);
2352 	while (1) {
2353 		if (signal_pending(current)) {
2354 			retval = -ERESTARTSYS;
2355 			break;
2356 		}
2357 		if (tty_hung_up_p(file) || (tty->link && !tty->link->count)) {
2358 			retval = -EIO;
2359 			break;
2360 		}
2361 		if (O_OPOST(tty)) {
2362 			while (nr > 0) {
2363 				ssize_t num = process_output_block(tty, b, nr);
2364 				if (num < 0) {
2365 					if (num == -EAGAIN)
2366 						break;
2367 					retval = num;
2368 					goto break_out;
2369 				}
2370 				b += num;
2371 				nr -= num;
2372 				if (nr == 0)
2373 					break;
2374 				c = *b;
2375 				if (process_output(c, tty) < 0)
2376 					break;
2377 				b++; nr--;
2378 			}
2379 			if (tty->ops->flush_chars)
2380 				tty->ops->flush_chars(tty);
2381 		} else {
2382 			struct n_tty_data *ldata = tty->disc_data;
2383 
2384 			while (nr > 0) {
2385 				mutex_lock(&ldata->output_lock);
2386 				c = tty->ops->write(tty, b, nr);
2387 				mutex_unlock(&ldata->output_lock);
2388 				if (c < 0) {
2389 					retval = c;
2390 					goto break_out;
2391 				}
2392 				if (!c)
2393 					break;
2394 				b += c;
2395 				nr -= c;
2396 			}
2397 		}
2398 		if (!nr)
2399 			break;
2400 		if (file->f_flags & O_NONBLOCK) {
2401 			retval = -EAGAIN;
2402 			break;
2403 		}
2404 		up_read(&tty->termios_rwsem);
2405 
2406 		wait_woken(&wait, TASK_INTERRUPTIBLE, MAX_SCHEDULE_TIMEOUT);
2407 
2408 		down_read(&tty->termios_rwsem);
2409 	}
2410 break_out:
2411 	remove_wait_queue(&tty->write_wait, &wait);
2412 	if (b - buf != nr && tty->fasync)
2413 		set_bit(TTY_DO_WRITE_WAKEUP, &tty->flags);
2414 	up_read(&tty->termios_rwsem);
2415 	return (b - buf) ? b - buf : retval;
2416 }
2417 
2418 /**
2419  *	n_tty_poll		-	poll method for N_TTY
2420  *	@tty: terminal device
2421  *	@file: file accessing it
2422  *	@wait: poll table
2423  *
2424  *	Called when the line discipline is asked to poll() for data or
2425  *	for special events. This code is not serialized with respect to
2426  *	other events save open/close.
2427  *
2428  *	This code must be sure never to sleep through a hangup.
2429  *	Called without the kernel lock held - fine
2430  */
2431 
n_tty_poll(struct tty_struct * tty,struct file * file,poll_table * wait)2432 static unsigned int n_tty_poll(struct tty_struct *tty, struct file *file,
2433 							poll_table *wait)
2434 {
2435 	struct n_tty_data *ldata = tty->disc_data;
2436 	unsigned int mask = 0;
2437 
2438 	poll_wait(file, &tty->read_wait, wait);
2439 	poll_wait(file, &tty->write_wait, wait);
2440 	if (input_available_p(tty, 1))
2441 		mask |= POLLIN | POLLRDNORM;
2442 	else {
2443 		tty_buffer_flush_work(tty->port);
2444 		if (input_available_p(tty, 1))
2445 			mask |= POLLIN | POLLRDNORM;
2446 	}
2447 	if (tty->packet && tty->link->ctrl_status)
2448 		mask |= POLLPRI | POLLIN | POLLRDNORM;
2449 	if (test_bit(TTY_OTHER_CLOSED, &tty->flags))
2450 		mask |= POLLHUP;
2451 	if (tty_hung_up_p(file))
2452 		mask |= POLLHUP;
2453 	if (!(mask & (POLLHUP | POLLIN | POLLRDNORM))) {
2454 		if (MIN_CHAR(tty) && !TIME_CHAR(tty))
2455 			ldata->minimum_to_wake = MIN_CHAR(tty);
2456 		else
2457 			ldata->minimum_to_wake = 1;
2458 	}
2459 	if (tty->ops->write && !tty_is_writelocked(tty) &&
2460 			tty_chars_in_buffer(tty) < WAKEUP_CHARS &&
2461 			tty_write_room(tty) > 0)
2462 		mask |= POLLOUT | POLLWRNORM;
2463 	return mask;
2464 }
2465 
inq_canon(struct n_tty_data * ldata)2466 static unsigned long inq_canon(struct n_tty_data *ldata)
2467 {
2468 	size_t nr, head, tail;
2469 
2470 	if (ldata->canon_head == ldata->read_tail)
2471 		return 0;
2472 	head = ldata->canon_head;
2473 	tail = ldata->read_tail;
2474 	nr = head - tail;
2475 	/* Skip EOF-chars.. */
2476 	while (head != tail) {
2477 		if (test_bit(tail & (N_TTY_BUF_SIZE - 1), ldata->read_flags) &&
2478 		    read_buf(ldata, tail) == __DISABLED_CHAR)
2479 			nr--;
2480 		tail++;
2481 	}
2482 	return nr;
2483 }
2484 
n_tty_ioctl(struct tty_struct * tty,struct file * file,unsigned int cmd,unsigned long arg)2485 static int n_tty_ioctl(struct tty_struct *tty, struct file *file,
2486 		       unsigned int cmd, unsigned long arg)
2487 {
2488 	struct n_tty_data *ldata = tty->disc_data;
2489 	int retval;
2490 
2491 	switch (cmd) {
2492 	case TIOCOUTQ:
2493 		return put_user(tty_chars_in_buffer(tty), (int __user *) arg);
2494 	case TIOCINQ:
2495 		down_write(&tty->termios_rwsem);
2496 		if (L_ICANON(tty))
2497 			retval = inq_canon(ldata);
2498 		else
2499 			retval = read_cnt(ldata);
2500 		up_write(&tty->termios_rwsem);
2501 		return put_user(retval, (unsigned int __user *) arg);
2502 	default:
2503 		return n_tty_ioctl_helper(tty, file, cmd, arg);
2504 	}
2505 }
2506 
n_tty_fasync(struct tty_struct * tty,int on)2507 static void n_tty_fasync(struct tty_struct *tty, int on)
2508 {
2509 	struct n_tty_data *ldata = tty->disc_data;
2510 
2511 	if (!waitqueue_active(&tty->read_wait)) {
2512 		if (on)
2513 			ldata->minimum_to_wake = 1;
2514 		else if (!tty->fasync)
2515 			ldata->minimum_to_wake = N_TTY_BUF_SIZE;
2516 	}
2517 }
2518 
2519 struct tty_ldisc_ops tty_ldisc_N_TTY = {
2520 	.magic           = TTY_LDISC_MAGIC,
2521 	.name            = "n_tty",
2522 	.open            = n_tty_open,
2523 	.close           = n_tty_close,
2524 	.flush_buffer    = n_tty_flush_buffer,
2525 	.chars_in_buffer = n_tty_chars_in_buffer,
2526 	.read            = n_tty_read,
2527 	.write           = n_tty_write,
2528 	.ioctl           = n_tty_ioctl,
2529 	.set_termios     = n_tty_set_termios,
2530 	.poll            = n_tty_poll,
2531 	.receive_buf     = n_tty_receive_buf,
2532 	.write_wakeup    = n_tty_write_wakeup,
2533 	.fasync		 = n_tty_fasync,
2534 	.receive_buf2	 = n_tty_receive_buf2,
2535 };
2536 
2537 /**
2538  *	n_tty_inherit_ops	-	inherit N_TTY methods
2539  *	@ops: struct tty_ldisc_ops where to save N_TTY methods
2540  *
2541  *	Enables a 'subclass' line discipline to 'inherit' N_TTY
2542  *	methods.
2543  */
2544 
n_tty_inherit_ops(struct tty_ldisc_ops * ops)2545 void n_tty_inherit_ops(struct tty_ldisc_ops *ops)
2546 {
2547 	*ops = tty_ldisc_N_TTY;
2548 	ops->owner = NULL;
2549 	ops->refcount = ops->flags = 0;
2550 }
2551 EXPORT_SYMBOL_GPL(n_tty_inherit_ops);
2552