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