Merge branch 'for-linus' of git://git390.osdl.marist.edu/pub/scm/linux-2.6
[linux-2.6] / drivers / net / wan / hdlc.c
1 /*
2  * Generic HDLC support routines for Linux
3  *
4  * Copyright (C) 1999 - 2006 Krzysztof Halasa <khc@pm.waw.pl>
5  *
6  * This program is free software; you can redistribute it and/or modify it
7  * under the terms of version 2 of the GNU General Public License
8  * as published by the Free Software Foundation.
9  *
10  * Currently supported:
11  *      * raw IP-in-HDLC
12  *      * Cisco HDLC
13  *      * Frame Relay with ANSI or CCITT LMI (both user and network side)
14  *      * PPP
15  *      * X.25
16  *
17  * Use sethdlc utility to set line parameters, protocol and PVCs
18  *
19  * How does it work:
20  * - proto->open(), close(), start(), stop() calls are serialized.
21  *   The order is: open, [ start, stop ... ] close ...
22  * - proto->start() and stop() are called with spin_lock_irq held.
23  */
24
25 #include <linux/module.h>
26 #include <linux/kernel.h>
27 #include <linux/slab.h>
28 #include <linux/poll.h>
29 #include <linux/errno.h>
30 #include <linux/if_arp.h>
31 #include <linux/init.h>
32 #include <linux/skbuff.h>
33 #include <linux/pkt_sched.h>
34 #include <linux/inetdevice.h>
35 #include <linux/lapb.h>
36 #include <linux/rtnetlink.h>
37 #include <linux/notifier.h>
38 #include <linux/hdlc.h>
39
40
41 static const char* version = "HDLC support module revision 1.21";
42
43 #undef DEBUG_LINK
44
45 static struct hdlc_proto *first_proto = NULL;
46
47
48 static int hdlc_change_mtu(struct net_device *dev, int new_mtu)
49 {
50         if ((new_mtu < 68) || (new_mtu > HDLC_MAX_MTU))
51                 return -EINVAL;
52         dev->mtu = new_mtu;
53         return 0;
54 }
55
56
57
58 static struct net_device_stats *hdlc_get_stats(struct net_device *dev)
59 {
60         return hdlc_stats(dev);
61 }
62
63
64
65 static int hdlc_rcv(struct sk_buff *skb, struct net_device *dev,
66                     struct packet_type *p, struct net_device *orig_dev)
67 {
68         struct hdlc_device_desc *desc = dev_to_desc(dev);
69         if (desc->netif_rx)
70                 return desc->netif_rx(skb);
71
72         desc->stats.rx_dropped++; /* Shouldn't happen */
73         dev_kfree_skb(skb);
74         return NET_RX_DROP;
75 }
76
77
78
79 static inline void hdlc_proto_start(struct net_device *dev)
80 {
81         hdlc_device *hdlc = dev_to_hdlc(dev);
82         if (hdlc->proto->start)
83                 return hdlc->proto->start(dev);
84 }
85
86
87
88 static inline void hdlc_proto_stop(struct net_device *dev)
89 {
90         hdlc_device *hdlc = dev_to_hdlc(dev);
91         if (hdlc->proto->stop)
92                 return hdlc->proto->stop(dev);
93 }
94
95
96
97 static int hdlc_device_event(struct notifier_block *this, unsigned long event,
98                              void *ptr)
99 {
100         struct net_device *dev = ptr;
101         hdlc_device *hdlc;
102         unsigned long flags;
103         int on;
104  
105         if (dev->get_stats != hdlc_get_stats)
106                 return NOTIFY_DONE; /* not an HDLC device */
107  
108         if (event != NETDEV_CHANGE)
109                 return NOTIFY_DONE; /* Only interrested in carrier changes */
110
111         on = netif_carrier_ok(dev);
112
113 #ifdef DEBUG_LINK
114         printk(KERN_DEBUG "%s: hdlc_device_event NETDEV_CHANGE, carrier %i\n",
115                dev->name, on);
116 #endif
117
118         hdlc = dev_to_hdlc(dev);
119         spin_lock_irqsave(&hdlc->state_lock, flags);
120
121         if (hdlc->carrier == on)
122                 goto carrier_exit; /* no change in DCD line level */
123
124         hdlc->carrier = on;
125
126         if (!hdlc->open)
127                 goto carrier_exit;
128
129         if (hdlc->carrier) {
130                 printk(KERN_INFO "%s: Carrier detected\n", dev->name);
131                 hdlc_proto_start(dev);
132         } else {
133                 printk(KERN_INFO "%s: Carrier lost\n", dev->name);
134                 hdlc_proto_stop(dev);
135         }
136
137 carrier_exit:
138         spin_unlock_irqrestore(&hdlc->state_lock, flags);
139         return NOTIFY_DONE;
140 }
141
142
143
144 /* Must be called by hardware driver when HDLC device is being opened */
145 int hdlc_open(struct net_device *dev)
146 {
147         hdlc_device *hdlc = dev_to_hdlc(dev);
148 #ifdef DEBUG_LINK
149         printk(KERN_DEBUG "%s: hdlc_open() carrier %i open %i\n", dev->name,
150                hdlc->carrier, hdlc->open);
151 #endif
152
153         if (hdlc->proto == NULL)
154                 return -ENOSYS; /* no protocol attached */
155
156         if (hdlc->proto->open) {
157                 int result = hdlc->proto->open(dev);
158                 if (result)
159                         return result;
160         }
161
162         spin_lock_irq(&hdlc->state_lock);
163
164         if (hdlc->carrier) {
165                 printk(KERN_INFO "%s: Carrier detected\n", dev->name);
166                 hdlc_proto_start(dev);
167         } else
168                 printk(KERN_INFO "%s: No carrier\n", dev->name);
169
170         hdlc->open = 1;
171
172         spin_unlock_irq(&hdlc->state_lock);
173         return 0;
174 }
175
176
177
178 /* Must be called by hardware driver when HDLC device is being closed */
179 void hdlc_close(struct net_device *dev)
180 {
181         hdlc_device *hdlc = dev_to_hdlc(dev);
182 #ifdef DEBUG_LINK
183         printk(KERN_DEBUG "%s: hdlc_close() carrier %i open %i\n", dev->name,
184                hdlc->carrier, hdlc->open);
185 #endif
186
187         spin_lock_irq(&hdlc->state_lock);
188
189         hdlc->open = 0;
190         if (hdlc->carrier)
191                 hdlc_proto_stop(dev);
192
193         spin_unlock_irq(&hdlc->state_lock);
194
195         if (hdlc->proto->close)
196                 hdlc->proto->close(dev);
197 }
198
199
200
201 int hdlc_ioctl(struct net_device *dev, struct ifreq *ifr, int cmd)
202 {
203         struct hdlc_proto *proto = first_proto;
204         int result;
205
206         if (cmd != SIOCWANDEV)
207                 return -EINVAL;
208
209         if (dev_to_hdlc(dev)->proto) {
210                 result = dev_to_hdlc(dev)->proto->ioctl(dev, ifr);
211                 if (result != -EINVAL)
212                         return result;
213         }
214
215         /* Not handled by currently attached protocol (if any) */
216
217         while (proto) {
218                 if ((result = proto->ioctl(dev, ifr)) != -EINVAL)
219                         return result;
220                 proto = proto->next;
221         }
222         return -EINVAL;
223 }
224
225 static void hdlc_setup_dev(struct net_device *dev)
226 {
227         /* Re-init all variables changed by HDLC protocol drivers,
228          * including ether_setup() called from hdlc_raw_eth.c.
229          */
230         dev->get_stats           = hdlc_get_stats;
231         dev->flags               = IFF_POINTOPOINT | IFF_NOARP;
232         dev->mtu                 = HDLC_MAX_MTU;
233         dev->type                = ARPHRD_RAWHDLC;
234         dev->hard_header_len     = 16;
235         dev->addr_len            = 0;
236         dev->hard_header         = NULL;
237         dev->rebuild_header      = NULL;
238         dev->set_mac_address     = NULL;
239         dev->hard_header_cache   = NULL;
240         dev->header_cache_update = NULL;
241         dev->change_mtu          = hdlc_change_mtu;
242         dev->hard_header_parse   = NULL;
243 }
244
245 static void hdlc_setup(struct net_device *dev)
246 {
247         hdlc_device *hdlc = dev_to_hdlc(dev);
248
249         hdlc_setup_dev(dev);
250         hdlc->carrier = 1;
251         hdlc->open = 0;
252         spin_lock_init(&hdlc->state_lock);
253 }
254
255 struct net_device *alloc_hdlcdev(void *priv)
256 {
257         struct net_device *dev;
258         dev = alloc_netdev(sizeof(struct hdlc_device_desc) +
259                            sizeof(hdlc_device), "hdlc%d", hdlc_setup);
260         if (dev)
261                 dev_to_hdlc(dev)->priv = priv;
262         return dev;
263 }
264
265 void unregister_hdlc_device(struct net_device *dev)
266 {
267         rtnl_lock();
268         unregister_netdevice(dev);
269         detach_hdlc_protocol(dev);
270         rtnl_unlock();
271 }
272
273
274
275 int attach_hdlc_protocol(struct net_device *dev, struct hdlc_proto *proto,
276                          int (*rx)(struct sk_buff *skb), size_t size)
277 {
278         detach_hdlc_protocol(dev);
279
280         if (!try_module_get(proto->module))
281                 return -ENOSYS;
282
283         if (size)
284                 if ((dev_to_hdlc(dev)->state = kmalloc(size,
285                                                        GFP_KERNEL)) == NULL) {
286                         printk(KERN_WARNING "Memory squeeze on"
287                                " hdlc_proto_attach()\n");
288                         module_put(proto->module);
289                         return -ENOBUFS;
290                 }
291         dev_to_hdlc(dev)->proto = proto;
292         dev_to_desc(dev)->netif_rx = rx;
293         return 0;
294 }
295
296
297 void detach_hdlc_protocol(struct net_device *dev)
298 {
299         hdlc_device *hdlc = dev_to_hdlc(dev);
300
301         if (hdlc->proto) {
302                 if (hdlc->proto->detach)
303                         hdlc->proto->detach(dev);
304                 module_put(hdlc->proto->module);
305                 hdlc->proto = NULL;
306         }
307         kfree(hdlc->state);
308         hdlc->state = NULL;
309         hdlc_setup_dev(dev);
310 }
311
312
313 void register_hdlc_protocol(struct hdlc_proto *proto)
314 {
315         proto->next = first_proto;
316         first_proto = proto;
317 }
318
319
320 void unregister_hdlc_protocol(struct hdlc_proto *proto)
321 {
322         struct hdlc_proto **p = &first_proto;
323         while (*p) {
324                 if (*p == proto) {
325                         *p = proto->next;
326                         return;
327                 }
328                 p = &((*p)->next);
329         }
330 }
331
332
333
334 MODULE_AUTHOR("Krzysztof Halasa <khc@pm.waw.pl>");
335 MODULE_DESCRIPTION("HDLC support module");
336 MODULE_LICENSE("GPL v2");
337
338 EXPORT_SYMBOL(hdlc_open);
339 EXPORT_SYMBOL(hdlc_close);
340 EXPORT_SYMBOL(hdlc_ioctl);
341 EXPORT_SYMBOL(alloc_hdlcdev);
342 EXPORT_SYMBOL(unregister_hdlc_device);
343 EXPORT_SYMBOL(register_hdlc_protocol);
344 EXPORT_SYMBOL(unregister_hdlc_protocol);
345 EXPORT_SYMBOL(attach_hdlc_protocol);
346 EXPORT_SYMBOL(detach_hdlc_protocol);
347
348 static struct packet_type hdlc_packet_type = {
349         .type = __constant_htons(ETH_P_HDLC),
350         .func = hdlc_rcv,
351 };
352
353
354 static struct notifier_block hdlc_notifier = {
355         .notifier_call = hdlc_device_event,
356 };
357
358
359 static int __init hdlc_module_init(void)
360 {
361         int result;
362
363         printk(KERN_INFO "%s\n", version);
364         if ((result = register_netdevice_notifier(&hdlc_notifier)) != 0)
365                 return result;
366         dev_add_pack(&hdlc_packet_type);
367         return 0;
368 }
369
370
371
372 static void __exit hdlc_module_exit(void)
373 {
374         dev_remove_pack(&hdlc_packet_type);
375         unregister_netdevice_notifier(&hdlc_notifier);
376 }
377
378
379 module_init(hdlc_module_init);
380 module_exit(hdlc_module_exit);