[ALSA] emu10k1 - Fix missing declarations
[linux-2.6/linux-acpi-2.6/ibm-acpi-2.6.git] / net / atm / lec.c
blobad840b9afba8a3a68e644a682f9bf6499e38d765
1 /*
2 * lec.c: Lan Emulation driver
3 * Marko Kiiskila mkiiskila@yahoo.com
5 */
7 #include <linux/config.h>
8 #include <linux/kernel.h>
9 #include <linux/bitops.h>
11 /* We are ethernet device */
12 #include <linux/if_ether.h>
13 #include <linux/netdevice.h>
14 #include <linux/etherdevice.h>
15 #include <net/sock.h>
16 #include <linux/skbuff.h>
17 #include <linux/ip.h>
18 #include <asm/byteorder.h>
19 #include <asm/uaccess.h>
20 #include <net/arp.h>
21 #include <net/dst.h>
22 #include <linux/proc_fs.h>
23 #include <linux/spinlock.h>
24 #include <linux/proc_fs.h>
25 #include <linux/seq_file.h>
27 /* TokenRing if needed */
28 #ifdef CONFIG_TR
29 #include <linux/trdevice.h>
30 #endif
32 /* And atm device */
33 #include <linux/atmdev.h>
34 #include <linux/atmlec.h>
36 /* Proxy LEC knows about bridging */
37 #if defined(CONFIG_BRIDGE) || defined(CONFIG_BRIDGE_MODULE)
38 #include <linux/if_bridge.h>
39 #include "../bridge/br_private.h"
41 static unsigned char bridge_ula_lec[] = {0x01, 0x80, 0xc2, 0x00, 0x00};
42 #endif
44 /* Modular too */
45 #include <linux/module.h>
46 #include <linux/init.h>
48 #include "lec.h"
49 #include "lec_arpc.h"
50 #include "resources.h"
52 #if 0
53 #define DPRINTK printk
54 #else
55 #define DPRINTK(format,args...)
56 #endif
58 #define DUMP_PACKETS 0 /* 0 = None,
59 * 1 = 30 first bytes
60 * 2 = Whole packet
63 #define LEC_UNRES_QUE_LEN 8 /* number of tx packets to queue for a
64 single destination while waiting for SVC */
66 static int lec_open(struct net_device *dev);
67 static int lec_start_xmit(struct sk_buff *skb, struct net_device *dev);
68 static int lec_close(struct net_device *dev);
69 static struct net_device_stats *lec_get_stats(struct net_device *dev);
70 static void lec_init(struct net_device *dev);
71 static struct lec_arp_table* lec_arp_find(struct lec_priv *priv,
72 unsigned char *mac_addr);
73 static int lec_arp_remove(struct lec_priv *priv,
74 struct lec_arp_table *to_remove);
75 /* LANE2 functions */
76 static void lane2_associate_ind (struct net_device *dev, u8 *mac_address,
77 u8 *tlvs, u32 sizeoftlvs);
78 static int lane2_resolve(struct net_device *dev, u8 *dst_mac, int force,
79 u8 **tlvs, u32 *sizeoftlvs);
80 static int lane2_associate_req (struct net_device *dev, u8 *lan_dst,
81 u8 *tlvs, u32 sizeoftlvs);
83 static int lec_addr_delete(struct lec_priv *priv, unsigned char *atm_addr,
84 unsigned long permanent);
85 static void lec_arp_check_empties(struct lec_priv *priv,
86 struct atm_vcc *vcc, struct sk_buff *skb);
87 static void lec_arp_destroy(struct lec_priv *priv);
88 static void lec_arp_init(struct lec_priv *priv);
89 static struct atm_vcc* lec_arp_resolve(struct lec_priv *priv,
90 unsigned char *mac_to_find,
91 int is_rdesc,
92 struct lec_arp_table **ret_entry);
93 static void lec_arp_update(struct lec_priv *priv, unsigned char *mac_addr,
94 unsigned char *atm_addr, unsigned long remoteflag,
95 unsigned int targetless_le_arp);
96 static void lec_flush_complete(struct lec_priv *priv, unsigned long tran_id);
97 static int lec_mcast_make(struct lec_priv *priv, struct atm_vcc *vcc);
98 static void lec_set_flush_tran_id(struct lec_priv *priv,
99 unsigned char *atm_addr,
100 unsigned long tran_id);
101 static void lec_vcc_added(struct lec_priv *priv, struct atmlec_ioc *ioc_data,
102 struct atm_vcc *vcc,
103 void (*old_push)(struct atm_vcc *vcc, struct sk_buff *skb));
104 static void lec_vcc_close(struct lec_priv *priv, struct atm_vcc *vcc);
106 static struct lane2_ops lane2_ops = {
107 lane2_resolve, /* resolve, spec 3.1.3 */
108 lane2_associate_req, /* associate_req, spec 3.1.4 */
109 NULL /* associate indicator, spec 3.1.5 */
112 static unsigned char bus_mac[ETH_ALEN] = {0xff,0xff,0xff,0xff,0xff,0xff};
114 /* Device structures */
115 static struct net_device *dev_lec[MAX_LEC_ITF];
117 #if defined(CONFIG_BRIDGE) || defined(CONFIG_BRIDGE_MODULE)
118 static void lec_handle_bridge(struct sk_buff *skb, struct net_device *dev)
120 struct ethhdr *eth;
121 char *buff;
122 struct lec_priv *priv;
124 /* Check if this is a BPDU. If so, ask zeppelin to send
125 * LE_TOPOLOGY_REQUEST with the same value of Topology Change bit
126 * as the Config BPDU has */
127 eth = (struct ethhdr *)skb->data;
128 buff = skb->data + skb->dev->hard_header_len;
129 if (*buff++ == 0x42 && *buff++ == 0x42 && *buff++ == 0x03) {
130 struct sock *sk;
131 struct sk_buff *skb2;
132 struct atmlec_msg *mesg;
134 skb2 = alloc_skb(sizeof(struct atmlec_msg), GFP_ATOMIC);
135 if (skb2 == NULL) return;
136 skb2->len = sizeof(struct atmlec_msg);
137 mesg = (struct atmlec_msg *)skb2->data;
138 mesg->type = l_topology_change;
139 buff += 4;
140 mesg->content.normal.flag = *buff & 0x01; /* 0x01 is topology change */
142 priv = (struct lec_priv *)dev->priv;
143 atm_force_charge(priv->lecd, skb2->truesize);
144 sk = sk_atm(priv->lecd);
145 skb_queue_tail(&sk->sk_receive_queue, skb2);
146 sk->sk_data_ready(sk, skb2->len);
149 return;
151 #endif /* defined(CONFIG_BRIDGE) || defined(CONFIG_BRIDGE_MODULE) */
154 * Modelled after tr_type_trans
155 * All multicast and ARE or STE frames go to BUS.
156 * Non source routed frames go by destination address.
157 * Last hop source routed frames go by destination address.
158 * Not last hop source routed frames go by _next_ route descriptor.
159 * Returns pointer to destination MAC address or fills in rdesc
160 * and returns NULL.
162 #ifdef CONFIG_TR
163 static unsigned char *get_tr_dst(unsigned char *packet, unsigned char *rdesc)
165 struct trh_hdr *trh;
166 int riflen, num_rdsc;
168 trh = (struct trh_hdr *)packet;
169 if (trh->daddr[0] & (uint8_t)0x80)
170 return bus_mac; /* multicast */
172 if (trh->saddr[0] & TR_RII) {
173 riflen = (ntohs(trh->rcf) & TR_RCF_LEN_MASK) >> 8;
174 if ((ntohs(trh->rcf) >> 13) != 0)
175 return bus_mac; /* ARE or STE */
177 else
178 return trh->daddr; /* not source routed */
180 if (riflen < 6)
181 return trh->daddr; /* last hop, source routed */
183 /* riflen is 6 or more, packet has more than one route descriptor */
184 num_rdsc = (riflen/2) - 1;
185 memset(rdesc, 0, ETH_ALEN);
186 /* offset 4 comes from LAN destination field in LE control frames */
187 if (trh->rcf & htons((uint16_t)TR_RCF_DIR_BIT))
188 memcpy(&rdesc[4], &trh->rseg[num_rdsc-2], sizeof(uint16_t));
189 else {
190 memcpy(&rdesc[4], &trh->rseg[1], sizeof(uint16_t));
191 rdesc[5] = ((ntohs(trh->rseg[0]) & 0x000f) | (rdesc[5] & 0xf0));
194 return NULL;
196 #endif /* CONFIG_TR */
199 * Open/initialize the netdevice. This is called (in the current kernel)
200 * sometime after booting when the 'ifconfig' program is run.
202 * This routine should set everything up anew at each open, even
203 * registers that "should" only need to be set once at boot, so that
204 * there is non-reboot way to recover if something goes wrong.
207 static int
208 lec_open(struct net_device *dev)
210 struct lec_priv *priv = (struct lec_priv *)dev->priv;
212 netif_start_queue(dev);
213 memset(&priv->stats,0,sizeof(struct net_device_stats));
215 return 0;
218 static __inline__ void
219 lec_send(struct atm_vcc *vcc, struct sk_buff *skb, struct lec_priv *priv)
221 ATM_SKB(skb)->vcc = vcc;
222 ATM_SKB(skb)->atm_options = vcc->atm_options;
224 atomic_add(skb->truesize, &sk_atm(vcc)->sk_wmem_alloc);
225 if (vcc->send(vcc, skb) < 0) {
226 priv->stats.tx_dropped++;
227 return;
230 priv->stats.tx_packets++;
231 priv->stats.tx_bytes += skb->len;
234 static void
235 lec_tx_timeout(struct net_device *dev)
237 printk(KERN_INFO "%s: tx timeout\n", dev->name);
238 dev->trans_start = jiffies;
239 netif_wake_queue(dev);
242 static int
243 lec_start_xmit(struct sk_buff *skb, struct net_device *dev)
245 struct sk_buff *skb2;
246 struct lec_priv *priv = (struct lec_priv *)dev->priv;
247 struct lecdatahdr_8023 *lec_h;
248 struct atm_vcc *vcc;
249 struct lec_arp_table *entry;
250 unsigned char *dst;
251 int min_frame_size;
252 #ifdef CONFIG_TR
253 unsigned char rdesc[ETH_ALEN]; /* Token Ring route descriptor */
254 #endif
255 int is_rdesc;
256 #if DUMP_PACKETS > 0
257 char buf[300];
258 int i=0;
259 #endif /* DUMP_PACKETS >0 */
261 DPRINTK("lec_start_xmit called\n");
262 if (!priv->lecd) {
263 printk("%s:No lecd attached\n",dev->name);
264 priv->stats.tx_errors++;
265 netif_stop_queue(dev);
266 return -EUNATCH;
269 DPRINTK("skbuff head:%lx data:%lx tail:%lx end:%lx\n",
270 (long)skb->head, (long)skb->data, (long)skb->tail,
271 (long)skb->end);
272 #if defined(CONFIG_BRIDGE) || defined(CONFIG_BRIDGE_MODULE)
273 if (memcmp(skb->data, bridge_ula_lec, sizeof(bridge_ula_lec)) == 0)
274 lec_handle_bridge(skb, dev);
275 #endif
277 /* Make sure we have room for lec_id */
278 if (skb_headroom(skb) < 2) {
280 DPRINTK("lec_start_xmit: reallocating skb\n");
281 skb2 = skb_realloc_headroom(skb, LEC_HEADER_LEN);
282 kfree_skb(skb);
283 if (skb2 == NULL) return 0;
284 skb = skb2;
286 skb_push(skb, 2);
288 /* Put le header to place, works for TokenRing too */
289 lec_h = (struct lecdatahdr_8023*)skb->data;
290 lec_h->le_header = htons(priv->lecid);
292 #ifdef CONFIG_TR
293 /* Ugly. Use this to realign Token Ring packets for
294 * e.g. PCA-200E driver. */
295 if (priv->is_trdev) {
296 skb2 = skb_realloc_headroom(skb, LEC_HEADER_LEN);
297 kfree_skb(skb);
298 if (skb2 == NULL) return 0;
299 skb = skb2;
301 #endif
303 #if DUMP_PACKETS > 0
304 printk("%s: send datalen:%ld lecid:%4.4x\n", dev->name,
305 skb->len, priv->lecid);
306 #if DUMP_PACKETS >= 2
307 for(i=0;i<skb->len && i <99;i++) {
308 sprintf(buf+i*3,"%2.2x ",0xff&skb->data[i]);
310 #elif DUMP_PACKETS >= 1
311 for(i=0;i<skb->len && i < 30;i++) {
312 sprintf(buf+i*3,"%2.2x ", 0xff&skb->data[i]);
314 #endif /* DUMP_PACKETS >= 1 */
315 if (i==skb->len)
316 printk("%s\n",buf);
317 else
318 printk("%s...\n",buf);
319 #endif /* DUMP_PACKETS > 0 */
321 /* Minimum ethernet-frame size */
322 #ifdef CONFIG_TR
323 if (priv->is_trdev)
324 min_frame_size = LEC_MINIMUM_8025_SIZE;
325 else
326 #endif
327 min_frame_size = LEC_MINIMUM_8023_SIZE;
328 if (skb->len < min_frame_size) {
329 if ((skb->len + skb_tailroom(skb)) < min_frame_size) {
330 skb2 = skb_copy_expand(skb, 0,
331 min_frame_size - skb->truesize, GFP_ATOMIC);
332 dev_kfree_skb(skb);
333 if (skb2 == NULL) {
334 priv->stats.tx_dropped++;
335 return 0;
337 skb = skb2;
339 skb_put(skb, min_frame_size - skb->len);
342 /* Send to right vcc */
343 is_rdesc = 0;
344 dst = lec_h->h_dest;
345 #ifdef CONFIG_TR
346 if (priv->is_trdev) {
347 dst = get_tr_dst(skb->data+2, rdesc);
348 if (dst == NULL) {
349 dst = rdesc;
350 is_rdesc = 1;
353 #endif
354 entry = NULL;
355 vcc = lec_arp_resolve(priv, dst, is_rdesc, &entry);
356 DPRINTK("%s:vcc:%p vcc_flags:%x, entry:%p\n", dev->name,
357 vcc, vcc?vcc->flags:0, entry);
358 if (!vcc || !test_bit(ATM_VF_READY,&vcc->flags)) {
359 if (entry && (entry->tx_wait.qlen < LEC_UNRES_QUE_LEN)) {
360 DPRINTK("%s:lec_start_xmit: queuing packet, ", dev->name);
361 DPRINTK("MAC address 0x%02x:%02x:%02x:%02x:%02x:%02x\n",
362 lec_h->h_dest[0], lec_h->h_dest[1], lec_h->h_dest[2],
363 lec_h->h_dest[3], lec_h->h_dest[4], lec_h->h_dest[5]);
364 skb_queue_tail(&entry->tx_wait, skb);
365 } else {
366 DPRINTK("%s:lec_start_xmit: tx queue full or no arp entry, dropping, ", dev->name);
367 DPRINTK("MAC address 0x%02x:%02x:%02x:%02x:%02x:%02x\n",
368 lec_h->h_dest[0], lec_h->h_dest[1], lec_h->h_dest[2],
369 lec_h->h_dest[3], lec_h->h_dest[4], lec_h->h_dest[5]);
370 priv->stats.tx_dropped++;
371 dev_kfree_skb(skb);
373 return 0;
376 #if DUMP_PACKETS > 0
377 printk("%s:sending to vpi:%d vci:%d\n", dev->name,
378 vcc->vpi, vcc->vci);
379 #endif /* DUMP_PACKETS > 0 */
381 while (entry && (skb2 = skb_dequeue(&entry->tx_wait))) {
382 DPRINTK("lec.c: emptying tx queue, ");
383 DPRINTK("MAC address 0x%02x:%02x:%02x:%02x:%02x:%02x\n",
384 lec_h->h_dest[0], lec_h->h_dest[1], lec_h->h_dest[2],
385 lec_h->h_dest[3], lec_h->h_dest[4], lec_h->h_dest[5]);
386 lec_send(vcc, skb2, priv);
389 lec_send(vcc, skb, priv);
391 if (!atm_may_send(vcc, 0)) {
392 struct lec_vcc_priv *vpriv = LEC_VCC_PRIV(vcc);
394 vpriv->xoff = 1;
395 netif_stop_queue(dev);
398 * vcc->pop() might have occurred in between, making
399 * the vcc usuable again. Since xmit is serialized,
400 * this is the only situation we have to re-test.
403 if (atm_may_send(vcc, 0))
404 netif_wake_queue(dev);
407 dev->trans_start = jiffies;
408 return 0;
411 /* The inverse routine to net_open(). */
412 static int
413 lec_close(struct net_device *dev)
415 netif_stop_queue(dev);
416 return 0;
420 * Get the current statistics.
421 * This may be called with the card open or closed.
423 static struct net_device_stats *
424 lec_get_stats(struct net_device *dev)
426 return &((struct lec_priv *)dev->priv)->stats;
429 static int
430 lec_atm_send(struct atm_vcc *vcc, struct sk_buff *skb)
432 unsigned long flags;
433 struct net_device *dev = (struct net_device*)vcc->proto_data;
434 struct lec_priv *priv = (struct lec_priv*)dev->priv;
435 struct atmlec_msg *mesg;
436 struct lec_arp_table *entry;
437 int i;
438 char *tmp; /* FIXME */
440 atomic_sub(skb->truesize, &sk_atm(vcc)->sk_wmem_alloc);
441 mesg = (struct atmlec_msg *)skb->data;
442 tmp = skb->data;
443 tmp += sizeof(struct atmlec_msg);
444 DPRINTK("%s: msg from zeppelin:%d\n", dev->name, mesg->type);
445 switch(mesg->type) {
446 case l_set_mac_addr:
447 for (i=0;i<6;i++) {
448 dev->dev_addr[i] = mesg->content.normal.mac_addr[i];
450 break;
451 case l_del_mac_addr:
452 for(i=0;i<6;i++) {
453 dev->dev_addr[i] = 0;
455 break;
456 case l_addr_delete:
457 lec_addr_delete(priv, mesg->content.normal.atm_addr,
458 mesg->content.normal.flag);
459 break;
460 case l_topology_change:
461 priv->topology_change = mesg->content.normal.flag;
462 break;
463 case l_flush_complete:
464 lec_flush_complete(priv, mesg->content.normal.flag);
465 break;
466 case l_narp_req: /* LANE2: see 7.1.35 in the lane2 spec */
467 spin_lock_irqsave(&priv->lec_arp_lock, flags);
468 entry = lec_arp_find(priv, mesg->content.normal.mac_addr);
469 lec_arp_remove(priv, entry);
470 spin_unlock_irqrestore(&priv->lec_arp_lock, flags);
472 if (mesg->content.normal.no_source_le_narp)
473 break;
474 /* FALL THROUGH */
475 case l_arp_update:
476 lec_arp_update(priv, mesg->content.normal.mac_addr,
477 mesg->content.normal.atm_addr,
478 mesg->content.normal.flag,
479 mesg->content.normal.targetless_le_arp);
480 DPRINTK("lec: in l_arp_update\n");
481 if (mesg->sizeoftlvs != 0) { /* LANE2 3.1.5 */
482 DPRINTK("lec: LANE2 3.1.5, got tlvs, size %d\n", mesg->sizeoftlvs);
483 lane2_associate_ind(dev,
484 mesg->content.normal.mac_addr,
485 tmp, mesg->sizeoftlvs);
487 break;
488 case l_config:
489 priv->maximum_unknown_frame_count =
490 mesg->content.config.maximum_unknown_frame_count;
491 priv->max_unknown_frame_time =
492 (mesg->content.config.max_unknown_frame_time*HZ);
493 priv->max_retry_count =
494 mesg->content.config.max_retry_count;
495 priv->aging_time = (mesg->content.config.aging_time*HZ);
496 priv->forward_delay_time =
497 (mesg->content.config.forward_delay_time*HZ);
498 priv->arp_response_time =
499 (mesg->content.config.arp_response_time*HZ);
500 priv->flush_timeout = (mesg->content.config.flush_timeout*HZ);
501 priv->path_switching_delay =
502 (mesg->content.config.path_switching_delay*HZ);
503 priv->lane_version = mesg->content.config.lane_version; /* LANE2 */
504 priv->lane2_ops = NULL;
505 if (priv->lane_version > 1)
506 priv->lane2_ops = &lane2_ops;
507 if (dev->change_mtu(dev, mesg->content.config.mtu))
508 printk("%s: change_mtu to %d failed\n", dev->name,
509 mesg->content.config.mtu);
510 priv->is_proxy = mesg->content.config.is_proxy;
511 break;
512 case l_flush_tran_id:
513 lec_set_flush_tran_id(priv, mesg->content.normal.atm_addr,
514 mesg->content.normal.flag);
515 break;
516 case l_set_lecid:
517 priv->lecid=(unsigned short)(0xffff&mesg->content.normal.flag);
518 break;
519 case l_should_bridge: {
520 #if defined(CONFIG_BRIDGE) || defined(CONFIG_BRIDGE_MODULE)
521 struct net_bridge_fdb_entry *f;
523 DPRINTK("%s: bridge zeppelin asks about 0x%02x:%02x:%02x:%02x:%02x:%02x\n",
524 dev->name,
525 mesg->content.proxy.mac_addr[0], mesg->content.proxy.mac_addr[1],
526 mesg->content.proxy.mac_addr[2], mesg->content.proxy.mac_addr[3],
527 mesg->content.proxy.mac_addr[4], mesg->content.proxy.mac_addr[5]);
529 if (br_fdb_get_hook == NULL || dev->br_port == NULL)
530 break;
532 f = br_fdb_get_hook(dev->br_port->br, mesg->content.proxy.mac_addr);
533 if (f != NULL &&
534 f->dst->dev != dev &&
535 f->dst->state == BR_STATE_FORWARDING) {
536 /* hit from bridge table, send LE_ARP_RESPONSE */
537 struct sk_buff *skb2;
538 struct sock *sk;
540 DPRINTK("%s: entry found, responding to zeppelin\n", dev->name);
541 skb2 = alloc_skb(sizeof(struct atmlec_msg), GFP_ATOMIC);
542 if (skb2 == NULL) {
543 br_fdb_put_hook(f);
544 break;
546 skb2->len = sizeof(struct atmlec_msg);
547 memcpy(skb2->data, mesg, sizeof(struct atmlec_msg));
548 atm_force_charge(priv->lecd, skb2->truesize);
549 sk = sk_atm(priv->lecd);
550 skb_queue_tail(&sk->sk_receive_queue, skb2);
551 sk->sk_data_ready(sk, skb2->len);
553 if (f != NULL) br_fdb_put_hook(f);
554 #endif /* defined(CONFIG_BRIDGE) || defined(CONFIG_BRIDGE_MODULE) */
556 break;
557 default:
558 printk("%s: Unknown message type %d\n", dev->name, mesg->type);
559 dev_kfree_skb(skb);
560 return -EINVAL;
562 dev_kfree_skb(skb);
563 return 0;
566 static void
567 lec_atm_close(struct atm_vcc *vcc)
569 struct sk_buff *skb;
570 struct net_device *dev = (struct net_device *)vcc->proto_data;
571 struct lec_priv *priv = (struct lec_priv *)dev->priv;
573 priv->lecd = NULL;
574 /* Do something needful? */
576 netif_stop_queue(dev);
577 lec_arp_destroy(priv);
579 if (skb_peek(&sk_atm(vcc)->sk_receive_queue))
580 printk("%s lec_atm_close: closing with messages pending\n",
581 dev->name);
582 while ((skb = skb_dequeue(&sk_atm(vcc)->sk_receive_queue)) != NULL) {
583 atm_return(vcc, skb->truesize);
584 dev_kfree_skb(skb);
587 printk("%s: Shut down!\n", dev->name);
588 module_put(THIS_MODULE);
591 static struct atmdev_ops lecdev_ops = {
592 .close = lec_atm_close,
593 .send = lec_atm_send
596 static struct atm_dev lecatm_dev = {
597 .ops = &lecdev_ops,
598 .type = "lec",
599 .number = 999, /* dummy device number */
600 .lock = SPIN_LOCK_UNLOCKED
604 * LANE2: new argument struct sk_buff *data contains
605 * the LE_ARP based TLVs introduced in the LANE2 spec
607 static int
608 send_to_lecd(struct lec_priv *priv, atmlec_msg_type type,
609 unsigned char *mac_addr, unsigned char *atm_addr,
610 struct sk_buff *data)
612 struct sock *sk;
613 struct sk_buff *skb;
614 struct atmlec_msg *mesg;
616 if (!priv || !priv->lecd) {
617 return -1;
619 skb = alloc_skb(sizeof(struct atmlec_msg), GFP_ATOMIC);
620 if (!skb)
621 return -1;
622 skb->len = sizeof(struct atmlec_msg);
623 mesg = (struct atmlec_msg *)skb->data;
624 memset(mesg, 0, sizeof(struct atmlec_msg));
625 mesg->type = type;
626 if (data != NULL)
627 mesg->sizeoftlvs = data->len;
628 if (mac_addr)
629 memcpy(&mesg->content.normal.mac_addr, mac_addr, ETH_ALEN);
630 else
631 mesg->content.normal.targetless_le_arp = 1;
632 if (atm_addr)
633 memcpy(&mesg->content.normal.atm_addr, atm_addr, ATM_ESA_LEN);
635 atm_force_charge(priv->lecd, skb->truesize);
636 sk = sk_atm(priv->lecd);
637 skb_queue_tail(&sk->sk_receive_queue, skb);
638 sk->sk_data_ready(sk, skb->len);
640 if (data != NULL) {
641 DPRINTK("lec: about to send %d bytes of data\n", data->len);
642 atm_force_charge(priv->lecd, data->truesize);
643 skb_queue_tail(&sk->sk_receive_queue, data);
644 sk->sk_data_ready(sk, skb->len);
647 return 0;
650 /* shamelessly stolen from drivers/net/net_init.c */
651 static int lec_change_mtu(struct net_device *dev, int new_mtu)
653 if ((new_mtu < 68) || (new_mtu > 18190))
654 return -EINVAL;
655 dev->mtu = new_mtu;
656 return 0;
659 static void lec_set_multicast_list(struct net_device *dev)
661 /* by default, all multicast frames arrive over the bus.
662 * eventually support selective multicast service
664 return;
667 static void
668 lec_init(struct net_device *dev)
670 dev->change_mtu = lec_change_mtu;
671 dev->open = lec_open;
672 dev->stop = lec_close;
673 dev->hard_start_xmit = lec_start_xmit;
674 dev->tx_timeout = lec_tx_timeout;
676 dev->get_stats = lec_get_stats;
677 dev->set_multicast_list = lec_set_multicast_list;
678 dev->do_ioctl = NULL;
679 printk("%s: Initialized!\n",dev->name);
680 return;
683 static unsigned char lec_ctrl_magic[] = {
684 0xff,
685 0x00,
686 0x01,
687 0x01 };
689 #define LEC_DATA_DIRECT_8023 2
690 #define LEC_DATA_DIRECT_8025 3
692 static int lec_is_data_direct(struct atm_vcc *vcc)
694 return ((vcc->sap.blli[0].l3.tr9577.snap[4] == LEC_DATA_DIRECT_8023) ||
695 (vcc->sap.blli[0].l3.tr9577.snap[4] == LEC_DATA_DIRECT_8025));
698 static void
699 lec_push(struct atm_vcc *vcc, struct sk_buff *skb)
701 unsigned long flags;
702 struct net_device *dev = (struct net_device *)vcc->proto_data;
703 struct lec_priv *priv = (struct lec_priv *)dev->priv;
705 #if DUMP_PACKETS >0
706 int i=0;
707 char buf[300];
709 printk("%s: lec_push vcc vpi:%d vci:%d\n", dev->name,
710 vcc->vpi, vcc->vci);
711 #endif
712 if (!skb) {
713 DPRINTK("%s: null skb\n",dev->name);
714 lec_vcc_close(priv, vcc);
715 return;
717 #if DUMP_PACKETS > 0
718 printk("%s: rcv datalen:%ld lecid:%4.4x\n", dev->name,
719 skb->len, priv->lecid);
720 #if DUMP_PACKETS >= 2
721 for(i=0;i<skb->len && i <99;i++) {
722 sprintf(buf+i*3,"%2.2x ",0xff&skb->data[i]);
724 #elif DUMP_PACKETS >= 1
725 for(i=0;i<skb->len && i < 30;i++) {
726 sprintf(buf+i*3,"%2.2x ", 0xff&skb->data[i]);
728 #endif /* DUMP_PACKETS >= 1 */
729 if (i==skb->len)
730 printk("%s\n",buf);
731 else
732 printk("%s...\n",buf);
733 #endif /* DUMP_PACKETS > 0 */
734 if (memcmp(skb->data, lec_ctrl_magic, 4) ==0) { /* Control frame, to daemon*/
735 struct sock *sk = sk_atm(vcc);
737 DPRINTK("%s: To daemon\n",dev->name);
738 skb_queue_tail(&sk->sk_receive_queue, skb);
739 sk->sk_data_ready(sk, skb->len);
740 } else { /* Data frame, queue to protocol handlers */
741 struct lec_arp_table *entry;
742 unsigned char *src, *dst;
744 atm_return(vcc,skb->truesize);
745 if (*(uint16_t *)skb->data == htons(priv->lecid) ||
746 !priv->lecd ||
747 !(dev->flags & IFF_UP)) {
748 /* Probably looping back, or if lecd is missing,
749 lecd has gone down */
750 DPRINTK("Ignoring frame...\n");
751 dev_kfree_skb(skb);
752 return;
754 #ifdef CONFIG_TR
755 if (priv->is_trdev)
756 dst = ((struct lecdatahdr_8025 *) skb->data)->h_dest;
757 else
758 #endif
759 dst = ((struct lecdatahdr_8023 *) skb->data)->h_dest;
761 /* If this is a Data Direct VCC, and the VCC does not match
762 * the LE_ARP cache entry, delete the LE_ARP cache entry.
764 spin_lock_irqsave(&priv->lec_arp_lock, flags);
765 if (lec_is_data_direct(vcc)) {
766 #ifdef CONFIG_TR
767 if (priv->is_trdev)
768 src = ((struct lecdatahdr_8025 *) skb->data)->h_source;
769 else
770 #endif
771 src = ((struct lecdatahdr_8023 *) skb->data)->h_source;
772 entry = lec_arp_find(priv, src);
773 if (entry && entry->vcc != vcc) {
774 lec_arp_remove(priv, entry);
775 kfree(entry);
778 spin_unlock_irqrestore(&priv->lec_arp_lock, flags);
780 if (!(dst[0]&0x01) && /* Never filter Multi/Broadcast */
781 !priv->is_proxy && /* Proxy wants all the packets */
782 memcmp(dst, dev->dev_addr, dev->addr_len)) {
783 dev_kfree_skb(skb);
784 return;
786 if (priv->lec_arp_empty_ones) {
787 lec_arp_check_empties(priv, vcc, skb);
789 skb->dev = dev;
790 skb_pull(skb, 2); /* skip lec_id */
791 #ifdef CONFIG_TR
792 if (priv->is_trdev) skb->protocol = tr_type_trans(skb, dev);
793 else
794 #endif
795 skb->protocol = eth_type_trans(skb, dev);
796 priv->stats.rx_packets++;
797 priv->stats.rx_bytes += skb->len;
798 memset(ATM_SKB(skb), 0, sizeof(struct atm_skb_data));
799 netif_rx(skb);
803 static void
804 lec_pop(struct atm_vcc *vcc, struct sk_buff *skb)
806 struct lec_vcc_priv *vpriv = LEC_VCC_PRIV(vcc);
807 struct net_device *dev = skb->dev;
809 if (vpriv == NULL) {
810 printk("lec_pop(): vpriv = NULL!?!?!?\n");
811 return;
814 vpriv->old_pop(vcc, skb);
816 if (vpriv->xoff && atm_may_send(vcc, 0)) {
817 vpriv->xoff = 0;
818 if (netif_running(dev) && netif_queue_stopped(dev))
819 netif_wake_queue(dev);
823 static int
824 lec_vcc_attach(struct atm_vcc *vcc, void __user *arg)
826 struct lec_vcc_priv *vpriv;
827 int bytes_left;
828 struct atmlec_ioc ioc_data;
830 /* Lecd must be up in this case */
831 bytes_left = copy_from_user(&ioc_data, arg, sizeof(struct atmlec_ioc));
832 if (bytes_left != 0) {
833 printk("lec: lec_vcc_attach, copy from user failed for %d bytes\n",
834 bytes_left);
836 if (ioc_data.dev_num < 0 || ioc_data.dev_num >= MAX_LEC_ITF ||
837 !dev_lec[ioc_data.dev_num])
838 return -EINVAL;
839 if (!(vpriv = kmalloc(sizeof(struct lec_vcc_priv), GFP_KERNEL)))
840 return -ENOMEM;
841 vpriv->xoff = 0;
842 vpriv->old_pop = vcc->pop;
843 vcc->user_back = vpriv;
844 vcc->pop = lec_pop;
845 lec_vcc_added(dev_lec[ioc_data.dev_num]->priv,
846 &ioc_data, vcc, vcc->push);
847 vcc->proto_data = dev_lec[ioc_data.dev_num];
848 vcc->push = lec_push;
849 return 0;
852 static int
853 lec_mcast_attach(struct atm_vcc *vcc, int arg)
855 if (arg <0 || arg >= MAX_LEC_ITF || !dev_lec[arg])
856 return -EINVAL;
857 vcc->proto_data = dev_lec[arg];
858 return (lec_mcast_make((struct lec_priv*)dev_lec[arg]->priv, vcc));
861 /* Initialize device. */
862 static int
863 lecd_attach(struct atm_vcc *vcc, int arg)
865 int i;
866 struct lec_priv *priv;
868 if (arg<0)
869 i = 0;
870 else
871 i = arg;
872 #ifdef CONFIG_TR
873 if (arg >= MAX_LEC_ITF)
874 return -EINVAL;
875 #else /* Reserve the top NUM_TR_DEVS for TR */
876 if (arg >= (MAX_LEC_ITF-NUM_TR_DEVS))
877 return -EINVAL;
878 #endif
879 if (!dev_lec[i]) {
880 int is_trdev, size;
882 is_trdev = 0;
883 if (i >= (MAX_LEC_ITF - NUM_TR_DEVS))
884 is_trdev = 1;
886 size = sizeof(struct lec_priv);
887 #ifdef CONFIG_TR
888 if (is_trdev)
889 dev_lec[i] = alloc_trdev(size);
890 else
891 #endif
892 dev_lec[i] = alloc_etherdev(size);
893 if (!dev_lec[i])
894 return -ENOMEM;
895 snprintf(dev_lec[i]->name, IFNAMSIZ, "lec%d", i);
896 if (register_netdev(dev_lec[i])) {
897 free_netdev(dev_lec[i]);
898 return -EINVAL;
901 priv = dev_lec[i]->priv;
902 priv->is_trdev = is_trdev;
903 lec_init(dev_lec[i]);
904 } else {
905 priv = dev_lec[i]->priv;
906 if (priv->lecd)
907 return -EADDRINUSE;
909 lec_arp_init(priv);
910 priv->itfnum = i; /* LANE2 addition */
911 priv->lecd = vcc;
912 vcc->dev = &lecatm_dev;
913 vcc_insert_socket(sk_atm(vcc));
915 vcc->proto_data = dev_lec[i];
916 set_bit(ATM_VF_META,&vcc->flags);
917 set_bit(ATM_VF_READY,&vcc->flags);
919 /* Set default values to these variables */
920 priv->maximum_unknown_frame_count = 1;
921 priv->max_unknown_frame_time = (1*HZ);
922 priv->vcc_timeout_period = (1200*HZ);
923 priv->max_retry_count = 1;
924 priv->aging_time = (300*HZ);
925 priv->forward_delay_time = (15*HZ);
926 priv->topology_change = 0;
927 priv->arp_response_time = (1*HZ);
928 priv->flush_timeout = (4*HZ);
929 priv->path_switching_delay = (6*HZ);
931 if (dev_lec[i]->flags & IFF_UP) {
932 netif_start_queue(dev_lec[i]);
934 __module_get(THIS_MODULE);
935 return i;
938 #ifdef CONFIG_PROC_FS
939 static char* lec_arp_get_status_string(unsigned char status)
941 static char *lec_arp_status_string[] = {
942 "ESI_UNKNOWN ",
943 "ESI_ARP_PENDING ",
944 "ESI_VC_PENDING ",
945 "<Undefined> ",
946 "ESI_FLUSH_PENDING ",
947 "ESI_FORWARD_DIRECT"
950 if (status > ESI_FORWARD_DIRECT)
951 status = 3; /* ESI_UNDEFINED */
952 return lec_arp_status_string[status];
955 static void lec_info(struct seq_file *seq, struct lec_arp_table *entry)
957 int i;
959 for (i = 0; i < ETH_ALEN; i++)
960 seq_printf(seq, "%2.2x", entry->mac_addr[i] & 0xff);
961 seq_printf(seq, " ");
962 for (i = 0; i < ATM_ESA_LEN; i++)
963 seq_printf(seq, "%2.2x", entry->atm_addr[i] & 0xff);
964 seq_printf(seq, " %s %4.4x", lec_arp_get_status_string(entry->status),
965 entry->flags & 0xffff);
966 if (entry->vcc)
967 seq_printf(seq, "%3d %3d ", entry->vcc->vpi, entry->vcc->vci);
968 else
969 seq_printf(seq, " ");
970 if (entry->recv_vcc) {
971 seq_printf(seq, " %3d %3d", entry->recv_vcc->vpi,
972 entry->recv_vcc->vci);
974 seq_putc(seq, '\n');
978 struct lec_state {
979 unsigned long flags;
980 struct lec_priv *locked;
981 struct lec_arp_table *entry;
982 struct net_device *dev;
983 int itf;
984 int arp_table;
985 int misc_table;
988 static void *lec_tbl_walk(struct lec_state *state, struct lec_arp_table *tbl,
989 loff_t *l)
991 struct lec_arp_table *e = state->entry;
993 if (!e)
994 e = tbl;
995 if (e == (void *)1) {
996 e = tbl;
997 --*l;
999 for (; e; e = e->next) {
1000 if (--*l < 0)
1001 break;
1003 state->entry = e;
1004 return (*l < 0) ? state : NULL;
1007 static void *lec_arp_walk(struct lec_state *state, loff_t *l,
1008 struct lec_priv *priv)
1010 void *v = NULL;
1011 int p;
1013 for (p = state->arp_table; p < LEC_ARP_TABLE_SIZE; p++) {
1014 v = lec_tbl_walk(state, priv->lec_arp_tables[p], l);
1015 if (v)
1016 break;
1018 state->arp_table = p;
1019 return v;
1022 static void *lec_misc_walk(struct lec_state *state, loff_t *l,
1023 struct lec_priv *priv)
1025 struct lec_arp_table *lec_misc_tables[] = {
1026 priv->lec_arp_empty_ones,
1027 priv->lec_no_forward,
1028 priv->mcast_fwds
1030 void *v = NULL;
1031 int q;
1033 for (q = state->misc_table; q < ARRAY_SIZE(lec_misc_tables); q++) {
1034 v = lec_tbl_walk(state, lec_misc_tables[q], l);
1035 if (v)
1036 break;
1038 state->misc_table = q;
1039 return v;
1042 static void *lec_priv_walk(struct lec_state *state, loff_t *l,
1043 struct lec_priv *priv)
1045 if (!state->locked) {
1046 state->locked = priv;
1047 spin_lock_irqsave(&priv->lec_arp_lock, state->flags);
1049 if (!lec_arp_walk(state, l, priv) &&
1050 !lec_misc_walk(state, l, priv)) {
1051 spin_unlock_irqrestore(&priv->lec_arp_lock, state->flags);
1052 state->locked = NULL;
1053 /* Partial state reset for the next time we get called */
1054 state->arp_table = state->misc_table = 0;
1056 return state->locked;
1059 static void *lec_itf_walk(struct lec_state *state, loff_t *l)
1061 struct net_device *dev;
1062 void *v;
1064 dev = state->dev ? state->dev : dev_lec[state->itf];
1065 v = (dev && dev->priv) ? lec_priv_walk(state, l, dev->priv) : NULL;
1066 if (!v && dev) {
1067 dev_put(dev);
1068 /* Partial state reset for the next time we get called */
1069 dev = NULL;
1071 state->dev = dev;
1072 return v;
1075 static void *lec_get_idx(struct lec_state *state, loff_t l)
1077 void *v = NULL;
1079 for (; state->itf < MAX_LEC_ITF; state->itf++) {
1080 v = lec_itf_walk(state, &l);
1081 if (v)
1082 break;
1084 return v;
1087 static void *lec_seq_start(struct seq_file *seq, loff_t *pos)
1089 struct lec_state *state = seq->private;
1091 state->itf = 0;
1092 state->dev = NULL;
1093 state->locked = NULL;
1094 state->arp_table = 0;
1095 state->misc_table = 0;
1096 state->entry = (void *)1;
1098 return *pos ? lec_get_idx(state, *pos) : (void*)1;
1101 static void lec_seq_stop(struct seq_file *seq, void *v)
1103 struct lec_state *state = seq->private;
1105 if (state->dev) {
1106 spin_unlock_irqrestore(&state->locked->lec_arp_lock,
1107 state->flags);
1108 dev_put(state->dev);
1112 static void *lec_seq_next(struct seq_file *seq, void *v, loff_t *pos)
1114 struct lec_state *state = seq->private;
1116 v = lec_get_idx(state, 1);
1117 *pos += !!PTR_ERR(v);
1118 return v;
1121 static int lec_seq_show(struct seq_file *seq, void *v)
1123 static char lec_banner[] = "Itf MAC ATM destination"
1124 " Status Flags "
1125 "VPI/VCI Recv VPI/VCI\n";
1127 if (v == (void *)1)
1128 seq_puts(seq, lec_banner);
1129 else {
1130 struct lec_state *state = seq->private;
1131 struct net_device *dev = state->dev;
1133 seq_printf(seq, "%s ", dev->name);
1134 lec_info(seq, state->entry);
1136 return 0;
1139 static struct seq_operations lec_seq_ops = {
1140 .start = lec_seq_start,
1141 .next = lec_seq_next,
1142 .stop = lec_seq_stop,
1143 .show = lec_seq_show,
1146 static int lec_seq_open(struct inode *inode, struct file *file)
1148 struct lec_state *state;
1149 struct seq_file *seq;
1150 int rc = -EAGAIN;
1152 state = kmalloc(sizeof(*state), GFP_KERNEL);
1153 if (!state) {
1154 rc = -ENOMEM;
1155 goto out;
1158 rc = seq_open(file, &lec_seq_ops);
1159 if (rc)
1160 goto out_kfree;
1161 seq = file->private_data;
1162 seq->private = state;
1163 out:
1164 return rc;
1166 out_kfree:
1167 kfree(state);
1168 goto out;
1171 static int lec_seq_release(struct inode *inode, struct file *file)
1173 return seq_release_private(inode, file);
1176 static struct file_operations lec_seq_fops = {
1177 .owner = THIS_MODULE,
1178 .open = lec_seq_open,
1179 .read = seq_read,
1180 .llseek = seq_lseek,
1181 .release = lec_seq_release,
1183 #endif
1185 static int lane_ioctl(struct socket *sock, unsigned int cmd, unsigned long arg)
1187 struct atm_vcc *vcc = ATM_SD(sock);
1188 int err = 0;
1190 switch (cmd) {
1191 case ATMLEC_CTRL:
1192 case ATMLEC_MCAST:
1193 case ATMLEC_DATA:
1194 if (!capable(CAP_NET_ADMIN))
1195 return -EPERM;
1196 break;
1197 default:
1198 return -ENOIOCTLCMD;
1201 switch (cmd) {
1202 case ATMLEC_CTRL:
1203 err = lecd_attach(vcc, (int) arg);
1204 if (err >= 0)
1205 sock->state = SS_CONNECTED;
1206 break;
1207 case ATMLEC_MCAST:
1208 err = lec_mcast_attach(vcc, (int) arg);
1209 break;
1210 case ATMLEC_DATA:
1211 err = lec_vcc_attach(vcc, (void __user *) arg);
1212 break;
1215 return err;
1218 static struct atm_ioctl lane_ioctl_ops = {
1219 .owner = THIS_MODULE,
1220 .ioctl = lane_ioctl,
1223 static int __init lane_module_init(void)
1225 #ifdef CONFIG_PROC_FS
1226 struct proc_dir_entry *p;
1228 p = create_proc_entry("lec", S_IRUGO, atm_proc_root);
1229 if (p)
1230 p->proc_fops = &lec_seq_fops;
1231 #endif
1233 register_atm_ioctl(&lane_ioctl_ops);
1234 printk("lec.c: " __DATE__ " " __TIME__ " initialized\n");
1235 return 0;
1238 static void __exit lane_module_cleanup(void)
1240 int i;
1241 struct lec_priv *priv;
1243 remove_proc_entry("lec", atm_proc_root);
1245 deregister_atm_ioctl(&lane_ioctl_ops);
1247 for (i = 0; i < MAX_LEC_ITF; i++) {
1248 if (dev_lec[i] != NULL) {
1249 priv = (struct lec_priv *)dev_lec[i]->priv;
1250 unregister_netdev(dev_lec[i]);
1251 free_netdev(dev_lec[i]);
1252 dev_lec[i] = NULL;
1256 return;
1259 module_init(lane_module_init);
1260 module_exit(lane_module_cleanup);
1263 * LANE2: 3.1.3, LE_RESOLVE.request
1264 * Non force allocates memory and fills in *tlvs, fills in *sizeoftlvs.
1265 * If sizeoftlvs == NULL the default TLVs associated with with this
1266 * lec will be used.
1267 * If dst_mac == NULL, targetless LE_ARP will be sent
1269 static int lane2_resolve(struct net_device *dev, u8 *dst_mac, int force,
1270 u8 **tlvs, u32 *sizeoftlvs)
1272 unsigned long flags;
1273 struct lec_priv *priv = (struct lec_priv *)dev->priv;
1274 struct lec_arp_table *table;
1275 struct sk_buff *skb;
1276 int retval;
1278 if (force == 0) {
1279 spin_lock_irqsave(&priv->lec_arp_lock, flags);
1280 table = lec_arp_find(priv, dst_mac);
1281 spin_unlock_irqrestore(&priv->lec_arp_lock, flags);
1282 if(table == NULL)
1283 return -1;
1285 *tlvs = kmalloc(table->sizeoftlvs, GFP_ATOMIC);
1286 if (*tlvs == NULL)
1287 return -1;
1289 memcpy(*tlvs, table->tlvs, table->sizeoftlvs);
1290 *sizeoftlvs = table->sizeoftlvs;
1292 return 0;
1295 if (sizeoftlvs == NULL)
1296 retval = send_to_lecd(priv, l_arp_xmt, dst_mac, NULL, NULL);
1298 else {
1299 skb = alloc_skb(*sizeoftlvs, GFP_ATOMIC);
1300 if (skb == NULL)
1301 return -1;
1302 skb->len = *sizeoftlvs;
1303 memcpy(skb->data, *tlvs, *sizeoftlvs);
1304 retval = send_to_lecd(priv, l_arp_xmt, dst_mac, NULL, skb);
1306 return retval;
1311 * LANE2: 3.1.4, LE_ASSOCIATE.request
1312 * Associate the *tlvs with the *lan_dst address.
1313 * Will overwrite any previous association
1314 * Returns 1 for success, 0 for failure (out of memory)
1317 static int lane2_associate_req (struct net_device *dev, u8 *lan_dst,
1318 u8 *tlvs, u32 sizeoftlvs)
1320 int retval;
1321 struct sk_buff *skb;
1322 struct lec_priv *priv = (struct lec_priv*)dev->priv;
1324 if ( memcmp(lan_dst, dev->dev_addr, ETH_ALEN) != 0 )
1325 return (0); /* not our mac address */
1327 kfree(priv->tlvs); /* NULL if there was no previous association */
1329 priv->tlvs = kmalloc(sizeoftlvs, GFP_KERNEL);
1330 if (priv->tlvs == NULL)
1331 return (0);
1332 priv->sizeoftlvs = sizeoftlvs;
1333 memcpy(priv->tlvs, tlvs, sizeoftlvs);
1335 skb = alloc_skb(sizeoftlvs, GFP_ATOMIC);
1336 if (skb == NULL)
1337 return 0;
1338 skb->len = sizeoftlvs;
1339 memcpy(skb->data, tlvs, sizeoftlvs);
1340 retval = send_to_lecd(priv, l_associate_req, NULL, NULL, skb);
1341 if (retval != 0)
1342 printk("lec.c: lane2_associate_req() failed\n");
1343 /* If the previous association has changed we must
1344 * somehow notify other LANE entities about the change
1346 return (1);
1350 * LANE2: 3.1.5, LE_ASSOCIATE.indication
1353 static void lane2_associate_ind (struct net_device *dev, u8 *mac_addr,
1354 u8 *tlvs, u32 sizeoftlvs)
1356 #if 0
1357 int i = 0;
1358 #endif
1359 struct lec_priv *priv = (struct lec_priv *)dev->priv;
1360 #if 0 /* Why have the TLVs in LE_ARP entries since we do not use them? When you
1361 uncomment this code, make sure the TLVs get freed when entry is killed */
1362 struct lec_arp_table *entry = lec_arp_find(priv, mac_addr);
1364 if (entry == NULL)
1365 return; /* should not happen */
1367 kfree(entry->tlvs);
1369 entry->tlvs = kmalloc(sizeoftlvs, GFP_KERNEL);
1370 if (entry->tlvs == NULL)
1371 return;
1373 entry->sizeoftlvs = sizeoftlvs;
1374 memcpy(entry->tlvs, tlvs, sizeoftlvs);
1375 #endif
1376 #if 0
1377 printk("lec.c: lane2_associate_ind()\n");
1378 printk("dump of tlvs, sizeoftlvs=%d\n", sizeoftlvs);
1379 while (i < sizeoftlvs)
1380 printk("%02x ", tlvs[i++]);
1382 printk("\n");
1383 #endif
1385 /* tell MPOA about the TLVs we saw */
1386 if (priv->lane2_ops && priv->lane2_ops->associate_indicator) {
1387 priv->lane2_ops->associate_indicator(dev, mac_addr,
1388 tlvs, sizeoftlvs);
1390 return;
1394 * Here starts what used to lec_arpc.c
1396 * lec_arpc.c was added here when making
1397 * lane client modular. October 1997
1401 #include <linux/types.h>
1402 #include <linux/sched.h>
1403 #include <linux/timer.h>
1404 #include <asm/param.h>
1405 #include <asm/atomic.h>
1406 #include <linux/inetdevice.h>
1407 #include <net/route.h>
1410 #if 0
1411 #define DPRINTK(format,args...)
1413 #define DPRINTK printk
1415 #endif
1416 #define DEBUG_ARP_TABLE 0
1418 #define LEC_ARP_REFRESH_INTERVAL (3*HZ)
1420 static void lec_arp_check_expire(unsigned long data);
1421 static void lec_arp_expire_arp(unsigned long data);
1424 * Arp table funcs
1427 #define HASH(ch) (ch & (LEC_ARP_TABLE_SIZE -1))
1430 * Initialization of arp-cache
1432 static void
1433 lec_arp_init(struct lec_priv *priv)
1435 unsigned short i;
1437 for (i = 0; i < LEC_ARP_TABLE_SIZE; i++) {
1438 priv->lec_arp_tables[i] = NULL;
1440 spin_lock_init(&priv->lec_arp_lock);
1441 init_timer(&priv->lec_arp_timer);
1442 priv->lec_arp_timer.expires = jiffies + LEC_ARP_REFRESH_INTERVAL;
1443 priv->lec_arp_timer.data = (unsigned long)priv;
1444 priv->lec_arp_timer.function = lec_arp_check_expire;
1445 add_timer(&priv->lec_arp_timer);
1448 static void
1449 lec_arp_clear_vccs(struct lec_arp_table *entry)
1451 if (entry->vcc) {
1452 struct atm_vcc *vcc = entry->vcc;
1453 struct lec_vcc_priv *vpriv = LEC_VCC_PRIV(vcc);
1454 struct net_device *dev = (struct net_device*) vcc->proto_data;
1456 vcc->pop = vpriv->old_pop;
1457 if (vpriv->xoff)
1458 netif_wake_queue(dev);
1459 kfree(vpriv);
1460 vcc->user_back = NULL;
1461 vcc->push = entry->old_push;
1462 vcc_release_async(vcc, -EPIPE);
1463 vcc = NULL;
1465 if (entry->recv_vcc) {
1466 entry->recv_vcc->push = entry->old_recv_push;
1467 vcc_release_async(entry->recv_vcc, -EPIPE);
1468 entry->recv_vcc = NULL;
1473 * Insert entry to lec_arp_table
1474 * LANE2: Add to the end of the list to satisfy 8.1.13
1476 static inline void
1477 lec_arp_add(struct lec_priv *priv, struct lec_arp_table *to_add)
1479 unsigned short place;
1480 struct lec_arp_table *tmp;
1482 place = HASH(to_add->mac_addr[ETH_ALEN-1]);
1483 tmp = priv->lec_arp_tables[place];
1484 to_add->next = NULL;
1485 if (tmp == NULL)
1486 priv->lec_arp_tables[place] = to_add;
1488 else { /* add to the end */
1489 while (tmp->next)
1490 tmp = tmp->next;
1491 tmp->next = to_add;
1494 DPRINTK("LEC_ARP: Added entry:%2.2x %2.2x %2.2x %2.2x %2.2x %2.2x\n",
1495 0xff&to_add->mac_addr[0], 0xff&to_add->mac_addr[1],
1496 0xff&to_add->mac_addr[2], 0xff&to_add->mac_addr[3],
1497 0xff&to_add->mac_addr[4], 0xff&to_add->mac_addr[5]);
1501 * Remove entry from lec_arp_table
1503 static int
1504 lec_arp_remove(struct lec_priv *priv,
1505 struct lec_arp_table *to_remove)
1507 unsigned short place;
1508 struct lec_arp_table *tmp;
1509 int remove_vcc=1;
1511 if (!to_remove) {
1512 return -1;
1514 place = HASH(to_remove->mac_addr[ETH_ALEN-1]);
1515 tmp = priv->lec_arp_tables[place];
1516 if (tmp == to_remove) {
1517 priv->lec_arp_tables[place] = tmp->next;
1518 } else {
1519 while(tmp && tmp->next != to_remove) {
1520 tmp = tmp->next;
1522 if (!tmp) {/* Entry was not found */
1523 return -1;
1526 tmp->next = to_remove->next;
1527 del_timer(&to_remove->timer);
1529 /* If this is the only MAC connected to this VCC, also tear down
1530 the VCC */
1531 if (to_remove->status >= ESI_FLUSH_PENDING) {
1533 * ESI_FLUSH_PENDING, ESI_FORWARD_DIRECT
1535 for(place = 0; place < LEC_ARP_TABLE_SIZE; place++) {
1536 for(tmp = priv->lec_arp_tables[place]; tmp != NULL; tmp = tmp->next) {
1537 if (memcmp(tmp->atm_addr, to_remove->atm_addr,
1538 ATM_ESA_LEN)==0) {
1539 remove_vcc=0;
1540 break;
1544 if (remove_vcc)
1545 lec_arp_clear_vccs(to_remove);
1547 skb_queue_purge(&to_remove->tx_wait); /* FIXME: good place for this? */
1549 DPRINTK("LEC_ARP: Removed entry:%2.2x %2.2x %2.2x %2.2x %2.2x %2.2x\n",
1550 0xff&to_remove->mac_addr[0], 0xff&to_remove->mac_addr[1],
1551 0xff&to_remove->mac_addr[2], 0xff&to_remove->mac_addr[3],
1552 0xff&to_remove->mac_addr[4], 0xff&to_remove->mac_addr[5]);
1553 return 0;
1556 #if DEBUG_ARP_TABLE
1557 static char*
1558 get_status_string(unsigned char st)
1560 switch(st) {
1561 case ESI_UNKNOWN:
1562 return "ESI_UNKNOWN";
1563 case ESI_ARP_PENDING:
1564 return "ESI_ARP_PENDING";
1565 case ESI_VC_PENDING:
1566 return "ESI_VC_PENDING";
1567 case ESI_FLUSH_PENDING:
1568 return "ESI_FLUSH_PENDING";
1569 case ESI_FORWARD_DIRECT:
1570 return "ESI_FORWARD_DIRECT";
1571 default:
1572 return "<UNKNOWN>";
1575 #endif
1577 static void
1578 dump_arp_table(struct lec_priv *priv)
1580 #if DEBUG_ARP_TABLE
1581 int i,j, offset;
1582 struct lec_arp_table *rulla;
1583 char buf[1024];
1584 struct lec_arp_table **lec_arp_tables =
1585 (struct lec_arp_table **)priv->lec_arp_tables;
1586 struct lec_arp_table *lec_arp_empty_ones =
1587 (struct lec_arp_table *)priv->lec_arp_empty_ones;
1588 struct lec_arp_table *lec_no_forward =
1589 (struct lec_arp_table *)priv->lec_no_forward;
1590 struct lec_arp_table *mcast_fwds = priv->mcast_fwds;
1593 printk("Dump %p:\n",priv);
1594 for (i=0;i<LEC_ARP_TABLE_SIZE;i++) {
1595 rulla = lec_arp_tables[i];
1596 offset = 0;
1597 offset += sprintf(buf,"%d: %p\n",i, rulla);
1598 while (rulla) {
1599 offset += sprintf(buf+offset,"Mac:");
1600 for(j=0;j<ETH_ALEN;j++) {
1601 offset+=sprintf(buf+offset,
1602 "%2.2x ",
1603 rulla->mac_addr[j]&0xff);
1605 offset +=sprintf(buf+offset,"Atm:");
1606 for(j=0;j<ATM_ESA_LEN;j++) {
1607 offset+=sprintf(buf+offset,
1608 "%2.2x ",
1609 rulla->atm_addr[j]&0xff);
1611 offset+=sprintf(buf+offset,
1612 "Vcc vpi:%d vci:%d, Recv_vcc vpi:%d vci:%d Last_used:%lx, Timestamp:%lx, No_tries:%d ",
1613 rulla->vcc?rulla->vcc->vpi:0,
1614 rulla->vcc?rulla->vcc->vci:0,
1615 rulla->recv_vcc?rulla->recv_vcc->vpi:0,
1616 rulla->recv_vcc?rulla->recv_vcc->vci:0,
1617 rulla->last_used,
1618 rulla->timestamp, rulla->no_tries);
1619 offset+=sprintf(buf+offset,
1620 "Flags:%x, Packets_flooded:%x, Status: %s ",
1621 rulla->flags, rulla->packets_flooded,
1622 get_status_string(rulla->status));
1623 offset+=sprintf(buf+offset,"->%p\n",rulla->next);
1624 rulla = rulla->next;
1626 printk("%s",buf);
1628 rulla = lec_no_forward;
1629 if (rulla)
1630 printk("No forward\n");
1631 while(rulla) {
1632 offset=0;
1633 offset += sprintf(buf+offset,"Mac:");
1634 for(j=0;j<ETH_ALEN;j++) {
1635 offset+=sprintf(buf+offset,"%2.2x ",
1636 rulla->mac_addr[j]&0xff);
1638 offset +=sprintf(buf+offset,"Atm:");
1639 for(j=0;j<ATM_ESA_LEN;j++) {
1640 offset+=sprintf(buf+offset,"%2.2x ",
1641 rulla->atm_addr[j]&0xff);
1643 offset+=sprintf(buf+offset,
1644 "Vcc vpi:%d vci:%d, Recv_vcc vpi:%d vci:%d Last_used:%lx, Timestamp:%lx, No_tries:%d ",
1645 rulla->vcc?rulla->vcc->vpi:0,
1646 rulla->vcc?rulla->vcc->vci:0,
1647 rulla->recv_vcc?rulla->recv_vcc->vpi:0,
1648 rulla->recv_vcc?rulla->recv_vcc->vci:0,
1649 rulla->last_used,
1650 rulla->timestamp, rulla->no_tries);
1651 offset+=sprintf(buf+offset,
1652 "Flags:%x, Packets_flooded:%x, Status: %s ",
1653 rulla->flags, rulla->packets_flooded,
1654 get_status_string(rulla->status));
1655 offset+=sprintf(buf+offset,"->%lx\n",(long)rulla->next);
1656 rulla = rulla->next;
1657 printk("%s",buf);
1659 rulla = lec_arp_empty_ones;
1660 if (rulla)
1661 printk("Empty ones\n");
1662 while(rulla) {
1663 offset=0;
1664 offset += sprintf(buf+offset,"Mac:");
1665 for(j=0;j<ETH_ALEN;j++) {
1666 offset+=sprintf(buf+offset,"%2.2x ",
1667 rulla->mac_addr[j]&0xff);
1669 offset +=sprintf(buf+offset,"Atm:");
1670 for(j=0;j<ATM_ESA_LEN;j++) {
1671 offset+=sprintf(buf+offset,"%2.2x ",
1672 rulla->atm_addr[j]&0xff);
1674 offset+=sprintf(buf+offset,
1675 "Vcc vpi:%d vci:%d, Recv_vcc vpi:%d vci:%d Last_used:%lx, Timestamp:%lx, No_tries:%d ",
1676 rulla->vcc?rulla->vcc->vpi:0,
1677 rulla->vcc?rulla->vcc->vci:0,
1678 rulla->recv_vcc?rulla->recv_vcc->vpi:0,
1679 rulla->recv_vcc?rulla->recv_vcc->vci:0,
1680 rulla->last_used,
1681 rulla->timestamp, rulla->no_tries);
1682 offset+=sprintf(buf+offset,
1683 "Flags:%x, Packets_flooded:%x, Status: %s ",
1684 rulla->flags, rulla->packets_flooded,
1685 get_status_string(rulla->status));
1686 offset+=sprintf(buf+offset,"->%lx\n",(long)rulla->next);
1687 rulla = rulla->next;
1688 printk("%s",buf);
1691 rulla = mcast_fwds;
1692 if (rulla)
1693 printk("Multicast Forward VCCs\n");
1694 while(rulla) {
1695 offset=0;
1696 offset += sprintf(buf+offset,"Mac:");
1697 for(j=0;j<ETH_ALEN;j++) {
1698 offset+=sprintf(buf+offset,"%2.2x ",
1699 rulla->mac_addr[j]&0xff);
1701 offset +=sprintf(buf+offset,"Atm:");
1702 for(j=0;j<ATM_ESA_LEN;j++) {
1703 offset+=sprintf(buf+offset,"%2.2x ",
1704 rulla->atm_addr[j]&0xff);
1706 offset+=sprintf(buf+offset,
1707 "Vcc vpi:%d vci:%d, Recv_vcc vpi:%d vci:%d Last_used:%lx, Timestamp:%lx, No_tries:%d ",
1708 rulla->vcc?rulla->vcc->vpi:0,
1709 rulla->vcc?rulla->vcc->vci:0,
1710 rulla->recv_vcc?rulla->recv_vcc->vpi:0,
1711 rulla->recv_vcc?rulla->recv_vcc->vci:0,
1712 rulla->last_used,
1713 rulla->timestamp, rulla->no_tries);
1714 offset+=sprintf(buf+offset,
1715 "Flags:%x, Packets_flooded:%x, Status: %s ",
1716 rulla->flags, rulla->packets_flooded,
1717 get_status_string(rulla->status));
1718 offset+=sprintf(buf+offset,"->%lx\n",(long)rulla->next);
1719 rulla = rulla->next;
1720 printk("%s",buf);
1723 #endif
1727 * Destruction of arp-cache
1729 static void
1730 lec_arp_destroy(struct lec_priv *priv)
1732 unsigned long flags;
1733 struct lec_arp_table *entry, *next;
1734 int i;
1736 del_timer_sync(&priv->lec_arp_timer);
1739 * Remove all entries
1742 spin_lock_irqsave(&priv->lec_arp_lock, flags);
1743 for (i = 0; i < LEC_ARP_TABLE_SIZE; i++) {
1744 for(entry = priv->lec_arp_tables[i]; entry != NULL; entry=next) {
1745 next = entry->next;
1746 lec_arp_remove(priv, entry);
1747 kfree(entry);
1750 entry = priv->lec_arp_empty_ones;
1751 while(entry) {
1752 next = entry->next;
1753 del_timer_sync(&entry->timer);
1754 lec_arp_clear_vccs(entry);
1755 kfree(entry);
1756 entry = next;
1758 priv->lec_arp_empty_ones = NULL;
1759 entry = priv->lec_no_forward;
1760 while(entry) {
1761 next = entry->next;
1762 del_timer_sync(&entry->timer);
1763 lec_arp_clear_vccs(entry);
1764 kfree(entry);
1765 entry = next;
1767 priv->lec_no_forward = NULL;
1768 entry = priv->mcast_fwds;
1769 while(entry) {
1770 next = entry->next;
1771 /* No timer, LANEv2 7.1.20 and 2.3.5.3 */
1772 lec_arp_clear_vccs(entry);
1773 kfree(entry);
1774 entry = next;
1776 priv->mcast_fwds = NULL;
1777 priv->mcast_vcc = NULL;
1778 memset(priv->lec_arp_tables, 0,
1779 sizeof(struct lec_arp_table *) * LEC_ARP_TABLE_SIZE);
1780 spin_unlock_irqrestore(&priv->lec_arp_lock, flags);
1785 * Find entry by mac_address
1787 static struct lec_arp_table*
1788 lec_arp_find(struct lec_priv *priv,
1789 unsigned char *mac_addr)
1791 unsigned short place;
1792 struct lec_arp_table *to_return;
1794 DPRINTK("LEC_ARP: lec_arp_find :%2.2x %2.2x %2.2x %2.2x %2.2x %2.2x\n",
1795 mac_addr[0]&0xff, mac_addr[1]&0xff, mac_addr[2]&0xff,
1796 mac_addr[3]&0xff, mac_addr[4]&0xff, mac_addr[5]&0xff);
1797 place = HASH(mac_addr[ETH_ALEN-1]);
1799 to_return = priv->lec_arp_tables[place];
1800 while(to_return) {
1801 if (memcmp(mac_addr, to_return->mac_addr, ETH_ALEN) == 0) {
1802 return to_return;
1804 to_return = to_return->next;
1806 return NULL;
1809 static struct lec_arp_table*
1810 make_entry(struct lec_priv *priv, unsigned char *mac_addr)
1812 struct lec_arp_table *to_return;
1814 to_return = (struct lec_arp_table *) kmalloc(sizeof(struct lec_arp_table),
1815 GFP_ATOMIC);
1816 if (!to_return) {
1817 printk("LEC: Arp entry kmalloc failed\n");
1818 return NULL;
1820 memset(to_return, 0, sizeof(struct lec_arp_table));
1821 memcpy(to_return->mac_addr, mac_addr, ETH_ALEN);
1822 init_timer(&to_return->timer);
1823 to_return->timer.function = lec_arp_expire_arp;
1824 to_return->timer.data = (unsigned long) to_return;
1825 to_return->last_used = jiffies;
1826 to_return->priv = priv;
1827 skb_queue_head_init(&to_return->tx_wait);
1828 return to_return;
1833 * Arp sent timer expired
1836 static void
1837 lec_arp_expire_arp(unsigned long data)
1839 struct lec_arp_table *entry;
1841 entry = (struct lec_arp_table *)data;
1843 DPRINTK("lec_arp_expire_arp\n");
1844 if (entry->status == ESI_ARP_PENDING) {
1845 if (entry->no_tries <= entry->priv->max_retry_count) {
1846 if (entry->is_rdesc)
1847 send_to_lecd(entry->priv, l_rdesc_arp_xmt, entry->mac_addr, NULL, NULL);
1848 else
1849 send_to_lecd(entry->priv, l_arp_xmt, entry->mac_addr, NULL, NULL);
1850 entry->no_tries++;
1852 mod_timer(&entry->timer, jiffies + (1*HZ));
1858 * Unknown/unused vcc expire, remove associated entry
1861 static void
1862 lec_arp_expire_vcc(unsigned long data)
1864 unsigned long flags;
1865 struct lec_arp_table *to_remove = (struct lec_arp_table*)data;
1866 struct lec_priv *priv = (struct lec_priv *)to_remove->priv;
1867 struct lec_arp_table *entry = NULL;
1869 del_timer(&to_remove->timer);
1871 DPRINTK("LEC_ARP %p %p: lec_arp_expire_vcc vpi:%d vci:%d\n",
1872 to_remove, priv,
1873 to_remove->vcc?to_remove->recv_vcc->vpi:0,
1874 to_remove->vcc?to_remove->recv_vcc->vci:0);
1875 DPRINTK("eo:%p nf:%p\n",priv->lec_arp_empty_ones,priv->lec_no_forward);
1877 spin_lock_irqsave(&priv->lec_arp_lock, flags);
1878 if (to_remove == priv->lec_arp_empty_ones)
1879 priv->lec_arp_empty_ones = to_remove->next;
1880 else {
1881 entry = priv->lec_arp_empty_ones;
1882 while (entry && entry->next != to_remove)
1883 entry = entry->next;
1884 if (entry)
1885 entry->next = to_remove->next;
1887 if (!entry) {
1888 if (to_remove == priv->lec_no_forward) {
1889 priv->lec_no_forward = to_remove->next;
1890 } else {
1891 entry = priv->lec_no_forward;
1892 while (entry && entry->next != to_remove)
1893 entry = entry->next;
1894 if (entry)
1895 entry->next = to_remove->next;
1898 spin_unlock_irqrestore(&priv->lec_arp_lock, flags);
1900 lec_arp_clear_vccs(to_remove);
1901 kfree(to_remove);
1905 * Expire entries.
1906 * 1. Re-set timer
1907 * 2. For each entry, delete entries that have aged past the age limit.
1908 * 3. For each entry, depending on the status of the entry, perform
1909 * the following maintenance.
1910 * a. If status is ESI_VC_PENDING or ESI_ARP_PENDING then if the
1911 * tick_count is above the max_unknown_frame_time, clear
1912 * the tick_count to zero and clear the packets_flooded counter
1913 * to zero. This supports the packet rate limit per address
1914 * while flooding unknowns.
1915 * b. If the status is ESI_FLUSH_PENDING and the tick_count is greater
1916 * than or equal to the path_switching_delay, change the status
1917 * to ESI_FORWARD_DIRECT. This causes the flush period to end
1918 * regardless of the progress of the flush protocol.
1920 static void
1921 lec_arp_check_expire(unsigned long data)
1923 unsigned long flags;
1924 struct lec_priv *priv = (struct lec_priv *)data;
1925 struct lec_arp_table *entry, *next;
1926 unsigned long now;
1927 unsigned long time_to_check;
1928 int i;
1930 DPRINTK("lec_arp_check_expire %p\n",priv);
1931 DPRINTK("expire: eo:%p nf:%p\n",priv->lec_arp_empty_ones,
1932 priv->lec_no_forward);
1933 now = jiffies;
1934 spin_lock_irqsave(&priv->lec_arp_lock, flags);
1935 for(i = 0; i < LEC_ARP_TABLE_SIZE; i++) {
1936 for(entry = priv->lec_arp_tables[i]; entry != NULL; ) {
1937 if ((entry->flags) & LEC_REMOTE_FLAG &&
1938 priv->topology_change)
1939 time_to_check = priv->forward_delay_time;
1940 else
1941 time_to_check = priv->aging_time;
1943 DPRINTK("About to expire: %lx - %lx > %lx\n",
1944 now,entry->last_used, time_to_check);
1945 if( time_after(now, entry->last_used+
1946 time_to_check) &&
1947 !(entry->flags & LEC_PERMANENT_FLAG) &&
1948 !(entry->mac_addr[0] & 0x01) ) { /* LANE2: 7.1.20 */
1949 /* Remove entry */
1950 DPRINTK("LEC:Entry timed out\n");
1951 next = entry->next;
1952 lec_arp_remove(priv, entry);
1953 kfree(entry);
1954 entry = next;
1955 } else {
1956 /* Something else */
1957 if ((entry->status == ESI_VC_PENDING ||
1958 entry->status == ESI_ARP_PENDING)
1959 && time_after_eq(now,
1960 entry->timestamp +
1961 priv->max_unknown_frame_time)) {
1962 entry->timestamp = jiffies;
1963 entry->packets_flooded = 0;
1964 if (entry->status == ESI_VC_PENDING)
1965 send_to_lecd(priv, l_svc_setup, entry->mac_addr, entry->atm_addr, NULL);
1967 if (entry->status == ESI_FLUSH_PENDING
1969 time_after_eq(now, entry->timestamp+
1970 priv->path_switching_delay)) {
1971 struct sk_buff *skb;
1973 while ((skb = skb_dequeue(&entry->tx_wait)) != NULL)
1974 lec_send(entry->vcc, skb, entry->priv);
1975 entry->last_used = jiffies;
1976 entry->status =
1977 ESI_FORWARD_DIRECT;
1979 entry = entry->next;
1983 spin_unlock_irqrestore(&priv->lec_arp_lock, flags);
1985 mod_timer(&priv->lec_arp_timer, jiffies + LEC_ARP_REFRESH_INTERVAL);
1988 * Try to find vcc where mac_address is attached.
1991 static struct atm_vcc*
1992 lec_arp_resolve(struct lec_priv *priv, unsigned char *mac_to_find,
1993 int is_rdesc, struct lec_arp_table **ret_entry)
1995 unsigned long flags;
1996 struct lec_arp_table *entry;
1997 struct atm_vcc *found;
1999 if (mac_to_find[0] & 0x01) {
2000 switch (priv->lane_version) {
2001 case 1:
2002 return priv->mcast_vcc;
2003 break;
2004 case 2: /* LANE2 wants arp for multicast addresses */
2005 if ( memcmp(mac_to_find, bus_mac, ETH_ALEN) == 0)
2006 return priv->mcast_vcc;
2007 break;
2008 default:
2009 break;
2013 spin_lock_irqsave(&priv->lec_arp_lock, flags);
2014 entry = lec_arp_find(priv, mac_to_find);
2016 if (entry) {
2017 if (entry->status == ESI_FORWARD_DIRECT) {
2018 /* Connection Ok */
2019 entry->last_used = jiffies;
2020 *ret_entry = entry;
2021 found = entry->vcc;
2022 goto out;
2024 /* If the LE_ARP cache entry is still pending, reset count to 0
2025 * so another LE_ARP request can be made for this frame.
2027 if (entry->status == ESI_ARP_PENDING) {
2028 entry->no_tries = 0;
2030 /* Data direct VC not yet set up, check to see if the unknown
2031 frame count is greater than the limit. If the limit has
2032 not been reached, allow the caller to send packet to
2033 BUS. */
2034 if (entry->status != ESI_FLUSH_PENDING &&
2035 entry->packets_flooded<priv->maximum_unknown_frame_count) {
2036 entry->packets_flooded++;
2037 DPRINTK("LEC_ARP: Flooding..\n");
2038 found = priv->mcast_vcc;
2039 goto out;
2041 /* We got here because entry->status == ESI_FLUSH_PENDING
2042 * or BUS flood limit was reached for an entry which is
2043 * in ESI_ARP_PENDING or ESI_VC_PENDING state.
2045 *ret_entry = entry;
2046 DPRINTK("lec: entry->status %d entry->vcc %p\n", entry->status, entry->vcc);
2047 found = NULL;
2048 } else {
2049 /* No matching entry was found */
2050 entry = make_entry(priv, mac_to_find);
2051 DPRINTK("LEC_ARP: Making entry\n");
2052 if (!entry) {
2053 found = priv->mcast_vcc;
2054 goto out;
2056 lec_arp_add(priv, entry);
2057 /* We want arp-request(s) to be sent */
2058 entry->packets_flooded =1;
2059 entry->status = ESI_ARP_PENDING;
2060 entry->no_tries = 1;
2061 entry->last_used = entry->timestamp = jiffies;
2062 entry->is_rdesc = is_rdesc;
2063 if (entry->is_rdesc)
2064 send_to_lecd(priv, l_rdesc_arp_xmt, mac_to_find, NULL, NULL);
2065 else
2066 send_to_lecd(priv, l_arp_xmt, mac_to_find, NULL, NULL);
2067 entry->timer.expires = jiffies + (1*HZ);
2068 entry->timer.function = lec_arp_expire_arp;
2069 add_timer(&entry->timer);
2070 found = priv->mcast_vcc;
2073 out:
2074 spin_unlock_irqrestore(&priv->lec_arp_lock, flags);
2075 return found;
2078 static int
2079 lec_addr_delete(struct lec_priv *priv, unsigned char *atm_addr,
2080 unsigned long permanent)
2082 unsigned long flags;
2083 struct lec_arp_table *entry, *next;
2084 int i;
2086 DPRINTK("lec_addr_delete\n");
2087 spin_lock_irqsave(&priv->lec_arp_lock, flags);
2088 for(i = 0; i < LEC_ARP_TABLE_SIZE; i++) {
2089 for(entry = priv->lec_arp_tables[i]; entry != NULL; entry = next) {
2090 next = entry->next;
2091 if (!memcmp(atm_addr, entry->atm_addr, ATM_ESA_LEN)
2092 && (permanent ||
2093 !(entry->flags & LEC_PERMANENT_FLAG))) {
2094 lec_arp_remove(priv, entry);
2095 kfree(entry);
2097 spin_unlock_irqrestore(&priv->lec_arp_lock, flags);
2098 return 0;
2101 spin_unlock_irqrestore(&priv->lec_arp_lock, flags);
2102 return -1;
2106 * Notifies: Response to arp_request (atm_addr != NULL)
2108 static void
2109 lec_arp_update(struct lec_priv *priv, unsigned char *mac_addr,
2110 unsigned char *atm_addr, unsigned long remoteflag,
2111 unsigned int targetless_le_arp)
2113 unsigned long flags;
2114 struct lec_arp_table *entry, *tmp;
2115 int i;
2117 DPRINTK("lec:%s", (targetless_le_arp) ? "targetless ": " ");
2118 DPRINTK("lec_arp_update mac:%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x\n",
2119 mac_addr[0],mac_addr[1],mac_addr[2],mac_addr[3],
2120 mac_addr[4],mac_addr[5]);
2122 spin_lock_irqsave(&priv->lec_arp_lock, flags);
2123 entry = lec_arp_find(priv, mac_addr);
2124 if (entry == NULL && targetless_le_arp)
2125 goto out; /* LANE2: ignore targetless LE_ARPs for which
2126 * we have no entry in the cache. 7.1.30
2128 if (priv->lec_arp_empty_ones) {
2129 entry = priv->lec_arp_empty_ones;
2130 if (!memcmp(entry->atm_addr, atm_addr, ATM_ESA_LEN)) {
2131 priv->lec_arp_empty_ones = entry->next;
2132 } else {
2133 while(entry->next && memcmp(entry->next->atm_addr,
2134 atm_addr, ATM_ESA_LEN))
2135 entry = entry->next;
2136 if (entry->next) {
2137 tmp = entry;
2138 entry = entry->next;
2139 tmp->next = entry->next;
2140 } else
2141 entry = NULL;
2144 if (entry) {
2145 del_timer(&entry->timer);
2146 tmp = lec_arp_find(priv, mac_addr);
2147 if (tmp) {
2148 del_timer(&tmp->timer);
2149 tmp->status = ESI_FORWARD_DIRECT;
2150 memcpy(tmp->atm_addr, atm_addr, ATM_ESA_LEN);
2151 tmp->vcc = entry->vcc;
2152 tmp->old_push = entry->old_push;
2153 tmp->last_used = jiffies;
2154 del_timer(&entry->timer);
2155 kfree(entry);
2156 entry=tmp;
2157 } else {
2158 entry->status = ESI_FORWARD_DIRECT;
2159 memcpy(entry->mac_addr, mac_addr, ETH_ALEN);
2160 entry->last_used = jiffies;
2161 lec_arp_add(priv, entry);
2163 if (remoteflag)
2164 entry->flags|=LEC_REMOTE_FLAG;
2165 else
2166 entry->flags&=~LEC_REMOTE_FLAG;
2167 DPRINTK("After update\n");
2168 dump_arp_table(priv);
2169 goto out;
2172 entry = lec_arp_find(priv, mac_addr);
2173 if (!entry) {
2174 entry = make_entry(priv, mac_addr);
2175 if (!entry)
2176 goto out;
2177 entry->status = ESI_UNKNOWN;
2178 lec_arp_add(priv, entry);
2179 /* Temporary, changes before end of function */
2181 memcpy(entry->atm_addr, atm_addr, ATM_ESA_LEN);
2182 del_timer(&entry->timer);
2183 for(i = 0; i < LEC_ARP_TABLE_SIZE; i++) {
2184 for(tmp = priv->lec_arp_tables[i]; tmp; tmp=tmp->next) {
2185 if (entry != tmp &&
2186 !memcmp(tmp->atm_addr, atm_addr,
2187 ATM_ESA_LEN)) {
2188 /* Vcc to this host exists */
2189 if (tmp->status > ESI_VC_PENDING) {
2191 * ESI_FLUSH_PENDING,
2192 * ESI_FORWARD_DIRECT
2194 entry->vcc = tmp->vcc;
2195 entry->old_push=tmp->old_push;
2197 entry->status=tmp->status;
2198 break;
2202 if (remoteflag)
2203 entry->flags|=LEC_REMOTE_FLAG;
2204 else
2205 entry->flags&=~LEC_REMOTE_FLAG;
2206 if (entry->status == ESI_ARP_PENDING ||
2207 entry->status == ESI_UNKNOWN) {
2208 entry->status = ESI_VC_PENDING;
2209 send_to_lecd(priv, l_svc_setup, entry->mac_addr, atm_addr, NULL);
2211 DPRINTK("After update2\n");
2212 dump_arp_table(priv);
2213 out:
2214 spin_unlock_irqrestore(&priv->lec_arp_lock, flags);
2218 * Notifies: Vcc setup ready
2220 static void
2221 lec_vcc_added(struct lec_priv *priv, struct atmlec_ioc *ioc_data,
2222 struct atm_vcc *vcc,
2223 void (*old_push)(struct atm_vcc *vcc, struct sk_buff *skb))
2225 unsigned long flags;
2226 struct lec_arp_table *entry;
2227 int i, found_entry=0;
2229 spin_lock_irqsave(&priv->lec_arp_lock, flags);
2230 if (ioc_data->receive == 2) {
2231 /* Vcc for Multicast Forward. No timer, LANEv2 7.1.20 and 2.3.5.3 */
2233 DPRINTK("LEC_ARP: Attaching mcast forward\n");
2234 #if 0
2235 entry = lec_arp_find(priv, bus_mac);
2236 if (!entry) {
2237 printk("LEC_ARP: Multicast entry not found!\n");
2238 goto out;
2240 memcpy(entry->atm_addr, ioc_data->atm_addr, ATM_ESA_LEN);
2241 entry->recv_vcc = vcc;
2242 entry->old_recv_push = old_push;
2243 #endif
2244 entry = make_entry(priv, bus_mac);
2245 if (entry == NULL)
2246 goto out;
2247 del_timer(&entry->timer);
2248 memcpy(entry->atm_addr, ioc_data->atm_addr, ATM_ESA_LEN);
2249 entry->recv_vcc = vcc;
2250 entry->old_recv_push = old_push;
2251 entry->next = priv->mcast_fwds;
2252 priv->mcast_fwds = entry;
2253 goto out;
2254 } else if (ioc_data->receive == 1) {
2255 /* Vcc which we don't want to make default vcc, attach it
2256 anyway. */
2257 DPRINTK("LEC_ARP:Attaching data direct, not default :%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x\n",
2258 ioc_data->atm_addr[0],ioc_data->atm_addr[1],
2259 ioc_data->atm_addr[2],ioc_data->atm_addr[3],
2260 ioc_data->atm_addr[4],ioc_data->atm_addr[5],
2261 ioc_data->atm_addr[6],ioc_data->atm_addr[7],
2262 ioc_data->atm_addr[8],ioc_data->atm_addr[9],
2263 ioc_data->atm_addr[10],ioc_data->atm_addr[11],
2264 ioc_data->atm_addr[12],ioc_data->atm_addr[13],
2265 ioc_data->atm_addr[14],ioc_data->atm_addr[15],
2266 ioc_data->atm_addr[16],ioc_data->atm_addr[17],
2267 ioc_data->atm_addr[18],ioc_data->atm_addr[19]);
2268 entry = make_entry(priv, bus_mac);
2269 if (entry == NULL)
2270 goto out;
2271 memcpy(entry->atm_addr, ioc_data->atm_addr, ATM_ESA_LEN);
2272 memset(entry->mac_addr, 0, ETH_ALEN);
2273 entry->recv_vcc = vcc;
2274 entry->old_recv_push = old_push;
2275 entry->status = ESI_UNKNOWN;
2276 entry->timer.expires = jiffies + priv->vcc_timeout_period;
2277 entry->timer.function = lec_arp_expire_vcc;
2278 add_timer(&entry->timer);
2279 entry->next = priv->lec_no_forward;
2280 priv->lec_no_forward = entry;
2281 dump_arp_table(priv);
2282 goto out;
2284 DPRINTK("LEC_ARP:Attaching data direct, default:%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x\n",
2285 ioc_data->atm_addr[0],ioc_data->atm_addr[1],
2286 ioc_data->atm_addr[2],ioc_data->atm_addr[3],
2287 ioc_data->atm_addr[4],ioc_data->atm_addr[5],
2288 ioc_data->atm_addr[6],ioc_data->atm_addr[7],
2289 ioc_data->atm_addr[8],ioc_data->atm_addr[9],
2290 ioc_data->atm_addr[10],ioc_data->atm_addr[11],
2291 ioc_data->atm_addr[12],ioc_data->atm_addr[13],
2292 ioc_data->atm_addr[14],ioc_data->atm_addr[15],
2293 ioc_data->atm_addr[16],ioc_data->atm_addr[17],
2294 ioc_data->atm_addr[18],ioc_data->atm_addr[19]);
2295 for (i = 0; i < LEC_ARP_TABLE_SIZE; i++) {
2296 for (entry = priv->lec_arp_tables[i]; entry; entry=entry->next) {
2297 if (memcmp(ioc_data->atm_addr, entry->atm_addr,
2298 ATM_ESA_LEN)==0) {
2299 DPRINTK("LEC_ARP: Attaching data direct\n");
2300 DPRINTK("Currently -> Vcc: %d, Rvcc:%d\n",
2301 entry->vcc?entry->vcc->vci:0,
2302 entry->recv_vcc?entry->recv_vcc->vci:0);
2303 found_entry=1;
2304 del_timer(&entry->timer);
2305 entry->vcc = vcc;
2306 entry->old_push = old_push;
2307 if (entry->status == ESI_VC_PENDING) {
2308 if(priv->maximum_unknown_frame_count
2309 ==0)
2310 entry->status =
2311 ESI_FORWARD_DIRECT;
2312 else {
2313 entry->timestamp = jiffies;
2314 entry->status =
2315 ESI_FLUSH_PENDING;
2316 #if 0
2317 send_to_lecd(priv,l_flush_xmt,
2318 NULL,
2319 entry->atm_addr,
2320 NULL);
2321 #endif
2323 } else {
2324 /* They were forming a connection
2325 to us, and we to them. Our
2326 ATM address is numerically lower
2327 than theirs, so we make connection
2328 we formed into default VCC (8.1.11).
2329 Connection they made gets torn
2330 down. This might confuse some
2331 clients. Can be changed if
2332 someone reports trouble... */
2338 if (found_entry) {
2339 DPRINTK("After vcc was added\n");
2340 dump_arp_table(priv);
2341 goto out;
2343 /* Not found, snatch address from first data packet that arrives from
2344 this vcc */
2345 entry = make_entry(priv, bus_mac);
2346 if (!entry)
2347 goto out;
2348 entry->vcc = vcc;
2349 entry->old_push = old_push;
2350 memcpy(entry->atm_addr, ioc_data->atm_addr, ATM_ESA_LEN);
2351 memset(entry->mac_addr, 0, ETH_ALEN);
2352 entry->status = ESI_UNKNOWN;
2353 entry->next = priv->lec_arp_empty_ones;
2354 priv->lec_arp_empty_ones = entry;
2355 entry->timer.expires = jiffies + priv->vcc_timeout_period;
2356 entry->timer.function = lec_arp_expire_vcc;
2357 add_timer(&entry->timer);
2358 DPRINTK("After vcc was added\n");
2359 dump_arp_table(priv);
2360 out:
2361 spin_unlock_irqrestore(&priv->lec_arp_lock, flags);
2364 static void
2365 lec_flush_complete(struct lec_priv *priv, unsigned long tran_id)
2367 unsigned long flags;
2368 struct lec_arp_table *entry;
2369 int i;
2371 DPRINTK("LEC:lec_flush_complete %lx\n",tran_id);
2372 spin_lock_irqsave(&priv->lec_arp_lock, flags);
2373 for (i = 0; i < LEC_ARP_TABLE_SIZE; i++) {
2374 for (entry = priv->lec_arp_tables[i]; entry; entry=entry->next) {
2375 if (entry->flush_tran_id == tran_id &&
2376 entry->status == ESI_FLUSH_PENDING) {
2377 struct sk_buff *skb;
2379 while ((skb = skb_dequeue(&entry->tx_wait)) != NULL)
2380 lec_send(entry->vcc, skb, entry->priv);
2381 entry->status = ESI_FORWARD_DIRECT;
2382 DPRINTK("LEC_ARP: Flushed\n");
2386 spin_unlock_irqrestore(&priv->lec_arp_lock, flags);
2387 dump_arp_table(priv);
2390 static void
2391 lec_set_flush_tran_id(struct lec_priv *priv,
2392 unsigned char *atm_addr, unsigned long tran_id)
2394 unsigned long flags;
2395 struct lec_arp_table *entry;
2396 int i;
2398 spin_lock_irqsave(&priv->lec_arp_lock, flags);
2399 for (i = 0; i < LEC_ARP_TABLE_SIZE; i++)
2400 for(entry = priv->lec_arp_tables[i]; entry; entry=entry->next)
2401 if (!memcmp(atm_addr, entry->atm_addr, ATM_ESA_LEN)) {
2402 entry->flush_tran_id = tran_id;
2403 DPRINTK("Set flush transaction id to %lx for %p\n",tran_id,entry);
2405 spin_unlock_irqrestore(&priv->lec_arp_lock, flags);
2408 static int
2409 lec_mcast_make(struct lec_priv *priv, struct atm_vcc *vcc)
2411 unsigned long flags;
2412 unsigned char mac_addr[] = {
2413 0xff, 0xff, 0xff, 0xff, 0xff, 0xff };
2414 struct lec_arp_table *to_add;
2415 struct lec_vcc_priv *vpriv;
2416 int err = 0;
2418 if (!(vpriv = kmalloc(sizeof(struct lec_vcc_priv), GFP_KERNEL)))
2419 return -ENOMEM;
2420 vpriv->xoff = 0;
2421 vpriv->old_pop = vcc->pop;
2422 vcc->user_back = vpriv;
2423 vcc->pop = lec_pop;
2424 spin_lock_irqsave(&priv->lec_arp_lock, flags);
2425 to_add = make_entry(priv, mac_addr);
2426 if (!to_add) {
2427 vcc->pop = vpriv->old_pop;
2428 kfree(vpriv);
2429 err = -ENOMEM;
2430 goto out;
2432 memcpy(to_add->atm_addr, vcc->remote.sas_addr.prv, ATM_ESA_LEN);
2433 to_add->status = ESI_FORWARD_DIRECT;
2434 to_add->flags |= LEC_PERMANENT_FLAG;
2435 to_add->vcc = vcc;
2436 to_add->old_push = vcc->push;
2437 vcc->push = lec_push;
2438 priv->mcast_vcc = vcc;
2439 lec_arp_add(priv, to_add);
2440 out:
2441 spin_unlock_irqrestore(&priv->lec_arp_lock, flags);
2442 return err;
2445 static void
2446 lec_vcc_close(struct lec_priv *priv, struct atm_vcc *vcc)
2448 unsigned long flags;
2449 struct lec_arp_table *entry, *next;
2450 int i;
2452 DPRINTK("LEC_ARP: lec_vcc_close vpi:%d vci:%d\n",vcc->vpi,vcc->vci);
2453 dump_arp_table(priv);
2454 spin_lock_irqsave(&priv->lec_arp_lock, flags);
2455 for(i=0;i<LEC_ARP_TABLE_SIZE;i++) {
2456 for(entry = priv->lec_arp_tables[i];entry; entry=next) {
2457 next = entry->next;
2458 if (vcc == entry->vcc) {
2459 lec_arp_remove(priv, entry);
2460 kfree(entry);
2461 if (priv->mcast_vcc == vcc) {
2462 priv->mcast_vcc = NULL;
2468 entry = priv->lec_arp_empty_ones;
2469 priv->lec_arp_empty_ones = NULL;
2470 while (entry != NULL) {
2471 next = entry->next;
2472 if (entry->vcc == vcc) { /* leave it out from the list */
2473 lec_arp_clear_vccs(entry);
2474 del_timer(&entry->timer);
2475 kfree(entry);
2477 else { /* put it back to the list */
2478 entry->next = priv->lec_arp_empty_ones;
2479 priv->lec_arp_empty_ones = entry;
2481 entry = next;
2484 entry = priv->lec_no_forward;
2485 priv->lec_no_forward = NULL;
2486 while (entry != NULL) {
2487 next = entry->next;
2488 if (entry->recv_vcc == vcc) {
2489 lec_arp_clear_vccs(entry);
2490 del_timer(&entry->timer);
2491 kfree(entry);
2493 else {
2494 entry->next = priv->lec_no_forward;
2495 priv->lec_no_forward = entry;
2497 entry = next;
2500 entry = priv->mcast_fwds;
2501 priv->mcast_fwds = NULL;
2502 while (entry != NULL) {
2503 next = entry->next;
2504 if (entry->recv_vcc == vcc) {
2505 lec_arp_clear_vccs(entry);
2506 /* No timer, LANEv2 7.1.20 and 2.3.5.3 */
2507 kfree(entry);
2509 else {
2510 entry->next = priv->mcast_fwds;
2511 priv->mcast_fwds = entry;
2513 entry = next;
2516 spin_unlock_irqrestore(&priv->lec_arp_lock, flags);
2517 dump_arp_table(priv);
2520 static void
2521 lec_arp_check_empties(struct lec_priv *priv,
2522 struct atm_vcc *vcc, struct sk_buff *skb)
2524 unsigned long flags;
2525 struct lec_arp_table *entry, *prev;
2526 struct lecdatahdr_8023 *hdr = (struct lecdatahdr_8023 *)skb->data;
2527 unsigned char *src;
2528 #ifdef CONFIG_TR
2529 struct lecdatahdr_8025 *tr_hdr = (struct lecdatahdr_8025 *)skb->data;
2531 if (priv->is_trdev) src = tr_hdr->h_source;
2532 else
2533 #endif
2534 src = hdr->h_source;
2536 spin_lock_irqsave(&priv->lec_arp_lock, flags);
2537 entry = priv->lec_arp_empty_ones;
2538 if (vcc == entry->vcc) {
2539 del_timer(&entry->timer);
2540 memcpy(entry->mac_addr, src, ETH_ALEN);
2541 entry->status = ESI_FORWARD_DIRECT;
2542 entry->last_used = jiffies;
2543 priv->lec_arp_empty_ones = entry->next;
2544 /* We might have got an entry */
2545 if ((prev = lec_arp_find(priv,src))) {
2546 lec_arp_remove(priv, prev);
2547 kfree(prev);
2549 lec_arp_add(priv, entry);
2550 goto out;
2552 prev = entry;
2553 entry = entry->next;
2554 while (entry && entry->vcc != vcc) {
2555 prev= entry;
2556 entry = entry->next;
2558 if (!entry) {
2559 DPRINTK("LEC_ARP: Arp_check_empties: entry not found!\n");
2560 goto out;
2562 del_timer(&entry->timer);
2563 memcpy(entry->mac_addr, src, ETH_ALEN);
2564 entry->status = ESI_FORWARD_DIRECT;
2565 entry->last_used = jiffies;
2566 prev->next = entry->next;
2567 if ((prev = lec_arp_find(priv, src))) {
2568 lec_arp_remove(priv, prev);
2569 kfree(prev);
2571 lec_arp_add(priv, entry);
2572 out:
2573 spin_unlock_irqrestore(&priv->lec_arp_lock, flags);
2575 MODULE_LICENSE("GPL");