Merge branch 'v6v7' into devel
[linux/fpc-iii.git] / net / decnet / dn_dev.c
blob0dcaa903e00e0f4ce4eb53ebfe150878f7d26e06
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 <linux/slab.h>
44 #include <asm/uaccess.h>
45 #include <asm/system.h>
46 #include <net/net_namespace.h>
47 #include <net/neighbour.h>
48 #include <net/dst.h>
49 #include <net/flow.h>
50 #include <net/fib_rules.h>
51 #include <net/netlink.h>
52 #include <net/dn.h>
53 #include <net/dn_dev.h>
54 #include <net/dn_route.h>
55 #include <net/dn_neigh.h>
56 #include <net/dn_fib.h>
58 #define DN_IFREQ_SIZE (sizeof(struct ifreq) - sizeof(struct sockaddr) + sizeof(struct sockaddr_dn))
60 static char dn_rt_all_end_mcast[ETH_ALEN] = {0xAB,0x00,0x00,0x04,0x00,0x00};
61 static char dn_rt_all_rt_mcast[ETH_ALEN] = {0xAB,0x00,0x00,0x03,0x00,0x00};
62 static char dn_hiord[ETH_ALEN] = {0xAA,0x00,0x04,0x00,0x00,0x00};
63 static unsigned char dn_eco_version[3] = {0x02,0x00,0x00};
65 extern struct neigh_table dn_neigh_table;
68 * decnet_address is kept in network order.
70 __le16 decnet_address = 0;
72 static DEFINE_SPINLOCK(dndev_lock);
73 static struct net_device *decnet_default_device;
74 static BLOCKING_NOTIFIER_HEAD(dnaddr_chain);
76 static struct dn_dev *dn_dev_create(struct net_device *dev, int *err);
77 static void dn_dev_delete(struct net_device *dev);
78 static void dn_ifaddr_notify(int event, struct dn_ifaddr *ifa);
80 static int dn_eth_up(struct net_device *);
81 static void dn_eth_down(struct net_device *);
82 static void dn_send_brd_hello(struct net_device *dev, struct dn_ifaddr *ifa);
83 static void dn_send_ptp_hello(struct net_device *dev, struct dn_ifaddr *ifa);
85 static struct dn_dev_parms dn_dev_list[] = {
87 .type = ARPHRD_ETHER, /* Ethernet */
88 .mode = DN_DEV_BCAST,
89 .state = DN_DEV_S_RU,
90 .t2 = 1,
91 .t3 = 10,
92 .name = "ethernet",
93 .up = dn_eth_up,
94 .down = dn_eth_down,
95 .timer3 = dn_send_brd_hello,
98 .type = ARPHRD_IPGRE, /* DECnet tunneled over GRE in IP */
99 .mode = DN_DEV_BCAST,
100 .state = DN_DEV_S_RU,
101 .t2 = 1,
102 .t3 = 10,
103 .name = "ipgre",
104 .timer3 = dn_send_brd_hello,
106 #if 0
108 .type = ARPHRD_X25, /* Bog standard X.25 */
109 .mode = DN_DEV_UCAST,
110 .state = DN_DEV_S_DS,
111 .t2 = 1,
112 .t3 = 120,
113 .name = "x25",
114 .timer3 = dn_send_ptp_hello,
116 #endif
117 #if 0
119 .type = ARPHRD_PPP, /* DECnet over PPP */
120 .mode = DN_DEV_BCAST,
121 .state = DN_DEV_S_RU,
122 .t2 = 1,
123 .t3 = 10,
124 .name = "ppp",
125 .timer3 = dn_send_brd_hello,
127 #endif
129 .type = ARPHRD_DDCMP, /* DECnet over DDCMP */
130 .mode = DN_DEV_UCAST,
131 .state = DN_DEV_S_DS,
132 .t2 = 1,
133 .t3 = 120,
134 .name = "ddcmp",
135 .timer3 = dn_send_ptp_hello,
138 .type = ARPHRD_LOOPBACK, /* Loopback interface - always last */
139 .mode = DN_DEV_BCAST,
140 .state = DN_DEV_S_RU,
141 .t2 = 1,
142 .t3 = 10,
143 .name = "loopback",
144 .timer3 = dn_send_brd_hello,
148 #define DN_DEV_LIST_SIZE ARRAY_SIZE(dn_dev_list)
150 #define DN_DEV_PARMS_OFFSET(x) offsetof(struct dn_dev_parms, x)
152 #ifdef CONFIG_SYSCTL
154 static int min_t2[] = { 1 };
155 static int max_t2[] = { 60 }; /* No max specified, but this seems sensible */
156 static int min_t3[] = { 1 };
157 static int max_t3[] = { 8191 }; /* Must fit in 16 bits when multiplied by BCT3MULT or T3MULT */
159 static int min_priority[1];
160 static int max_priority[] = { 127 }; /* From DECnet spec */
162 static int dn_forwarding_proc(ctl_table *, int,
163 void __user *, size_t *, loff_t *);
164 static struct dn_dev_sysctl_table {
165 struct ctl_table_header *sysctl_header;
166 ctl_table dn_dev_vars[5];
167 } dn_dev_sysctl = {
168 NULL,
171 .procname = "forwarding",
172 .data = (void *)DN_DEV_PARMS_OFFSET(forwarding),
173 .maxlen = sizeof(int),
174 .mode = 0644,
175 .proc_handler = dn_forwarding_proc,
178 .procname = "priority",
179 .data = (void *)DN_DEV_PARMS_OFFSET(priority),
180 .maxlen = sizeof(int),
181 .mode = 0644,
182 .proc_handler = proc_dointvec_minmax,
183 .extra1 = &min_priority,
184 .extra2 = &max_priority
187 .procname = "t2",
188 .data = (void *)DN_DEV_PARMS_OFFSET(t2),
189 .maxlen = sizeof(int),
190 .mode = 0644,
191 .proc_handler = proc_dointvec_minmax,
192 .extra1 = &min_t2,
193 .extra2 = &max_t2
196 .procname = "t3",
197 .data = (void *)DN_DEV_PARMS_OFFSET(t3),
198 .maxlen = sizeof(int),
199 .mode = 0644,
200 .proc_handler = proc_dointvec_minmax,
201 .extra1 = &min_t3,
202 .extra2 = &max_t3
208 static void dn_dev_sysctl_register(struct net_device *dev, struct dn_dev_parms *parms)
210 struct dn_dev_sysctl_table *t;
211 int i;
213 #define DN_CTL_PATH_DEV 3
215 struct ctl_path dn_ctl_path[] = {
216 { .procname = "net", },
217 { .procname = "decnet", },
218 { .procname = "conf", },
219 { /* to be set */ },
220 { },
223 t = kmemdup(&dn_dev_sysctl, sizeof(*t), GFP_KERNEL);
224 if (t == NULL)
225 return;
227 for(i = 0; i < ARRAY_SIZE(t->dn_dev_vars) - 1; i++) {
228 long offset = (long)t->dn_dev_vars[i].data;
229 t->dn_dev_vars[i].data = ((char *)parms) + offset;
232 if (dev) {
233 dn_ctl_path[DN_CTL_PATH_DEV].procname = dev->name;
234 } else {
235 dn_ctl_path[DN_CTL_PATH_DEV].procname = parms->name;
238 t->dn_dev_vars[0].extra1 = (void *)dev;
240 t->sysctl_header = register_sysctl_paths(dn_ctl_path, t->dn_dev_vars);
241 if (t->sysctl_header == NULL)
242 kfree(t);
243 else
244 parms->sysctl = t;
247 static void dn_dev_sysctl_unregister(struct dn_dev_parms *parms)
249 if (parms->sysctl) {
250 struct dn_dev_sysctl_table *t = parms->sysctl;
251 parms->sysctl = NULL;
252 unregister_sysctl_table(t->sysctl_header);
253 kfree(t);
257 static int dn_forwarding_proc(ctl_table *table, int write,
258 void __user *buffer,
259 size_t *lenp, loff_t *ppos)
261 #ifdef CONFIG_DECNET_ROUTER
262 struct net_device *dev = table->extra1;
263 struct dn_dev *dn_db;
264 int err;
265 int tmp, old;
267 if (table->extra1 == NULL)
268 return -EINVAL;
270 dn_db = rcu_dereference_raw(dev->dn_ptr);
271 old = dn_db->parms.forwarding;
273 err = proc_dointvec(table, write, buffer, lenp, ppos);
275 if ((err >= 0) && write) {
276 if (dn_db->parms.forwarding < 0)
277 dn_db->parms.forwarding = 0;
278 if (dn_db->parms.forwarding > 2)
279 dn_db->parms.forwarding = 2;
281 * What an ugly hack this is... its works, just. It
282 * would be nice if sysctl/proc were just that little
283 * bit more flexible so I don't have to write a special
284 * routine, or suffer hacks like this - SJW
286 tmp = dn_db->parms.forwarding;
287 dn_db->parms.forwarding = old;
288 if (dn_db->parms.down)
289 dn_db->parms.down(dev);
290 dn_db->parms.forwarding = tmp;
291 if (dn_db->parms.up)
292 dn_db->parms.up(dev);
295 return err;
296 #else
297 return -EINVAL;
298 #endif
301 #else /* CONFIG_SYSCTL */
302 static void dn_dev_sysctl_unregister(struct dn_dev_parms *parms)
305 static void dn_dev_sysctl_register(struct net_device *dev, struct dn_dev_parms *parms)
309 #endif /* CONFIG_SYSCTL */
311 static inline __u16 mtu2blksize(struct net_device *dev)
313 u32 blksize = dev->mtu;
314 if (blksize > 0xffff)
315 blksize = 0xffff;
317 if (dev->type == ARPHRD_ETHER ||
318 dev->type == ARPHRD_PPP ||
319 dev->type == ARPHRD_IPGRE ||
320 dev->type == ARPHRD_LOOPBACK)
321 blksize -= 2;
323 return (__u16)blksize;
326 static struct dn_ifaddr *dn_dev_alloc_ifa(void)
328 struct dn_ifaddr *ifa;
330 ifa = kzalloc(sizeof(*ifa), GFP_KERNEL);
332 return ifa;
335 static void dn_dev_free_ifa_rcu(struct rcu_head *head)
337 kfree(container_of(head, struct dn_ifaddr, rcu));
340 static void dn_dev_free_ifa(struct dn_ifaddr *ifa)
342 call_rcu(&ifa->rcu, dn_dev_free_ifa_rcu);
345 static void dn_dev_del_ifa(struct dn_dev *dn_db, struct dn_ifaddr __rcu **ifap, int destroy)
347 struct dn_ifaddr *ifa1 = rtnl_dereference(*ifap);
348 unsigned char mac_addr[6];
349 struct net_device *dev = dn_db->dev;
351 ASSERT_RTNL();
353 *ifap = ifa1->ifa_next;
355 if (dn_db->dev->type == ARPHRD_ETHER) {
356 if (ifa1->ifa_local != dn_eth2dn(dev->dev_addr)) {
357 dn_dn2eth(mac_addr, ifa1->ifa_local);
358 dev_mc_del(dev, mac_addr);
362 dn_ifaddr_notify(RTM_DELADDR, ifa1);
363 blocking_notifier_call_chain(&dnaddr_chain, NETDEV_DOWN, ifa1);
364 if (destroy) {
365 dn_dev_free_ifa(ifa1);
367 if (dn_db->ifa_list == NULL)
368 dn_dev_delete(dn_db->dev);
372 static int dn_dev_insert_ifa(struct dn_dev *dn_db, struct dn_ifaddr *ifa)
374 struct net_device *dev = dn_db->dev;
375 struct dn_ifaddr *ifa1;
376 unsigned char mac_addr[6];
378 ASSERT_RTNL();
380 /* Check for duplicates */
381 for (ifa1 = rtnl_dereference(dn_db->ifa_list);
382 ifa1 != NULL;
383 ifa1 = rtnl_dereference(ifa1->ifa_next)) {
384 if (ifa1->ifa_local == ifa->ifa_local)
385 return -EEXIST;
388 if (dev->type == ARPHRD_ETHER) {
389 if (ifa->ifa_local != dn_eth2dn(dev->dev_addr)) {
390 dn_dn2eth(mac_addr, ifa->ifa_local);
391 dev_mc_add(dev, mac_addr);
395 ifa->ifa_next = dn_db->ifa_list;
396 rcu_assign_pointer(dn_db->ifa_list, ifa);
398 dn_ifaddr_notify(RTM_NEWADDR, ifa);
399 blocking_notifier_call_chain(&dnaddr_chain, NETDEV_UP, ifa);
401 return 0;
404 static int dn_dev_set_ifa(struct net_device *dev, struct dn_ifaddr *ifa)
406 struct dn_dev *dn_db = rtnl_dereference(dev->dn_ptr);
407 int rv;
409 if (dn_db == NULL) {
410 int err;
411 dn_db = dn_dev_create(dev, &err);
412 if (dn_db == NULL)
413 return err;
416 ifa->ifa_dev = dn_db;
418 if (dev->flags & IFF_LOOPBACK)
419 ifa->ifa_scope = RT_SCOPE_HOST;
421 rv = dn_dev_insert_ifa(dn_db, ifa);
422 if (rv)
423 dn_dev_free_ifa(ifa);
424 return rv;
428 int dn_dev_ioctl(unsigned int cmd, void __user *arg)
430 char buffer[DN_IFREQ_SIZE];
431 struct ifreq *ifr = (struct ifreq *)buffer;
432 struct sockaddr_dn *sdn = (struct sockaddr_dn *)&ifr->ifr_addr;
433 struct dn_dev *dn_db;
434 struct net_device *dev;
435 struct dn_ifaddr *ifa = NULL;
436 struct dn_ifaddr __rcu **ifap = NULL;
437 int ret = 0;
439 if (copy_from_user(ifr, arg, DN_IFREQ_SIZE))
440 return -EFAULT;
441 ifr->ifr_name[IFNAMSIZ-1] = 0;
443 dev_load(&init_net, ifr->ifr_name);
445 switch(cmd) {
446 case SIOCGIFADDR:
447 break;
448 case SIOCSIFADDR:
449 if (!capable(CAP_NET_ADMIN))
450 return -EACCES;
451 if (sdn->sdn_family != AF_DECnet)
452 return -EINVAL;
453 break;
454 default:
455 return -EINVAL;
458 rtnl_lock();
460 if ((dev = __dev_get_by_name(&init_net, ifr->ifr_name)) == NULL) {
461 ret = -ENODEV;
462 goto done;
465 if ((dn_db = rtnl_dereference(dev->dn_ptr)) != NULL) {
466 for (ifap = &dn_db->ifa_list;
467 (ifa = rtnl_dereference(*ifap)) != NULL;
468 ifap = &ifa->ifa_next)
469 if (strcmp(ifr->ifr_name, ifa->ifa_label) == 0)
470 break;
473 if (ifa == NULL && cmd != SIOCSIFADDR) {
474 ret = -EADDRNOTAVAIL;
475 goto done;
478 switch(cmd) {
479 case SIOCGIFADDR:
480 *((__le16 *)sdn->sdn_nodeaddr) = ifa->ifa_local;
481 goto rarok;
483 case SIOCSIFADDR:
484 if (!ifa) {
485 if ((ifa = dn_dev_alloc_ifa()) == NULL) {
486 ret = -ENOBUFS;
487 break;
489 memcpy(ifa->ifa_label, dev->name, IFNAMSIZ);
490 } else {
491 if (ifa->ifa_local == dn_saddr2dn(sdn))
492 break;
493 dn_dev_del_ifa(dn_db, ifap, 0);
496 ifa->ifa_local = ifa->ifa_address = dn_saddr2dn(sdn);
498 ret = dn_dev_set_ifa(dev, ifa);
500 done:
501 rtnl_unlock();
503 return ret;
504 rarok:
505 if (copy_to_user(arg, ifr, DN_IFREQ_SIZE))
506 ret = -EFAULT;
507 goto done;
510 struct net_device *dn_dev_get_default(void)
512 struct net_device *dev;
514 spin_lock(&dndev_lock);
515 dev = decnet_default_device;
516 if (dev) {
517 if (dev->dn_ptr)
518 dev_hold(dev);
519 else
520 dev = NULL;
522 spin_unlock(&dndev_lock);
524 return dev;
527 int dn_dev_set_default(struct net_device *dev, int force)
529 struct net_device *old = NULL;
530 int rv = -EBUSY;
531 if (!dev->dn_ptr)
532 return -ENODEV;
534 spin_lock(&dndev_lock);
535 if (force || decnet_default_device == NULL) {
536 old = decnet_default_device;
537 decnet_default_device = dev;
538 rv = 0;
540 spin_unlock(&dndev_lock);
542 if (old)
543 dev_put(old);
544 return rv;
547 static void dn_dev_check_default(struct net_device *dev)
549 spin_lock(&dndev_lock);
550 if (dev == decnet_default_device) {
551 decnet_default_device = NULL;
552 } else {
553 dev = NULL;
555 spin_unlock(&dndev_lock);
557 if (dev)
558 dev_put(dev);
562 * Called with RTNL
564 static struct dn_dev *dn_dev_by_index(int ifindex)
566 struct net_device *dev;
567 struct dn_dev *dn_dev = NULL;
569 dev = __dev_get_by_index(&init_net, ifindex);
570 if (dev)
571 dn_dev = rtnl_dereference(dev->dn_ptr);
573 return dn_dev;
576 static const struct nla_policy dn_ifa_policy[IFA_MAX+1] = {
577 [IFA_ADDRESS] = { .type = NLA_U16 },
578 [IFA_LOCAL] = { .type = NLA_U16 },
579 [IFA_LABEL] = { .type = NLA_STRING,
580 .len = IFNAMSIZ - 1 },
583 static int dn_nl_deladdr(struct sk_buff *skb, struct nlmsghdr *nlh, void *arg)
585 struct net *net = sock_net(skb->sk);
586 struct nlattr *tb[IFA_MAX+1];
587 struct dn_dev *dn_db;
588 struct ifaddrmsg *ifm;
589 struct dn_ifaddr *ifa;
590 struct dn_ifaddr __rcu **ifap;
591 int err = -EINVAL;
593 if (!net_eq(net, &init_net))
594 goto errout;
596 err = nlmsg_parse(nlh, sizeof(*ifm), tb, IFA_MAX, dn_ifa_policy);
597 if (err < 0)
598 goto errout;
600 err = -ENODEV;
601 ifm = nlmsg_data(nlh);
602 if ((dn_db = dn_dev_by_index(ifm->ifa_index)) == NULL)
603 goto errout;
605 err = -EADDRNOTAVAIL;
606 for (ifap = &dn_db->ifa_list;
607 (ifa = rtnl_dereference(*ifap)) != NULL;
608 ifap = &ifa->ifa_next) {
609 if (tb[IFA_LOCAL] &&
610 nla_memcmp(tb[IFA_LOCAL], &ifa->ifa_local, 2))
611 continue;
613 if (tb[IFA_LABEL] && nla_strcmp(tb[IFA_LABEL], ifa->ifa_label))
614 continue;
616 dn_dev_del_ifa(dn_db, ifap, 1);
617 return 0;
620 errout:
621 return err;
624 static int dn_nl_newaddr(struct sk_buff *skb, struct nlmsghdr *nlh, void *arg)
626 struct net *net = sock_net(skb->sk);
627 struct nlattr *tb[IFA_MAX+1];
628 struct net_device *dev;
629 struct dn_dev *dn_db;
630 struct ifaddrmsg *ifm;
631 struct dn_ifaddr *ifa;
632 int err;
634 if (!net_eq(net, &init_net))
635 return -EINVAL;
637 err = nlmsg_parse(nlh, sizeof(*ifm), tb, IFA_MAX, dn_ifa_policy);
638 if (err < 0)
639 return err;
641 if (tb[IFA_LOCAL] == NULL)
642 return -EINVAL;
644 ifm = nlmsg_data(nlh);
645 if ((dev = __dev_get_by_index(&init_net, ifm->ifa_index)) == NULL)
646 return -ENODEV;
648 if ((dn_db = rtnl_dereference(dev->dn_ptr)) == NULL) {
649 dn_db = dn_dev_create(dev, &err);
650 if (!dn_db)
651 return err;
654 if ((ifa = dn_dev_alloc_ifa()) == NULL)
655 return -ENOBUFS;
657 if (tb[IFA_ADDRESS] == NULL)
658 tb[IFA_ADDRESS] = tb[IFA_LOCAL];
660 ifa->ifa_local = nla_get_le16(tb[IFA_LOCAL]);
661 ifa->ifa_address = nla_get_le16(tb[IFA_ADDRESS]);
662 ifa->ifa_flags = ifm->ifa_flags;
663 ifa->ifa_scope = ifm->ifa_scope;
664 ifa->ifa_dev = dn_db;
666 if (tb[IFA_LABEL])
667 nla_strlcpy(ifa->ifa_label, tb[IFA_LABEL], IFNAMSIZ);
668 else
669 memcpy(ifa->ifa_label, dev->name, IFNAMSIZ);
671 err = dn_dev_insert_ifa(dn_db, ifa);
672 if (err)
673 dn_dev_free_ifa(ifa);
675 return err;
678 static inline size_t dn_ifaddr_nlmsg_size(void)
680 return NLMSG_ALIGN(sizeof(struct ifaddrmsg))
681 + nla_total_size(IFNAMSIZ) /* IFA_LABEL */
682 + nla_total_size(2) /* IFA_ADDRESS */
683 + nla_total_size(2); /* IFA_LOCAL */
686 static int dn_nl_fill_ifaddr(struct sk_buff *skb, struct dn_ifaddr *ifa,
687 u32 pid, u32 seq, int event, unsigned int flags)
689 struct ifaddrmsg *ifm;
690 struct nlmsghdr *nlh;
692 nlh = nlmsg_put(skb, pid, seq, event, sizeof(*ifm), flags);
693 if (nlh == NULL)
694 return -EMSGSIZE;
696 ifm = nlmsg_data(nlh);
697 ifm->ifa_family = AF_DECnet;
698 ifm->ifa_prefixlen = 16;
699 ifm->ifa_flags = ifa->ifa_flags | IFA_F_PERMANENT;
700 ifm->ifa_scope = ifa->ifa_scope;
701 ifm->ifa_index = ifa->ifa_dev->dev->ifindex;
703 if (ifa->ifa_address)
704 NLA_PUT_LE16(skb, IFA_ADDRESS, ifa->ifa_address);
705 if (ifa->ifa_local)
706 NLA_PUT_LE16(skb, IFA_LOCAL, ifa->ifa_local);
707 if (ifa->ifa_label[0])
708 NLA_PUT_STRING(skb, IFA_LABEL, ifa->ifa_label);
710 return nlmsg_end(skb, nlh);
712 nla_put_failure:
713 nlmsg_cancel(skb, nlh);
714 return -EMSGSIZE;
717 static void dn_ifaddr_notify(int event, struct dn_ifaddr *ifa)
719 struct sk_buff *skb;
720 int err = -ENOBUFS;
722 skb = alloc_skb(dn_ifaddr_nlmsg_size(), GFP_KERNEL);
723 if (skb == NULL)
724 goto errout;
726 err = dn_nl_fill_ifaddr(skb, ifa, 0, 0, event, 0);
727 if (err < 0) {
728 /* -EMSGSIZE implies BUG in dn_ifaddr_nlmsg_size() */
729 WARN_ON(err == -EMSGSIZE);
730 kfree_skb(skb);
731 goto errout;
733 rtnl_notify(skb, &init_net, 0, RTNLGRP_DECnet_IFADDR, NULL, GFP_KERNEL);
734 return;
735 errout:
736 if (err < 0)
737 rtnl_set_sk_err(&init_net, RTNLGRP_DECnet_IFADDR, err);
740 static int dn_nl_dump_ifaddr(struct sk_buff *skb, struct netlink_callback *cb)
742 struct net *net = sock_net(skb->sk);
743 int idx, dn_idx = 0, skip_ndevs, skip_naddr;
744 struct net_device *dev;
745 struct dn_dev *dn_db;
746 struct dn_ifaddr *ifa;
748 if (!net_eq(net, &init_net))
749 return 0;
751 skip_ndevs = cb->args[0];
752 skip_naddr = cb->args[1];
754 idx = 0;
755 for_each_netdev(&init_net, dev) {
756 if (idx < skip_ndevs)
757 goto cont;
758 else if (idx > skip_ndevs) {
759 /* Only skip over addresses for first dev dumped
760 * in this iteration (idx == skip_ndevs) */
761 skip_naddr = 0;
764 if ((dn_db = rtnl_dereference(dev->dn_ptr)) == NULL)
765 goto cont;
767 for (ifa = rtnl_dereference(dn_db->ifa_list), dn_idx = 0; ifa;
768 ifa = rtnl_dereference(ifa->ifa_next), dn_idx++) {
769 if (dn_idx < skip_naddr)
770 continue;
772 if (dn_nl_fill_ifaddr(skb, ifa, NETLINK_CB(cb->skb).pid,
773 cb->nlh->nlmsg_seq, RTM_NEWADDR,
774 NLM_F_MULTI) < 0)
775 goto done;
777 cont:
778 idx++;
780 done:
781 cb->args[0] = idx;
782 cb->args[1] = dn_idx;
784 return skb->len;
787 static int dn_dev_get_first(struct net_device *dev, __le16 *addr)
789 struct dn_dev *dn_db;
790 struct dn_ifaddr *ifa;
791 int rv = -ENODEV;
793 rcu_read_lock();
794 dn_db = rcu_dereference(dev->dn_ptr);
795 if (dn_db == NULL)
796 goto out;
798 ifa = rcu_dereference(dn_db->ifa_list);
799 if (ifa != NULL) {
800 *addr = ifa->ifa_local;
801 rv = 0;
803 out:
804 rcu_read_unlock();
805 return rv;
809 * Find a default address to bind to.
811 * This is one of those areas where the initial VMS concepts don't really
812 * map onto the Linux concepts, and since we introduced multiple addresses
813 * per interface we have to cope with slightly odd ways of finding out what
814 * "our address" really is. Mostly it's not a problem; for this we just guess
815 * a sensible default. Eventually the routing code will take care of all the
816 * nasties for us I hope.
818 int dn_dev_bind_default(__le16 *addr)
820 struct net_device *dev;
821 int rv;
822 dev = dn_dev_get_default();
823 last_chance:
824 if (dev) {
825 rv = dn_dev_get_first(dev, addr);
826 dev_put(dev);
827 if (rv == 0 || dev == init_net.loopback_dev)
828 return rv;
830 dev = init_net.loopback_dev;
831 dev_hold(dev);
832 goto last_chance;
835 static void dn_send_endnode_hello(struct net_device *dev, struct dn_ifaddr *ifa)
837 struct endnode_hello_message *msg;
838 struct sk_buff *skb = NULL;
839 __le16 *pktlen;
840 struct dn_dev *dn_db = rcu_dereference_raw(dev->dn_ptr);
842 if ((skb = dn_alloc_skb(NULL, sizeof(*msg), GFP_ATOMIC)) == NULL)
843 return;
845 skb->dev = dev;
847 msg = (struct endnode_hello_message *)skb_put(skb,sizeof(*msg));
849 msg->msgflg = 0x0D;
850 memcpy(msg->tiver, dn_eco_version, 3);
851 dn_dn2eth(msg->id, ifa->ifa_local);
852 msg->iinfo = DN_RT_INFO_ENDN;
853 msg->blksize = cpu_to_le16(mtu2blksize(dev));
854 msg->area = 0x00;
855 memset(msg->seed, 0, 8);
856 memcpy(msg->neighbor, dn_hiord, ETH_ALEN);
858 if (dn_db->router) {
859 struct dn_neigh *dn = (struct dn_neigh *)dn_db->router;
860 dn_dn2eth(msg->neighbor, dn->addr);
863 msg->timer = cpu_to_le16((unsigned short)dn_db->parms.t3);
864 msg->mpd = 0x00;
865 msg->datalen = 0x02;
866 memset(msg->data, 0xAA, 2);
868 pktlen = (__le16 *)skb_push(skb,2);
869 *pktlen = cpu_to_le16(skb->len - 2);
871 skb_reset_network_header(skb);
873 dn_rt_finish_output(skb, dn_rt_all_rt_mcast, msg->id);
877 #define DRDELAY (5 * HZ)
879 static int dn_am_i_a_router(struct dn_neigh *dn, struct dn_dev *dn_db, struct dn_ifaddr *ifa)
881 /* First check time since device went up */
882 if ((jiffies - dn_db->uptime) < DRDELAY)
883 return 0;
885 /* If there is no router, then yes... */
886 if (!dn_db->router)
887 return 1;
889 /* otherwise only if we have a higher priority or.. */
890 if (dn->priority < dn_db->parms.priority)
891 return 1;
893 /* if we have equal priority and a higher node number */
894 if (dn->priority != dn_db->parms.priority)
895 return 0;
897 if (le16_to_cpu(dn->addr) < le16_to_cpu(ifa->ifa_local))
898 return 1;
900 return 0;
903 static void dn_send_router_hello(struct net_device *dev, struct dn_ifaddr *ifa)
905 int n;
906 struct dn_dev *dn_db = rcu_dereference_raw(dev->dn_ptr);
907 struct dn_neigh *dn = (struct dn_neigh *)dn_db->router;
908 struct sk_buff *skb;
909 size_t size;
910 unsigned char *ptr;
911 unsigned char *i1, *i2;
912 __le16 *pktlen;
913 char *src;
915 if (mtu2blksize(dev) < (26 + 7))
916 return;
918 n = mtu2blksize(dev) - 26;
919 n /= 7;
921 if (n > 32)
922 n = 32;
924 size = 2 + 26 + 7 * n;
926 if ((skb = dn_alloc_skb(NULL, size, GFP_ATOMIC)) == NULL)
927 return;
929 skb->dev = dev;
930 ptr = skb_put(skb, size);
932 *ptr++ = DN_RT_PKT_CNTL | DN_RT_PKT_ERTH;
933 *ptr++ = 2; /* ECO */
934 *ptr++ = 0;
935 *ptr++ = 0;
936 dn_dn2eth(ptr, ifa->ifa_local);
937 src = ptr;
938 ptr += ETH_ALEN;
939 *ptr++ = dn_db->parms.forwarding == 1 ?
940 DN_RT_INFO_L1RT : DN_RT_INFO_L2RT;
941 *((__le16 *)ptr) = cpu_to_le16(mtu2blksize(dev));
942 ptr += 2;
943 *ptr++ = dn_db->parms.priority; /* Priority */
944 *ptr++ = 0; /* Area: Reserved */
945 *((__le16 *)ptr) = cpu_to_le16((unsigned short)dn_db->parms.t3);
946 ptr += 2;
947 *ptr++ = 0; /* MPD: Reserved */
948 i1 = ptr++;
949 memset(ptr, 0, 7); /* Name: Reserved */
950 ptr += 7;
951 i2 = ptr++;
953 n = dn_neigh_elist(dev, ptr, n);
955 *i2 = 7 * n;
956 *i1 = 8 + *i2;
958 skb_trim(skb, (27 + *i2));
960 pktlen = (__le16 *)skb_push(skb, 2);
961 *pktlen = cpu_to_le16(skb->len - 2);
963 skb_reset_network_header(skb);
965 if (dn_am_i_a_router(dn, dn_db, ifa)) {
966 struct sk_buff *skb2 = skb_copy(skb, GFP_ATOMIC);
967 if (skb2) {
968 dn_rt_finish_output(skb2, dn_rt_all_end_mcast, src);
972 dn_rt_finish_output(skb, dn_rt_all_rt_mcast, src);
975 static void dn_send_brd_hello(struct net_device *dev, struct dn_ifaddr *ifa)
977 struct dn_dev *dn_db = rcu_dereference_raw(dev->dn_ptr);
979 if (dn_db->parms.forwarding == 0)
980 dn_send_endnode_hello(dev, ifa);
981 else
982 dn_send_router_hello(dev, ifa);
985 static void dn_send_ptp_hello(struct net_device *dev, struct dn_ifaddr *ifa)
987 int tdlen = 16;
988 int size = dev->hard_header_len + 2 + 4 + tdlen;
989 struct sk_buff *skb = dn_alloc_skb(NULL, size, GFP_ATOMIC);
990 int i;
991 unsigned char *ptr;
992 char src[ETH_ALEN];
994 if (skb == NULL)
995 return ;
997 skb->dev = dev;
998 skb_push(skb, dev->hard_header_len);
999 ptr = skb_put(skb, 2 + 4 + tdlen);
1001 *ptr++ = DN_RT_PKT_HELO;
1002 *((__le16 *)ptr) = ifa->ifa_local;
1003 ptr += 2;
1004 *ptr++ = tdlen;
1006 for(i = 0; i < tdlen; i++)
1007 *ptr++ = 0252;
1009 dn_dn2eth(src, ifa->ifa_local);
1010 dn_rt_finish_output(skb, dn_rt_all_rt_mcast, src);
1013 static int dn_eth_up(struct net_device *dev)
1015 struct dn_dev *dn_db = rcu_dereference_raw(dev->dn_ptr);
1017 if (dn_db->parms.forwarding == 0)
1018 dev_mc_add(dev, dn_rt_all_end_mcast);
1019 else
1020 dev_mc_add(dev, dn_rt_all_rt_mcast);
1022 dn_db->use_long = 1;
1024 return 0;
1027 static void dn_eth_down(struct net_device *dev)
1029 struct dn_dev *dn_db = rcu_dereference_raw(dev->dn_ptr);
1031 if (dn_db->parms.forwarding == 0)
1032 dev_mc_del(dev, dn_rt_all_end_mcast);
1033 else
1034 dev_mc_del(dev, dn_rt_all_rt_mcast);
1037 static void dn_dev_set_timer(struct net_device *dev);
1039 static void dn_dev_timer_func(unsigned long arg)
1041 struct net_device *dev = (struct net_device *)arg;
1042 struct dn_dev *dn_db;
1043 struct dn_ifaddr *ifa;
1045 rcu_read_lock();
1046 dn_db = rcu_dereference(dev->dn_ptr);
1047 if (dn_db->t3 <= dn_db->parms.t2) {
1048 if (dn_db->parms.timer3) {
1049 for (ifa = rcu_dereference(dn_db->ifa_list);
1050 ifa;
1051 ifa = rcu_dereference(ifa->ifa_next)) {
1052 if (!(ifa->ifa_flags & IFA_F_SECONDARY))
1053 dn_db->parms.timer3(dev, ifa);
1056 dn_db->t3 = dn_db->parms.t3;
1057 } else {
1058 dn_db->t3 -= dn_db->parms.t2;
1060 rcu_read_unlock();
1061 dn_dev_set_timer(dev);
1064 static void dn_dev_set_timer(struct net_device *dev)
1066 struct dn_dev *dn_db = rcu_dereference_raw(dev->dn_ptr);
1068 if (dn_db->parms.t2 > dn_db->parms.t3)
1069 dn_db->parms.t2 = dn_db->parms.t3;
1071 dn_db->timer.data = (unsigned long)dev;
1072 dn_db->timer.function = dn_dev_timer_func;
1073 dn_db->timer.expires = jiffies + (dn_db->parms.t2 * HZ);
1075 add_timer(&dn_db->timer);
1078 static struct dn_dev *dn_dev_create(struct net_device *dev, int *err)
1080 int i;
1081 struct dn_dev_parms *p = dn_dev_list;
1082 struct dn_dev *dn_db;
1084 for(i = 0; i < DN_DEV_LIST_SIZE; i++, p++) {
1085 if (p->type == dev->type)
1086 break;
1089 *err = -ENODEV;
1090 if (i == DN_DEV_LIST_SIZE)
1091 return NULL;
1093 *err = -ENOBUFS;
1094 if ((dn_db = kzalloc(sizeof(struct dn_dev), GFP_ATOMIC)) == NULL)
1095 return NULL;
1097 memcpy(&dn_db->parms, p, sizeof(struct dn_dev_parms));
1099 rcu_assign_pointer(dev->dn_ptr, dn_db);
1100 dn_db->dev = dev;
1101 init_timer(&dn_db->timer);
1103 dn_db->uptime = jiffies;
1105 dn_db->neigh_parms = neigh_parms_alloc(dev, &dn_neigh_table);
1106 if (!dn_db->neigh_parms) {
1107 rcu_assign_pointer(dev->dn_ptr, NULL);
1108 kfree(dn_db);
1109 return NULL;
1112 if (dn_db->parms.up) {
1113 if (dn_db->parms.up(dev) < 0) {
1114 neigh_parms_release(&dn_neigh_table, dn_db->neigh_parms);
1115 dev->dn_ptr = NULL;
1116 kfree(dn_db);
1117 return NULL;
1121 dn_dev_sysctl_register(dev, &dn_db->parms);
1123 dn_dev_set_timer(dev);
1125 *err = 0;
1126 return dn_db;
1131 * This processes a device up event. We only start up
1132 * the loopback device & ethernet devices with correct
1133 * MAC addresses automatically. Others must be started
1134 * specifically.
1136 * FIXME: How should we configure the loopback address ? If we could dispense
1137 * with using decnet_address here and for autobind, it will be one less thing
1138 * for users to worry about setting up.
1141 void dn_dev_up(struct net_device *dev)
1143 struct dn_ifaddr *ifa;
1144 __le16 addr = decnet_address;
1145 int maybe_default = 0;
1146 struct dn_dev *dn_db = rtnl_dereference(dev->dn_ptr);
1148 if ((dev->type != ARPHRD_ETHER) && (dev->type != ARPHRD_LOOPBACK))
1149 return;
1152 * Need to ensure that loopback device has a dn_db attached to it
1153 * to allow creation of neighbours against it, even though it might
1154 * not have a local address of its own. Might as well do the same for
1155 * all autoconfigured interfaces.
1157 if (dn_db == NULL) {
1158 int err;
1159 dn_db = dn_dev_create(dev, &err);
1160 if (dn_db == NULL)
1161 return;
1164 if (dev->type == ARPHRD_ETHER) {
1165 if (memcmp(dev->dev_addr, dn_hiord, 4) != 0)
1166 return;
1167 addr = dn_eth2dn(dev->dev_addr);
1168 maybe_default = 1;
1171 if (addr == 0)
1172 return;
1174 if ((ifa = dn_dev_alloc_ifa()) == NULL)
1175 return;
1177 ifa->ifa_local = ifa->ifa_address = addr;
1178 ifa->ifa_flags = 0;
1179 ifa->ifa_scope = RT_SCOPE_UNIVERSE;
1180 strcpy(ifa->ifa_label, dev->name);
1182 dn_dev_set_ifa(dev, ifa);
1185 * Automagically set the default device to the first automatically
1186 * configured ethernet card in the system.
1188 if (maybe_default) {
1189 dev_hold(dev);
1190 if (dn_dev_set_default(dev, 0))
1191 dev_put(dev);
1195 static void dn_dev_delete(struct net_device *dev)
1197 struct dn_dev *dn_db = rtnl_dereference(dev->dn_ptr);
1199 if (dn_db == NULL)
1200 return;
1202 del_timer_sync(&dn_db->timer);
1203 dn_dev_sysctl_unregister(&dn_db->parms);
1204 dn_dev_check_default(dev);
1205 neigh_ifdown(&dn_neigh_table, dev);
1207 if (dn_db->parms.down)
1208 dn_db->parms.down(dev);
1210 dev->dn_ptr = NULL;
1212 neigh_parms_release(&dn_neigh_table, dn_db->neigh_parms);
1213 neigh_ifdown(&dn_neigh_table, dev);
1215 if (dn_db->router)
1216 neigh_release(dn_db->router);
1217 if (dn_db->peer)
1218 neigh_release(dn_db->peer);
1220 kfree(dn_db);
1223 void dn_dev_down(struct net_device *dev)
1225 struct dn_dev *dn_db = rtnl_dereference(dev->dn_ptr);
1226 struct dn_ifaddr *ifa;
1228 if (dn_db == NULL)
1229 return;
1231 while ((ifa = rtnl_dereference(dn_db->ifa_list)) != NULL) {
1232 dn_dev_del_ifa(dn_db, &dn_db->ifa_list, 0);
1233 dn_dev_free_ifa(ifa);
1236 dn_dev_delete(dev);
1239 void dn_dev_init_pkt(struct sk_buff *skb)
1243 void dn_dev_veri_pkt(struct sk_buff *skb)
1247 void dn_dev_hello(struct sk_buff *skb)
1251 void dn_dev_devices_off(void)
1253 struct net_device *dev;
1255 rtnl_lock();
1256 for_each_netdev(&init_net, dev)
1257 dn_dev_down(dev);
1258 rtnl_unlock();
1262 void dn_dev_devices_on(void)
1264 struct net_device *dev;
1266 rtnl_lock();
1267 for_each_netdev(&init_net, dev) {
1268 if (dev->flags & IFF_UP)
1269 dn_dev_up(dev);
1271 rtnl_unlock();
1274 int register_dnaddr_notifier(struct notifier_block *nb)
1276 return blocking_notifier_chain_register(&dnaddr_chain, nb);
1279 int unregister_dnaddr_notifier(struct notifier_block *nb)
1281 return blocking_notifier_chain_unregister(&dnaddr_chain, nb);
1284 #ifdef CONFIG_PROC_FS
1285 static inline int is_dn_dev(struct net_device *dev)
1287 return dev->dn_ptr != NULL;
1290 static void *dn_dev_seq_start(struct seq_file *seq, loff_t *pos)
1291 __acquires(RCU)
1293 int i;
1294 struct net_device *dev;
1296 rcu_read_lock();
1298 if (*pos == 0)
1299 return SEQ_START_TOKEN;
1301 i = 1;
1302 for_each_netdev_rcu(&init_net, dev) {
1303 if (!is_dn_dev(dev))
1304 continue;
1306 if (i++ == *pos)
1307 return dev;
1310 return NULL;
1313 static void *dn_dev_seq_next(struct seq_file *seq, void *v, loff_t *pos)
1315 struct net_device *dev;
1317 ++*pos;
1319 dev = (struct net_device *)v;
1320 if (v == SEQ_START_TOKEN)
1321 dev = net_device_entry(&init_net.dev_base_head);
1323 for_each_netdev_continue_rcu(&init_net, dev) {
1324 if (!is_dn_dev(dev))
1325 continue;
1327 return dev;
1330 return NULL;
1333 static void dn_dev_seq_stop(struct seq_file *seq, void *v)
1334 __releases(RCU)
1336 rcu_read_unlock();
1339 static char *dn_type2asc(char type)
1341 switch(type) {
1342 case DN_DEV_BCAST:
1343 return "B";
1344 case DN_DEV_UCAST:
1345 return "U";
1346 case DN_DEV_MPOINT:
1347 return "M";
1350 return "?";
1353 static int dn_dev_seq_show(struct seq_file *seq, void *v)
1355 if (v == SEQ_START_TOKEN)
1356 seq_puts(seq, "Name Flags T1 Timer1 T3 Timer3 BlkSize Pri State DevType Router Peer\n");
1357 else {
1358 struct net_device *dev = v;
1359 char peer_buf[DN_ASCBUF_LEN];
1360 char router_buf[DN_ASCBUF_LEN];
1361 struct dn_dev *dn_db = rcu_dereference(dev->dn_ptr);
1363 seq_printf(seq, "%-8s %1s %04u %04u %04lu %04lu"
1364 " %04hu %03d %02x %-10s %-7s %-7s\n",
1365 dev->name ? dev->name : "???",
1366 dn_type2asc(dn_db->parms.mode),
1367 0, 0,
1368 dn_db->t3, dn_db->parms.t3,
1369 mtu2blksize(dev),
1370 dn_db->parms.priority,
1371 dn_db->parms.state, dn_db->parms.name,
1372 dn_db->router ? dn_addr2asc(le16_to_cpu(*(__le16 *)dn_db->router->primary_key), router_buf) : "",
1373 dn_db->peer ? dn_addr2asc(le16_to_cpu(*(__le16 *)dn_db->peer->primary_key), peer_buf) : "");
1375 return 0;
1378 static const struct seq_operations dn_dev_seq_ops = {
1379 .start = dn_dev_seq_start,
1380 .next = dn_dev_seq_next,
1381 .stop = dn_dev_seq_stop,
1382 .show = dn_dev_seq_show,
1385 static int dn_dev_seq_open(struct inode *inode, struct file *file)
1387 return seq_open(file, &dn_dev_seq_ops);
1390 static const struct file_operations dn_dev_seq_fops = {
1391 .owner = THIS_MODULE,
1392 .open = dn_dev_seq_open,
1393 .read = seq_read,
1394 .llseek = seq_lseek,
1395 .release = seq_release,
1398 #endif /* CONFIG_PROC_FS */
1400 static int addr[2];
1401 module_param_array(addr, int, NULL, 0444);
1402 MODULE_PARM_DESC(addr, "The DECnet address of this machine: area,node");
1404 void __init dn_dev_init(void)
1406 if (addr[0] > 63 || addr[0] < 0) {
1407 printk(KERN_ERR "DECnet: Area must be between 0 and 63");
1408 return;
1411 if (addr[1] > 1023 || addr[1] < 0) {
1412 printk(KERN_ERR "DECnet: Node must be between 0 and 1023");
1413 return;
1416 decnet_address = cpu_to_le16((addr[0] << 10) | addr[1]);
1418 dn_dev_devices_on();
1420 rtnl_register(PF_DECnet, RTM_NEWADDR, dn_nl_newaddr, NULL);
1421 rtnl_register(PF_DECnet, RTM_DELADDR, dn_nl_deladdr, NULL);
1422 rtnl_register(PF_DECnet, RTM_GETADDR, NULL, dn_nl_dump_ifaddr);
1424 proc_net_fops_create(&init_net, "decnet_dev", S_IRUGO, &dn_dev_seq_fops);
1426 #ifdef CONFIG_SYSCTL
1428 int i;
1429 for(i = 0; i < DN_DEV_LIST_SIZE; i++)
1430 dn_dev_sysctl_register(NULL, &dn_dev_list[i]);
1432 #endif /* CONFIG_SYSCTL */
1435 void __exit dn_dev_cleanup(void)
1437 #ifdef CONFIG_SYSCTL
1439 int i;
1440 for(i = 0; i < DN_DEV_LIST_SIZE; i++)
1441 dn_dev_sysctl_unregister(&dn_dev_list[i]);
1443 #endif /* CONFIG_SYSCTL */
1445 proc_net_remove(&init_net, "decnet_dev");
1447 dn_dev_devices_off();