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(dev
->irq
, dev
);
150 if(lp
->close
!= NULL
)
151 (*lp
->close
)(lp
->fd
, &lp
->user
);
154 spin_unlock(&lp
->lock
);
158 static int uml_net_start_xmit(struct sk_buff
*skb
, struct net_device
*dev
)
160 struct uml_net_private
*lp
= dev
->priv
;
164 netif_stop_queue(dev
);
166 spin_lock_irqsave(&lp
->lock
, flags
);
168 len
= (*lp
->write
)(lp
->fd
, &skb
, lp
);
170 if(len
== skb
->len
) {
171 lp
->stats
.tx_packets
++;
172 lp
->stats
.tx_bytes
+= skb
->len
;
173 dev
->trans_start
= jiffies
;
174 netif_start_queue(dev
);
176 /* this is normally done in the interrupt when tx finishes */
177 netif_wake_queue(dev
);
180 netif_start_queue(dev
);
181 lp
->stats
.tx_dropped
++;
184 netif_start_queue(dev
);
185 printk(KERN_ERR
"uml_net_start_xmit: failed(%d)\n", len
);
188 spin_unlock_irqrestore(&lp
->lock
, flags
);
195 static struct net_device_stats
*uml_net_get_stats(struct net_device
*dev
)
197 struct uml_net_private
*lp
= dev
->priv
;
201 static void uml_net_set_multicast_list(struct net_device
*dev
)
203 if (dev
->flags
& IFF_PROMISC
) return;
204 else if (dev
->mc_count
) dev
->flags
|= IFF_ALLMULTI
;
205 else dev
->flags
&= ~IFF_ALLMULTI
;
208 static void uml_net_tx_timeout(struct net_device
*dev
)
210 dev
->trans_start
= jiffies
;
211 netif_wake_queue(dev
);
214 static int uml_net_set_mac(struct net_device
*dev
, void *addr
)
216 struct uml_net_private
*lp
= dev
->priv
;
217 struct sockaddr
*hwaddr
= addr
;
219 spin_lock(&lp
->lock
);
220 memcpy(dev
->dev_addr
, hwaddr
->sa_data
, ETH_ALEN
);
221 spin_unlock(&lp
->lock
);
226 static int uml_net_change_mtu(struct net_device
*dev
, int new_mtu
)
228 struct uml_net_private
*lp
= dev
->priv
;
231 spin_lock(&lp
->lock
);
233 new_mtu
= (*lp
->set_mtu
)(new_mtu
, &lp
->user
);
242 spin_unlock(&lp
->lock
);
246 static int uml_net_ioctl(struct net_device
*dev
, struct ifreq
*ifr
, int cmd
)
248 static const struct ethtool_drvinfo info
= {
249 .cmd
= ETHTOOL_GDRVINFO
,
250 .driver
= DRIVER_NAME
,
258 useraddr
= ifr
->ifr_data
;
259 if (copy_from_user(ðcmd
, useraddr
, sizeof(ethcmd
)))
262 case ETHTOOL_GDRVINFO
:
263 if (copy_to_user(useraddr
, &info
, sizeof(info
)))
274 void uml_net_user_timer_expire(unsigned long _conn
)
277 struct connection
*conn
= (struct connection
*)_conn
;
279 dprintk(KERN_INFO
"uml_net_user_timer_expire [%p]\n", conn
);
284 static DEFINE_SPINLOCK(devices_lock
);
285 static struct list_head devices
= LIST_HEAD_INIT(devices
);
287 static struct device_driver uml_net_driver
= {
289 .bus
= &platform_bus_type
,
291 static int driver_registered
;
293 static int eth_configure(int n
, void *init
, char *mac
,
294 struct transport
*transport
)
296 struct uml_net
*device
;
297 struct net_device
*dev
;
298 struct uml_net_private
*lp
;
301 size
= transport
->private_size
+ sizeof(struct uml_net_private
) +
302 sizeof(((struct uml_net_private
*) 0)->user
);
304 device
= kmalloc(sizeof(*device
), GFP_KERNEL
);
305 if (device
== NULL
) {
306 printk(KERN_ERR
"eth_configure failed to allocate uml_net\n");
310 memset(device
, 0, sizeof(*device
));
311 INIT_LIST_HEAD(&device
->list
);
314 spin_lock(&devices_lock
);
315 list_add(&device
->list
, &devices
);
316 spin_unlock(&devices_lock
);
318 if (setup_etheraddr(mac
, device
->mac
))
319 device
->have_mac
= 1;
321 printk(KERN_INFO
"Netdevice %d ", n
);
322 if (device
->have_mac
)
323 printk("(%02x:%02x:%02x:%02x:%02x:%02x) ",
324 device
->mac
[0], device
->mac
[1],
325 device
->mac
[2], device
->mac
[3],
326 device
->mac
[4], device
->mac
[5]);
328 dev
= alloc_etherdev(size
);
330 printk(KERN_ERR
"eth_configure: failed to allocate device\n");
335 if (!driver_registered
) {
336 driver_register(¨_net_driver
);
337 driver_registered
= 1;
340 device
->pdev
.name
= DRIVER_NAME
;
341 platform_device_register(&device
->pdev
);
342 SET_NETDEV_DEV(dev
,&device
->pdev
.dev
);
344 /* If this name ends up conflicting with an existing registered
345 * netdevice, that is OK, register_netdev{,ice}() will notice this
348 snprintf(dev
->name
, sizeof(dev
->name
), "eth%d", n
);
351 (*transport
->kern
->init
)(dev
, init
);
353 dev
->mtu
= transport
->user
->max_packet
;
354 dev
->open
= uml_net_open
;
355 dev
->hard_start_xmit
= uml_net_start_xmit
;
356 dev
->stop
= uml_net_close
;
357 dev
->get_stats
= uml_net_get_stats
;
358 dev
->set_multicast_list
= uml_net_set_multicast_list
;
359 dev
->tx_timeout
= uml_net_tx_timeout
;
360 dev
->set_mac_address
= uml_net_set_mac
;
361 dev
->change_mtu
= uml_net_change_mtu
;
362 dev
->do_ioctl
= uml_net_ioctl
;
363 dev
->watchdog_timeo
= (HZ
>> 1);
364 dev
->irq
= UM_ETH_IRQ
;
367 err
= register_netdevice(dev
);
371 /* XXX: should we call ->remove() here? */
377 /* lp.user is the first four bytes of the transport data, which
378 * has already been initialized. This structure assignment will
379 * overwrite that, so we make sure that .user gets overwritten with
380 * what it already has.
383 *lp
= ((struct uml_net_private
)
384 { .list
= LIST_HEAD_INIT(lp
->list
),
387 .mac
= { 0xfe, 0xfd, 0x0, 0x0, 0x0, 0x0},
388 .have_mac
= device
->have_mac
,
389 .protocol
= transport
->kern
->protocol
,
390 .open
= transport
->user
->open
,
391 .close
= transport
->user
->close
,
392 .remove
= transport
->user
->remove
,
393 .read
= transport
->kern
->read
,
394 .write
= transport
->kern
->write
,
395 .add_address
= transport
->user
->add_address
,
396 .delete_address
= transport
->user
->delete_address
,
397 .set_mtu
= transport
->user
->set_mtu
,
401 spin_lock_init(&lp
->lock
);
402 lp
->tl
.function
= uml_net_user_timer_expire
;
404 memcpy(lp
->mac
, device
->mac
, sizeof(lp
->mac
));
406 if (transport
->user
->init
)
407 (*transport
->user
->init
)(&lp
->user
, dev
);
409 if (device
->have_mac
)
410 set_ether_mac(dev
, device
->mac
);
412 spin_lock(&opened_lock
);
413 list_add(&lp
->list
, &opened
);
414 spin_unlock(&opened_lock
);
419 static struct uml_net
*find_device(int n
)
421 struct uml_net
*device
;
422 struct list_head
*ele
;
424 spin_lock(&devices_lock
);
425 list_for_each(ele
, &devices
){
426 device
= list_entry(ele
, struct uml_net
, list
);
427 if(device
->index
== n
)
432 spin_unlock(&devices_lock
);
436 static int eth_parse(char *str
, int *index_out
, char **str_out
)
441 n
= simple_strtoul(str
, &end
, 0);
443 printk(KERN_ERR
"eth_setup: Failed to parse '%s'\n", str
);
447 printk(KERN_ERR
"eth_setup: device %d is negative\n", n
);
453 "eth_setup: expected '=' after device number\n");
458 printk(KERN_ERR
"eth_setup: Device %d already configured\n",
462 if(index_out
) *index_out
= n
;
468 struct list_head list
;
473 /* Filled in at boot time. Will need locking if the transports become
476 struct list_head transports
= LIST_HEAD_INIT(transports
);
478 /* Filled in during early boot */
479 struct list_head eth_cmd_line
= LIST_HEAD_INIT(eth_cmd_line
);
481 static int check_transport(struct transport
*transport
, char *eth
, int n
,
482 void **init_out
, char **mac_out
)
486 len
= strlen(transport
->name
);
487 if(strncmp(eth
, transport
->name
, len
))
493 else if(*eth
!= '\0')
496 *init_out
= kmalloc(transport
->setup_size
, GFP_KERNEL
);
497 if(*init_out
== NULL
)
500 if(!transport
->setup(eth
, mac_out
, *init_out
)){
507 void register_transport(struct transport
*new)
509 struct list_head
*ele
, *next
;
510 struct eth_init
*eth
;
515 list_add(&new->list
, &transports
);
517 list_for_each_safe(ele
, next
, ð_cmd_line
){
518 eth
= list_entry(ele
, struct eth_init
, list
);
519 match
= check_transport(new, eth
->init
, eth
->index
, &init
,
523 else if(init
!= NULL
){
524 eth_configure(eth
->index
, init
, mac
, new);
527 list_del(ð
->list
);
531 static int eth_setup_common(char *str
, int index
)
533 struct list_head
*ele
;
534 struct transport
*transport
;
538 list_for_each(ele
, &transports
){
539 transport
= list_entry(ele
, struct transport
, list
);
540 if(!check_transport(transport
, str
, index
, &init
, &mac
))
543 eth_configure(index
, init
, mac
, transport
);
551 static int eth_setup(char *str
)
553 struct eth_init
*new;
556 err
= eth_parse(str
, &n
, &str
);
559 new = alloc_bootmem(sizeof(new));
561 printk("eth_init : alloc_bootmem failed\n");
565 INIT_LIST_HEAD(&new->list
);
569 list_add_tail(&new->list
, ð_cmd_line
);
573 __setup("eth", eth_setup
);
574 __uml_help(eth_setup
,
575 "eth[0-9]+=<transport>,<options>\n"
576 " Configure a network device.\n\n"
580 static int eth_init(void)
582 struct list_head
*ele
, *next
;
583 struct eth_init
*eth
;
585 list_for_each_safe(ele
, next
, ð_cmd_line
){
586 eth
= list_entry(ele
, struct eth_init
, list
);
588 if(eth_setup_common(eth
->init
, eth
->index
))
589 list_del(ð
->list
);
594 __initcall(eth_init
);
597 static int net_config(char *str
)
601 err
= eth_parse(str
, &n
, &str
);
604 str
= uml_strdup(str
);
606 printk(KERN_ERR
"net_config failed to strdup string\n");
609 err
= !eth_setup_common(str
, n
);
615 static int net_id(char **str
, int *start_out
, int *end_out
)
620 n
= simple_strtoul(*str
, &end
, 0);
621 if((*end
!= '\0') || (end
== *str
))
630 static int net_remove(int n
)
632 struct uml_net
*device
;
633 struct net_device
*dev
;
634 struct uml_net_private
*lp
;
636 device
= find_device(n
);
644 if(lp
->remove
!= NULL
) (*lp
->remove
)(&lp
->user
);
645 unregister_netdev(dev
);
646 platform_device_unregister(&device
->pdev
);
648 list_del(&device
->list
);
654 static struct mc_device net_mc
= {
656 .config
= net_config
,
659 .remove
= net_remove
,
662 static int uml_inetaddr_event(struct notifier_block
*this, unsigned long event
,
665 struct in_ifaddr
*ifa
= ptr
;
666 u32 addr
= ifa
->ifa_address
;
667 u32 netmask
= ifa
->ifa_mask
;
668 struct net_device
*dev
= ifa
->ifa_dev
->dev
;
669 struct uml_net_private
*lp
;
670 void (*proc
)(unsigned char *, unsigned char *, void *);
671 unsigned char addr_buf
[4], netmask_buf
[4];
673 if(dev
->open
!= uml_net_open
) return(NOTIFY_DONE
);
680 proc
= lp
->add_address
;
683 proc
= lp
->delete_address
;
687 addr_buf
[0] = addr
& 0xff;
688 addr_buf
[1] = (addr
>> 8) & 0xff;
689 addr_buf
[2] = (addr
>> 16) & 0xff;
690 addr_buf
[3] = addr
>> 24;
691 netmask_buf
[0] = netmask
& 0xff;
692 netmask_buf
[1] = (netmask
>> 8) & 0xff;
693 netmask_buf
[2] = (netmask
>> 16) & 0xff;
694 netmask_buf
[3] = netmask
>> 24;
695 (*proc
)(addr_buf
, netmask_buf
, &lp
->user
);
700 struct notifier_block uml_inetaddr_notifier
= {
701 .notifier_call
= uml_inetaddr_event
,
704 static int uml_net_init(void)
706 struct list_head
*ele
;
707 struct uml_net_private
*lp
;
708 struct in_device
*ip
;
709 struct in_ifaddr
*in
;
711 mconsole_register_dev(&net_mc
);
712 register_inetaddr_notifier(¨_inetaddr_notifier
);
714 /* Devices may have been opened already, so the uml_inetaddr_notifier
715 * didn't get a chance to run for them. This fakes it so that
716 * addresses which have already been set up get handled properly.
718 list_for_each(ele
, &opened
){
719 lp
= list_entry(ele
, struct uml_net_private
, list
);
720 ip
= lp
->dev
->ip_ptr
;
721 if(ip
== NULL
) continue;
724 uml_inetaddr_event(NULL
, NETDEV_UP
, in
);
732 __initcall(uml_net_init
);
734 static void close_devices(void)
736 struct list_head
*ele
;
737 struct uml_net_private
*lp
;
739 list_for_each(ele
, &opened
){
740 lp
= list_entry(ele
, struct uml_net_private
, list
);
741 if((lp
->close
!= NULL
) && (lp
->fd
>= 0))
742 (*lp
->close
)(lp
->fd
, &lp
->user
);
743 if(lp
->remove
!= NULL
) (*lp
->remove
)(&lp
->user
);
747 __uml_exitcall(close_devices
);
749 int setup_etheraddr(char *str
, unsigned char *addr
)
757 addr
[i
] = simple_strtoul(str
, &end
, 16);
759 ((*end
!= ':') && (*end
!= ',') && (*end
!= '\0'))){
761 "setup_etheraddr: failed to parse '%s' "
762 "as an ethernet address\n", str
);
769 "Attempt to assign a broadcast ethernet address to a "
770 "device disallowed\n");
776 void dev_ip_addr(void *d
, char *buf
, char *bin_buf
)
778 struct net_device
*dev
= d
;
779 struct in_device
*ip
= dev
->ip_ptr
;
780 struct in_ifaddr
*in
;
783 if((ip
== NULL
) || ((in
= ip
->ifa_list
) == NULL
)){
784 printk(KERN_WARNING
"dev_ip_addr - device not assigned an "
788 addr
= in
->ifa_address
;
789 sprintf(buf
, "%d.%d.%d.%d", addr
& 0xff, (addr
>> 8) & 0xff,
790 (addr
>> 16) & 0xff, addr
>> 24);
792 bin_buf
[0] = addr
& 0xff;
793 bin_buf
[1] = (addr
>> 8) & 0xff;
794 bin_buf
[2] = (addr
>> 16) & 0xff;
795 bin_buf
[3] = addr
>> 24;
799 void set_ether_mac(void *d
, unsigned char *addr
)
801 struct net_device
*dev
= d
;
803 memcpy(dev
->dev_addr
, addr
, ETH_ALEN
);
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 address
[0] = in
->ifa_address
& 0xff;
832 address
[1] = (in
->ifa_address
>> 8) & 0xff;
833 address
[2] = (in
->ifa_address
>> 16) & 0xff;
834 address
[3] = in
->ifa_address
>> 24;
835 netmask
[0] = in
->ifa_mask
& 0xff;
836 netmask
[1] = (in
->ifa_mask
>> 8) & 0xff;
837 netmask
[2] = (in
->ifa_mask
>> 16) & 0xff;
838 netmask
[3] = in
->ifa_mask
>> 24;
839 (*cb
)(address
, netmask
, arg
);
844 int dev_netmask(void *d
, void *m
)
846 struct net_device
*dev
= d
;
847 struct in_device
*ip
= dev
->ip_ptr
;
848 struct in_ifaddr
*in
;
858 *mask_out
= in
->ifa_mask
;
862 void *get_output_buffer(int *len_out
)
866 ret
= (void *) __get_free_pages(GFP_KERNEL
, 0);
867 if(ret
) *len_out
= PAGE_SIZE
;
872 void free_output_buffer(void *buffer
)
874 free_pages((unsigned long) buffer
, 0);
877 int tap_setup_common(char *str
, char *type
, char **dev_name
, char **mac_out
,
882 remain
= split_if_spec(str
, dev_name
, mac_out
, gate_addr
, NULL
);
884 printk("tap_setup_common - Extra garbage on specification : "
892 unsigned short eth_protocol(struct sk_buff
*skb
)
894 return(eth_type_trans(skb
, skb
->dev
));
898 * Overrides for Emacs so that we follow Linus's tabbing style.
899 * Emacs will notice this stuff at the end of the file and automatically
900 * adjust the settings for this buffer only. This must remain at the end
902 * ---------------------------------------------------------------------------
904 * c-file-style: "linux"