src/terminal.c

   1 /*
   2  * terminal.c:
   3  *
   4  * Copyright (c) 2008 James McKenzie <james@fishsoup.dhs.org>,
   5  * All rights reserved.
   6  *
   7  */
   8
   9 static char rcsid[] = "$Id$";
  10
  11 /*
  12  * $Log$
  13  * Revision 1.9  2008/02/15 03:32:07  james
  14  * *** empty log message ***
  15  *
  16  * Revision 1.8  2008/02/14 10:39:14  james
  17  * *** empty log message ***
  18  *
  19  * Revision 1.7  2008/02/14 01:55:57  james
  20  * *** empty log message ***
  21  *
  22  * Revision 1.6  2008/02/14 00:57:58  james
  23  * *** empty log message ***
  24  *
  25  * Revision 1.5  2008/02/13 18:05:06  james
  26  * *** empty log message ***
  27  *
  28  * Revision 1.4  2008/02/13 16:57:29  james
  29  * *** empty log message ***
  30  *
  31  * Revision 1.3  2008/02/13 09:12:21  james
  32  * *** empty log message ***
  33  *
  34  * Revision 1.2  2008/02/13 01:08:18  james
  35  * *** empty log message ***
  36  *
  37  * Revision 1.1  2008/02/12 22:36:46  james
  38  * *** empty log message ***
  39  *
  40  * Revision 1.1  2008/02/09 15:47:28  james
  41  * *** empty log message ***
  42  *
  43  * Revision 1.2  2008/02/07 11:11:14  staffcvs
  44  * *** empty log message ***
  45  *
  46  * Revision 1.1  2008/02/07 01:02:52  james
  47  * *** empty log message ***
  48  *
  49  * Revision 1.3  2008/02/06 17:53:28  james
  50  * *** empty log message ***
  51  *
  52  * Revision 1.2  2008/02/04 02:05:06  james
  53  * *** empty log message ***
  54  *
  55  * Revision 1.1  2008/02/04 01:32:39  james
  56  * *** empty log message ***
  57  *
  58  */
  59
  60 #include "project.h"
  61
  62
  63 typedef struct TERMINAL_struct
  64 {
  65   TTY_SIGNATURE;
  66   struct termios orig_termios;
  67   struct TERMINAL_struct *next;
  68 } TERMINAL;
  69
  70
  71 static TERMINAL *terminal_list = NULL;
  72 int terminal_winches;
  73
  74
  75
  76 static void
  77 terminal_close (TTY * _t)
  78 {
  79   char buf[32];
  80   int i;
  81
  82   TERMINAL *t = (TERMINAL *) _t;
  83   TERMINAL **ptr = &terminal_list;
  84
  85   if (!t)
  86     return;
  87
  88   /* Take out of cleanup list */
  89   while (*ptr && (*ptr != t))
  90     ptr = &((*ptr)->next);
  91
  92   if (*ptr)
  93     *ptr = t->next;
  94
  95   tcsetattr (t->wfd, TCSANOW, &t->orig_termios);
  96
  97   set_nonblocking (t->wfd);
  98
  99
 100   t->xmit (_t, "\033[r", 3);
 101   t->xmit (_t, "\033[0m", 4);
 102   i = sprintf (buf, "\033[%d;%dH", CRT_ROWS + 1, 1);
 103   t->xmit (_t, buf, i);
 104   t->xmit (_t, "\033[J", 3);
 105
 106   set_blocking (t->rfd);
 107   set_blocking (t->wfd);
 108
 109   free (t);
 110 }
 111
 112
 113 void
 114 terminal_atexit (void)
 115 {
 116   while (terminal_list)
 117     terminal_close ((TTY *) terminal_list);
 118 }
 119
 120 static void
 121 sigint (int dummy)
 122 {
 123   terminal_atexit ();
 124   exit (-1);
 125 }
 126
 127 static void
 128 sigwinch (int not)
 129 {
 130   terminal_winches++;
 131 }
 132
 133
 134 void
 135 terminal_getsize (TTY * _t)
 136 {
 137   TERMINAL *t = (TERMINAL *) _t;
 138   struct winsize sz = { 0 };
 139
 140   if (!t)
 141     return;
 142
 143   if (ioctl (t->wfd, TIOCGWINSZ, &sz))
 144     {
 145       t->size.x = CRT_COLS;
 146       t->size.y = CRT_ROWS;
 147     }
 148   else
 149     {
 150       t->size.x = sz.ws_col;
 151       t->size.y = sz.ws_row;
 152     }
 153 }
 154
 155
 156 void
 157 terminal_dispatch (void)
 158 {
 159   TERMINAL *t;
 160
 161
 162   if (!terminal_winches)
 163     return;
 164
 165   terminal_winches = 0;
 166
 167   for (t = terminal_list; t; t = t->next)
 168     terminal_getsize ((TTY *) t);
 169
 170 }
 171
 172
 173 static int
 174 terminal_read (TTY * _t, void *buf, int len)
 175 {
 176   TERMINAL *t = (TERMINAL *) _t;
 177   int red, done = 0;
 178
 179   terminal_dispatch ();
 180   set_nonblocking (t->rfd);
 181
 182   do
 183     {
 184
 185       red = wrap_read (t->rfd, buf, len);
 186       if (red < 0)
 187         return -1;
 188       if (!red)
 189         return done;
 190
 191       buf += red;
 192       len -= red;
 193       done += red;
 194     }
 195   while (len);
 196
 197
 198   return done;
 199 }
 200
 201
 202 static int
 203 terminal_write (TTY * _t, void *buf, int len)
 204 {
 205   int writ, done = 0;
 206   TERMINAL *t = (TERMINAL *) _t;
 207
 208   terminal_dispatch ();
 209
 210   set_blocking (t->wfd);
 211
 212   do
 213     {
 214
 215       writ = wrap_write (t->wfd, buf, len);
 216       if (writ < 0)
 217         return -1;
 218
 219       if (!writ)
 220         usleep (1000);
 221
 222       buf += writ;
 223       len -= writ;
 224       done += writ;
 225     }
 226   while (len);
 227
 228
 229   return done;
 230 }
 231
 232
 233 void
 234 terminal_register_handlers (void)
 235 {
 236   struct sigaction sa = { 0 };
 237
 238   sa.sa_handler = sigwinch;
 239   sa.sa_flags = SA_RESTART;
 240   sigaction (SIGWINCH, &sa, NULL);
 241
 242   sa.sa_handler = sigint;
 243   sa.sa_flags = SA_RESTART;
 244   sigaction (SIGINT, &sa, NULL);
 245 }
 246
 247
 248 TTY *
 249 terminal_open (int rfd, int wfd)
 250 {
 251   TERMINAL *t;
 252   pid_t child;
 253   struct termios termios;
 254
 255   t = (TERMINAL *) malloc (sizeof (TERMINAL));
 256
 257   strcpy (t->name, "terminal");
 258   t->rfd = rfd;
 259   t->wfd = wfd;
 260
 261   tcgetattr (wfd, &t->orig_termios);
 262
 263   t->next = terminal_list;
 264   terminal_list = t;
 265
 266   tcgetattr (wfd, &termios);
 267
 268   set_nonblocking (rfd);
 269   set_nonblocking (wfd);
 270
 271
 272   cfmakeraw (&termios);
 273   //raw_termios (&termios);
 274
 275   tcsetattr (wfd, TCSANOW, &termios);
 276
 277   t->recv = terminal_read;
 278   t->xmit = terminal_write;
 279   t->close = terminal_close;
 280   t->blocked = 0;
 281
 282
 283   terminal_getsize ((TTY *) t);
 284
 285   return (TTY *) t;
 286 }