patch-2_6_7-vs1_9_1_12
[linux-2.6.git] / net / decnet / dn_dev.c
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.
5  *
6  *              DECnet Device Layer
7  *
8  * Authors:     Steve Whitehouse <SteveW@ACM.org>
9  *              Eduardo Marcelo Serrat <emserrat@geocities.com>
10  *
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.
25  */
26
27 #include <linux/config.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_arp.h>
38 #include <linux/if_ether.h>
39 #include <linux/skbuff.h>
40 #include <linux/rtnetlink.h>
41 #include <linux/sysctl.h>
42 #include <linux/notifier.h>
43 #include <asm/uaccess.h>
44 #include <net/neighbour.h>
45 #include <net/dst.h>
46 #include <net/flow.h>
47 #include <net/dn.h>
48 #include <net/dn_dev.h>
49 #include <net/dn_route.h>
50 #include <net/dn_neigh.h>
51 #include <net/dn_fib.h>
52
53 #define DN_IFREQ_SIZE (sizeof(struct ifreq) - sizeof(struct sockaddr) + sizeof(struct sockaddr_dn))
54
55 static char dn_rt_all_end_mcast[ETH_ALEN] = {0xAB,0x00,0x00,0x04,0x00,0x00};
56 static char dn_rt_all_rt_mcast[ETH_ALEN]  = {0xAB,0x00,0x00,0x03,0x00,0x00};
57 static char dn_hiord[ETH_ALEN]            = {0xAA,0x00,0x04,0x00,0x00,0x00};
58 static unsigned char dn_eco_version[3]    = {0x02,0x00,0x00};
59
60 extern struct neigh_table dn_neigh_table;
61
62 /*
63  * decnet_address is kept in network order.
64  */
65 dn_address decnet_address = 0;
66
67 static rwlock_t dndev_lock = RW_LOCK_UNLOCKED;
68 static struct net_device *decnet_default_device;
69 static struct notifier_block *dnaddr_chain;
70
71 static struct dn_dev *dn_dev_create(struct net_device *dev, int *err);
72 static void dn_dev_delete(struct net_device *dev);
73 static void rtmsg_ifa(int event, struct dn_ifaddr *ifa);
74
75 static int dn_eth_up(struct net_device *);
76 static void dn_eth_down(struct net_device *);
77 static void dn_send_brd_hello(struct net_device *dev, struct dn_ifaddr *ifa);
78 static void dn_send_ptp_hello(struct net_device *dev, struct dn_ifaddr *ifa);
79
80 static struct dn_dev_parms dn_dev_list[] =  {
81 {
82         .type =         ARPHRD_ETHER, /* Ethernet */
83         .mode =         DN_DEV_BCAST,
84         .state =        DN_DEV_S_RU,
85         .t2 =           1,
86         .t3 =           10,
87         .name =         "ethernet",
88         .ctl_name =     NET_DECNET_CONF_ETHER,
89         .up =           dn_eth_up,
90         .down =         dn_eth_down,
91         .timer3 =       dn_send_brd_hello,
92 },
93 {
94         .type =         ARPHRD_IPGRE, /* DECnet tunneled over GRE in IP */
95         .mode =         DN_DEV_BCAST,
96         .state =        DN_DEV_S_RU,
97         .t2 =           1,
98         .t3 =           10,
99         .name =         "ipgre",
100         .ctl_name =     NET_DECNET_CONF_GRE,
101         .timer3 =       dn_send_brd_hello,
102 },
103 #if 0
104 {
105         .type =         ARPHRD_X25, /* Bog standard X.25 */
106         .mode =         DN_DEV_UCAST,
107         .state =        DN_DEV_S_DS,
108         .t2 =           1,
109         .t3 =           120,
110         .name =         "x25",
111         .ctl_name =     NET_DECNET_CONF_X25,
112         .timer3 =       dn_send_ptp_hello,
113 },
114 #endif
115 #if 0
116 {
117         .type =         ARPHRD_PPP, /* DECnet over PPP */
118         .mode =         DN_DEV_BCAST,
119         .state =        DN_DEV_S_RU,
120         .t2 =           1,
121         .t3 =           10,
122         .name =         "ppp",
123         .ctl_name =     NET_DECNET_CONF_PPP,
124         .timer3 =       dn_send_brd_hello,
125 },
126 #endif
127 {
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         .ctl_name =     NET_DECNET_CONF_DDCMP,
135         .timer3 =       dn_send_ptp_hello,
136 },
137 {
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         .ctl_name =     NET_DECNET_CONF_LOOPBACK,
145         .timer3 =       dn_send_brd_hello,
146 }
147 };
148
149 #define DN_DEV_LIST_SIZE (sizeof(dn_dev_list)/sizeof(struct dn_dev_parms))
150
151 #define DN_DEV_PARMS_OFFSET(x) ((int) ((char *) &((struct dn_dev_parms *)0)->x))
152
153 #ifdef CONFIG_SYSCTL
154
155 static int min_t2[] = { 1 };
156 static int max_t2[] = { 60 }; /* No max specified, but this seems sensible */
157 static int min_t3[] = { 1 };
158 static int max_t3[] = { 8191 }; /* Must fit in 16 bits when multiplied by BCT3MULT or T3MULT */
159
160 static int min_priority[1];
161 static int max_priority[] = { 127 }; /* From DECnet spec */
162
163 static int dn_forwarding_proc(ctl_table *, int, struct file *,
164                         void __user *, size_t *);
165 static int dn_forwarding_sysctl(ctl_table *table, int __user *name, int nlen,
166                         void __user *oldval, size_t __user *oldlenp,
167                         void __user *newval, size_t newlen,
168                         void **context);
169
170 static struct dn_dev_sysctl_table {
171         struct ctl_table_header *sysctl_header;
172         ctl_table dn_dev_vars[5];
173         ctl_table dn_dev_dev[2];
174         ctl_table dn_dev_conf_dir[2];
175         ctl_table dn_dev_proto_dir[2];
176         ctl_table dn_dev_root_dir[2];
177 } dn_dev_sysctl = {
178         NULL,
179         {
180         {
181                 .ctl_name = NET_DECNET_CONF_DEV_FORWARDING,
182                 .procname = "forwarding",
183                 .data = (void *)DN_DEV_PARMS_OFFSET(forwarding),
184                 .maxlen = sizeof(int),
185                 .mode = 0644,
186                 .proc_handler = dn_forwarding_proc,
187                 .strategy = dn_forwarding_sysctl,
188         },
189         {
190                 .ctl_name = NET_DECNET_CONF_DEV_PRIORITY,
191                 .procname = "priority",
192                 .data = (void *)DN_DEV_PARMS_OFFSET(priority),
193                 .maxlen = sizeof(int),
194                 .mode = 0644,
195                 .proc_handler = proc_dointvec_minmax,
196                 .strategy = sysctl_intvec,
197                 .extra1 = &min_priority,
198                 .extra2 = &max_priority
199         },
200         {
201                 .ctl_name = NET_DECNET_CONF_DEV_T2,
202                 .procname = "t2",
203                 .data = (void *)DN_DEV_PARMS_OFFSET(t2),
204                 .maxlen = sizeof(int),
205                 .mode = 0644,
206                 .proc_handler = proc_dointvec_minmax,
207                 .strategy = sysctl_intvec,
208                 .extra1 = &min_t2,
209                 .extra2 = &max_t2
210         },
211         {
212                 .ctl_name = NET_DECNET_CONF_DEV_T3,
213                 .procname = "t3",
214                 .data = (void *)DN_DEV_PARMS_OFFSET(t3),
215                 .maxlen = sizeof(int),
216                 .mode = 0644,
217                 .proc_handler = proc_dointvec_minmax,
218                 .strategy = sysctl_intvec,
219                 .extra1 = &min_t3,
220                 .extra2 = &max_t3
221         },
222         {0}
223         },
224         {{
225                 .ctl_name = 0, 
226                 .procname = "", 
227                 .mode = 0555, 
228                 .child = dn_dev_sysctl.dn_dev_vars
229         }, {0}},
230         {{
231                 .ctl_name = NET_DECNET_CONF,
232                 .procname = "conf", 
233                 .mode = 0555, 
234                 .child = dn_dev_sysctl.dn_dev_dev
235         }, {0}},
236         {{
237                 .ctl_name = NET_DECNET, 
238                 .procname = "decnet", 
239                 .mode = 0555, 
240                 .child = dn_dev_sysctl.dn_dev_conf_dir
241         }, {0}},
242         {{
243                 .ctl_name = CTL_NET, 
244                 .procname = "net", 
245                 .mode = 0555, 
246                 .child = dn_dev_sysctl.dn_dev_proto_dir
247         }, {0}}
248 };
249
250 static inline __u16 mtu2blksize(struct net_device *dev)
251 {
252         u32 blksize = dev->mtu;
253         if (blksize > 0xffff)
254                 blksize = 0xffff;
255
256         if (dev->type == ARPHRD_ETHER ||
257             dev->type == ARPHRD_PPP ||
258             dev->type == ARPHRD_IPGRE ||
259             dev->type == ARPHRD_LOOPBACK)
260                 blksize -= 2;
261
262         return (__u16)blksize;
263 }
264
265 static void dn_dev_sysctl_register(struct net_device *dev, struct dn_dev_parms *parms)
266 {
267         struct dn_dev_sysctl_table *t;
268         int i;
269
270         t = kmalloc(sizeof(*t), GFP_KERNEL);
271         if (t == NULL)
272                 return;
273
274         memcpy(t, &dn_dev_sysctl, sizeof(*t));
275
276         for(i = 0; i < ARRAY_SIZE(t->dn_dev_vars) - 1; i++) {
277                 long offset = (long)t->dn_dev_vars[i].data;
278                 t->dn_dev_vars[i].data = ((char *)parms) + offset;
279                 t->dn_dev_vars[i].de = NULL;
280         }
281
282         if (dev) {
283                 t->dn_dev_dev[0].procname = dev->name;
284                 t->dn_dev_dev[0].ctl_name = dev->ifindex;
285         } else {
286                 t->dn_dev_dev[0].procname = parms->name;
287                 t->dn_dev_dev[0].ctl_name = parms->ctl_name;
288         }
289
290         t->dn_dev_dev[0].child = t->dn_dev_vars;
291         t->dn_dev_dev[0].de = NULL;
292         t->dn_dev_conf_dir[0].child = t->dn_dev_dev;
293         t->dn_dev_conf_dir[0].de = NULL;
294         t->dn_dev_proto_dir[0].child = t->dn_dev_conf_dir;
295         t->dn_dev_proto_dir[0].de = NULL;
296         t->dn_dev_root_dir[0].child = t->dn_dev_proto_dir;
297         t->dn_dev_root_dir[0].de = NULL;
298         t->dn_dev_vars[0].extra1 = (void *)dev;
299
300         t->sysctl_header = register_sysctl_table(t->dn_dev_root_dir, 0);
301         if (t->sysctl_header == NULL)
302                 kfree(t);
303         else
304                 parms->sysctl = t;
305 }
306
307 static void dn_dev_sysctl_unregister(struct dn_dev_parms *parms)
308 {
309         if (parms->sysctl) {
310                 struct dn_dev_sysctl_table *t = parms->sysctl;
311                 parms->sysctl = NULL;
312                 unregister_sysctl_table(t->sysctl_header);
313                 kfree(t);
314         }
315 }
316
317 struct net_device *dn_dev_get_default(void)
318 {
319         struct net_device *dev;
320         read_lock(&dndev_lock);
321         dev = decnet_default_device;
322         if (dev) {
323                 if (dev->dn_ptr)
324                         dev_hold(dev);
325                 else
326                         dev = NULL;
327         }
328         read_unlock(&dndev_lock);
329         return dev;
330 }
331
332 int dn_dev_set_default(struct net_device *dev, int force)
333 {
334         struct net_device *old = NULL;
335         int rv = -EBUSY;
336         if (!dev->dn_ptr)
337                 return -ENODEV;
338         write_lock(&dndev_lock);
339         if (force || decnet_default_device == NULL) {
340                 old = decnet_default_device;
341                 decnet_default_device = dev;
342                 rv = 0;
343         }
344         write_unlock(&dndev_lock);
345         if (old)
346                 dev_put(dev);
347         return rv;
348 }
349
350 static void dn_dev_check_default(struct net_device *dev)
351 {
352         write_lock(&dndev_lock);
353         if (dev == decnet_default_device) {
354                 decnet_default_device = NULL;
355         } else {
356                 dev = NULL;
357         }
358         write_unlock(&dndev_lock);
359         if (dev)
360                 dev_put(dev);
361 }
362
363 static int dn_forwarding_proc(ctl_table *table, int write, 
364                                 struct file *filep,
365                                 void __user *buffer, size_t *lenp)
366 {
367 #ifdef CONFIG_DECNET_ROUTER
368         struct net_device *dev = table->extra1;
369         struct dn_dev *dn_db;
370         int err;
371         int tmp, old;
372
373         if (table->extra1 == NULL)
374                 return -EINVAL;
375
376         dn_db = dev->dn_ptr;
377         old = dn_db->parms.forwarding;
378
379         err = proc_dointvec(table, write, filep, buffer, lenp);
380
381         if ((err >= 0) && write) {
382                 if (dn_db->parms.forwarding < 0)
383                         dn_db->parms.forwarding = 0;
384                 if (dn_db->parms.forwarding > 2)
385                         dn_db->parms.forwarding = 2;
386                 /*
387                  * What an ugly hack this is... its works, just. It
388                  * would be nice if sysctl/proc were just that little
389                  * bit more flexible so I don't have to write a special
390                  * routine, or suffer hacks like this - SJW
391                  */
392                 tmp = dn_db->parms.forwarding;
393                 dn_db->parms.forwarding = old;
394                 if (dn_db->parms.down)
395                         dn_db->parms.down(dev);
396                 dn_db->parms.forwarding = tmp;
397                 if (dn_db->parms.up)
398                         dn_db->parms.up(dev);
399         }
400
401         return err;
402 #else
403         return -EINVAL;
404 #endif
405 }
406
407 static int dn_forwarding_sysctl(ctl_table *table, int __user *name, int nlen,
408                         void __user *oldval, size_t __user *oldlenp,
409                         void __user *newval, size_t newlen,
410                         void **context)
411 {
412 #ifdef CONFIG_DECNET_ROUTER
413         struct net_device *dev = table->extra1;
414         struct dn_dev *dn_db;
415         int value;
416
417         if (table->extra1 == NULL)
418                 return -EINVAL;
419
420         dn_db = dev->dn_ptr;
421
422         if (newval && newlen) {
423                 if (newlen != sizeof(int))
424                         return -EINVAL;
425
426                 if (get_user(value, (int __user *)newval))
427                         return -EFAULT;
428                 if (value < 0)
429                         return -EINVAL;
430                 if (value > 2)
431                         return -EINVAL;
432
433                 if (dn_db->parms.down)
434                         dn_db->parms.down(dev);
435                 dn_db->parms.forwarding = value;
436                 if (dn_db->parms.up)
437                         dn_db->parms.up(dev);
438         }
439
440         return 0;
441 #else
442         return -EINVAL;
443 #endif
444 }
445
446 #else /* CONFIG_SYSCTL */
447 static void dn_dev_sysctl_unregister(struct dn_dev_parms *parms)
448 {
449 }
450 static void dn_dev_sysctl_register(struct net_device *dev, struct dn_dev_parms *parms)
451 {
452 }
453
454 #endif /* CONFIG_SYSCTL */
455
456 static struct dn_ifaddr *dn_dev_alloc_ifa(void)
457 {
458         struct dn_ifaddr *ifa;
459
460         ifa = kmalloc(sizeof(*ifa), GFP_KERNEL);
461
462         if (ifa) {
463                 memset(ifa, 0, sizeof(*ifa));
464         }
465
466         return ifa;
467 }
468
469 static __inline__ void dn_dev_free_ifa(struct dn_ifaddr *ifa)
470 {
471         kfree(ifa);
472 }
473
474 static void dn_dev_del_ifa(struct dn_dev *dn_db, struct dn_ifaddr **ifap, int destroy)
475 {
476         struct dn_ifaddr *ifa1 = *ifap;
477         unsigned char mac_addr[6];
478         struct net_device *dev = dn_db->dev;
479
480         ASSERT_RTNL();
481
482         *ifap = ifa1->ifa_next;
483
484         if (dn_db->dev->type == ARPHRD_ETHER) {
485                 if (ifa1->ifa_local != dn_htons(dn_eth2dn(dev->dev_addr))) {
486                         dn_dn2eth(mac_addr, ifa1->ifa_local);
487                         dev_mc_delete(dev, mac_addr, ETH_ALEN, 0);
488                 }
489         }
490
491         rtmsg_ifa(RTM_DELADDR, ifa1);
492         notifier_call_chain(&dnaddr_chain, NETDEV_DOWN, ifa1);
493         if (destroy) {
494                 dn_dev_free_ifa(ifa1);
495
496                 if (dn_db->ifa_list == NULL)
497                         dn_dev_delete(dn_db->dev);
498         }
499 }
500
501 static int dn_dev_insert_ifa(struct dn_dev *dn_db, struct dn_ifaddr *ifa)
502 {
503         struct net_device *dev = dn_db->dev;
504         struct dn_ifaddr *ifa1;
505         unsigned char mac_addr[6];
506
507         ASSERT_RTNL();
508
509         /* Check for duplicates */      
510         for(ifa1 = dn_db->ifa_list; ifa1; ifa1 = ifa1->ifa_next) {
511                 if (ifa1->ifa_local == ifa->ifa_local)
512                         return -EEXIST;
513         }
514
515         if (dev->type == ARPHRD_ETHER) {
516                 if (ifa->ifa_local != dn_htons(dn_eth2dn(dev->dev_addr))) {
517                         dn_dn2eth(mac_addr, ifa->ifa_local);
518                         dev_mc_add(dev, mac_addr, ETH_ALEN, 0);
519                         dev_mc_upload(dev);
520                 }
521         }
522
523         ifa->ifa_next = dn_db->ifa_list;
524         dn_db->ifa_list = ifa;
525
526         rtmsg_ifa(RTM_NEWADDR, ifa);
527         notifier_call_chain(&dnaddr_chain, NETDEV_UP, ifa);
528
529         return 0;
530 }
531
532 static int dn_dev_set_ifa(struct net_device *dev, struct dn_ifaddr *ifa)
533 {
534         struct dn_dev *dn_db = dev->dn_ptr;
535         int rv;
536
537         if (dn_db == NULL) {
538                 int err;
539                 dn_db = dn_dev_create(dev, &err);
540                 if (dn_db == NULL)
541                         return err;
542         }
543
544         ifa->ifa_dev = dn_db;
545
546         if (dev->flags & IFF_LOOPBACK)
547                 ifa->ifa_scope = RT_SCOPE_HOST;
548
549         rv = dn_dev_insert_ifa(dn_db, ifa);
550         if (rv)
551                 dn_dev_free_ifa(ifa);
552         return rv;
553 }
554
555
556 int dn_dev_ioctl(unsigned int cmd, void __user *arg)
557 {
558         char buffer[DN_IFREQ_SIZE];
559         struct ifreq *ifr = (struct ifreq *)buffer;
560         struct sockaddr_dn *sdn = (struct sockaddr_dn *)&ifr->ifr_addr;
561         struct dn_dev *dn_db;
562         struct net_device *dev;
563         struct dn_ifaddr *ifa = NULL, **ifap = NULL;
564         int ret = 0;
565
566         if (copy_from_user(ifr, arg, DN_IFREQ_SIZE))
567                 return -EFAULT;
568         ifr->ifr_name[IFNAMSIZ-1] = 0;
569
570 #ifdef CONFIG_KMOD
571         dev_load(ifr->ifr_name);
572 #endif
573
574         switch(cmd) {
575                 case SIOCGIFADDR:
576                         break;
577                 case SIOCSIFADDR:
578                         if (!capable(CAP_NET_ADMIN))
579                                 return -EACCES;
580                         if (sdn->sdn_family != AF_DECnet)
581                                 return -EINVAL;
582                         break;
583                 default:
584                         return -EINVAL;
585         }
586
587         rtnl_lock();
588
589         if ((dev = __dev_get_by_name(ifr->ifr_name)) == NULL) {
590                 ret = -ENODEV;
591                 goto done;
592         }
593
594         if ((dn_db = dev->dn_ptr) != NULL) {
595                 for (ifap = &dn_db->ifa_list; (ifa=*ifap) != NULL; ifap = &ifa->ifa_next)
596                         if (strcmp(ifr->ifr_name, ifa->ifa_label) == 0)
597                                 break;
598         }
599
600         if (ifa == NULL && cmd != SIOCSIFADDR) {
601                 ret = -EADDRNOTAVAIL;
602                 goto done;
603         }
604
605         switch(cmd) {
606                 case SIOCGIFADDR:
607                         *((dn_address *)sdn->sdn_nodeaddr) = ifa->ifa_local;
608                         goto rarok;
609
610                 case SIOCSIFADDR:
611                         if (!ifa) {
612                                 if ((ifa = dn_dev_alloc_ifa()) == NULL) {
613                                         ret = -ENOBUFS;
614                                         break;
615                                 }
616                                 memcpy(ifa->ifa_label, dev->name, IFNAMSIZ);
617                         } else {
618                                 if (ifa->ifa_local == dn_saddr2dn(sdn))
619                                         break;
620                                 dn_dev_del_ifa(dn_db, ifap, 0);
621                         }
622
623                         ifa->ifa_local = ifa->ifa_address = dn_saddr2dn(sdn);
624
625                         ret = dn_dev_set_ifa(dev, ifa);
626         }
627 done:
628         rtnl_unlock();
629
630         return ret;
631 rarok:
632         if (copy_to_user(arg, ifr, DN_IFREQ_SIZE))
633                 ret = -EFAULT;
634         goto done;
635 }
636
637 static struct dn_dev *dn_dev_by_index(int ifindex)
638 {
639         struct net_device *dev;
640         struct dn_dev *dn_dev = NULL;
641         dev = dev_get_by_index(ifindex);
642         if (dev) {
643                 dn_dev = dev->dn_ptr;
644                 dev_put(dev);
645         }
646
647         return dn_dev;
648 }
649
650 static int dn_dev_rtm_deladdr(struct sk_buff *skb, struct nlmsghdr *nlh, void *arg)
651 {
652         struct rtattr **rta = arg;
653         struct dn_dev *dn_db;
654         struct ifaddrmsg *ifm = NLMSG_DATA(nlh);
655         struct dn_ifaddr *ifa, **ifap;
656
657         if ((dn_db = dn_dev_by_index(ifm->ifa_index)) == NULL)
658                 return -EADDRNOTAVAIL;
659
660         for(ifap = &dn_db->ifa_list; (ifa=*ifap) != NULL; ifap = &ifa->ifa_next) {
661                 void *tmp = rta[IFA_LOCAL-1];
662                 if ((tmp && memcmp(RTA_DATA(tmp), &ifa->ifa_local, 2)) ||
663                                 (rta[IFA_LABEL-1] && strcmp(RTA_DATA(rta[IFA_LABEL-1]), ifa->ifa_label)))
664                         continue;
665
666                 dn_dev_del_ifa(dn_db, ifap, 1);
667                 return 0;
668         }
669
670         return -EADDRNOTAVAIL;
671 }
672
673 static int dn_dev_rtm_newaddr(struct sk_buff *skb, struct nlmsghdr *nlh, void *arg)
674 {
675         struct rtattr **rta = arg;
676         struct net_device *dev;
677         struct dn_dev *dn_db;
678         struct ifaddrmsg *ifm = NLMSG_DATA(nlh);
679         struct dn_ifaddr *ifa;
680         int rv;
681
682         if (rta[IFA_LOCAL-1] == NULL)
683                 return -EINVAL;
684
685         if ((dev = __dev_get_by_index(ifm->ifa_index)) == NULL)
686                 return -ENODEV;
687
688         if ((dn_db = dev->dn_ptr) == NULL) {
689                 int err;
690                 dn_db = dn_dev_create(dev, &err);
691                 if (!dn_db)
692                         return err;
693         }
694         
695         if ((ifa = dn_dev_alloc_ifa()) == NULL)
696                 return -ENOBUFS;
697
698         if (!rta[IFA_ADDRESS - 1])
699                 rta[IFA_ADDRESS - 1] = rta[IFA_LOCAL - 1];
700         memcpy(&ifa->ifa_local, RTA_DATA(rta[IFA_LOCAL-1]), 2);
701         memcpy(&ifa->ifa_address, RTA_DATA(rta[IFA_ADDRESS-1]), 2);
702         ifa->ifa_flags = ifm->ifa_flags;
703         ifa->ifa_scope = ifm->ifa_scope;
704         ifa->ifa_dev = dn_db;
705         if (rta[IFA_LABEL-1])
706                 memcpy(ifa->ifa_label, RTA_DATA(rta[IFA_LABEL-1]), IFNAMSIZ);
707         else
708                 memcpy(ifa->ifa_label, dev->name, IFNAMSIZ);
709
710         rv = dn_dev_insert_ifa(dn_db, ifa);
711         if (rv)
712                 dn_dev_free_ifa(ifa);
713         return rv;
714 }
715
716 static int dn_dev_fill_ifaddr(struct sk_buff *skb, struct dn_ifaddr *ifa,
717                                 u32 pid, u32 seq, int event)
718 {
719         struct ifaddrmsg *ifm;
720         struct nlmsghdr *nlh;
721         unsigned char *b = skb->tail;
722
723         nlh = NLMSG_PUT(skb, pid, seq, event, sizeof(*ifm));
724         ifm = NLMSG_DATA(nlh);
725
726         ifm->ifa_family = AF_DECnet;
727         ifm->ifa_prefixlen = 16;
728         ifm->ifa_flags = ifa->ifa_flags | IFA_F_PERMANENT;
729         ifm->ifa_scope = ifa->ifa_scope;
730         ifm->ifa_index = ifa->ifa_dev->dev->ifindex;
731         if (ifa->ifa_address)
732                 RTA_PUT(skb, IFA_ADDRESS, 2, &ifa->ifa_address);
733         if (ifa->ifa_local)
734                 RTA_PUT(skb, IFA_LOCAL, 2, &ifa->ifa_local);
735         if (ifa->ifa_label[0])
736                 RTA_PUT(skb, IFA_LABEL, IFNAMSIZ, &ifa->ifa_label);
737         nlh->nlmsg_len = skb->tail - b;
738         return skb->len;
739
740 nlmsg_failure:
741 rtattr_failure:
742         skb_trim(skb, b - skb->data);
743         return -1;
744 }
745
746 static void rtmsg_ifa(int event, struct dn_ifaddr *ifa)
747 {
748         struct sk_buff *skb;
749         int size = NLMSG_SPACE(sizeof(struct ifaddrmsg)+128);
750
751         skb = alloc_skb(size, GFP_KERNEL);
752         if (!skb) {
753                 netlink_set_err(rtnl, 0, RTMGRP_DECnet_IFADDR, ENOBUFS);
754                 return;
755         }
756         if (dn_dev_fill_ifaddr(skb, ifa, 0, 0, event) < 0) {
757                 kfree_skb(skb);
758                 netlink_set_err(rtnl, 0, RTMGRP_DECnet_IFADDR, EINVAL);
759                 return;
760         }
761         NETLINK_CB(skb).dst_groups = RTMGRP_DECnet_IFADDR;
762         netlink_broadcast(rtnl, skb, 0, RTMGRP_DECnet_IFADDR, GFP_KERNEL);
763 }
764
765 static int dn_dev_dump_ifaddr(struct sk_buff *skb, struct netlink_callback *cb)
766 {
767         int idx, dn_idx;
768         int s_idx, s_dn_idx;
769         struct net_device *dev;
770         struct dn_dev *dn_db;
771         struct dn_ifaddr *ifa;
772
773         s_idx = cb->args[0];
774         s_dn_idx = dn_idx = cb->args[1];
775         read_lock(&dev_base_lock);
776         for(dev = dev_base, idx = 0; dev; dev = dev->next, idx++) {
777                 if (idx < s_idx)
778                         continue;
779                 if (idx > s_idx)
780                         s_dn_idx = 0;
781                 if ((dn_db = dev->dn_ptr) == NULL)
782                         continue;
783
784                 for(ifa = dn_db->ifa_list, dn_idx = 0; ifa; ifa = ifa->ifa_next, dn_idx++) {
785                         if (dn_idx < s_dn_idx)
786                                 continue;
787
788                         if (dn_dev_fill_ifaddr(skb, ifa,
789                                                NETLINK_CB(cb->skb).pid,
790                                                cb->nlh->nlmsg_seq,
791                                                RTM_NEWADDR) <= 0)
792                                 goto done;
793                 }
794         }
795 done:
796         read_unlock(&dev_base_lock);
797         cb->args[0] = idx;
798         cb->args[1] = dn_idx;
799
800         return skb->len;
801 }
802
803 static int dn_dev_get_first(struct net_device *dev, dn_address *addr)
804 {
805         struct dn_dev *dn_db = (struct dn_dev *)dev->dn_ptr;
806         struct dn_ifaddr *ifa;
807         int rv = -ENODEV;
808         if (dn_db == NULL)
809                 goto out;
810         ifa = dn_db->ifa_list;
811         if (ifa != NULL) {
812                 *addr = ifa->ifa_local;
813                 rv = 0;
814         }
815 out:
816         return rv;
817 }
818
819 /* 
820  * Find a default address to bind to.
821  *
822  * This is one of those areas where the initial VMS concepts don't really
823  * map onto the Linux concepts, and since we introduced multiple addresses
824  * per interface we have to cope with slightly odd ways of finding out what
825  * "our address" really is. Mostly it's not a problem; for this we just guess
826  * a sensible default. Eventually the routing code will take care of all the
827  * nasties for us I hope.
828  */
829 int dn_dev_bind_default(dn_address *addr)
830 {
831         struct net_device *dev;
832         int rv;
833         dev = dn_dev_get_default();
834 last_chance:
835         if (dev) {
836                 read_lock(&dev_base_lock);
837                 rv = dn_dev_get_first(dev, addr);
838                 read_unlock(&dev_base_lock);
839                 dev_put(dev);
840                 if (rv == 0 || dev == &loopback_dev)
841                         return rv;
842         }
843         dev = &loopback_dev;
844         dev_hold(dev);
845         goto last_chance;
846 }
847
848 static void dn_send_endnode_hello(struct net_device *dev, struct dn_ifaddr *ifa)
849 {
850         struct endnode_hello_message *msg;
851         struct sk_buff *skb = NULL;
852         unsigned short int *pktlen;
853         struct dn_dev *dn_db = (struct dn_dev *)dev->dn_ptr;
854
855         if ((skb = dn_alloc_skb(NULL, sizeof(*msg), GFP_ATOMIC)) == NULL)
856                 return;
857
858         skb->dev = dev;
859
860         msg = (struct endnode_hello_message *)skb_put(skb,sizeof(*msg));
861
862         msg->msgflg  = 0x0D;
863         memcpy(msg->tiver, dn_eco_version, 3);
864         dn_dn2eth(msg->id, ifa->ifa_local);
865         msg->iinfo   = DN_RT_INFO_ENDN;
866         msg->blksize = dn_htons(mtu2blksize(dev));
867         msg->area    = 0x00;
868         memset(msg->seed, 0, 8);
869         memcpy(msg->neighbor, dn_hiord, ETH_ALEN);
870
871         if (dn_db->router) {
872                 struct dn_neigh *dn = (struct dn_neigh *)dn_db->router;
873                 dn_dn2eth(msg->neighbor, dn->addr);
874         }
875
876         msg->timer   = dn_htons((unsigned short)dn_db->parms.t3);
877         msg->mpd     = 0x00;
878         msg->datalen = 0x02;
879         memset(msg->data, 0xAA, 2);
880         
881         pktlen = (unsigned short *)skb_push(skb,2);
882         *pktlen = dn_htons(skb->len - 2);
883
884         skb->nh.raw = skb->data;
885
886         dn_rt_finish_output(skb, dn_rt_all_rt_mcast, msg->id);
887 }
888
889
890 #define DRDELAY (5 * HZ)
891
892 static int dn_am_i_a_router(struct dn_neigh *dn, struct dn_dev *dn_db, struct dn_ifaddr *ifa)
893 {
894         /* First check time since device went up */
895         if ((jiffies - dn_db->uptime) < DRDELAY)
896                 return 0;
897
898         /* If there is no router, then yes... */
899         if (!dn_db->router)
900                 return 1;
901
902         /* otherwise only if we have a higher priority or.. */
903         if (dn->priority < dn_db->parms.priority)
904                 return 1;
905
906         /* if we have equal priority and a higher node number */
907         if (dn->priority != dn_db->parms.priority)
908                 return 0;
909
910         if (dn_ntohs(dn->addr) < dn_ntohs(ifa->ifa_local))
911                 return 1;
912
913         return 0;
914 }
915
916 static void dn_send_router_hello(struct net_device *dev, struct dn_ifaddr *ifa)
917 {
918         int n;
919         struct dn_dev *dn_db = dev->dn_ptr;
920         struct dn_neigh *dn = (struct dn_neigh *)dn_db->router;
921         struct sk_buff *skb;
922         size_t size;
923         unsigned char *ptr;
924         unsigned char *i1, *i2;
925         unsigned short *pktlen;
926         char *src;
927
928         if (mtu2blksize(dev) < (26 + 7))
929                 return;
930
931         n = mtu2blksize(dev) - 26;
932         n /= 7;
933
934         if (n > 32)
935                 n = 32;
936
937         size = 2 + 26 + 7 * n;
938
939         if ((skb = dn_alloc_skb(NULL, size, GFP_ATOMIC)) == NULL)
940                 return;
941
942         skb->dev = dev;
943         ptr = skb_put(skb, size);
944
945         *ptr++ = DN_RT_PKT_CNTL | DN_RT_PKT_ERTH;
946         *ptr++ = 2; /* ECO */
947         *ptr++ = 0;
948         *ptr++ = 0;
949         dn_dn2eth(ptr, ifa->ifa_local);
950         src = ptr;
951         ptr += ETH_ALEN;
952         *ptr++ = dn_db->parms.forwarding == 1 ? 
953                         DN_RT_INFO_L1RT : DN_RT_INFO_L2RT;
954         *((unsigned short *)ptr) = dn_htons(mtu2blksize(dev));
955         ptr += 2;
956         *ptr++ = dn_db->parms.priority; /* Priority */ 
957         *ptr++ = 0; /* Area: Reserved */
958         *((unsigned short *)ptr) = dn_htons((unsigned short)dn_db->parms.t3);
959         ptr += 2;
960         *ptr++ = 0; /* MPD: Reserved */
961         i1 = ptr++;
962         memset(ptr, 0, 7); /* Name: Reserved */
963         ptr += 7;
964         i2 = ptr++;
965
966         n = dn_neigh_elist(dev, ptr, n);
967
968         *i2 = 7 * n;
969         *i1 = 8 + *i2;
970
971         skb_trim(skb, (27 + *i2));
972
973         pktlen = (unsigned short *)skb_push(skb, 2);
974         *pktlen = dn_htons(skb->len - 2);
975
976         skb->nh.raw = skb->data;
977
978         if (dn_am_i_a_router(dn, dn_db, ifa)) {
979                 struct sk_buff *skb2 = skb_copy(skb, GFP_ATOMIC);
980                 if (skb2) {
981                         dn_rt_finish_output(skb2, dn_rt_all_end_mcast, src);
982                 }
983         }
984
985         dn_rt_finish_output(skb, dn_rt_all_rt_mcast, src);
986 }
987
988 static void dn_send_brd_hello(struct net_device *dev, struct dn_ifaddr *ifa)
989 {
990         struct dn_dev *dn_db = (struct dn_dev *)dev->dn_ptr;
991
992         if (dn_db->parms.forwarding == 0)
993                 dn_send_endnode_hello(dev, ifa);
994         else
995                 dn_send_router_hello(dev, ifa);
996 }
997
998 static void dn_send_ptp_hello(struct net_device *dev, struct dn_ifaddr *ifa)
999 {
1000         int tdlen = 16;
1001         int size = dev->hard_header_len + 2 + 4 + tdlen;
1002         struct sk_buff *skb = dn_alloc_skb(NULL, size, GFP_ATOMIC);
1003         int i;
1004         unsigned char *ptr;
1005         char src[ETH_ALEN];
1006
1007         if (skb == NULL)
1008                 return ;
1009
1010         skb->dev = dev;
1011         skb_push(skb, dev->hard_header_len);
1012         ptr = skb_put(skb, 2 + 4 + tdlen);
1013
1014         *ptr++ = DN_RT_PKT_HELO;
1015         *((dn_address *)ptr) = ifa->ifa_local;
1016         ptr += 2;
1017         *ptr++ = tdlen;
1018
1019         for(i = 0; i < tdlen; i++)
1020                 *ptr++ = 0252;
1021
1022         dn_dn2eth(src, ifa->ifa_local);
1023         dn_rt_finish_output(skb, dn_rt_all_rt_mcast, src);
1024 }
1025
1026 static int dn_eth_up(struct net_device *dev)
1027 {
1028         struct dn_dev *dn_db = dev->dn_ptr;
1029
1030         if (dn_db->parms.forwarding == 0)
1031                 dev_mc_add(dev, dn_rt_all_end_mcast, ETH_ALEN, 0);
1032         else
1033                 dev_mc_add(dev, dn_rt_all_rt_mcast, ETH_ALEN, 0);
1034
1035         dev_mc_upload(dev);
1036
1037         dn_db->use_long = 1;
1038
1039         return 0;
1040 }
1041
1042 static void dn_eth_down(struct net_device *dev)
1043 {
1044         struct dn_dev *dn_db = dev->dn_ptr;
1045
1046         if (dn_db->parms.forwarding == 0)
1047                 dev_mc_delete(dev, dn_rt_all_end_mcast, ETH_ALEN, 0);
1048         else
1049                 dev_mc_delete(dev, dn_rt_all_rt_mcast, ETH_ALEN, 0);
1050 }
1051
1052 static void dn_dev_set_timer(struct net_device *dev);
1053
1054 static void dn_dev_timer_func(unsigned long arg)
1055 {
1056         struct net_device *dev = (struct net_device *)arg;
1057         struct dn_dev *dn_db = dev->dn_ptr;
1058         struct dn_ifaddr *ifa;
1059
1060         if (dn_db->t3 <= dn_db->parms.t2) {
1061                 if (dn_db->parms.timer3) {
1062                         for(ifa = dn_db->ifa_list; ifa; ifa = ifa->ifa_next) {
1063                                 if (!(ifa->ifa_flags & IFA_F_SECONDARY))
1064                                         dn_db->parms.timer3(dev, ifa);
1065                         }
1066                 }
1067                 dn_db->t3 = dn_db->parms.t3;
1068         } else {
1069                 dn_db->t3 -= dn_db->parms.t2;
1070         }
1071
1072         dn_dev_set_timer(dev);
1073 }
1074
1075 static void dn_dev_set_timer(struct net_device *dev)
1076 {
1077         struct dn_dev *dn_db = dev->dn_ptr;
1078
1079         if (dn_db->parms.t2 > dn_db->parms.t3)
1080                 dn_db->parms.t2 = dn_db->parms.t3;
1081
1082         dn_db->timer.data = (unsigned long)dev;
1083         dn_db->timer.function = dn_dev_timer_func;
1084         dn_db->timer.expires = jiffies + (dn_db->parms.t2 * HZ);
1085
1086         add_timer(&dn_db->timer);
1087 }
1088
1089 struct dn_dev *dn_dev_create(struct net_device *dev, int *err)
1090 {
1091         int i;
1092         struct dn_dev_parms *p = dn_dev_list;
1093         struct dn_dev *dn_db;
1094
1095         for(i = 0; i < DN_DEV_LIST_SIZE; i++, p++) {
1096                 if (p->type == dev->type)
1097                         break;
1098         }
1099
1100         *err = -ENODEV;
1101         if (i == DN_DEV_LIST_SIZE)
1102                 return NULL;
1103
1104         *err = -ENOBUFS;
1105         if ((dn_db = kmalloc(sizeof(struct dn_dev), GFP_ATOMIC)) == NULL)
1106                 return NULL;
1107
1108         memset(dn_db, 0, sizeof(struct dn_dev));
1109         memcpy(&dn_db->parms, p, sizeof(struct dn_dev_parms));
1110         dev->dn_ptr = dn_db;
1111         dn_db->dev = dev;
1112         init_timer(&dn_db->timer);
1113
1114         dn_db->uptime = jiffies;
1115         if (dn_db->parms.up) {
1116                 if (dn_db->parms.up(dev) < 0) {
1117                         dev->dn_ptr = NULL;
1118                         kfree(dn_db);
1119                         return NULL;
1120                 }
1121         }
1122
1123         dn_db->neigh_parms = neigh_parms_alloc(dev, &dn_neigh_table);
1124
1125         dn_dev_sysctl_register(dev, &dn_db->parms);
1126
1127         dn_dev_set_timer(dev);
1128
1129         *err = 0;
1130         return dn_db;
1131 }
1132
1133
1134 /*
1135  * This processes a device up event. We only start up
1136  * the loopback device & ethernet devices with correct
1137  * MAC addreses automatically. Others must be started
1138  * specifically.
1139  *
1140  * FIXME: How should we configure the loopback address ? If we could dispense
1141  * with using decnet_address here and for autobind, it will be one less thing
1142  * for users to worry about setting up.
1143  */
1144
1145 void dn_dev_up(struct net_device *dev)
1146 {
1147         struct dn_ifaddr *ifa;
1148         dn_address addr = decnet_address;
1149         int maybe_default = 0;
1150         struct dn_dev *dn_db = (struct dn_dev *)dev->dn_ptr;
1151
1152         if ((dev->type != ARPHRD_ETHER) && (dev->type != ARPHRD_LOOPBACK))
1153                 return;
1154
1155         /*
1156          * Need to ensure that loopback device has a dn_db attached to it
1157          * to allow creation of neighbours against it, even though it might
1158          * not have a local address of its own. Might as well do the same for
1159          * all autoconfigured interfaces.
1160          */
1161         if (dn_db == NULL) {
1162                 int err;
1163                 dn_db = dn_dev_create(dev, &err);
1164                 if (dn_db == NULL)
1165                         return;
1166         }
1167
1168         if (dev->type == ARPHRD_ETHER) {
1169                 if (memcmp(dev->dev_addr, dn_hiord, 4) != 0)
1170                         return;
1171                 addr = dn_htons(dn_eth2dn(dev->dev_addr));
1172                 maybe_default = 1;
1173         }
1174
1175         if (addr == 0)
1176                 return;
1177
1178         if ((ifa = dn_dev_alloc_ifa()) == NULL)
1179                 return;
1180
1181         ifa->ifa_local = ifa->ifa_address = addr;
1182         ifa->ifa_flags = 0;
1183         ifa->ifa_scope = RT_SCOPE_UNIVERSE;
1184         strcpy(ifa->ifa_label, dev->name);
1185
1186         dn_dev_set_ifa(dev, ifa);
1187
1188         /*
1189          * Automagically set the default device to the first automatically
1190          * configured ethernet card in the system.
1191          */
1192         if (maybe_default) {
1193                 dev_hold(dev);
1194                 if (dn_dev_set_default(dev, 0))
1195                         dev_put(dev);
1196         }
1197 }
1198
1199 static void dn_dev_delete(struct net_device *dev)
1200 {
1201         struct dn_dev *dn_db = dev->dn_ptr;
1202
1203         if (dn_db == NULL)
1204                 return;
1205
1206         del_timer_sync(&dn_db->timer);
1207         dn_dev_sysctl_unregister(&dn_db->parms);
1208         dn_dev_check_default(dev);
1209         neigh_ifdown(&dn_neigh_table, dev);
1210
1211         if (dn_db->parms.down)
1212                 dn_db->parms.down(dev);
1213
1214         dev->dn_ptr = NULL;
1215
1216         neigh_parms_release(&dn_neigh_table, dn_db->neigh_parms);
1217
1218         if (dn_db->router)
1219                 neigh_release(dn_db->router);
1220         if (dn_db->peer)
1221                 neigh_release(dn_db->peer);
1222
1223         kfree(dn_db);
1224 }
1225
1226 void dn_dev_down(struct net_device *dev)
1227 {
1228         struct dn_dev *dn_db = dev->dn_ptr;
1229         struct dn_ifaddr *ifa;
1230
1231         if (dn_db == NULL)
1232                 return;
1233
1234         while((ifa = dn_db->ifa_list) != NULL) {
1235                 dn_dev_del_ifa(dn_db, &dn_db->ifa_list, 0);
1236                 dn_dev_free_ifa(ifa);
1237         }
1238
1239         dn_dev_delete(dev);
1240 }
1241
1242 void dn_dev_init_pkt(struct sk_buff *skb)
1243 {
1244         return;
1245 }
1246
1247 void dn_dev_veri_pkt(struct sk_buff *skb)
1248 {
1249         return;
1250 }
1251
1252 void dn_dev_hello(struct sk_buff *skb)
1253 {
1254         return;
1255 }
1256
1257 void dn_dev_devices_off(void)
1258 {
1259         struct net_device *dev;
1260
1261         rtnl_lock();
1262         for(dev = dev_base; dev; dev = dev->next)
1263                 dn_dev_down(dev);
1264         rtnl_unlock();
1265
1266 }
1267
1268 void dn_dev_devices_on(void)
1269 {
1270         struct net_device *dev;
1271
1272         rtnl_lock();
1273         for(dev = dev_base; dev; dev = dev->next) {
1274                 if (dev->flags & IFF_UP)
1275                         dn_dev_up(dev);
1276         }
1277         rtnl_unlock();
1278 }
1279
1280 int register_dnaddr_notifier(struct notifier_block *nb)
1281 {
1282         return notifier_chain_register(&dnaddr_chain, nb);
1283 }
1284
1285 int unregister_dnaddr_notifier(struct notifier_block *nb)
1286 {
1287         return notifier_chain_unregister(&dnaddr_chain, nb);
1288 }
1289
1290 #ifdef CONFIG_DECNET_SIOCGIFCONF
1291 /*
1292  * Now we support multiple addresses per interface.
1293  * Since we don't want to break existing code, you have to enable
1294  * it as a compile time option. Probably you should use the
1295  * rtnetlink interface instead.
1296  */
1297 int dnet_gifconf(struct net_device *dev, char __user *buf, int len)
1298 {
1299         struct dn_dev *dn_db = (struct dn_dev *)dev->dn_ptr;
1300         struct dn_ifaddr *ifa;
1301         char buffer[DN_IFREQ_SIZE];
1302         struct ifreq *ifr = (struct ifreq *)buffer;
1303         struct sockaddr_dn *addr = (struct sockaddr_dn *)&ifr->ifr_addr;
1304         int done = 0;
1305
1306         if ((dn_db == NULL) || ((ifa = dn_db->ifa_list) == NULL))
1307                 return 0;
1308
1309         for(; ifa; ifa = ifa->ifa_next) {
1310                 if (!buf) {
1311                         done += sizeof(DN_IFREQ_SIZE);
1312                         continue;
1313                 }
1314                 if (len < DN_IFREQ_SIZE)
1315                         return done;
1316                 memset(buffer, 0, DN_IFREQ_SIZE);
1317
1318                 if (ifa->ifa_label)
1319                         strcpy(ifr->ifr_name, ifa->ifa_label);
1320                 else
1321                         strcpy(ifr->ifr_name, dev->name);
1322
1323                 addr->sdn_family = AF_DECnet;
1324                 addr->sdn_add.a_len = 2;
1325                 memcpy(addr->sdn_add.a_addr, &ifa->ifa_local,
1326                         sizeof(dn_address));
1327
1328                 if (copy_to_user(buf, buffer, DN_IFREQ_SIZE)) {
1329                         done = -EFAULT;
1330                         break;
1331                 }
1332
1333                 buf  += DN_IFREQ_SIZE;
1334                 len  -= DN_IFREQ_SIZE;
1335                 done += DN_IFREQ_SIZE;
1336         }
1337
1338         return done;
1339 }
1340 #endif /* CONFIG_DECNET_SIOCGIFCONF */
1341
1342
1343 #ifdef CONFIG_PROC_FS
1344 static inline struct net_device *dn_dev_get_next(struct seq_file *seq, struct net_device *dev)
1345 {
1346         do {
1347                 dev = dev->next;
1348         } while(dev && !dev->dn_ptr);
1349
1350         return dev;
1351 }
1352
1353 static struct net_device *dn_dev_get_idx(struct seq_file *seq, loff_t pos)
1354 {
1355         struct net_device *dev;
1356
1357         dev = dev_base;
1358         if (dev && !dev->dn_ptr)
1359                 dev = dn_dev_get_next(seq, dev);
1360         if (pos) {
1361                 while(dev && (dev = dn_dev_get_next(seq, dev)))
1362                         --pos;
1363         }
1364         return dev;
1365 }
1366
1367 static void *dn_dev_seq_start(struct seq_file *seq, loff_t *pos)
1368 {
1369         if (*pos) {
1370                 struct net_device *dev;
1371                 read_lock(&dev_base_lock);
1372                 dev = dn_dev_get_idx(seq, *pos - 1);
1373                 if (dev == NULL)
1374                         read_unlock(&dev_base_lock);
1375                 return dev;
1376         }
1377         return SEQ_START_TOKEN;
1378 }
1379
1380 static void *dn_dev_seq_next(struct seq_file *seq, void *v, loff_t *pos)
1381 {
1382         struct net_device *dev = v;
1383         loff_t one = 1;
1384
1385         if (v == SEQ_START_TOKEN) {
1386                 dev = dn_dev_seq_start(seq, &one);
1387         } else {
1388                 dev = dn_dev_get_next(seq, dev);
1389                 if (dev == NULL)
1390                         read_unlock(&dev_base_lock);
1391         }
1392         ++*pos;
1393         return dev;
1394 }
1395
1396 static void dn_dev_seq_stop(struct seq_file *seq, void *v)
1397 {
1398         if (v && v != SEQ_START_TOKEN)
1399                 read_unlock(&dev_base_lock);
1400 }
1401
1402 static char *dn_type2asc(char type)
1403 {
1404         switch(type) {
1405                 case DN_DEV_BCAST:
1406                         return "B";
1407                 case DN_DEV_UCAST:
1408                         return "U";
1409                 case DN_DEV_MPOINT:
1410                         return "M";
1411         }
1412
1413         return "?";
1414 }
1415
1416 static int dn_dev_seq_show(struct seq_file *seq, void *v)
1417 {
1418         if (v == SEQ_START_TOKEN)
1419                 seq_puts(seq, "Name     Flags T1   Timer1 T3   Timer3 BlkSize Pri State DevType    Router Peer\n");
1420         else {
1421                 struct net_device *dev = v;
1422                 char peer_buf[DN_ASCBUF_LEN];
1423                 char router_buf[DN_ASCBUF_LEN];
1424                 struct dn_dev *dn_db = dev->dn_ptr;
1425
1426                 seq_printf(seq, "%-8s %1s     %04u %04u   %04lu %04lu"
1427                                 "   %04hu    %03d %02x    %-10s %-7s %-7s\n",
1428                                 dev->name ? dev->name : "???",
1429                                 dn_type2asc(dn_db->parms.mode),
1430                                 0, 0,
1431                                 dn_db->t3, dn_db->parms.t3,
1432                                 mtu2blksize(dev),
1433                                 dn_db->parms.priority,
1434                                 dn_db->parms.state, dn_db->parms.name,
1435                                 dn_db->router ? dn_addr2asc(dn_ntohs(*(dn_address *)dn_db->router->primary_key), router_buf) : "",
1436                                 dn_db->peer ? dn_addr2asc(dn_ntohs(*(dn_address *)dn_db->peer->primary_key), peer_buf) : "");
1437         }
1438         return 0;
1439 }
1440
1441 static struct seq_operations dn_dev_seq_ops = {
1442         .start  = dn_dev_seq_start,
1443         .next   = dn_dev_seq_next,
1444         .stop   = dn_dev_seq_stop,
1445         .show   = dn_dev_seq_show,
1446 };
1447
1448 static int dn_dev_seq_open(struct inode *inode, struct file *file)
1449 {
1450         return seq_open(file, &dn_dev_seq_ops);
1451 }
1452
1453 static struct file_operations dn_dev_seq_fops = {
1454         .owner   = THIS_MODULE,
1455         .open    = dn_dev_seq_open,
1456         .read    = seq_read,
1457         .llseek  = seq_lseek,
1458         .release = seq_release,
1459 };
1460
1461 #endif /* CONFIG_PROC_FS */
1462
1463 static struct rtnetlink_link dnet_rtnetlink_table[RTM_MAX-RTM_BASE+1] = 
1464 {
1465          [4] = { .doit   = dn_dev_rtm_newaddr,  },
1466          [5] = { .doit   = dn_dev_rtm_deladdr,  },
1467          [6] = { .dumpit = dn_dev_dump_ifaddr,  },
1468
1469 #ifdef CONFIG_DECNET_ROUTER
1470          [8] = { .doit   = dn_fib_rtm_newroute, },
1471          [9] = { .doit   = dn_fib_rtm_delroute, },
1472         [10] = { .doit   = dn_cache_getroute, .dumpit = dn_fib_dump, },
1473         [16] = { .doit   = dn_fib_rtm_newrule, },
1474         [17] = { .doit   = dn_fib_rtm_delrule, },
1475         [18] = { .dumpit = dn_fib_dump_rules,  },
1476 #else
1477         [10] = { .doit   = dn_cache_getroute, .dumpit = dn_cache_dump, },
1478 #endif
1479
1480 };
1481
1482 static int __initdata addr[2];
1483 static int __initdata num;
1484 module_param_array(addr, int, num, 0444);
1485 MODULE_PARM_DESC(addr, "The DECnet address of this machine: area,node");
1486
1487 void __init dn_dev_init(void)
1488 {
1489         if (addr[0] > 63 || addr[0] < 0) {
1490                 printk(KERN_ERR "DECnet: Area must be between 0 and 63");
1491                 return;
1492         }
1493
1494         if (addr[1] > 1023 || addr[1] < 0) {
1495                 printk(KERN_ERR "DECnet: Node must be between 0 and 1023");
1496                 return;
1497         }
1498
1499         decnet_address = dn_htons((addr[0] << 10) | addr[1]);
1500
1501         dn_dev_devices_on();
1502 #ifdef CONFIG_DECNET_SIOCGIFCONF
1503         register_gifconf(PF_DECnet, dnet_gifconf);
1504 #endif /* CONFIG_DECNET_SIOCGIFCONF */
1505
1506         rtnetlink_links[PF_DECnet] = dnet_rtnetlink_table;
1507
1508         proc_net_fops_create("decnet_dev", S_IRUGO, &dn_dev_seq_fops);
1509
1510 #ifdef CONFIG_SYSCTL
1511         {
1512                 int i;
1513                 for(i = 0; i < DN_DEV_LIST_SIZE; i++)
1514                         dn_dev_sysctl_register(NULL, &dn_dev_list[i]);
1515         }
1516 #endif /* CONFIG_SYSCTL */
1517 }
1518
1519 void __exit dn_dev_cleanup(void)
1520 {
1521         rtnetlink_links[PF_DECnet] = NULL;
1522
1523 #ifdef CONFIG_DECNET_SIOCGIFCONF
1524         unregister_gifconf(PF_DECnet);
1525 #endif /* CONFIG_DECNET_SIOCGIFCONF */
1526
1527 #ifdef CONFIG_SYSCTL
1528         {
1529                 int i;
1530                 for(i = 0; i < DN_DEV_LIST_SIZE; i++)
1531                         dn_dev_sysctl_unregister(&dn_dev_list[i]);
1532         }
1533 #endif /* CONFIG_SYSCTL */
1534
1535         proc_net_remove("decnet_dev");
1536
1537         dn_dev_devices_off();
1538 }