arch/um/drivers/net_user.c

   1 /*
   2  * Copyright (C) 2001, 2002 Jeff Dike (jdike@karaya.com)
   3  * Licensed under the GPL
   4  */
   5
   6 #include <stddef.h>
   7 #include <stdarg.h>
   8 #include <unistd.h>
   9 #include <stdio.h>
  10 #include <errno.h>
  11 #include <stdlib.h>
  12 #include <string.h>
  13 #include <sys/socket.h>
  14 #include <sys/wait.h>
  15 #include "user.h"
  16 #include "user_util.h"
  17 #include "kern_util.h"
  18 #include "net_user.h"
  19 #include "helper.h"
  20 #include "os.h"
  21
  22 int tap_open_common(void *dev, char *gate_addr)
  23 {
  24         int tap_addr[4];
  25
  26         if(gate_addr == NULL) return(0);
  27         if(sscanf(gate_addr, "%d.%d.%d.%d", &tap_addr[0],
  28                   &tap_addr[1], &tap_addr[2], &tap_addr[3]) != 4){
  29                 printk("Invalid tap IP address - '%s'\n",
  30                        gate_addr);
  31                 return(-EINVAL);
  32         }
  33         return(0);
  34 }
  35
  36 void tap_check_ips(char *gate_addr, char *eth_addr)
  37 {
  38         int tap_addr[4];
  39
  40         if((gate_addr != NULL) &&
  41            (sscanf(gate_addr, "%d.%d.%d.%d", &tap_addr[0],
  42                    &tap_addr[1], &tap_addr[2], &tap_addr[3]) == 4) &&
  43            (eth_addr[0] == tap_addr[0]) &&
  44            (eth_addr[1] == tap_addr[1]) &&
  45            (eth_addr[2] == tap_addr[2]) &&
  46            (eth_addr[3] == tap_addr[3])){
  47                 printk("The tap IP address and the UML eth IP address"
  48                        " must be different\n");
  49         }
  50 }
  51
  52 void read_output(int fd, char *output, int len)
  53 {
  54         int remain, n, actual;
  55         char c;
  56
  57         if(output == NULL){
  58                 output = &c;
  59                 len = sizeof(c);
  60         }
  61
  62         *output = '\0';
  63         if(read(fd, &remain, sizeof(remain)) != sizeof(remain)){
  64                 printk("read_output - read of length failed, errno = %d\n",
  65                        errno);
  66                 return;
  67         }
  68
  69         while(remain != 0){
  70                 n = (remain < len) ? remain : len;
  71                 actual = read(fd, output, n);
  72                 if(actual != n){
  73                         printk("read_output - read of data failed, "
  74                                "errno = %d\n", errno);
  75                         return;
  76                 }
  77                 remain -= actual;
  78         }
  79         return;
  80 }
  81
  82 int net_read(int fd, void *buf, int len)
  83 {
  84         int n;
  85
  86         while(((n = read(fd,  buf,  len)) < 0) && (errno == EINTR)) ;
  87
  88         if(n < 0){
  89                 if(errno == EAGAIN) return(0);
  90                 return(-errno);
  91         }
  92         else if(n == 0) return(-ENOTCONN);
  93         return(n);
  94 }
  95
  96 int net_recvfrom(int fd, void *buf, int len)
  97 {
  98         int n;
  99
 100         while(((n = recvfrom(fd,  buf,  len, 0, NULL, NULL)) < 0) &&
 101               (errno == EINTR)) ;
 102
 103         if(n < 0){
 104                 if(errno == EAGAIN) return(0);
 105                 return(-errno);
 106         }
 107         else if(n == 0) return(-ENOTCONN);
 108         return(n);
 109 }
 110
 111 int net_write(int fd, void *buf, int len)
 112 {
 113         int n;
 114
 115         while(((n = write(fd, buf, len)) < 0) && (errno == EINTR)) ;
 116         if(n < 0){
 117                 if(errno == EAGAIN) return(0);
 118                 return(-errno);
 119         }
 120         else if(n == 0) return(-ENOTCONN);
 121         return(n);
 122 }
 123
 124 int net_send(int fd, void *buf, int len)
 125 {
 126         int n;
 127
 128         while(((n = send(fd, buf, len, 0)) < 0) && (errno == EINTR)) ;
 129         if(n < 0){
 130                 if(errno == EAGAIN) return(0);
 131                 return(-errno);
 132         }
 133         else if(n == 0) return(-ENOTCONN);
 134         return(n);
 135 }
 136
 137 int net_sendto(int fd, void *buf, int len, void *to, int sock_len)
 138 {
 139         int n;
 140
 141         while(((n = sendto(fd, buf, len, 0, (struct sockaddr *) to,
 142                            sock_len)) < 0) && (errno == EINTR)) ;
 143         if(n < 0){
 144                 if(errno == EAGAIN) return(0);
 145                 return(-errno);
 146         }
 147         else if(n == 0) return(-ENOTCONN);
 148         return(n);
 149 }
 150
 151 struct change_pre_exec_data {
 152         int close_me;
 153         int stdout;
 154 };
 155
 156 static void change_pre_exec(void *arg)
 157 {
 158         struct change_pre_exec_data *data = arg;
 159
 160         close(data->close_me);
 161         dup2(data->stdout, 1);
 162 }
 163
 164 static int change_tramp(char **argv, char *output, int output_len)
 165 {
 166         int pid, fds[2], err;
 167         struct change_pre_exec_data pe_data;
 168
 169         err = os_pipe(fds, 1, 0);
 170         if(err){
 171                 printk("change_tramp - pipe failed, errno = %d\n", -err);
 172                 return(err);
 173         }
 174         pe_data.close_me = fds[0];
 175         pe_data.stdout = fds[1];
 176         pid = run_helper(change_pre_exec, &pe_data, argv, NULL);
 177
 178         close(fds[1]);
 179         read_output(fds[0], output, output_len);
 180         waitpid(pid, NULL, 0);
 181         return(pid);
 182 }
 183
 184 static void change(char *dev, char *what, unsigned char *addr,
 185                    unsigned char *netmask)
 186 {
 187         char addr_buf[sizeof("255.255.255.255\0")];
 188         char netmask_buf[sizeof("255.255.255.255\0")];
 189         char version[sizeof("nnnnn\0")];
 190         char *argv[] = { "uml_net", version, what, dev, addr_buf,
 191                          netmask_buf, NULL };
 192         char *output;
 193         int output_len, pid;
 194
 195         sprintf(version, "%d", UML_NET_VERSION);
 196         sprintf(addr_buf, "%d.%d.%d.%d", addr[0], addr[1], addr[2], addr[3]);
 197         sprintf(netmask_buf, "%d.%d.%d.%d", netmask[0], netmask[1],
 198                 netmask[2], netmask[3]);
 199
 200         output_len = page_size();
 201         output = um_kmalloc(output_len);
 202         if(output == NULL)
 203                 printk("change : failed to allocate output buffer\n");
 204
 205         pid = change_tramp(argv, output, output_len);
 206         if(pid < 0) return;
 207
 208         if(output != NULL){
 209                 printk("%s", output);
 210                 kfree(output);
 211         }
 212 }
 213
 214 void open_addr(unsigned char *addr, unsigned char *netmask, void *arg)
 215 {
 216         change(arg, "add", addr, netmask);
 217 }
 218
 219 void close_addr(unsigned char *addr, unsigned char *netmask, void *arg)
 220 {
 221         change(arg, "del", addr, netmask);
 222 }
 223
 224 char *split_if_spec(char *str, ...)
 225 {
 226         char **arg, *end;
 227         va_list ap;
 228
 229         va_start(ap, str);
 230         while((arg = va_arg(ap, char **)) != NULL){
 231                 if(*str == '\0')
 232                         return(NULL);
 233                 end = strchr(str, ',');
 234                 if(end != str)
 235                         *arg = str;
 236                 if(end == NULL)
 237                         return(NULL);
 238                 *end++ = '\0';
 239                 str = end;
 240         }
 241         va_end(ap);
 242         return(str);
 243 }
 244
 245 /*
 246  * Overrides for Emacs so that we follow Linus's tabbing style.
 247  * Emacs will notice this stuff at the end of the file and automatically
 248  * adjust the settings for this buffer only.  This must remain at the end
 249  * of the file.
 250  * ---------------------------------------------------------------------------
 251  * Local variables:
 252  * c-file-style: "linux"
 253  * End:
 254  */