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