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