Merge master.kernel.org:/pub/scm/linux/kernel/git/davem/net-2.6
[linux-2.6] / net / atm / lec.c
1 /*
2  * lec.c: Lan Emulation driver 
3  * Marko Kiiskila mkiiskila@yahoo.com
4  *
5  */
6
7 #include <linux/kernel.h>
8 #include <linux/bitops.h>
9 #include <linux/capability.h>
10
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>
26
27 /* TokenRing if needed */
28 #ifdef CONFIG_TR
29 #include <linux/trdevice.h>
30 #endif
31
32 /* And atm device */
33 #include <linux/atmdev.h>
34 #include <linux/atmlec.h>
35
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"
40
41 static unsigned char bridge_ula_lec[] = {0x01, 0x80, 0xc2, 0x00, 0x00};
42 #endif
43
44 /* Modular too */
45 #include <linux/module.h>
46 #include <linux/init.h>
47
48 #include "lec.h"
49 #include "lec_arpc.h"
50 #include "resources.h"
51
52 #if 0
53 #define DPRINTK printk
54 #else
55 #define DPRINTK(format,args...)
56 #endif
57
58 #define DUMP_PACKETS 0 /* 0 = None,
59                         * 1 = 30 first bytes
60                         * 2 = Whole packet
61                         */
62
63 #define LEC_UNRES_QUE_LEN 8 /* number of tx packets to queue for a
64                                single destination while waiting for SVC */
65
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);
82
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);
105
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 */
110 };
111
112 static unsigned char bus_mac[ETH_ALEN] = {0xff,0xff,0xff,0xff,0xff,0xff};
113
114 /* Device structures */
115 static struct net_device *dev_lec[MAX_LEC_ITF];
116
117 #if defined(CONFIG_BRIDGE) || defined(CONFIG_BRIDGE_MODULE)
118 static void lec_handle_bridge(struct sk_buff *skb, struct net_device *dev)
119 {
120         struct ethhdr *eth;
121         char *buff;
122         struct lec_priv *priv;
123
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;
133
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 */
141
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);
147         }
148
149         return;
150 }
151 #endif /* defined(CONFIG_BRIDGE) || defined(CONFIG_BRIDGE_MODULE) */
152
153 /*
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.
161  */
162 #ifdef CONFIG_TR
163 static unsigned char *get_tr_dst(unsigned char *packet, unsigned char *rdesc)
164 {
165         struct trh_hdr *trh;
166         int riflen, num_rdsc;
167         
168         trh = (struct trh_hdr *)packet;
169         if (trh->daddr[0] & (uint8_t)0x80)
170                 return bus_mac; /* multicast */
171
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 */
176         }
177         else
178                 return trh->daddr; /* not source routed */
179
180         if (riflen < 6)
181                 return trh->daddr; /* last hop, source routed */
182                 
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));
192         }
193
194         return NULL;
195 }
196 #endif /* CONFIG_TR */
197
198 /*
199  * Open/initialize the netdevice. This is called (in the current kernel)
200  * sometime after booting when the 'ifconfig' program is run.
201  *
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.
205  */
206
207 static int 
208 lec_open(struct net_device *dev)
209 {
210         struct lec_priv *priv = (struct lec_priv *)dev->priv;
211         
212         netif_start_queue(dev);
213         memset(&priv->stats,0,sizeof(struct net_device_stats));
214         
215         return 0;
216 }
217
218 static __inline__ void
219 lec_send(struct atm_vcc *vcc, struct sk_buff *skb, struct lec_priv *priv)
220 {
221         ATM_SKB(skb)->vcc = vcc;
222         ATM_SKB(skb)->atm_options = vcc->atm_options;
223
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;
228         }
229
230         priv->stats.tx_packets++;
231         priv->stats.tx_bytes += skb->len;
232 }
233
234 static void
235 lec_tx_timeout(struct net_device *dev)
236 {
237         printk(KERN_INFO "%s: tx timeout\n", dev->name);
238         dev->trans_start = jiffies;
239         netif_wake_queue(dev);
240 }
241
242 static int 
243 lec_start_xmit(struct sk_buff *skb, struct net_device *dev)
244 {
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 */
260         
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;
267         } 
268
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
276
277         /* Make sure we have room for lec_id */
278         if (skb_headroom(skb) < 2) {
279
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;
285         }
286         skb_push(skb, 2);
287
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); 
291
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;
300         }
301 #endif
302
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]);
309         }
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]);
313         }
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 */
320
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;
336                         }
337                         skb = skb2;
338                 }
339                 skb_put(skb, min_frame_size - skb->len);
340         }
341         
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;
351                 }
352         }
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);
372                 }
373                 return 0;
374         }
375                 
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 */
380                 
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);
387         }
388
389         lec_send(vcc, skb, priv);
390
391         if (!atm_may_send(vcc, 0)) {
392                 struct lec_vcc_priv *vpriv = LEC_VCC_PRIV(vcc);
393
394                 vpriv->xoff = 1;
395                 netif_stop_queue(dev);
396
397                 /*
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.
401                  */
402
403                 if (atm_may_send(vcc, 0))
404                         netif_wake_queue(dev);
405         }
406
407         dev->trans_start = jiffies;
408         return 0;
409 }
410
411 /* The inverse routine to net_open(). */
412 static int 
413 lec_close(struct net_device *dev) 
414 {
415         netif_stop_queue(dev);
416         return 0;
417 }
418
419 /*
420  * Get the current statistics.
421  * This may be called with the card open or closed.
422  */
423 static struct net_device_stats *
424 lec_get_stats(struct net_device *dev)
425 {
426         return &((struct lec_priv *)dev->priv)->stats;
427 }
428
429 static int 
430 lec_atm_send(struct atm_vcc *vcc, struct sk_buff *skb)
431 {
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 */
439
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];
449                 }    
450                 break;
451         case l_del_mac_addr:
452                 for(i=0;i<6;i++) {
453                         dev->dev_addr[i] = 0;
454                 }
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);
471
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);
486                 }
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;
522
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]);
528
529                 if (br_fdb_get_hook == NULL || dev->br_port == NULL)
530                         break;
531
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;
539
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;
545                         }
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);
552                 }
553                 if (f != NULL) br_fdb_put_hook(f);
554 #endif /* defined(CONFIG_BRIDGE) || defined(CONFIG_BRIDGE_MODULE) */
555                 }
556                 break;
557         default:
558                 printk("%s: Unknown message type %d\n", dev->name, mesg->type);
559                 dev_kfree_skb(skb);
560                 return -EINVAL;
561         }
562         dev_kfree_skb(skb);
563         return 0;
564 }
565
566 static void 
567 lec_atm_close(struct atm_vcc *vcc)
568 {
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;
572
573         priv->lecd = NULL;
574         /* Do something needful? */
575
576         netif_stop_queue(dev);
577         lec_arp_destroy(priv);
578
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);
585         }
586   
587         printk("%s: Shut down!\n", dev->name);
588         module_put(THIS_MODULE);
589 }
590
591 static struct atmdev_ops lecdev_ops = {
592         .close  = lec_atm_close,
593         .send   = lec_atm_send
594 };
595
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
601 };
602
603 /*
604  * LANE2: new argument struct sk_buff *data contains
605  * the LE_ARP based TLVs introduced in the LANE2 spec
606  */
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)
611 {
612         struct sock *sk;
613         struct sk_buff *skb;
614         struct atmlec_msg *mesg;
615
616         if (!priv || !priv->lecd) {
617                 return -1;
618         }
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);
634
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);
639
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);
645         }
646
647         return 0;
648 }
649
650 /* shamelessly stolen from drivers/net/net_init.c */
651 static int lec_change_mtu(struct net_device *dev, int new_mtu)
652 {
653         if ((new_mtu < 68) || (new_mtu > 18190))
654                 return -EINVAL;
655         dev->mtu = new_mtu;
656         return 0;
657 }
658
659 static void lec_set_multicast_list(struct net_device *dev)
660 {
661         /* by default, all multicast frames arrive over the bus.
662          * eventually support selective multicast service
663          */
664         return;
665 }
666
667 static void 
668 lec_init(struct net_device *dev)
669 {
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;
675
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;
681 }
682
683 static unsigned char lec_ctrl_magic[] = {
684         0xff,
685         0x00,
686         0x01,
687         0x01 };
688
689 #define LEC_DATA_DIRECT_8023  2
690 #define LEC_DATA_DIRECT_8025  3
691
692 static int lec_is_data_direct(struct atm_vcc *vcc)
693
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));
696
697
698 static void 
699 lec_push(struct atm_vcc *vcc, struct sk_buff *skb)
700 {
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; 
704
705 #if DUMP_PACKETS >0
706         int i=0;
707         char buf[300];
708
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;
716         }
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]);
723         }
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]);
727         }
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);
736
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;
743
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;
753                 }
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;
760
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.
763                  */
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);
776                         }
777                 }
778                 spin_unlock_irqrestore(&priv->lec_arp_lock, flags);
779
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;
785                 }
786                 if (priv->lec_arp_empty_ones) {
787                         lec_arp_check_empties(priv, vcc, skb);
788                 }
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);
800         }
801 }
802
803 static void
804 lec_pop(struct atm_vcc *vcc, struct sk_buff *skb)
805 {
806         struct lec_vcc_priv *vpriv = LEC_VCC_PRIV(vcc);
807         struct net_device *dev = skb->dev;
808
809         if (vpriv == NULL) {
810                 printk("lec_pop(): vpriv = NULL!?!?!?\n");
811                 return;
812         }
813
814         vpriv->old_pop(vcc, skb);
815
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);
820         }
821 }
822
823 static int 
824 lec_vcc_attach(struct atm_vcc *vcc, void __user *arg)
825 {
826         struct lec_vcc_priv *vpriv;
827         int bytes_left;
828         struct atmlec_ioc ioc_data;
829
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);
835         }
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;
850 }
851
852 static int 
853 lec_mcast_attach(struct atm_vcc *vcc, int arg)
854 {
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));
859 }
860
861 /* Initialize device. */
862 static int 
863 lecd_attach(struct atm_vcc *vcc, int arg)
864 {  
865         int i;
866         struct lec_priv *priv;
867
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;
881
882                 is_trdev = 0;
883                 if (i >= (MAX_LEC_ITF - NUM_TR_DEVS))
884                         is_trdev = 1;
885
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;
899                 }
900
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;
908         }
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));
914         
915         vcc->proto_data = dev_lec[i];
916         set_bit(ATM_VF_META,&vcc->flags);
917         set_bit(ATM_VF_READY,&vcc->flags);
918
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);
930
931         if (dev_lec[i]->flags & IFF_UP) {
932                 netif_start_queue(dev_lec[i]);
933         }
934         __module_get(THIS_MODULE);
935         return i;
936 }
937
938 #ifdef CONFIG_PROC_FS
939 static char* lec_arp_get_status_string(unsigned char status)
940 {
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"
948         };
949
950         if (status > ESI_FORWARD_DIRECT)
951                 status = 3;     /* ESI_UNDEFINED */
952         return lec_arp_status_string[status];
953 }
954
955 static void lec_info(struct seq_file *seq, struct lec_arp_table *entry)
956 {
957         int i;
958
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);
973         }
974         seq_putc(seq, '\n');
975 }
976
977
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;
986 };
987
988 static void *lec_tbl_walk(struct lec_state *state, struct lec_arp_table *tbl,
989                           loff_t *l)
990 {
991         struct lec_arp_table *e = state->entry;
992
993         if (!e)
994                 e = tbl;
995         if (e == (void *)1) {
996                 e = tbl;
997                 --*l;
998         }
999         for (; e; e = e->next) {
1000                 if (--*l < 0)
1001                         break;
1002         }
1003         state->entry = e;
1004         return (*l < 0) ? state : NULL;
1005 }
1006
1007 static void *lec_arp_walk(struct lec_state *state, loff_t *l,
1008                               struct lec_priv *priv)
1009 {
1010         void *v = NULL;
1011         int p;
1012
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;
1017         }
1018         state->arp_table = p;
1019         return v;
1020 }
1021
1022 static void *lec_misc_walk(struct lec_state *state, loff_t *l,
1023                            struct lec_priv *priv)
1024 {
1025         struct lec_arp_table *lec_misc_tables[] = {
1026                 priv->lec_arp_empty_ones,
1027                 priv->lec_no_forward,
1028                 priv->mcast_fwds
1029         };
1030         void *v = NULL;
1031         int q;
1032
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;
1037         }
1038         state->misc_table = q;
1039         return v;
1040 }
1041
1042 static void *lec_priv_walk(struct lec_state *state, loff_t *l,
1043                            struct lec_priv *priv)
1044 {
1045         if (!state->locked) {
1046                 state->locked = priv;
1047                 spin_lock_irqsave(&priv->lec_arp_lock, state->flags);
1048         }
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;
1055         }
1056         return state->locked;
1057 }
1058
1059 static void *lec_itf_walk(struct lec_state *state, loff_t *l)
1060 {
1061         struct net_device *dev;
1062         void *v;
1063
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;
1070         }
1071         state->dev = dev;
1072         return v;
1073 }
1074
1075 static void *lec_get_idx(struct lec_state *state, loff_t l)
1076 {
1077         void *v = NULL;
1078
1079         for (; state->itf < MAX_LEC_ITF; state->itf++) {
1080                 v = lec_itf_walk(state, &l);
1081                 if (v)
1082                         break;
1083         }
1084         return v; 
1085 }
1086
1087 static void *lec_seq_start(struct seq_file *seq, loff_t *pos)
1088 {
1089         struct lec_state *state = seq->private;
1090
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;
1097
1098         return *pos ? lec_get_idx(state, *pos) : (void*)1;
1099 }
1100
1101 static void lec_seq_stop(struct seq_file *seq, void *v)
1102 {
1103         struct lec_state *state = seq->private;
1104
1105         if (state->dev) {
1106                 spin_unlock_irqrestore(&state->locked->lec_arp_lock,
1107                                        state->flags);
1108                 dev_put(state->dev);
1109         }
1110 }
1111
1112 static void *lec_seq_next(struct seq_file *seq, void *v, loff_t *pos)
1113 {
1114         struct lec_state *state = seq->private;
1115
1116         v = lec_get_idx(state, 1);
1117         *pos += !!PTR_ERR(v);
1118         return v;
1119 }
1120
1121 static int lec_seq_show(struct seq_file *seq, void *v)
1122 {
1123         static char lec_banner[] = "Itf  MAC          ATM destination" 
1124                 "                          Status            Flags "
1125                 "VPI/VCI Recv VPI/VCI\n";
1126
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; 
1132
1133                 seq_printf(seq, "%s ", dev->name);
1134                 lec_info(seq, state->entry);
1135         }
1136         return 0;
1137 }
1138
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,
1144 };
1145
1146 static int lec_seq_open(struct inode *inode, struct file *file)
1147 {
1148         struct lec_state *state;
1149         struct seq_file *seq;
1150         int rc = -EAGAIN;
1151
1152         state = kmalloc(sizeof(*state), GFP_KERNEL);
1153         if (!state) {
1154                 rc = -ENOMEM;
1155                 goto out;
1156         }
1157
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;
1165
1166 out_kfree:
1167         kfree(state);
1168         goto out;
1169 }
1170
1171 static int lec_seq_release(struct inode *inode, struct file *file)
1172 {
1173         return seq_release_private(inode, file);
1174 }
1175
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,
1182 };
1183 #endif
1184
1185 static int lane_ioctl(struct socket *sock, unsigned int cmd, unsigned long arg)
1186 {
1187         struct atm_vcc *vcc = ATM_SD(sock);
1188         int err = 0;
1189         
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;
1199         }
1200
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;
1213         }
1214
1215         return err;
1216 }
1217
1218 static struct atm_ioctl lane_ioctl_ops = {
1219         .owner  = THIS_MODULE,
1220         .ioctl  = lane_ioctl,
1221 };
1222
1223 static int __init lane_module_init(void)
1224 {
1225 #ifdef CONFIG_PROC_FS
1226         struct proc_dir_entry *p;
1227
1228         p = create_proc_entry("lec", S_IRUGO, atm_proc_root);
1229         if (p)
1230                 p->proc_fops = &lec_seq_fops;
1231 #endif
1232
1233         register_atm_ioctl(&lane_ioctl_ops);
1234         printk("lec.c: " __DATE__ " " __TIME__ " initialized\n");
1235         return 0;
1236 }
1237
1238 static void __exit lane_module_cleanup(void)
1239 {
1240         int i;
1241         struct lec_priv *priv;
1242
1243         remove_proc_entry("lec", atm_proc_root);
1244
1245         deregister_atm_ioctl(&lane_ioctl_ops);
1246
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;
1253                 }
1254         }
1255
1256         return;                                    
1257 }
1258
1259 module_init(lane_module_init);
1260 module_exit(lane_module_cleanup);
1261
1262 /*
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
1268  */
1269 static int lane2_resolve(struct net_device *dev, u8 *dst_mac, int force,
1270     u8 **tlvs, u32 *sizeoftlvs)
1271 {
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;
1277
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;
1284                 
1285                 *tlvs = kmalloc(table->sizeoftlvs, GFP_ATOMIC);
1286                 if (*tlvs == NULL)
1287                         return -1;
1288                 
1289                 memcpy(*tlvs, table->tlvs, table->sizeoftlvs);
1290                 *sizeoftlvs = table->sizeoftlvs;
1291                 
1292                 return 0;
1293         }
1294
1295         if (sizeoftlvs == NULL)
1296                 retval = send_to_lecd(priv, l_arp_xmt, dst_mac, NULL, NULL);
1297                 
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);
1305         }
1306         return retval;
1307 }        
1308
1309
1310 /*
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)
1315  *
1316  */
1317 static int lane2_associate_req (struct net_device *dev, u8 *lan_dst,
1318                          u8 *tlvs, u32 sizeoftlvs)
1319 {
1320         int retval;
1321         struct sk_buff *skb;
1322         struct lec_priv *priv = (struct lec_priv*)dev->priv;
1323
1324         if (compare_ether_addr(lan_dst, dev->dev_addr))
1325                 return (0);       /* not our mac address */
1326
1327         kfree(priv->tlvs); /* NULL if there was no previous association */
1328
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);
1334
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
1345          */
1346         return (1);
1347 }
1348
1349 /*
1350  * LANE2: 3.1.5, LE_ASSOCIATE.indication
1351  *
1352  */
1353 static void lane2_associate_ind (struct net_device *dev, u8 *mac_addr,
1354     u8 *tlvs, u32 sizeoftlvs)
1355 {
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);
1363
1364         if (entry == NULL)
1365                 return;     /* should not happen */
1366
1367         kfree(entry->tlvs);
1368
1369         entry->tlvs = kmalloc(sizeoftlvs, GFP_KERNEL);
1370         if (entry->tlvs == NULL)
1371                 return;
1372
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++]);
1381         
1382         printk("\n");
1383 #endif
1384
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);
1389         }
1390         return;
1391 }
1392
1393 /*
1394  * Here starts what used to lec_arpc.c
1395  *
1396  * lec_arpc.c was added here when making
1397  * lane client modular. October 1997
1398  *
1399  */
1400
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>
1408
1409
1410 #if 0
1411 #define DPRINTK(format,args...)
1412 /*
1413 #define DPRINTK printk
1414 */
1415 #endif
1416 #define DEBUG_ARP_TABLE 0
1417
1418 #define LEC_ARP_REFRESH_INTERVAL (3*HZ)
1419
1420 static void lec_arp_check_expire(unsigned long data);
1421 static void lec_arp_expire_arp(unsigned long data);
1422
1423 /* 
1424  * Arp table funcs
1425  */
1426
1427 #define HASH(ch) (ch & (LEC_ARP_TABLE_SIZE -1))
1428
1429 /*
1430  * Initialization of arp-cache
1431  */
1432 static void 
1433 lec_arp_init(struct lec_priv *priv)
1434 {
1435         unsigned short i;
1436
1437         for (i = 0; i < LEC_ARP_TABLE_SIZE; i++) {
1438                 priv->lec_arp_tables[i] = NULL;
1439         }        
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);
1446 }
1447
1448 static void
1449 lec_arp_clear_vccs(struct lec_arp_table *entry)
1450 {
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;
1455
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;
1464         }
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;
1469         }        
1470 }
1471
1472 /*
1473  * Insert entry to lec_arp_table
1474  * LANE2: Add to the end of the list to satisfy 8.1.13
1475  */
1476 static inline void 
1477 lec_arp_add(struct lec_priv *priv, struct lec_arp_table *to_add)
1478 {
1479         unsigned short place;
1480         struct lec_arp_table *tmp;
1481
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;
1487   
1488         else {  /* add to the end */
1489                 while (tmp->next)
1490                         tmp = tmp->next;
1491                 tmp->next = to_add;
1492         }
1493
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]);
1498 }
1499
1500 /*
1501  * Remove entry from lec_arp_table
1502  */
1503 static int 
1504 lec_arp_remove(struct lec_priv *priv,
1505                struct lec_arp_table *to_remove)
1506 {
1507         unsigned short place;
1508         struct lec_arp_table *tmp;
1509         int remove_vcc=1;
1510
1511         if (!to_remove) {
1512                 return -1;
1513         }
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;
1521                 }
1522                 if (!tmp) {/* Entry was not found */
1523                         return -1;
1524                 }
1525         }
1526         tmp->next = to_remove->next;
1527         del_timer(&to_remove->timer);
1528   
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) {
1532                 /*
1533                  * ESI_FLUSH_PENDING, ESI_FORWARD_DIRECT
1534                  */
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;
1541                                 }
1542                         }
1543                 }
1544                 if (remove_vcc)
1545                         lec_arp_clear_vccs(to_remove);
1546         }
1547         skb_queue_purge(&to_remove->tx_wait); /* FIXME: good place for this? */
1548
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;
1554 }
1555
1556 #if DEBUG_ARP_TABLE
1557 static char*
1558 get_status_string(unsigned char st)
1559 {
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>";
1573         }
1574 }
1575 #endif
1576
1577 static void
1578 dump_arp_table(struct lec_priv *priv)
1579 {
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;
1591
1592
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);
1604                         }
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);
1610                         }      
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;
1625                 }
1626                 printk("%s",buf);
1627         }
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);
1637                 }
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);
1642                 }      
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);
1658         }
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);
1668                 }
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);
1673                 }      
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);
1689         }
1690
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);
1700                 }
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);
1705                 }      
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);
1721         }
1722
1723 #endif
1724 }
1725
1726 /*
1727  * Destruction of arp-cache
1728  */
1729 static void
1730 lec_arp_destroy(struct lec_priv *priv)
1731 {
1732         unsigned long flags;
1733         struct lec_arp_table *entry, *next;
1734         int i;
1735
1736         del_timer_sync(&priv->lec_arp_timer);
1737         
1738         /*
1739          * Remove all entries
1740          */
1741
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);
1748                 }
1749         }
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;
1757         }
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;
1766         }
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;
1775         }
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);
1781 }
1782
1783
1784 /* 
1785  * Find entry by mac_address
1786  */
1787 static struct lec_arp_table*
1788 lec_arp_find(struct lec_priv *priv,
1789              unsigned char *mac_addr)
1790 {
1791         unsigned short place;
1792         struct lec_arp_table *to_return;
1793
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]);
1798   
1799         to_return = priv->lec_arp_tables[place];
1800         while(to_return) {
1801                 if (!compare_ether_addr(mac_addr, to_return->mac_addr)) {
1802                         return to_return;
1803                 }
1804                 to_return = to_return->next;
1805         }
1806         return NULL;
1807 }
1808
1809 static struct lec_arp_table*
1810 make_entry(struct lec_priv *priv, unsigned char *mac_addr)
1811 {
1812         struct lec_arp_table *to_return;
1813
1814         to_return = kzalloc(sizeof(struct lec_arp_table), GFP_ATOMIC);
1815         if (!to_return) {
1816                 printk("LEC: Arp entry kmalloc failed\n");
1817                 return NULL;
1818         }
1819         memcpy(to_return->mac_addr, mac_addr, ETH_ALEN);
1820         init_timer(&to_return->timer);
1821         to_return->timer.function = lec_arp_expire_arp;
1822         to_return->timer.data = (unsigned long) to_return;
1823         to_return->last_used = jiffies;
1824         to_return->priv = priv;
1825         skb_queue_head_init(&to_return->tx_wait);
1826         return to_return;
1827 }
1828
1829 /*
1830  *
1831  * Arp sent timer expired
1832  *
1833  */
1834 static void
1835 lec_arp_expire_arp(unsigned long data)
1836 {
1837         struct lec_arp_table *entry;
1838
1839         entry = (struct lec_arp_table *)data;
1840
1841         DPRINTK("lec_arp_expire_arp\n");
1842         if (entry->status == ESI_ARP_PENDING) {
1843                 if (entry->no_tries <= entry->priv->max_retry_count) {
1844                         if (entry->is_rdesc)
1845                                 send_to_lecd(entry->priv, l_rdesc_arp_xmt, entry->mac_addr, NULL, NULL);
1846                         else
1847                                 send_to_lecd(entry->priv, l_arp_xmt, entry->mac_addr, NULL, NULL);
1848                         entry->no_tries++;
1849                 }
1850                 mod_timer(&entry->timer, jiffies + (1*HZ));
1851         }
1852 }
1853
1854 /*
1855  *
1856  * Unknown/unused vcc expire, remove associated entry
1857  *
1858  */
1859 static void
1860 lec_arp_expire_vcc(unsigned long data)
1861 {
1862         unsigned long flags;
1863         struct lec_arp_table *to_remove = (struct lec_arp_table*)data;
1864         struct lec_priv *priv = (struct lec_priv *)to_remove->priv;
1865         struct lec_arp_table *entry = NULL;
1866
1867         del_timer(&to_remove->timer);
1868
1869         DPRINTK("LEC_ARP %p %p: lec_arp_expire_vcc vpi:%d vci:%d\n",
1870                 to_remove, priv, 
1871                 to_remove->vcc?to_remove->recv_vcc->vpi:0,
1872                 to_remove->vcc?to_remove->recv_vcc->vci:0);
1873         DPRINTK("eo:%p nf:%p\n",priv->lec_arp_empty_ones,priv->lec_no_forward);
1874
1875         spin_lock_irqsave(&priv->lec_arp_lock, flags);
1876         if (to_remove == priv->lec_arp_empty_ones)
1877                 priv->lec_arp_empty_ones = to_remove->next;
1878         else {
1879                 entry = priv->lec_arp_empty_ones;
1880                 while (entry && entry->next != to_remove)
1881                         entry = entry->next;
1882                 if (entry)
1883                         entry->next = to_remove->next;
1884         }
1885         if (!entry) {
1886                 if (to_remove == priv->lec_no_forward) {
1887                         priv->lec_no_forward = to_remove->next;
1888                 } else {
1889                         entry = priv->lec_no_forward;
1890                         while (entry && entry->next != to_remove)
1891                                 entry = entry->next;
1892                         if (entry)
1893                                 entry->next = to_remove->next;
1894                 }
1895         }
1896         spin_unlock_irqrestore(&priv->lec_arp_lock, flags);
1897
1898         lec_arp_clear_vccs(to_remove);
1899         kfree(to_remove);
1900 }
1901
1902 /*
1903  * Expire entries.
1904  * 1. Re-set timer
1905  * 2. For each entry, delete entries that have aged past the age limit.
1906  * 3. For each entry, depending on the status of the entry, perform
1907  *    the following maintenance.
1908  *    a. If status is ESI_VC_PENDING or ESI_ARP_PENDING then if the
1909  *       tick_count is above the max_unknown_frame_time, clear
1910  *       the tick_count to zero and clear the packets_flooded counter
1911  *       to zero. This supports the packet rate limit per address
1912  *       while flooding unknowns.
1913  *    b. If the status is ESI_FLUSH_PENDING and the tick_count is greater
1914  *       than or equal to the path_switching_delay, change the status
1915  *       to ESI_FORWARD_DIRECT. This causes the flush period to end
1916  *       regardless of the progress of the flush protocol.
1917  */
1918 static void
1919 lec_arp_check_expire(unsigned long data)
1920 {
1921         unsigned long flags;
1922         struct lec_priv *priv = (struct lec_priv *)data;
1923         struct lec_arp_table *entry, *next;
1924         unsigned long now;
1925         unsigned long time_to_check;
1926         int i;
1927
1928         DPRINTK("lec_arp_check_expire %p\n",priv);
1929         DPRINTK("expire: eo:%p nf:%p\n",priv->lec_arp_empty_ones,
1930                 priv->lec_no_forward);
1931         now = jiffies;
1932         spin_lock_irqsave(&priv->lec_arp_lock, flags);
1933         for(i = 0; i < LEC_ARP_TABLE_SIZE; i++) {
1934                 for(entry = priv->lec_arp_tables[i]; entry != NULL; ) {
1935                         if ((entry->flags) & LEC_REMOTE_FLAG && 
1936                             priv->topology_change)
1937                                 time_to_check = priv->forward_delay_time;
1938                         else
1939                                 time_to_check = priv->aging_time;
1940
1941                         DPRINTK("About to expire: %lx - %lx > %lx\n",
1942                                 now,entry->last_used, time_to_check);
1943                         if( time_after(now, entry->last_used+
1944                            time_to_check) && 
1945                             !(entry->flags & LEC_PERMANENT_FLAG) &&
1946                             !(entry->mac_addr[0] & 0x01) ) { /* LANE2: 7.1.20 */
1947                                 /* Remove entry */
1948                                 DPRINTK("LEC:Entry timed out\n");
1949                                 next = entry->next;      
1950                                 lec_arp_remove(priv, entry);
1951                                 kfree(entry);
1952                                 entry = next;
1953                         } else {
1954                                 /* Something else */
1955                                 if ((entry->status == ESI_VC_PENDING ||
1956                                      entry->status == ESI_ARP_PENDING) 
1957                                     && time_after_eq(now,
1958                                     entry->timestamp +
1959                                     priv->max_unknown_frame_time)) {
1960                                         entry->timestamp = jiffies;
1961                                         entry->packets_flooded = 0;
1962                                         if (entry->status == ESI_VC_PENDING)
1963                                                 send_to_lecd(priv, l_svc_setup, entry->mac_addr, entry->atm_addr, NULL);
1964                                 }
1965                                 if (entry->status == ESI_FLUSH_PENDING 
1966                                    &&
1967                                    time_after_eq(now, entry->timestamp+
1968                                    priv->path_switching_delay)) {
1969                                         struct sk_buff *skb;
1970
1971                                         while ((skb = skb_dequeue(&entry->tx_wait)) != NULL)
1972                                                 lec_send(entry->vcc, skb, entry->priv);
1973                                         entry->last_used = jiffies;
1974                                         entry->status = 
1975                                                 ESI_FORWARD_DIRECT;
1976                                 }
1977                                 entry = entry->next;
1978                         }
1979                 }
1980         }
1981         spin_unlock_irqrestore(&priv->lec_arp_lock, flags);
1982
1983         mod_timer(&priv->lec_arp_timer, jiffies + LEC_ARP_REFRESH_INTERVAL);
1984 }
1985 /*
1986  * Try to find vcc where mac_address is attached.
1987  * 
1988  */
1989 static struct atm_vcc*
1990 lec_arp_resolve(struct lec_priv *priv, unsigned char *mac_to_find,
1991                 int is_rdesc, struct lec_arp_table **ret_entry)
1992 {
1993         unsigned long flags;
1994         struct lec_arp_table *entry;
1995         struct atm_vcc *found;
1996
1997         if (mac_to_find[0] & 0x01) {
1998                 switch (priv->lane_version) {
1999                 case 1:
2000                         return priv->mcast_vcc;
2001                         break;
2002                 case 2:  /* LANE2 wants arp for multicast addresses */
2003                         if (!compare_ether_addr(mac_to_find, bus_mac))
2004                                 return priv->mcast_vcc;
2005                         break;
2006                 default:
2007                         break;
2008                 }
2009         }
2010
2011         spin_lock_irqsave(&priv->lec_arp_lock, flags);
2012         entry = lec_arp_find(priv, mac_to_find);
2013   
2014         if (entry) {
2015                 if (entry->status == ESI_FORWARD_DIRECT) {
2016                         /* Connection Ok */
2017                         entry->last_used = jiffies;
2018                         *ret_entry = entry;
2019                         found = entry->vcc;
2020                         goto out;
2021                 }
2022                 /* If the LE_ARP cache entry is still pending, reset count to 0
2023                  * so another LE_ARP request can be made for this frame.
2024                  */
2025                 if (entry->status == ESI_ARP_PENDING) {
2026                         entry->no_tries = 0;
2027                 }
2028                 /* Data direct VC not yet set up, check to see if the unknown
2029                    frame count is greater than the limit. If the limit has
2030                    not been reached, allow the caller to send packet to
2031                    BUS. */
2032                 if (entry->status != ESI_FLUSH_PENDING &&
2033                     entry->packets_flooded<priv->maximum_unknown_frame_count) {
2034                         entry->packets_flooded++;
2035                         DPRINTK("LEC_ARP: Flooding..\n");
2036                         found = priv->mcast_vcc;
2037                         goto out;
2038                 }
2039                 /* We got here because entry->status == ESI_FLUSH_PENDING
2040                  * or BUS flood limit was reached for an entry which is
2041                  * in ESI_ARP_PENDING or ESI_VC_PENDING state.
2042                  */
2043                 *ret_entry = entry;
2044                 DPRINTK("lec: entry->status %d entry->vcc %p\n", entry->status, entry->vcc);
2045                 found = NULL;
2046         } else {
2047                 /* No matching entry was found */
2048                 entry = make_entry(priv, mac_to_find);
2049                 DPRINTK("LEC_ARP: Making entry\n");
2050                 if (!entry) {
2051                         found = priv->mcast_vcc;
2052                         goto out;
2053                 }
2054                 lec_arp_add(priv, entry);
2055                 /* We want arp-request(s) to be sent */
2056                 entry->packets_flooded =1;
2057                 entry->status = ESI_ARP_PENDING;
2058                 entry->no_tries = 1;
2059                 entry->last_used = entry->timestamp = jiffies;
2060                 entry->is_rdesc = is_rdesc;
2061                 if (entry->is_rdesc)
2062                         send_to_lecd(priv, l_rdesc_arp_xmt, mac_to_find, NULL, NULL);
2063                 else
2064                         send_to_lecd(priv, l_arp_xmt, mac_to_find, NULL, NULL);
2065                 entry->timer.expires = jiffies + (1*HZ);
2066                 entry->timer.function = lec_arp_expire_arp;
2067                 add_timer(&entry->timer);
2068                 found = priv->mcast_vcc;
2069         }
2070
2071 out:
2072         spin_unlock_irqrestore(&priv->lec_arp_lock, flags);
2073         return found;
2074 }
2075
2076 static int
2077 lec_addr_delete(struct lec_priv *priv, unsigned char *atm_addr, 
2078                 unsigned long permanent)
2079 {
2080         unsigned long flags;
2081         struct lec_arp_table *entry, *next;
2082         int i;
2083
2084         DPRINTK("lec_addr_delete\n");
2085         spin_lock_irqsave(&priv->lec_arp_lock, flags);
2086         for(i = 0; i < LEC_ARP_TABLE_SIZE; i++) {
2087                 for(entry = priv->lec_arp_tables[i]; entry != NULL; entry = next) {
2088                         next = entry->next;
2089                         if (!memcmp(atm_addr, entry->atm_addr, ATM_ESA_LEN)
2090                             && (permanent || 
2091                                 !(entry->flags & LEC_PERMANENT_FLAG))) {
2092                                 lec_arp_remove(priv, entry);
2093                                 kfree(entry);
2094                         }
2095                         spin_unlock_irqrestore(&priv->lec_arp_lock, flags);
2096                         return 0;
2097                 }
2098         }
2099         spin_unlock_irqrestore(&priv->lec_arp_lock, flags);
2100         return -1;
2101 }
2102
2103 /*
2104  * Notifies:  Response to arp_request (atm_addr != NULL) 
2105  */
2106 static void
2107 lec_arp_update(struct lec_priv *priv, unsigned char *mac_addr,
2108                unsigned char *atm_addr, unsigned long remoteflag,
2109                unsigned int targetless_le_arp)
2110 {
2111         unsigned long flags;
2112         struct lec_arp_table *entry, *tmp;
2113         int i;
2114
2115         DPRINTK("lec:%s", (targetless_le_arp) ? "targetless ": " ");
2116         DPRINTK("lec_arp_update mac:%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x\n",
2117                 mac_addr[0],mac_addr[1],mac_addr[2],mac_addr[3],
2118                 mac_addr[4],mac_addr[5]);
2119
2120         spin_lock_irqsave(&priv->lec_arp_lock, flags);
2121         entry = lec_arp_find(priv, mac_addr);
2122         if (entry == NULL && targetless_le_arp)
2123                 goto out;   /* LANE2: ignore targetless LE_ARPs for which
2124                              * we have no entry in the cache. 7.1.30
2125                              */
2126         if (priv->lec_arp_empty_ones) {
2127                 entry = priv->lec_arp_empty_ones;
2128                 if (!memcmp(entry->atm_addr, atm_addr, ATM_ESA_LEN)) {
2129                         priv->lec_arp_empty_ones = entry->next;
2130                 } else {
2131                         while(entry->next && memcmp(entry->next->atm_addr, 
2132                                                     atm_addr, ATM_ESA_LEN))
2133                                 entry = entry->next;
2134                         if (entry->next) {
2135                                 tmp = entry;
2136                                 entry = entry->next;
2137                                 tmp->next = entry->next;
2138                         } else
2139                                 entry = NULL;
2140                         
2141                 }
2142                 if (entry) {
2143                         del_timer(&entry->timer);
2144                         tmp = lec_arp_find(priv, mac_addr);
2145                         if (tmp) {
2146                                 del_timer(&tmp->timer);
2147                                 tmp->status = ESI_FORWARD_DIRECT;
2148                                 memcpy(tmp->atm_addr, atm_addr, ATM_ESA_LEN);
2149                                 tmp->vcc = entry->vcc;
2150                                 tmp->old_push = entry->old_push;
2151                                 tmp->last_used = jiffies;
2152                                 del_timer(&entry->timer);
2153                                 kfree(entry);
2154                                 entry=tmp;
2155                         } else {
2156                                 entry->status = ESI_FORWARD_DIRECT;
2157                                 memcpy(entry->mac_addr, mac_addr, ETH_ALEN);
2158                                 entry->last_used = jiffies;
2159                                 lec_arp_add(priv, entry);
2160                         }
2161                         if (remoteflag)
2162                                 entry->flags|=LEC_REMOTE_FLAG;
2163                         else
2164                                 entry->flags&=~LEC_REMOTE_FLAG;
2165                         DPRINTK("After update\n");
2166                         dump_arp_table(priv);
2167                         goto out;
2168                 }
2169         }
2170         entry = lec_arp_find(priv, mac_addr);
2171         if (!entry) {
2172                 entry = make_entry(priv, mac_addr);
2173                 if (!entry)
2174                         goto out;
2175                 entry->status = ESI_UNKNOWN;
2176                 lec_arp_add(priv, entry);
2177                 /* Temporary, changes before end of function */
2178         }
2179         memcpy(entry->atm_addr, atm_addr, ATM_ESA_LEN);
2180         del_timer(&entry->timer);
2181         for(i = 0; i < LEC_ARP_TABLE_SIZE; i++) {
2182                 for(tmp = priv->lec_arp_tables[i]; tmp; tmp=tmp->next) {
2183                         if (entry != tmp &&
2184                             !memcmp(tmp->atm_addr, atm_addr,
2185                                     ATM_ESA_LEN)) { 
2186                                 /* Vcc to this host exists */
2187                                 if (tmp->status > ESI_VC_PENDING) {
2188                                         /*
2189                                          * ESI_FLUSH_PENDING,
2190                                          * ESI_FORWARD_DIRECT
2191                                          */
2192                                         entry->vcc = tmp->vcc;
2193                                         entry->old_push=tmp->old_push;
2194                                 }
2195                                 entry->status=tmp->status;
2196                                 break;
2197                         }
2198                 }
2199         }
2200         if (remoteflag)
2201                 entry->flags|=LEC_REMOTE_FLAG;
2202         else
2203                 entry->flags&=~LEC_REMOTE_FLAG;
2204         if (entry->status == ESI_ARP_PENDING ||
2205             entry->status == ESI_UNKNOWN) {
2206                 entry->status = ESI_VC_PENDING;
2207                 send_to_lecd(priv, l_svc_setup, entry->mac_addr, atm_addr, NULL);
2208         }
2209         DPRINTK("After update2\n");
2210         dump_arp_table(priv);
2211 out:
2212         spin_unlock_irqrestore(&priv->lec_arp_lock, flags);
2213 }
2214
2215 /*
2216  * Notifies: Vcc setup ready 
2217  */
2218 static void
2219 lec_vcc_added(struct lec_priv *priv, struct atmlec_ioc *ioc_data,
2220               struct atm_vcc *vcc,
2221               void (*old_push)(struct atm_vcc *vcc, struct sk_buff *skb))
2222 {
2223         unsigned long flags;
2224         struct lec_arp_table *entry;
2225         int i, found_entry=0;
2226
2227         spin_lock_irqsave(&priv->lec_arp_lock, flags);
2228         if (ioc_data->receive == 2) {
2229                 /* Vcc for Multicast Forward. No timer, LANEv2 7.1.20 and 2.3.5.3 */
2230
2231                 DPRINTK("LEC_ARP: Attaching mcast forward\n");
2232 #if 0
2233                 entry = lec_arp_find(priv, bus_mac);
2234                 if (!entry) {
2235                         printk("LEC_ARP: Multicast entry not found!\n");
2236                         goto out;
2237                 }
2238                 memcpy(entry->atm_addr, ioc_data->atm_addr, ATM_ESA_LEN);
2239                 entry->recv_vcc = vcc;
2240                 entry->old_recv_push = old_push;
2241 #endif
2242                 entry = make_entry(priv, bus_mac);
2243                 if (entry == NULL)
2244                         goto out;
2245                 del_timer(&entry->timer);
2246                 memcpy(entry->atm_addr, ioc_data->atm_addr, ATM_ESA_LEN);
2247                 entry->recv_vcc = vcc;
2248                 entry->old_recv_push = old_push;
2249                 entry->next = priv->mcast_fwds;
2250                 priv->mcast_fwds = entry;
2251                 goto out;
2252         } else if (ioc_data->receive == 1) {
2253                 /* Vcc which we don't want to make default vcc, attach it
2254                    anyway. */
2255                 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",
2256                         ioc_data->atm_addr[0],ioc_data->atm_addr[1],
2257                         ioc_data->atm_addr[2],ioc_data->atm_addr[3],
2258                         ioc_data->atm_addr[4],ioc_data->atm_addr[5],
2259                         ioc_data->atm_addr[6],ioc_data->atm_addr[7],
2260                         ioc_data->atm_addr[8],ioc_data->atm_addr[9],
2261                         ioc_data->atm_addr[10],ioc_data->atm_addr[11],
2262                         ioc_data->atm_addr[12],ioc_data->atm_addr[13],
2263                         ioc_data->atm_addr[14],ioc_data->atm_addr[15],
2264                         ioc_data->atm_addr[16],ioc_data->atm_addr[17],
2265                         ioc_data->atm_addr[18],ioc_data->atm_addr[19]);
2266                 entry = make_entry(priv, bus_mac);
2267                 if (entry == NULL)
2268                         goto out;
2269                 memcpy(entry->atm_addr, ioc_data->atm_addr, ATM_ESA_LEN);
2270                 memset(entry->mac_addr, 0, ETH_ALEN);
2271                 entry->recv_vcc = vcc;
2272                 entry->old_recv_push = old_push;
2273                 entry->status = ESI_UNKNOWN;
2274                 entry->timer.expires = jiffies + priv->vcc_timeout_period;
2275                 entry->timer.function = lec_arp_expire_vcc;
2276                 add_timer(&entry->timer);
2277                 entry->next = priv->lec_no_forward;
2278                 priv->lec_no_forward = entry;
2279                 dump_arp_table(priv);
2280                 goto out;
2281         }
2282         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",
2283                 ioc_data->atm_addr[0],ioc_data->atm_addr[1],
2284                 ioc_data->atm_addr[2],ioc_data->atm_addr[3],
2285                 ioc_data->atm_addr[4],ioc_data->atm_addr[5],
2286                 ioc_data->atm_addr[6],ioc_data->atm_addr[7],
2287                 ioc_data->atm_addr[8],ioc_data->atm_addr[9],
2288                 ioc_data->atm_addr[10],ioc_data->atm_addr[11],
2289                 ioc_data->atm_addr[12],ioc_data->atm_addr[13],
2290                 ioc_data->atm_addr[14],ioc_data->atm_addr[15],
2291                 ioc_data->atm_addr[16],ioc_data->atm_addr[17],
2292                 ioc_data->atm_addr[18],ioc_data->atm_addr[19]);
2293         for (i = 0; i < LEC_ARP_TABLE_SIZE; i++) {
2294                 for (entry = priv->lec_arp_tables[i]; entry; entry=entry->next) {
2295                         if (memcmp(ioc_data->atm_addr, entry->atm_addr, 
2296                                    ATM_ESA_LEN)==0) {
2297                                 DPRINTK("LEC_ARP: Attaching data direct\n");
2298                                 DPRINTK("Currently -> Vcc: %d, Rvcc:%d\n",
2299                                         entry->vcc?entry->vcc->vci:0,
2300                                         entry->recv_vcc?entry->recv_vcc->vci:0);
2301                                 found_entry=1;
2302                                 del_timer(&entry->timer);
2303                                 entry->vcc = vcc;
2304                                 entry->old_push = old_push;
2305                                 if (entry->status == ESI_VC_PENDING) {
2306                                         if(priv->maximum_unknown_frame_count
2307                                            ==0)
2308                                                 entry->status = 
2309                                                         ESI_FORWARD_DIRECT;
2310                                         else {
2311                                                 entry->timestamp = jiffies;
2312                                                 entry->status = 
2313                                                         ESI_FLUSH_PENDING;
2314 #if 0
2315                                                 send_to_lecd(priv,l_flush_xmt,
2316                                                              NULL,
2317                                                              entry->atm_addr,
2318                                                              NULL);
2319 #endif
2320                                         }
2321                                 } else {
2322                                         /* They were forming a connection
2323                                            to us, and we to them. Our
2324                                            ATM address is numerically lower
2325                                            than theirs, so we make connection
2326                                            we formed into default VCC (8.1.11).
2327                                            Connection they made gets torn
2328                                            down. This might confuse some
2329                                            clients. Can be changed if
2330                                            someone reports trouble... */
2331                                         ;
2332                                 }
2333                         }
2334                 }
2335         }
2336         if (found_entry) {
2337                 DPRINTK("After vcc was added\n");
2338                 dump_arp_table(priv);
2339                 goto out;
2340         }
2341         /* Not found, snatch address from first data packet that arrives from
2342            this vcc */
2343         entry = make_entry(priv, bus_mac);
2344         if (!entry)
2345                 goto out;
2346         entry->vcc = vcc;
2347         entry->old_push = old_push;
2348         memcpy(entry->atm_addr, ioc_data->atm_addr, ATM_ESA_LEN);
2349         memset(entry->mac_addr, 0, ETH_ALEN);
2350         entry->status = ESI_UNKNOWN;
2351         entry->next = priv->lec_arp_empty_ones;
2352         priv->lec_arp_empty_ones = entry;
2353         entry->timer.expires = jiffies + priv->vcc_timeout_period;
2354         entry->timer.function = lec_arp_expire_vcc;
2355         add_timer(&entry->timer);
2356         DPRINTK("After vcc was added\n");
2357         dump_arp_table(priv);
2358 out:
2359         spin_unlock_irqrestore(&priv->lec_arp_lock, flags);
2360 }
2361
2362 static void
2363 lec_flush_complete(struct lec_priv *priv, unsigned long tran_id)
2364 {
2365         unsigned long flags;
2366         struct lec_arp_table *entry;
2367         int i;
2368   
2369         DPRINTK("LEC:lec_flush_complete %lx\n",tran_id);
2370         spin_lock_irqsave(&priv->lec_arp_lock, flags);
2371         for (i = 0; i < LEC_ARP_TABLE_SIZE; i++) {
2372                 for (entry = priv->lec_arp_tables[i]; entry; entry=entry->next) {
2373                         if (entry->flush_tran_id == tran_id &&
2374                             entry->status == ESI_FLUSH_PENDING) {
2375                                 struct sk_buff *skb;
2376
2377                                 while ((skb = skb_dequeue(&entry->tx_wait)) != NULL)
2378                                         lec_send(entry->vcc, skb, entry->priv);
2379                                 entry->status = ESI_FORWARD_DIRECT;
2380                                 DPRINTK("LEC_ARP: Flushed\n");
2381                         }
2382                 }
2383         }
2384         spin_unlock_irqrestore(&priv->lec_arp_lock, flags);
2385         dump_arp_table(priv);
2386 }
2387
2388 static void
2389 lec_set_flush_tran_id(struct lec_priv *priv,
2390                       unsigned char *atm_addr, unsigned long tran_id)
2391 {
2392         unsigned long flags;
2393         struct lec_arp_table *entry;
2394         int i;
2395
2396         spin_lock_irqsave(&priv->lec_arp_lock, flags);
2397         for (i = 0; i < LEC_ARP_TABLE_SIZE; i++)
2398                 for(entry = priv->lec_arp_tables[i]; entry; entry=entry->next)
2399                         if (!memcmp(atm_addr, entry->atm_addr, ATM_ESA_LEN)) {
2400                                 entry->flush_tran_id = tran_id;
2401                                 DPRINTK("Set flush transaction id to %lx for %p\n",tran_id,entry);
2402                         }
2403         spin_unlock_irqrestore(&priv->lec_arp_lock, flags);
2404 }
2405
2406 static int 
2407 lec_mcast_make(struct lec_priv *priv, struct atm_vcc *vcc)
2408 {
2409         unsigned long flags;
2410         unsigned char mac_addr[] = {
2411                 0xff, 0xff, 0xff, 0xff, 0xff, 0xff };
2412         struct lec_arp_table *to_add;
2413         struct lec_vcc_priv *vpriv;
2414         int err = 0;
2415   
2416         if (!(vpriv = kmalloc(sizeof(struct lec_vcc_priv), GFP_KERNEL)))
2417                 return -ENOMEM;
2418         vpriv->xoff = 0;
2419         vpriv->old_pop = vcc->pop;
2420         vcc->user_back = vpriv;
2421         vcc->pop = lec_pop;
2422         spin_lock_irqsave(&priv->lec_arp_lock, flags);
2423         to_add = make_entry(priv, mac_addr);
2424         if (!to_add) {
2425                 vcc->pop = vpriv->old_pop;
2426                 kfree(vpriv);
2427                 err = -ENOMEM;
2428                 goto out;
2429         }
2430         memcpy(to_add->atm_addr, vcc->remote.sas_addr.prv, ATM_ESA_LEN);
2431         to_add->status = ESI_FORWARD_DIRECT;
2432         to_add->flags |= LEC_PERMANENT_FLAG;
2433         to_add->vcc = vcc;
2434         to_add->old_push = vcc->push;
2435         vcc->push = lec_push;
2436         priv->mcast_vcc = vcc;
2437         lec_arp_add(priv, to_add);
2438 out:
2439         spin_unlock_irqrestore(&priv->lec_arp_lock, flags);
2440         return err;
2441 }
2442
2443 static void
2444 lec_vcc_close(struct lec_priv *priv, struct atm_vcc *vcc)
2445 {
2446         unsigned long flags;
2447         struct lec_arp_table *entry, *next;
2448         int i;
2449
2450         DPRINTK("LEC_ARP: lec_vcc_close vpi:%d vci:%d\n",vcc->vpi,vcc->vci);
2451         dump_arp_table(priv);
2452         spin_lock_irqsave(&priv->lec_arp_lock, flags);
2453         for(i=0;i<LEC_ARP_TABLE_SIZE;i++) {
2454                 for(entry = priv->lec_arp_tables[i];entry; entry=next) {
2455                         next = entry->next;
2456                         if (vcc == entry->vcc) {
2457                                 lec_arp_remove(priv, entry);
2458                                 kfree(entry);
2459                                 if (priv->mcast_vcc == vcc) {
2460                                         priv->mcast_vcc = NULL;
2461                                 }
2462                         }
2463                 }
2464         }
2465
2466         entry = priv->lec_arp_empty_ones;
2467         priv->lec_arp_empty_ones = NULL;
2468         while (entry != NULL) {
2469                 next = entry->next;
2470                 if (entry->vcc == vcc) { /* leave it out from the list */
2471                         lec_arp_clear_vccs(entry);
2472                         del_timer(&entry->timer);
2473                         kfree(entry);
2474                 }
2475                 else {              /* put it back to the list */
2476                         entry->next = priv->lec_arp_empty_ones;
2477                         priv->lec_arp_empty_ones = entry;
2478                 }
2479                 entry = next;
2480         }
2481         
2482         entry = priv->lec_no_forward;
2483         priv->lec_no_forward = NULL;
2484         while (entry != NULL) {
2485                 next = entry->next;
2486                 if (entry->recv_vcc == vcc) {
2487                         lec_arp_clear_vccs(entry);
2488                         del_timer(&entry->timer);
2489                         kfree(entry);
2490                 }
2491                 else {
2492                         entry->next = priv->lec_no_forward;
2493                         priv->lec_no_forward = entry;
2494                 }
2495                 entry = next;
2496         }
2497
2498         entry = priv->mcast_fwds;
2499         priv->mcast_fwds = NULL;
2500         while (entry != NULL) {
2501                 next = entry->next;
2502                 if (entry->recv_vcc == vcc) {
2503                         lec_arp_clear_vccs(entry);
2504                         /* No timer, LANEv2 7.1.20 and 2.3.5.3 */
2505                         kfree(entry);
2506                 }
2507                 else {
2508                         entry->next = priv->mcast_fwds;
2509                         priv->mcast_fwds = entry;
2510                 }
2511                 entry = next;
2512         }
2513
2514         spin_unlock_irqrestore(&priv->lec_arp_lock, flags);
2515         dump_arp_table(priv);
2516 }
2517
2518 static void
2519 lec_arp_check_empties(struct lec_priv *priv,
2520                       struct atm_vcc *vcc, struct sk_buff *skb)
2521 {
2522         unsigned long flags;
2523         struct lec_arp_table *entry, *prev;
2524         struct lecdatahdr_8023 *hdr = (struct lecdatahdr_8023 *)skb->data;
2525         unsigned char *src;
2526 #ifdef CONFIG_TR
2527         struct lecdatahdr_8025 *tr_hdr = (struct lecdatahdr_8025 *)skb->data;
2528
2529         if (priv->is_trdev) src = tr_hdr->h_source;
2530         else
2531 #endif
2532         src = hdr->h_source;
2533
2534         spin_lock_irqsave(&priv->lec_arp_lock, flags);
2535         entry = priv->lec_arp_empty_ones;
2536         if (vcc == entry->vcc) {
2537                 del_timer(&entry->timer);
2538                 memcpy(entry->mac_addr, src, ETH_ALEN);
2539                 entry->status = ESI_FORWARD_DIRECT;
2540                 entry->last_used = jiffies;
2541                 priv->lec_arp_empty_ones = entry->next;
2542                 /* We might have got an entry */
2543                 if ((prev = lec_arp_find(priv,src))) {
2544                         lec_arp_remove(priv, prev);
2545                         kfree(prev);
2546                 }
2547                 lec_arp_add(priv, entry);
2548                 goto out;
2549         }
2550         prev = entry;
2551         entry = entry->next;
2552         while (entry && entry->vcc != vcc) {
2553                 prev= entry;
2554                 entry = entry->next;
2555         }
2556         if (!entry) {
2557                 DPRINTK("LEC_ARP: Arp_check_empties: entry not found!\n");
2558                 goto out;
2559         }
2560         del_timer(&entry->timer);
2561         memcpy(entry->mac_addr, src, ETH_ALEN);
2562         entry->status = ESI_FORWARD_DIRECT;
2563         entry->last_used = jiffies;
2564         prev->next = entry->next;
2565         if ((prev = lec_arp_find(priv, src))) {
2566                 lec_arp_remove(priv, prev);
2567                 kfree(prev);
2568         }
2569         lec_arp_add(priv, entry);
2570 out:
2571         spin_unlock_irqrestore(&priv->lec_arp_lock, flags);
2572 }
2573 MODULE_LICENSE("GPL");