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;
352 size = transport->private_size + sizeof(struct uml_net_private) +
353 sizeof(((struct uml_net_private *) 0)->user);
355 device = kzalloc(sizeof(*device), GFP_KERNEL);
356 if (device == NULL) {
357 printk(KERN_ERR "eth_configure failed to allocate struct "
362 dev = alloc_etherdev(size);
364 printk(KERN_ERR "eth_configure: failed to allocate struct "
365 "net_device for eth%d\n", n);
366 goto out_free_device;
369 INIT_LIST_HEAD(&device->list);
372 /* If this name ends up conflicting with an existing registered
373 * netdevice, that is OK, register_netdev{,ice}() will notice this
376 snprintf(dev->name, sizeof(dev->name), "eth%d", n);
378 setup_etheraddr(mac, device->mac, dev->name);
380 printk(KERN_INFO "Netdevice %d ", n);
381 printk("(%02x:%02x:%02x:%02x:%02x:%02x) ",
382 device->mac[0], device->mac[1],
383 device->mac[2], device->mac[3],
384 device->mac[4], device->mac[5]);
388 /* This points to the transport private data. It's still clear, but we
389 * must memset it to 0 *now*. Let's help the drivers. */
391 INIT_WORK(&lp->work, uml_dev_close);
394 if (!driver_registered) {
395 platform_driver_register(¨_net_driver);
396 driver_registered = 1;
399 device->pdev.name = DRIVER_NAME;
400 if(platform_device_register(&device->pdev))
401 goto out_free_netdev;
402 SET_NETDEV_DEV(dev,&device->pdev.dev);
407 * These just fill in a data structure, so there's no failure
408 * to be worried about.
410 (*transport->kern->init)(dev, init);
412 /* lp.user is the first four bytes of the transport data, which
413 * has already been initialized. This structure assignment will
414 * overwrite that, so we make sure that .user gets overwritten with
415 * what it already has.
418 *lp = ((struct uml_net_private)
419 { .list = LIST_HEAD_INIT(lp->list),
422 .mac = { 0xfe, 0xfd, 0x0, 0x0, 0x0, 0x0},
423 .protocol = transport->kern->protocol,
424 .open = transport->user->open,
425 .close = transport->user->close,
426 .remove = transport->user->remove,
427 .read = transport->kern->read,
428 .write = transport->kern->write,
429 .add_address = transport->user->add_address,
430 .delete_address = transport->user->delete_address,
431 .set_mtu = transport->user->set_mtu,
435 spin_lock_init(&lp->lock);
436 lp->tl.function = uml_net_user_timer_expire;
437 memcpy(lp->mac, device->mac, sizeof(lp->mac));
439 if ((transport->user->init != NULL) &&
440 ((*transport->user->init)(&lp->user, dev) != 0))
443 set_ether_mac(dev, device->mac);
444 dev->mtu = transport->user->max_packet;
445 dev->open = uml_net_open;
446 dev->hard_start_xmit = uml_net_start_xmit;
447 dev->stop = uml_net_close;
448 dev->get_stats = uml_net_get_stats;
449 dev->set_multicast_list = uml_net_set_multicast_list;
450 dev->tx_timeout = uml_net_tx_timeout;
451 dev->set_mac_address = uml_net_set_mac;
452 dev->change_mtu = uml_net_change_mtu;
453 dev->ethtool_ops = ¨_net_ethtool_ops;
454 dev->watchdog_timeo = (HZ >> 1);
455 dev->irq = UM_ETH_IRQ;
458 err = register_netdevice(dev);
461 goto out_undo_user_init;
463 spin_lock(&devices_lock);
464 list_add(&device->list, &devices);
465 spin_unlock(&devices_lock);
470 if (transport->user->remove != NULL)
471 (*transport->user->remove)(&lp->user);
473 platform_device_unregister(&device->pdev);
480 static struct uml_net *find_device(int n)
482 struct uml_net *device;
483 struct list_head *ele;
485 spin_lock(&devices_lock);
486 list_for_each(ele, &devices){
487 device = list_entry(ele, struct uml_net, list);
488 if(device->index == n)
493 spin_unlock(&devices_lock);
497 static int eth_parse(char *str, int *index_out, char **str_out,
501 int n, err = -EINVAL;;
503 n = simple_strtoul(str, &end, 0);
505 *error_out = "Bad device number";
511 *error_out = "Expected '=' after device number";
517 *error_out = "Device already configured";
527 struct list_head list;
532 static DEFINE_SPINLOCK(transports_lock);
533 static LIST_HEAD(transports);
535 /* Filled in during early boot */
536 static LIST_HEAD(eth_cmd_line);
538 static int check_transport(struct transport *transport, char *eth, int n,
539 void **init_out, char **mac_out)
543 len = strlen(transport->name);
544 if(strncmp(eth, transport->name, len))
550 else if(*eth != '\0')
553 *init_out = kmalloc(transport->setup_size, GFP_KERNEL);
554 if(*init_out == NULL)
557 if(!transport->setup(eth, mac_out, *init_out)){
564 void register_transport(struct transport *new)
566 struct list_head *ele, *next;
567 struct eth_init *eth;
572 spin_lock(&transports_lock);
573 BUG_ON(!list_empty(&new->list));
574 list_add(&new->list, &transports);
575 spin_unlock(&transports_lock);
577 list_for_each_safe(ele, next, ð_cmd_line){
578 eth = list_entry(ele, struct eth_init, list);
579 match = check_transport(new, eth->init, eth->index, &init,
583 else if(init != NULL){
584 eth_configure(eth->index, init, mac, new);
587 list_del(ð->list);
591 static int eth_setup_common(char *str, int index)
593 struct list_head *ele;
594 struct transport *transport;
599 spin_lock(&transports_lock);
600 list_for_each(ele, &transports){
601 transport = list_entry(ele, struct transport, list);
602 if(!check_transport(transport, str, index, &init, &mac))
605 eth_configure(index, init, mac, transport);
612 spin_unlock(&transports_lock);
616 static int eth_setup(char *str)
618 struct eth_init *new;
622 err = eth_parse(str, &n, &str, &error);
624 printk(KERN_ERR "eth_setup - Couldn't parse '%s' : %s\n",
629 new = alloc_bootmem(sizeof(*new));
631 printk("eth_init : alloc_bootmem failed\n");
635 INIT_LIST_HEAD(&new->list);
639 list_add_tail(&new->list, ð_cmd_line);
643 __setup("eth", eth_setup);
644 __uml_help(eth_setup,
645 "eth[0-9]+=<transport>,<options>\n"
646 " Configure a network device.\n\n"
649 static int net_config(char *str, char **error_out)
653 err = eth_parse(str, &n, &str, error_out);
657 /* This string is broken up and the pieces used by the underlying
658 * driver. So, it is freed only if eth_setup_common fails.
660 str = kstrdup(str, GFP_KERNEL);
662 *error_out = "net_config failed to strdup string";
665 err = !eth_setup_common(str, n);
671 static int net_id(char **str, int *start_out, int *end_out)
676 n = simple_strtoul(*str, &end, 0);
677 if((*end != '\0') || (end == *str))
686 static int net_remove(int n, char **error_out)
688 struct uml_net *device;
689 struct net_device *dev;
690 struct uml_net_private *lp;
692 device = find_device(n);
700 if(lp->remove != NULL) (*lp->remove)(&lp->user);
701 unregister_netdev(dev);
702 platform_device_unregister(&device->pdev);
704 list_del(&device->list);
710 static struct mc_device net_mc = {
711 .list = LIST_HEAD_INIT(net_mc.list),
713 .config = net_config,
716 .remove = net_remove,
719 static int uml_inetaddr_event(struct notifier_block *this, unsigned long event,
722 struct in_ifaddr *ifa = ptr;
723 struct net_device *dev = ifa->ifa_dev->dev;
724 struct uml_net_private *lp;
725 void (*proc)(unsigned char *, unsigned char *, void *);
726 unsigned char addr_buf[4], netmask_buf[4];
728 if(dev->open != uml_net_open)
736 proc = lp->add_address;
739 proc = lp->delete_address;
743 memcpy(addr_buf, &ifa->ifa_address, sizeof(addr_buf));
744 memcpy(netmask_buf, &ifa->ifa_mask, sizeof(netmask_buf));
745 (*proc)(addr_buf, netmask_buf, &lp->user);
750 /* uml_net_init shouldn't be called twice on two CPUs at the same time */
751 struct notifier_block uml_inetaddr_notifier = {
752 .notifier_call = uml_inetaddr_event,
755 static int uml_net_init(void)
757 struct list_head *ele;
758 struct uml_net_private *lp;
759 struct in_device *ip;
760 struct in_ifaddr *in;
762 mconsole_register_dev(&net_mc);
763 register_inetaddr_notifier(¨_inetaddr_notifier);
765 /* Devices may have been opened already, so the uml_inetaddr_notifier
766 * didn't get a chance to run for them. This fakes it so that
767 * addresses which have already been set up get handled properly.
769 spin_lock(&opened_lock);
770 list_for_each(ele, &opened){
771 lp = list_entry(ele, struct uml_net_private, list);
772 ip = lp->dev->ip_ptr;
777 uml_inetaddr_event(NULL, NETDEV_UP, in);
781 spin_unlock(&opened_lock);
786 __initcall(uml_net_init);
788 static void close_devices(void)
790 struct list_head *ele;
791 struct uml_net_private *lp;
793 spin_lock(&opened_lock);
794 list_for_each(ele, &opened){
795 lp = list_entry(ele, struct uml_net_private, list);
796 free_irq(lp->dev->irq, lp->dev);
797 if((lp->close != NULL) && (lp->fd >= 0))
798 (*lp->close)(lp->fd, &lp->user);
799 if(lp->remove != NULL)
800 (*lp->remove)(&lp->user);
802 spin_unlock(&opened_lock);
805 __uml_exitcall(close_devices);
807 struct sk_buff *ether_adjust_skb(struct sk_buff *skb, int extra)
809 if((skb != NULL) && (skb_tailroom(skb) < extra)){
810 struct sk_buff *skb2;
812 skb2 = skb_copy_expand(skb, 0, extra, GFP_ATOMIC);
816 if(skb != NULL) skb_put(skb, extra);
820 void iter_addresses(void *d, void (*cb)(unsigned char *, unsigned char *,
824 struct net_device *dev = d;
825 struct in_device *ip = dev->ip_ptr;
826 struct in_ifaddr *in;
827 unsigned char address[4], netmask[4];
829 if(ip == NULL) return;
832 memcpy(address, &in->ifa_address, sizeof(address));
833 memcpy(netmask, &in->ifa_mask, sizeof(netmask));
834 (*cb)(address, netmask, arg);
839 int dev_netmask(void *d, void *m)
841 struct net_device *dev = d;
842 struct in_device *ip = dev->ip_ptr;
843 struct in_ifaddr *in;
844 __be32 *mask_out = m;
853 *mask_out = in->ifa_mask;
857 void *get_output_buffer(int *len_out)
861 ret = (void *) __get_free_pages(GFP_KERNEL, 0);
862 if(ret) *len_out = PAGE_SIZE;
867 void free_output_buffer(void *buffer)
869 free_pages((unsigned long) buffer, 0);
872 int tap_setup_common(char *str, char *type, char **dev_name, char **mac_out,
877 remain = split_if_spec(str, dev_name, mac_out, gate_addr, NULL);
879 printk("tap_setup_common - Extra garbage on specification : "
887 unsigned short eth_protocol(struct sk_buff *skb)
889 return(eth_type_trans(skb, skb->dev));