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