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 = kmalloc(sizeof(struct lec_arp_table), GFP_ATOMIC); 1815 if (!to_return) { 1816 printk("LEC: Arp entry kmalloc failed\n"); 1817 return NULL; 1818 } 1819 memset(to_return, 0, sizeof(struct lec_arp_table)); 1820 memcpy(to_return->mac_addr, mac_addr, ETH_ALEN); 1821 init_timer(&to_return->timer); 1822 to_return->timer.function = lec_arp_expire_arp; 1823 to_return->timer.data = (unsigned long) to_return; 1824 to_return->last_used = jiffies; 1825 to_return->priv = priv; 1826 skb_queue_head_init(&to_return->tx_wait); 1827 return to_return; 1828 } 1829 1830 /* 1831 * 1832 * Arp sent timer expired 1833 * 1834 */ 1835 static void 1836 lec_arp_expire_arp(unsigned long data) 1837 { 1838 struct lec_arp_table *entry; 1839 1840 entry = (struct lec_arp_table *)data; 1841 1842 DPRINTK("lec_arp_expire_arp\n"); 1843 if (entry->status == ESI_ARP_PENDING) { 1844 if (entry->no_tries <= entry->priv->max_retry_count) { 1845 if (entry->is_rdesc) 1846 send_to_lecd(entry->priv, l_rdesc_arp_xmt, entry->mac_addr, NULL, NULL); 1847 else 1848 send_to_lecd(entry->priv, l_arp_xmt, entry->mac_addr, NULL, NULL); 1849 entry->no_tries++; 1850 } 1851 mod_timer(&entry->timer, jiffies + (1*HZ)); 1852 } 1853 } 1854 1855 /* 1856 * 1857 * Unknown/unused vcc expire, remove associated entry 1858 * 1859 */ 1860 static void 1861 lec_arp_expire_vcc(unsigned long data) 1862 { 1863 unsigned long flags; 1864 struct lec_arp_table *to_remove = (struct lec_arp_table*)data; 1865 struct lec_priv *priv = (struct lec_priv *)to_remove->priv; 1866 struct lec_arp_table *entry = NULL; 1867 1868 del_timer(&to_remove->timer); 1869 1870 DPRINTK("LEC_ARP %p %p: lec_arp_expire_vcc vpi:%d vci:%d\n", 1871 to_remove, priv, 1872 to_remove->vcc?to_remove->recv_vcc->vpi:0, 1873 to_remove->vcc?to_remove->recv_vcc->vci:0); 1874 DPRINTK("eo:%p nf:%p\n",priv->lec_arp_empty_ones,priv->lec_no_forward); 1875 1876 spin_lock_irqsave(&priv->lec_arp_lock, flags); 1877 if (to_remove == priv->lec_arp_empty_ones) 1878 priv->lec_arp_empty_ones = to_remove->next; 1879 else { 1880 entry = priv->lec_arp_empty_ones; 1881 while (entry && entry->next != to_remove) 1882 entry = entry->next; 1883 if (entry) 1884 entry->next = to_remove->next; 1885 } 1886 if (!entry) { 1887 if (to_remove == priv->lec_no_forward) { 1888 priv->lec_no_forward = to_remove->next; 1889 } else { 1890 entry = priv->lec_no_forward; 1891 while (entry && entry->next != to_remove) 1892 entry = entry->next; 1893 if (entry) 1894 entry->next = to_remove->next; 1895 } 1896 } 1897 spin_unlock_irqrestore(&priv->lec_arp_lock, flags); 1898 1899 lec_arp_clear_vccs(to_remove); 1900 kfree(to_remove); 1901 } 1902 1903 /* 1904 * Expire entries. 1905 * 1. Re-set timer 1906 * 2. For each entry, delete entries that have aged past the age limit. 1907 * 3. For each entry, depending on the status of the entry, perform 1908 * the following maintenance. 1909 * a. If status is ESI_VC_PENDING or ESI_ARP_PENDING then if the 1910 * tick_count is above the max_unknown_frame_time, clear 1911 * the tick_count to zero and clear the packets_flooded counter 1912 * to zero. This supports the packet rate limit per address 1913 * while flooding unknowns. 1914 * b. If the status is ESI_FLUSH_PENDING and the tick_count is greater 1915 * than or equal to the path_switching_delay, change the status 1916 * to ESI_FORWARD_DIRECT. This causes the flush period to end 1917 * regardless of the progress of the flush protocol. 1918 */ 1919 static void 1920 lec_arp_check_expire(unsigned long data) 1921 { 1922 unsigned long flags; 1923 struct lec_priv *priv = (struct lec_priv *)data; 1924 struct lec_arp_table *entry, *next; 1925 unsigned long now; 1926 unsigned long time_to_check; 1927 int i; 1928 1929 DPRINTK("lec_arp_check_expire %p\n",priv); 1930 DPRINTK("expire: eo:%p nf:%p\n",priv->lec_arp_empty_ones, 1931 priv->lec_no_forward); 1932 now = jiffies; 1933 spin_lock_irqsave(&priv->lec_arp_lock, flags); 1934 for(i = 0; i < LEC_ARP_TABLE_SIZE; i++) { 1935 for(entry = priv->lec_arp_tables[i]; entry != NULL; ) { 1936 if ((entry->flags) & LEC_REMOTE_FLAG && 1937 priv->topology_change) 1938 time_to_check = priv->forward_delay_time; 1939 else 1940 time_to_check = priv->aging_time; 1941 1942 DPRINTK("About to expire: %lx - %lx > %lx\n", 1943 now,entry->last_used, time_to_check); 1944 if( time_after(now, entry->last_used+ 1945 time_to_check) && 1946 !(entry->flags & LEC_PERMANENT_FLAG) && 1947 !(entry->mac_addr[0] & 0x01) ) { /* LANE2: 7.1.20 */ 1948 /* Remove entry */ 1949 DPRINTK("LEC:Entry timed out\n"); 1950 next = entry->next; 1951 lec_arp_remove(priv, entry); 1952 kfree(entry); 1953 entry = next; 1954 } else { 1955 /* Something else */ 1956 if ((entry->status == ESI_VC_PENDING || 1957 entry->status == ESI_ARP_PENDING) 1958 && time_after_eq(now, 1959 entry->timestamp + 1960 priv->max_unknown_frame_time)) { 1961 entry->timestamp = jiffies; 1962 entry->packets_flooded = 0; 1963 if (entry->status == ESI_VC_PENDING) 1964 send_to_lecd(priv, l_svc_setup, entry->mac_addr, entry->atm_addr, NULL); 1965 } 1966 if (entry->status == ESI_FLUSH_PENDING 1967 && 1968 time_after_eq(now, entry->timestamp+ 1969 priv->path_switching_delay)) { 1970 struct sk_buff *skb; 1971 1972 while ((skb = skb_dequeue(&entry->tx_wait)) != NULL) 1973 lec_send(entry->vcc, skb, entry->priv); 1974 entry->last_used = jiffies; 1975 entry->status = 1976 ESI_FORWARD_DIRECT; 1977 } 1978 entry = entry->next; 1979 } 1980 } 1981 } 1982 spin_unlock_irqrestore(&priv->lec_arp_lock, flags); 1983 1984 mod_timer(&priv->lec_arp_timer, jiffies + LEC_ARP_REFRESH_INTERVAL); 1985 } 1986 /* 1987 * Try to find vcc where mac_address is attached. 1988 * 1989 */ 1990 static struct atm_vcc* 1991 lec_arp_resolve(struct lec_priv *priv, unsigned char *mac_to_find, 1992 int is_rdesc, struct lec_arp_table **ret_entry) 1993 { 1994 unsigned long flags; 1995 struct lec_arp_table *entry; 1996 struct atm_vcc *found; 1997 1998 if (mac_to_find[0] & 0x01) { 1999 switch (priv->lane_version) { 2000 case 1: 2001 return priv->mcast_vcc; 2002 break; 2003 case 2: /* LANE2 wants arp for multicast addresses */ 2004 if (!compare_ether_addr(mac_to_find, bus_mac)) 2005 return priv->mcast_vcc; 2006 break; 2007 default: 2008 break; 2009 } 2010 } 2011 2012 spin_lock_irqsave(&priv->lec_arp_lock, flags); 2013 entry = lec_arp_find(priv, mac_to_find); 2014 2015 if (entry) { 2016 if (entry->status == ESI_FORWARD_DIRECT) { 2017 /* Connection Ok */ 2018 entry->last_used = jiffies; 2019 *ret_entry = entry; 2020 found = entry->vcc; 2021 goto out; 2022 } 2023 /* If the LE_ARP cache entry is still pending, reset count to 0 2024 * so another LE_ARP request can be made for this frame. 2025 */ 2026 if (entry->status == ESI_ARP_PENDING) { 2027 entry->no_tries = 0; 2028 } 2029 /* Data direct VC not yet set up, check to see if the unknown 2030 frame count is greater than the limit. If the limit has 2031 not been reached, allow the caller to send packet to 2032 BUS. */ 2033 if (entry->status != ESI_FLUSH_PENDING && 2034 entry->packets_flooded<priv->maximum_unknown_frame_count) { 2035 entry->packets_flooded++; 2036 DPRINTK("LEC_ARP: Flooding..\n"); 2037 found = priv->mcast_vcc; 2038 goto out; 2039 } 2040 /* We got here because entry->status == ESI_FLUSH_PENDING 2041 * or BUS flood limit was reached for an entry which is 2042 * in ESI_ARP_PENDING or ESI_VC_PENDING state. 2043 */ 2044 *ret_entry = entry; 2045 DPRINTK("lec: entry->status %d entry->vcc %p\n", entry->status, entry->vcc); 2046 found = NULL; 2047 } else { 2048 /* No matching entry was found */ 2049 entry = make_entry(priv, mac_to_find); 2050 DPRINTK("LEC_ARP: Making entry\n"); 2051 if (!entry) { 2052 found = priv->mcast_vcc; 2053 goto out; 2054 } 2055 lec_arp_add(priv, entry); 2056 /* We want arp-request(s) to be sent */ 2057 entry->packets_flooded =1; 2058 entry->status = ESI_ARP_PENDING; 2059 entry->no_tries = 1; 2060 entry->last_used = entry->timestamp = jiffies; 2061 entry->is_rdesc = is_rdesc; 2062 if (entry->is_rdesc) 2063 send_to_lecd(priv, l_rdesc_arp_xmt, mac_to_find, NULL, NULL); 2064 else 2065 send_to_lecd(priv, l_arp_xmt, mac_to_find, NULL, NULL); 2066 entry->timer.expires = jiffies + (1*HZ); 2067 entry->timer.function = lec_arp_expire_arp; 2068 add_timer(&entry->timer); 2069 found = priv->mcast_vcc; 2070 } 2071 2072 out: 2073 spin_unlock_irqrestore(&priv->lec_arp_lock, flags); 2074 return found; 2075 } 2076 2077 static int 2078 lec_addr_delete(struct lec_priv *priv, unsigned char *atm_addr, 2079 unsigned long permanent) 2080 { 2081 unsigned long flags; 2082 struct lec_arp_table *entry, *next; 2083 int i; 2084 2085 DPRINTK("lec_addr_delete\n"); 2086 spin_lock_irqsave(&priv->lec_arp_lock, flags); 2087 for(i = 0; i < LEC_ARP_TABLE_SIZE; i++) { 2088 for(entry = priv->lec_arp_tables[i]; entry != NULL; entry = next) { 2089 next = entry->next; 2090 if (!memcmp(atm_addr, entry->atm_addr, ATM_ESA_LEN) 2091 && (permanent || 2092 !(entry->flags & LEC_PERMANENT_FLAG))) { 2093 lec_arp_remove(priv, entry); 2094 kfree(entry); 2095 } 2096 spin_unlock_irqrestore(&priv->lec_arp_lock, flags); 2097 return 0; 2098 } 2099 } 2100 spin_unlock_irqrestore(&priv->lec_arp_lock, flags); 2101 return -1; 2102 } 2103 2104 /* 2105 * Notifies: Response to arp_request (atm_addr != NULL) 2106 */ 2107 static void 2108 lec_arp_update(struct lec_priv *priv, unsigned char *mac_addr, 2109 unsigned char *atm_addr, unsigned long remoteflag, 2110 unsigned int targetless_le_arp) 2111 { 2112 unsigned long flags; 2113 struct lec_arp_table *entry, *tmp; 2114 int i; 2115 2116 DPRINTK("lec:%s", (targetless_le_arp) ? "targetless ": " "); 2117 DPRINTK("lec_arp_update mac:%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x\n", 2118 mac_addr[0],mac_addr[1],mac_addr[2],mac_addr[3], 2119 mac_addr[4],mac_addr[5]); 2120 2121 spin_lock_irqsave(&priv->lec_arp_lock, flags); 2122 entry = lec_arp_find(priv, mac_addr); 2123 if (entry == NULL && targetless_le_arp) 2124 goto out; /* LANE2: ignore targetless LE_ARPs for which 2125 * we have no entry in the cache. 7.1.30 2126 */ 2127 if (priv->lec_arp_empty_ones) { 2128 entry = priv->lec_arp_empty_ones; 2129 if (!memcmp(entry->atm_addr, atm_addr, ATM_ESA_LEN)) { 2130 priv->lec_arp_empty_ones = entry->next; 2131 } else { 2132 while(entry->next && memcmp(entry->next->atm_addr, 2133 atm_addr, ATM_ESA_LEN)) 2134 entry = entry->next; 2135 if (entry->next) { 2136 tmp = entry; 2137 entry = entry->next; 2138 tmp->next = entry->next; 2139 } else 2140 entry = NULL; 2141 2142 } 2143 if (entry) { 2144 del_timer(&entry->timer); 2145 tmp = lec_arp_find(priv, mac_addr); 2146 if (tmp) { 2147 del_timer(&tmp->timer); 2148 tmp->status = ESI_FORWARD_DIRECT; 2149 memcpy(tmp->atm_addr, atm_addr, ATM_ESA_LEN); 2150 tmp->vcc = entry->vcc; 2151 tmp->old_push = entry->old_push; 2152 tmp->last_used = jiffies; 2153 del_timer(&entry->timer); 2154 kfree(entry); 2155 entry=tmp; 2156 } else { 2157 entry->status = ESI_FORWARD_DIRECT; 2158 memcpy(entry->mac_addr, mac_addr, ETH_ALEN); 2159 entry->last_used = jiffies; 2160 lec_arp_add(priv, entry); 2161 } 2162 if (remoteflag) 2163 entry->flags|=LEC_REMOTE_FLAG; 2164 else 2165 entry->flags&=~LEC_REMOTE_FLAG; 2166 DPRINTK("After update\n"); 2167 dump_arp_table(priv); 2168 goto out; 2169 } 2170 } 2171 entry = lec_arp_find(priv, mac_addr); 2172 if (!entry) { 2173 entry = make_entry(priv, mac_addr); 2174 if (!entry) 2175 goto out; 2176 entry->status = ESI_UNKNOWN; 2177 lec_arp_add(priv, entry); 2178 /* Temporary, changes before end of function */ 2179 } 2180 memcpy(entry->atm_addr, atm_addr, ATM_ESA_LEN); 2181 del_timer(&entry->timer); 2182 for(i = 0; i < LEC_ARP_TABLE_SIZE; i++) { 2183 for(tmp = priv->lec_arp_tables[i]; tmp; tmp=tmp->next) { 2184 if (entry != tmp && 2185 !memcmp(tmp->atm_addr, atm_addr, 2186 ATM_ESA_LEN)) { 2187 /* Vcc to this host exists */ 2188 if (tmp->status > ESI_VC_PENDING) { 2189 /* 2190 * ESI_FLUSH_PENDING, 2191 * ESI_FORWARD_DIRECT 2192 */ 2193 entry->vcc = tmp->vcc; 2194 entry->old_push=tmp->old_push; 2195 } 2196 entry->status=tmp->status; 2197 break; 2198 } 2199 } 2200 } 2201 if (remoteflag) 2202 entry->flags|=LEC_REMOTE_FLAG; 2203 else 2204 entry->flags&=~LEC_REMOTE_FLAG; 2205 if (entry->status == ESI_ARP_PENDING || 2206 entry->status == ESI_UNKNOWN) { 2207 entry->status = ESI_VC_PENDING; 2208 send_to_lecd(priv, l_svc_setup, entry->mac_addr, atm_addr, NULL); 2209 } 2210 DPRINTK("After update2\n"); 2211 dump_arp_table(priv); 2212 out: 2213 spin_unlock_irqrestore(&priv->lec_arp_lock, flags); 2214 } 2215 2216 /* 2217 * Notifies: Vcc setup ready 2218 */ 2219 static void 2220 lec_vcc_added(struct lec_priv *priv, struct atmlec_ioc *ioc_data, 2221 struct atm_vcc *vcc, 2222 void (*old_push)(struct atm_vcc *vcc, struct sk_buff *skb)) 2223 { 2224 unsigned long flags; 2225 struct lec_arp_table *entry; 2226 int i, found_entry=0; 2227 2228 spin_lock_irqsave(&priv->lec_arp_lock, flags); 2229 if (ioc_data->receive == 2) { 2230 /* Vcc for Multicast Forward. No timer, LANEv2 7.1.20 and 2.3.5.3 */ 2231 2232 DPRINTK("LEC_ARP: Attaching mcast forward\n"); 2233 #if 0 2234 entry = lec_arp_find(priv, bus_mac); 2235 if (!entry) { 2236 printk("LEC_ARP: Multicast entry not found!\n"); 2237 goto out; 2238 } 2239 memcpy(entry->atm_addr, ioc_data->atm_addr, ATM_ESA_LEN); 2240 entry->recv_vcc = vcc; 2241 entry->old_recv_push = old_push; 2242 #endif 2243 entry = make_entry(priv, bus_mac); 2244 if (entry == NULL) 2245 goto out; 2246 del_timer(&entry->timer); 2247 memcpy(entry->atm_addr, ioc_data->atm_addr, ATM_ESA_LEN); 2248 entry->recv_vcc = vcc; 2249 entry->old_recv_push = old_push; 2250 entry->next = priv->mcast_fwds; 2251 priv->mcast_fwds = entry; 2252 goto out; 2253 } else if (ioc_data->receive == 1) { 2254 /* Vcc which we don't want to make default vcc, attach it 2255 anyway. */ 2256 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", 2257 ioc_data->atm_addr[0],ioc_data->atm_addr[1], 2258 ioc_data->atm_addr[2],ioc_data->atm_addr[3], 2259 ioc_data->atm_addr[4],ioc_data->atm_addr[5], 2260 ioc_data->atm_addr[6],ioc_data->atm_addr[7], 2261 ioc_data->atm_addr[8],ioc_data->atm_addr[9], 2262 ioc_data->atm_addr[10],ioc_data->atm_addr[11], 2263 ioc_data->atm_addr[12],ioc_data->atm_addr[13], 2264 ioc_data->atm_addr[14],ioc_data->atm_addr[15], 2265 ioc_data->atm_addr[16],ioc_data->atm_addr[17], 2266 ioc_data->atm_addr[18],ioc_data->atm_addr[19]); 2267 entry = make_entry(priv, bus_mac); 2268 if (entry == NULL) 2269 goto out; 2270 memcpy(entry->atm_addr, ioc_data->atm_addr, ATM_ESA_LEN); 2271 memset(entry->mac_addr, 0, ETH_ALEN); 2272 entry->recv_vcc = vcc; 2273 entry->old_recv_push = old_push; 2274 entry->status = ESI_UNKNOWN; 2275 entry->timer.expires = jiffies + priv->vcc_timeout_period; 2276 entry->timer.function = lec_arp_expire_vcc; 2277 add_timer(&entry->timer); 2278 entry->next = priv->lec_no_forward; 2279 priv->lec_no_forward = entry; 2280 dump_arp_table(priv); 2281 goto out; 2282 } 2283 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", 2284 ioc_data->atm_addr[0],ioc_data->atm_addr[1], 2285 ioc_data->atm_addr[2],ioc_data->atm_addr[3], 2286 ioc_data->atm_addr[4],ioc_data->atm_addr[5], 2287 ioc_data->atm_addr[6],ioc_data->atm_addr[7], 2288 ioc_data->atm_addr[8],ioc_data->atm_addr[9], 2289 ioc_data->atm_addr[10],ioc_data->atm_addr[11], 2290 ioc_data->atm_addr[12],ioc_data->atm_addr[13], 2291 ioc_data->atm_addr[14],ioc_data->atm_addr[15], 2292 ioc_data->atm_addr[16],ioc_data->atm_addr[17], 2293 ioc_data->atm_addr[18],ioc_data->atm_addr[19]); 2294 for (i = 0; i < LEC_ARP_TABLE_SIZE; i++) { 2295 for (entry = priv->lec_arp_tables[i]; entry; entry=entry->next) { 2296 if (memcmp(ioc_data->atm_addr, entry->atm_addr, 2297 ATM_ESA_LEN)==0) { 2298 DPRINTK("LEC_ARP: Attaching data direct\n"); 2299 DPRINTK("Currently -> Vcc: %d, Rvcc:%d\n", 2300 entry->vcc?entry->vcc->vci:0, 2301 entry->recv_vcc?entry->recv_vcc->vci:0); 2302 found_entry=1; 2303 del_timer(&entry->timer); 2304 entry->vcc = vcc; 2305 entry->old_push = old_push; 2306 if (entry->status == ESI_VC_PENDING) { 2307 if(priv->maximum_unknown_frame_count 2308 ==0) 2309 entry->status = 2310 ESI_FORWARD_DIRECT; 2311 else { 2312 entry->timestamp = jiffies; 2313 entry->status = 2314 ESI_FLUSH_PENDING; 2315 #if 0 2316 send_to_lecd(priv,l_flush_xmt, 2317 NULL, 2318 entry->atm_addr, 2319 NULL); 2320 #endif 2321 } 2322 } else { 2323 /* They were forming a connection 2324 to us, and we to them. Our 2325 ATM address is numerically lower 2326 than theirs, so we make connection 2327 we formed into default VCC (8.1.11). 2328 Connection they made gets torn 2329 down. This might confuse some 2330 clients. Can be changed if 2331 someone reports trouble... */ 2332 ; 2333 } 2334 } 2335 } 2336 } 2337 if (found_entry) { 2338 DPRINTK("After vcc was added\n"); 2339 dump_arp_table(priv); 2340 goto out; 2341 } 2342 /* Not found, snatch address from first data packet that arrives from 2343 this vcc */ 2344 entry = make_entry(priv, bus_mac); 2345 if (!entry) 2346 goto out; 2347 entry->vcc = vcc; 2348 entry->old_push = old_push; 2349 memcpy(entry->atm_addr, ioc_data->atm_addr, ATM_ESA_LEN); 2350 memset(entry->mac_addr, 0, ETH_ALEN); 2351 entry->status = ESI_UNKNOWN; 2352 entry->next = priv->lec_arp_empty_ones; 2353 priv->lec_arp_empty_ones = entry; 2354 entry->timer.expires = jiffies + priv->vcc_timeout_period; 2355 entry->timer.function = lec_arp_expire_vcc; 2356 add_timer(&entry->timer); 2357 DPRINTK("After vcc was added\n"); 2358 dump_arp_table(priv); 2359 out: 2360 spin_unlock_irqrestore(&priv->lec_arp_lock, flags); 2361 } 2362 2363 static void 2364 lec_flush_complete(struct lec_priv *priv, unsigned long tran_id) 2365 { 2366 unsigned long flags; 2367 struct lec_arp_table *entry; 2368 int i; 2369 2370 DPRINTK("LEC:lec_flush_complete %lx\n",tran_id); 2371 spin_lock_irqsave(&priv->lec_arp_lock, flags); 2372 for (i = 0; i < LEC_ARP_TABLE_SIZE; i++) { 2373 for (entry = priv->lec_arp_tables[i]; entry; entry=entry->next) { 2374 if (entry->flush_tran_id == tran_id && 2375 entry->status == ESI_FLUSH_PENDING) { 2376 struct sk_buff *skb; 2377 2378 while ((skb = skb_dequeue(&entry->tx_wait)) != NULL) 2379 lec_send(entry->vcc, skb, entry->priv); 2380 entry->status = ESI_FORWARD_DIRECT; 2381 DPRINTK("LEC_ARP: Flushed\n"); 2382 } 2383 } 2384 } 2385 spin_unlock_irqrestore(&priv->lec_arp_lock, flags); 2386 dump_arp_table(priv); 2387 } 2388 2389 static void 2390 lec_set_flush_tran_id(struct lec_priv *priv, 2391 unsigned char *atm_addr, unsigned long tran_id) 2392 { 2393 unsigned long flags; 2394 struct lec_arp_table *entry; 2395 int i; 2396 2397 spin_lock_irqsave(&priv->lec_arp_lock, flags); 2398 for (i = 0; i < LEC_ARP_TABLE_SIZE; i++) 2399 for(entry = priv->lec_arp_tables[i]; entry; entry=entry->next) 2400 if (!memcmp(atm_addr, entry->atm_addr, ATM_ESA_LEN)) { 2401 entry->flush_tran_id = tran_id; 2402 DPRINTK("Set flush transaction id to %lx for %p\n",tran_id,entry); 2403 } 2404 spin_unlock_irqrestore(&priv->lec_arp_lock, flags); 2405 } 2406 2407 static int 2408 lec_mcast_make(struct lec_priv *priv, struct atm_vcc *vcc) 2409 { 2410 unsigned long flags; 2411 unsigned char mac_addr[] = { 2412 0xff, 0xff, 0xff, 0xff, 0xff, 0xff }; 2413 struct lec_arp_table *to_add; 2414 struct lec_vcc_priv *vpriv; 2415 int err = 0; 2416 2417 if (!(vpriv = kmalloc(sizeof(struct lec_vcc_priv), GFP_KERNEL))) 2418 return -ENOMEM; 2419 vpriv->xoff = 0; 2420 vpriv->old_pop = vcc->pop; 2421 vcc->user_back = vpriv; 2422 vcc->pop = lec_pop; 2423 spin_lock_irqsave(&priv->lec_arp_lock, flags); 2424 to_add = make_entry(priv, mac_addr); 2425 if (!to_add) { 2426 vcc->pop = vpriv->old_pop; 2427 kfree(vpriv); 2428 err = -ENOMEM; 2429 goto out; 2430 } 2431 memcpy(to_add->atm_addr, vcc->remote.sas_addr.prv, ATM_ESA_LEN); 2432 to_add->status = ESI_FORWARD_DIRECT; 2433 to_add->flags |= LEC_PERMANENT_FLAG; 2434 to_add->vcc = vcc; 2435 to_add->old_push = vcc->push; 2436 vcc->push = lec_push; 2437 priv->mcast_vcc = vcc; 2438 lec_arp_add(priv, to_add); 2439 out: 2440 spin_unlock_irqrestore(&priv->lec_arp_lock, flags); 2441 return err; 2442 } 2443 2444 static void 2445 lec_vcc_close(struct lec_priv *priv, struct atm_vcc *vcc) 2446 { 2447 unsigned long flags; 2448 struct lec_arp_table *entry, *next; 2449 int i; 2450 2451 DPRINTK("LEC_ARP: lec_vcc_close vpi:%d vci:%d\n",vcc->vpi,vcc->vci); 2452 dump_arp_table(priv); 2453 spin_lock_irqsave(&priv->lec_arp_lock, flags); 2454 for(i=0;i<LEC_ARP_TABLE_SIZE;i++) { 2455 for(entry = priv->lec_arp_tables[i];entry; entry=next) { 2456 next = entry->next; 2457 if (vcc == entry->vcc) { 2458 lec_arp_remove(priv, entry); 2459 kfree(entry); 2460 if (priv->mcast_vcc == vcc) { 2461 priv->mcast_vcc = NULL; 2462 } 2463 } 2464 } 2465 } 2466 2467 entry = priv->lec_arp_empty_ones; 2468 priv->lec_arp_empty_ones = NULL; 2469 while (entry != NULL) { 2470 next = entry->next; 2471 if (entry->vcc == vcc) { /* leave it out from the list */ 2472 lec_arp_clear_vccs(entry); 2473 del_timer(&entry->timer); 2474 kfree(entry); 2475 } 2476 else { /* put it back to the list */ 2477 entry->next = priv->lec_arp_empty_ones; 2478 priv->lec_arp_empty_ones = entry; 2479 } 2480 entry = next; 2481 } 2482 2483 entry = priv->lec_no_forward; 2484 priv->lec_no_forward = NULL; 2485 while (entry != NULL) { 2486 next = entry->next; 2487 if (entry->recv_vcc == vcc) { 2488 lec_arp_clear_vccs(entry); 2489 del_timer(&entry->timer); 2490 kfree(entry); 2491 } 2492 else { 2493 entry->next = priv->lec_no_forward; 2494 priv->lec_no_forward = entry; 2495 } 2496 entry = next; 2497 } 2498 2499 entry = priv->mcast_fwds; 2500 priv->mcast_fwds = NULL; 2501 while (entry != NULL) { 2502 next = entry->next; 2503 if (entry->recv_vcc == vcc) { 2504 lec_arp_clear_vccs(entry); 2505 /* No timer, LANEv2 7.1.20 and 2.3.5.3 */ 2506 kfree(entry); 2507 } 2508 else { 2509 entry->next = priv->mcast_fwds; 2510 priv->mcast_fwds = entry; 2511 } 2512 entry = next; 2513 } 2514 2515 spin_unlock_irqrestore(&priv->lec_arp_lock, flags); 2516 dump_arp_table(priv); 2517 } 2518 2519 static void 2520 lec_arp_check_empties(struct lec_priv *priv, 2521 struct atm_vcc *vcc, struct sk_buff *skb) 2522 { 2523 unsigned long flags; 2524 struct lec_arp_table *entry, *prev; 2525 struct lecdatahdr_8023 *hdr = (struct lecdatahdr_8023 *)skb->data; 2526 unsigned char *src; 2527 #ifdef CONFIG_TR 2528 struct lecdatahdr_8025 *tr_hdr = (struct lecdatahdr_8025 *)skb->data; 2529 2530 if (priv->is_trdev) src = tr_hdr->h_source; 2531 else 2532 #endif 2533 src = hdr->h_source; 2534 2535 spin_lock_irqsave(&priv->lec_arp_lock, flags); 2536 entry = priv->lec_arp_empty_ones; 2537 if (vcc == entry->vcc) { 2538 del_timer(&entry->timer); 2539 memcpy(entry->mac_addr, src, ETH_ALEN); 2540 entry->status = ESI_FORWARD_DIRECT; 2541 entry->last_used = jiffies; 2542 priv->lec_arp_empty_ones = entry->next; 2543 /* We might have got an entry */ 2544 if ((prev = lec_arp_find(priv,src))) { 2545 lec_arp_remove(priv, prev); 2546 kfree(prev); 2547 } 2548 lec_arp_add(priv, entry); 2549 goto out; 2550 } 2551 prev = entry; 2552 entry = entry->next; 2553 while (entry && entry->vcc != vcc) { 2554 prev= entry; 2555 entry = entry->next; 2556 } 2557 if (!entry) { 2558 DPRINTK("LEC_ARP: Arp_check_empties: entry not found!\n"); 2559 goto out; 2560 } 2561 del_timer(&entry->timer); 2562 memcpy(entry->mac_addr, src, ETH_ALEN); 2563 entry->status = ESI_FORWARD_DIRECT; 2564 entry->last_used = jiffies; 2565 prev->next = entry->next; 2566 if ((prev = lec_arp_find(priv, src))) { 2567 lec_arp_remove(priv, prev); 2568 kfree(prev); 2569 } 2570 lec_arp_add(priv, entry); 2571 out: 2572 spin_unlock_irqrestore(&priv->lec_arp_lock, flags); 2573 } 2574 MODULE_LICENSE("GPL"); 2575