src/serial.c

   1 /*
   2  * serial.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.12  2008/02/28 16:57:52  james
  14  * *** empty log message ***
  15  *
  16  * Revision 1.11  2008/02/26 23:23:17  james
  17  * *** empty log message ***
  18  *
  19  * Revision 1.10  2008/02/24 00:47:14  james
  20  * *** empty log message ***
  21  *
  22  * Revision 1.9  2008/02/24 00:42:53  james
  23  * *** empty log message ***
  24  *
  25  * Revision 1.8  2008/02/23 13:05:58  staffcvs
  26  * *** empty log message ***
  27  *
  28  * Revision 1.7  2008/02/15 23:52:12  james
  29  * *** empty log message ***
  30  *
  31  * Revision 1.6  2008/02/15 19:51:30  james
  32  * *** empty log message ***
  33  *
  34  * Revision 1.5  2008/02/15 19:09:00  james
  35  * *** empty log message ***
  36  *
  37  * Revision 1.4  2008/02/15 16:48:56  james
  38  * *** empty log message ***
  39  *
  40  * Revision 1.3  2008/02/15 03:32:07  james
  41  * *** empty log message ***
  42  *
  43  * Revision 1.2  2008/02/14 16:21:17  james
  44  * *** empty log message ***
  45  *
  46  * Revision 1.1  2008/02/14 12:51:14  james
  47  * *** empty log message ***
  48  *
  49  * Revision 1.4  2008/02/14 10:39:14  james
  50  * *** empty log message ***
  51  *
  52  * Revision 1.3  2008/02/13 09:12:21  james
  53  * *** empty log message ***
  54  *
  55  * Revision 1.2  2008/02/12 22:36:46  james
  56  * *** empty log message ***
  57  *
  58  * Revision 1.1  2008/02/09 15:47:28  james
  59  * *** empty log message ***
  60  *
  61  * Revision 1.2  2008/02/07 11:11:14  staffcvs
  62  * *** empty log message ***
  63  *
  64  * Revision 1.1  2008/02/07 01:02:52  james
  65  * *** empty log message ***
  66  *
  67  * Revision 1.3  2008/02/06 17:53:28  james
  68  * *** empty log message ***
  69  *
  70  * Revision 1.2  2008/02/04 02:05:06  james
  71  * *** empty log message ***
  72  *
  73  * Revision 1.1  2008/02/04 01:32:39  james
  74  * *** empty log message ***
  75  *
  76  */
  77
  78 #include "project.h"
  79 #include <pwd.h>
  80 #include <dirent.h>
  81 #include <sys/stat.h>
  82
  83
  84 typedef struct
  85 {
  86   TTY_SIGNATURE;
  87   Serial_lock *lock;
  88   int fd;
  89 } Serial;
  90
  91
  92 static void
  93 serial_close (TTY * _t)
  94 {
  95   Serial *t = (Serial *) _t;
  96
  97   if (!t)
  98     return;
  99
 100   tcflush (t->fd, TCIOFLUSH);
 101   close (t->fd);
 102   free (t);
 103 }
 104
 105
 106 static int
 107 serial_read (TTY * _t, void *buf, int len)
 108 {
 109   Serial *t = (Serial *) _t;
 110   int red, done = 0;
 111
 112   t->blocked = serial_lock_check (t->lock);
 113
 114   if (t->blocked)
 115     return 0;
 116
 117   do
 118     {
 119
 120       red = wrap_read (t->fd, buf, len);
 121       if (red < 0)
 122         return -1;
 123       if (!red)
 124         return done;
 125
 126       buf += red;
 127       len -= red;
 128       done += red;
 129     }
 130   while (len);
 131
 132
 133   return done;
 134 }
 135
 136
 137 static int
 138 serial_write (TTY * _t, void *buf, int len)
 139 {
 140   int writ, done = 0;
 141   Serial *t = (Serial *) _t;
 142
 143   t->blocked = serial_lock_check (t->lock);
 144   if (t->blocked)
 145     return 0;
 146
 147   do
 148     {
 149
 150       writ = wrap_write (t->fd, buf, len);
 151       if (writ < 0)
 152         return -1;
 153       if (!writ)
 154         sleep (1);
 155
 156       buf += writ;
 157       len -= writ;
 158       done += writ;
 159     }
 160   while (len);
 161
 162
 163   return done;
 164 }
 165
 166 TTY *
 167 serial_open (char *path, int lock_mode)
 168 {
 169   Serial *t;
 170   pid_t child;
 171   char name[1024];
 172   struct winsize winsize = { 0 };
 173   struct termios termios;
 174   int fd;
 175   Serial_lock *l;
 176
 177   l = serial_lock_new (path, lock_mode);
 178   if (!l)
 179     return NULL;
 180
 181
 182   fd = open (path, O_RDWR | O_NOCTTY | O_NONBLOCK);
 183
 184   set_nonblocking (fd);
 185
 186
 187   if (tcgetattr (fd, &termios))
 188     {
 189       close (fd);
 190       return NULL;
 191     }
 192   default_termios (&termios);
 193
 194   if (tcsetattr (fd, TCSANOW, &termios))
 195     {
 196       close (fd);
 197       return NULL;
 198     }
 199
 200   t = (Serial *) malloc (sizeof (Serial));
 201
 202   t->lock = l;
 203
 204   strncpy (t->name, path, sizeof (t->name));
 205   t->name[sizeof (t->name) - 1] = 0;
 206
 207   t->recv = serial_read;
 208   t->xmit = serial_write;
 209   t->close = serial_close;
 210   t->fd = fd;
 211   t->rfd = t->fd;
 212   t->wfd = t->fd;
 213   t->size.x = VT102_COLS_80;
 214   t->size.y = VT102_ROWS_24;
 215   t->blocked = serial_lock_check (t->lock);
 216   t->hanging_up = 0;
 217
 218   return (TTY *) t;
 219 }