Linux 2.6.33-rc8
[linux-2.6/lguest.git] / net / decnet / dn_dev.c
blob238af093495b2448e140fbf3366c0ad45ef8d1f0
1 /*
2 * DECnet An implementation of the DECnet protocol suite for the LINUX
3 * operating system. DECnet is implemented using the BSD Socket
4 * interface as the means of communication with the user level.
6 * DECnet Device Layer
8 * Authors: Steve Whitehouse <SteveW@ACM.org>
9 * Eduardo Marcelo Serrat <emserrat@geocities.com>
11 * Changes:
12 * Steve Whitehouse : Devices now see incoming frames so they
13 * can mark on who it came from.
14 * Steve Whitehouse : Fixed bug in creating neighbours. Each neighbour
15 * can now have a device specific setup func.
16 * Steve Whitehouse : Added /proc/sys/net/decnet/conf/<dev>/
17 * Steve Whitehouse : Fixed bug which sometimes killed timer
18 * Steve Whitehouse : Multiple ifaddr support
19 * Steve Whitehouse : SIOCGIFCONF is now a compile time option
20 * Steve Whitehouse : /proc/sys/net/decnet/conf/<sys>/forwarding
21 * Steve Whitehouse : Removed timer1 - it's a user space issue now
22 * Patrick Caulfield : Fixed router hello message format
23 * Steve Whitehouse : Got rid of constant sizes for blksize for
24 * devices. All mtu based now.
27 #include <linux/capability.h>
28 #include <linux/module.h>
29 #include <linux/moduleparam.h>
30 #include <linux/init.h>
31 #include <linux/net.h>
32 #include <linux/netdevice.h>
33 #include <linux/proc_fs.h>
34 #include <linux/seq_file.h>
35 #include <linux/timer.h>
36 #include <linux/string.h>
37 #include <linux/if_addr.h>
38 #include <linux/if_arp.h>
39 #include <linux/if_ether.h>
40 #include <linux/skbuff.h>
41 #include <linux/sysctl.h>
42 #include <linux/notifier.h>
43 #include <asm/uaccess.h>
44 #include <asm/system.h>
45 #include <net/net_namespace.h>
46 #include <net/neighbour.h>
47 #include <net/dst.h>
48 #include <net/flow.h>
49 #include <net/fib_rules.h>
50 #include <net/netlink.h>
51 #include <net/dn.h>
52 #include <net/dn_dev.h>
53 #include <net/dn_route.h>
54 #include <net/dn_neigh.h>
55 #include <net/dn_fib.h>
57 #define DN_IFREQ_SIZE (sizeof(struct ifreq) - sizeof(struct sockaddr) + sizeof(struct sockaddr_dn))
59 static char dn_rt_all_end_mcast[ETH_ALEN] = {0xAB,0x00,0x00,0x04,0x00,0x00};
60 static char dn_rt_all_rt_mcast[ETH_ALEN] = {0xAB,0x00,0x00,0x03,0x00,0x00};
61 static char dn_hiord[ETH_ALEN] = {0xAA,0x00,0x04,0x00,0x00,0x00};
62 static unsigned char dn_eco_version[3] = {0x02,0x00,0x00};
64 extern struct neigh_table dn_neigh_table;
67 * decnet_address is kept in network order.
69 __le16 decnet_address = 0;
71 static DEFINE_SPINLOCK(dndev_lock);
72 static struct net_device *decnet_default_device;
73 static BLOCKING_NOTIFIER_HEAD(dnaddr_chain);
75 static struct dn_dev *dn_dev_create(struct net_device *dev, int *err);
76 static void dn_dev_delete(struct net_device *dev);
77 static void dn_ifaddr_notify(int event, struct dn_ifaddr *ifa);
79 static int dn_eth_up(struct net_device *);
80 static void dn_eth_down(struct net_device *);
81 static void dn_send_brd_hello(struct net_device *dev, struct dn_ifaddr *ifa);
82 static void dn_send_ptp_hello(struct net_device *dev, struct dn_ifaddr *ifa);
84 static struct dn_dev_parms dn_dev_list[] = {
86 .type = ARPHRD_ETHER, /* Ethernet */
87 .mode = DN_DEV_BCAST,
88 .state = DN_DEV_S_RU,
89 .t2 = 1,
90 .t3 = 10,
91 .name = "ethernet",
92 .up = dn_eth_up,
93 .down = dn_eth_down,
94 .timer3 = dn_send_brd_hello,
97 .type = ARPHRD_IPGRE, /* DECnet tunneled over GRE in IP */
98 .mode = DN_DEV_BCAST,
99 .state = DN_DEV_S_RU,
100 .t2 = 1,
101 .t3 = 10,
102 .name = "ipgre",
103 .timer3 = dn_send_brd_hello,
105 #if 0
107 .type = ARPHRD_X25, /* Bog standard X.25 */
108 .mode = DN_DEV_UCAST,
109 .state = DN_DEV_S_DS,
110 .t2 = 1,
111 .t3 = 120,
112 .name = "x25",
113 .timer3 = dn_send_ptp_hello,
115 #endif
116 #if 0
118 .type = ARPHRD_PPP, /* DECnet over PPP */
119 .mode = DN_DEV_BCAST,
120 .state = DN_DEV_S_RU,
121 .t2 = 1,
122 .t3 = 10,
123 .name = "ppp",
124 .timer3 = dn_send_brd_hello,
126 #endif
128 .type = ARPHRD_DDCMP, /* DECnet over DDCMP */
129 .mode = DN_DEV_UCAST,
130 .state = DN_DEV_S_DS,
131 .t2 = 1,
132 .t3 = 120,
133 .name = "ddcmp",
134 .timer3 = dn_send_ptp_hello,
137 .type = ARPHRD_LOOPBACK, /* Loopback interface - always last */
138 .mode = DN_DEV_BCAST,
139 .state = DN_DEV_S_RU,
140 .t2 = 1,
141 .t3 = 10,
142 .name = "loopback",
143 .timer3 = dn_send_brd_hello,
147 #define DN_DEV_LIST_SIZE ARRAY_SIZE(dn_dev_list)
149 #define DN_DEV_PARMS_OFFSET(x) offsetof(struct dn_dev_parms, x)
151 #ifdef CONFIG_SYSCTL
153 static int min_t2[] = { 1 };
154 static int max_t2[] = { 60 }; /* No max specified, but this seems sensible */
155 static int min_t3[] = { 1 };
156 static int max_t3[] = { 8191 }; /* Must fit in 16 bits when multiplied by BCT3MULT or T3MULT */
158 static int min_priority[1];
159 static int max_priority[] = { 127 }; /* From DECnet spec */
161 static int dn_forwarding_proc(ctl_table *, int,
162 void __user *, size_t *, loff_t *);
163 static struct dn_dev_sysctl_table {
164 struct ctl_table_header *sysctl_header;
165 ctl_table dn_dev_vars[5];
166 } dn_dev_sysctl = {
167 NULL,
170 .procname = "forwarding",
171 .data = (void *)DN_DEV_PARMS_OFFSET(forwarding),
172 .maxlen = sizeof(int),
173 .mode = 0644,
174 .proc_handler = dn_forwarding_proc,
177 .procname = "priority",
178 .data = (void *)DN_DEV_PARMS_OFFSET(priority),
179 .maxlen = sizeof(int),
180 .mode = 0644,
181 .proc_handler = proc_dointvec_minmax,
182 .extra1 = &min_priority,
183 .extra2 = &max_priority
186 .procname = "t2",
187 .data = (void *)DN_DEV_PARMS_OFFSET(t2),
188 .maxlen = sizeof(int),
189 .mode = 0644,
190 .proc_handler = proc_dointvec_minmax,
191 .extra1 = &min_t2,
192 .extra2 = &max_t2
195 .procname = "t3",
196 .data = (void *)DN_DEV_PARMS_OFFSET(t3),
197 .maxlen = sizeof(int),
198 .mode = 0644,
199 .proc_handler = proc_dointvec_minmax,
200 .extra1 = &min_t3,
201 .extra2 = &max_t3
207 static void dn_dev_sysctl_register(struct net_device *dev, struct dn_dev_parms *parms)
209 struct dn_dev_sysctl_table *t;
210 int i;
212 #define DN_CTL_PATH_DEV 3
214 struct ctl_path dn_ctl_path[] = {
215 { .procname = "net", },
216 { .procname = "decnet", },
217 { .procname = "conf", },
218 { /* to be set */ },
219 { },
222 t = kmemdup(&dn_dev_sysctl, sizeof(*t), GFP_KERNEL);
223 if (t == NULL)
224 return;
226 for(i = 0; i < ARRAY_SIZE(t->dn_dev_vars) - 1; i++) {
227 long offset = (long)t->dn_dev_vars[i].data;
228 t->dn_dev_vars[i].data = ((char *)parms) + offset;
231 if (dev) {
232 dn_ctl_path[DN_CTL_PATH_DEV].procname = dev->name;
233 } else {
234 dn_ctl_path[DN_CTL_PATH_DEV].procname = parms->name;
237 t->dn_dev_vars[0].extra1 = (void *)dev;
239 t->sysctl_header = register_sysctl_paths(dn_ctl_path, t->dn_dev_vars);
240 if (t->sysctl_header == NULL)
241 kfree(t);
242 else
243 parms->sysctl = t;
246 static void dn_dev_sysctl_unregister(struct dn_dev_parms *parms)
248 if (parms->sysctl) {
249 struct dn_dev_sysctl_table *t = parms->sysctl;
250 parms->sysctl = NULL;
251 unregister_sysctl_table(t->sysctl_header);
252 kfree(t);
256 static int dn_forwarding_proc(ctl_table *table, int write,
257 void __user *buffer,
258 size_t *lenp, loff_t *ppos)
260 #ifdef CONFIG_DECNET_ROUTER
261 struct net_device *dev = table->extra1;
262 struct dn_dev *dn_db;
263 int err;
264 int tmp, old;
266 if (table->extra1 == NULL)
267 return -EINVAL;
269 dn_db = dev->dn_ptr;
270 old = dn_db->parms.forwarding;
272 err = proc_dointvec(table, write, buffer, lenp, ppos);
274 if ((err >= 0) && write) {
275 if (dn_db->parms.forwarding < 0)
276 dn_db->parms.forwarding = 0;
277 if (dn_db->parms.forwarding > 2)
278 dn_db->parms.forwarding = 2;
280 * What an ugly hack this is... its works, just. It
281 * would be nice if sysctl/proc were just that little
282 * bit more flexible so I don't have to write a special
283 * routine, or suffer hacks like this - SJW
285 tmp = dn_db->parms.forwarding;
286 dn_db->parms.forwarding = old;
287 if (dn_db->parms.down)
288 dn_db->parms.down(dev);
289 dn_db->parms.forwarding = tmp;
290 if (dn_db->parms.up)
291 dn_db->parms.up(dev);
294 return err;
295 #else
296 return -EINVAL;
297 #endif
300 #else /* CONFIG_SYSCTL */
301 static void dn_dev_sysctl_unregister(struct dn_dev_parms *parms)
304 static void dn_dev_sysctl_register(struct net_device *dev, struct dn_dev_parms *parms)
308 #endif /* CONFIG_SYSCTL */
310 static inline __u16 mtu2blksize(struct net_device *dev)
312 u32 blksize = dev->mtu;
313 if (blksize > 0xffff)
314 blksize = 0xffff;
316 if (dev->type == ARPHRD_ETHER ||
317 dev->type == ARPHRD_PPP ||
318 dev->type == ARPHRD_IPGRE ||
319 dev->type == ARPHRD_LOOPBACK)
320 blksize -= 2;
322 return (__u16)blksize;
325 static struct dn_ifaddr *dn_dev_alloc_ifa(void)
327 struct dn_ifaddr *ifa;
329 ifa = kzalloc(sizeof(*ifa), GFP_KERNEL);
331 return ifa;
334 static __inline__ void dn_dev_free_ifa(struct dn_ifaddr *ifa)
336 kfree(ifa);
339 static void dn_dev_del_ifa(struct dn_dev *dn_db, struct dn_ifaddr **ifap, int destroy)
341 struct dn_ifaddr *ifa1 = *ifap;
342 unsigned char mac_addr[6];
343 struct net_device *dev = dn_db->dev;
345 ASSERT_RTNL();
347 *ifap = ifa1->ifa_next;
349 if (dn_db->dev->type == ARPHRD_ETHER) {
350 if (ifa1->ifa_local != dn_eth2dn(dev->dev_addr)) {
351 dn_dn2eth(mac_addr, ifa1->ifa_local);
352 dev_mc_delete(dev, mac_addr, ETH_ALEN, 0);
356 dn_ifaddr_notify(RTM_DELADDR, ifa1);
357 blocking_notifier_call_chain(&dnaddr_chain, NETDEV_DOWN, ifa1);
358 if (destroy) {
359 dn_dev_free_ifa(ifa1);
361 if (dn_db->ifa_list == NULL)
362 dn_dev_delete(dn_db->dev);
366 static int dn_dev_insert_ifa(struct dn_dev *dn_db, struct dn_ifaddr *ifa)
368 struct net_device *dev = dn_db->dev;
369 struct dn_ifaddr *ifa1;
370 unsigned char mac_addr[6];
372 ASSERT_RTNL();
374 /* Check for duplicates */
375 for(ifa1 = dn_db->ifa_list; ifa1; ifa1 = ifa1->ifa_next) {
376 if (ifa1->ifa_local == ifa->ifa_local)
377 return -EEXIST;
380 if (dev->type == ARPHRD_ETHER) {
381 if (ifa->ifa_local != dn_eth2dn(dev->dev_addr)) {
382 dn_dn2eth(mac_addr, ifa->ifa_local);
383 dev_mc_add(dev, mac_addr, ETH_ALEN, 0);
387 ifa->ifa_next = dn_db->ifa_list;
388 dn_db->ifa_list = ifa;
390 dn_ifaddr_notify(RTM_NEWADDR, ifa);
391 blocking_notifier_call_chain(&dnaddr_chain, NETDEV_UP, ifa);
393 return 0;
396 static int dn_dev_set_ifa(struct net_device *dev, struct dn_ifaddr *ifa)
398 struct dn_dev *dn_db = dev->dn_ptr;
399 int rv;
401 if (dn_db == NULL) {
402 int err;
403 dn_db = dn_dev_create(dev, &err);
404 if (dn_db == NULL)
405 return err;
408 ifa->ifa_dev = dn_db;
410 if (dev->flags & IFF_LOOPBACK)
411 ifa->ifa_scope = RT_SCOPE_HOST;
413 rv = dn_dev_insert_ifa(dn_db, ifa);
414 if (rv)
415 dn_dev_free_ifa(ifa);
416 return rv;
420 int dn_dev_ioctl(unsigned int cmd, void __user *arg)
422 char buffer[DN_IFREQ_SIZE];
423 struct ifreq *ifr = (struct ifreq *)buffer;
424 struct sockaddr_dn *sdn = (struct sockaddr_dn *)&ifr->ifr_addr;
425 struct dn_dev *dn_db;
426 struct net_device *dev;
427 struct dn_ifaddr *ifa = NULL, **ifap = NULL;
428 int ret = 0;
430 if (copy_from_user(ifr, arg, DN_IFREQ_SIZE))
431 return -EFAULT;
432 ifr->ifr_name[IFNAMSIZ-1] = 0;
434 dev_load(&init_net, ifr->ifr_name);
436 switch(cmd) {
437 case SIOCGIFADDR:
438 break;
439 case SIOCSIFADDR:
440 if (!capable(CAP_NET_ADMIN))
441 return -EACCES;
442 if (sdn->sdn_family != AF_DECnet)
443 return -EINVAL;
444 break;
445 default:
446 return -EINVAL;
449 rtnl_lock();
451 if ((dev = __dev_get_by_name(&init_net, ifr->ifr_name)) == NULL) {
452 ret = -ENODEV;
453 goto done;
456 if ((dn_db = dev->dn_ptr) != NULL) {
457 for (ifap = &dn_db->ifa_list; (ifa=*ifap) != NULL; ifap = &ifa->ifa_next)
458 if (strcmp(ifr->ifr_name, ifa->ifa_label) == 0)
459 break;
462 if (ifa == NULL && cmd != SIOCSIFADDR) {
463 ret = -EADDRNOTAVAIL;
464 goto done;
467 switch(cmd) {
468 case SIOCGIFADDR:
469 *((__le16 *)sdn->sdn_nodeaddr) = ifa->ifa_local;
470 goto rarok;
472 case SIOCSIFADDR:
473 if (!ifa) {
474 if ((ifa = dn_dev_alloc_ifa()) == NULL) {
475 ret = -ENOBUFS;
476 break;
478 memcpy(ifa->ifa_label, dev->name, IFNAMSIZ);
479 } else {
480 if (ifa->ifa_local == dn_saddr2dn(sdn))
481 break;
482 dn_dev_del_ifa(dn_db, ifap, 0);
485 ifa->ifa_local = ifa->ifa_address = dn_saddr2dn(sdn);
487 ret = dn_dev_set_ifa(dev, ifa);
489 done:
490 rtnl_unlock();
492 return ret;
493 rarok:
494 if (copy_to_user(arg, ifr, DN_IFREQ_SIZE))
495 ret = -EFAULT;
496 goto done;
499 struct net_device *dn_dev_get_default(void)
501 struct net_device *dev;
503 spin_lock(&dndev_lock);
504 dev = decnet_default_device;
505 if (dev) {
506 if (dev->dn_ptr)
507 dev_hold(dev);
508 else
509 dev = NULL;
511 spin_unlock(&dndev_lock);
513 return dev;
516 int dn_dev_set_default(struct net_device *dev, int force)
518 struct net_device *old = NULL;
519 int rv = -EBUSY;
520 if (!dev->dn_ptr)
521 return -ENODEV;
523 spin_lock(&dndev_lock);
524 if (force || decnet_default_device == NULL) {
525 old = decnet_default_device;
526 decnet_default_device = dev;
527 rv = 0;
529 spin_unlock(&dndev_lock);
531 if (old)
532 dev_put(old);
533 return rv;
536 static void dn_dev_check_default(struct net_device *dev)
538 spin_lock(&dndev_lock);
539 if (dev == decnet_default_device) {
540 decnet_default_device = NULL;
541 } else {
542 dev = NULL;
544 spin_unlock(&dndev_lock);
546 if (dev)
547 dev_put(dev);
551 * Called with RTNL
553 static struct dn_dev *dn_dev_by_index(int ifindex)
555 struct net_device *dev;
556 struct dn_dev *dn_dev = NULL;
558 dev = __dev_get_by_index(&init_net, ifindex);
559 if (dev)
560 dn_dev = dev->dn_ptr;
562 return dn_dev;
565 static const struct nla_policy dn_ifa_policy[IFA_MAX+1] = {
566 [IFA_ADDRESS] = { .type = NLA_U16 },
567 [IFA_LOCAL] = { .type = NLA_U16 },
568 [IFA_LABEL] = { .type = NLA_STRING,
569 .len = IFNAMSIZ - 1 },
572 static int dn_nl_deladdr(struct sk_buff *skb, struct nlmsghdr *nlh, void *arg)
574 struct net *net = sock_net(skb->sk);
575 struct nlattr *tb[IFA_MAX+1];
576 struct dn_dev *dn_db;
577 struct ifaddrmsg *ifm;
578 struct dn_ifaddr *ifa, **ifap;
579 int err = -EINVAL;
581 if (!net_eq(net, &init_net))
582 goto errout;
584 err = nlmsg_parse(nlh, sizeof(*ifm), tb, IFA_MAX, dn_ifa_policy);
585 if (err < 0)
586 goto errout;
588 err = -ENODEV;
589 ifm = nlmsg_data(nlh);
590 if ((dn_db = dn_dev_by_index(ifm->ifa_index)) == NULL)
591 goto errout;
593 err = -EADDRNOTAVAIL;
594 for (ifap = &dn_db->ifa_list; (ifa = *ifap); ifap = &ifa->ifa_next) {
595 if (tb[IFA_LOCAL] &&
596 nla_memcmp(tb[IFA_LOCAL], &ifa->ifa_local, 2))
597 continue;
599 if (tb[IFA_LABEL] && nla_strcmp(tb[IFA_LABEL], ifa->ifa_label))
600 continue;
602 dn_dev_del_ifa(dn_db, ifap, 1);
603 return 0;
606 errout:
607 return err;
610 static int dn_nl_newaddr(struct sk_buff *skb, struct nlmsghdr *nlh, void *arg)
612 struct net *net = sock_net(skb->sk);
613 struct nlattr *tb[IFA_MAX+1];
614 struct net_device *dev;
615 struct dn_dev *dn_db;
616 struct ifaddrmsg *ifm;
617 struct dn_ifaddr *ifa;
618 int err;
620 if (!net_eq(net, &init_net))
621 return -EINVAL;
623 err = nlmsg_parse(nlh, sizeof(*ifm), tb, IFA_MAX, dn_ifa_policy);
624 if (err < 0)
625 return err;
627 if (tb[IFA_LOCAL] == NULL)
628 return -EINVAL;
630 ifm = nlmsg_data(nlh);
631 if ((dev = __dev_get_by_index(&init_net, ifm->ifa_index)) == NULL)
632 return -ENODEV;
634 if ((dn_db = dev->dn_ptr) == NULL) {
635 dn_db = dn_dev_create(dev, &err);
636 if (!dn_db)
637 return err;
640 if ((ifa = dn_dev_alloc_ifa()) == NULL)
641 return -ENOBUFS;
643 if (tb[IFA_ADDRESS] == NULL)
644 tb[IFA_ADDRESS] = tb[IFA_LOCAL];
646 ifa->ifa_local = nla_get_le16(tb[IFA_LOCAL]);
647 ifa->ifa_address = nla_get_le16(tb[IFA_ADDRESS]);
648 ifa->ifa_flags = ifm->ifa_flags;
649 ifa->ifa_scope = ifm->ifa_scope;
650 ifa->ifa_dev = dn_db;
652 if (tb[IFA_LABEL])
653 nla_strlcpy(ifa->ifa_label, tb[IFA_LABEL], IFNAMSIZ);
654 else
655 memcpy(ifa->ifa_label, dev->name, IFNAMSIZ);
657 err = dn_dev_insert_ifa(dn_db, ifa);
658 if (err)
659 dn_dev_free_ifa(ifa);
661 return err;
664 static inline size_t dn_ifaddr_nlmsg_size(void)
666 return NLMSG_ALIGN(sizeof(struct ifaddrmsg))
667 + nla_total_size(IFNAMSIZ) /* IFA_LABEL */
668 + nla_total_size(2) /* IFA_ADDRESS */
669 + nla_total_size(2); /* IFA_LOCAL */
672 static int dn_nl_fill_ifaddr(struct sk_buff *skb, struct dn_ifaddr *ifa,
673 u32 pid, u32 seq, int event, unsigned int flags)
675 struct ifaddrmsg *ifm;
676 struct nlmsghdr *nlh;
678 nlh = nlmsg_put(skb, pid, seq, event, sizeof(*ifm), flags);
679 if (nlh == NULL)
680 return -EMSGSIZE;
682 ifm = nlmsg_data(nlh);
683 ifm->ifa_family = AF_DECnet;
684 ifm->ifa_prefixlen = 16;
685 ifm->ifa_flags = ifa->ifa_flags | IFA_F_PERMANENT;
686 ifm->ifa_scope = ifa->ifa_scope;
687 ifm->ifa_index = ifa->ifa_dev->dev->ifindex;
689 if (ifa->ifa_address)
690 NLA_PUT_LE16(skb, IFA_ADDRESS, ifa->ifa_address);
691 if (ifa->ifa_local)
692 NLA_PUT_LE16(skb, IFA_LOCAL, ifa->ifa_local);
693 if (ifa->ifa_label[0])
694 NLA_PUT_STRING(skb, IFA_LABEL, ifa->ifa_label);
696 return nlmsg_end(skb, nlh);
698 nla_put_failure:
699 nlmsg_cancel(skb, nlh);
700 return -EMSGSIZE;
703 static void dn_ifaddr_notify(int event, struct dn_ifaddr *ifa)
705 struct sk_buff *skb;
706 int err = -ENOBUFS;
708 skb = alloc_skb(dn_ifaddr_nlmsg_size(), GFP_KERNEL);
709 if (skb == NULL)
710 goto errout;
712 err = dn_nl_fill_ifaddr(skb, ifa, 0, 0, event, 0);
713 if (err < 0) {
714 /* -EMSGSIZE implies BUG in dn_ifaddr_nlmsg_size() */
715 WARN_ON(err == -EMSGSIZE);
716 kfree_skb(skb);
717 goto errout;
719 rtnl_notify(skb, &init_net, 0, RTNLGRP_DECnet_IFADDR, NULL, GFP_KERNEL);
720 return;
721 errout:
722 if (err < 0)
723 rtnl_set_sk_err(&init_net, RTNLGRP_DECnet_IFADDR, err);
726 static int dn_nl_dump_ifaddr(struct sk_buff *skb, struct netlink_callback *cb)
728 struct net *net = sock_net(skb->sk);
729 int idx, dn_idx = 0, skip_ndevs, skip_naddr;
730 struct net_device *dev;
731 struct dn_dev *dn_db;
732 struct dn_ifaddr *ifa;
734 if (!net_eq(net, &init_net))
735 return 0;
737 skip_ndevs = cb->args[0];
738 skip_naddr = cb->args[1];
740 idx = 0;
741 for_each_netdev(&init_net, dev) {
742 if (idx < skip_ndevs)
743 goto cont;
744 else if (idx > skip_ndevs) {
745 /* Only skip over addresses for first dev dumped
746 * in this iteration (idx == skip_ndevs) */
747 skip_naddr = 0;
750 if ((dn_db = dev->dn_ptr) == NULL)
751 goto cont;
753 for (ifa = dn_db->ifa_list, dn_idx = 0; ifa;
754 ifa = ifa->ifa_next, dn_idx++) {
755 if (dn_idx < skip_naddr)
756 continue;
758 if (dn_nl_fill_ifaddr(skb, ifa, NETLINK_CB(cb->skb).pid,
759 cb->nlh->nlmsg_seq, RTM_NEWADDR,
760 NLM_F_MULTI) < 0)
761 goto done;
763 cont:
764 idx++;
766 done:
767 cb->args[0] = idx;
768 cb->args[1] = dn_idx;
770 return skb->len;
773 static int dn_dev_get_first(struct net_device *dev, __le16 *addr)
775 struct dn_dev *dn_db = (struct dn_dev *)dev->dn_ptr;
776 struct dn_ifaddr *ifa;
777 int rv = -ENODEV;
779 if (dn_db == NULL)
780 goto out;
782 rtnl_lock();
783 ifa = dn_db->ifa_list;
784 if (ifa != NULL) {
785 *addr = ifa->ifa_local;
786 rv = 0;
788 rtnl_unlock();
789 out:
790 return rv;
794 * Find a default address to bind to.
796 * This is one of those areas where the initial VMS concepts don't really
797 * map onto the Linux concepts, and since we introduced multiple addresses
798 * per interface we have to cope with slightly odd ways of finding out what
799 * "our address" really is. Mostly it's not a problem; for this we just guess
800 * a sensible default. Eventually the routing code will take care of all the
801 * nasties for us I hope.
803 int dn_dev_bind_default(__le16 *addr)
805 struct net_device *dev;
806 int rv;
807 dev = dn_dev_get_default();
808 last_chance:
809 if (dev) {
810 rv = dn_dev_get_first(dev, addr);
811 dev_put(dev);
812 if (rv == 0 || dev == init_net.loopback_dev)
813 return rv;
815 dev = init_net.loopback_dev;
816 dev_hold(dev);
817 goto last_chance;
820 static void dn_send_endnode_hello(struct net_device *dev, struct dn_ifaddr *ifa)
822 struct endnode_hello_message *msg;
823 struct sk_buff *skb = NULL;
824 __le16 *pktlen;
825 struct dn_dev *dn_db = (struct dn_dev *)dev->dn_ptr;
827 if ((skb = dn_alloc_skb(NULL, sizeof(*msg), GFP_ATOMIC)) == NULL)
828 return;
830 skb->dev = dev;
832 msg = (struct endnode_hello_message *)skb_put(skb,sizeof(*msg));
834 msg->msgflg = 0x0D;
835 memcpy(msg->tiver, dn_eco_version, 3);
836 dn_dn2eth(msg->id, ifa->ifa_local);
837 msg->iinfo = DN_RT_INFO_ENDN;
838 msg->blksize = cpu_to_le16(mtu2blksize(dev));
839 msg->area = 0x00;
840 memset(msg->seed, 0, 8);
841 memcpy(msg->neighbor, dn_hiord, ETH_ALEN);
843 if (dn_db->router) {
844 struct dn_neigh *dn = (struct dn_neigh *)dn_db->router;
845 dn_dn2eth(msg->neighbor, dn->addr);
848 msg->timer = cpu_to_le16((unsigned short)dn_db->parms.t3);
849 msg->mpd = 0x00;
850 msg->datalen = 0x02;
851 memset(msg->data, 0xAA, 2);
853 pktlen = (__le16 *)skb_push(skb,2);
854 *pktlen = cpu_to_le16(skb->len - 2);
856 skb_reset_network_header(skb);
858 dn_rt_finish_output(skb, dn_rt_all_rt_mcast, msg->id);
862 #define DRDELAY (5 * HZ)
864 static int dn_am_i_a_router(struct dn_neigh *dn, struct dn_dev *dn_db, struct dn_ifaddr *ifa)
866 /* First check time since device went up */
867 if ((jiffies - dn_db->uptime) < DRDELAY)
868 return 0;
870 /* If there is no router, then yes... */
871 if (!dn_db->router)
872 return 1;
874 /* otherwise only if we have a higher priority or.. */
875 if (dn->priority < dn_db->parms.priority)
876 return 1;
878 /* if we have equal priority and a higher node number */
879 if (dn->priority != dn_db->parms.priority)
880 return 0;
882 if (le16_to_cpu(dn->addr) < le16_to_cpu(ifa->ifa_local))
883 return 1;
885 return 0;
888 static void dn_send_router_hello(struct net_device *dev, struct dn_ifaddr *ifa)
890 int n;
891 struct dn_dev *dn_db = dev->dn_ptr;
892 struct dn_neigh *dn = (struct dn_neigh *)dn_db->router;
893 struct sk_buff *skb;
894 size_t size;
895 unsigned char *ptr;
896 unsigned char *i1, *i2;
897 __le16 *pktlen;
898 char *src;
900 if (mtu2blksize(dev) < (26 + 7))
901 return;
903 n = mtu2blksize(dev) - 26;
904 n /= 7;
906 if (n > 32)
907 n = 32;
909 size = 2 + 26 + 7 * n;
911 if ((skb = dn_alloc_skb(NULL, size, GFP_ATOMIC)) == NULL)
912 return;
914 skb->dev = dev;
915 ptr = skb_put(skb, size);
917 *ptr++ = DN_RT_PKT_CNTL | DN_RT_PKT_ERTH;
918 *ptr++ = 2; /* ECO */
919 *ptr++ = 0;
920 *ptr++ = 0;
921 dn_dn2eth(ptr, ifa->ifa_local);
922 src = ptr;
923 ptr += ETH_ALEN;
924 *ptr++ = dn_db->parms.forwarding == 1 ?
925 DN_RT_INFO_L1RT : DN_RT_INFO_L2RT;
926 *((__le16 *)ptr) = cpu_to_le16(mtu2blksize(dev));
927 ptr += 2;
928 *ptr++ = dn_db->parms.priority; /* Priority */
929 *ptr++ = 0; /* Area: Reserved */
930 *((__le16 *)ptr) = cpu_to_le16((unsigned short)dn_db->parms.t3);
931 ptr += 2;
932 *ptr++ = 0; /* MPD: Reserved */
933 i1 = ptr++;
934 memset(ptr, 0, 7); /* Name: Reserved */
935 ptr += 7;
936 i2 = ptr++;
938 n = dn_neigh_elist(dev, ptr, n);
940 *i2 = 7 * n;
941 *i1 = 8 + *i2;
943 skb_trim(skb, (27 + *i2));
945 pktlen = (__le16 *)skb_push(skb, 2);
946 *pktlen = cpu_to_le16(skb->len - 2);
948 skb_reset_network_header(skb);
950 if (dn_am_i_a_router(dn, dn_db, ifa)) {
951 struct sk_buff *skb2 = skb_copy(skb, GFP_ATOMIC);
952 if (skb2) {
953 dn_rt_finish_output(skb2, dn_rt_all_end_mcast, src);
957 dn_rt_finish_output(skb, dn_rt_all_rt_mcast, src);
960 static void dn_send_brd_hello(struct net_device *dev, struct dn_ifaddr *ifa)
962 struct dn_dev *dn_db = (struct dn_dev *)dev->dn_ptr;
964 if (dn_db->parms.forwarding == 0)
965 dn_send_endnode_hello(dev, ifa);
966 else
967 dn_send_router_hello(dev, ifa);
970 static void dn_send_ptp_hello(struct net_device *dev, struct dn_ifaddr *ifa)
972 int tdlen = 16;
973 int size = dev->hard_header_len + 2 + 4 + tdlen;
974 struct sk_buff *skb = dn_alloc_skb(NULL, size, GFP_ATOMIC);
975 int i;
976 unsigned char *ptr;
977 char src[ETH_ALEN];
979 if (skb == NULL)
980 return ;
982 skb->dev = dev;
983 skb_push(skb, dev->hard_header_len);
984 ptr = skb_put(skb, 2 + 4 + tdlen);
986 *ptr++ = DN_RT_PKT_HELO;
987 *((__le16 *)ptr) = ifa->ifa_local;
988 ptr += 2;
989 *ptr++ = tdlen;
991 for(i = 0; i < tdlen; i++)
992 *ptr++ = 0252;
994 dn_dn2eth(src, ifa->ifa_local);
995 dn_rt_finish_output(skb, dn_rt_all_rt_mcast, src);
998 static int dn_eth_up(struct net_device *dev)
1000 struct dn_dev *dn_db = dev->dn_ptr;
1002 if (dn_db->parms.forwarding == 0)
1003 dev_mc_add(dev, dn_rt_all_end_mcast, ETH_ALEN, 0);
1004 else
1005 dev_mc_add(dev, dn_rt_all_rt_mcast, ETH_ALEN, 0);
1007 dn_db->use_long = 1;
1009 return 0;
1012 static void dn_eth_down(struct net_device *dev)
1014 struct dn_dev *dn_db = dev->dn_ptr;
1016 if (dn_db->parms.forwarding == 0)
1017 dev_mc_delete(dev, dn_rt_all_end_mcast, ETH_ALEN, 0);
1018 else
1019 dev_mc_delete(dev, dn_rt_all_rt_mcast, ETH_ALEN, 0);
1022 static void dn_dev_set_timer(struct net_device *dev);
1024 static void dn_dev_timer_func(unsigned long arg)
1026 struct net_device *dev = (struct net_device *)arg;
1027 struct dn_dev *dn_db = dev->dn_ptr;
1028 struct dn_ifaddr *ifa;
1030 if (dn_db->t3 <= dn_db->parms.t2) {
1031 if (dn_db->parms.timer3) {
1032 for(ifa = dn_db->ifa_list; ifa; ifa = ifa->ifa_next) {
1033 if (!(ifa->ifa_flags & IFA_F_SECONDARY))
1034 dn_db->parms.timer3(dev, ifa);
1037 dn_db->t3 = dn_db->parms.t3;
1038 } else {
1039 dn_db->t3 -= dn_db->parms.t2;
1042 dn_dev_set_timer(dev);
1045 static void dn_dev_set_timer(struct net_device *dev)
1047 struct dn_dev *dn_db = dev->dn_ptr;
1049 if (dn_db->parms.t2 > dn_db->parms.t3)
1050 dn_db->parms.t2 = dn_db->parms.t3;
1052 dn_db->timer.data = (unsigned long)dev;
1053 dn_db->timer.function = dn_dev_timer_func;
1054 dn_db->timer.expires = jiffies + (dn_db->parms.t2 * HZ);
1056 add_timer(&dn_db->timer);
1059 static struct dn_dev *dn_dev_create(struct net_device *dev, int *err)
1061 int i;
1062 struct dn_dev_parms *p = dn_dev_list;
1063 struct dn_dev *dn_db;
1065 for(i = 0; i < DN_DEV_LIST_SIZE; i++, p++) {
1066 if (p->type == dev->type)
1067 break;
1070 *err = -ENODEV;
1071 if (i == DN_DEV_LIST_SIZE)
1072 return NULL;
1074 *err = -ENOBUFS;
1075 if ((dn_db = kzalloc(sizeof(struct dn_dev), GFP_ATOMIC)) == NULL)
1076 return NULL;
1078 memcpy(&dn_db->parms, p, sizeof(struct dn_dev_parms));
1079 smp_wmb();
1080 dev->dn_ptr = dn_db;
1081 dn_db->dev = dev;
1082 init_timer(&dn_db->timer);
1084 dn_db->uptime = jiffies;
1086 dn_db->neigh_parms = neigh_parms_alloc(dev, &dn_neigh_table);
1087 if (!dn_db->neigh_parms) {
1088 dev->dn_ptr = NULL;
1089 kfree(dn_db);
1090 return NULL;
1093 if (dn_db->parms.up) {
1094 if (dn_db->parms.up(dev) < 0) {
1095 neigh_parms_release(&dn_neigh_table, dn_db->neigh_parms);
1096 dev->dn_ptr = NULL;
1097 kfree(dn_db);
1098 return NULL;
1102 dn_dev_sysctl_register(dev, &dn_db->parms);
1104 dn_dev_set_timer(dev);
1106 *err = 0;
1107 return dn_db;
1112 * This processes a device up event. We only start up
1113 * the loopback device & ethernet devices with correct
1114 * MAC addreses automatically. Others must be started
1115 * specifically.
1117 * FIXME: How should we configure the loopback address ? If we could dispense
1118 * with using decnet_address here and for autobind, it will be one less thing
1119 * for users to worry about setting up.
1122 void dn_dev_up(struct net_device *dev)
1124 struct dn_ifaddr *ifa;
1125 __le16 addr = decnet_address;
1126 int maybe_default = 0;
1127 struct dn_dev *dn_db = (struct dn_dev *)dev->dn_ptr;
1129 if ((dev->type != ARPHRD_ETHER) && (dev->type != ARPHRD_LOOPBACK))
1130 return;
1133 * Need to ensure that loopback device has a dn_db attached to it
1134 * to allow creation of neighbours against it, even though it might
1135 * not have a local address of its own. Might as well do the same for
1136 * all autoconfigured interfaces.
1138 if (dn_db == NULL) {
1139 int err;
1140 dn_db = dn_dev_create(dev, &err);
1141 if (dn_db == NULL)
1142 return;
1145 if (dev->type == ARPHRD_ETHER) {
1146 if (memcmp(dev->dev_addr, dn_hiord, 4) != 0)
1147 return;
1148 addr = dn_eth2dn(dev->dev_addr);
1149 maybe_default = 1;
1152 if (addr == 0)
1153 return;
1155 if ((ifa = dn_dev_alloc_ifa()) == NULL)
1156 return;
1158 ifa->ifa_local = ifa->ifa_address = addr;
1159 ifa->ifa_flags = 0;
1160 ifa->ifa_scope = RT_SCOPE_UNIVERSE;
1161 strcpy(ifa->ifa_label, dev->name);
1163 dn_dev_set_ifa(dev, ifa);
1166 * Automagically set the default device to the first automatically
1167 * configured ethernet card in the system.
1169 if (maybe_default) {
1170 dev_hold(dev);
1171 if (dn_dev_set_default(dev, 0))
1172 dev_put(dev);
1176 static void dn_dev_delete(struct net_device *dev)
1178 struct dn_dev *dn_db = dev->dn_ptr;
1180 if (dn_db == NULL)
1181 return;
1183 del_timer_sync(&dn_db->timer);
1184 dn_dev_sysctl_unregister(&dn_db->parms);
1185 dn_dev_check_default(dev);
1186 neigh_ifdown(&dn_neigh_table, dev);
1188 if (dn_db->parms.down)
1189 dn_db->parms.down(dev);
1191 dev->dn_ptr = NULL;
1193 neigh_parms_release(&dn_neigh_table, dn_db->neigh_parms);
1194 neigh_ifdown(&dn_neigh_table, dev);
1196 if (dn_db->router)
1197 neigh_release(dn_db->router);
1198 if (dn_db->peer)
1199 neigh_release(dn_db->peer);
1201 kfree(dn_db);
1204 void dn_dev_down(struct net_device *dev)
1206 struct dn_dev *dn_db = dev->dn_ptr;
1207 struct dn_ifaddr *ifa;
1209 if (dn_db == NULL)
1210 return;
1212 while((ifa = dn_db->ifa_list) != NULL) {
1213 dn_dev_del_ifa(dn_db, &dn_db->ifa_list, 0);
1214 dn_dev_free_ifa(ifa);
1217 dn_dev_delete(dev);
1220 void dn_dev_init_pkt(struct sk_buff *skb)
1222 return;
1225 void dn_dev_veri_pkt(struct sk_buff *skb)
1227 return;
1230 void dn_dev_hello(struct sk_buff *skb)
1232 return;
1235 void dn_dev_devices_off(void)
1237 struct net_device *dev;
1239 rtnl_lock();
1240 for_each_netdev(&init_net, dev)
1241 dn_dev_down(dev);
1242 rtnl_unlock();
1246 void dn_dev_devices_on(void)
1248 struct net_device *dev;
1250 rtnl_lock();
1251 for_each_netdev(&init_net, dev) {
1252 if (dev->flags & IFF_UP)
1253 dn_dev_up(dev);
1255 rtnl_unlock();
1258 int register_dnaddr_notifier(struct notifier_block *nb)
1260 return blocking_notifier_chain_register(&dnaddr_chain, nb);
1263 int unregister_dnaddr_notifier(struct notifier_block *nb)
1265 return blocking_notifier_chain_unregister(&dnaddr_chain, nb);
1268 #ifdef CONFIG_PROC_FS
1269 static inline int is_dn_dev(struct net_device *dev)
1271 return dev->dn_ptr != NULL;
1274 static void *dn_dev_seq_start(struct seq_file *seq, loff_t *pos)
1275 __acquires(rcu)
1277 int i;
1278 struct net_device *dev;
1280 rcu_read_lock();
1282 if (*pos == 0)
1283 return SEQ_START_TOKEN;
1285 i = 1;
1286 for_each_netdev_rcu(&init_net, dev) {
1287 if (!is_dn_dev(dev))
1288 continue;
1290 if (i++ == *pos)
1291 return dev;
1294 return NULL;
1297 static void *dn_dev_seq_next(struct seq_file *seq, void *v, loff_t *pos)
1299 struct net_device *dev;
1301 ++*pos;
1303 dev = (struct net_device *)v;
1304 if (v == SEQ_START_TOKEN)
1305 dev = net_device_entry(&init_net.dev_base_head);
1307 for_each_netdev_continue_rcu(&init_net, dev) {
1308 if (!is_dn_dev(dev))
1309 continue;
1311 return dev;
1314 return NULL;
1317 static void dn_dev_seq_stop(struct seq_file *seq, void *v)
1318 __releases(rcu)
1320 rcu_read_unlock();
1323 static char *dn_type2asc(char type)
1325 switch(type) {
1326 case DN_DEV_BCAST:
1327 return "B";
1328 case DN_DEV_UCAST:
1329 return "U";
1330 case DN_DEV_MPOINT:
1331 return "M";
1334 return "?";
1337 static int dn_dev_seq_show(struct seq_file *seq, void *v)
1339 if (v == SEQ_START_TOKEN)
1340 seq_puts(seq, "Name Flags T1 Timer1 T3 Timer3 BlkSize Pri State DevType Router Peer\n");
1341 else {
1342 struct net_device *dev = v;
1343 char peer_buf[DN_ASCBUF_LEN];
1344 char router_buf[DN_ASCBUF_LEN];
1345 struct dn_dev *dn_db = dev->dn_ptr;
1347 seq_printf(seq, "%-8s %1s %04u %04u %04lu %04lu"
1348 " %04hu %03d %02x %-10s %-7s %-7s\n",
1349 dev->name ? dev->name : "???",
1350 dn_type2asc(dn_db->parms.mode),
1351 0, 0,
1352 dn_db->t3, dn_db->parms.t3,
1353 mtu2blksize(dev),
1354 dn_db->parms.priority,
1355 dn_db->parms.state, dn_db->parms.name,
1356 dn_db->router ? dn_addr2asc(le16_to_cpu(*(__le16 *)dn_db->router->primary_key), router_buf) : "",
1357 dn_db->peer ? dn_addr2asc(le16_to_cpu(*(__le16 *)dn_db->peer->primary_key), peer_buf) : "");
1359 return 0;
1362 static const struct seq_operations dn_dev_seq_ops = {
1363 .start = dn_dev_seq_start,
1364 .next = dn_dev_seq_next,
1365 .stop = dn_dev_seq_stop,
1366 .show = dn_dev_seq_show,
1369 static int dn_dev_seq_open(struct inode *inode, struct file *file)
1371 return seq_open(file, &dn_dev_seq_ops);
1374 static const struct file_operations dn_dev_seq_fops = {
1375 .owner = THIS_MODULE,
1376 .open = dn_dev_seq_open,
1377 .read = seq_read,
1378 .llseek = seq_lseek,
1379 .release = seq_release,
1382 #endif /* CONFIG_PROC_FS */
1384 static int addr[2];
1385 module_param_array(addr, int, NULL, 0444);
1386 MODULE_PARM_DESC(addr, "The DECnet address of this machine: area,node");
1388 void __init dn_dev_init(void)
1390 if (addr[0] > 63 || addr[0] < 0) {
1391 printk(KERN_ERR "DECnet: Area must be between 0 and 63");
1392 return;
1395 if (addr[1] > 1023 || addr[1] < 0) {
1396 printk(KERN_ERR "DECnet: Node must be between 0 and 1023");
1397 return;
1400 decnet_address = cpu_to_le16((addr[0] << 10) | addr[1]);
1402 dn_dev_devices_on();
1404 rtnl_register(PF_DECnet, RTM_NEWADDR, dn_nl_newaddr, NULL);
1405 rtnl_register(PF_DECnet, RTM_DELADDR, dn_nl_deladdr, NULL);
1406 rtnl_register(PF_DECnet, RTM_GETADDR, NULL, dn_nl_dump_ifaddr);
1408 proc_net_fops_create(&init_net, "decnet_dev", S_IRUGO, &dn_dev_seq_fops);
1410 #ifdef CONFIG_SYSCTL
1412 int i;
1413 for(i = 0; i < DN_DEV_LIST_SIZE; i++)
1414 dn_dev_sysctl_register(NULL, &dn_dev_list[i]);
1416 #endif /* CONFIG_SYSCTL */
1419 void __exit dn_dev_cleanup(void)
1421 #ifdef CONFIG_SYSCTL
1423 int i;
1424 for(i = 0; i < DN_DEV_LIST_SIZE; i++)
1425 dn_dev_sysctl_unregister(&dn_dev_list[i]);
1427 #endif /* CONFIG_SYSCTL */
1429 proc_net_remove(&init_net, "decnet_dev");
1431 dn_dev_devices_off();