ldisc.c

   1 #include <windows.h>
   2 #include <stdio.h>
   3
   4 #include "putty.h"
   5
   6 /*
   7  * ldisc.c: PuTTY line disciplines
   8  */
   9
  10 static void c_write (char *buf, int len) {
  11     while (len--) {
  12         int new_head = (inbuf_head + 1) & INBUF_MASK;
  13         int c = (unsigned char) *buf;
  14         if (new_head != inbuf_reap) {
  15             inbuf[inbuf_head] = *buf++;
  16             inbuf_head = new_head;
  17         }
  18     }
  19 }
  20
  21 static char *term_buf = NULL;
  22 static int term_buflen = 0, term_bufsiz = 0, term_quotenext = 0;
  23
  24 static int plen(unsigned char c) {
  25     if ((c >= 32 && c <= 126) ||
  26         (c >= 160))
  27         return 1;
  28     else if (c < 128)
  29         return 2;                      /* ^x for some x */
  30     else
  31         return 4;                      /* <XY> for hex XY */
  32 }
  33
  34 static void pwrite(unsigned char c) {
  35     if ((c >= 32 && c <= 126) ||
  36         (c >= 160)) {
  37         char cc = (char)c;
  38         c_write(&cc, 1);
  39     } else if (c < 128) {
  40         char cc[2];
  41         cc[1] = (c == 127 ? '?' : c + 0x40);
  42         cc[0] = '^';
  43         c_write(cc, 2);
  44     } else {
  45         char cc[5];
  46         sprintf(cc, "<%02X>", c);
  47         c_write(cc, 4);
  48     }
  49 }
  50
  51 static void bsb(int n) {
  52     while (n--)
  53         c_write("\010 \010", 3);
  54 }
  55
  56 static void term_send(char *buf, int len) {
  57     while (len--) {
  58         char c;
  59         c = *buf++;
  60         switch (term_quotenext ? ' ' : c) {
  61             /*
  62              * ^h/^?: delete one char and output one BSB
  63              * ^w: delete, and output BSBs, to return to last space/nonspace
  64              * boundary
  65              * ^u: delete, and output BSBs, to return to BOL
  66              * ^r: echo "^R\n" and redraw line
  67              * ^v: quote next char
  68              * ^d: if at BOL, end of file and close connection, else send line
  69              * and reset to BOL
  70              * ^m/^j: send line-plus-\r\n and reset to BOL
  71              */
  72           case 8: case 127:            /* backspace/delete */
  73             if (term_buflen > 0) {
  74                 bsb(plen(term_buf[term_buflen-1]));
  75                 term_buflen--;
  76             }
  77             break;
  78           case 23:                     /* ^W delete word */
  79             while (term_buflen > 0) {
  80                 bsb(plen(term_buf[term_buflen-1]));
  81                 term_buflen--;
  82                 if (term_buflen > 0 &&
  83                     isspace(term_buf[term_buflen-1]) &&
  84                     !isspace(term_buf[term_buflen]))
  85                     break;
  86             }
  87             break;
  88           case 21:                     /* ^U delete line */
  89             while (term_buflen > 0) {
  90                 bsb(plen(term_buf[term_buflen-1]));
  91                 term_buflen--;
  92             }
  93             break;
  94           case 18:                     /* ^R redraw line */
  95             c_write("^R\r\n", 4);
  96             {
  97                 int i;
  98                 for (i = 0; i < term_buflen; i++)
  99                     pwrite(term_buf[i]);
 100             }
 101             break;
 102           case 22:                     /* ^V quote next char */
 103             term_quotenext = TRUE;
 104             break;
 105           case 4:                      /* ^D logout or send */
 106             if (term_buflen == 0) {
 107                 /* FIXME: eof */;
 108             } else {
 109                 back->send(term_buf, term_buflen);
 110                 term_buflen = 0;
 111             }
 112             break;
 113           case 13: case 10:            /* ^M/^J send with newline */
 114             back->send(term_buf, term_buflen);
 115             back->send("\r\n", 2);
 116             c_write("\r\n", 2);
 117             term_buflen = 0;
 118             break;
 119           default:                     /* get to this label from ^V handler */
 120             if (term_buflen >= term_bufsiz) {
 121                 term_bufsiz = term_buflen + 256;
 122                 term_buf = saferealloc(term_buf, term_bufsiz);
 123             }
 124             term_buf[term_buflen++] = c;
 125             pwrite(c);
 126             term_quotenext = FALSE;
 127             break;
 128         }
 129     }
 130 }
 131
 132 static void simple_send(char *buf, int len) {
 133     back->send(buf, len);
 134 }
 135
 136 Ldisc ldisc_term = { term_send };
 137 Ldisc ldisc_simple = { simple_send };