arch/um/drivers/slip_user.c

   1 #include <stdio.h>
   2 #include <stdlib.h>
   3 #include <unistd.h>
   4 #include <stddef.h>
   5 #include <sched.h>
   6 #include <string.h>
   7 #include <sys/errno.h>
   8 #include <sys/termios.h>
   9 #include <sys/wait.h>
  10 #include <sys/signal.h>
  11 #include "user_util.h"
  12 #include "kern_util.h"
  13 #include "user.h"
  14 #include "net_user.h"
  15 #include "slip.h"
  16 #include "slip_proto.h"
  17 #include "helper.h"
  18 #include "os.h"
  19
  20 void slip_user_init(void *data, void *dev)
  21 {
  22         struct slip_data *pri = data;
  23
  24         pri->dev = dev;
  25 }
  26
  27 static int set_up_tty(int fd)
  28 {
  29         int i;
  30         struct termios tios;
  31
  32         if (tcgetattr(fd, &tios) < 0) {
  33                 printk("could not get initial terminal attributes\n");
  34                 return(-1);
  35         }
  36
  37         tios.c_cflag = CS8 | CREAD | HUPCL | CLOCAL;
  38         tios.c_iflag = IGNBRK | IGNPAR;
  39         tios.c_oflag = 0;
  40         tios.c_lflag = 0;
  41         for (i = 0; i < NCCS; i++)
  42                 tios.c_cc[i] = 0;
  43         tios.c_cc[VMIN] = 1;
  44         tios.c_cc[VTIME] = 0;
  45
  46         cfsetospeed(&tios, B38400);
  47         cfsetispeed(&tios, B38400);
  48
  49         if (tcsetattr(fd, TCSAFLUSH, &tios) < 0) {
  50                 printk("failed to set terminal attributes\n");
  51                 return(-1);
  52         }
  53         return(0);
  54 }
  55
  56 struct slip_pre_exec_data {
  57         int stdin;
  58         int stdout;
  59         int close_me;
  60 };
  61
  62 static void slip_pre_exec(void *arg)
  63 {
  64         struct slip_pre_exec_data *data = arg;
  65
  66         if(data->stdin >= 0) dup2(data->stdin, 0);
  67         dup2(data->stdout, 1);
  68         if(data->close_me >= 0) os_close_file(data->close_me);
  69 }
  70
  71 static int slip_tramp(char **argv, int fd)
  72 {
  73         struct slip_pre_exec_data pe_data;
  74         char *output;
  75         int status, pid, fds[2], err, output_len;
  76
  77         err = os_pipe(fds, 1, 0);
  78         if(err < 0){
  79                 printk("slip_tramp : pipe failed, err = %d\n", -err);
  80                 return(err);
  81         }
  82
  83         err = 0;
  84         pe_data.stdin = fd;
  85         pe_data.stdout = fds[1];
  86         pe_data.close_me = fds[0];
  87         pid = run_helper(slip_pre_exec, &pe_data, argv, NULL);
  88
  89         if(pid < 0) err = pid;
  90         else {
  91                 output_len = page_size();
  92                 output = um_kmalloc(output_len);
  93                 if(output == NULL)
  94                         printk("slip_tramp : failed to allocate output "
  95                                "buffer\n");
  96
  97                 os_close_file(fds[1]);
  98                 read_output(fds[0], output, output_len);
  99                 if(output != NULL){
 100                         printk("%s", output);
 101                         kfree(output);
 102                 }
 103                 if(waitpid(pid, &status, 0) < 0) err = errno;
 104                 else if(!WIFEXITED(status) || (WEXITSTATUS(status) != 0)){
 105                         printk("'%s' didn't exit with status 0\n", argv[0]);
 106                         err = -EINVAL;
 107                 }
 108         }
 109         return(err);
 110 }
 111
 112 static int slip_open(void *data)
 113 {
 114         struct slip_data *pri = data;
 115         char version_buf[sizeof("nnnnn\0")];
 116         char gate_buf[sizeof("nnn.nnn.nnn.nnn\0")];
 117         char *argv[] = { "uml_net", version_buf, "slip", "up", gate_buf,
 118                          NULL };
 119         int sfd, mfd, err;
 120
 121         mfd = get_pty();
 122         if(mfd < 0){
 123                 printk("umn : Failed to open pty, err = %d\n", -mfd);
 124                 return(mfd);
 125         }
 126         sfd = os_open_file(ptsname(mfd), of_rdwr(OPENFLAGS()), 0);
 127         if(sfd < 0){
 128                 printk("Couldn't open tty for slip line, err = %d\n", -sfd);
 129                 return(sfd);
 130         }
 131         if(set_up_tty(sfd)) return(-1);
 132         pri->slave = sfd;
 133         pri->pos = 0;
 134         pri->esc = 0;
 135         if(pri->gate_addr != NULL){
 136                 sprintf(version_buf, "%d", UML_NET_VERSION);
 137                 strcpy(gate_buf, pri->gate_addr);
 138
 139                 err = slip_tramp(argv, sfd);
 140
 141                 if(err < 0){
 142                         printk("slip_tramp failed - err = %d\n", -err);
 143                         return(err);
 144                 }
 145                 err = os_get_ifname(pri->slave, pri->name);
 146                 if(err < 0){
 147                         printk("get_ifname failed, err = %d\n", -err);
 148                         return(err);
 149                 }
 150                 iter_addresses(pri->dev, open_addr, pri->name);
 151         }
 152         else {
 153                 err = os_set_slip(sfd);
 154                 if(err < 0){
 155                         printk("Failed to set slip discipline encapsulation - "
 156                                "err = %d\n", -err);
 157                         return(err);
 158                 }
 159         }
 160         return(mfd);
 161 }
 162
 163 static void slip_close(int fd, void *data)
 164 {
 165         struct slip_data *pri = data;
 166         char version_buf[sizeof("nnnnn\0")];
 167         char *argv[] = { "uml_net", version_buf, "slip", "down", pri->name,
 168                          NULL };
 169         int err;
 170
 171         if(pri->gate_addr != NULL)
 172                 iter_addresses(pri->dev, close_addr, pri->name);
 173
 174         sprintf(version_buf, "%d", UML_NET_VERSION);
 175
 176         err = slip_tramp(argv, -1);
 177
 178         if(err != 0)
 179                 printk("slip_tramp failed - errno = %d\n", -err);
 180         os_close_file(fd);
 181         os_close_file(pri->slave);
 182         pri->slave = -1;
 183 }
 184
 185 int slip_user_read(int fd, void *buf, int len, struct slip_data *pri)
 186 {
 187         int i, n, size, start;
 188
 189         if(pri->more>0) {
 190                 i = 0;
 191                 while(i < pri->more) {
 192                         size = slip_unesc(pri->ibuf[i++],
 193                                         pri->ibuf, &pri->pos, &pri->esc);
 194                         if(size){
 195                                 memcpy(buf, pri->ibuf, size);
 196                                 memmove(pri->ibuf, &pri->ibuf[i], pri->more-i);
 197                                 pri->more=pri->more-i;
 198                                 return(size);
 199                         }
 200                 }
 201                 pri->more=0;
 202         }
 203
 204         n = net_read(fd, &pri->ibuf[pri->pos], sizeof(pri->ibuf) - pri->pos);
 205         if(n <= 0) return(n);
 206
 207         start = pri->pos;
 208         for(i = 0; i < n; i++){
 209                 size = slip_unesc(pri->ibuf[start + i],
 210                                 pri->ibuf, &pri->pos, &pri->esc);
 211                 if(size){
 212                         memcpy(buf, pri->ibuf, size);
 213                         memmove(pri->ibuf, &pri->ibuf[start+i+1], n-(i+1));
 214                         pri->more=n-(i+1);
 215                         return(size);
 216                 }
 217         }
 218         return(0);
 219 }
 220
 221 int slip_user_write(int fd, void *buf, int len, struct slip_data *pri)
 222 {
 223         int actual, n;
 224
 225         actual = slip_esc(buf, pri->obuf, len);
 226         n = net_write(fd, pri->obuf, actual);
 227         if(n < 0) return(n);
 228         else return(len);
 229 }
 230
 231 static int slip_set_mtu(int mtu, void *data)
 232 {
 233         return(mtu);
 234 }
 235
 236 static void slip_add_addr(unsigned char *addr, unsigned char *netmask,
 237                           void *data)
 238 {
 239         struct slip_data *pri = data;
 240
 241         if(pri->slave < 0) return;
 242         open_addr(addr, netmask, pri->name);
 243 }
 244
 245 static void slip_del_addr(unsigned char *addr, unsigned char *netmask,
 246                             void *data)
 247 {
 248         struct slip_data *pri = data;
 249
 250         if(pri->slave < 0) return;
 251         close_addr(addr, netmask, pri->name);
 252 }
 253
 254 struct net_user_info slip_user_info = {
 255         .init           = slip_user_init,
 256         .open           = slip_open,
 257         .close          = slip_close,
 258         .remove         = NULL,
 259         .set_mtu        = slip_set_mtu,
 260         .add_address    = slip_add_addr,
 261         .delete_address = slip_del_addr,
 262         .max_packet     = BUF_SIZE
 263 };
 264
 265 /*
 266  * Overrides for Emacs so that we follow Linus's tabbing style.
 267  * Emacs will notice this stuff at the end of the file and automatically
 268  * adjust the settings for this buffer only.  This must remain at the end
 269  * of the file.
 270  * ---------------------------------------------------------------------------
 271  * Local variables:
 272  * c-file-style: "linux"
 273  * End:
 274  */