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/config.h"
9 #include "linux/kernel.h"
10 #include "linux/netdevice.h"
11 #include "linux/rtnetlink.h"
12 #include "linux/skbuff.h"
13 #include "linux/socket.h"
14 #include "linux/spinlock.h"
15 #include "linux/module.h"
16 #include "linux/init.h"
17 #include "linux/etherdevice.h"
18 #include "linux/list.h"
19 #include "linux/inetdevice.h"
20 #include "linux/ctype.h"
21 #include "linux/bootmem.h"
22 #include "linux/ethtool.h"
23 #include "asm/uaccess.h"
24 #include "user_util.h"
25 #include "kern_util.h"
28 #include "mconsole_kern.h"
33 #define DRIVER_NAME "uml-netdev"
35 static DEFINE_SPINLOCK(opened_lock
);
38 static int uml_net_rx(struct net_device
*dev
)
40 struct uml_net_private
*lp
= dev
->priv
;
44 /* If we can't allocate memory, try again next round. */
45 skb
= dev_alloc_skb(dev
->mtu
);
47 lp
->stats
.rx_dropped
++;
52 skb_put(skb
, dev
->mtu
);
53 skb
->mac
.raw
= skb
->data
;
54 pkt_len
= (*lp
->read
)(lp
->fd
, &skb
, lp
);
57 skb_trim(skb
, pkt_len
);
58 skb
->protocol
= (*lp
->protocol
)(skb
);
61 lp
->stats
.rx_bytes
+= skb
->len
;
62 lp
->stats
.rx_packets
++;
70 irqreturn_t
uml_net_interrupt(int irq
, void *dev_id
, struct pt_regs
*regs
)
72 struct net_device
*dev
= dev_id
;
73 struct uml_net_private
*lp
= dev
->priv
;
76 if(!netif_running(dev
))
80 while((err
= uml_net_rx(dev
)) > 0) ;
83 "Device '%s' read returned %d, shutting it down\n",
88 reactivate_fd(lp
->fd
, UM_ETH_IRQ
);
91 spin_unlock(&lp
->lock
);
95 static int uml_net_open(struct net_device
*dev
)
97 struct uml_net_private
*lp
= dev
->priv
;
98 char addr
[sizeof("255.255.255.255\0")];
101 spin_lock(&lp
->lock
);
109 dev_ip_addr(dev
, addr
, &lp
->mac
[2]);
110 set_ether_mac(dev
, lp
->mac
);
113 lp
->fd
= (*lp
->open
)(&lp
->user
);
119 err
= um_request_irq(dev
->irq
, lp
->fd
, IRQ_READ
, uml_net_interrupt
,
120 SA_INTERRUPT
| SA_SHIRQ
, dev
->name
, dev
);
122 printk(KERN_ERR
"uml_net_open: failed to get irq(%d)\n", err
);
123 if(lp
->close
!= NULL
) (*lp
->close
)(lp
->fd
, &lp
->user
);
128 lp
->tl
.data
= (unsigned long) &lp
->user
;
129 netif_start_queue(dev
);
131 /* clear buffer - it can happen that the host side of the interface
132 * is full when we get here. In this case, new data is never queued,
133 * SIGIOs never arrive, and the net never works.
135 while((err
= uml_net_rx(dev
)) > 0) ;
138 spin_unlock(&lp
->lock
);
142 static int uml_net_close(struct net_device
*dev
)
144 struct uml_net_private
*lp
= dev
->priv
;
146 netif_stop_queue(dev
);
147 spin_lock(&lp
->lock
);
149 free_irq_by_irq_and_dev(dev
->irq
, dev
);
150 free_irq(dev
->irq
, dev
);
151 if(lp
->close
!= NULL
)
152 (*lp
->close
)(lp
->fd
, &lp
->user
);
155 spin_unlock(&lp
->lock
);
159 static int uml_net_start_xmit(struct sk_buff
*skb
, struct net_device
*dev
)
161 struct uml_net_private
*lp
= dev
->priv
;
165 netif_stop_queue(dev
);
167 spin_lock_irqsave(&lp
->lock
, flags
);
169 len
= (*lp
->write
)(lp
->fd
, &skb
, lp
);
171 if(len
== skb
->len
) {
172 lp
->stats
.tx_packets
++;
173 lp
->stats
.tx_bytes
+= skb
->len
;
174 dev
->trans_start
= jiffies
;
175 netif_start_queue(dev
);
177 /* this is normally done in the interrupt when tx finishes */
178 netif_wake_queue(dev
);
181 netif_start_queue(dev
);
182 lp
->stats
.tx_dropped
++;
185 netif_start_queue(dev
);
186 printk(KERN_ERR
"uml_net_start_xmit: failed(%d)\n", len
);
189 spin_unlock_irqrestore(&lp
->lock
, flags
);
196 static struct net_device_stats
*uml_net_get_stats(struct net_device
*dev
)
198 struct uml_net_private
*lp
= dev
->priv
;
202 static void uml_net_set_multicast_list(struct net_device
*dev
)
204 if (dev
->flags
& IFF_PROMISC
) return;
205 else if (dev
->mc_count
) dev
->flags
|= IFF_ALLMULTI
;
206 else dev
->flags
&= ~IFF_ALLMULTI
;
209 static void uml_net_tx_timeout(struct net_device
*dev
)
211 dev
->trans_start
= jiffies
;
212 netif_wake_queue(dev
);
215 static int uml_net_set_mac(struct net_device
*dev
, void *addr
)
217 struct uml_net_private
*lp
= dev
->priv
;
218 struct sockaddr
*hwaddr
= addr
;
220 spin_lock(&lp
->lock
);
221 memcpy(dev
->dev_addr
, hwaddr
->sa_data
, ETH_ALEN
);
222 spin_unlock(&lp
->lock
);
227 static int uml_net_change_mtu(struct net_device
*dev
, int new_mtu
)
229 struct uml_net_private
*lp
= dev
->priv
;
232 spin_lock(&lp
->lock
);
234 new_mtu
= (*lp
->set_mtu
)(new_mtu
, &lp
->user
);
243 spin_unlock(&lp
->lock
);
247 static int uml_net_ioctl(struct net_device
*dev
, struct ifreq
*ifr
, int cmd
)
249 static const struct ethtool_drvinfo info
= {
250 .cmd
= ETHTOOL_GDRVINFO
,
251 .driver
= DRIVER_NAME
,
259 useraddr
= ifr
->ifr_data
;
260 if (copy_from_user(ðcmd
, useraddr
, sizeof(ethcmd
)))
263 case ETHTOOL_GDRVINFO
:
264 if (copy_to_user(useraddr
, &info
, sizeof(info
)))
275 void uml_net_user_timer_expire(unsigned long _conn
)
278 struct connection
*conn
= (struct connection
*)_conn
;
280 dprintk(KERN_INFO
"uml_net_user_timer_expire [%p]\n", conn
);
285 static DEFINE_SPINLOCK(devices_lock
);
286 static struct list_head devices
= LIST_HEAD_INIT(devices
);
288 static struct device_driver uml_net_driver
= {
290 .bus
= &platform_bus_type
,
292 static int driver_registered
;
294 static int eth_configure(int n
, void *init
, char *mac
,
295 struct transport
*transport
)
297 struct uml_net
*device
;
298 struct net_device
*dev
;
299 struct uml_net_private
*lp
;
302 size
= transport
->private_size
+ sizeof(struct uml_net_private
) +
303 sizeof(((struct uml_net_private
*) 0)->user
);
305 device
= kmalloc(sizeof(*device
), GFP_KERNEL
);
306 if (device
== NULL
) {
307 printk(KERN_ERR
"eth_configure failed to allocate uml_net\n");
311 memset(device
, 0, sizeof(*device
));
312 INIT_LIST_HEAD(&device
->list
);
315 spin_lock(&devices_lock
);
316 list_add(&device
->list
, &devices
);
317 spin_unlock(&devices_lock
);
319 if (setup_etheraddr(mac
, device
->mac
))
320 device
->have_mac
= 1;
322 printk(KERN_INFO
"Netdevice %d ", n
);
323 if (device
->have_mac
)
324 printk("(%02x:%02x:%02x:%02x:%02x:%02x) ",
325 device
->mac
[0], device
->mac
[1],
326 device
->mac
[2], device
->mac
[3],
327 device
->mac
[4], device
->mac
[5]);
329 dev
= alloc_etherdev(size
);
331 printk(KERN_ERR
"eth_configure: failed to allocate device\n");
336 if (!driver_registered
) {
337 driver_register(¨_net_driver
);
338 driver_registered
= 1;
341 device
->pdev
.name
= DRIVER_NAME
;
342 platform_device_register(&device
->pdev
);
343 SET_NETDEV_DEV(dev
,&device
->pdev
.dev
);
345 /* If this name ends up conflicting with an existing registered
346 * netdevice, that is OK, register_netdev{,ice}() will notice this
349 snprintf(dev
->name
, sizeof(dev
->name
), "eth%d", n
);
352 (*transport
->kern
->init
)(dev
, init
);
354 dev
->mtu
= transport
->user
->max_packet
;
355 dev
->open
= uml_net_open
;
356 dev
->hard_start_xmit
= uml_net_start_xmit
;
357 dev
->stop
= uml_net_close
;
358 dev
->get_stats
= uml_net_get_stats
;
359 dev
->set_multicast_list
= uml_net_set_multicast_list
;
360 dev
->tx_timeout
= uml_net_tx_timeout
;
361 dev
->set_mac_address
= uml_net_set_mac
;
362 dev
->change_mtu
= uml_net_change_mtu
;
363 dev
->do_ioctl
= uml_net_ioctl
;
364 dev
->watchdog_timeo
= (HZ
>> 1);
365 dev
->irq
= UM_ETH_IRQ
;
368 err
= register_netdevice(dev
);
372 /* XXX: should we call ->remove() here? */
378 /* lp.user is the first four bytes of the transport data, which
379 * has already been initialized. This structure assignment will
380 * overwrite that, so we make sure that .user gets overwritten with
381 * what it already has.
384 *lp
= ((struct uml_net_private
)
385 { .list
= LIST_HEAD_INIT(lp
->list
),
388 .mac
= { 0xfe, 0xfd, 0x0, 0x0, 0x0, 0x0},
389 .have_mac
= device
->have_mac
,
390 .protocol
= transport
->kern
->protocol
,
391 .open
= transport
->user
->open
,
392 .close
= transport
->user
->close
,
393 .remove
= transport
->user
->remove
,
394 .read
= transport
->kern
->read
,
395 .write
= transport
->kern
->write
,
396 .add_address
= transport
->user
->add_address
,
397 .delete_address
= transport
->user
->delete_address
,
398 .set_mtu
= transport
->user
->set_mtu
,
402 spin_lock_init(&lp
->lock
);
403 lp
->tl
.function
= uml_net_user_timer_expire
;
405 memcpy(lp
->mac
, device
->mac
, sizeof(lp
->mac
));
407 if (transport
->user
->init
)
408 (*transport
->user
->init
)(&lp
->user
, dev
);
410 if (device
->have_mac
)
411 set_ether_mac(dev
, device
->mac
);
413 spin_lock(&opened_lock
);
414 list_add(&lp
->list
, &opened
);
415 spin_unlock(&opened_lock
);
420 static struct uml_net
*find_device(int n
)
422 struct uml_net
*device
;
423 struct list_head
*ele
;
425 spin_lock(&devices_lock
);
426 list_for_each(ele
, &devices
){
427 device
= list_entry(ele
, struct uml_net
, list
);
428 if(device
->index
== n
)
433 spin_unlock(&devices_lock
);
437 static int eth_parse(char *str
, int *index_out
, char **str_out
)
442 n
= simple_strtoul(str
, &end
, 0);
444 printk(KERN_ERR
"eth_setup: Failed to parse '%s'\n", str
);
448 printk(KERN_ERR
"eth_setup: device %d is negative\n", n
);
454 "eth_setup: expected '=' after device number\n");
459 printk(KERN_ERR
"eth_setup: Device %d already configured\n",
463 if(index_out
) *index_out
= n
;
469 struct list_head list
;
474 /* Filled in at boot time. Will need locking if the transports become
477 struct list_head transports
= LIST_HEAD_INIT(transports
);
479 /* Filled in during early boot */
480 struct list_head eth_cmd_line
= LIST_HEAD_INIT(eth_cmd_line
);
482 static int check_transport(struct transport
*transport
, char *eth
, int n
,
483 void **init_out
, char **mac_out
)
487 len
= strlen(transport
->name
);
488 if(strncmp(eth
, transport
->name
, len
))
494 else if(*eth
!= '\0')
497 *init_out
= kmalloc(transport
->setup_size
, GFP_KERNEL
);
498 if(*init_out
== NULL
)
501 if(!transport
->setup(eth
, mac_out
, *init_out
)){
508 void register_transport(struct transport
*new)
510 struct list_head
*ele
, *next
;
511 struct eth_init
*eth
;
516 list_add(&new->list
, &transports
);
518 list_for_each_safe(ele
, next
, ð_cmd_line
){
519 eth
= list_entry(ele
, struct eth_init
, list
);
520 match
= check_transport(new, eth
->init
, eth
->index
, &init
,
524 else if(init
!= NULL
){
525 eth_configure(eth
->index
, init
, mac
, new);
528 list_del(ð
->list
);
532 static int eth_setup_common(char *str
, int index
)
534 struct list_head
*ele
;
535 struct transport
*transport
;
539 list_for_each(ele
, &transports
){
540 transport
= list_entry(ele
, struct transport
, list
);
541 if(!check_transport(transport
, str
, index
, &init
, &mac
))
544 eth_configure(index
, init
, mac
, transport
);
552 static int eth_setup(char *str
)
554 struct eth_init
*new;
557 err
= eth_parse(str
, &n
, &str
);
560 new = alloc_bootmem(sizeof(new));
562 printk("eth_init : alloc_bootmem failed\n");
566 INIT_LIST_HEAD(&new->list
);
570 list_add_tail(&new->list
, ð_cmd_line
);
574 __setup("eth", eth_setup
);
575 __uml_help(eth_setup
,
576 "eth[0-9]+=<transport>,<options>\n"
577 " Configure a network device.\n\n"
581 static int eth_init(void)
583 struct list_head
*ele
, *next
;
584 struct eth_init
*eth
;
586 list_for_each_safe(ele
, next
, ð_cmd_line
){
587 eth
= list_entry(ele
, struct eth_init
, list
);
589 if(eth_setup_common(eth
->init
, eth
->index
))
590 list_del(ð
->list
);
595 __initcall(eth_init
);
598 static int net_config(char *str
)
602 err
= eth_parse(str
, &n
, &str
);
605 str
= uml_strdup(str
);
607 printk(KERN_ERR
"net_config failed to strdup string\n");
610 err
= !eth_setup_common(str
, n
);
616 static int net_remove(char *str
)
618 struct uml_net
*device
;
619 struct net_device
*dev
;
620 struct uml_net_private
*lp
;
624 n
= simple_strtoul(str
, &end
, 0);
625 if((*end
!= '\0') || (end
== str
))
628 device
= find_device(n
);
634 if(lp
->fd
> 0) return(-1);
635 if(lp
->remove
!= NULL
) (*lp
->remove
)(&lp
->user
);
636 unregister_netdev(dev
);
637 platform_device_unregister(&device
->pdev
);
639 list_del(&device
->list
);
645 static struct mc_device net_mc
= {
647 .config
= net_config
,
649 .remove
= net_remove
,
652 static int uml_inetaddr_event(struct notifier_block
*this, unsigned long event
,
655 struct in_ifaddr
*ifa
= ptr
;
656 u32 addr
= ifa
->ifa_address
;
657 u32 netmask
= ifa
->ifa_mask
;
658 struct net_device
*dev
= ifa
->ifa_dev
->dev
;
659 struct uml_net_private
*lp
;
660 void (*proc
)(unsigned char *, unsigned char *, void *);
661 unsigned char addr_buf
[4], netmask_buf
[4];
663 if(dev
->open
!= uml_net_open
) return(NOTIFY_DONE
);
670 proc
= lp
->add_address
;
673 proc
= lp
->delete_address
;
677 addr_buf
[0] = addr
& 0xff;
678 addr_buf
[1] = (addr
>> 8) & 0xff;
679 addr_buf
[2] = (addr
>> 16) & 0xff;
680 addr_buf
[3] = addr
>> 24;
681 netmask_buf
[0] = netmask
& 0xff;
682 netmask_buf
[1] = (netmask
>> 8) & 0xff;
683 netmask_buf
[2] = (netmask
>> 16) & 0xff;
684 netmask_buf
[3] = netmask
>> 24;
685 (*proc
)(addr_buf
, netmask_buf
, &lp
->user
);
690 struct notifier_block uml_inetaddr_notifier
= {
691 .notifier_call
= uml_inetaddr_event
,
694 static int uml_net_init(void)
696 struct list_head
*ele
;
697 struct uml_net_private
*lp
;
698 struct in_device
*ip
;
699 struct in_ifaddr
*in
;
701 mconsole_register_dev(&net_mc
);
702 register_inetaddr_notifier(¨_inetaddr_notifier
);
704 /* Devices may have been opened already, so the uml_inetaddr_notifier
705 * didn't get a chance to run for them. This fakes it so that
706 * addresses which have already been set up get handled properly.
708 list_for_each(ele
, &opened
){
709 lp
= list_entry(ele
, struct uml_net_private
, list
);
710 ip
= lp
->dev
->ip_ptr
;
711 if(ip
== NULL
) continue;
714 uml_inetaddr_event(NULL
, NETDEV_UP
, in
);
722 __initcall(uml_net_init
);
724 static void close_devices(void)
726 struct list_head
*ele
;
727 struct uml_net_private
*lp
;
729 list_for_each(ele
, &opened
){
730 lp
= list_entry(ele
, struct uml_net_private
, list
);
731 if((lp
->close
!= NULL
) && (lp
->fd
>= 0))
732 (*lp
->close
)(lp
->fd
, &lp
->user
);
733 if(lp
->remove
!= NULL
) (*lp
->remove
)(&lp
->user
);
737 __uml_exitcall(close_devices
);
739 int setup_etheraddr(char *str
, unsigned char *addr
)
747 addr
[i
] = simple_strtoul(str
, &end
, 16);
749 ((*end
!= ':') && (*end
!= ',') && (*end
!= '\0'))){
751 "setup_etheraddr: failed to parse '%s' "
752 "as an ethernet address\n", str
);
759 "Attempt to assign a broadcast ethernet address to a "
760 "device disallowed\n");
766 void dev_ip_addr(void *d
, char *buf
, char *bin_buf
)
768 struct net_device
*dev
= d
;
769 struct in_device
*ip
= dev
->ip_ptr
;
770 struct in_ifaddr
*in
;
773 if((ip
== NULL
) || ((in
= ip
->ifa_list
) == NULL
)){
774 printk(KERN_WARNING
"dev_ip_addr - device not assigned an "
778 addr
= in
->ifa_address
;
779 sprintf(buf
, "%d.%d.%d.%d", addr
& 0xff, (addr
>> 8) & 0xff,
780 (addr
>> 16) & 0xff, addr
>> 24);
782 bin_buf
[0] = addr
& 0xff;
783 bin_buf
[1] = (addr
>> 8) & 0xff;
784 bin_buf
[2] = (addr
>> 16) & 0xff;
785 bin_buf
[3] = addr
>> 24;
789 void set_ether_mac(void *d
, unsigned char *addr
)
791 struct net_device
*dev
= d
;
793 memcpy(dev
->dev_addr
, addr
, ETH_ALEN
);
796 struct sk_buff
*ether_adjust_skb(struct sk_buff
*skb
, int extra
)
798 if((skb
!= NULL
) && (skb_tailroom(skb
) < extra
)){
799 struct sk_buff
*skb2
;
801 skb2
= skb_copy_expand(skb
, 0, extra
, GFP_ATOMIC
);
805 if(skb
!= NULL
) skb_put(skb
, extra
);
809 void iter_addresses(void *d
, void (*cb
)(unsigned char *, unsigned char *,
813 struct net_device
*dev
= d
;
814 struct in_device
*ip
= dev
->ip_ptr
;
815 struct in_ifaddr
*in
;
816 unsigned char address
[4], netmask
[4];
818 if(ip
== NULL
) return;
821 address
[0] = in
->ifa_address
& 0xff;
822 address
[1] = (in
->ifa_address
>> 8) & 0xff;
823 address
[2] = (in
->ifa_address
>> 16) & 0xff;
824 address
[3] = in
->ifa_address
>> 24;
825 netmask
[0] = in
->ifa_mask
& 0xff;
826 netmask
[1] = (in
->ifa_mask
>> 8) & 0xff;
827 netmask
[2] = (in
->ifa_mask
>> 16) & 0xff;
828 netmask
[3] = in
->ifa_mask
>> 24;
829 (*cb
)(address
, netmask
, arg
);
834 int dev_netmask(void *d
, void *m
)
836 struct net_device
*dev
= d
;
837 struct in_device
*ip
= dev
->ip_ptr
;
838 struct in_ifaddr
*in
;
848 *mask_out
= in
->ifa_mask
;
852 void *get_output_buffer(int *len_out
)
856 ret
= (void *) __get_free_pages(GFP_KERNEL
, 0);
857 if(ret
) *len_out
= PAGE_SIZE
;
862 void free_output_buffer(void *buffer
)
864 free_pages((unsigned long) buffer
, 0);
867 int tap_setup_common(char *str
, char *type
, char **dev_name
, char **mac_out
,
872 remain
= split_if_spec(str
, dev_name
, mac_out
, gate_addr
, NULL
);
874 printk("tap_setup_common - Extra garbage on specification : "
882 unsigned short eth_protocol(struct sk_buff
*skb
)
884 return(eth_type_trans(skb
, skb
->dev
));
888 * Overrides for Emacs so that we follow Linus's tabbing style.
889 * Emacs will notice this stuff at the end of the file and automatically
890 * adjust the settings for this buffer only. This must remain at the end
892 * ---------------------------------------------------------------------------
894 * c-file-style: "linux"