1/* drivers/atm/eni.c - Efficient Networks ENI155P device driver */ 2 3/* Written 1995-2000 by Werner Almesberger, EPFL LRC/ICA */ 4 5 6#include <linux/module.h> 7#include <linux/kernel.h> 8#include <linux/mm.h> 9#include <linux/pci.h> 10#include <linux/errno.h> 11#include <linux/atm.h> 12#include <linux/atmdev.h> 13#include <linux/sonet.h> 14#include <linux/skbuff.h> 15#include <linux/time.h> 16#include <linux/delay.h> 17#include <linux/uio.h> 18#include <linux/init.h> 19#include <linux/atm_eni.h> 20#include <linux/bitops.h> 21#include <asm/system.h> 22#include <asm/io.h> 23#include <asm/atomic.h> 24#include <asm/uaccess.h> 25#include <asm/string.h> 26#include <asm/byteorder.h> 27 28#include "tonga.h" 29#include "midway.h" 30#include "suni.h" 31#include "eni.h" 32 33#if !defined(__i386__) && !defined(__x86_64__) 34#ifndef ioremap_nocache 35#define ioremap_nocache(X,Y) ioremap(X,Y) 36#endif 37#endif 38 39/* 40 * TODO: 41 * 42 * Show stoppers 43 * none 44 * 45 * Minor 46 * - OAM support 47 * - fix bugs listed below 48 */ 49 50/* 51 * KNOWN BUGS: 52 * 53 * - may run into JK-JK bug and deadlock 54 * - should allocate UBR channel first 55 * - buffer space allocation algorithm is stupid 56 * (RX: should be maxSDU+maxdelay*rate 57 * TX: should be maxSDU+min(maxSDU,maxdelay*rate) ) 58 * - doesn't support OAM cells 59 * - eni_put_free may hang if not putting memory fragments that _complete_ 60 * 2^n block (never happens in real life, though) 61 */ 62 63 64#define DPRINTK(format,args...) 65 66 67#ifndef CONFIG_ATM_ENI_TUNE_BURST 68#define CONFIG_ATM_ENI_BURST_TX_8W 69#define CONFIG_ATM_ENI_BURST_RX_4W 70#endif 71 72 73#ifndef CONFIG_ATM_ENI_DEBUG 74 75 76#define NULLCHECK(x) 77 78#define EVENT(s,a,b) 79 80 81static void event_dump(void) 82{ 83} 84 85 86#else 87 88 89/* 90 * NULL pointer checking 91 */ 92 93#define NULLCHECK(x) \ 94 if ((unsigned long) (x) < 0x30) \ 95 printk(KERN_CRIT #x "==0x%lx\n",(unsigned long) (x)) 96 97/* 98 * Very extensive activity logging. Greatly improves bug detection speed but 99 * costs a few Mbps if enabled. 100 */ 101 102#define EV 64 103 104static const char *ev[EV]; 105static unsigned long ev_a[EV],ev_b[EV]; 106static int ec = 0; 107 108 109static void EVENT(const char *s,unsigned long a,unsigned long b) 110{ 111 ev[ec] = s; 112 ev_a[ec] = a; 113 ev_b[ec] = b; 114 ec = (ec+1) % EV; 115} 116 117 118static void event_dump(void) 119{ 120 int n,i; 121 122 for (n = 0; n < EV; n++) { 123 i = (ec+n) % EV; 124 printk(KERN_NOTICE); 125 printk(ev[i] ? ev[i] : "(null)",ev_a[i],ev_b[i]); 126 } 127} 128 129 130#endif /* CONFIG_ATM_ENI_DEBUG */ 131 132 133/* 134 * NExx must not be equal at end 135 * EExx may be equal at end 136 * xxPJOK verify validity of pointer jumps 137 * xxPMOK operating on a circular buffer of "c" words 138 */ 139 140#define NEPJOK(a0,a1,b) \ 141 ((a0) < (a1) ? (b) <= (a0) || (b) > (a1) : (b) <= (a0) && (b) > (a1)) 142#define EEPJOK(a0,a1,b) \ 143 ((a0) < (a1) ? (b) < (a0) || (b) >= (a1) : (b) < (a0) && (b) >= (a1)) 144#define NEPMOK(a0,d,b,c) NEPJOK(a0,(a0+d) & (c-1),b) 145#define EEPMOK(a0,d,b,c) EEPJOK(a0,(a0+d) & (c-1),b) 146 147 148static int tx_complete = 0,dma_complete = 0,queued = 0,requeued = 0, 149 backlogged = 0,rx_enqueued = 0,rx_dequeued = 0,pushed = 0,submitted = 0, 150 putting = 0; 151 152static struct atm_dev *eni_boards = NULL; 153 154static u32 *cpu_zeroes = NULL; /* aligned "magic" zeroes */ 155static dma_addr_t zeroes; 156 157/* Read/write registers on card */ 158#define eni_in(r) readl(eni_dev->reg+(r)*4) 159#define eni_out(v,r) writel((v),eni_dev->reg+(r)*4) 160 161 162/*-------------------------------- utilities --------------------------------*/ 163 164 165static void dump_mem(struct eni_dev *eni_dev) 166{ 167 int i; 168 169 for (i = 0; i < eni_dev->free_len; i++) 170 printk(KERN_DEBUG " %d: %p %d\n",i, 171 eni_dev->free_list[i].start, 172 1 << eni_dev->free_list[i].order); 173} 174 175 176static void dump(struct atm_dev *dev) 177{ 178 struct eni_dev *eni_dev; 179 180 int i; 181 182 eni_dev = ENI_DEV(dev); 183 printk(KERN_NOTICE "Free memory\n"); 184 dump_mem(eni_dev); 185 printk(KERN_NOTICE "TX buffers\n"); 186 for (i = 0; i < NR_CHAN; i++) 187 if (eni_dev->tx[i].send) 188 printk(KERN_NOTICE " TX %d @ %p: %ld\n",i, 189 eni_dev->tx[i].send,eni_dev->tx[i].words*4); 190 printk(KERN_NOTICE "RX buffers\n"); 191 for (i = 0; i < 1024; i++) 192 if (eni_dev->rx_map[i] && ENI_VCC(eni_dev->rx_map[i])->rx) 193 printk(KERN_NOTICE " RX %d @ %p: %ld\n",i, 194 ENI_VCC(eni_dev->rx_map[i])->recv, 195 ENI_VCC(eni_dev->rx_map[i])->words*4); 196 printk(KERN_NOTICE "----\n"); 197} 198 199 200static void eni_put_free(struct eni_dev *eni_dev, void __iomem *start, 201 unsigned long size) 202{ 203 struct eni_free *list; 204 int len,order; 205 206 DPRINTK("init 0x%lx+%ld(0x%lx)\n",start,size,size); 207 start += eni_dev->base_diff; 208 list = eni_dev->free_list; 209 len = eni_dev->free_len; 210 while (size) { 211 if (len >= eni_dev->free_list_size) { 212 printk(KERN_CRIT "eni_put_free overflow (%p,%ld)\n", 213 start,size); 214 break; 215 } 216 for (order = 0; !(((unsigned long)start | size) & (1 << order)); order++); 217 if (MID_MIN_BUF_SIZE > (1 << order)) { 218 printk(KERN_CRIT "eni_put_free: order %d too small\n", 219 order); 220 break; 221 } 222 list[len].start = (void __iomem *) start; 223 list[len].order = order; 224 len++; 225 start += 1 << order; 226 size -= 1 << order; 227 } 228 eni_dev->free_len = len; 229 /*dump_mem(eni_dev);*/ 230} 231 232 233static void __iomem *eni_alloc_mem(struct eni_dev *eni_dev, unsigned long *size) 234{ 235 struct eni_free *list; 236 void __iomem *start; 237 int len,i,order,best_order,index; 238 239 list = eni_dev->free_list; 240 len = eni_dev->free_len; 241 if (*size < MID_MIN_BUF_SIZE) *size = MID_MIN_BUF_SIZE; 242 if (*size > MID_MAX_BUF_SIZE) return NULL; 243 for (order = 0; (1 << order) < *size; order++); 244 DPRINTK("trying: %ld->%d\n",*size,order); 245 best_order = 65; /* we don't have more than 2^64 of anything ... */ 246 index = 0; /* silence GCC */ 247 for (i = 0; i < len; i++) 248 if (list[i].order == order) { 249 best_order = order; 250 index = i; 251 break; 252 } 253 else if (best_order > list[i].order && list[i].order > order) { 254 best_order = list[i].order; 255 index = i; 256 } 257 if (best_order == 65) return NULL; 258 start = list[index].start-eni_dev->base_diff; 259 list[index] = list[--len]; 260 eni_dev->free_len = len; 261 *size = 1 << order; 262 eni_put_free(eni_dev,start+*size,(1 << best_order)-*size); 263 DPRINTK("%ld bytes (order %d) at 0x%lx\n",*size,order,start); 264 memset_io(start,0,*size); /* never leak data */ 265 /*dump_mem(eni_dev);*/ 266 return start; 267} 268 269 270static void eni_free_mem(struct eni_dev *eni_dev, void __iomem *start, 271 unsigned long size) 272{ 273 struct eni_free *list; 274 int len,i,order; 275 276 start += eni_dev->base_diff; 277 list = eni_dev->free_list; 278 len = eni_dev->free_len; 279 for (order = -1; size; order++) size >>= 1; 280 DPRINTK("eni_free_mem: %p+0x%lx (order %d)\n",start,size,order); 281 for (i = 0; i < len; i++) 282 if (((unsigned long) list[i].start) == ((unsigned long)start^(1 << order)) && 283 list[i].order == order) { 284 DPRINTK("match[%d]: 0x%lx/0x%lx(0x%x), %d/%d\n",i, 285 list[i].start,start,1 << order,list[i].order,order); 286 list[i] = list[--len]; 287 start = (void __iomem *) ((unsigned long) start & ~(unsigned long) (1 << order)); 288 order++; 289 i = -1; 290 continue; 291 } 292 if (len >= eni_dev->free_list_size) { 293 printk(KERN_ALERT "eni_free_mem overflow (%p,%d)\n",start, 294 order); 295 return; 296 } 297 list[len].start = start; 298 list[len].order = order; 299 eni_dev->free_len = len+1; 300 /*dump_mem(eni_dev);*/ 301} 302 303 304/*----------------------------------- RX ------------------------------------*/ 305 306 307#define ENI_VCC_NOS ((struct atm_vcc *) 1) 308 309 310static void rx_ident_err(struct atm_vcc *vcc) 311{ 312 struct atm_dev *dev; 313 struct eni_dev *eni_dev; 314 struct eni_vcc *eni_vcc; 315 316 dev = vcc->dev; 317 eni_dev = ENI_DEV(dev); 318 /* immediately halt adapter */ 319 eni_out(eni_in(MID_MC_S) & 320 ~(MID_DMA_ENABLE | MID_TX_ENABLE | MID_RX_ENABLE),MID_MC_S); 321 /* dump useful information */ 322 eni_vcc = ENI_VCC(vcc); 323 printk(KERN_ALERT DEV_LABEL "(itf %d): driver error - RX ident " 324 "mismatch\n",dev->number); 325 printk(KERN_ALERT " VCI %d, rxing %d, words %ld\n",vcc->vci, 326 eni_vcc->rxing,eni_vcc->words); 327 printk(KERN_ALERT " host descr 0x%lx, rx pos 0x%lx, descr value " 328 "0x%x\n",eni_vcc->descr,eni_vcc->rx_pos, 329 (unsigned) readl(eni_vcc->recv+eni_vcc->descr*4)); 330 printk(KERN_ALERT " last %p, servicing %d\n",eni_vcc->last, 331 eni_vcc->servicing); 332 EVENT("---dump ends here---\n",0,0); 333 printk(KERN_NOTICE "---recent events---\n"); 334 event_dump(); 335 ENI_DEV(dev)->fast = NULL; /* really stop it */ 336 ENI_DEV(dev)->slow = NULL; 337 skb_queue_head_init(&ENI_DEV(dev)->rx_queue); 338} 339 340 341static int do_rx_dma(struct atm_vcc *vcc,struct sk_buff *skb, 342 unsigned long skip,unsigned long size,unsigned long eff) 343{ 344 struct eni_dev *eni_dev; 345 struct eni_vcc *eni_vcc; 346 u32 dma_rd,dma_wr; 347 u32 dma[RX_DMA_BUF*2]; 348 dma_addr_t paddr; 349 unsigned long here; 350 int i,j; 351 352 eni_dev = ENI_DEV(vcc->dev); 353 eni_vcc = ENI_VCC(vcc); 354 paddr = 0; /* GCC, shut up */ 355 if (skb) { 356 paddr = pci_map_single(eni_dev->pci_dev,skb->data,skb->len, 357 PCI_DMA_FROMDEVICE); 358 ENI_PRV_PADDR(skb) = paddr; 359 if (paddr & 3) 360 printk(KERN_CRIT DEV_LABEL "(itf %d): VCI %d has " 361 "mis-aligned RX data (0x%lx)\n",vcc->dev->number, 362 vcc->vci,(unsigned long) paddr); 363 ENI_PRV_SIZE(skb) = size+skip; 364 /* PDU plus descriptor */ 365 ATM_SKB(skb)->vcc = vcc; 366 } 367 j = 0; 368 if ((eff && skip) || 1) { /* @@@ actually, skip is always == 1 ... */ 369 here = (eni_vcc->descr+skip) & (eni_vcc->words-1); 370 dma[j++] = (here << MID_DMA_COUNT_SHIFT) | (vcc->vci 371 << MID_DMA_VCI_SHIFT) | MID_DT_JK; 372 j++; 373 } 374 here = (eni_vcc->descr+size+skip) & (eni_vcc->words-1); 375 if (!eff) size += skip; 376 else { 377 unsigned long words; 378 379 if (!size) { 380 DPRINTK("strange things happen ...\n"); 381 EVENT("strange things happen ... (skip=%ld,eff=%ld)\n", 382 size,eff); 383 } 384 words = eff; 385 if (paddr & 15) { 386 unsigned long init; 387 388 init = 4-((paddr & 15) >> 2); 389 if (init > words) init = words; 390 dma[j++] = MID_DT_WORD | (init << MID_DMA_COUNT_SHIFT) | 391 (vcc->vci << MID_DMA_VCI_SHIFT); 392 dma[j++] = paddr; 393 paddr += init << 2; 394 words -= init; 395 } 396#ifdef CONFIG_ATM_ENI_BURST_RX_16W /* may work with some PCI chipsets ... */ 397 if (words & ~15) { 398 dma[j++] = MID_DT_16W | ((words >> 4) << 399 MID_DMA_COUNT_SHIFT) | (vcc->vci << 400 MID_DMA_VCI_SHIFT); 401 dma[j++] = paddr; 402 paddr += (words & ~15) << 2; 403 words &= 15; 404 } 405#endif 406#ifdef CONFIG_ATM_ENI_BURST_RX_8W /* works only with *some* PCI chipsets ... */ 407 if (words & ~7) { 408 dma[j++] = MID_DT_8W | ((words >> 3) << 409 MID_DMA_COUNT_SHIFT) | (vcc->vci << 410 MID_DMA_VCI_SHIFT); 411 dma[j++] = paddr; 412 paddr += (words & ~7) << 2; 413 words &= 7; 414 } 415#endif 416#ifdef CONFIG_ATM_ENI_BURST_RX_4W /* recommended */ 417 if (words & ~3) { 418 dma[j++] = MID_DT_4W | ((words >> 2) << 419 MID_DMA_COUNT_SHIFT) | (vcc->vci << 420 MID_DMA_VCI_SHIFT); 421 dma[j++] = paddr; 422 paddr += (words & ~3) << 2; 423 words &= 3; 424 } 425#endif 426#ifdef CONFIG_ATM_ENI_BURST_RX_2W /* probably useless if RX_4W, RX_8W, ... */ 427 if (words & ~1) { 428 dma[j++] = MID_DT_2W | ((words >> 1) << 429 MID_DMA_COUNT_SHIFT) | (vcc->vci << 430 MID_DMA_VCI_SHIFT); 431 dma[j++] = paddr; 432 paddr += (words & ~1) << 2; 433 words &= 1; 434 } 435#endif 436 if (words) { 437 dma[j++] = MID_DT_WORD | (words << MID_DMA_COUNT_SHIFT) 438 | (vcc->vci << MID_DMA_VCI_SHIFT); 439 dma[j++] = paddr; 440 } 441 } 442 if (size != eff) { 443 dma[j++] = (here << MID_DMA_COUNT_SHIFT) | 444 (vcc->vci << MID_DMA_VCI_SHIFT) | MID_DT_JK; 445 j++; 446 } 447 if (!j || j > 2*RX_DMA_BUF) { 448 printk(KERN_CRIT DEV_LABEL "!j or j too big!!!\n"); 449 goto trouble; 450 } 451 dma[j-2] |= MID_DMA_END; 452 j = j >> 1; 453 dma_wr = eni_in(MID_DMA_WR_RX); 454 dma_rd = eni_in(MID_DMA_RD_RX); 455 /* 456 * Can I move the dma_wr pointer by 2j+1 positions without overwriting 457 * data that hasn't been read (position of dma_rd) yet ? 458 */ 459 if (!NEPMOK(dma_wr,j+j+1,dma_rd,NR_DMA_RX)) { /* @@@ +1 is ugly */ 460 printk(KERN_WARNING DEV_LABEL "(itf %d): RX DMA full\n", 461 vcc->dev->number); 462 goto trouble; 463 } 464 for (i = 0; i < j; i++) { 465 writel(dma[i*2],eni_dev->rx_dma+dma_wr*8); 466 writel(dma[i*2+1],eni_dev->rx_dma+dma_wr*8+4); 467 dma_wr = (dma_wr+1) & (NR_DMA_RX-1); 468 } 469 if (skb) { 470 ENI_PRV_POS(skb) = eni_vcc->descr+size+1; 471 skb_queue_tail(&eni_dev->rx_queue,skb); 472 eni_vcc->last = skb; 473rx_enqueued++; 474 } 475 eni_vcc->descr = here; 476 eni_out(dma_wr,MID_DMA_WR_RX); 477 return 0; 478 479trouble: 480 if (paddr) 481 pci_unmap_single(eni_dev->pci_dev,paddr,skb->len, 482 PCI_DMA_FROMDEVICE); 483 if (skb) dev_kfree_skb_irq(skb); 484 return -1; 485} 486 487 488static void discard(struct atm_vcc *vcc,unsigned long size) 489{ 490 struct eni_vcc *eni_vcc; 491 492 eni_vcc = ENI_VCC(vcc); 493 EVENT("discard (size=%ld)\n",size,0); 494 while (do_rx_dma(vcc,NULL,1,size,0)) EVENT("BUSY LOOP",0,0); 495 /* could do a full fallback, but that might be more expensive */ 496 if (eni_vcc->rxing) ENI_PRV_POS(eni_vcc->last) += size+1; 497 else eni_vcc->rx_pos = (eni_vcc->rx_pos+size+1) & (eni_vcc->words-1); 498} 499 500 501/* 502 * TODO: should check whether direct copies (without DMA setup, dequeuing on 503 * interrupt, etc.) aren't much faster for AAL0 504 */ 505 506static int rx_aal0(struct atm_vcc *vcc) 507{ 508 struct eni_vcc *eni_vcc; 509 unsigned long descr; 510 unsigned long length; 511 struct sk_buff *skb; 512 513 DPRINTK(">rx_aal0\n"); 514 eni_vcc = ENI_VCC(vcc); 515 descr = readl(eni_vcc->recv+eni_vcc->descr*4); 516 if ((descr & MID_RED_IDEN) != (MID_RED_RX_ID << MID_RED_SHIFT)) { 517 rx_ident_err(vcc); 518 return 1; 519 } 520 if (descr & MID_RED_T) { 521 DPRINTK(DEV_LABEL "(itf %d): trashing empty cell\n", 522 vcc->dev->number); 523 length = 0; 524 atomic_inc(&vcc->stats->rx_err); 525 } 526 else { 527 length = ATM_CELL_SIZE-1; /* no HEC */ 528 } 529 skb = length ? atm_alloc_charge(vcc,length,GFP_ATOMIC) : NULL; 530 if (!skb) { 531 discard(vcc,length >> 2); 532 return 0; 533 } 534 skb_put(skb,length); 535 skb->tstamp = eni_vcc->timestamp; 536 DPRINTK("got len %ld\n",length); 537 if (do_rx_dma(vcc,skb,1,length >> 2,length >> 2)) return 1; 538 eni_vcc->rxing++; 539 return 0; 540} 541 542 543static int rx_aal5(struct atm_vcc *vcc) 544{ 545 struct eni_vcc *eni_vcc; 546 unsigned long descr; 547 unsigned long size,eff,length; 548 struct sk_buff *skb; 549 550 EVENT("rx_aal5\n",0,0); 551 DPRINTK(">rx_aal5\n"); 552 eni_vcc = ENI_VCC(vcc); 553 descr = readl(eni_vcc->recv+eni_vcc->descr*4); 554 if ((descr & MID_RED_IDEN) != (MID_RED_RX_ID << MID_RED_SHIFT)) { 555 rx_ident_err(vcc); 556 return 1; 557 } 558 if (descr & (MID_RED_T | MID_RED_CRC_ERR)) { 559 if (descr & MID_RED_T) { 560 EVENT("empty cell (descr=0x%lx)\n",descr,0); 561 DPRINTK(DEV_LABEL "(itf %d): trashing empty cell\n", 562 vcc->dev->number); 563 size = 0; 564 } 565 else { 566 static unsigned long silence = 0; 567 568 if (time_after(jiffies, silence) || silence == 0) { 569 printk(KERN_WARNING DEV_LABEL "(itf %d): " 570 "discarding PDU(s) with CRC error\n", 571 vcc->dev->number); 572 silence = (jiffies+2*HZ)|1; 573 } 574 size = (descr & MID_RED_COUNT)*(ATM_CELL_PAYLOAD >> 2); 575 EVENT("CRC error (descr=0x%lx,size=%ld)\n",descr, 576 size); 577 } 578 eff = length = 0; 579 atomic_inc(&vcc->stats->rx_err); 580 } 581 else { 582 size = (descr & MID_RED_COUNT)*(ATM_CELL_PAYLOAD >> 2); 583 DPRINTK("size=%ld\n",size); 584 length = readl(eni_vcc->recv+(((eni_vcc->descr+size-1) & 585 (eni_vcc->words-1)))*4) & 0xffff; 586 /* -trailer(2)+header(1) */ 587 if (length && length <= (size << 2)-8 && length <= 588 ATM_MAX_AAL5_PDU) eff = (length+3) >> 2; 589 else { /* ^ trailer length (8) */ 590 EVENT("bad PDU (descr=0x08%lx,length=%ld)\n",descr, 591 length); 592 printk(KERN_ERR DEV_LABEL "(itf %d): bad AAL5 PDU " 593 "(VCI=%d,length=%ld,size=%ld (descr 0x%lx))\n", 594 vcc->dev->number,vcc->vci,length,size << 2,descr); 595 length = eff = 0; 596 atomic_inc(&vcc->stats->rx_err); 597 } 598 } 599 skb = eff ? atm_alloc_charge(vcc,eff << 2,GFP_ATOMIC) : NULL; 600 if (!skb) { 601 discard(vcc,size); 602 return 0; 603 } 604 skb_put(skb,length); 605 DPRINTK("got len %ld\n",length); 606 if (do_rx_dma(vcc,skb,1,size,eff)) return 1; 607 eni_vcc->rxing++; 608 return 0; 609} 610 611 612static inline int rx_vcc(struct atm_vcc *vcc) 613{ 614 void __iomem *vci_dsc; 615 unsigned long tmp; 616 struct eni_vcc *eni_vcc; 617 618 eni_vcc = ENI_VCC(vcc); 619 vci_dsc = ENI_DEV(vcc->dev)->vci+vcc->vci*16; 620 EVENT("rx_vcc(1)\n",0,0); 621 while (eni_vcc->descr != (tmp = (readl(vci_dsc+4) & MID_VCI_DESCR) >> 622 MID_VCI_DESCR_SHIFT)) { 623 EVENT("rx_vcc(2: host dsc=0x%lx, nic dsc=0x%lx)\n", 624 eni_vcc->descr,tmp); 625 DPRINTK("CB_DESCR %ld REG_DESCR %d\n",ENI_VCC(vcc)->descr, 626 (((unsigned) readl(vci_dsc+4) & MID_VCI_DESCR) >> 627 MID_VCI_DESCR_SHIFT)); 628 if (ENI_VCC(vcc)->rx(vcc)) return 1; 629 } 630 /* clear IN_SERVICE flag */ 631 writel(readl(vci_dsc) & ~MID_VCI_IN_SERVICE,vci_dsc); 632 /* 633 * If new data has arrived between evaluating the while condition and 634 * clearing IN_SERVICE, we wouldn't be notified until additional data 635 * follows. So we have to loop again to be sure. 636 */ 637 EVENT("rx_vcc(3)\n",0,0); 638 while (ENI_VCC(vcc)->descr != (tmp = (readl(vci_dsc+4) & MID_VCI_DESCR) 639 >> MID_VCI_DESCR_SHIFT)) { 640 EVENT("rx_vcc(4: host dsc=0x%lx, nic dsc=0x%lx)\n", 641 eni_vcc->descr,tmp); 642 DPRINTK("CB_DESCR %ld REG_DESCR %d\n",ENI_VCC(vcc)->descr, 643 (((unsigned) readl(vci_dsc+4) & MID_VCI_DESCR) >> 644 MID_VCI_DESCR_SHIFT)); 645 if (ENI_VCC(vcc)->rx(vcc)) return 1; 646 } 647 return 0; 648} 649 650 651static void poll_rx(struct atm_dev *dev) 652{ 653 struct eni_dev *eni_dev; 654 struct atm_vcc *curr; 655 656 eni_dev = ENI_DEV(dev); 657 while ((curr = eni_dev->fast)) { 658 EVENT("poll_rx.fast\n",0,0); 659 if (rx_vcc(curr)) return; 660 eni_dev->fast = ENI_VCC(curr)->next; 661 ENI_VCC(curr)->next = ENI_VCC_NOS; 662 barrier(); 663 ENI_VCC(curr)->servicing--; 664 } 665 while ((curr = eni_dev->slow)) { 666 EVENT("poll_rx.slow\n",0,0); 667 if (rx_vcc(curr)) return; 668 eni_dev->slow = ENI_VCC(curr)->next; 669 ENI_VCC(curr)->next = ENI_VCC_NOS; 670 barrier(); 671 ENI_VCC(curr)->servicing--; 672 } 673} 674 675 676static void get_service(struct atm_dev *dev) 677{ 678 struct eni_dev *eni_dev; 679 struct atm_vcc *vcc; 680 unsigned long vci; 681 682 DPRINTK(">get_service\n"); 683 eni_dev = ENI_DEV(dev); 684 while (eni_in(MID_SERV_WRITE) != eni_dev->serv_read) { 685 vci = readl(eni_dev->service+eni_dev->serv_read*4); 686 eni_dev->serv_read = (eni_dev->serv_read+1) & (NR_SERVICE-1); 687 vcc = eni_dev->rx_map[vci & 1023]; 688 if (!vcc) { 689 printk(KERN_CRIT DEV_LABEL "(itf %d): VCI %ld not " 690 "found\n",dev->number,vci); 691 continue; /* nasty but we try to go on anyway */ 692 /* @@@ nope, doesn't work */ 693 } 694 EVENT("getting from service\n",0,0); 695 if (ENI_VCC(vcc)->next != ENI_VCC_NOS) { 696 EVENT("double service\n",0,0); 697 DPRINTK("Grr, servicing VCC %ld twice\n",vci); 698 continue; 699 } 700 ENI_VCC(vcc)->timestamp = ktime_get_real(); 701 ENI_VCC(vcc)->next = NULL; 702 if (vcc->qos.rxtp.traffic_class == ATM_CBR) { 703 if (eni_dev->fast) 704 ENI_VCC(eni_dev->last_fast)->next = vcc; 705 else eni_dev->fast = vcc; 706 eni_dev->last_fast = vcc; 707 } 708 else { 709 if (eni_dev->slow) 710 ENI_VCC(eni_dev->last_slow)->next = vcc; 711 else eni_dev->slow = vcc; 712 eni_dev->last_slow = vcc; 713 } 714putting++; 715 ENI_VCC(vcc)->servicing++; 716 } 717} 718 719 720static void dequeue_rx(struct atm_dev *dev) 721{ 722 struct eni_dev *eni_dev; 723 struct eni_vcc *eni_vcc; 724 struct atm_vcc *vcc; 725 struct sk_buff *skb; 726 void __iomem *vci_dsc; 727 int first; 728 729 eni_dev = ENI_DEV(dev); 730 first = 1; 731 while (1) { 732 skb = skb_dequeue(&eni_dev->rx_queue); 733 if (!skb) { 734 if (first) { 735 DPRINTK(DEV_LABEL "(itf %d): RX but not " 736 "rxing\n",dev->number); 737 EVENT("nothing to dequeue\n",0,0); 738 } 739 break; 740 } 741 EVENT("dequeued (size=%ld,pos=0x%lx)\n",ENI_PRV_SIZE(skb), 742 ENI_PRV_POS(skb)); 743rx_dequeued++; 744 vcc = ATM_SKB(skb)->vcc; 745 eni_vcc = ENI_VCC(vcc); 746 first = 0; 747 vci_dsc = eni_dev->vci+vcc->vci*16; 748 if (!EEPMOK(eni_vcc->rx_pos,ENI_PRV_SIZE(skb), 749 (readl(vci_dsc+4) & MID_VCI_READ) >> MID_VCI_READ_SHIFT, 750 eni_vcc->words)) { 751 EVENT("requeuing\n",0,0); 752 skb_queue_head(&eni_dev->rx_queue,skb); 753 break; 754 } 755 eni_vcc->rxing--; 756 eni_vcc->rx_pos = ENI_PRV_POS(skb) & (eni_vcc->words-1); 757 pci_unmap_single(eni_dev->pci_dev,ENI_PRV_PADDR(skb),skb->len, 758 PCI_DMA_TODEVICE); 759 if (!skb->len) dev_kfree_skb_irq(skb); 760 else { 761 EVENT("pushing (len=%ld)\n",skb->len,0); 762 if (vcc->qos.aal == ATM_AAL0) 763 *(unsigned long *) skb->data = 764 ntohl(*(unsigned long *) skb->data); 765 memset(skb->cb,0,sizeof(struct eni_skb_prv)); 766 vcc->push(vcc,skb); 767 pushed++; 768 } 769 atomic_inc(&vcc->stats->rx); 770 } 771 wake_up(&eni_dev->rx_wait); 772} 773 774 775static int open_rx_first(struct atm_vcc *vcc) 776{ 777 struct eni_dev *eni_dev; 778 struct eni_vcc *eni_vcc; 779 unsigned long size; 780 781 DPRINTK("open_rx_first\n"); 782 eni_dev = ENI_DEV(vcc->dev); 783 eni_vcc = ENI_VCC(vcc); 784 eni_vcc->rx = NULL; 785 if (vcc->qos.rxtp.traffic_class == ATM_NONE) return 0; 786 size = vcc->qos.rxtp.max_sdu*eni_dev->rx_mult/100; 787 if (size > MID_MAX_BUF_SIZE && vcc->qos.rxtp.max_sdu <= 788 MID_MAX_BUF_SIZE) 789 size = MID_MAX_BUF_SIZE; 790 eni_vcc->recv = eni_alloc_mem(eni_dev,&size); 791 DPRINTK("rx at 0x%lx\n",eni_vcc->recv); 792 eni_vcc->words = size >> 2; 793 if (!eni_vcc->recv) return -ENOBUFS; 794 eni_vcc->rx = vcc->qos.aal == ATM_AAL5 ? rx_aal5 : rx_aal0; 795 eni_vcc->descr = 0; 796 eni_vcc->rx_pos = 0; 797 eni_vcc->rxing = 0; 798 eni_vcc->servicing = 0; 799 eni_vcc->next = ENI_VCC_NOS; 800 return 0; 801} 802 803 804static int open_rx_second(struct atm_vcc *vcc) 805{ 806 void __iomem *here; 807 struct eni_dev *eni_dev; 808 struct eni_vcc *eni_vcc; 809 unsigned long size; 810 int order; 811 812 DPRINTK("open_rx_second\n"); 813 eni_dev = ENI_DEV(vcc->dev); 814 eni_vcc = ENI_VCC(vcc); 815 if (!eni_vcc->rx) return 0; 816 /* set up VCI descriptor */ 817 here = eni_dev->vci+vcc->vci*16; 818 DPRINTK("loc 0x%x\n",(unsigned) (eni_vcc->recv-eni_dev->ram)/4); 819 size = eni_vcc->words >> 8; 820 for (order = -1; size; order++) size >>= 1; 821 writel(0,here+4); /* descr, read = 0 */ 822 writel(0,here+8); /* write, state, count = 0 */ 823 if (eni_dev->rx_map[vcc->vci]) 824 printk(KERN_CRIT DEV_LABEL "(itf %d): BUG - VCI %d already " 825 "in use\n",vcc->dev->number,vcc->vci); 826 eni_dev->rx_map[vcc->vci] = vcc; /* now it counts */ 827 writel(((vcc->qos.aal != ATM_AAL5 ? MID_MODE_RAW : MID_MODE_AAL5) << 828 MID_VCI_MODE_SHIFT) | MID_VCI_PTI_MODE | 829 (((eni_vcc->recv-eni_dev->ram) >> (MID_LOC_SKIP+2)) << 830 MID_VCI_LOCATION_SHIFT) | (order << MID_VCI_SIZE_SHIFT),here); 831 return 0; 832} 833 834 835static void close_rx(struct atm_vcc *vcc) 836{ 837 DECLARE_WAITQUEUE(wait,current); 838 void __iomem *here; 839 struct eni_dev *eni_dev; 840 struct eni_vcc *eni_vcc; 841 842 eni_vcc = ENI_VCC(vcc); 843 if (!eni_vcc->rx) return; 844 eni_dev = ENI_DEV(vcc->dev); 845 if (vcc->vpi != ATM_VPI_UNSPEC && vcc->vci != ATM_VCI_UNSPEC) { 846 here = eni_dev->vci+vcc->vci*16; 847 /* block receiver */ 848 writel((readl(here) & ~MID_VCI_MODE) | (MID_MODE_TRASH << 849 MID_VCI_MODE_SHIFT),here); 850 /* wait for receiver to become idle */ 851 udelay(27); 852 /* discard pending cell */ 853 writel(readl(here) & ~MID_VCI_IN_SERVICE,here); 854 /* don't accept any new ones */ 855 eni_dev->rx_map[vcc->vci] = NULL; 856 /* wait for RX queue to drain */ 857 DPRINTK("eni_close: waiting for RX ...\n"); 858 EVENT("RX closing\n",0,0); 859 add_wait_queue(&eni_dev->rx_wait,&wait); 860 set_current_state(TASK_UNINTERRUPTIBLE); 861 barrier(); 862 for (;;) { 863 /* transition service->rx: rxing++, servicing-- */ 864 if (!eni_vcc->servicing) { 865 barrier(); 866 if (!eni_vcc->rxing) break; 867 } 868 EVENT("drain PDUs (rx %ld, serv %ld)\n",eni_vcc->rxing, 869 eni_vcc->servicing); 870 printk(KERN_INFO "%d+%d RX left\n",eni_vcc->servicing, 871 eni_vcc->rxing); 872 schedule(); 873 set_current_state(TASK_UNINTERRUPTIBLE); 874 } 875 for (;;) { 876 int at_end; 877 u32 tmp; 878 879 tasklet_disable(&eni_dev->task); 880 tmp = readl(eni_dev->vci+vcc->vci*16+4) & MID_VCI_READ; 881 at_end = eni_vcc->rx_pos == tmp >> MID_VCI_READ_SHIFT; 882 tasklet_enable(&eni_dev->task); 883 if (at_end) break; 884 EVENT("drain discard (host 0x%lx, nic 0x%lx)\n", 885 eni_vcc->rx_pos,tmp); 886 printk(KERN_INFO "draining RX: host 0x%lx, nic 0x%x\n", 887 eni_vcc->rx_pos,tmp); 888 schedule(); 889 set_current_state(TASK_UNINTERRUPTIBLE); 890 } 891 set_current_state(TASK_RUNNING); 892 remove_wait_queue(&eni_dev->rx_wait,&wait); 893 } 894 eni_free_mem(eni_dev,eni_vcc->recv,eni_vcc->words << 2); 895 eni_vcc->rx = NULL; 896} 897 898 899static int start_rx(struct atm_dev *dev) 900{ 901 struct eni_dev *eni_dev; 902 903 eni_dev = ENI_DEV(dev); 904 eni_dev->rx_map = (struct atm_vcc **) get_zeroed_page(GFP_KERNEL); 905 if (!eni_dev->rx_map) { 906 printk(KERN_ERR DEV_LABEL "(itf %d): couldn't get free page\n", 907 dev->number); 908 free_page((unsigned long) eni_dev->free_list); 909 return -ENOMEM; 910 } 911 eni_dev->rx_mult = DEFAULT_RX_MULT; 912 eni_dev->fast = eni_dev->last_fast = NULL; 913 eni_dev->slow = eni_dev->last_slow = NULL; 914 init_waitqueue_head(&eni_dev->rx_wait); 915 skb_queue_head_init(&eni_dev->rx_queue); 916 eni_dev->serv_read = eni_in(MID_SERV_WRITE); 917 eni_out(0,MID_DMA_WR_RX); 918 return 0; 919} 920 921 922/*----------------------------------- TX ------------------------------------*/ 923 924 925enum enq_res { enq_ok,enq_next,enq_jam }; 926 927 928static inline void put_dma(int chan,u32 *dma,int *j,dma_addr_t paddr, 929 u32 size) 930{ 931 u32 init,words; 932 933 DPRINTK("put_dma: 0x%lx+0x%x\n",(unsigned long) paddr,size); 934 EVENT("put_dma: 0x%lx+0x%lx\n",(unsigned long) paddr,size); 935 if (paddr & 3) { 936 init = 4-(paddr & 3); 937 if (init > size || size < 7) init = size; 938 DPRINTK("put_dma: %lx DMA: %d/%d bytes\n", 939 (unsigned long) paddr,init,size); 940 dma[(*j)++] = MID_DT_BYTE | (init << MID_DMA_COUNT_SHIFT) | 941 (chan << MID_DMA_CHAN_SHIFT); 942 dma[(*j)++] = paddr; 943 paddr += init; 944 size -= init; 945 } 946 words = size >> 2; 947 size &= 3; 948 if (words && (paddr & 31)) { 949 init = 8-((paddr & 31) >> 2); 950 if (init > words) init = words; 951 DPRINTK("put_dma: %lx DMA: %d/%d words\n", 952 (unsigned long) paddr,init,words); 953 dma[(*j)++] = MID_DT_WORD | (init << MID_DMA_COUNT_SHIFT) | 954 (chan << MID_DMA_CHAN_SHIFT); 955 dma[(*j)++] = paddr; 956 paddr += init << 2; 957 words -= init; 958 } 959#ifdef CONFIG_ATM_ENI_BURST_TX_16W /* may work with some PCI chipsets ... */ 960 if (words & ~15) { 961 DPRINTK("put_dma: %lx DMA: %d*16/%d words\n", 962 (unsigned long) paddr,words >> 4,words); 963 dma[(*j)++] = MID_DT_16W | ((words >> 4) << MID_DMA_COUNT_SHIFT) 964 | (chan << MID_DMA_CHAN_SHIFT); 965 dma[(*j)++] = paddr; 966 paddr += (words & ~15) << 2; 967 words &= 15; 968 } 969#endif 970#ifdef CONFIG_ATM_ENI_BURST_TX_8W /* recommended */ 971 if (words & ~7) { 972 DPRINTK("put_dma: %lx DMA: %d*8/%d words\n", 973 (unsigned long) paddr,words >> 3,words); 974 dma[(*j)++] = MID_DT_8W | ((words >> 3) << MID_DMA_COUNT_SHIFT) 975 | (chan << MID_DMA_CHAN_SHIFT); 976 dma[(*j)++] = paddr; 977 paddr += (words & ~7) << 2; 978 words &= 7; 979 } 980#endif 981#ifdef CONFIG_ATM_ENI_BURST_TX_4W /* probably useless if TX_8W or TX_16W */ 982 if (words & ~3) { 983 DPRINTK("put_dma: %lx DMA: %d*4/%d words\n", 984 (unsigned long) paddr,words >> 2,words); 985 dma[(*j)++] = MID_DT_4W | ((words >> 2) << MID_DMA_COUNT_SHIFT) 986 | (chan << MID_DMA_CHAN_SHIFT); 987 dma[(*j)++] = paddr; 988 paddr += (words & ~3) << 2; 989 words &= 3; 990 } 991#endif 992#ifdef CONFIG_ATM_ENI_BURST_TX_2W /* probably useless if TX_4W, TX_8W, ... */ 993 if (words & ~1) { 994 DPRINTK("put_dma: %lx DMA: %d*2/%d words\n", 995 (unsigned long) paddr,words >> 1,words); 996 dma[(*j)++] = MID_DT_2W | ((words >> 1) << MID_DMA_COUNT_SHIFT) 997 | (chan << MID_DMA_CHAN_SHIFT); 998 dma[(*j)++] = paddr; 999 paddr += (words & ~1) << 2; 1000 words &= 1; 1001 } 1002#endif 1003 if (words) { 1004 DPRINTK("put_dma: %lx DMA: %d words\n",(unsigned long) paddr, 1005 words); 1006 dma[(*j)++] = MID_DT_WORD | (words << MID_DMA_COUNT_SHIFT) | 1007 (chan << MID_DMA_CHAN_SHIFT); 1008 dma[(*j)++] = paddr; 1009 paddr += words << 2; 1010 } 1011 if (size) { 1012 DPRINTK("put_dma: %lx DMA: %d bytes\n",(unsigned long) paddr, 1013 size); 1014 dma[(*j)++] = MID_DT_BYTE | (size << MID_DMA_COUNT_SHIFT) | 1015 (chan << MID_DMA_CHAN_SHIFT); 1016 dma[(*j)++] = paddr; 1017 } 1018} 1019 1020 1021static enum enq_res do_tx(struct sk_buff *skb) 1022{ 1023 struct atm_vcc *vcc; 1024 struct eni_dev *eni_dev; 1025 struct eni_vcc *eni_vcc; 1026 struct eni_tx *tx; 1027 dma_addr_t paddr; 1028 u32 dma_rd,dma_wr; 1029 u32 size; /* in words */ 1030 int aal5,dma_size,i,j; 1031 1032 DPRINTK(">do_tx\n"); 1033 NULLCHECK(skb); 1034 EVENT("do_tx: skb=0x%lx, %ld bytes\n",(unsigned long) skb,skb->len); 1035 vcc = ATM_SKB(skb)->vcc; 1036 NULLCHECK(vcc); 1037 eni_dev = ENI_DEV(vcc->dev); 1038 NULLCHECK(eni_dev); 1039 eni_vcc = ENI_VCC(vcc); 1040 tx = eni_vcc->tx; 1041 NULLCHECK(tx); 1042 /* 1043 * Potential future IP speedup: make hard_header big enough to put 1044 * segmentation descriptor directly into PDU. Saves: 4 slave writes, 1045 * 1 DMA xfer & 2 DMA'ed bytes (protocol layering is for wimps :-) 1046 */ 1047 1048 aal5 = vcc->qos.aal == ATM_AAL5; 1049 /* check space in buffer */ 1050 if (!aal5) 1051 size = (ATM_CELL_PAYLOAD >> 2)+TX_DESCR_SIZE; 1052 /* cell without HEC plus segmentation header (includes 1053 four-byte cell header) */ 1054 else { 1055 size = skb->len+4*AAL5_TRAILER+ATM_CELL_PAYLOAD-1; 1056 /* add AAL5 trailer */ 1057 size = ((size-(size % ATM_CELL_PAYLOAD)) >> 2)+TX_DESCR_SIZE; 1058 /* add segmentation header */ 1059 } 1060 /* 1061 * Can I move tx_pos by size bytes without getting closer than TX_GAP 1062 * to the read pointer ? TX_GAP means to leave some space for what 1063 * the manual calls "too close". 1064 */ 1065 if (!NEPMOK(tx->tx_pos,size+TX_GAP, 1066 eni_in(MID_TX_RDPTR(tx->index)),tx->words)) { 1067 DPRINTK(DEV_LABEL "(itf %d): TX full (size %d)\n", 1068 vcc->dev->number,size); 1069 return enq_next; 1070 } 1071 /* check DMA */ 1072 dma_wr = eni_in(MID_DMA_WR_TX); 1073 dma_rd = eni_in(MID_DMA_RD_TX); 1074 dma_size = 3; /* JK for descriptor and final fill, plus final size 1075 mis-alignment fix */ 1076DPRINTK("iovcnt = %d\n",skb_shinfo(skb)->nr_frags); 1077 if (!skb_shinfo(skb)->nr_frags) dma_size += 5; 1078 else dma_size += 5*(skb_shinfo(skb)->nr_frags+1); 1079 if (dma_size > TX_DMA_BUF) { 1080 printk(KERN_CRIT DEV_LABEL "(itf %d): needs %d DMA entries " 1081 "(got only %d)\n",vcc->dev->number,dma_size,TX_DMA_BUF); 1082 } 1083 DPRINTK("dma_wr is %d, tx_pos is %ld\n",dma_wr,tx->tx_pos); 1084 if (dma_wr != dma_rd && ((dma_rd+NR_DMA_TX-dma_wr) & (NR_DMA_TX-1)) < 1085 dma_size) { 1086 printk(KERN_WARNING DEV_LABEL "(itf %d): TX DMA full\n", 1087 vcc->dev->number); 1088 return enq_jam; 1089 } 1090 paddr = pci_map_single(eni_dev->pci_dev,skb->data,skb->len, 1091 PCI_DMA_TODEVICE); 1092 ENI_PRV_PADDR(skb) = paddr; 1093 /* prepare DMA queue entries */ 1094 j = 0; 1095 eni_dev->dma[j++] = (((tx->tx_pos+TX_DESCR_SIZE) & (tx->words-1)) << 1096 MID_DMA_COUNT_SHIFT) | (tx->index << MID_DMA_CHAN_SHIFT) | 1097 MID_DT_JK; 1098 j++; 1099 if (!skb_shinfo(skb)->nr_frags) 1100 if (aal5) put_dma(tx->index,eni_dev->dma,&j,paddr,skb->len); 1101 else put_dma(tx->index,eni_dev->dma,&j,paddr+4,skb->len-4); 1102 else { 1103DPRINTK("doing direct send\n"); /* @@@ well, this doesn't work anyway */ 1104 for (i = -1; i < skb_shinfo(skb)->nr_frags; i++) 1105 if (i == -1) 1106 put_dma(tx->index,eni_dev->dma,&j,(unsigned long) 1107 skb->data, 1108 skb->len - skb->data_len); 1109 else 1110 put_dma(tx->index,eni_dev->dma,&j,(unsigned long) 1111 skb_shinfo(skb)->frags[i].page + skb_shinfo(skb)->frags[i].page_offset, 1112 skb_shinfo(skb)->frags[i].size); 1113 } 1114 if (skb->len & 3) 1115 put_dma(tx->index,eni_dev->dma,&j,zeroes,4-(skb->len & 3)); 1116 /* JK for AAL5 trailer - AAL0 doesn't need it, but who cares ... */ 1117 eni_dev->dma[j++] = (((tx->tx_pos+size) & (tx->words-1)) << 1118 MID_DMA_COUNT_SHIFT) | (tx->index << MID_DMA_CHAN_SHIFT) | 1119 MID_DMA_END | MID_DT_JK; 1120 j++; 1121 DPRINTK("DMA at end: %d\n",j); 1122 /* store frame */ 1123 writel((MID_SEG_TX_ID << MID_SEG_ID_SHIFT) | 1124 (aal5 ? MID_SEG_AAL5 : 0) | (tx->prescaler << MID_SEG_PR_SHIFT) | 1125 (tx->resolution << MID_SEG_RATE_SHIFT) | 1126 (size/(ATM_CELL_PAYLOAD/4)),tx->send+tx->tx_pos*4); 1127/*printk("dsc = 0x%08lx\n",(unsigned long) readl(tx->send+tx->tx_pos*4));*/ 1128 writel((vcc->vci << MID_SEG_VCI_SHIFT) | 1129 (aal5 ? 0 : (skb->data[3] & 0xf)) | 1130 (ATM_SKB(skb)->atm_options & ATM_ATMOPT_CLP ? MID_SEG_CLP : 0), 1131 tx->send+((tx->tx_pos+1) & (tx->words-1))*4); 1132 DPRINTK("size: %d, len:%d\n",size,skb->len); 1133 if (aal5) 1134 writel(skb->len,tx->send+ 1135 ((tx->tx_pos+size-AAL5_TRAILER) & (tx->words-1))*4); 1136 j = j >> 1; 1137 for (i = 0; i < j; i++) { 1138 writel(eni_dev->dma[i*2],eni_dev->tx_dma+dma_wr*8); 1139 writel(eni_dev->dma[i*2+1],eni_dev->tx_dma+dma_wr*8+4); 1140 dma_wr = (dma_wr+1) & (NR_DMA_TX-1); 1141 } 1142 ENI_PRV_POS(skb) = tx->tx_pos; 1143 ENI_PRV_SIZE(skb) = size; 1144 ENI_VCC(vcc)->txing += size; 1145 tx->tx_pos = (tx->tx_pos+size) & (tx->words-1); 1146 DPRINTK("dma_wr set to %d, tx_pos is now %ld\n",dma_wr,tx->tx_pos); 1147 eni_out(dma_wr,MID_DMA_WR_TX); 1148 skb_queue_tail(&eni_dev->tx_queue,skb); 1149queued++; 1150 return enq_ok; 1151} 1152 1153 1154static void poll_tx(struct atm_dev *dev) 1155{ 1156 struct eni_tx *tx; 1157 struct sk_buff *skb; 1158 enum enq_res res; 1159 int i; 1160 1161 DPRINTK(">poll_tx\n"); 1162 for (i = NR_CHAN-1; i >= 0; i--) { 1163 tx = &ENI_DEV(dev)->tx[i]; 1164 if (tx->send) 1165 while ((skb = skb_dequeue(&tx->backlog))) { 1166 res = do_tx(skb); 1167 if (res == enq_ok) continue; 1168 DPRINTK("re-queuing TX PDU\n"); 1169 skb_queue_head(&tx->backlog,skb); 1170requeued++; 1171 if (res == enq_jam) return; 1172 break; 1173 } 1174 } 1175} 1176 1177 1178static void dequeue_tx(struct atm_dev *dev) 1179{ 1180 struct eni_dev *eni_dev; 1181 struct atm_vcc *vcc; 1182 struct sk_buff *skb; 1183 struct eni_tx *tx; 1184 1185 NULLCHECK(dev); 1186 eni_dev = ENI_DEV(dev); 1187 NULLCHECK(eni_dev); 1188 while ((skb = skb_dequeue(&eni_dev->tx_queue))) { 1189 vcc = ATM_SKB(skb)->vcc; 1190 NULLCHECK(vcc); 1191 tx = ENI_VCC(vcc)->tx; 1192 NULLCHECK(ENI_VCC(vcc)->tx); 1193 DPRINTK("dequeue_tx: next 0x%lx curr 0x%x\n",ENI_PRV_POS(skb), 1194 (unsigned) eni_in(MID_TX_DESCRSTART(tx->index))); 1195 if (ENI_VCC(vcc)->txing < tx->words && ENI_PRV_POS(skb) == 1196 eni_in(MID_TX_DESCRSTART(tx->index))) { 1197 skb_queue_head(&eni_dev->tx_queue,skb); 1198 break; 1199 } 1200 ENI_VCC(vcc)->txing -= ENI_PRV_SIZE(skb); 1201 pci_unmap_single(eni_dev->pci_dev,ENI_PRV_PADDR(skb),skb->len, 1202 PCI_DMA_TODEVICE); 1203 if (vcc->pop) vcc->pop(vcc,skb); 1204 else dev_kfree_skb_irq(skb); 1205 atomic_inc(&vcc->stats->tx); 1206 wake_up(&eni_dev->tx_wait); 1207dma_complete++; 1208 } 1209} 1210 1211 1212static struct eni_tx *alloc_tx(struct eni_dev *eni_dev,int ubr) 1213{ 1214 int i; 1215 1216 for (i = !ubr; i < NR_CHAN; i++) 1217 if (!eni_dev->tx[i].send) return eni_dev->tx+i; 1218 return NULL; 1219} 1220 1221 1222static int comp_tx(struct eni_dev *eni_dev,int *pcr,int reserved,int *pre, 1223 int *res,int unlimited) 1224{ 1225 static const int pre_div[] = { 4,16,128,2048 }; 1226 /* 2^(((x+2)^2-(x+2))/2+1) */ 1227 1228 if (unlimited) *pre = *res = 0; 1229 else { 1230 if (*pcr > 0) { 1231 int div; 1232 1233 for (*pre = 0; *pre < 3; (*pre)++) 1234 if (TS_CLOCK/pre_div[*pre]/64 <= *pcr) break; 1235 div = pre_div[*pre]**pcr; 1236 DPRINTK("min div %d\n",div); 1237 *res = TS_CLOCK/div-1; 1238 } 1239 else { 1240 int div; 1241 1242 if (!*pcr) *pcr = eni_dev->tx_bw+reserved; 1243 for (*pre = 3; *pre >= 0; (*pre)--) 1244 if (TS_CLOCK/pre_div[*pre]/64 > -*pcr) break; 1245 if (*pre < 3) (*pre)++; /* else fail later */ 1246 div = pre_div[*pre]*-*pcr; 1247 DPRINTK("max div %d\n",div); 1248 *res = (TS_CLOCK+div-1)/div-1; 1249 } 1250 if (*res < 0) *res = 0; 1251 if (*res > MID_SEG_MAX_RATE) *res = MID_SEG_MAX_RATE; 1252 } 1253 *pcr = TS_CLOCK/pre_div[*pre]/(*res+1); 1254 DPRINTK("out pcr: %d (%d:%d)\n",*pcr,*pre,*res); 1255 return 0; 1256} 1257 1258 1259static int reserve_or_set_tx(struct atm_vcc *vcc,struct atm_trafprm *txtp, 1260 int set_rsv,int set_shp) 1261{ 1262 struct eni_dev *eni_dev = ENI_DEV(vcc->dev); 1263 struct eni_vcc *eni_vcc = ENI_VCC(vcc); 1264 struct eni_tx *tx; 1265 unsigned long size; 1266 void __iomem *mem; 1267 int rate,ubr,unlimited,new_tx; 1268 int pre,res,order; 1269 int error; 1270 1271 rate = atm_pcr_goal(txtp); 1272 ubr = txtp->traffic_class == ATM_UBR; 1273 unlimited = ubr && (!rate || rate <= -ATM_OC3_PCR || 1274 rate >= ATM_OC3_PCR); 1275 if (!unlimited) { 1276 size = txtp->max_sdu*eni_dev->tx_mult/100; 1277 if (size > MID_MAX_BUF_SIZE && txtp->max_sdu <= 1278 MID_MAX_BUF_SIZE) 1279 size = MID_MAX_BUF_SIZE; 1280 } 1281 else { 1282 if (eni_dev->ubr) { 1283 eni_vcc->tx = eni_dev->ubr; 1284 txtp->pcr = ATM_OC3_PCR; 1285 return 0; 1286 } 1287 size = UBR_BUFFER; 1288 } 1289 new_tx = !eni_vcc->tx; 1290 mem = NULL; /* for gcc */ 1291 if (!new_tx) tx = eni_vcc->tx; 1292 else { 1293 mem = eni_alloc_mem(eni_dev,&size); 1294 if (!mem) return -ENOBUFS; 1295 tx = alloc_tx(eni_dev,unlimited); 1296 if (!tx) { 1297 eni_free_mem(eni_dev,mem,size); 1298 return -EBUSY; 1299 } 1300 DPRINTK("got chan %d\n",tx->index); 1301 tx->reserved = tx->shaping = 0; 1302 tx->send = mem; 1303 tx->words = size >> 2; 1304 skb_queue_head_init(&tx->backlog); 1305 for (order = 0; size > (1 << (order+10)); order++); 1306 eni_out((order << MID_SIZE_SHIFT) | 1307 ((tx->send-eni_dev->ram) >> (MID_LOC_SKIP+2)), 1308 MID_TX_PLACE(tx->index)); 1309 tx->tx_pos = eni_in(MID_TX_DESCRSTART(tx->index)) & 1310 MID_DESCR_START; 1311 } 1312 error = comp_tx(eni_dev,&rate,tx->reserved,&pre,&res,unlimited); 1313 if (!error && txtp->min_pcr > rate) error = -EINVAL; 1314 if (!error && txtp->max_pcr && txtp->max_pcr != ATM_MAX_PCR && 1315 txtp->max_pcr < rate) error = -EINVAL; 1316 if (!error && !ubr && rate > eni_dev->tx_bw+tx->reserved) 1317 error = -EINVAL; 1318 if (!error && set_rsv && !set_shp && rate < tx->shaping) 1319 error = -EINVAL; 1320 if (!error && !set_rsv && rate > tx->reserved && !ubr) 1321 error = -EINVAL; 1322 if (error) { 1323 if (new_tx) { 1324 tx->send = NULL; 1325 eni_free_mem(eni_dev,mem,size); 1326 } 1327 return error; 1328 } 1329 txtp->pcr = rate; 1330 if (set_rsv && !ubr) { 1331 eni_dev->tx_bw += tx->reserved; 1332 tx->reserved = rate; 1333 eni_dev->tx_bw -= rate; 1334 } 1335 if (set_shp || (unlimited && new_tx)) { 1336 if (unlimited && new_tx) eni_dev->ubr = tx; 1337 tx->prescaler = pre; 1338 tx->resolution = res; 1339 tx->shaping = rate; 1340 } 1341 if (set_shp) eni_vcc->tx = tx; 1342 DPRINTK("rsv %d shp %d\n",tx->reserved,tx->shaping); 1343 return 0; 1344} 1345 1346 1347static int open_tx_first(struct atm_vcc *vcc) 1348{ 1349 ENI_VCC(vcc)->tx = NULL; 1350 if (vcc->qos.txtp.traffic_class == ATM_NONE) return 0; 1351 ENI_VCC(vcc)->txing = 0; 1352 return reserve_or_set_tx(vcc,&vcc->qos.txtp,1,1); 1353} 1354 1355 1356static int open_tx_second(struct atm_vcc *vcc) 1357{ 1358 return 0; /* nothing to do */ 1359} 1360 1361 1362static void close_tx(struct atm_vcc *vcc) 1363{ 1364 DECLARE_WAITQUEUE(wait,current); 1365 struct eni_dev *eni_dev; 1366 struct eni_vcc *eni_vcc; 1367 1368 eni_vcc = ENI_VCC(vcc); 1369 if (!eni_vcc->tx) return; 1370 eni_dev = ENI_DEV(vcc->dev); 1371 /* wait for TX queue to drain */ 1372 DPRINTK("eni_close: waiting for TX ...\n"); 1373 add_wait_queue(&eni_dev->tx_wait,&wait); 1374 set_current_state(TASK_UNINTERRUPTIBLE); 1375 for (;;) { 1376 int txing; 1377 1378 tasklet_disable(&eni_dev->task); 1379 txing = skb_peek(&eni_vcc->tx->backlog) || eni_vcc->txing; 1380 tasklet_enable(&eni_dev->task); 1381 if (!txing) break; 1382 DPRINTK("%d TX left\n",eni_vcc->txing); 1383 schedule(); 1384 set_current_state(TASK_UNINTERRUPTIBLE); 1385 } 1386 set_current_state(TASK_RUNNING); 1387 remove_wait_queue(&eni_dev->tx_wait,&wait); 1388 if (eni_vcc->tx != eni_dev->ubr) { 1389 /* 1390 * Looping a few times in here is probably far cheaper than 1391 * keeping track of TX completions all the time, so let's poll 1392 * a bit ... 1393 */ 1394 while (eni_in(MID_TX_RDPTR(eni_vcc->tx->index)) != 1395 eni_in(MID_TX_DESCRSTART(eni_vcc->tx->index))) 1396 schedule(); 1397 eni_free_mem(eni_dev,eni_vcc->tx->send,eni_vcc->tx->words << 2); 1398 eni_vcc->tx->send = NULL; 1399 eni_dev->tx_bw += eni_vcc->tx->reserved; 1400 } 1401 eni_vcc->tx = NULL; 1402} 1403 1404 1405static int start_tx(struct atm_dev *dev) 1406{ 1407 struct eni_dev *eni_dev; 1408 int i; 1409 1410 eni_dev = ENI_DEV(dev); 1411 eni_dev->lost = 0; 1412 eni_dev->tx_bw = ATM_OC3_PCR; 1413 eni_dev->tx_mult = DEFAULT_TX_MULT; 1414 init_waitqueue_head(&eni_dev->tx_wait); 1415 eni_dev->ubr = NULL; 1416 skb_queue_head_init(&eni_dev->tx_queue); 1417 eni_out(0,MID_DMA_WR_TX); 1418 for (i = 0; i < NR_CHAN; i++) { 1419 eni_dev->tx[i].send = NULL; 1420 eni_dev->tx[i].index = i; 1421 } 1422 return 0; 1423} 1424 1425 1426/*--------------------------------- common ----------------------------------*/ 1427 1428 1429 1430 1431static void bug_int(struct atm_dev *dev,unsigned long reason) 1432{ 1433 struct eni_dev *eni_dev; 1434 1435 DPRINTK(">bug_int\n"); 1436 eni_dev = ENI_DEV(dev); 1437 if (reason & MID_DMA_ERR_ACK) 1438 printk(KERN_CRIT DEV_LABEL "(itf %d): driver error - DMA " 1439 "error\n",dev->number); 1440 if (reason & MID_TX_IDENT_MISM) 1441 printk(KERN_CRIT DEV_LABEL "(itf %d): driver error - ident " 1442 "mismatch\n",dev->number); 1443 if (reason & MID_TX_DMA_OVFL) 1444 printk(KERN_CRIT DEV_LABEL "(itf %d): driver error - DMA " 1445 "overflow\n",dev->number); 1446 EVENT("---dump ends here---\n",0,0); 1447 printk(KERN_NOTICE "---recent events---\n"); 1448 event_dump(); 1449} 1450 1451 1452static irqreturn_t eni_int(int irq,void *dev_id) 1453{ 1454 struct atm_dev *dev; 1455 struct eni_dev *eni_dev; 1456 u32 reason; 1457 1458 DPRINTK(">eni_int\n"); 1459 dev = dev_id; 1460 eni_dev = ENI_DEV(dev); 1461 reason = eni_in(MID_ISA); 1462 DPRINTK(DEV_LABEL ": int 0x%lx\n",(unsigned long) reason); 1463 /* 1464 * Must handle these two right now, because reading ISA doesn't clear 1465 * them, so they re-occur and we never make it to the tasklet. Since 1466 * they're rare, we don't mind the occasional invocation of eni_tasklet 1467 * with eni_dev->events == 0. 1468 */ 1469 if (reason & MID_STAT_OVFL) { 1470 EVENT("stat overflow\n",0,0); 1471 eni_dev->lost += eni_in(MID_STAT) & MID_OVFL_TRASH; 1472 } 1473 if (reason & MID_SUNI_INT) { 1474 EVENT("SUNI int\n",0,0); 1475 dev->phy->interrupt(dev); 1476 } 1477 spin_lock(&eni_dev->lock); 1478 eni_dev->events |= reason; 1479 spin_unlock(&eni_dev->lock); 1480 tasklet_schedule(&eni_dev->task); 1481 return IRQ_HANDLED; 1482} 1483 1484 1485static void eni_tasklet(unsigned long data) 1486{ 1487 struct atm_dev *dev = (struct atm_dev *) data; 1488 struct eni_dev *eni_dev = ENI_DEV(dev); 1489 unsigned long flags; 1490 u32 events; 1491 1492 DPRINTK("eni_tasklet (dev %p)\n",dev); 1493 spin_lock_irqsave(&eni_dev->lock,flags); 1494 events = xchg(&eni_dev->events,0); 1495 spin_unlock_irqrestore(&eni_dev->lock,flags); 1496 if (events & MID_RX_DMA_COMPLETE) { 1497 EVENT("INT: RX DMA complete, starting dequeue_rx\n",0,0); 1498 dequeue_rx(dev); 1499 EVENT("dequeue_rx done, starting poll_rx\n",0,0); 1500 poll_rx(dev); 1501 EVENT("poll_rx done\n",0,0); 1502 /* poll_tx ? */ 1503 } 1504 if (events & MID_SERVICE) { 1505 EVENT("INT: service, starting get_service\n",0,0); 1506 get_service(dev); 1507 EVENT("get_service done, starting poll_rx\n",0,0); 1508 poll_rx(dev); 1509 EVENT("poll_rx done\n",0,0); 1510 } 1511 if (events & MID_TX_DMA_COMPLETE) { 1512 EVENT("INT: TX DMA COMPLETE\n",0,0); 1513 dequeue_tx(dev); 1514 } 1515 if (events & MID_TX_COMPLETE) { 1516 EVENT("INT: TX COMPLETE\n",0,0); 1517tx_complete++; 1518 wake_up(&eni_dev->tx_wait); 1519 /* poll_rx ? */ 1520 } 1521 if (events & (MID_DMA_ERR_ACK | MID_TX_IDENT_MISM | MID_TX_DMA_OVFL)) { 1522 EVENT("bug interrupt\n",0,0); 1523 bug_int(dev,events); 1524 } 1525 poll_tx(dev); 1526} 1527 1528 1529/*--------------------------------- entries ---------------------------------*/ 1530 1531 1532static const char *media_name[] __devinitdata = { 1533 "MMF", "SMF", "MMF", "03?", /* 0- 3 */ 1534 "UTP", "05?", "06?", "07?", /* 4- 7 */ 1535 "TAXI","09?", "10?", "11?", /* 8-11 */ 1536 "12?", "13?", "14?", "15?", /* 12-15 */ 1537 "MMF", "SMF", "18?", "19?", /* 16-19 */ 1538 "UTP", "21?", "22?", "23?", /* 20-23 */ 1539 "24?", "25?", "26?", "27?", /* 24-27 */ 1540 "28?", "29?", "30?", "31?" /* 28-31 */ 1541}; 1542 1543 1544#define SET_SEPROM \ 1545 ({ if (!error && !pci_error) { \ 1546 pci_error = pci_write_config_byte(eni_dev->pci_dev,PCI_TONGA_CTRL,tonga); \ 1547 udelay(10); /* 10 usecs */ \ 1548 } }) 1549#define GET_SEPROM \ 1550 ({ if (!error && !pci_error) { \ 1551 pci_error = pci_read_config_byte(eni_dev->pci_dev,PCI_TONGA_CTRL,&tonga); \ 1552 udelay(10); /* 10 usecs */ \ 1553 } }) 1554 1555 1556static int __devinit get_esi_asic(struct atm_dev *dev) 1557{ 1558 struct eni_dev *eni_dev; 1559 unsigned char tonga; 1560 int error,failed,pci_error; 1561 int address,i,j; 1562 1563 eni_dev = ENI_DEV(dev); 1564 error = pci_error = 0; 1565 tonga = SEPROM_MAGIC | SEPROM_DATA | SEPROM_CLK; 1566 SET_SEPROM; 1567 for (i = 0; i < ESI_LEN && !error && !pci_error; i++) { 1568 /* start operation */ 1569 tonga |= SEPROM_DATA; 1570 SET_SEPROM; 1571 tonga |= SEPROM_CLK; 1572 SET_SEPROM; 1573 tonga &= ~SEPROM_DATA; 1574 SET_SEPROM; 1575 tonga &= ~SEPROM_CLK; 1576 SET_SEPROM; 1577 /* send address */ 1578 address = ((i+SEPROM_ESI_BASE) << 1)+1; 1579 for (j = 7; j >= 0; j--) { 1580 tonga = (address >> j) & 1 ? tonga | SEPROM_DATA : 1581 tonga & ~SEPROM_DATA; 1582 SET_SEPROM; 1583 tonga |= SEPROM_CLK; 1584 SET_SEPROM; 1585 tonga &= ~SEPROM_CLK; 1586 SET_SEPROM; 1587 } 1588 /* get ack */ 1589 tonga |= SEPROM_DATA; 1590 SET_SEPROM; 1591 tonga |= SEPROM_CLK; 1592 SET_SEPROM; 1593 GET_SEPROM; 1594 failed = tonga & SEPROM_DATA; 1595 tonga &= ~SEPROM_CLK; 1596 SET_SEPROM; 1597 tonga |= SEPROM_DATA; 1598 SET_SEPROM; 1599 if (failed) error = -EIO; 1600 else { 1601 dev->esi[i] = 0; 1602 for (j = 7; j >= 0; j--) { 1603 dev->esi[i] <<= 1; 1604 tonga |= SEPROM_DATA; 1605 SET_SEPROM; 1606 tonga |= SEPROM_CLK; 1607 SET_SEPROM; 1608 GET_SEPROM; 1609 if (tonga & SEPROM_DATA) dev->esi[i] |= 1; 1610 tonga &= ~SEPROM_CLK; 1611 SET_SEPROM; 1612 tonga |= SEPROM_DATA; 1613 SET_SEPROM; 1614 } 1615 /* get ack */ 1616 tonga |= SEPROM_DATA; 1617 SET_SEPROM; 1618 tonga |= SEPROM_CLK; 1619 SET_SEPROM; 1620 GET_SEPROM; 1621 if (!(tonga & SEPROM_DATA)) error = -EIO; 1622 tonga &= ~SEPROM_CLK; 1623 SET_SEPROM; 1624 tonga |= SEPROM_DATA; 1625 SET_SEPROM; 1626 } 1627 /* stop operation */ 1628 tonga &= ~SEPROM_DATA; 1629 SET_SEPROM; 1630 tonga |= SEPROM_CLK; 1631 SET_SEPROM; 1632 tonga |= SEPROM_DATA; 1633 SET_SEPROM; 1634 } 1635 if (pci_error) { 1636 printk(KERN_ERR DEV_LABEL "(itf %d): error reading ESI " 1637 "(0x%02x)\n",dev->number,pci_error); 1638 error = -EIO; 1639 } 1640 return error; 1641} 1642 1643 1644#undef SET_SEPROM 1645#undef GET_SEPROM 1646 1647 1648static int __devinit get_esi_fpga(struct atm_dev *dev, void __iomem *base) 1649{ 1650 void __iomem *mac_base; 1651 int i; 1652 1653 mac_base = base+EPROM_SIZE-sizeof(struct midway_eprom); 1654 for (i = 0; i < ESI_LEN; i++) dev->esi[i] = readb(mac_base+(i^3)); 1655 return 0; 1656} 1657 1658 1659static int __devinit eni_do_init(struct atm_dev *dev) 1660{ 1661 struct midway_eprom __iomem *eprom; 1662 struct eni_dev *eni_dev; 1663 struct pci_dev *pci_dev; 1664 unsigned long real_base; 1665 void __iomem *base; 1666 unsigned char revision; 1667 int error,i,last; 1668 1669 DPRINTK(">eni_init\n"); 1670 dev->ci_range.vpi_bits = 0; 1671 dev->ci_range.vci_bits = NR_VCI_LD; 1672 dev->link_rate = ATM_OC3_PCR; 1673 eni_dev = ENI_DEV(dev); 1674 pci_dev = eni_dev->pci_dev; 1675 real_base = pci_resource_start(pci_dev, 0); 1676 eni_dev->irq = pci_dev->irq; 1677 error = pci_read_config_byte(pci_dev,PCI_REVISION_ID,&revision); 1678 if (error) { 1679 printk(KERN_ERR DEV_LABEL "(itf %d): init error 0x%02x\n", 1680 dev->number,error); 1681 return -EINVAL; 1682 } 1683 if ((error = pci_write_config_word(pci_dev,PCI_COMMAND, 1684 PCI_COMMAND_MEMORY | 1685 (eni_dev->asic ? PCI_COMMAND_PARITY | PCI_COMMAND_SERR : 0)))) { 1686 printk(KERN_ERR DEV_LABEL "(itf %d): can't enable memory " 1687 "(0x%02x)\n",dev->number,error); 1688 return -EIO; 1689 } 1690 printk(KERN_NOTICE DEV_LABEL "(itf %d): rev.%d,base=0x%lx,irq=%d,", 1691 dev->number,revision,real_base,eni_dev->irq); 1692 if (!(base = ioremap_nocache(real_base,MAP_MAX_SIZE))) { 1693 printk("\n"); 1694 printk(KERN_ERR DEV_LABEL "(itf %d): can't set up page " 1695 "mapping\n",dev->number); 1696 return error; 1697 } 1698 eni_dev->base_diff = real_base - (unsigned long) base; 1699 /* id may not be present in ASIC Tonga boards - check this @@@ */ 1700 if (!eni_dev->asic) { 1701 eprom = (base+EPROM_SIZE-sizeof(struct midway_eprom)); 1702 if (readl(&eprom->magic) != ENI155_MAGIC) { 1703 printk("\n"); 1704 printk(KERN_ERR KERN_ERR DEV_LABEL "(itf %d): bad " 1705 "magic - expected 0x%x, got 0x%x\n",dev->number, 1706 ENI155_MAGIC,(unsigned) readl(&eprom->magic)); 1707 return -EINVAL; 1708 } 1709 } 1710 eni_dev->phy = base+PHY_BASE; 1711 eni_dev->reg = base+REG_BASE; 1712 eni_dev->ram = base+RAM_BASE; 1713 last = MAP_MAX_SIZE-RAM_BASE; 1714 for (i = last-RAM_INCREMENT; i >= 0; i -= RAM_INCREMENT) { 1715 writel(0x55555555,eni_dev->ram+i); 1716 if (readl(eni_dev->ram+i) != 0x55555555) last = i; 1717 else { 1718 writel(0xAAAAAAAA,eni_dev->ram+i); 1719 if (readl(eni_dev->ram+i) != 0xAAAAAAAA) last = i; 1720 else writel(i,eni_dev->ram+i); 1721 } 1722 } 1723 for (i = 0; i < last; i += RAM_INCREMENT) 1724 if (readl(eni_dev->ram+i) != i) break; 1725 eni_dev->mem = i; 1726 memset_io(eni_dev->ram,0,eni_dev->mem); 1727 /* TODO: should shrink allocation now */ 1728 printk("mem=%dkB (",eni_dev->mem >> 10); 1729 /* TODO: check for non-SUNI, check for TAXI ? */ 1730 if (!(eni_in(MID_RES_ID_MCON) & 0x200) != !eni_dev->asic) { 1731 printk(")\n"); 1732 printk(KERN_ERR DEV_LABEL "(itf %d): ERROR - wrong id 0x%x\n", 1733 dev->number,(unsigned) eni_in(MID_RES_ID_MCON)); 1734 return -EINVAL; 1735 } 1736 error = eni_dev->asic ? get_esi_asic(dev) : get_esi_fpga(dev,base); 1737 if (error) return error; 1738 for (i = 0; i < ESI_LEN; i++) 1739 printk("%s%02X",i ? "-" : "",dev->esi[i]); 1740 printk(")\n"); 1741 printk(KERN_NOTICE DEV_LABEL "(itf %d): %s,%s\n",dev->number, 1742 eni_in(MID_RES_ID_MCON) & 0x200 ? "ASIC" : "FPGA", 1743 media_name[eni_in(MID_RES_ID_MCON) & DAUGTHER_ID]); 1744 return suni_init(dev); 1745} 1746 1747 1748static int __devinit eni_start(struct atm_dev *dev) 1749{ 1750 struct eni_dev *eni_dev; 1751 1752 void __iomem *buf; 1753 unsigned long buffer_mem; 1754 int error; 1755 1756 DPRINTK(">eni_start\n"); 1757 eni_dev = ENI_DEV(dev); 1758 if (request_irq(eni_dev->irq,&eni_int,IRQF_SHARED,DEV_LABEL,dev)) { 1759 printk(KERN_ERR DEV_LABEL "(itf %d): IRQ%d is already in use\n", 1760 dev->number,eni_dev->irq); 1761 error = -EAGAIN; 1762 goto out; 1763 } 1764 pci_set_master(eni_dev->pci_dev); 1765 if ((error = pci_write_config_word(eni_dev->pci_dev,PCI_COMMAND, 1766 PCI_COMMAND_MEMORY | PCI_COMMAND_MASTER | 1767 (eni_dev->asic ? PCI_COMMAND_PARITY | PCI_COMMAND_SERR : 0)))) { 1768 printk(KERN_ERR DEV_LABEL "(itf %d): can't enable memory+" 1769 "master (0x%02x)\n",dev->number,error); 1770 goto free_irq; 1771 } 1772 if ((error = pci_write_config_byte(eni_dev->pci_dev,PCI_TONGA_CTRL, 1773 END_SWAP_DMA))) { 1774 printk(KERN_ERR DEV_LABEL "(itf %d): can't set endian swap " 1775 "(0x%02x)\n",dev->number,error); 1776 goto free_irq; 1777 } 1778 /* determine addresses of internal tables */ 1779 eni_dev->vci = eni_dev->ram; 1780 eni_dev->rx_dma = eni_dev->ram+NR_VCI*16; 1781 eni_dev->tx_dma = eni_dev->rx_dma+NR_DMA_RX*8; 1782 eni_dev->service = eni_dev->tx_dma+NR_DMA_TX*8; 1783 buf = eni_dev->service+NR_SERVICE*4; 1784 DPRINTK("vci 0x%lx,rx 0x%lx, tx 0x%lx,srv 0x%lx,buf 0x%lx\n", 1785 eni_dev->vci,eni_dev->rx_dma,eni_dev->tx_dma, 1786 eni_dev->service,buf); 1787 spin_lock_init(&eni_dev->lock); 1788 tasklet_init(&eni_dev->task,eni_tasklet,(unsigned long) dev); 1789 eni_dev->events = 0; 1790 /* initialize memory management */ 1791 buffer_mem = eni_dev->mem - (buf - eni_dev->ram); 1792 eni_dev->free_list_size = buffer_mem/MID_MIN_BUF_SIZE/2; 1793 eni_dev->free_list = kmalloc( 1794 sizeof(struct eni_free)*(eni_dev->free_list_size+1),GFP_KERNEL); 1795 if (!eni_dev->free_list) { 1796 printk(KERN_ERR DEV_LABEL "(itf %d): couldn't get free page\n", 1797 dev->number); 1798 error = -ENOMEM; 1799 goto free_irq; 1800 } 1801 eni_dev->free_len = 0; 1802 eni_put_free(eni_dev,buf,buffer_mem); 1803 memset_io(eni_dev->vci,0,16*NR_VCI); /* clear VCI table */ 1804 /* 1805 * byte_addr free (k) 1806 * 0x00000000 512 VCI table 1807 * 0x00004000 496 RX DMA 1808 * 0x00005000 492 TX DMA 1809 * 0x00006000 488 service list 1810 * 0x00007000 484 buffers 1811 * 0x00080000 0 end (512kB) 1812 */ 1813 eni_out(0xffffffff,MID_IE); 1814 error = start_tx(dev); 1815 if (error) goto free_list; 1816 error = start_rx(dev); 1817 if (error) goto free_list; 1818 error = dev->phy->start(dev); 1819 if (error) goto free_list; 1820 eni_out(eni_in(MID_MC_S) | (1 << MID_INT_SEL_SHIFT) | 1821 MID_TX_LOCK_MODE | MID_DMA_ENABLE | MID_TX_ENABLE | MID_RX_ENABLE, 1822 MID_MC_S); 1823 /* Tonga uses SBus INTReq1 */ 1824 (void) eni_in(MID_ISA); /* clear Midway interrupts */ 1825 return 0; 1826 1827free_list: 1828 kfree(eni_dev->free_list); 1829 1830free_irq: 1831 free_irq(eni_dev->irq, eni_dev); 1832 1833out: 1834 return error; 1835} 1836 1837 1838static void eni_close(struct atm_vcc *vcc) 1839{ 1840 DPRINTK(">eni_close\n"); 1841 if (!ENI_VCC(vcc)) return; 1842 clear_bit(ATM_VF_READY,&vcc->flags); 1843 close_rx(vcc); 1844 close_tx(vcc); 1845 DPRINTK("eni_close: done waiting\n"); 1846 /* deallocate memory */ 1847 kfree(ENI_VCC(vcc)); 1848 vcc->dev_data = NULL; 1849 clear_bit(ATM_VF_ADDR,&vcc->flags); 1850 /*foo();*/ 1851} 1852 1853 1854static int eni_open(struct atm_vcc *vcc) 1855{ 1856 struct eni_dev *eni_dev; 1857 struct eni_vcc *eni_vcc; 1858 int error; 1859 short vpi = vcc->vpi; 1860 int vci = vcc->vci; 1861 1862 DPRINTK(">eni_open\n"); 1863 EVENT("eni_open\n",0,0); 1864 if (!test_bit(ATM_VF_PARTIAL,&vcc->flags)) 1865 vcc->dev_data = NULL; 1866 eni_dev = ENI_DEV(vcc->dev); 1867 if (vci != ATM_VPI_UNSPEC && vpi != ATM_VCI_UNSPEC) 1868 set_bit(ATM_VF_ADDR,&vcc->flags); 1869 if (vcc->qos.aal != ATM_AAL0 && vcc->qos.aal != ATM_AAL5) 1870 return -EINVAL; 1871 DPRINTK(DEV_LABEL "(itf %d): open %d.%d\n",vcc->dev->number,vcc->vpi, 1872 vcc->vci); 1873 if (!test_bit(ATM_VF_PARTIAL,&vcc->flags)) { 1874 eni_vcc = kmalloc(sizeof(struct eni_vcc),GFP_KERNEL); 1875 if (!eni_vcc) return -ENOMEM; 1876 vcc->dev_data = eni_vcc; 1877 eni_vcc->tx = NULL; /* for eni_close after open_rx */ 1878 if ((error = open_rx_first(vcc))) { 1879 eni_close(vcc); 1880 return error; 1881 } 1882 if ((error = open_tx_first(vcc))) { 1883 eni_close(vcc); 1884 return error; 1885 } 1886 } 1887 if (vci == ATM_VPI_UNSPEC || vpi == ATM_VCI_UNSPEC) return 0; 1888 if ((error = open_rx_second(vcc))) { 1889 eni_close(vcc); 1890 return error; 1891 } 1892 if ((error = open_tx_second(vcc))) { 1893 eni_close(vcc); 1894 return error; 1895 } 1896 set_bit(ATM_VF_READY,&vcc->flags); 1897 /* should power down SUNI while !ref_count @@@ */ 1898 return 0; 1899} 1900 1901 1902static int eni_change_qos(struct atm_vcc *vcc,struct atm_qos *qos,int flgs) 1903{ 1904 struct eni_dev *eni_dev = ENI_DEV(vcc->dev); 1905 struct eni_tx *tx = ENI_VCC(vcc)->tx; 1906 struct sk_buff *skb; 1907 int error,rate,rsv,shp; 1908 1909 if (qos->txtp.traffic_class == ATM_NONE) return 0; 1910 if (tx == eni_dev->ubr) return -EBADFD; 1911 rate = atm_pcr_goal(&qos->txtp); 1912 if (rate < 0) rate = -rate; 1913 rsv = shp = 0; 1914 if ((flgs & ATM_MF_DEC_RSV) && rate && rate < tx->reserved) rsv = 1; 1915 if ((flgs & ATM_MF_INC_RSV) && (!rate || rate > tx->reserved)) rsv = 1; 1916 if ((flgs & ATM_MF_DEC_SHP) && rate && rate < tx->shaping) shp = 1; 1917 if ((flgs & ATM_MF_INC_SHP) && (!rate || rate > tx->shaping)) shp = 1; 1918 if (!rsv && !shp) return 0; 1919 error = reserve_or_set_tx(vcc,&qos->txtp,rsv,shp); 1920 if (error) return error; 1921 if (shp && !(flgs & ATM_MF_IMMED)) return 0; 1922 /* 1923 * Walk through the send buffer and patch the rate information in all 1924 * segmentation buffer descriptors of this VCC. 1925 */ 1926 tasklet_disable(&eni_dev->task); 1927 skb_queue_walk(&eni_dev->tx_queue, skb) { 1928 void __iomem *dsc; 1929 1930 if (ATM_SKB(skb)->vcc != vcc) continue; 1931 dsc = tx->send+ENI_PRV_POS(skb)*4; 1932 writel((readl(dsc) & ~(MID_SEG_RATE | MID_SEG_PR)) | 1933 (tx->prescaler << MID_SEG_PR_SHIFT) | 1934 (tx->resolution << MID_SEG_RATE_SHIFT), dsc); 1935 } 1936 tasklet_enable(&eni_dev->task); 1937 return 0; 1938} 1939 1940 1941static int eni_ioctl(struct atm_dev *dev,unsigned int cmd,void __user *arg) 1942{ 1943 struct eni_dev *eni_dev = ENI_DEV(dev); 1944 1945 if (cmd == ENI_MEMDUMP) { 1946 if (!capable(CAP_NET_ADMIN)) return -EPERM; 1947 printk(KERN_WARNING "Please use /proc/atm/" DEV_LABEL ":%d " 1948 "instead of obsolete ioctl ENI_MEMDUMP\n",dev->number); 1949 dump(dev); 1950 return 0; 1951 } 1952 if (cmd == ENI_SETMULT) { 1953 struct eni_multipliers mult; 1954 1955 if (!capable(CAP_NET_ADMIN)) return -EPERM; 1956 if (copy_from_user(&mult, arg, 1957 sizeof(struct eni_multipliers))) 1958 return -EFAULT; 1959 if ((mult.tx && mult.tx <= 100) || (mult.rx &&mult.rx <= 100) || 1960 mult.tx > 65536 || mult.rx > 65536) 1961 return -EINVAL; 1962 if (mult.tx) eni_dev->tx_mult = mult.tx; 1963 if (mult.rx) eni_dev->rx_mult = mult.rx; 1964 return 0; 1965 } 1966 if (cmd == ATM_SETCIRANGE) { 1967 struct atm_cirange ci; 1968 1969 if (copy_from_user(&ci, arg,sizeof(struct atm_cirange))) 1970 return -EFAULT; 1971 if ((ci.vpi_bits == 0 || ci.vpi_bits == ATM_CI_MAX) && 1972 (ci.vci_bits == NR_VCI_LD || ci.vpi_bits == ATM_CI_MAX)) 1973 return 0; 1974 return -EINVAL; 1975 } 1976 if (!dev->phy->ioctl) return -ENOIOCTLCMD; 1977 return dev->phy->ioctl(dev,cmd,arg); 1978} 1979 1980 1981static int eni_getsockopt(struct atm_vcc *vcc,int level,int optname, 1982 void __user *optval,int optlen) 1983{ 1984 return -EINVAL; 1985} 1986 1987 1988static int eni_setsockopt(struct atm_vcc *vcc,int level,int optname, 1989 void __user *optval,int optlen) 1990{ 1991 return -EINVAL; 1992} 1993 1994 1995static int eni_send(struct atm_vcc *vcc,struct sk_buff *skb) 1996{ 1997 enum enq_res res; 1998 1999 DPRINTK(">eni_send\n"); 2000 if (!ENI_VCC(vcc)->tx) { 2001 if (vcc->pop) vcc->pop(vcc,skb); 2002 else dev_kfree_skb(skb); 2003 return -EINVAL; 2004 } 2005 if (!skb) { 2006 printk(KERN_CRIT "!skb in eni_send ?\n"); 2007 if (vcc->pop) vcc->pop(vcc,skb); 2008 return -EINVAL; 2009 } 2010 if (vcc->qos.aal == ATM_AAL0) { 2011 if (skb->len != ATM_CELL_SIZE-1) { 2012 if (vcc->pop) vcc->pop(vcc,skb); 2013 else dev_kfree_skb(skb); 2014 return -EINVAL; 2015 } 2016 *(u32 *) skb->data = htonl(*(u32 *) skb->data); 2017 } 2018submitted++; 2019 ATM_SKB(skb)->vcc = vcc; 2020 tasklet_disable(&ENI_DEV(vcc->dev)->task); 2021 res = do_tx(skb); 2022 tasklet_enable(&ENI_DEV(vcc->dev)->task); 2023 if (res == enq_ok) return 0; 2024 skb_queue_tail(&ENI_VCC(vcc)->tx->backlog,skb); 2025backlogged++; 2026 tasklet_schedule(&ENI_DEV(vcc->dev)->task); 2027 return 0; 2028} 2029 2030static void eni_phy_put(struct atm_dev *dev,unsigned char value, 2031 unsigned long addr) 2032{ 2033 writel(value,ENI_DEV(dev)->phy+addr*4); 2034} 2035 2036 2037 2038static unsigned char eni_phy_get(struct atm_dev *dev,unsigned long addr) 2039{ 2040 return readl(ENI_DEV(dev)->phy+addr*4); 2041} 2042 2043 2044static int eni_proc_read(struct atm_dev *dev,loff_t *pos,char *page) 2045{ 2046 struct hlist_node *node; 2047 struct sock *s; 2048 static const char *signal[] = { "LOST","unknown","okay" }; 2049 struct eni_dev *eni_dev = ENI_DEV(dev); 2050 struct atm_vcc *vcc; 2051 int left,i; 2052 2053 left = *pos; 2054 if (!left) 2055 return sprintf(page,DEV_LABEL "(itf %d) signal %s, %dkB, " 2056 "%d cps remaining\n",dev->number,signal[(int) dev->signal], 2057 eni_dev->mem >> 10,eni_dev->tx_bw); 2058 if (!--left) 2059 return sprintf(page,"%4sBursts: TX" 2060#if !defined(CONFIG_ATM_ENI_BURST_TX_16W) && !defined(CONFIG_ATM_ENI_BURST_TX_8W) && \ 2061 !defined(CONFIG_ATM_ENI_BURST_TX_4W) && !defined(CONFIG_ATM_ENI_BURST_TX_2W) 2062 " none" 2063#endif 2064#ifdef CONFIG_ATM_ENI_BURST_TX_16W 2065 " 16W" 2066#endif 2067#ifdef CONFIG_ATM_ENI_BURST_TX_8W 2068 " 8W" 2069#endif 2070#ifdef CONFIG_ATM_ENI_BURST_TX_4W 2071 " 4W" 2072#endif 2073#ifdef CONFIG_ATM_ENI_BURST_TX_2W 2074 " 2W" 2075#endif 2076 ", RX" 2077#if !defined(CONFIG_ATM_ENI_BURST_RX_16W) && !defined(CONFIG_ATM_ENI_BURST_RX_8W) && \ 2078 !defined(CONFIG_ATM_ENI_BURST_RX_4W) && !defined(CONFIG_ATM_ENI_BURST_RX_2W) 2079 " none" 2080#endif 2081#ifdef CONFIG_ATM_ENI_BURST_RX_16W 2082 " 16W" 2083#endif 2084#ifdef CONFIG_ATM_ENI_BURST_RX_8W 2085 " 8W" 2086#endif 2087#ifdef CONFIG_ATM_ENI_BURST_RX_4W 2088 " 4W" 2089#endif 2090#ifdef CONFIG_ATM_ENI_BURST_RX_2W 2091 " 2W" 2092#endif 2093#ifndef CONFIG_ATM_ENI_TUNE_BURST 2094 " (default)" 2095#endif 2096 "\n",""); 2097 if (!--left) 2098 return sprintf(page,"%4sBuffer multipliers: tx %d%%, rx %d%%\n", 2099 "",eni_dev->tx_mult,eni_dev->rx_mult); 2100 for (i = 0; i < NR_CHAN; i++) { 2101 struct eni_tx *tx = eni_dev->tx+i; 2102 2103 if (!tx->send) continue; 2104 if (!--left) { 2105 return sprintf(page,"tx[%d]: 0x%ld-0x%ld " 2106 "(%6ld bytes), rsv %d cps, shp %d cps%s\n",i, 2107 (unsigned long) (tx->send - eni_dev->ram), 2108 tx->send-eni_dev->ram+tx->words*4-1,tx->words*4, 2109 tx->reserved,tx->shaping, 2110 tx == eni_dev->ubr ? " (UBR)" : ""); 2111 } 2112 if (--left) continue; 2113 return sprintf(page,"%10sbacklog %u packets\n","", 2114 skb_queue_len(&tx->backlog)); 2115 } 2116 read_lock(&vcc_sklist_lock); 2117 for(i = 0; i < VCC_HTABLE_SIZE; ++i) { 2118 struct hlist_head *head = &vcc_hash[i]; 2119 2120 sk_for_each(s, node, head) { 2121 struct eni_vcc *eni_vcc; 2122 int length; 2123 2124 vcc = atm_sk(s); 2125 if (vcc->dev != dev) 2126 continue; 2127 eni_vcc = ENI_VCC(vcc); 2128 if (--left) continue; 2129 length = sprintf(page,"vcc %4d: ",vcc->vci); 2130 if (eni_vcc->rx) { 2131 length += sprintf(page+length,"0x%ld-0x%ld " 2132 "(%6ld bytes)", 2133 (unsigned long) (eni_vcc->recv - eni_dev->ram), 2134 eni_vcc->recv-eni_dev->ram+eni_vcc->words*4-1, 2135 eni_vcc->words*4); 2136 if (eni_vcc->tx) length += sprintf(page+length,", "); 2137 } 2138 if (eni_vcc->tx) 2139 length += sprintf(page+length,"tx[%d], txing %d bytes", 2140 eni_vcc->tx->index,eni_vcc->txing); 2141 page[length] = '\n'; 2142 read_unlock(&vcc_sklist_lock); 2143 return length+1; 2144 } 2145 } 2146 read_unlock(&vcc_sklist_lock); 2147 for (i = 0; i < eni_dev->free_len; i++) { 2148 struct eni_free *fe = eni_dev->free_list+i; 2149 unsigned long offset; 2150 2151 if (--left) continue; 2152 offset = (unsigned long) eni_dev->ram+eni_dev->base_diff; 2153 return sprintf(page,"free %p-%p (%6d bytes)\n", 2154 fe->start-offset,fe->start-offset+(1 << fe->order)-1, 2155 1 << fe->order); 2156 } 2157 return 0; 2158} 2159 2160 2161static const struct atmdev_ops ops = { 2162 .open = eni_open, 2163 .close = eni_close, 2164 .ioctl = eni_ioctl, 2165 .getsockopt = eni_getsockopt, 2166 .setsockopt = eni_setsockopt, 2167 .send = eni_send, 2168 .phy_put = eni_phy_put, 2169 .phy_get = eni_phy_get, 2170 .change_qos = eni_change_qos, 2171 .proc_read = eni_proc_read 2172}; 2173 2174 2175static int __devinit eni_init_one(struct pci_dev *pci_dev, 2176 const struct pci_device_id *ent) 2177{ 2178 struct atm_dev *dev; 2179 struct eni_dev *eni_dev; 2180 int error = -ENOMEM; 2181 2182 DPRINTK("eni_init_one\n"); 2183 2184 if (pci_enable_device(pci_dev)) { 2185 error = -EIO; 2186 goto out0; 2187 } 2188 2189 eni_dev = kmalloc(sizeof(struct eni_dev),GFP_KERNEL); 2190 if (!eni_dev) goto out0; 2191 if (!cpu_zeroes) { 2192 cpu_zeroes = pci_alloc_consistent(pci_dev,ENI_ZEROES_SIZE, 2193 &zeroes); 2194 if (!cpu_zeroes) goto out1; 2195 } 2196 dev = atm_dev_register(DEV_LABEL,&ops,-1,NULL); 2197 if (!dev) goto out2; 2198 pci_set_drvdata(pci_dev, dev); 2199 eni_dev->pci_dev = pci_dev; 2200 dev->dev_data = eni_dev; 2201 eni_dev->asic = ent->driver_data; 2202 error = eni_do_init(dev); 2203 if (error) goto out3; 2204 error = eni_start(dev); 2205 if (error) goto out3; 2206 eni_dev->more = eni_boards; 2207 eni_boards = dev; 2208 return 0; 2209out3: 2210 atm_dev_deregister(dev); 2211out2: 2212 pci_free_consistent(eni_dev->pci_dev,ENI_ZEROES_SIZE,cpu_zeroes,zeroes); 2213 cpu_zeroes = NULL; 2214out1: 2215 kfree(eni_dev); 2216out0: 2217 return error; 2218} 2219 2220 2221static struct pci_device_id eni_pci_tbl[] = { 2222 { PCI_VENDOR_ID_EF, PCI_DEVICE_ID_EF_ATM_FPGA, PCI_ANY_ID, PCI_ANY_ID, 2223 0, 0, 0 /* FPGA */ }, 2224 { PCI_VENDOR_ID_EF, PCI_DEVICE_ID_EF_ATM_ASIC, PCI_ANY_ID, PCI_ANY_ID, 2225 0, 0, 1 /* ASIC */ }, 2226 { 0, } 2227}; 2228MODULE_DEVICE_TABLE(pci,eni_pci_tbl); 2229 2230 2231static void __devexit eni_remove_one(struct pci_dev *pci_dev) 2232{ 2233 /* grrr */ 2234} 2235 2236 2237static struct pci_driver eni_driver = { 2238 .name = DEV_LABEL, 2239 .id_table = eni_pci_tbl, 2240 .probe = eni_init_one, 2241 .remove = __devexit_p(eni_remove_one), 2242}; 2243 2244 2245static int __init eni_init(void) 2246{ 2247 struct sk_buff *skb; /* dummy for sizeof */ 2248 2249 if (sizeof(skb->cb) < sizeof(struct eni_skb_prv)) { 2250 printk(KERN_ERR "eni_detect: skb->cb is too small (%Zd < %Zd)\n", 2251 sizeof(skb->cb),sizeof(struct eni_skb_prv)); 2252 return -EIO; 2253 } 2254 return pci_register_driver(&eni_driver); 2255} 2256 2257 2258module_init(eni_init); 2259/* @@@ since exit routine not defined, this module can not be unloaded */ 2260 2261MODULE_LICENSE("GPL"); 2262