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