2 * Copyright (C) 2001 Lennert Buytenhek (buytenh@gnu.org) and
3 * James Leu (jleu@mindspring.net).
4 * Copyright (C) 2001 by various other people who didn't put their name here.
5 * Licensed under the GPL.
8 #include "linux/kernel.h"
9 #include "linux/netdevice.h"
10 #include "linux/rtnetlink.h"
11 #include "linux/skbuff.h"
12 #include "linux/socket.h"
13 #include "linux/spinlock.h"
14 #include "linux/module.h"
15 #include "linux/init.h"
16 #include "linux/etherdevice.h"
17 #include "linux/list.h"
18 #include "linux/inetdevice.h"
19 #include "linux/ctype.h"
20 #include "linux/bootmem.h"
21 #include "linux/ethtool.h"
22 #include "linux/platform_device.h"
23 #include "asm/uaccess.h"
24 #include "kern_util.h"
27 #include "mconsole_kern.h"
32 static inline void set_ether_mac(struct net_device *dev, unsigned char *addr)
34 memcpy(dev->dev_addr, addr, ETH_ALEN);
37 #define DRIVER_NAME "uml-netdev"
39 static DEFINE_SPINLOCK(opened_lock);
40 static LIST_HEAD(opened);
42 static int uml_net_rx(struct net_device *dev)
44 struct uml_net_private *lp = dev->priv;
48 /* If we can't allocate memory, try again next round. */
49 skb = dev_alloc_skb(dev->mtu);
51 lp->stats.rx_dropped++;
56 skb_put(skb, dev->mtu);
57 skb_reset_mac_header(skb);
58 pkt_len = (*lp->read)(lp->fd, &skb, lp);
61 skb_trim(skb, pkt_len);
62 skb->protocol = (*lp->protocol)(skb);
65 lp->stats.rx_bytes += skb->len;
66 lp->stats.rx_packets++;
74 static void uml_dev_close(struct work_struct *work)
76 struct uml_net_private *lp =
77 container_of(work, struct uml_net_private, work);
81 irqreturn_t uml_net_interrupt(int irq, void *dev_id)
83 struct net_device *dev = dev_id;
84 struct uml_net_private *lp = dev->priv;
87 if(!netif_running(dev))
91 while((err = uml_net_rx(dev)) > 0) ;
94 "Device '%s' read returned %d, shutting it down\n",
96 /* dev_close can't be called in interrupt context, and takes
98 * And dev_close() can be safely called multiple times on the
99 * same device, since it tests for (dev->flags & IFF_UP). So
100 * there's no harm in delaying the device shutdown.
101 * Furthermore, the workqueue will not re-enqueue an already
102 * enqueued work item. */
103 schedule_work(&lp->work);
106 reactivate_fd(lp->fd, UM_ETH_IRQ);
109 spin_unlock(&lp->lock);
113 static int uml_net_open(struct net_device *dev)
115 struct uml_net_private *lp = dev->priv;
123 lp->fd = (*lp->open)(&lp->user);
129 err = um_request_irq(dev->irq, lp->fd, IRQ_READ, uml_net_interrupt,
130 IRQF_DISABLED | IRQF_SHARED, dev->name, dev);
132 printk(KERN_ERR "uml_net_open: failed to get irq(%d)\n", err);
137 lp->tl.data = (unsigned long) &lp->user;
138 netif_start_queue(dev);
140 /* clear buffer - it can happen that the host side of the interface
141 * is full when we get here. In this case, new data is never queued,
142 * SIGIOs never arrive, and the net never works.
144 while((err = uml_net_rx(dev)) > 0) ;
146 spin_lock(&opened_lock);
147 list_add(&lp->list, &opened);
148 spin_unlock(&opened_lock);
152 if(lp->close != NULL) (*lp->close)(lp->fd, &lp->user);
158 static int uml_net_close(struct net_device *dev)
160 struct uml_net_private *lp = dev->priv;
162 netif_stop_queue(dev);
164 free_irq(dev->irq, dev);
165 if(lp->close != NULL)
166 (*lp->close)(lp->fd, &lp->user);
169 spin_lock(&opened_lock);
171 spin_unlock(&opened_lock);
176 static int uml_net_start_xmit(struct sk_buff *skb, struct net_device *dev)
178 struct uml_net_private *lp = dev->priv;
182 netif_stop_queue(dev);
184 spin_lock_irqsave(&lp->lock, flags);
186 len = (*lp->write)(lp->fd, &skb, lp);
188 if(len == skb->len) {
189 lp->stats.tx_packets++;
190 lp->stats.tx_bytes += skb->len;
191 dev->trans_start = jiffies;
192 netif_start_queue(dev);
194 /* this is normally done in the interrupt when tx finishes */
195 netif_wake_queue(dev);
198 netif_start_queue(dev);
199 lp->stats.tx_dropped++;
202 netif_start_queue(dev);
203 printk(KERN_ERR "uml_net_start_xmit: failed(%d)\n", len);
206 spin_unlock_irqrestore(&lp->lock, flags);
213 static struct net_device_stats *uml_net_get_stats(struct net_device *dev)
215 struct uml_net_private *lp = dev->priv;
219 static void uml_net_set_multicast_list(struct net_device *dev)
221 if (dev->flags & IFF_PROMISC) return;
222 else if (dev->mc_count) dev->flags |= IFF_ALLMULTI;
223 else dev->flags &= ~IFF_ALLMULTI;
226 static void uml_net_tx_timeout(struct net_device *dev)
228 dev->trans_start = jiffies;
229 netif_wake_queue(dev);
232 static int uml_net_set_mac(struct net_device *dev, void *addr)
234 struct uml_net_private *lp = dev->priv;
235 struct sockaddr *hwaddr = addr;
237 spin_lock_irq(&lp->lock);
238 set_ether_mac(dev, hwaddr->sa_data);
239 spin_unlock_irq(&lp->lock);
244 static int uml_net_change_mtu(struct net_device *dev, int new_mtu)
246 struct uml_net_private *lp = dev->priv;
249 spin_lock_irq(&lp->lock);
251 new_mtu = (*lp->set_mtu)(new_mtu, &lp->user);
260 spin_unlock_irq(&lp->lock);
264 static void uml_net_get_drvinfo(struct net_device *dev,
265 struct ethtool_drvinfo *info)
267 strcpy(info->driver, DRIVER_NAME);
268 strcpy(info->version, "42");
271 static struct ethtool_ops uml_net_ethtool_ops = {
272 .get_drvinfo = uml_net_get_drvinfo,
273 .get_link = ethtool_op_get_link,
276 void uml_net_user_timer_expire(unsigned long _conn)
279 struct connection *conn = (struct connection *)_conn;
281 dprintk(KERN_INFO "uml_net_user_timer_expire [%p]\n", conn);
286 static void setup_etheraddr(char *str, unsigned char *addr, char *name)
295 addr[i] = simple_strtoul(str, &end, 16);
297 ((*end != ':') && (*end != ',') && (*end != '\0'))){
299 "setup_etheraddr: failed to parse '%s' "
300 "as an ethernet address\n", str);
305 if (is_multicast_ether_addr(addr)) {
307 "Attempt to assign a multicast ethernet address to a "
308 "device disallowed\n");
311 if (!is_valid_ether_addr(addr)) {
313 "Attempt to assign an invalid ethernet address to a "
314 "device disallowed\n");
317 if (!is_local_ether_addr(addr)) {
319 "Warning: attempt to assign a globally valid ethernet address to a "
321 printk(KERN_WARNING "You should better enable the 2nd rightmost bit "
322 "in the first byte of the MAC, i.e. "
323 "%02x:%02x:%02x:%02x:%02x:%02x\n",
324 addr[0] | 0x02, addr[1], addr[2], addr[3], addr[4], addr[5]);
330 "Choosing a random ethernet address for device %s\n", name);
331 random_ether_addr(addr);
334 static DEFINE_SPINLOCK(devices_lock);
335 static LIST_HEAD(devices);
337 static struct platform_driver uml_net_driver = {
342 static int driver_registered;
344 static void eth_configure(int n, void *init, char *mac,
345 struct transport *transport)
347 struct uml_net *device;
348 struct net_device *dev;
349 struct uml_net_private *lp;
351 char name[sizeof(dev->name)];
353 size = transport->private_size + sizeof(struct uml_net_private) +
354 sizeof(((struct uml_net_private *) 0)->user);
356 device = kzalloc(sizeof(*device), GFP_KERNEL);
357 if (device == NULL) {
358 printk(KERN_ERR "eth_configure failed to allocate uml_net\n");
362 INIT_LIST_HEAD(&device->list);
365 /* If this name ends up conflicting with an existing registered
366 * netdevice, that is OK, register_netdev{,ice}() will notice this
369 snprintf(name, sizeof(name), "eth%d", n);
371 setup_etheraddr(mac, device->mac, name);
373 printk(KERN_INFO "Netdevice %d ", n);
374 printk("(%02x:%02x:%02x:%02x:%02x:%02x) ",
375 device->mac[0], device->mac[1],
376 device->mac[2], device->mac[3],
377 device->mac[4], device->mac[5]);
379 dev = alloc_etherdev(size);
381 printk(KERN_ERR "eth_configure: failed to allocate device\n");
382 goto out_free_device;
386 /* This points to the transport private data. It's still clear, but we
387 * must memset it to 0 *now*. Let's help the drivers. */
389 INIT_WORK(&lp->work, uml_dev_close);
392 if (!driver_registered) {
393 platform_driver_register(¨_net_driver);
394 driver_registered = 1;
397 device->pdev.name = DRIVER_NAME;
398 if(platform_device_register(&device->pdev))
399 goto out_free_netdev;
400 SET_NETDEV_DEV(dev,&device->pdev.dev);
402 strcpy(dev->name, name);
406 * These just fill in a data structure, so there's no failure
407 * to be worried about.
409 (*transport->kern->init)(dev, init);
411 /* lp.user is the first four bytes of the transport data, which
412 * has already been initialized. This structure assignment will
413 * overwrite that, so we make sure that .user gets overwritten with
414 * what it already has.
417 *lp = ((struct uml_net_private)
418 { .list = LIST_HEAD_INIT(lp->list),
421 .mac = { 0xfe, 0xfd, 0x0, 0x0, 0x0, 0x0},
422 .protocol = transport->kern->protocol,
423 .open = transport->user->open,
424 .close = transport->user->close,
425 .remove = transport->user->remove,
426 .read = transport->kern->read,
427 .write = transport->kern->write,
428 .add_address = transport->user->add_address,
429 .delete_address = transport->user->delete_address,
430 .set_mtu = transport->user->set_mtu,
434 spin_lock_init(&lp->lock);
435 lp->tl.function = uml_net_user_timer_expire;
436 memcpy(lp->mac, device->mac, sizeof(lp->mac));
438 if ((transport->user->init != NULL) &&
439 ((*transport->user->init)(&lp->user, dev) != 0))
442 set_ether_mac(dev, device->mac);
443 dev->mtu = transport->user->max_packet;
444 dev->open = uml_net_open;
445 dev->hard_start_xmit = uml_net_start_xmit;
446 dev->stop = uml_net_close;
447 dev->get_stats = uml_net_get_stats;
448 dev->set_multicast_list = uml_net_set_multicast_list;
449 dev->tx_timeout = uml_net_tx_timeout;
450 dev->set_mac_address = uml_net_set_mac;
451 dev->change_mtu = uml_net_change_mtu;
452 dev->ethtool_ops = ¨_net_ethtool_ops;
453 dev->watchdog_timeo = (HZ >> 1);
454 dev->irq = UM_ETH_IRQ;
457 err = register_netdevice(dev);
460 goto out_undo_user_init;
462 spin_lock(&devices_lock);
463 list_add(&device->list, &devices);
464 spin_unlock(&devices_lock);
469 if (transport->user->init != NULL)
470 (*transport->user->remove)(&lp->user);
472 platform_device_unregister(&device->pdev);
479 static struct uml_net *find_device(int n)
481 struct uml_net *device;
482 struct list_head *ele;
484 spin_lock(&devices_lock);
485 list_for_each(ele, &devices){
486 device = list_entry(ele, struct uml_net, list);
487 if(device->index == n)
492 spin_unlock(&devices_lock);
496 static int eth_parse(char *str, int *index_out, char **str_out,
500 int n, err = -EINVAL;;
502 n = simple_strtoul(str, &end, 0);
504 *error_out = "Bad device number";
510 *error_out = "Expected '=' after device number";
516 *error_out = "Device already configured";
526 struct list_head list;
531 static DEFINE_SPINLOCK(transports_lock);
532 static LIST_HEAD(transports);
534 /* Filled in during early boot */
535 static LIST_HEAD(eth_cmd_line);
537 static int check_transport(struct transport *transport, char *eth, int n,
538 void **init_out, char **mac_out)
542 len = strlen(transport->name);
543 if(strncmp(eth, transport->name, len))
549 else if(*eth != '\0')
552 *init_out = kmalloc(transport->setup_size, GFP_KERNEL);
553 if(*init_out == NULL)
556 if(!transport->setup(eth, mac_out, *init_out)){
563 void register_transport(struct transport *new)
565 struct list_head *ele, *next;
566 struct eth_init *eth;
571 spin_lock(&transports_lock);
572 BUG_ON(!list_empty(&new->list));
573 list_add(&new->list, &transports);
574 spin_unlock(&transports_lock);
576 list_for_each_safe(ele, next, ð_cmd_line){
577 eth = list_entry(ele, struct eth_init, list);
578 match = check_transport(new, eth->init, eth->index, &init,
582 else if(init != NULL){
583 eth_configure(eth->index, init, mac, new);
586 list_del(ð->list);
590 static int eth_setup_common(char *str, int index)
592 struct list_head *ele;
593 struct transport *transport;
598 spin_lock(&transports_lock);
599 list_for_each(ele, &transports){
600 transport = list_entry(ele, struct transport, list);
601 if(!check_transport(transport, str, index, &init, &mac))
604 eth_configure(index, init, mac, transport);
611 spin_unlock(&transports_lock);
615 static int eth_setup(char *str)
617 struct eth_init *new;
621 err = eth_parse(str, &n, &str, &error);
623 printk(KERN_ERR "eth_setup - Couldn't parse '%s' : %s\n",
628 new = alloc_bootmem(sizeof(*new));
630 printk("eth_init : alloc_bootmem failed\n");
634 INIT_LIST_HEAD(&new->list);
638 list_add_tail(&new->list, ð_cmd_line);
642 __setup("eth", eth_setup);
643 __uml_help(eth_setup,
644 "eth[0-9]+=<transport>,<options>\n"
645 " Configure a network device.\n\n"
648 static int net_config(char *str, char **error_out)
652 err = eth_parse(str, &n, &str, error_out);
656 /* This string is broken up and the pieces used by the underlying
657 * driver. So, it is freed only if eth_setup_common fails.
659 str = kstrdup(str, GFP_KERNEL);
661 *error_out = "net_config failed to strdup string";
664 err = !eth_setup_common(str, n);
670 static int net_id(char **str, int *start_out, int *end_out)
675 n = simple_strtoul(*str, &end, 0);
676 if((*end != '\0') || (end == *str))
685 static int net_remove(int n, char **error_out)
687 struct uml_net *device;
688 struct net_device *dev;
689 struct uml_net_private *lp;
691 device = find_device(n);
699 if(lp->remove != NULL) (*lp->remove)(&lp->user);
700 unregister_netdev(dev);
701 platform_device_unregister(&device->pdev);
703 list_del(&device->list);
709 static struct mc_device net_mc = {
710 .list = LIST_HEAD_INIT(net_mc.list),
712 .config = net_config,
715 .remove = net_remove,
718 static int uml_inetaddr_event(struct notifier_block *this, unsigned long event,
721 struct in_ifaddr *ifa = ptr;
722 struct net_device *dev = ifa->ifa_dev->dev;
723 struct uml_net_private *lp;
724 void (*proc)(unsigned char *, unsigned char *, void *);
725 unsigned char addr_buf[4], netmask_buf[4];
727 if(dev->open != uml_net_open)
735 proc = lp->add_address;
738 proc = lp->delete_address;
742 memcpy(addr_buf, &ifa->ifa_address, sizeof(addr_buf));
743 memcpy(netmask_buf, &ifa->ifa_mask, sizeof(netmask_buf));
744 (*proc)(addr_buf, netmask_buf, &lp->user);
749 /* uml_net_init shouldn't be called twice on two CPUs at the same time */
750 struct notifier_block uml_inetaddr_notifier = {
751 .notifier_call = uml_inetaddr_event,
754 static int uml_net_init(void)
756 struct list_head *ele;
757 struct uml_net_private *lp;
758 struct in_device *ip;
759 struct in_ifaddr *in;
761 mconsole_register_dev(&net_mc);
762 register_inetaddr_notifier(¨_inetaddr_notifier);
764 /* Devices may have been opened already, so the uml_inetaddr_notifier
765 * didn't get a chance to run for them. This fakes it so that
766 * addresses which have already been set up get handled properly.
768 spin_lock(&opened_lock);
769 list_for_each(ele, &opened){
770 lp = list_entry(ele, struct uml_net_private, list);
771 ip = lp->dev->ip_ptr;
776 uml_inetaddr_event(NULL, NETDEV_UP, in);
780 spin_unlock(&opened_lock);
785 __initcall(uml_net_init);
787 static void close_devices(void)
789 struct list_head *ele;
790 struct uml_net_private *lp;
792 spin_lock(&opened_lock);
793 list_for_each(ele, &opened){
794 lp = list_entry(ele, struct uml_net_private, list);
795 free_irq(lp->dev->irq, lp->dev);
796 if((lp->close != NULL) && (lp->fd >= 0))
797 (*lp->close)(lp->fd, &lp->user);
798 if(lp->remove != NULL)
799 (*lp->remove)(&lp->user);
801 spin_unlock(&opened_lock);
804 __uml_exitcall(close_devices);
806 struct sk_buff *ether_adjust_skb(struct sk_buff *skb, int extra)
808 if((skb != NULL) && (skb_tailroom(skb) < extra)){
809 struct sk_buff *skb2;
811 skb2 = skb_copy_expand(skb, 0, extra, GFP_ATOMIC);
815 if(skb != NULL) skb_put(skb, extra);
819 void iter_addresses(void *d, void (*cb)(unsigned char *, unsigned char *,
823 struct net_device *dev = d;
824 struct in_device *ip = dev->ip_ptr;
825 struct in_ifaddr *in;
826 unsigned char address[4], netmask[4];
828 if(ip == NULL) return;
831 memcpy(address, &in->ifa_address, sizeof(address));
832 memcpy(netmask, &in->ifa_mask, sizeof(netmask));
833 (*cb)(address, netmask, arg);
838 int dev_netmask(void *d, void *m)
840 struct net_device *dev = d;
841 struct in_device *ip = dev->ip_ptr;
842 struct in_ifaddr *in;
843 __be32 *mask_out = m;
852 *mask_out = in->ifa_mask;
856 void *get_output_buffer(int *len_out)
860 ret = (void *) __get_free_pages(GFP_KERNEL, 0);
861 if(ret) *len_out = PAGE_SIZE;
866 void free_output_buffer(void *buffer)
868 free_pages((unsigned long) buffer, 0);
871 int tap_setup_common(char *str, char *type, char **dev_name, char **mac_out,
876 remain = split_if_spec(str, dev_name, mac_out, gate_addr, NULL);
878 printk("tap_setup_common - Extra garbage on specification : "
886 unsigned short eth_protocol(struct sk_buff *skb)
888 return(eth_type_trans(skb, skb->dev));