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(¤t->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