linux/drivers/atm/idt77252.c
<<
>>
Prefs
   1/******************************************************************* 
   2 *
   3 * Copyright (c) 2000 ATecoM GmbH 
   4 *
   5 * The author may be reached at ecd@atecom.com.
   6 *
   7 * This program is free software; you can redistribute  it and/or modify it
   8 * under  the terms of  the GNU General  Public License as published by the
   9 * Free Software Foundation;  either version 2 of the  License, or (at your
  10 * option) any later version.
  11 *
  12 * THIS  SOFTWARE  IS PROVIDED   ``AS  IS'' AND   ANY  EXPRESS OR   IMPLIED
  13 * WARRANTIES,   INCLUDING, BUT NOT  LIMITED  TO, THE IMPLIED WARRANTIES OF
  14 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN
  15 * NO  EVENT  SHALL   THE AUTHOR  BE    LIABLE FOR ANY   DIRECT,  INDIRECT,
  16 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  17 * NOT LIMITED   TO, PROCUREMENT OF  SUBSTITUTE GOODS  OR SERVICES; LOSS OF
  18 * USE, DATA,  OR PROFITS; OR  BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON
  19 * ANY THEORY OF LIABILITY, WHETHER IN  CONTRACT, STRICT LIABILITY, OR TORT
  20 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  21 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  22 *
  23 * You should have received a copy of the  GNU General Public License along
  24 * with this program; if not, write  to the Free Software Foundation, Inc.,
  25 * 675 Mass Ave, Cambridge, MA 02139, USA.
  26 *
  27 *******************************************************************/
  28
  29#include <linux/module.h>
  30#include <linux/pci.h>
  31#include <linux/poison.h>
  32#include <linux/skbuff.h>
  33#include <linux/kernel.h>
  34#include <linux/vmalloc.h>
  35#include <linux/netdevice.h>
  36#include <linux/atmdev.h>
  37#include <linux/atm.h>
  38#include <linux/delay.h>
  39#include <linux/init.h>
  40#include <linux/interrupt.h>
  41#include <linux/bitops.h>
  42#include <linux/wait.h>
  43#include <linux/jiffies.h>
  44#include <linux/mutex.h>
  45#include <linux/slab.h>
  46
  47#include <asm/io.h>
  48#include <linux/uaccess.h>
  49#include <linux/atomic.h>
  50#include <asm/byteorder.h>
  51
  52#ifdef CONFIG_ATM_IDT77252_USE_SUNI
  53#include "suni.h"
  54#endif /* CONFIG_ATM_IDT77252_USE_SUNI */
  55
  56
  57#include "idt77252.h"
  58#include "idt77252_tables.h"
  59
  60static unsigned int vpibits = 1;
  61
  62
  63#define ATM_IDT77252_SEND_IDLE 1
  64
  65
  66/*
  67 * Debug HACKs.
  68 */
  69#define DEBUG_MODULE 1
  70#undef HAVE_EEPROM      /* does not work, yet. */
  71
  72#ifdef CONFIG_ATM_IDT77252_DEBUG
  73static unsigned long debug = DBG_GENERAL;
  74#endif
  75
  76
  77#define SAR_RX_DELAY    (SAR_CFG_RXINT_NODELAY)
  78
  79
  80/*
  81 * SCQ Handling.
  82 */
  83static struct scq_info *alloc_scq(struct idt77252_dev *, int);
  84static void free_scq(struct idt77252_dev *, struct scq_info *);
  85static int queue_skb(struct idt77252_dev *, struct vc_map *,
  86                     struct sk_buff *, int oam);
  87static void drain_scq(struct idt77252_dev *, struct vc_map *);
  88static unsigned long get_free_scd(struct idt77252_dev *, struct vc_map *);
  89static void fill_scd(struct idt77252_dev *, struct scq_info *, int);
  90
  91/*
  92 * FBQ Handling.
  93 */
  94static int push_rx_skb(struct idt77252_dev *,
  95                       struct sk_buff *, int queue);
  96static void recycle_rx_skb(struct idt77252_dev *, struct sk_buff *);
  97static void flush_rx_pool(struct idt77252_dev *, struct rx_pool *);
  98static void recycle_rx_pool_skb(struct idt77252_dev *,
  99                                struct rx_pool *);
 100static void add_rx_skb(struct idt77252_dev *, int queue,
 101                       unsigned int size, unsigned int count);
 102
 103/*
 104 * RSQ Handling.
 105 */
 106static int init_rsq(struct idt77252_dev *);
 107static void deinit_rsq(struct idt77252_dev *);
 108static void idt77252_rx(struct idt77252_dev *);
 109
 110/*
 111 * TSQ handling.
 112 */
 113static int init_tsq(struct idt77252_dev *);
 114static void deinit_tsq(struct idt77252_dev *);
 115static void idt77252_tx(struct idt77252_dev *);
 116
 117
 118/*
 119 * ATM Interface.
 120 */
 121static void idt77252_dev_close(struct atm_dev *dev);
 122static int idt77252_open(struct atm_vcc *vcc);
 123static void idt77252_close(struct atm_vcc *vcc);
 124static int idt77252_send(struct atm_vcc *vcc, struct sk_buff *skb);
 125static int idt77252_send_oam(struct atm_vcc *vcc, void *cell,
 126                             int flags);
 127static void idt77252_phy_put(struct atm_dev *dev, unsigned char value,
 128                             unsigned long addr);
 129static unsigned char idt77252_phy_get(struct atm_dev *dev, unsigned long addr);
 130static int idt77252_change_qos(struct atm_vcc *vcc, struct atm_qos *qos,
 131                               int flags);
 132static int idt77252_proc_read(struct atm_dev *dev, loff_t * pos,
 133                              char *page);
 134static void idt77252_softint(struct work_struct *work);
 135
 136
 137static const struct atmdev_ops idt77252_ops =
 138{
 139        .dev_close      = idt77252_dev_close,
 140        .open           = idt77252_open,
 141        .close          = idt77252_close,
 142        .send           = idt77252_send,
 143        .send_oam       = idt77252_send_oam,
 144        .phy_put        = idt77252_phy_put,
 145        .phy_get        = idt77252_phy_get,
 146        .change_qos     = idt77252_change_qos,
 147        .proc_read      = idt77252_proc_read,
 148        .owner          = THIS_MODULE
 149};
 150
 151static struct idt77252_dev *idt77252_chain = NULL;
 152static unsigned int idt77252_sram_write_errors = 0;
 153
 154/*****************************************************************************/
 155/*                                                                           */
 156/* I/O and Utility Bus                                                       */
 157/*                                                                           */
 158/*****************************************************************************/
 159
 160static void
 161waitfor_idle(struct idt77252_dev *card)
 162{
 163        u32 stat;
 164
 165        stat = readl(SAR_REG_STAT);
 166        while (stat & SAR_STAT_CMDBZ)
 167                stat = readl(SAR_REG_STAT);
 168}
 169
 170static u32
 171read_sram(struct idt77252_dev *card, unsigned long addr)
 172{
 173        unsigned long flags;
 174        u32 value;
 175
 176        spin_lock_irqsave(&card->cmd_lock, flags);
 177        writel(SAR_CMD_READ_SRAM | (addr << 2), SAR_REG_CMD);
 178        waitfor_idle(card);
 179        value = readl(SAR_REG_DR0);
 180        spin_unlock_irqrestore(&card->cmd_lock, flags);
 181        return value;
 182}
 183
 184static void
 185write_sram(struct idt77252_dev *card, unsigned long addr, u32 value)
 186{
 187        unsigned long flags;
 188
 189        if ((idt77252_sram_write_errors == 0) &&
 190            (((addr > card->tst[0] + card->tst_size - 2) &&
 191              (addr < card->tst[0] + card->tst_size)) ||
 192             ((addr > card->tst[1] + card->tst_size - 2) &&
 193              (addr < card->tst[1] + card->tst_size)))) {
 194                printk("%s: ERROR: TST JMP section at %08lx written: %08x\n",
 195                       card->name, addr, value);
 196        }
 197
 198        spin_lock_irqsave(&card->cmd_lock, flags);
 199        writel(value, SAR_REG_DR0);
 200        writel(SAR_CMD_WRITE_SRAM | (addr << 2), SAR_REG_CMD);
 201        waitfor_idle(card);
 202        spin_unlock_irqrestore(&card->cmd_lock, flags);
 203}
 204
 205static u8
 206read_utility(void *dev, unsigned long ubus_addr)
 207{
 208        struct idt77252_dev *card = dev;
 209        unsigned long flags;
 210        u8 value;
 211
 212        if (!card) {
 213                printk("Error: No such device.\n");
 214                return -1;
 215        }
 216
 217        spin_lock_irqsave(&card->cmd_lock, flags);
 218        writel(SAR_CMD_READ_UTILITY + ubus_addr, SAR_REG_CMD);
 219        waitfor_idle(card);
 220        value = readl(SAR_REG_DR0);
 221        spin_unlock_irqrestore(&card->cmd_lock, flags);
 222        return value;
 223}
 224
 225static void
 226write_utility(void *dev, unsigned long ubus_addr, u8 value)
 227{
 228        struct idt77252_dev *card = dev;
 229        unsigned long flags;
 230
 231        if (!card) {
 232                printk("Error: No such device.\n");
 233                return;
 234        }
 235
 236        spin_lock_irqsave(&card->cmd_lock, flags);
 237        writel((u32) value, SAR_REG_DR0);
 238        writel(SAR_CMD_WRITE_UTILITY + ubus_addr, SAR_REG_CMD);
 239        waitfor_idle(card);
 240        spin_unlock_irqrestore(&card->cmd_lock, flags);
 241}
 242
 243#ifdef HAVE_EEPROM
 244static u32 rdsrtab[] =
 245{
 246        SAR_GP_EECS | SAR_GP_EESCLK,
 247        0,
 248        SAR_GP_EESCLK,                  /* 0 */
 249        0,
 250        SAR_GP_EESCLK,                  /* 0 */
 251        0,
 252        SAR_GP_EESCLK,                  /* 0 */
 253        0,
 254        SAR_GP_EESCLK,                  /* 0 */
 255        0,
 256        SAR_GP_EESCLK,                  /* 0 */
 257        SAR_GP_EEDO,
 258        SAR_GP_EESCLK | SAR_GP_EEDO,    /* 1 */
 259        0,
 260        SAR_GP_EESCLK,                  /* 0 */
 261        SAR_GP_EEDO,
 262        SAR_GP_EESCLK | SAR_GP_EEDO     /* 1 */
 263};
 264
 265static u32 wrentab[] =
 266{
 267        SAR_GP_EECS | SAR_GP_EESCLK,
 268        0,
 269        SAR_GP_EESCLK,                  /* 0 */
 270        0,
 271        SAR_GP_EESCLK,                  /* 0 */
 272        0,
 273        SAR_GP_EESCLK,                  /* 0 */
 274        0,
 275        SAR_GP_EESCLK,                  /* 0 */
 276        SAR_GP_EEDO,
 277        SAR_GP_EESCLK | SAR_GP_EEDO,    /* 1 */
 278        SAR_GP_EEDO,
 279        SAR_GP_EESCLK | SAR_GP_EEDO,    /* 1 */
 280        0,
 281        SAR_GP_EESCLK,                  /* 0 */
 282        0,
 283        SAR_GP_EESCLK                   /* 0 */
 284};
 285
 286static u32 rdtab[] =
 287{
 288        SAR_GP_EECS | SAR_GP_EESCLK,
 289        0,
 290        SAR_GP_EESCLK,                  /* 0 */
 291        0,
 292        SAR_GP_EESCLK,                  /* 0 */
 293        0,
 294        SAR_GP_EESCLK,                  /* 0 */
 295        0,
 296        SAR_GP_EESCLK,                  /* 0 */
 297        0,
 298        SAR_GP_EESCLK,                  /* 0 */
 299        0,
 300        SAR_GP_EESCLK,                  /* 0 */
 301        SAR_GP_EEDO,
 302        SAR_GP_EESCLK | SAR_GP_EEDO,    /* 1 */
 303        SAR_GP_EEDO,
 304        SAR_GP_EESCLK | SAR_GP_EEDO     /* 1 */
 305};
 306
 307static u32 wrtab[] =
 308{
 309        SAR_GP_EECS | SAR_GP_EESCLK,
 310        0,
 311        SAR_GP_EESCLK,                  /* 0 */
 312        0,
 313        SAR_GP_EESCLK,                  /* 0 */
 314        0,
 315        SAR_GP_EESCLK,                  /* 0 */
 316        0,
 317        SAR_GP_EESCLK,                  /* 0 */
 318        0,
 319        SAR_GP_EESCLK,                  /* 0 */
 320        0,
 321        SAR_GP_EESCLK,                  /* 0 */
 322        SAR_GP_EEDO,
 323        SAR_GP_EESCLK | SAR_GP_EEDO,    /* 1 */
 324        0,
 325        SAR_GP_EESCLK                   /* 0 */
 326};
 327
 328static u32 clktab[] =
 329{
 330        0,
 331        SAR_GP_EESCLK,
 332        0,
 333        SAR_GP_EESCLK,
 334        0,
 335        SAR_GP_EESCLK,
 336        0,
 337        SAR_GP_EESCLK,
 338        0,
 339        SAR_GP_EESCLK,
 340        0,
 341        SAR_GP_EESCLK,
 342        0,
 343        SAR_GP_EESCLK,
 344        0,
 345        SAR_GP_EESCLK,
 346        0
 347};
 348
 349static u32
 350idt77252_read_gp(struct idt77252_dev *card)
 351{
 352        u32 gp;
 353
 354        gp = readl(SAR_REG_GP);
 355#if 0
 356        printk("RD: %s\n", gp & SAR_GP_EEDI ? "1" : "0");
 357#endif
 358        return gp;
 359}
 360
 361static void
 362idt77252_write_gp(struct idt77252_dev *card, u32 value)
 363{
 364        unsigned long flags;
 365
 366#if 0
 367        printk("WR: %s %s %s\n", value & SAR_GP_EECS ? "   " : "/CS",
 368               value & SAR_GP_EESCLK ? "HIGH" : "LOW ",
 369               value & SAR_GP_EEDO   ? "1" : "0");
 370#endif
 371
 372        spin_lock_irqsave(&card->cmd_lock, flags);
 373        waitfor_idle(card);
 374        writel(value, SAR_REG_GP);
 375        spin_unlock_irqrestore(&card->cmd_lock, flags);
 376}
 377
 378static u8
 379idt77252_eeprom_read_status(struct idt77252_dev *card)
 380{
 381        u8 byte;
 382        u32 gp;
 383        int i, j;
 384
 385        gp = idt77252_read_gp(card) & ~(SAR_GP_EESCLK|SAR_GP_EECS|SAR_GP_EEDO);
 386
 387        for (i = 0; i < ARRAY_SIZE(rdsrtab); i++) {
 388                idt77252_write_gp(card, gp | rdsrtab[i]);
 389                udelay(5);
 390        }
 391        idt77252_write_gp(card, gp | SAR_GP_EECS);
 392        udelay(5);
 393
 394        byte = 0;
 395        for (i = 0, j = 0; i < 8; i++) {
 396                byte <<= 1;
 397
 398                idt77252_write_gp(card, gp | clktab[j++]);
 399                udelay(5);
 400
 401                byte |= idt77252_read_gp(card) & SAR_GP_EEDI ? 1 : 0;
 402
 403                idt77252_write_gp(card, gp | clktab[j++]);
 404                udelay(5);
 405        }
 406        idt77252_write_gp(card, gp | SAR_GP_EECS);
 407        udelay(5);
 408
 409        return byte;
 410}
 411
 412static u8
 413idt77252_eeprom_read_byte(struct idt77252_dev *card, u8 offset)
 414{
 415        u8 byte;
 416        u32 gp;
 417        int i, j;
 418
 419        gp = idt77252_read_gp(card) & ~(SAR_GP_EESCLK|SAR_GP_EECS|SAR_GP_EEDO);
 420
 421        for (i = 0; i < ARRAY_SIZE(rdtab); i++) {
 422                idt77252_write_gp(card, gp | rdtab[i]);
 423                udelay(5);
 424        }
 425        idt77252_write_gp(card, gp | SAR_GP_EECS);
 426        udelay(5);
 427
 428        for (i = 0, j = 0; i < 8; i++) {
 429                idt77252_write_gp(card, gp | clktab[j++] |
 430                                        (offset & 1 ? SAR_GP_EEDO : 0));
 431                udelay(5);
 432
 433                idt77252_write_gp(card, gp | clktab[j++] |
 434                                        (offset & 1 ? SAR_GP_EEDO : 0));
 435                udelay(5);
 436
 437                offset >>= 1;
 438        }
 439        idt77252_write_gp(card, gp | SAR_GP_EECS);
 440        udelay(5);
 441
 442        byte = 0;
 443        for (i = 0, j = 0; i < 8; i++) {
 444                byte <<= 1;
 445
 446                idt77252_write_gp(card, gp | clktab[j++]);
 447                udelay(5);
 448
 449                byte |= idt77252_read_gp(card) & SAR_GP_EEDI ? 1 : 0;
 450
 451                idt77252_write_gp(card, gp | clktab[j++]);
 452                udelay(5);
 453        }
 454        idt77252_write_gp(card, gp | SAR_GP_EECS);
 455        udelay(5);
 456
 457        return byte;
 458}
 459
 460static void
 461idt77252_eeprom_write_byte(struct idt77252_dev *card, u8 offset, u8 data)
 462{
 463        u32 gp;
 464        int i, j;
 465
 466        gp = idt77252_read_gp(card) & ~(SAR_GP_EESCLK|SAR_GP_EECS|SAR_GP_EEDO);
 467
 468        for (i = 0; i < ARRAY_SIZE(wrentab); i++) {
 469                idt77252_write_gp(card, gp | wrentab[i]);
 470                udelay(5);
 471        }
 472        idt77252_write_gp(card, gp | SAR_GP_EECS);
 473        udelay(5);
 474
 475        for (i = 0; i < ARRAY_SIZE(wrtab); i++) {
 476                idt77252_write_gp(card, gp | wrtab[i]);
 477                udelay(5);
 478        }
 479        idt77252_write_gp(card, gp | SAR_GP_EECS);
 480        udelay(5);
 481
 482        for (i = 0, j = 0; i < 8; i++) {
 483                idt77252_write_gp(card, gp | clktab[j++] |
 484                                        (offset & 1 ? SAR_GP_EEDO : 0));
 485                udelay(5);
 486
 487                idt77252_write_gp(card, gp | clktab[j++] |
 488                                        (offset & 1 ? SAR_GP_EEDO : 0));
 489                udelay(5);
 490
 491                offset >>= 1;
 492        }
 493        idt77252_write_gp(card, gp | SAR_GP_EECS);
 494        udelay(5);
 495
 496        for (i = 0, j = 0; i < 8; i++) {
 497                idt77252_write_gp(card, gp | clktab[j++] |
 498                                        (data & 1 ? SAR_GP_EEDO : 0));
 499                udelay(5);
 500
 501                idt77252_write_gp(card, gp | clktab[j++] |
 502                                        (data & 1 ? SAR_GP_EEDO : 0));
 503                udelay(5);
 504
 505                data >>= 1;
 506        }
 507        idt77252_write_gp(card, gp | SAR_GP_EECS);
 508        udelay(5);
 509}
 510
 511static void
 512idt77252_eeprom_init(struct idt77252_dev *card)
 513{
 514        u32 gp;
 515
 516        gp = idt77252_read_gp(card) & ~(SAR_GP_EESCLK|SAR_GP_EECS|SAR_GP_EEDO);
 517
 518        idt77252_write_gp(card, gp | SAR_GP_EECS | SAR_GP_EESCLK);
 519        udelay(5);
 520        idt77252_write_gp(card, gp | SAR_GP_EECS);
 521        udelay(5);
 522        idt77252_write_gp(card, gp | SAR_GP_EECS | SAR_GP_EESCLK);
 523        udelay(5);
 524        idt77252_write_gp(card, gp | SAR_GP_EECS);
 525        udelay(5);
 526}
 527#endif /* HAVE_EEPROM */
 528
 529
 530#ifdef CONFIG_ATM_IDT77252_DEBUG
 531static void
 532dump_tct(struct idt77252_dev *card, int index)
 533{
 534        unsigned long tct;
 535        int i;
 536
 537        tct = (unsigned long) (card->tct_base + index * SAR_SRAM_TCT_SIZE);
 538
 539        printk("%s: TCT %x:", card->name, index);
 540        for (i = 0; i < 8; i++) {
 541                printk(" %08x", read_sram(card, tct + i));
 542        }
 543        printk("\n");
 544}
 545
 546static void
 547idt77252_tx_dump(struct idt77252_dev *card)
 548{
 549        struct atm_vcc *vcc;
 550        struct vc_map *vc;
 551        int i;
 552
 553        printk("%s\n", __func__);
 554        for (i = 0; i < card->tct_size; i++) {
 555                vc = card->vcs[i];
 556                if (!vc)
 557                        continue;
 558
 559                vcc = NULL;
 560                if (vc->rx_vcc)
 561                        vcc = vc->rx_vcc;
 562                else if (vc->tx_vcc)
 563                        vcc = vc->tx_vcc;
 564
 565                if (!vcc)
 566                        continue;
 567
 568                printk("%s: Connection %d:\n", card->name, vc->index);
 569                dump_tct(card, vc->index);
 570        }
 571}
 572#endif
 573
 574
 575/*****************************************************************************/
 576/*                                                                           */
 577/* SCQ Handling                                                              */
 578/*                                                                           */
 579/*****************************************************************************/
 580
 581static int
 582sb_pool_add(struct idt77252_dev *card, struct sk_buff *skb, int queue)
 583{
 584        struct sb_pool *pool = &card->sbpool[queue];
 585        int index;
 586
 587        index = pool->index;
 588        while (pool->skb[index]) {
 589                index = (index + 1) & FBQ_MASK;
 590                if (index == pool->index)
 591                        return -ENOBUFS;
 592        }
 593
 594        pool->skb[index] = skb;
 595        IDT77252_PRV_POOL(skb) = POOL_HANDLE(queue, index);
 596
 597        pool->index = (index + 1) & FBQ_MASK;
 598        return 0;
 599}
 600
 601static void
 602sb_pool_remove(struct idt77252_dev *card, struct sk_buff *skb)
 603{
 604        unsigned int queue, index;
 605        u32 handle;
 606
 607        handle = IDT77252_PRV_POOL(skb);
 608
 609        queue = POOL_QUEUE(handle);
 610        if (queue > 3)
 611                return;
 612
 613        index = POOL_INDEX(handle);
 614        if (index > FBQ_SIZE - 1)
 615                return;
 616
 617        card->sbpool[queue].skb[index] = NULL;
 618}
 619
 620static struct sk_buff *
 621sb_pool_skb(struct idt77252_dev *card, u32 handle)
 622{
 623        unsigned int queue, index;
 624
 625        queue = POOL_QUEUE(handle);
 626        if (queue > 3)
 627                return NULL;
 628
 629        index = POOL_INDEX(handle);
 630        if (index > FBQ_SIZE - 1)
 631                return NULL;
 632
 633        return card->sbpool[queue].skb[index];
 634}
 635
 636static struct scq_info *
 637alloc_scq(struct idt77252_dev *card, int class)
 638{
 639        struct scq_info *scq;
 640
 641        scq = kzalloc(sizeof(struct scq_info), GFP_KERNEL);
 642        if (!scq)
 643                return NULL;
 644        scq->base = dma_alloc_coherent(&card->pcidev->dev, SCQ_SIZE,
 645                                       &scq->paddr, GFP_KERNEL);
 646        if (scq->base == NULL) {
 647                kfree(scq);
 648                return NULL;
 649        }
 650
 651        scq->next = scq->base;
 652        scq->last = scq->base + (SCQ_ENTRIES - 1);
 653        atomic_set(&scq->used, 0);
 654
 655        spin_lock_init(&scq->lock);
 656        spin_lock_init(&scq->skblock);
 657
 658        skb_queue_head_init(&scq->transmit);
 659        skb_queue_head_init(&scq->pending);
 660
 661        TXPRINTK("idt77252: SCQ: base 0x%p, next 0x%p, last 0x%p, paddr %08llx\n",
 662                 scq->base, scq->next, scq->last, (unsigned long long)scq->paddr);
 663
 664        return scq;
 665}
 666
 667static void
 668free_scq(struct idt77252_dev *card, struct scq_info *scq)
 669{
 670        struct sk_buff *skb;
 671        struct atm_vcc *vcc;
 672
 673        dma_free_coherent(&card->pcidev->dev, SCQ_SIZE,
 674                          scq->base, scq->paddr);
 675
 676        while ((skb = skb_dequeue(&scq->transmit))) {
 677                dma_unmap_single(&card->pcidev->dev, IDT77252_PRV_PADDR(skb),
 678                                 skb->len, DMA_TO_DEVICE);
 679
 680                vcc = ATM_SKB(skb)->vcc;
 681                if (vcc->pop)
 682                        vcc->pop(vcc, skb);
 683                else
 684                        dev_kfree_skb(skb);
 685        }
 686
 687        while ((skb = skb_dequeue(&scq->pending))) {
 688                dma_unmap_single(&card->pcidev->dev, IDT77252_PRV_PADDR(skb),
 689                                 skb->len, DMA_TO_DEVICE);
 690
 691                vcc = ATM_SKB(skb)->vcc;
 692                if (vcc->pop)
 693                        vcc->pop(vcc, skb);
 694                else
 695                        dev_kfree_skb(skb);
 696        }
 697
 698        kfree(scq);
 699}
 700
 701
 702static int
 703push_on_scq(struct idt77252_dev *card, struct vc_map *vc, struct sk_buff *skb)
 704{
 705        struct scq_info *scq = vc->scq;
 706        unsigned long flags;
 707        struct scqe *tbd;
 708        int entries;
 709
 710        TXPRINTK("%s: SCQ: next 0x%p\n", card->name, scq->next);
 711
 712        atomic_inc(&scq->used);
 713        entries = atomic_read(&scq->used);
 714        if (entries > (SCQ_ENTRIES - 1)) {
 715                atomic_dec(&scq->used);
 716                goto out;
 717        }
 718
 719        skb_queue_tail(&scq->transmit, skb);
 720
 721        spin_lock_irqsave(&vc->lock, flags);
 722        if (vc->estimator) {
 723                struct atm_vcc *vcc = vc->tx_vcc;
 724                struct sock *sk = sk_atm(vcc);
 725
 726                vc->estimator->cells += (skb->len + 47) / 48;
 727                if (refcount_read(&sk->sk_wmem_alloc) >
 728                    (sk->sk_sndbuf >> 1)) {
 729                        u32 cps = vc->estimator->maxcps;
 730
 731                        vc->estimator->cps = cps;
 732                        vc->estimator->avcps = cps << 5;
 733                        if (vc->lacr < vc->init_er) {
 734                                vc->lacr = vc->init_er;
 735                                writel(TCMDQ_LACR | (vc->lacr << 16) |
 736                                       vc->index, SAR_REG_TCMDQ);
 737                        }
 738                }
 739        }
 740        spin_unlock_irqrestore(&vc->lock, flags);
 741
 742        tbd = &IDT77252_PRV_TBD(skb);
 743
 744        spin_lock_irqsave(&scq->lock, flags);
 745        scq->next->word_1 = cpu_to_le32(tbd->word_1 |
 746                                        SAR_TBD_TSIF | SAR_TBD_GTSI);
 747        scq->next->word_2 = cpu_to_le32(tbd->word_2);
 748        scq->next->word_3 = cpu_to_le32(tbd->word_3);
 749        scq->next->word_4 = cpu_to_le32(tbd->word_4);
 750
 751        if (scq->next == scq->last)
 752                scq->next = scq->base;
 753        else
 754                scq->next++;
 755
 756        write_sram(card, scq->scd,
 757                   scq->paddr +
 758                   (u32)((unsigned long)scq->next - (unsigned long)scq->base));
 759        spin_unlock_irqrestore(&scq->lock, flags);
 760
 761        scq->trans_start = jiffies;
 762
 763        if (test_and_clear_bit(VCF_IDLE, &vc->flags)) {
 764                writel(TCMDQ_START_LACR | (vc->lacr << 16) | vc->index,
 765                       SAR_REG_TCMDQ);
 766        }
 767
 768        TXPRINTK("%d entries in SCQ used (push).\n", atomic_read(&scq->used));
 769
 770        XPRINTK("%s: SCQ (after push %2d) head = 0x%x, next = 0x%p.\n",
 771                card->name, atomic_read(&scq->used),
 772                read_sram(card, scq->scd + 1), scq->next);
 773
 774        return 0;
 775
 776out:
 777        if (time_after(jiffies, scq->trans_start + HZ)) {
 778                printk("%s: Error pushing TBD for %d.%d\n",
 779                       card->name, vc->tx_vcc->vpi, vc->tx_vcc->vci);
 780#ifdef CONFIG_ATM_IDT77252_DEBUG
 781                idt77252_tx_dump(card);
 782#endif
 783                scq->trans_start = jiffies;
 784        }
 785
 786        return -ENOBUFS;
 787}
 788
 789
 790static void
 791drain_scq(struct idt77252_dev *card, struct vc_map *vc)
 792{
 793        struct scq_info *scq = vc->scq;
 794        struct sk_buff *skb;
 795        struct atm_vcc *vcc;
 796
 797        TXPRINTK("%s: SCQ (before drain %2d) next = 0x%p.\n",
 798                 card->name, atomic_read(&scq->used), scq->next);
 799
 800        skb = skb_dequeue(&scq->transmit);
 801        if (skb) {
 802                TXPRINTK("%s: freeing skb at %p.\n", card->name, skb);
 803
 804                dma_unmap_single(&card->pcidev->dev, IDT77252_PRV_PADDR(skb),
 805                                 skb->len, DMA_TO_DEVICE);
 806
 807                vcc = ATM_SKB(skb)->vcc;
 808
 809                if (vcc->pop)
 810                        vcc->pop(vcc, skb);
 811                else
 812                        dev_kfree_skb(skb);
 813
 814                atomic_inc(&vcc->stats->tx);
 815        }
 816
 817        atomic_dec(&scq->used);
 818
 819        spin_lock(&scq->skblock);
 820        while ((skb = skb_dequeue(&scq->pending))) {
 821                if (push_on_scq(card, vc, skb)) {
 822                        skb_queue_head(&vc->scq->pending, skb);
 823                        break;
 824                }
 825        }
 826        spin_unlock(&scq->skblock);
 827}
 828
 829static int
 830queue_skb(struct idt77252_dev *card, struct vc_map *vc,
 831          struct sk_buff *skb, int oam)
 832{
 833        struct atm_vcc *vcc;
 834        struct scqe *tbd;
 835        unsigned long flags;
 836        int error;
 837        int aal;
 838        u32 word4;
 839
 840        if (skb->len == 0) {
 841                printk("%s: invalid skb->len (%d)\n", card->name, skb->len);
 842                return -EINVAL;
 843        }
 844
 845        TXPRINTK("%s: Sending %d bytes of data.\n",
 846                 card->name, skb->len);
 847
 848        tbd = &IDT77252_PRV_TBD(skb);
 849        vcc = ATM_SKB(skb)->vcc;
 850        word4 = (skb->data[0] << 24) | (skb->data[1] << 16) |
 851                        (skb->data[2] <<  8) | (skb->data[3] <<  0);
 852
 853        IDT77252_PRV_PADDR(skb) = dma_map_single(&card->pcidev->dev, skb->data,
 854                                                 skb->len, DMA_TO_DEVICE);
 855
 856        error = -EINVAL;
 857
 858        if (oam) {
 859                if (skb->len != 52)
 860                        goto errout;
 861
 862                tbd->word_1 = SAR_TBD_OAM | ATM_CELL_PAYLOAD | SAR_TBD_EPDU;
 863                tbd->word_2 = IDT77252_PRV_PADDR(skb) + 4;
 864                tbd->word_3 = 0x00000000;
 865                tbd->word_4 = word4;
 866
 867                if (test_bit(VCF_RSV, &vc->flags))
 868                        vc = card->vcs[0];
 869
 870                goto done;
 871        }
 872
 873        if (test_bit(VCF_RSV, &vc->flags)) {
 874                printk("%s: Trying to transmit on reserved VC\n", card->name);
 875                goto errout;
 876        }
 877
 878        aal = vcc->qos.aal;
 879
 880        switch (aal) {
 881        case ATM_AAL0:
 882        case ATM_AAL34:
 883                if (skb->len > 52)
 884                        goto errout;
 885
 886                if (aal == ATM_AAL0)
 887                        tbd->word_1 = SAR_TBD_EPDU | SAR_TBD_AAL0 |
 888                                      ATM_CELL_PAYLOAD;
 889                else
 890                        tbd->word_1 = SAR_TBD_EPDU | SAR_TBD_AAL34 |
 891                                      ATM_CELL_PAYLOAD;
 892
 893                tbd->word_2 = IDT77252_PRV_PADDR(skb) + 4;
 894                tbd->word_3 = 0x00000000;
 895                tbd->word_4 = word4;
 896                break;
 897
 898        case ATM_AAL5:
 899                tbd->word_1 = SAR_TBD_EPDU | SAR_TBD_AAL5 | skb->len;
 900                tbd->word_2 = IDT77252_PRV_PADDR(skb);
 901                tbd->word_3 = skb->len;
 902                tbd->word_4 = (vcc->vpi << SAR_TBD_VPI_SHIFT) |
 903                              (vcc->vci << SAR_TBD_VCI_SHIFT);
 904                break;
 905
 906        case ATM_AAL1:
 907        case ATM_AAL2:
 908        default:
 909                printk("%s: Traffic type not supported.\n", card->name);
 910                error = -EPROTONOSUPPORT;
 911                goto errout;
 912        }
 913
 914done:
 915        spin_lock_irqsave(&vc->scq->skblock, flags);
 916        skb_queue_tail(&vc->scq->pending, skb);
 917
 918        while ((skb = skb_dequeue(&vc->scq->pending))) {
 919                if (push_on_scq(card, vc, skb)) {
 920                        skb_queue_head(&vc->scq->pending, skb);
 921                        break;
 922                }
 923        }
 924        spin_unlock_irqrestore(&vc->scq->skblock, flags);
 925
 926        return 0;
 927
 928errout:
 929        dma_unmap_single(&card->pcidev->dev, IDT77252_PRV_PADDR(skb),
 930                         skb->len, DMA_TO_DEVICE);
 931        return error;
 932}
 933
 934static unsigned long
 935get_free_scd(struct idt77252_dev *card, struct vc_map *vc)
 936{
 937        int i;
 938
 939        for (i = 0; i < card->scd_size; i++) {
 940                if (!card->scd2vc[i]) {
 941                        card->scd2vc[i] = vc;
 942                        vc->scd_index = i;
 943                        return card->scd_base + i * SAR_SRAM_SCD_SIZE;
 944                }
 945        }
 946        return 0;
 947}
 948
 949static void
 950fill_scd(struct idt77252_dev *card, struct scq_info *scq, int class)
 951{
 952        write_sram(card, scq->scd, scq->paddr);
 953        write_sram(card, scq->scd + 1, 0x00000000);
 954        write_sram(card, scq->scd + 2, 0xffffffff);
 955        write_sram(card, scq->scd + 3, 0x00000000);
 956}
 957
 958static void
 959clear_scd(struct idt77252_dev *card, struct scq_info *scq, int class)
 960{
 961        return;
 962}
 963
 964/*****************************************************************************/
 965/*                                                                           */
 966/* RSQ Handling                                                              */
 967/*                                                                           */
 968/*****************************************************************************/
 969
 970static int
 971init_rsq(struct idt77252_dev *card)
 972{
 973        struct rsq_entry *rsqe;
 974
 975        card->rsq.base = dma_alloc_coherent(&card->pcidev->dev, RSQSIZE,
 976                                            &card->rsq.paddr, GFP_KERNEL);
 977        if (card->rsq.base == NULL) {
 978                printk("%s: can't allocate RSQ.\n", card->name);
 979                return -1;
 980        }
 981
 982        card->rsq.last = card->rsq.base + RSQ_NUM_ENTRIES - 1;
 983        card->rsq.next = card->rsq.last;
 984        for (rsqe = card->rsq.base; rsqe <= card->rsq.last; rsqe++)
 985                rsqe->word_4 = 0;
 986
 987        writel((unsigned long) card->rsq.last - (unsigned long) card->rsq.base,
 988               SAR_REG_RSQH);
 989        writel(card->rsq.paddr, SAR_REG_RSQB);
 990
 991        IPRINTK("%s: RSQ base at 0x%lx (0x%x).\n", card->name,
 992                (unsigned long) card->rsq.base,
 993                readl(SAR_REG_RSQB));
 994        IPRINTK("%s: RSQ head = 0x%x, base = 0x%x, tail = 0x%x.\n",
 995                card->name,
 996                readl(SAR_REG_RSQH),
 997                readl(SAR_REG_RSQB),
 998                readl(SAR_REG_RSQT));
 999
1000        return 0;
1001}
1002
1003static void
1004deinit_rsq(struct idt77252_dev *card)
1005{
1006        dma_free_coherent(&card->pcidev->dev, RSQSIZE,
1007                          card->rsq.base, card->rsq.paddr);
1008}
1009
1010static void
1011dequeue_rx(struct idt77252_dev *card, struct rsq_entry *rsqe)
1012{
1013        struct atm_vcc *vcc;
1014        struct sk_buff *skb;
1015        struct rx_pool *rpp;
1016        struct vc_map *vc;
1017        u32 header, vpi, vci;
1018        u32 stat;
1019        int i;
1020
1021        stat = le32_to_cpu(rsqe->word_4);
1022
1023        if (stat & SAR_RSQE_IDLE) {
1024                RXPRINTK("%s: message about inactive connection.\n",
1025                         card->name);
1026                return;
1027        }
1028
1029        skb = sb_pool_skb(card, le32_to_cpu(rsqe->word_2));
1030        if (skb == NULL) {
1031                printk("%s: NULL skb in %s, rsqe: %08x %08x %08x %08x\n",
1032                       card->name, __func__,
1033                       le32_to_cpu(rsqe->word_1), le32_to_cpu(rsqe->word_2),
1034                       le32_to_cpu(rsqe->word_3), le32_to_cpu(rsqe->word_4));
1035                return;
1036        }
1037
1038        header = le32_to_cpu(rsqe->word_1);
1039        vpi = (header >> 16) & 0x00ff;
1040        vci = (header >>  0) & 0xffff;
1041
1042        RXPRINTK("%s: SDU for %d.%d received in buffer 0x%p (data 0x%p).\n",
1043                 card->name, vpi, vci, skb, skb->data);
1044
1045        if ((vpi >= (1 << card->vpibits)) || (vci != (vci & card->vcimask))) {
1046                printk("%s: SDU received for out-of-range vc %u.%u\n",
1047                       card->name, vpi, vci);
1048                recycle_rx_skb(card, skb);
1049                return;
1050        }
1051
1052        vc = card->vcs[VPCI2VC(card, vpi, vci)];
1053        if (!vc || !test_bit(VCF_RX, &vc->flags)) {
1054                printk("%s: SDU received on non RX vc %u.%u\n",
1055                       card->name, vpi, vci);
1056                recycle_rx_skb(card, skb);
1057                return;
1058        }
1059
1060        vcc = vc->rx_vcc;
1061
1062        dma_sync_single_for_cpu(&card->pcidev->dev, IDT77252_PRV_PADDR(skb),
1063                                skb_end_pointer(skb) - skb->data,
1064                                DMA_FROM_DEVICE);
1065
1066        if ((vcc->qos.aal == ATM_AAL0) ||
1067            (vcc->qos.aal == ATM_AAL34)) {
1068                struct sk_buff *sb;
1069                unsigned char *cell;
1070                u32 aal0;
1071
1072                cell = skb->data;
1073                for (i = (stat & SAR_RSQE_CELLCNT); i; i--) {
1074                        if ((sb = dev_alloc_skb(64)) == NULL) {
1075                                printk("%s: Can't allocate buffers for aal0.\n",
1076                                       card->name);
1077                                atomic_add(i, &vcc->stats->rx_drop);
1078                                break;
1079                        }
1080                        if (!atm_charge(vcc, sb->truesize)) {
1081                                RXPRINTK("%s: atm_charge() dropped aal0 packets.\n",
1082                                         card->name);
1083                                atomic_add(i - 1, &vcc->stats->rx_drop);
1084                                dev_kfree_skb(sb);
1085                                break;
1086                        }
1087                        aal0 = (vpi << ATM_HDR_VPI_SHIFT) |
1088                               (vci << ATM_HDR_VCI_SHIFT);
1089                        aal0 |= (stat & SAR_RSQE_EPDU) ? 0x00000002 : 0;
1090                        aal0 |= (stat & SAR_RSQE_CLP)  ? 0x00000001 : 0;
1091
1092                        *((u32 *) sb->data) = aal0;
1093                        skb_put(sb, sizeof(u32));
1094                        skb_put_data(sb, cell, ATM_CELL_PAYLOAD);
1095
1096                        ATM_SKB(sb)->vcc = vcc;
1097                        __net_timestamp(sb);
1098                        vcc->push(vcc, sb);
1099                        atomic_inc(&vcc->stats->rx);
1100
1101                        cell += ATM_CELL_PAYLOAD;
1102                }
1103
1104                recycle_rx_skb(card, skb);
1105                return;
1106        }
1107        if (vcc->qos.aal != ATM_AAL5) {
1108                printk("%s: Unexpected AAL type in dequeue_rx(): %d.\n",
1109                       card->name, vcc->qos.aal);
1110                recycle_rx_skb(card, skb);
1111                return;
1112        }
1113        skb->len = (stat & SAR_RSQE_CELLCNT) * ATM_CELL_PAYLOAD;
1114
1115        rpp = &vc->rcv.rx_pool;
1116
1117        __skb_queue_tail(&rpp->queue, skb);
1118        rpp->len += skb->len;
1119
1120        if (stat & SAR_RSQE_EPDU) {
1121                unsigned char *l1l2;
1122                unsigned int len;
1123
1124                l1l2 = (unsigned char *) ((unsigned long) skb->data + skb->len - 6);
1125
1126                len = (l1l2[0] << 8) | l1l2[1];
1127                len = len ? len : 0x10000;
1128
1129                RXPRINTK("%s: PDU has %d bytes.\n", card->name, len);
1130
1131                if ((len + 8 > rpp->len) || (len + (47 + 8) < rpp->len)) {
1132                        RXPRINTK("%s: AAL5 PDU size mismatch: %d != %d. "
1133                                 "(CDC: %08x)\n",
1134                                 card->name, len, rpp->len, readl(SAR_REG_CDC));
1135                        recycle_rx_pool_skb(card, rpp);
1136                        atomic_inc(&vcc->stats->rx_err);
1137                        return;
1138                }
1139                if (stat & SAR_RSQE_CRC) {
1140                        RXPRINTK("%s: AAL5 CRC error.\n", card->name);
1141                        recycle_rx_pool_skb(card, rpp);
1142                        atomic_inc(&vcc->stats->rx_err);
1143                        return;
1144                }
1145                if (skb_queue_len(&rpp->queue) > 1) {
1146                        struct sk_buff *sb;
1147
1148                        skb = dev_alloc_skb(rpp->len);
1149                        if (!skb) {
1150                                RXPRINTK("%s: Can't alloc RX skb.\n",
1151                                         card->name);
1152                                recycle_rx_pool_skb(card, rpp);
1153                                atomic_inc(&vcc->stats->rx_err);
1154                                return;
1155                        }
1156                        if (!atm_charge(vcc, skb->truesize)) {
1157                                recycle_rx_pool_skb(card, rpp);
1158                                dev_kfree_skb(skb);
1159                                return;
1160                        }
1161                        skb_queue_walk(&rpp->queue, sb)
1162                                skb_put_data(skb, sb->data, sb->len);
1163
1164                        recycle_rx_pool_skb(card, rpp);
1165
1166                        skb_trim(skb, len);
1167                        ATM_SKB(skb)->vcc = vcc;
1168                        __net_timestamp(skb);
1169
1170                        vcc->push(vcc, skb);
1171                        atomic_inc(&vcc->stats->rx);
1172
1173                        return;
1174                }
1175
1176                flush_rx_pool(card, rpp);
1177
1178                if (!atm_charge(vcc, skb->truesize)) {
1179                        recycle_rx_skb(card, skb);
1180                        return;
1181                }
1182
1183                dma_unmap_single(&card->pcidev->dev, IDT77252_PRV_PADDR(skb),
1184                                 skb_end_pointer(skb) - skb->data,
1185                                 DMA_FROM_DEVICE);
1186                sb_pool_remove(card, skb);
1187
1188                skb_trim(skb, len);
1189                ATM_SKB(skb)->vcc = vcc;
1190                __net_timestamp(skb);
1191
1192                vcc->push(vcc, skb);
1193                atomic_inc(&vcc->stats->rx);
1194
1195                if (skb->truesize > SAR_FB_SIZE_3)
1196                        add_rx_skb(card, 3, SAR_FB_SIZE_3, 1);
1197                else if (skb->truesize > SAR_FB_SIZE_2)
1198                        add_rx_skb(card, 2, SAR_FB_SIZE_2, 1);
1199                else if (skb->truesize > SAR_FB_SIZE_1)
1200                        add_rx_skb(card, 1, SAR_FB_SIZE_1, 1);
1201                else
1202                        add_rx_skb(card, 0, SAR_FB_SIZE_0, 1);
1203                return;
1204        }
1205}
1206
1207static void
1208idt77252_rx(struct idt77252_dev *card)
1209{
1210        struct rsq_entry *rsqe;
1211
1212        if (card->rsq.next == card->rsq.last)
1213                rsqe = card->rsq.base;
1214        else
1215                rsqe = card->rsq.next + 1;
1216
1217        if (!(le32_to_cpu(rsqe->word_4) & SAR_RSQE_VALID)) {
1218                RXPRINTK("%s: no entry in RSQ.\n", card->name);
1219                return;
1220        }
1221
1222        do {
1223                dequeue_rx(card, rsqe);
1224                rsqe->word_4 = 0;
1225                card->rsq.next = rsqe;
1226                if (card->rsq.next == card->rsq.last)
1227                        rsqe = card->rsq.base;
1228                else
1229                        rsqe = card->rsq.next + 1;
1230        } while (le32_to_cpu(rsqe->word_4) & SAR_RSQE_VALID);
1231
1232        writel((unsigned long) card->rsq.next - (unsigned long) card->rsq.base,
1233               SAR_REG_RSQH);
1234}
1235
1236static void
1237idt77252_rx_raw(struct idt77252_dev *card)
1238{
1239        struct sk_buff  *queue;
1240        u32             head, tail;
1241        struct atm_vcc  *vcc;
1242        struct vc_map   *vc;
1243        struct sk_buff  *sb;
1244
1245        if (card->raw_cell_head == NULL) {
1246                u32 handle = le32_to_cpu(*(card->raw_cell_hnd + 1));
1247                card->raw_cell_head = sb_pool_skb(card, handle);
1248        }
1249
1250        queue = card->raw_cell_head;
1251        if (!queue)
1252                return;
1253
1254        head = IDT77252_PRV_PADDR(queue) + (queue->data - queue->head - 16);
1255        tail = readl(SAR_REG_RAWCT);
1256
1257        dma_sync_single_for_cpu(&card->pcidev->dev, IDT77252_PRV_PADDR(queue),
1258                                skb_end_offset(queue) - 16,
1259                                DMA_FROM_DEVICE);
1260
1261        while (head != tail) {
1262                unsigned int vpi, vci;
1263                u32 header;
1264
1265                header = le32_to_cpu(*(u32 *) &queue->data[0]);
1266
1267                vpi = (header & ATM_HDR_VPI_MASK) >> ATM_HDR_VPI_SHIFT;
1268                vci = (header & ATM_HDR_VCI_MASK) >> ATM_HDR_VCI_SHIFT;
1269
1270#ifdef CONFIG_ATM_IDT77252_DEBUG
1271                if (debug & DBG_RAW_CELL) {
1272                        int i;
1273
1274                        printk("%s: raw cell %x.%02x.%04x.%x.%x\n",
1275                               card->name, (header >> 28) & 0x000f,
1276                               (header >> 20) & 0x00ff,
1277                               (header >>  4) & 0xffff,
1278                               (header >>  1) & 0x0007,
1279                               (header >>  0) & 0x0001);
1280                        for (i = 16; i < 64; i++)
1281                                printk(" %02x", queue->data[i]);
1282                        printk("\n");
1283                }
1284#endif
1285
1286                if (vpi >= (1<<card->vpibits) || vci >= (1<<card->vcibits)) {
1287                        RPRINTK("%s: SDU received for out-of-range vc %u.%u\n",
1288                                card->name, vpi, vci);
1289                        goto drop;
1290                }
1291
1292                vc = card->vcs[VPCI2VC(card, vpi, vci)];
1293                if (!vc || !test_bit(VCF_RX, &vc->flags)) {
1294                        RPRINTK("%s: SDU received on non RX vc %u.%u\n",
1295                                card->name, vpi, vci);
1296                        goto drop;
1297                }
1298
1299                vcc = vc->rx_vcc;
1300
1301                if (vcc->qos.aal != ATM_AAL0) {
1302                        RPRINTK("%s: raw cell for non AAL0 vc %u.%u\n",
1303                                card->name, vpi, vci);
1304                        atomic_inc(&vcc->stats->rx_drop);
1305                        goto drop;
1306                }
1307        
1308                if ((sb = dev_alloc_skb(64)) == NULL) {
1309                        printk("%s: Can't allocate buffers for AAL0.\n",
1310                               card->name);
1311                        atomic_inc(&vcc->stats->rx_err);
1312                        goto drop;
1313                }
1314
1315                if (!atm_charge(vcc, sb->truesize)) {
1316                        RXPRINTK("%s: atm_charge() dropped AAL0 packets.\n",
1317                                 card->name);
1318                        dev_kfree_skb(sb);
1319                        goto drop;
1320                }
1321
1322                *((u32 *) sb->data) = header;
1323                skb_put(sb, sizeof(u32));
1324                skb_put_data(sb, &(queue->data[16]), ATM_CELL_PAYLOAD);
1325
1326                ATM_SKB(sb)->vcc = vcc;
1327                __net_timestamp(sb);
1328                vcc->push(vcc, sb);
1329                atomic_inc(&vcc->stats->rx);
1330
1331drop:
1332                skb_pull(queue, 64);
1333
1334                head = IDT77252_PRV_PADDR(queue)
1335                                        + (queue->data - queue->head - 16);
1336
1337                if (queue->len < 128) {
1338                        struct sk_buff *next;
1339                        u32 handle;
1340
1341                        head = le32_to_cpu(*(u32 *) &queue->data[0]);
1342                        handle = le32_to_cpu(*(u32 *) &queue->data[4]);
1343
1344                        next = sb_pool_skb(card, handle);
1345                        recycle_rx_skb(card, queue);
1346
1347                        if (next) {
1348                                card->raw_cell_head = next;
1349                                queue = card->raw_cell_head;
1350                                dma_sync_single_for_cpu(&card->pcidev->dev,
1351                                                        IDT77252_PRV_PADDR(queue),
1352                                                        (skb_end_pointer(queue) -
1353                                                         queue->data),
1354                                                        DMA_FROM_DEVICE);
1355                        } else {
1356                                card->raw_cell_head = NULL;
1357                                printk("%s: raw cell queue overrun\n",
1358                                       card->name);
1359                                break;
1360                        }
1361                }
1362        }
1363}
1364
1365
1366/*****************************************************************************/
1367/*                                                                           */
1368/* TSQ Handling                                                              */
1369/*                                                                           */
1370/*****************************************************************************/
1371
1372static int
1373init_tsq(struct idt77252_dev *card)
1374{
1375        struct tsq_entry *tsqe;
1376
1377        card->tsq.base = dma_alloc_coherent(&card->pcidev->dev, RSQSIZE,
1378                                            &card->tsq.paddr, GFP_KERNEL);
1379        if (card->tsq.base == NULL) {
1380                printk("%s: can't allocate TSQ.\n", card->name);
1381                return -1;
1382        }
1383
1384        card->tsq.last = card->tsq.base + TSQ_NUM_ENTRIES - 1;
1385        card->tsq.next = card->tsq.last;
1386        for (tsqe = card->tsq.base; tsqe <= card->tsq.last; tsqe++)
1387                tsqe->word_2 = cpu_to_le32(SAR_TSQE_INVALID);
1388
1389        writel(card->tsq.paddr, SAR_REG_TSQB);
1390        writel((unsigned long) card->tsq.next - (unsigned long) card->tsq.base,
1391               SAR_REG_TSQH);
1392
1393        return 0;
1394}
1395
1396static void
1397deinit_tsq(struct idt77252_dev *card)
1398{
1399        dma_free_coherent(&card->pcidev->dev, TSQSIZE,
1400                          card->tsq.base, card->tsq.paddr);
1401}
1402
1403static void
1404idt77252_tx(struct idt77252_dev *card)
1405{
1406        struct tsq_entry *tsqe;
1407        unsigned int vpi, vci;
1408        struct vc_map *vc;
1409        u32 conn, stat;
1410
1411        if (card->tsq.next == card->tsq.last)
1412                tsqe = card->tsq.base;
1413        else
1414                tsqe = card->tsq.next + 1;
1415
1416        TXPRINTK("idt77252_tx: tsq  %p: base %p, next %p, last %p\n", tsqe,
1417                 card->tsq.base, card->tsq.next, card->tsq.last);
1418        TXPRINTK("idt77252_tx: tsqb %08x, tsqt %08x, tsqh %08x, \n",
1419                 readl(SAR_REG_TSQB),
1420                 readl(SAR_REG_TSQT),
1421                 readl(SAR_REG_TSQH));
1422
1423        stat = le32_to_cpu(tsqe->word_2);
1424
1425        if (stat & SAR_TSQE_INVALID)
1426                return;
1427
1428        do {
1429                TXPRINTK("tsqe: 0x%p [0x%08x 0x%08x]\n", tsqe,
1430                         le32_to_cpu(tsqe->word_1),
1431                         le32_to_cpu(tsqe->word_2));
1432
1433                switch (stat & SAR_TSQE_TYPE) {
1434                case SAR_TSQE_TYPE_TIMER:
1435                        TXPRINTK("%s: Timer RollOver detected.\n", card->name);
1436                        break;
1437
1438                case SAR_TSQE_TYPE_IDLE:
1439
1440                        conn = le32_to_cpu(tsqe->word_1);
1441
1442                        if (SAR_TSQE_TAG(stat) == 0x10) {
1443#ifdef  NOTDEF
1444                                printk("%s: Connection %d halted.\n",
1445                                       card->name,
1446                                       le32_to_cpu(tsqe->word_1) & 0x1fff);
1447#endif
1448                                break;
1449                        }
1450
1451                        vc = card->vcs[conn & 0x1fff];
1452                        if (!vc) {
1453                                printk("%s: could not find VC from conn %d\n",
1454                                       card->name, conn & 0x1fff);
1455                                break;
1456                        }
1457
1458                        printk("%s: Connection %d IDLE.\n",
1459                               card->name, vc->index);
1460
1461                        set_bit(VCF_IDLE, &vc->flags);
1462                        break;
1463
1464                case SAR_TSQE_TYPE_TSR:
1465
1466                        conn = le32_to_cpu(tsqe->word_1);
1467
1468                        vc = card->vcs[conn & 0x1fff];
1469                        if (!vc) {
1470                                printk("%s: no VC at index %d\n",
1471                                       card->name,
1472                                       le32_to_cpu(tsqe->word_1) & 0x1fff);
1473                                break;
1474                        }
1475
1476                        drain_scq(card, vc);
1477                        break;
1478
1479                case SAR_TSQE_TYPE_TBD_COMP:
1480
1481                        conn = le32_to_cpu(tsqe->word_1);
1482
1483                        vpi = (conn >> SAR_TBD_VPI_SHIFT) & 0x00ff;
1484                        vci = (conn >> SAR_TBD_VCI_SHIFT) & 0xffff;
1485
1486                        if (vpi >= (1 << card->vpibits) ||
1487                            vci >= (1 << card->vcibits)) {
1488                                printk("%s: TBD complete: "
1489                                       "out of range VPI.VCI %u.%u\n",
1490                                       card->name, vpi, vci);
1491                                break;
1492                        }
1493
1494                        vc = card->vcs[VPCI2VC(card, vpi, vci)];
1495                        if (!vc) {
1496                                printk("%s: TBD complete: "
1497                                       "no VC at VPI.VCI %u.%u\n",
1498                                       card->name, vpi, vci);
1499                                break;
1500                        }
1501
1502                        drain_scq(card, vc);
1503                        break;
1504                }
1505
1506                tsqe->word_2 = cpu_to_le32(SAR_TSQE_INVALID);
1507
1508                card->tsq.next = tsqe;
1509                if (card->tsq.next == card->tsq.last)
1510                        tsqe = card->tsq.base;
1511                else
1512                        tsqe = card->tsq.next + 1;
1513
1514                TXPRINTK("tsqe: %p: base %p, next %p, last %p\n", tsqe,
1515                         card->tsq.base, card->tsq.next, card->tsq.last);
1516
1517                stat = le32_to_cpu(tsqe->word_2);
1518
1519        } while (!(stat & SAR_TSQE_INVALID));
1520
1521        writel((unsigned long)card->tsq.next - (unsigned long)card->tsq.base,
1522               SAR_REG_TSQH);
1523
1524        XPRINTK("idt77252_tx-after writel%d: TSQ head = 0x%x, tail = 0x%x, next = 0x%p.\n",
1525                card->index, readl(SAR_REG_TSQH),
1526                readl(SAR_REG_TSQT), card->tsq.next);
1527}
1528
1529
1530static void
1531tst_timer(struct timer_list *t)
1532{
1533        struct idt77252_dev *card = from_timer(card, t, tst_timer);
1534        unsigned long base, idle, jump;
1535        unsigned long flags;
1536        u32 pc;
1537        int e;
1538
1539        spin_lock_irqsave(&card->tst_lock, flags);
1540
1541        base = card->tst[card->tst_index];
1542        idle = card->tst[card->tst_index ^ 1];
1543
1544        if (test_bit(TST_SWITCH_WAIT, &card->tst_state)) {
1545                jump = base + card->tst_size - 2;
1546
1547                pc = readl(SAR_REG_NOW) >> 2;
1548                if ((pc ^ idle) & ~(card->tst_size - 1)) {
1549                        mod_timer(&card->tst_timer, jiffies + 1);
1550                        goto out;
1551                }
1552
1553                clear_bit(TST_SWITCH_WAIT, &card->tst_state);
1554
1555                card->tst_index ^= 1;
1556                write_sram(card, jump, TSTE_OPC_JMP | (base << 2));
1557
1558                base = card->tst[card->tst_index];
1559                idle = card->tst[card->tst_index ^ 1];
1560
1561                for (e = 0; e < card->tst_size - 2; e++) {
1562                        if (card->soft_tst[e].tste & TSTE_PUSH_IDLE) {
1563                                write_sram(card, idle + e,
1564                                           card->soft_tst[e].tste & TSTE_MASK);
1565                                card->soft_tst[e].tste &= ~(TSTE_PUSH_IDLE);
1566                        }
1567                }
1568        }
1569
1570        if (test_and_clear_bit(TST_SWITCH_PENDING, &card->tst_state)) {
1571
1572                for (e = 0; e < card->tst_size - 2; e++) {
1573                        if (card->soft_tst[e].tste & TSTE_PUSH_ACTIVE) {
1574                                write_sram(card, idle + e,
1575                                           card->soft_tst[e].tste & TSTE_MASK);
1576                                card->soft_tst[e].tste &= ~(TSTE_PUSH_ACTIVE);
1577                                card->soft_tst[e].tste |= TSTE_PUSH_IDLE;
1578                        }
1579                }
1580
1581                jump = base + card->tst_size - 2;
1582
1583                write_sram(card, jump, TSTE_OPC_NULL);
1584                set_bit(TST_SWITCH_WAIT, &card->tst_state);
1585
1586                mod_timer(&card->tst_timer, jiffies + 1);
1587        }
1588
1589out:
1590        spin_unlock_irqrestore(&card->tst_lock, flags);
1591}
1592
1593static int
1594__fill_tst(struct idt77252_dev *card, struct vc_map *vc,
1595           int n, unsigned int opc)
1596{
1597        unsigned long cl, avail;
1598        unsigned long idle;
1599        int e, r;
1600        u32 data;
1601
1602        avail = card->tst_size - 2;
1603        for (e = 0; e < avail; e++) {
1604                if (card->soft_tst[e].vc == NULL)
1605                        break;
1606        }
1607        if (e >= avail) {
1608                printk("%s: No free TST entries found\n", card->name);
1609                return -1;
1610        }
1611
1612        NPRINTK("%s: conn %d: first TST entry at %d.\n",
1613                card->name, vc ? vc->index : -1, e);
1614
1615        r = n;
1616        cl = avail;
1617        data = opc & TSTE_OPC_MASK;
1618        if (vc && (opc != TSTE_OPC_NULL))
1619                data = opc | vc->index;
1620
1621        idle = card->tst[card->tst_index ^ 1];
1622
1623        /*
1624         * Fill Soft TST.
1625         */
1626        while (r > 0) {
1627                if ((cl >= avail) && (card->soft_tst[e].vc == NULL)) {
1628                        if (vc)
1629                                card->soft_tst[e].vc = vc;
1630                        else
1631                                card->soft_tst[e].vc = (void *)-1;
1632
1633                        card->soft_tst[e].tste = data;
1634                        if (timer_pending(&card->tst_timer))
1635                                card->soft_tst[e].tste |= TSTE_PUSH_ACTIVE;
1636                        else {
1637                                write_sram(card, idle + e, data);
1638                                card->soft_tst[e].tste |= TSTE_PUSH_IDLE;
1639                        }
1640
1641                        cl -= card->tst_size;
1642                        r--;
1643                }
1644
1645                if (++e == avail)
1646                        e = 0;
1647                cl += n;
1648        }
1649
1650        return 0;
1651}
1652
1653static int
1654fill_tst(struct idt77252_dev *card, struct vc_map *vc, int n, unsigned int opc)
1655{
1656        unsigned long flags;
1657        int res;
1658
1659        spin_lock_irqsave(&card->tst_lock, flags);
1660
1661        res = __fill_tst(card, vc, n, opc);
1662
1663        set_bit(TST_SWITCH_PENDING, &card->tst_state);
1664        if (!timer_pending(&card->tst_timer))
1665                mod_timer(&card->tst_timer, jiffies + 1);
1666
1667        spin_unlock_irqrestore(&card->tst_lock, flags);
1668        return res;
1669}
1670
1671static int
1672__clear_tst(struct idt77252_dev *card, struct vc_map *vc)
1673{
1674        unsigned long idle;
1675        int e;
1676
1677        idle = card->tst[card->tst_index ^ 1];
1678
1679        for (e = 0; e < card->tst_size - 2; e++) {
1680                if (card->soft_tst[e].vc == vc) {
1681                        card->soft_tst[e].vc = NULL;
1682
1683                        card->soft_tst[e].tste = TSTE_OPC_VAR;
1684                        if (timer_pending(&card->tst_timer))
1685                                card->soft_tst[e].tste |= TSTE_PUSH_ACTIVE;
1686                        else {
1687                                write_sram(card, idle + e, TSTE_OPC_VAR);
1688                                card->soft_tst[e].tste |= TSTE_PUSH_IDLE;
1689                        }
1690                }
1691        }
1692
1693        return 0;
1694}
1695
1696static int
1697clear_tst(struct idt77252_dev *card, struct vc_map *vc)
1698{
1699        unsigned long flags;
1700        int res;
1701
1702        spin_lock_irqsave(&card->tst_lock, flags);
1703
1704        res = __clear_tst(card, vc);
1705
1706        set_bit(TST_SWITCH_PENDING, &card->tst_state);
1707        if (!timer_pending(&card->tst_timer))
1708                mod_timer(&card->tst_timer, jiffies + 1);
1709
1710        spin_unlock_irqrestore(&card->tst_lock, flags);
1711        return res;
1712}
1713
1714static int
1715change_tst(struct idt77252_dev *card, struct vc_map *vc,
1716           int n, unsigned int opc)
1717{
1718        unsigned long flags;
1719        int res;
1720
1721        spin_lock_irqsave(&card->tst_lock, flags);
1722
1723        __clear_tst(card, vc);
1724        res = __fill_tst(card, vc, n, opc);
1725
1726        set_bit(TST_SWITCH_PENDING, &card->tst_state);
1727        if (!timer_pending(&card->tst_timer))
1728                mod_timer(&card->tst_timer, jiffies + 1);
1729
1730        spin_unlock_irqrestore(&card->tst_lock, flags);
1731        return res;
1732}
1733
1734
1735static int
1736set_tct(struct idt77252_dev *card, struct vc_map *vc)
1737{
1738        unsigned long tct;
1739
1740        tct = (unsigned long) (card->tct_base + vc->index * SAR_SRAM_TCT_SIZE);
1741
1742        switch (vc->class) {
1743        case SCHED_CBR:
1744                OPRINTK("%s: writing TCT at 0x%lx, SCD 0x%lx.\n",
1745                        card->name, tct, vc->scq->scd);
1746
1747                write_sram(card, tct + 0, TCT_CBR | vc->scq->scd);
1748                write_sram(card, tct + 1, 0);
1749                write_sram(card, tct + 2, 0);
1750                write_sram(card, tct + 3, 0);
1751                write_sram(card, tct + 4, 0);
1752                write_sram(card, tct + 5, 0);
1753                write_sram(card, tct + 6, 0);
1754                write_sram(card, tct + 7, 0);
1755                break;
1756
1757        case SCHED_UBR:
1758                OPRINTK("%s: writing TCT at 0x%lx, SCD 0x%lx.\n",
1759                        card->name, tct, vc->scq->scd);
1760
1761                write_sram(card, tct + 0, TCT_UBR | vc->scq->scd);
1762                write_sram(card, tct + 1, 0);
1763                write_sram(card, tct + 2, TCT_TSIF);
1764                write_sram(card, tct + 3, TCT_HALT | TCT_IDLE);
1765                write_sram(card, tct + 4, 0);
1766                write_sram(card, tct + 5, vc->init_er);
1767                write_sram(card, tct + 6, 0);
1768                write_sram(card, tct + 7, TCT_FLAG_UBR);
1769                break;
1770
1771        case SCHED_VBR:
1772        case SCHED_ABR:
1773        default:
1774                return -ENOSYS;
1775        }
1776
1777        return 0;
1778}
1779
1780/*****************************************************************************/
1781/*                                                                           */
1782/* FBQ Handling                                                              */
1783/*                                                                           */
1784/*****************************************************************************/
1785
1786static __inline__ int
1787idt77252_fbq_level(struct idt77252_dev *card, int queue)
1788{
1789        return (readl(SAR_REG_STAT) >> (16 + (queue << 2))) & 0x0f;
1790}
1791
1792static __inline__ int
1793idt77252_fbq_full(struct idt77252_dev *card, int queue)
1794{
1795        return (readl(SAR_REG_STAT) >> (16 + (queue << 2))) == 0x0f;
1796}
1797
1798static int
1799push_rx_skb(struct idt77252_dev *card, struct sk_buff *skb, int queue)
1800{
1801        unsigned long flags;
1802        u32 handle;
1803        u32 addr;
1804
1805        skb->data = skb->head;
1806        skb_reset_tail_pointer(skb);
1807        skb->len = 0;
1808
1809        skb_reserve(skb, 16);
1810
1811        switch (queue) {
1812        case 0:
1813                skb_put(skb, SAR_FB_SIZE_0);
1814                break;
1815        case 1:
1816                skb_put(skb, SAR_FB_SIZE_1);
1817                break;
1818        case 2:
1819                skb_put(skb, SAR_FB_SIZE_2);
1820                break;
1821        case 3:
1822                skb_put(skb, SAR_FB_SIZE_3);
1823                break;
1824        default:
1825                return -1;
1826        }
1827
1828        if (idt77252_fbq_full(card, queue))
1829                return -1;
1830
1831        memset(&skb->data[(skb->len & ~(0x3f)) - 64], 0, 2 * sizeof(u32));
1832
1833        handle = IDT77252_PRV_POOL(skb);
1834        addr = IDT77252_PRV_PADDR(skb);
1835
1836        spin_lock_irqsave(&card->cmd_lock, flags);
1837        writel(handle, card->fbq[queue]);
1838        writel(addr, card->fbq[queue]);
1839        spin_unlock_irqrestore(&card->cmd_lock, flags);
1840
1841        return 0;
1842}
1843
1844static void
1845add_rx_skb(struct idt77252_dev *card, int queue,
1846           unsigned int size, unsigned int count)
1847{
1848        struct sk_buff *skb;
1849        dma_addr_t paddr;
1850        u32 handle;
1851
1852        while (count--) {
1853                skb = dev_alloc_skb(size);
1854                if (!skb)
1855                        return;
1856
1857                if (sb_pool_add(card, skb, queue)) {
1858                        printk("%s: SB POOL full\n", __func__);
1859                        goto outfree;
1860                }
1861
1862                paddr = dma_map_single(&card->pcidev->dev, skb->data,
1863                                       skb_end_pointer(skb) - skb->data,
1864                                       DMA_FROM_DEVICE);
1865                IDT77252_PRV_PADDR(skb) = paddr;
1866
1867                if (push_rx_skb(card, skb, queue)) {
1868                        printk("%s: FB QUEUE full\n", __func__);
1869                        goto outunmap;
1870                }
1871        }
1872
1873        return;
1874
1875outunmap:
1876        dma_unmap_single(&card->pcidev->dev, IDT77252_PRV_PADDR(skb),
1877                         skb_end_pointer(skb) - skb->data, DMA_FROM_DEVICE);
1878
1879        handle = IDT77252_PRV_POOL(skb);
1880        card->sbpool[POOL_QUEUE(handle)].skb[POOL_INDEX(handle)] = NULL;
1881
1882outfree:
1883        dev_kfree_skb(skb);
1884}
1885
1886
1887static void
1888recycle_rx_skb(struct idt77252_dev *card, struct sk_buff *skb)
1889{
1890        u32 handle = IDT77252_PRV_POOL(skb);
1891        int err;
1892
1893        dma_sync_single_for_device(&card->pcidev->dev, IDT77252_PRV_PADDR(skb),
1894                                   skb_end_pointer(skb) - skb->data,
1895                                   DMA_FROM_DEVICE);
1896
1897        err = push_rx_skb(card, skb, POOL_QUEUE(handle));
1898        if (err) {
1899                dma_unmap_single(&card->pcidev->dev, IDT77252_PRV_PADDR(skb),
1900                                 skb_end_pointer(skb) - skb->data,
1901                                 DMA_FROM_DEVICE);
1902                sb_pool_remove(card, skb);
1903                dev_kfree_skb(skb);
1904        }
1905}
1906
1907static void
1908flush_rx_pool(struct idt77252_dev *card, struct rx_pool *rpp)
1909{
1910        skb_queue_head_init(&rpp->queue);
1911        rpp->len = 0;
1912}
1913
1914static void
1915recycle_rx_pool_skb(struct idt77252_dev *card, struct rx_pool *rpp)
1916{
1917        struct sk_buff *skb, *tmp;
1918
1919        skb_queue_walk_safe(&rpp->queue, skb, tmp)
1920                recycle_rx_skb(card, skb);
1921
1922        flush_rx_pool(card, rpp);
1923}
1924
1925/*****************************************************************************/
1926/*                                                                           */
1927/* ATM Interface                                                             */
1928/*                                                                           */
1929/*****************************************************************************/
1930
1931static void
1932idt77252_phy_put(struct atm_dev *dev, unsigned char value, unsigned long addr)
1933{
1934        write_utility(dev->dev_data, 0x100 + (addr & 0x1ff), value);
1935}
1936
1937static unsigned char
1938idt77252_phy_get(struct atm_dev *dev, unsigned long addr)
1939{
1940        return read_utility(dev->dev_data, 0x100 + (addr & 0x1ff));
1941}
1942
1943static inline int
1944idt77252_send_skb(struct atm_vcc *vcc, struct sk_buff *skb, int oam)
1945{
1946        struct atm_dev *dev = vcc->dev;
1947        struct idt77252_dev *card = dev->dev_data;
1948        struct vc_map *vc = vcc->dev_data;
1949        int err;
1950
1951        if (vc == NULL) {
1952                printk("%s: NULL connection in send().\n", card->name);
1953                atomic_inc(&vcc->stats->tx_err);
1954                dev_kfree_skb(skb);
1955                return -EINVAL;
1956        }
1957        if (!test_bit(VCF_TX, &vc->flags)) {
1958                printk("%s: Trying to transmit on a non-tx VC.\n", card->name);
1959                atomic_inc(&vcc->stats->tx_err);
1960                dev_kfree_skb(skb);
1961                return -EINVAL;
1962        }
1963
1964        switch (vcc->qos.aal) {
1965        case ATM_AAL0:
1966        case ATM_AAL1:
1967        case ATM_AAL5:
1968                break;
1969        default:
1970                printk("%s: Unsupported AAL: %d\n", card->name, vcc->qos.aal);
1971                atomic_inc(&vcc->stats->tx_err);
1972                dev_kfree_skb(skb);
1973                return -EINVAL;
1974        }
1975
1976        if (skb_shinfo(skb)->nr_frags != 0) {
1977                printk("%s: No scatter-gather yet.\n", card->name);
1978                atomic_inc(&vcc->stats->tx_err);
1979                dev_kfree_skb(skb);
1980                return -EINVAL;
1981        }
1982        ATM_SKB(skb)->vcc = vcc;
1983
1984        err = queue_skb(card, vc, skb, oam);
1985        if (err) {
1986                atomic_inc(&vcc->stats->tx_err);
1987                dev_kfree_skb(skb);
1988                return err;
1989        }
1990
1991        return 0;
1992}
1993
1994static int idt77252_send(struct atm_vcc *vcc, struct sk_buff *skb)
1995{
1996        return idt77252_send_skb(vcc, skb, 0);
1997}
1998
1999static int
2000idt77252_send_oam(struct atm_vcc *vcc, void *cell, int flags)
2001{
2002        struct atm_dev *dev = vcc->dev;
2003        struct idt77252_dev *card = dev->dev_data;
2004        struct sk_buff *skb;
2005
2006        skb = dev_alloc_skb(64);
2007        if (!skb) {
2008                printk("%s: Out of memory in send_oam().\n", card->name);
2009                atomic_inc(&vcc->stats->tx_err);
2010                return -ENOMEM;
2011        }
2012        refcount_add(skb->truesize, &sk_atm(vcc)->sk_wmem_alloc);
2013
2014        skb_put_data(skb, cell, 52);
2015
2016        return idt77252_send_skb(vcc, skb, 1);
2017}
2018
2019static __inline__ unsigned int
2020idt77252_fls(unsigned int x)
2021{
2022        int r = 1;
2023
2024        if (x == 0)
2025                return 0;
2026        if (x & 0xffff0000) {
2027                x >>= 16;
2028                r += 16;
2029        }
2030        if (x & 0xff00) {
2031                x >>= 8;
2032                r += 8;
2033        }
2034        if (x & 0xf0) {
2035                x >>= 4;
2036                r += 4;
2037        }
2038        if (x & 0xc) {
2039                x >>= 2;
2040                r += 2;
2041        }
2042        if (x & 0x2)
2043                r += 1;
2044        return r;
2045}
2046
2047static u16
2048idt77252_int_to_atmfp(unsigned int rate)
2049{
2050        u16 m, e;
2051
2052        if (rate == 0)
2053                return 0;
2054        e = idt77252_fls(rate) - 1;
2055        if (e < 9)
2056                m = (rate - (1 << e)) << (9 - e);
2057        else if (e == 9)
2058                m = (rate - (1 << e));
2059        else /* e > 9 */
2060                m = (rate - (1 << e)) >> (e - 9);
2061        return 0x4000 | (e << 9) | m;
2062}
2063
2064static u8
2065idt77252_rate_logindex(struct idt77252_dev *card, int pcr)
2066{
2067        u16 afp;
2068
2069        afp = idt77252_int_to_atmfp(pcr < 0 ? -pcr : pcr);
2070        if (pcr < 0)
2071                return rate_to_log[(afp >> 5) & 0x1ff];
2072        return rate_to_log[((afp >> 5) + 1) & 0x1ff];
2073}
2074
2075static void
2076idt77252_est_timer(struct timer_list *t)
2077{
2078        struct rate_estimator *est = from_timer(est, t, timer);
2079        struct vc_map *vc = est->vc;
2080        struct idt77252_dev *card = vc->card;
2081        unsigned long flags;
2082        u32 rate, cps;
2083        u64 ncells;
2084        u8 lacr;
2085
2086        spin_lock_irqsave(&vc->lock, flags);
2087        if (!vc->estimator)
2088                goto out;
2089        ncells = est->cells;
2090
2091        rate = ((u32)(ncells - est->last_cells)) << (7 - est->interval);
2092        est->last_cells = ncells;
2093        est->avcps += ((long)rate - (long)est->avcps) >> est->ewma_log;
2094        est->cps = (est->avcps + 0x1f) >> 5;
2095
2096        cps = est->cps;
2097        if (cps < (est->maxcps >> 4))
2098                cps = est->maxcps >> 4;
2099
2100        lacr = idt77252_rate_logindex(card, cps);
2101        if (lacr > vc->max_er)
2102                lacr = vc->max_er;
2103
2104        if (lacr != vc->lacr) {
2105                vc->lacr = lacr;
2106                writel(TCMDQ_LACR|(vc->lacr << 16)|vc->index, SAR_REG_TCMDQ);
2107        }
2108
2109        est->timer.expires = jiffies + ((HZ / 4) << est->interval);
2110        add_timer(&est->timer);
2111
2112out:
2113        spin_unlock_irqrestore(&vc->lock, flags);
2114}
2115
2116static struct rate_estimator *
2117idt77252_init_est(struct vc_map *vc, int pcr)
2118{
2119        struct rate_estimator *est;
2120
2121        est = kzalloc(sizeof(struct rate_estimator), GFP_KERNEL);
2122        if (!est)
2123                return NULL;
2124        est->maxcps = pcr < 0 ? -pcr : pcr;
2125        est->cps = est->maxcps;
2126        est->avcps = est->cps << 5;
2127        est->vc = vc;
2128
2129        est->interval = 2;              /* XXX: make this configurable */
2130        est->ewma_log = 2;              /* XXX: make this configurable */
2131        timer_setup(&est->timer, idt77252_est_timer, 0);
2132        mod_timer(&est->timer, jiffies + ((HZ / 4) << est->interval));
2133
2134        return est;
2135}
2136
2137static int
2138idt77252_init_cbr(struct idt77252_dev *card, struct vc_map *vc,
2139                  struct atm_vcc *vcc, struct atm_qos *qos)
2140{
2141        int tst_free, tst_used, tst_entries;
2142        unsigned long tmpl, modl;
2143        int tcr, tcra;
2144
2145        if ((qos->txtp.max_pcr == 0) &&
2146            (qos->txtp.pcr == 0) && (qos->txtp.min_pcr == 0)) {
2147                printk("%s: trying to open a CBR VC with cell rate = 0\n",
2148                       card->name);
2149                return -EINVAL;
2150        }
2151
2152        tst_used = 0;
2153        tst_free = card->tst_free;
2154        if (test_bit(VCF_TX, &vc->flags))
2155                tst_used = vc->ntste;
2156        tst_free += tst_used;
2157
2158        tcr = atm_pcr_goal(&qos->txtp);
2159        tcra = tcr >= 0 ? tcr : -tcr;
2160
2161        TXPRINTK("%s: CBR target cell rate = %d\n", card->name, tcra);
2162
2163        tmpl = (unsigned long) tcra * ((unsigned long) card->tst_size - 2);
2164        modl = tmpl % (unsigned long)card->utopia_pcr;
2165
2166        tst_entries = (int) (tmpl / card->utopia_pcr);
2167        if (tcr > 0) {
2168                if (modl > 0)
2169                        tst_entries++;
2170        } else if (tcr == 0) {
2171                tst_entries = tst_free - SAR_TST_RESERVED;
2172                if (tst_entries <= 0) {
2173                        printk("%s: no CBR bandwidth free.\n", card->name);
2174                        return -ENOSR;
2175                }
2176        }
2177
2178        if (tst_entries == 0) {
2179                printk("%s: selected CBR bandwidth < granularity.\n",
2180                       card->name);
2181                return -EINVAL;
2182        }
2183
2184        if (tst_entries > (tst_free - SAR_TST_RESERVED)) {
2185                printk("%s: not enough CBR bandwidth free.\n", card->name);
2186                return -ENOSR;
2187        }
2188
2189        vc->ntste = tst_entries;
2190
2191        card->tst_free = tst_free - tst_entries;
2192        if (test_bit(VCF_TX, &vc->flags)) {
2193                if (tst_used == tst_entries)
2194                        return 0;
2195
2196                OPRINTK("%s: modify %d -> %d entries in TST.\n",
2197                        card->name, tst_used, tst_entries);
2198                change_tst(card, vc, tst_entries, TSTE_OPC_CBR);
2199                return 0;
2200        }
2201
2202        OPRINTK("%s: setting %d entries in TST.\n", card->name, tst_entries);
2203        fill_tst(card, vc, tst_entries, TSTE_OPC_CBR);
2204        return 0;
2205}
2206
2207static int
2208idt77252_init_ubr(struct idt77252_dev *card, struct vc_map *vc,
2209                  struct atm_vcc *vcc, struct atm_qos *qos)
2210{
2211        struct rate_estimator *est = NULL;
2212        unsigned long flags;
2213        int tcr;
2214
2215        spin_lock_irqsave(&vc->lock, flags);
2216        if (vc->estimator) {
2217                est = vc->estimator;
2218                vc->estimator = NULL;
2219        }
2220        spin_unlock_irqrestore(&vc->lock, flags);
2221        if (est) {
2222                del_timer_sync(&est->timer);
2223                kfree(est);
2224        }
2225
2226        tcr = atm_pcr_goal(&qos->txtp);
2227        if (tcr == 0)
2228                tcr = card->link_pcr;
2229
2230        vc->estimator = idt77252_init_est(vc, tcr);
2231
2232        vc->class = SCHED_UBR;
2233        vc->init_er = idt77252_rate_logindex(card, tcr);
2234        vc->lacr = vc->init_er;
2235        if (tcr < 0)
2236                vc->max_er = vc->init_er;
2237        else
2238                vc->max_er = 0xff;
2239
2240        return 0;
2241}
2242
2243static int
2244idt77252_init_tx(struct idt77252_dev *card, struct vc_map *vc,
2245                 struct atm_vcc *vcc, struct atm_qos *qos)
2246{
2247        int error;
2248
2249        if (test_bit(VCF_TX, &vc->flags))
2250                return -EBUSY;
2251
2252        switch (qos->txtp.traffic_class) {
2253                case ATM_CBR:
2254                        vc->class = SCHED_CBR;
2255                        break;
2256
2257                case ATM_UBR:
2258                        vc->class = SCHED_UBR;
2259                        break;
2260
2261                case ATM_VBR:
2262                case ATM_ABR:
2263                default:
2264                        return -EPROTONOSUPPORT;
2265        }
2266
2267        vc->scq = alloc_scq(card, vc->class);
2268        if (!vc->scq) {
2269                printk("%s: can't get SCQ.\n", card->name);
2270                return -ENOMEM;
2271        }
2272
2273        vc->scq->scd = get_free_scd(card, vc);
2274        if (vc->scq->scd == 0) {
2275                printk("%s: no SCD available.\n", card->name);
2276                free_scq(card, vc->scq);
2277                return -ENOMEM;
2278        }
2279
2280        fill_scd(card, vc->scq, vc->class);
2281
2282        if (set_tct(card, vc)) {
2283                printk("%s: class %d not supported.\n",
2284                       card->name, qos->txtp.traffic_class);
2285
2286                card->scd2vc[vc->scd_index] = NULL;
2287                free_scq(card, vc->scq);
2288                return -EPROTONOSUPPORT;
2289        }
2290
2291        switch (vc->class) {
2292                case SCHED_CBR:
2293                        error = idt77252_init_cbr(card, vc, vcc, qos);
2294                        if (error) {
2295                                card->scd2vc[vc->scd_index] = NULL;
2296                                free_scq(card, vc->scq);
2297                                return error;
2298                        }
2299
2300                        clear_bit(VCF_IDLE, &vc->flags);
2301                        writel(TCMDQ_START | vc->index, SAR_REG_TCMDQ);
2302                        break;
2303
2304                case SCHED_UBR:
2305                        error = idt77252_init_ubr(card, vc, vcc, qos);
2306                        if (error) {
2307                                card->scd2vc[vc->scd_index] = NULL;
2308                                free_scq(card, vc->scq);
2309                                return error;
2310                        }
2311
2312                        set_bit(VCF_IDLE, &vc->flags);
2313                        break;
2314        }
2315
2316        vc->tx_vcc = vcc;
2317        set_bit(VCF_TX, &vc->flags);
2318        return 0;
2319}
2320
2321static int
2322idt77252_init_rx(struct idt77252_dev *card, struct vc_map *vc,
2323                 struct atm_vcc *vcc, struct atm_qos *qos)
2324{
2325        unsigned long flags;
2326        unsigned long addr;
2327        u32 rcte = 0;
2328
2329        if (test_bit(VCF_RX, &vc->flags))
2330                return -EBUSY;
2331
2332        vc->rx_vcc = vcc;
2333        set_bit(VCF_RX, &vc->flags);
2334
2335        if ((vcc->vci == 3) || (vcc->vci == 4))
2336                return 0;
2337
2338        flush_rx_pool(card, &vc->rcv.rx_pool);
2339
2340        rcte |= SAR_RCTE_CONNECTOPEN;
2341        rcte |= SAR_RCTE_RAWCELLINTEN;
2342
2343        switch (qos->aal) {
2344                case ATM_AAL0:
2345                        rcte |= SAR_RCTE_RCQ;
2346                        break;
2347                case ATM_AAL1:
2348                        rcte |= SAR_RCTE_OAM; /* Let SAR drop Video */
2349                        break;
2350                case ATM_AAL34:
2351                        rcte |= SAR_RCTE_AAL34;
2352                        break;
2353                case ATM_AAL5:
2354                        rcte |= SAR_RCTE_AAL5;
2355                        break;
2356                default:
2357                        rcte |= SAR_RCTE_RCQ;
2358                        break;
2359        }
2360
2361        if (qos->aal != ATM_AAL5)
2362                rcte |= SAR_RCTE_FBP_1;
2363        else if (qos->rxtp.max_sdu > SAR_FB_SIZE_2)
2364                rcte |= SAR_RCTE_FBP_3;
2365        else if (qos->rxtp.max_sdu > SAR_FB_SIZE_1)
2366                rcte |= SAR_RCTE_FBP_2;
2367        else if (qos->rxtp.max_sdu > SAR_FB_SIZE_0)
2368                rcte |= SAR_RCTE_FBP_1;
2369        else
2370                rcte |= SAR_RCTE_FBP_01;
2371
2372        addr = card->rct_base + (vc->index << 2);
2373
2374        OPRINTK("%s: writing RCT at 0x%lx\n", card->name, addr);
2375        write_sram(card, addr, rcte);
2376
2377        spin_lock_irqsave(&card->cmd_lock, flags);
2378        writel(SAR_CMD_OPEN_CONNECTION | (addr << 2), SAR_REG_CMD);
2379        waitfor_idle(card);
2380        spin_unlock_irqrestore(&card->cmd_lock, flags);
2381
2382        return 0;
2383}
2384
2385static int
2386idt77252_open(struct atm_vcc *vcc)
2387{
2388        struct atm_dev *dev = vcc->dev;
2389        struct idt77252_dev *card = dev->dev_data;
2390        struct vc_map *vc;
2391        unsigned int index;
2392        unsigned int inuse;
2393        int error;
2394        int vci = vcc->vci;
2395        short vpi = vcc->vpi;
2396
2397        if (vpi == ATM_VPI_UNSPEC || vci == ATM_VCI_UNSPEC)
2398                return 0;
2399
2400        if (vpi >= (1 << card->vpibits)) {
2401                printk("%s: unsupported VPI: %d\n", card->name, vpi);
2402                return -EINVAL;
2403        }
2404
2405        if (vci >= (1 << card->vcibits)) {
2406                printk("%s: unsupported VCI: %d\n", card->name, vci);
2407                return -EINVAL;
2408        }
2409
2410        set_bit(ATM_VF_ADDR, &vcc->flags);
2411
2412        mutex_lock(&card->mutex);
2413
2414        OPRINTK("%s: opening vpi.vci: %d.%d\n", card->name, vpi, vci);
2415
2416        switch (vcc->qos.aal) {
2417        case ATM_AAL0:
2418        case ATM_AAL1:
2419        case ATM_AAL5:
2420                break;
2421        default:
2422                printk("%s: Unsupported AAL: %d\n", card->name, vcc->qos.aal);
2423                mutex_unlock(&card->mutex);
2424                return -EPROTONOSUPPORT;
2425        }
2426
2427        index = VPCI2VC(card, vpi, vci);
2428        if (!card->vcs[index]) {
2429                card->vcs[index] = kzalloc(sizeof(struct vc_map), GFP_KERNEL);
2430                if (!card->vcs[index]) {
2431                        printk("%s: can't alloc vc in open()\n", card->name);
2432                        mutex_unlock(&card->mutex);
2433                        return -ENOMEM;
2434                }
2435                card->vcs[index]->card = card;
2436                card->vcs[index]->index = index;
2437
2438                spin_lock_init(&card->vcs[index]->lock);
2439        }
2440        vc = card->vcs[index];
2441
2442        vcc->dev_data = vc;
2443
2444        IPRINTK("%s: idt77252_open: vc = %d (%d.%d) %s/%s (max RX SDU: %u)\n",
2445                card->name, vc->index, vcc->vpi, vcc->vci,
2446                vcc->qos.rxtp.traffic_class != ATM_NONE ? "rx" : "--",
2447                vcc->qos.txtp.traffic_class != ATM_NONE ? "tx" : "--",
2448                vcc->qos.rxtp.max_sdu);
2449
2450        inuse = 0;
2451        if (vcc->qos.txtp.traffic_class != ATM_NONE &&
2452            test_bit(VCF_TX, &vc->flags))
2453                inuse = 1;
2454        if (vcc->qos.rxtp.traffic_class != ATM_NONE &&
2455            test_bit(VCF_RX, &vc->flags))
2456                inuse += 2;
2457
2458        if (inuse) {
2459                printk("%s: %s vci already in use.\n", card->name,
2460                       inuse == 1 ? "tx" : inuse == 2 ? "rx" : "tx and rx");
2461                mutex_unlock(&card->mutex);
2462                return -EADDRINUSE;
2463        }
2464
2465        if (vcc->qos.txtp.traffic_class != ATM_NONE) {
2466                error = idt77252_init_tx(card, vc, vcc, &vcc->qos);
2467                if (error) {
2468                        mutex_unlock(&card->mutex);
2469                        return error;
2470                }
2471        }
2472
2473        if (vcc->qos.rxtp.traffic_class != ATM_NONE) {
2474                error = idt77252_init_rx(card, vc, vcc, &vcc->qos);
2475                if (error) {
2476                        mutex_unlock(&card->mutex);
2477                        return error;
2478                }
2479        }
2480
2481        set_bit(ATM_VF_READY, &vcc->flags);
2482
2483        mutex_unlock(&card->mutex);
2484        return 0;
2485}
2486
2487static void
2488idt77252_close(struct atm_vcc *vcc)
2489{
2490        struct atm_dev *dev = vcc->dev;
2491        struct idt77252_dev *card = dev->dev_data;
2492        struct vc_map *vc = vcc->dev_data;
2493        unsigned long flags;
2494        unsigned long addr;
2495        unsigned long timeout;
2496
2497        mutex_lock(&card->mutex);
2498
2499        IPRINTK("%s: idt77252_close: vc = %d (%d.%d)\n",
2500                card->name, vc->index, vcc->vpi, vcc->vci);
2501
2502        clear_bit(ATM_VF_READY, &vcc->flags);
2503
2504        if (vcc->qos.rxtp.traffic_class != ATM_NONE) {
2505
2506                spin_lock_irqsave(&vc->lock, flags);
2507                clear_bit(VCF_RX, &vc->flags);
2508                vc->rx_vcc = NULL;
2509                spin_unlock_irqrestore(&vc->lock, flags);
2510
2511                if ((vcc->vci == 3) || (vcc->vci == 4))
2512                        goto done;
2513
2514                addr = card->rct_base + vc->index * SAR_SRAM_RCT_SIZE;
2515
2516                spin_lock_irqsave(&card->cmd_lock, flags);
2517                writel(SAR_CMD_CLOSE_CONNECTION | (addr << 2), SAR_REG_CMD);
2518                waitfor_idle(card);
2519                spin_unlock_irqrestore(&card->cmd_lock, flags);
2520
2521                if (skb_queue_len(&vc->rcv.rx_pool.queue) != 0) {
2522                        DPRINTK("%s: closing a VC with pending rx buffers.\n",
2523                                card->name);
2524
2525                        recycle_rx_pool_skb(card, &vc->rcv.rx_pool);
2526                }
2527        }
2528
2529done:
2530        if (vcc->qos.txtp.traffic_class != ATM_NONE) {
2531
2532                spin_lock_irqsave(&vc->lock, flags);
2533                clear_bit(VCF_TX, &vc->flags);
2534                clear_bit(VCF_IDLE, &vc->flags);
2535                clear_bit(VCF_RSV, &vc->flags);
2536                vc->tx_vcc = NULL;
2537
2538                if (vc->estimator) {
2539                        del_timer(&vc->estimator->timer);
2540                        kfree(vc->estimator);
2541                        vc->estimator = NULL;
2542                }
2543                spin_unlock_irqrestore(&vc->lock, flags);
2544
2545                timeout = 5 * 1000;
2546                while (atomic_read(&vc->scq->used) > 0) {
2547                        timeout = msleep_interruptible(timeout);
2548                        if (!timeout) {
2549                                pr_warn("%s: SCQ drain timeout: %u used\n",
2550                                        card->name, atomic_read(&vc->scq->used));
2551                                break;
2552                        }
2553                }
2554
2555                writel(TCMDQ_HALT | vc->index, SAR_REG_TCMDQ);
2556                clear_scd(card, vc->scq, vc->class);
2557
2558                if (vc->class == SCHED_CBR) {
2559                        clear_tst(card, vc);
2560                        card->tst_free += vc->ntste;
2561                        vc->ntste = 0;
2562                }
2563
2564                card->scd2vc[vc->scd_index] = NULL;
2565                free_scq(card, vc->scq);
2566        }
2567
2568        mutex_unlock(&card->mutex);
2569}
2570
2571static int
2572idt77252_change_qos(struct atm_vcc *vcc, struct atm_qos *qos, int flags)
2573{
2574        struct atm_dev *dev = vcc->dev;
2575        struct idt77252_dev *card = dev->dev_data;
2576        struct vc_map *vc = vcc->dev_data;
2577        int error = 0;
2578
2579        mutex_lock(&card->mutex);
2580
2581        if (qos->txtp.traffic_class != ATM_NONE) {
2582                if (!test_bit(VCF_TX, &vc->flags)) {
2583                        error = idt77252_init_tx(card, vc, vcc, qos);
2584                        if (error)
2585                                goto out;
2586                } else {
2587                        switch (qos->txtp.traffic_class) {
2588                        case ATM_CBR:
2589                                error = idt77252_init_cbr(card, vc, vcc, qos);
2590                                if (error)
2591                                        goto out;
2592                                break;
2593
2594                        case ATM_UBR:
2595                                error = idt77252_init_ubr(card, vc, vcc, qos);
2596                                if (error)
2597                                        goto out;
2598
2599                                if (!test_bit(VCF_IDLE, &vc->flags)) {
2600                                        writel(TCMDQ_LACR | (vc->lacr << 16) |
2601                                               vc->index, SAR_REG_TCMDQ);
2602                                }
2603                                break;
2604
2605                        case ATM_VBR:
2606                        case ATM_ABR:
2607                                error = -EOPNOTSUPP;
2608                                goto out;
2609                        }
2610                }
2611        }
2612
2613        if ((qos->rxtp.traffic_class != ATM_NONE) &&
2614            !test_bit(VCF_RX, &vc->flags)) {
2615                error = idt77252_init_rx(card, vc, vcc, qos);
2616                if (error)
2617                        goto out;
2618        }
2619
2620        memcpy(&vcc->qos, qos, sizeof(struct atm_qos));
2621
2622        set_bit(ATM_VF_HASQOS, &vcc->flags);
2623
2624out:
2625        mutex_unlock(&card->mutex);
2626        return error;
2627}
2628
2629static int
2630idt77252_proc_read(struct atm_dev *dev, loff_t * pos, char *page)
2631{
2632        struct idt77252_dev *card = dev->dev_data;
2633        int i, left;
2634
2635        left = (int) *pos;
2636        if (!left--)
2637                return sprintf(page, "IDT77252 Interrupts:\n");
2638        if (!left--)
2639                return sprintf(page, "TSIF:  %lu\n", card->irqstat[15]);
2640        if (!left--)
2641                return sprintf(page, "TXICP: %lu\n", card->irqstat[14]);
2642        if (!left--)
2643                return sprintf(page, "TSQF:  %lu\n", card->irqstat[12]);
2644        if (!left--)
2645                return sprintf(page, "TMROF: %lu\n", card->irqstat[11]);
2646        if (!left--)
2647                return sprintf(page, "PHYI:  %lu\n", card->irqstat[10]);
2648        if (!left--)
2649                return sprintf(page, "FBQ3A: %lu\n", card->irqstat[8]);
2650        if (!left--)
2651                return sprintf(page, "FBQ2A: %lu\n", card->irqstat[7]);
2652        if (!left--)
2653                return sprintf(page, "RSQF:  %lu\n", card->irqstat[6]);
2654        if (!left--)
2655                return sprintf(page, "EPDU:  %lu\n", card->irqstat[5]);
2656        if (!left--)
2657                return sprintf(page, "RAWCF: %lu\n", card->irqstat[4]);
2658        if (!left--)
2659                return sprintf(page, "FBQ1A: %lu\n", card->irqstat[3]);
2660        if (!left--)
2661                return sprintf(page, "FBQ0A: %lu\n", card->irqstat[2]);
2662        if (!left--)
2663                return sprintf(page, "RSQAF: %lu\n", card->irqstat[1]);
2664        if (!left--)
2665                return sprintf(page, "IDT77252 Transmit Connection Table:\n");
2666
2667        for (i = 0; i < card->tct_size; i++) {
2668                unsigned long tct;
2669                struct atm_vcc *vcc;
2670                struct vc_map *vc;
2671                char *p;
2672
2673                vc = card->vcs[i];
2674                if (!vc)
2675                        continue;
2676
2677                vcc = NULL;
2678                if (vc->tx_vcc)
2679                        vcc = vc->tx_vcc;
2680                if (!vcc)
2681                        continue;
2682                if (left--)
2683                        continue;
2684
2685                p = page;
2686                p += sprintf(p, "  %4u: %u.%u: ", i, vcc->vpi, vcc->vci);
2687                tct = (unsigned long) (card->tct_base + i * SAR_SRAM_TCT_SIZE);
2688
2689                for (i = 0; i < 8; i++)
2690                        p += sprintf(p, " %08x", read_sram(card, tct + i));
2691                p += sprintf(p, "\n");
2692                return p - page;
2693        }
2694        return 0;
2695}
2696
2697/*****************************************************************************/
2698/*                                                                           */
2699/* Interrupt handler                                                         */
2700/*                                                                           */
2701/*****************************************************************************/
2702
2703static void
2704idt77252_collect_stat(struct idt77252_dev *card)
2705{
2706        (void) readl(SAR_REG_CDC);
2707        (void) readl(SAR_REG_VPEC);
2708        (void) readl(SAR_REG_ICC);
2709
2710}
2711
2712static irqreturn_t
2713idt77252_interrupt(int irq, void *dev_id)
2714{
2715        struct idt77252_dev *card = dev_id;
2716        u32 stat;
2717
2718        stat = readl(SAR_REG_STAT) & 0xffff;
2719        if (!stat)      /* no interrupt for us */
2720                return IRQ_NONE;
2721
2722        if (test_and_set_bit(IDT77252_BIT_INTERRUPT, &card->flags)) {
2723                printk("%s: Re-entering irq_handler()\n", card->name);
2724                goto out;
2725        }
2726
2727        writel(stat, SAR_REG_STAT);     /* reset interrupt */
2728
2729        if (stat & SAR_STAT_TSIF) {     /* entry written to TSQ  */
2730                INTPRINTK("%s: TSIF\n", card->name);
2731                card->irqstat[15]++;
2732                idt77252_tx(card);
2733        }
2734        if (stat & SAR_STAT_TXICP) {    /* Incomplete CS-PDU has  */
2735                INTPRINTK("%s: TXICP\n", card->name);
2736                card->irqstat[14]++;
2737#ifdef CONFIG_ATM_IDT77252_DEBUG
2738                idt77252_tx_dump(card);
2739#endif
2740        }
2741        if (stat & SAR_STAT_TSQF) {     /* TSQ 7/8 full           */
2742                INTPRINTK("%s: TSQF\n", card->name);
2743                card->irqstat[12]++;
2744                idt77252_tx(card);
2745        }
2746        if (stat & SAR_STAT_TMROF) {    /* Timer overflow         */
2747                INTPRINTK("%s: TMROF\n", card->name);
2748                card->irqstat[11]++;
2749                idt77252_collect_stat(card);
2750        }
2751
2752        if (stat & SAR_STAT_EPDU) {     /* Got complete CS-PDU    */
2753                INTPRINTK("%s: EPDU\n", card->name);
2754                card->irqstat[5]++;
2755                idt77252_rx(card);
2756        }
2757        if (stat & SAR_STAT_RSQAF) {    /* RSQ is 7/8 full        */
2758                INTPRINTK("%s: RSQAF\n", card->name);
2759                card->irqstat[1]++;
2760                idt77252_rx(card);
2761        }
2762        if (stat & SAR_STAT_RSQF) {     /* RSQ is full            */
2763                INTPRINTK("%s: RSQF\n", card->name);
2764                card->irqstat[6]++;
2765                idt77252_rx(card);
2766        }
2767        if (stat & SAR_STAT_RAWCF) {    /* Raw cell received      */
2768                INTPRINTK("%s: RAWCF\n", card->name);
2769                card->irqstat[4]++;
2770                idt77252_rx_raw(card);
2771        }
2772
2773        if (stat & SAR_STAT_PHYI) {     /* PHY device interrupt   */
2774                INTPRINTK("%s: PHYI", card->name);
2775                card->irqstat[10]++;
2776                if (card->atmdev->phy && card->atmdev->phy->interrupt)
2777                        card->atmdev->phy->interrupt(card->atmdev);
2778        }
2779
2780        if (stat & (SAR_STAT_FBQ0A | SAR_STAT_FBQ1A |
2781                    SAR_STAT_FBQ2A | SAR_STAT_FBQ3A)) {
2782
2783                writel(readl(SAR_REG_CFG) & ~(SAR_CFG_FBIE), SAR_REG_CFG);
2784
2785                INTPRINTK("%s: FBQA: %04x\n", card->name, stat);
2786
2787                if (stat & SAR_STAT_FBQ0A)
2788                        card->irqstat[2]++;
2789                if (stat & SAR_STAT_FBQ1A)
2790                        card->irqstat[3]++;
2791                if (stat & SAR_STAT_FBQ2A)
2792                        card->irqstat[7]++;
2793                if (stat & SAR_STAT_FBQ3A)
2794                        card->irqstat[8]++;
2795
2796                schedule_work(&card->tqueue);
2797        }
2798
2799out:
2800        clear_bit(IDT77252_BIT_INTERRUPT, &card->flags);
2801        return IRQ_HANDLED;
2802}
2803
2804static void
2805idt77252_softint(struct work_struct *work)
2806{
2807        struct idt77252_dev *card =
2808                container_of(work, struct idt77252_dev, tqueue);
2809        u32 stat;
2810        int done;
2811
2812        for (done = 1; ; done = 1) {
2813                stat = readl(SAR_REG_STAT) >> 16;
2814
2815                if ((stat & 0x0f) < SAR_FBQ0_HIGH) {
2816                        add_rx_skb(card, 0, SAR_FB_SIZE_0, 32);
2817                        done = 0;
2818                }
2819
2820                stat >>= 4;
2821                if ((stat & 0x0f) < SAR_FBQ1_HIGH) {
2822                        add_rx_skb(card, 1, SAR_FB_SIZE_1, 32);
2823                        done = 0;
2824                }
2825
2826                stat >>= 4;
2827                if ((stat & 0x0f) < SAR_FBQ2_HIGH) {
2828                        add_rx_skb(card, 2, SAR_FB_SIZE_2, 32);
2829                        done = 0;
2830                }
2831
2832                stat >>= 4;
2833                if ((stat & 0x0f) < SAR_FBQ3_HIGH) {
2834                        add_rx_skb(card, 3, SAR_FB_SIZE_3, 32);
2835                        done = 0;
2836                }
2837
2838                if (done)
2839                        break;
2840        }
2841
2842        writel(readl(SAR_REG_CFG) | SAR_CFG_FBIE, SAR_REG_CFG);
2843}
2844
2845
2846static int
2847open_card_oam(struct idt77252_dev *card)
2848{
2849        unsigned long flags;
2850        unsigned long addr;
2851        struct vc_map *vc;
2852        int vpi, vci;
2853        int index;
2854        u32 rcte;
2855
2856        for (vpi = 0; vpi < (1 << card->vpibits); vpi++) {
2857                for (vci = 3; vci < 5; vci++) {
2858                        index = VPCI2VC(card, vpi, vci);
2859
2860                        vc = kzalloc(sizeof(struct vc_map), GFP_KERNEL);
2861                        if (!vc) {
2862                                printk("%s: can't alloc vc\n", card->name);
2863                                return -ENOMEM;
2864                        }
2865                        vc->index = index;
2866                        card->vcs[index] = vc;
2867
2868                        flush_rx_pool(card, &vc->rcv.rx_pool);
2869
2870                        rcte = SAR_RCTE_CONNECTOPEN |
2871                               SAR_RCTE_RAWCELLINTEN |
2872                               SAR_RCTE_RCQ |
2873                               SAR_RCTE_FBP_1;
2874
2875                        addr = card->rct_base + (vc->index << 2);
2876                        write_sram(card, addr, rcte);
2877
2878                        spin_lock_irqsave(&card->cmd_lock, flags);
2879                        writel(SAR_CMD_OPEN_CONNECTION | (addr << 2),
2880                               SAR_REG_CMD);
2881                        waitfor_idle(card);
2882                        spin_unlock_irqrestore(&card->cmd_lock, flags);
2883                }
2884        }
2885
2886        return 0;
2887}
2888
2889static void
2890close_card_oam(struct idt77252_dev *card)
2891{
2892        unsigned long flags;
2893        unsigned long addr;
2894        struct vc_map *vc;
2895        int vpi, vci;
2896        int index;
2897
2898        for (vpi = 0; vpi < (1 << card->vpibits); vpi++) {
2899                for (vci = 3; vci < 5; vci++) {
2900                        index = VPCI2VC(card, vpi, vci);
2901                        vc = card->vcs[index];
2902
2903                        addr = card->rct_base + vc->index * SAR_SRAM_RCT_SIZE;
2904
2905                        spin_lock_irqsave(&card->cmd_lock, flags);
2906                        writel(SAR_CMD_CLOSE_CONNECTION | (addr << 2),
2907                               SAR_REG_CMD);
2908                        waitfor_idle(card);
2909                        spin_unlock_irqrestore(&card->cmd_lock, flags);
2910
2911                        if (skb_queue_len(&vc->rcv.rx_pool.queue) != 0) {
2912                                DPRINTK("%s: closing a VC "
2913                                        "with pending rx buffers.\n",
2914                                        card->name);
2915
2916                                recycle_rx_pool_skb(card, &vc->rcv.rx_pool);
2917                        }
2918                }
2919        }
2920}
2921
2922static int
2923open_card_ubr0(struct idt77252_dev *card)
2924{
2925        struct vc_map *vc;
2926
2927        vc = kzalloc(sizeof(struct vc_map), GFP_KERNEL);
2928        if (!vc) {
2929                printk("%s: can't alloc vc\n", card->name);
2930                return -ENOMEM;
2931        }
2932        card->vcs[0] = vc;
2933        vc->class = SCHED_UBR0;
2934
2935        vc->scq = alloc_scq(card, vc->class);
2936        if (!vc->scq) {
2937                printk("%s: can't get SCQ.\n", card->name);
2938                return -ENOMEM;
2939        }
2940
2941        card->scd2vc[0] = vc;
2942        vc->scd_index = 0;
2943        vc->scq->scd = card->scd_base;
2944
2945        fill_scd(card, vc->scq, vc->class);
2946
2947        write_sram(card, card->tct_base + 0, TCT_UBR | card->scd_base);
2948        write_sram(card, card->tct_base + 1, 0);
2949        write_sram(card, card->tct_base + 2, 0);
2950        write_sram(card, card->tct_base + 3, 0);
2951        write_sram(card, card->tct_base + 4, 0);
2952        write_sram(card, card->tct_base + 5, 0);
2953        write_sram(card, card->tct_base + 6, 0);
2954        write_sram(card, card->tct_base + 7, TCT_FLAG_UBR);
2955
2956        clear_bit(VCF_IDLE, &vc->flags);
2957        writel(TCMDQ_START | 0, SAR_REG_TCMDQ);
2958        return 0;
2959}
2960
2961static int
2962idt77252_dev_open(struct idt77252_dev *card)
2963{
2964        u32 conf;
2965
2966        if (!test_bit(IDT77252_BIT_INIT, &card->flags)) {
2967                printk("%s: SAR not yet initialized.\n", card->name);
2968                return -1;
2969        }
2970
2971        conf = SAR_CFG_RXPTH|   /* enable receive path                  */
2972            SAR_RX_DELAY |      /* interrupt on complete PDU            */
2973            SAR_CFG_RAWIE |     /* interrupt enable on raw cells        */
2974            SAR_CFG_RQFIE |     /* interrupt on RSQ almost full         */
2975            SAR_CFG_TMOIE |     /* interrupt on timer overflow          */
2976            SAR_CFG_FBIE |      /* interrupt on low free buffers        */
2977            SAR_CFG_TXEN |      /* transmit operation enable            */
2978            SAR_CFG_TXINT |     /* interrupt on transmit status         */
2979            SAR_CFG_TXUIE |     /* interrupt on transmit underrun       */
2980            SAR_CFG_TXSFI |     /* interrupt on TSQ almost full         */
2981            SAR_CFG_PHYIE       /* enable PHY interrupts                */
2982            ;
2983
2984#ifdef CONFIG_ATM_IDT77252_RCV_ALL
2985        /* Test RAW cell receive. */
2986        conf |= SAR_CFG_VPECA;
2987#endif
2988
2989        writel(readl(SAR_REG_CFG) | conf, SAR_REG_CFG);
2990
2991        if (open_card_oam(card)) {
2992                printk("%s: Error initializing OAM.\n", card->name);
2993                return -1;
2994        }
2995
2996        if (open_card_ubr0(card)) {
2997                printk("%s: Error initializing UBR0.\n", card->name);
2998                return -1;
2999        }
3000
3001        IPRINTK("%s: opened IDT77252 ABR SAR.\n", card->name);
3002        return 0;
3003}
3004
3005static void idt77252_dev_close(struct atm_dev *dev)
3006{
3007        struct idt77252_dev *card = dev->dev_data;
3008        u32 conf;
3009
3010        close_card_oam(card);
3011
3012        conf = SAR_CFG_RXPTH |  /* enable receive path           */
3013            SAR_RX_DELAY |      /* interrupt on complete PDU     */
3014            SAR_CFG_RAWIE |     /* interrupt enable on raw cells */
3015            SAR_CFG_RQFIE |     /* interrupt on RSQ almost full  */
3016            SAR_CFG_TMOIE |     /* interrupt on timer overflow   */
3017            SAR_CFG_FBIE |      /* interrupt on low free buffers */
3018            SAR_CFG_TXEN |      /* transmit operation enable     */
3019            SAR_CFG_TXINT |     /* interrupt on transmit status  */
3020            SAR_CFG_TXUIE |     /* interrupt on xmit underrun    */
3021            SAR_CFG_TXSFI       /* interrupt on TSQ almost full  */
3022            ;
3023
3024        writel(readl(SAR_REG_CFG) & ~(conf), SAR_REG_CFG);
3025
3026        DIPRINTK("%s: closed IDT77252 ABR SAR.\n", card->name);
3027}
3028
3029
3030/*****************************************************************************/
3031/*                                                                           */
3032/* Initialisation and Deinitialization of IDT77252                           */
3033/*                                                                           */
3034/*****************************************************************************/
3035
3036
3037static void
3038deinit_card(struct idt77252_dev *card)
3039{
3040        struct sk_buff *skb;
3041        int i, j;
3042
3043        if (!test_bit(IDT77252_BIT_INIT, &card->flags)) {
3044                printk("%s: SAR not yet initialized.\n", card->name);
3045                return;
3046        }
3047        DIPRINTK("idt77252: deinitialize card %u\n", card->index);
3048
3049        writel(0, SAR_REG_CFG);
3050
3051        if (card->atmdev)
3052                atm_dev_deregister(card->atmdev);
3053
3054        for (i = 0; i < 4; i++) {
3055                for (j = 0; j < FBQ_SIZE; j++) {
3056                        skb = card->sbpool[i].skb[j];
3057                        if (skb) {
3058                                dma_unmap_single(&card->pcidev->dev,
3059                                                 IDT77252_PRV_PADDR(skb),
3060                                                 (skb_end_pointer(skb) -
3061                                                  skb->data),
3062                                                 DMA_FROM_DEVICE);
3063                                card->sbpool[i].skb[j] = NULL;
3064                                dev_kfree_skb(skb);
3065                        }
3066                }
3067        }
3068
3069        vfree(card->soft_tst);
3070
3071        vfree(card->scd2vc);
3072
3073        vfree(card->vcs);
3074
3075        if (card->raw_cell_hnd) {
3076                dma_free_coherent(&card->pcidev->dev, 2 * sizeof(u32),
3077                                  card->raw_cell_hnd, card->raw_cell_paddr);
3078        }
3079
3080        if (card->rsq.base) {
3081                DIPRINTK("%s: Release RSQ ...\n", card->name);
3082                deinit_rsq(card);
3083        }
3084
3085        if (card->tsq.base) {
3086                DIPRINTK("%s: Release TSQ ...\n", card->name);
3087                deinit_tsq(card);
3088        }
3089
3090        DIPRINTK("idt77252: Release IRQ.\n");
3091        free_irq(card->pcidev->irq, card);
3092
3093        for (i = 0; i < 4; i++) {
3094                if (card->fbq[i])
3095                        iounmap(card->fbq[i]);
3096        }
3097
3098        if (card->membase)
3099                iounmap(card->membase);
3100
3101        clear_bit(IDT77252_BIT_INIT, &card->flags);
3102        DIPRINTK("%s: Card deinitialized.\n", card->name);
3103}
3104
3105
3106static void init_sram(struct idt77252_dev *card)
3107{
3108        int i;
3109
3110        for (i = 0; i < card->sramsize; i += 4)
3111                write_sram(card, (i >> 2), 0);
3112
3113        /* set SRAM layout for THIS card */
3114        if (card->sramsize == (512 * 1024)) {
3115                card->tct_base = SAR_SRAM_TCT_128_BASE;
3116                card->tct_size = (SAR_SRAM_TCT_128_TOP - card->tct_base + 1)
3117                    / SAR_SRAM_TCT_SIZE;
3118                card->rct_base = SAR_SRAM_RCT_128_BASE;
3119                card->rct_size = (SAR_SRAM_RCT_128_TOP - card->rct_base + 1)
3120                    / SAR_SRAM_RCT_SIZE;
3121                card->rt_base = SAR_SRAM_RT_128_BASE;
3122                card->scd_base = SAR_SRAM_SCD_128_BASE;
3123                card->scd_size = (SAR_SRAM_SCD_128_TOP - card->scd_base + 1)
3124                    / SAR_SRAM_SCD_SIZE;
3125                card->tst[0] = SAR_SRAM_TST1_128_BASE;
3126                card->tst[1] = SAR_SRAM_TST2_128_BASE;
3127                card->tst_size = SAR_SRAM_TST1_128_TOP - card->tst[0] + 1;
3128                card->abrst_base = SAR_SRAM_ABRSTD_128_BASE;
3129                card->abrst_size = SAR_ABRSTD_SIZE_8K;
3130                card->fifo_base = SAR_SRAM_FIFO_128_BASE;
3131                card->fifo_size = SAR_RXFD_SIZE_32K;
3132        } else {
3133                card->tct_base = SAR_SRAM_TCT_32_BASE;
3134                card->tct_size = (SAR_SRAM_TCT_32_TOP - card->tct_base + 1)
3135                    / SAR_SRAM_TCT_SIZE;
3136                card->rct_base = SAR_SRAM_RCT_32_BASE;
3137                card->rct_size = (SAR_SRAM_RCT_32_TOP - card->rct_base + 1)
3138                    / SAR_SRAM_RCT_SIZE;
3139                card->rt_base = SAR_SRAM_RT_32_BASE;
3140                card->scd_base = SAR_SRAM_SCD_32_BASE;
3141                card->scd_size = (SAR_SRAM_SCD_32_TOP - card->scd_base + 1)
3142                    / SAR_SRAM_SCD_SIZE;
3143                card->tst[0] = SAR_SRAM_TST1_32_BASE;
3144                card->tst[1] = SAR_SRAM_TST2_32_BASE;
3145                card->tst_size = (SAR_SRAM_TST1_32_TOP - card->tst[0] + 1);
3146                card->abrst_base = SAR_SRAM_ABRSTD_32_BASE;
3147                card->abrst_size = SAR_ABRSTD_SIZE_1K;
3148                card->fifo_base = SAR_SRAM_FIFO_32_BASE;
3149                card->fifo_size = SAR_RXFD_SIZE_4K;
3150        }
3151
3152        /* Initialize TCT */
3153        for (i = 0; i < card->tct_size; i++) {
3154                write_sram(card, i * SAR_SRAM_TCT_SIZE + 0, 0);
3155                write_sram(card, i * SAR_SRAM_TCT_SIZE + 1, 0);
3156                write_sram(card, i * SAR_SRAM_TCT_SIZE + 2, 0);
3157                write_sram(card, i * SAR_SRAM_TCT_SIZE + 3, 0);
3158                write_sram(card, i * SAR_SRAM_TCT_SIZE + 4, 0);
3159                write_sram(card, i * SAR_SRAM_TCT_SIZE + 5, 0);
3160                write_sram(card, i * SAR_SRAM_TCT_SIZE + 6, 0);
3161                write_sram(card, i * SAR_SRAM_TCT_SIZE + 7, 0);
3162        }
3163
3164        /* Initialize RCT */
3165        for (i = 0; i < card->rct_size; i++) {
3166                write_sram(card, card->rct_base + i * SAR_SRAM_RCT_SIZE,
3167                                    (u32) SAR_RCTE_RAWCELLINTEN);
3168                write_sram(card, card->rct_base + i * SAR_SRAM_RCT_SIZE + 1,
3169                                    (u32) 0);
3170                write_sram(card, card->rct_base + i * SAR_SRAM_RCT_SIZE + 2,
3171                                    (u32) 0);
3172                write_sram(card, card->rct_base + i * SAR_SRAM_RCT_SIZE + 3,
3173                                    (u32) 0xffffffff);
3174        }
3175
3176        writel((SAR_FBQ0_LOW << 28) | (SAR_FB_SIZE_0 / 48), SAR_REG_FBQS0);
3177        writel((SAR_FBQ1_LOW << 28) | (SAR_FB_SIZE_1 / 48), SAR_REG_FBQS1);
3178        writel((SAR_FBQ2_LOW << 28) | (SAR_FB_SIZE_2 / 48), SAR_REG_FBQS2);
3179        writel((SAR_FBQ3_LOW << 28) | (SAR_FB_SIZE_3 / 48), SAR_REG_FBQS3);
3180
3181        /* Initialize rate table  */
3182        for (i = 0; i < 256; i++) {
3183                write_sram(card, card->rt_base + i, log_to_rate[i]);
3184        }
3185
3186        for (i = 0; i < 128; i++) {
3187                unsigned int tmp;
3188
3189                tmp  = rate_to_log[(i << 2) + 0] << 0;
3190                tmp |= rate_to_log[(i << 2) + 1] << 8;
3191                tmp |= rate_to_log[(i << 2) + 2] << 16;
3192                tmp |= rate_to_log[(i << 2) + 3] << 24;
3193                write_sram(card, card->rt_base + 256 + i, tmp);
3194        }
3195
3196#if 0 /* Fill RDF and AIR tables. */
3197        for (i = 0; i < 128; i++) {
3198                unsigned int tmp;
3199
3200                tmp = RDF[0][(i << 1) + 0] << 16;
3201                tmp |= RDF[0][(i << 1) + 1] << 0;
3202                write_sram(card, card->rt_base + 512 + i, tmp);
3203        }
3204
3205        for (i = 0; i < 128; i++) {
3206                unsigned int tmp;
3207
3208                tmp = AIR[0][(i << 1) + 0] << 16;
3209                tmp |= AIR[0][(i << 1) + 1] << 0;
3210                write_sram(card, card->rt_base + 640 + i, tmp);
3211        }
3212#endif
3213
3214        IPRINTK("%s: initialize rate table ...\n", card->name);
3215        writel(card->rt_base << 2, SAR_REG_RTBL);
3216
3217        /* Initialize TSTs */
3218        IPRINTK("%s: initialize TST ...\n", card->name);
3219        card->tst_free = card->tst_size - 2;    /* last two are jumps */
3220
3221        for (i = card->tst[0]; i < card->tst[0] + card->tst_size - 2; i++)
3222                write_sram(card, i, TSTE_OPC_VAR);
3223        write_sram(card, i++, TSTE_OPC_JMP | (card->tst[0] << 2));
3224        idt77252_sram_write_errors = 1;
3225        write_sram(card, i++, TSTE_OPC_JMP | (card->tst[1] << 2));
3226        idt77252_sram_write_errors = 0;
3227        for (i = card->tst[1]; i < card->tst[1] + card->tst_size - 2; i++)
3228                write_sram(card, i, TSTE_OPC_VAR);
3229        write_sram(card, i++, TSTE_OPC_JMP | (card->tst[1] << 2));
3230        idt77252_sram_write_errors = 1;
3231        write_sram(card, i++, TSTE_OPC_JMP | (card->tst[0] << 2));
3232        idt77252_sram_write_errors = 0;
3233
3234        card->tst_index = 0;
3235        writel(card->tst[0] << 2, SAR_REG_TSTB);
3236
3237        /* Initialize ABRSTD and Receive FIFO */
3238        IPRINTK("%s: initialize ABRSTD ...\n", card->name);
3239        writel(card->abrst_size | (card->abrst_base << 2),
3240               SAR_REG_ABRSTD);
3241
3242        IPRINTK("%s: initialize receive fifo ...\n", card->name);
3243        writel(card->fifo_size | (card->fifo_base << 2),
3244               SAR_REG_RXFD);
3245
3246        IPRINTK("%s: SRAM initialization complete.\n", card->name);
3247}
3248
3249static int init_card(struct atm_dev *dev)
3250{
3251        struct idt77252_dev *card = dev->dev_data;
3252        struct pci_dev *pcidev = card->pcidev;
3253        unsigned long tmpl, modl;
3254        unsigned int linkrate, rsvdcr;
3255        unsigned int tst_entries;
3256        struct net_device *tmp;
3257        char tname[10];
3258
3259        u32 size;
3260        u_char pci_byte;
3261        u32 conf;
3262        int i, k;
3263
3264        if (test_bit(IDT77252_BIT_INIT, &card->flags)) {
3265                printk("Error: SAR already initialized.\n");
3266                return -1;
3267        }
3268
3269/*****************************************************************/
3270/*   P C I   C O N F I G U R A T I O N                           */
3271/*****************************************************************/
3272
3273        /* Set PCI Retry-Timeout and TRDY timeout */
3274        IPRINTK("%s: Checking PCI retries.\n", card->name);
3275        if (pci_read_config_byte(pcidev, 0x40, &pci_byte) != 0) {
3276                printk("%s: can't read PCI retry timeout.\n", card->name);
3277                deinit_card(card);
3278                return -1;
3279        }
3280        if (pci_byte != 0) {
3281                IPRINTK("%s: PCI retry timeout: %d, set to 0.\n",
3282                        card->name, pci_byte);
3283                if (pci_write_config_byte(pcidev, 0x40, 0) != 0) {
3284                        printk("%s: can't set PCI retry timeout.\n",
3285                               card->name);
3286                        deinit_card(card);
3287                        return -1;
3288                }
3289        }
3290        IPRINTK("%s: Checking PCI TRDY.\n", card->name);
3291        if (pci_read_config_byte(pcidev, 0x41, &pci_byte) != 0) {
3292                printk("%s: can't read PCI TRDY timeout.\n", card->name);
3293                deinit_card(card);
3294                return -1;
3295        }
3296        if (pci_byte != 0) {
3297                IPRINTK("%s: PCI TRDY timeout: %d, set to 0.\n",
3298                        card->name, pci_byte);
3299                if (pci_write_config_byte(pcidev, 0x41, 0) != 0) {
3300                        printk("%s: can't set PCI TRDY timeout.\n", card->name);
3301                        deinit_card(card);
3302                        return -1;
3303                }
3304        }
3305        /* Reset Timer register */
3306        if (readl(SAR_REG_STAT) & SAR_STAT_TMROF) {
3307                printk("%s: resetting timer overflow.\n", card->name);
3308                writel(SAR_STAT_TMROF, SAR_REG_STAT);
3309        }
3310        IPRINTK("%s: Request IRQ ... ", card->name);
3311        if (request_irq(pcidev->irq, idt77252_interrupt, IRQF_SHARED,
3312                        card->name, card) != 0) {
3313                printk("%s: can't allocate IRQ.\n", card->name);
3314                deinit_card(card);
3315                return -1;
3316        }
3317        IPRINTK("got %d.\n", pcidev->irq);
3318
3319/*****************************************************************/
3320/*   C H E C K   A N D   I N I T   S R A M                       */
3321/*****************************************************************/
3322
3323        IPRINTK("%s: Initializing SRAM\n", card->name);
3324
3325        /* preset size of connecton table, so that init_sram() knows about it */
3326        conf =  SAR_CFG_TX_FIFO_SIZE_9 |        /* Use maximum fifo size */
3327                SAR_CFG_RXSTQ_SIZE_8k |         /* Receive Status Queue is 8k */
3328                SAR_CFG_IDLE_CLP |              /* Set CLP on idle cells */
3329#ifndef ATM_IDT77252_SEND_IDLE
3330                SAR_CFG_NO_IDLE |               /* Do not send idle cells */
3331#endif
3332                0;
3333
3334        if (card->sramsize == (512 * 1024))
3335                conf |= SAR_CFG_CNTBL_1k;
3336        else
3337                conf |= SAR_CFG_CNTBL_512;
3338
3339        switch (vpibits) {
3340        case 0:
3341                conf |= SAR_CFG_VPVCS_0;
3342                break;
3343        default:
3344        case 1:
3345                conf |= SAR_CFG_VPVCS_1;
3346                break;
3347        case 2:
3348                conf |= SAR_CFG_VPVCS_2;
3349                break;
3350        case 8:
3351                conf |= SAR_CFG_VPVCS_8;
3352                break;
3353        }
3354
3355        writel(readl(SAR_REG_CFG) | conf, SAR_REG_CFG);
3356
3357        init_sram(card);
3358
3359/********************************************************************/
3360/*  A L L O C   R A M   A N D   S E T   V A R I O U S   T H I N G S */
3361/********************************************************************/
3362        /* Initialize TSQ */
3363        if (0 != init_tsq(card)) {
3364                deinit_card(card);
3365                return -1;
3366        }
3367        /* Initialize RSQ */
3368        if (0 != init_rsq(card)) {
3369                deinit_card(card);
3370                return -1;
3371        }
3372
3373        card->vpibits = vpibits;
3374        if (card->sramsize == (512 * 1024)) {
3375                card->vcibits = 10 - card->vpibits;
3376        } else {
3377                card->vcibits = 9 - card->vpibits;
3378        }
3379
3380        card->vcimask = 0;
3381        for (k = 0, i = 1; k < card->vcibits; k++) {
3382                card->vcimask |= i;
3383                i <<= 1;
3384        }
3385
3386        IPRINTK("%s: Setting VPI/VCI mask to zero.\n", card->name);
3387        writel(0, SAR_REG_VPM);
3388
3389        /* Little Endian Order   */
3390        writel(0, SAR_REG_GP);
3391
3392        /* Initialize RAW Cell Handle Register  */
3393        card->raw_cell_hnd = dma_alloc_coherent(&card->pcidev->dev,
3394                                                2 * sizeof(u32),
3395                                                &card->raw_cell_paddr,
3396                                                GFP_KERNEL);
3397        if (!card->raw_cell_hnd) {
3398                printk("%s: memory allocation failure.\n", card->name);
3399                deinit_card(card);
3400                return -1;
3401        }
3402        writel(card->raw_cell_paddr, SAR_REG_RAWHND);
3403        IPRINTK("%s: raw cell handle is at 0x%p.\n", card->name,
3404                card->raw_cell_hnd);
3405
3406        size = sizeof(struct vc_map *) * card->tct_size;
3407        IPRINTK("%s: allocate %d byte for VC map.\n", card->name, size);
3408        card->vcs = vzalloc(size);
3409        if (!card->vcs) {
3410                printk("%s: memory allocation failure.\n", card->name);
3411                deinit_card(card);
3412                return -1;
3413        }
3414
3415        size = sizeof(struct vc_map *) * card->scd_size;
3416        IPRINTK("%s: allocate %d byte for SCD to VC mapping.\n",
3417                card->name, size);
3418        card->scd2vc = vzalloc(size);
3419        if (!card->scd2vc) {
3420                printk("%s: memory allocation failure.\n", card->name);
3421                deinit_card(card);
3422                return -1;
3423        }
3424
3425        size = sizeof(struct tst_info) * (card->tst_size - 2);
3426        IPRINTK("%s: allocate %d byte for TST to VC mapping.\n",
3427                card->name, size);
3428        card->soft_tst = vmalloc(size);
3429        if (!card->soft_tst) {
3430                printk("%s: memory allocation failure.\n", card->name);
3431                deinit_card(card);
3432                return -1;
3433        }
3434        for (i = 0; i < card->tst_size - 2; i++) {
3435                card->soft_tst[i].tste = TSTE_OPC_VAR;
3436                card->soft_tst[i].vc = NULL;
3437        }
3438
3439        if (dev->phy == NULL) {
3440                printk("%s: No LT device defined.\n", card->name);
3441                deinit_card(card);
3442                return -1;
3443        }
3444        if (dev->phy->ioctl == NULL) {
3445                printk("%s: LT had no IOCTL function defined.\n", card->name);
3446                deinit_card(card);
3447                return -1;
3448        }
3449
3450#ifdef  CONFIG_ATM_IDT77252_USE_SUNI
3451        /*
3452         * this is a jhs hack to get around special functionality in the
3453         * phy driver for the atecom hardware; the functionality doesn't
3454         * exist in the linux atm suni driver
3455         *
3456         * it isn't the right way to do things, but as the guy from NIST
3457         * said, talking about their measurement of the fine structure
3458         * constant, "it's good enough for government work."
3459         */
3460        linkrate = 149760000;
3461#endif
3462
3463        card->link_pcr = (linkrate / 8 / 53);
3464        printk("%s: Linkrate on ATM line : %u bit/s, %u cell/s.\n",
3465               card->name, linkrate, card->link_pcr);
3466
3467#ifdef ATM_IDT77252_SEND_IDLE
3468        card->utopia_pcr = card->link_pcr;
3469#else
3470        card->utopia_pcr = (160000000 / 8 / 54);
3471#endif
3472
3473        rsvdcr = 0;
3474        if (card->utopia_pcr > card->link_pcr)
3475                rsvdcr = card->utopia_pcr - card->link_pcr;
3476
3477        tmpl = (unsigned long) rsvdcr * ((unsigned long) card->tst_size - 2);
3478        modl = tmpl % (unsigned long)card->utopia_pcr;
3479        tst_entries = (int) (tmpl / (unsigned long)card->utopia_pcr);
3480        if (modl)
3481                tst_entries++;
3482        card->tst_free -= tst_entries;
3483        fill_tst(card, NULL, tst_entries, TSTE_OPC_NULL);
3484
3485#ifdef HAVE_EEPROM
3486        idt77252_eeprom_init(card);
3487        printk("%s: EEPROM: %02x:", card->name,
3488                idt77252_eeprom_read_status(card));
3489
3490        for (i = 0; i < 0x80; i++) {
3491                printk(" %02x", 
3492                idt77252_eeprom_read_byte(card, i)
3493                );
3494        }
3495        printk("\n");
3496#endif /* HAVE_EEPROM */
3497
3498        /*
3499         * XXX: <hack>
3500         */
3501        sprintf(tname, "eth%d", card->index);
3502        tmp = dev_get_by_name(&init_net, tname);        /* jhs: was "tmp = dev_get(tname);" */
3503        if (tmp) {
3504                memcpy(card->atmdev->esi, tmp->dev_addr, 6);
3505                dev_put(tmp);
3506                printk("%s: ESI %pM\n", card->name, card->atmdev->esi);
3507        }
3508        /*
3509         * XXX: </hack>
3510         */
3511
3512        /* Set Maximum Deficit Count for now. */
3513        writel(0xffff, SAR_REG_MDFCT);
3514
3515        set_bit(IDT77252_BIT_INIT, &card->flags);
3516
3517        XPRINTK("%s: IDT77252 ABR SAR initialization complete.\n", card->name);
3518        return 0;
3519}
3520
3521
3522/*****************************************************************************/
3523/*                                                                           */
3524/* Probing of IDT77252 ABR SAR                                               */
3525/*                                                                           */
3526/*****************************************************************************/
3527
3528
3529static int idt77252_preset(struct idt77252_dev *card)
3530{
3531        u16 pci_command;
3532
3533/*****************************************************************/
3534/*   P C I   C O N F I G U R A T I O N                           */
3535/*****************************************************************/
3536
3537        XPRINTK("%s: Enable PCI master and memory access for SAR.\n",
3538                card->name);
3539        if (pci_read_config_word(card->pcidev, PCI_COMMAND, &pci_command)) {
3540                printk("%s: can't read PCI_COMMAND.\n", card->name);
3541                deinit_card(card);
3542                return -1;
3543        }
3544        if (!(pci_command & PCI_COMMAND_IO)) {
3545                printk("%s: PCI_COMMAND: %04x (???)\n",
3546                       card->name, pci_command);
3547                deinit_card(card);
3548                return (-1);
3549        }
3550        pci_command |= (PCI_COMMAND_MEMORY | PCI_COMMAND_MASTER);
3551        if (pci_write_config_word(card->pcidev, PCI_COMMAND, pci_command)) {
3552                printk("%s: can't write PCI_COMMAND.\n", card->name);
3553                deinit_card(card);
3554                return -1;
3555        }
3556/*****************************************************************/
3557/*   G E N E R I C   R E S E T                                   */
3558/*****************************************************************/
3559
3560        /* Software reset */
3561        writel(SAR_CFG_SWRST, SAR_REG_CFG);
3562        mdelay(1);
3563        writel(0, SAR_REG_CFG);
3564
3565        IPRINTK("%s: Software resetted.\n", card->name);
3566        return 0;
3567}
3568
3569
3570static unsigned long probe_sram(struct idt77252_dev *card)
3571{
3572        u32 data, addr;
3573
3574        writel(0, SAR_REG_DR0);
3575        writel(SAR_CMD_WRITE_SRAM | (0 << 2), SAR_REG_CMD);
3576
3577        for (addr = 0x4000; addr < 0x80000; addr += 0x4000) {
3578                writel(ATM_POISON, SAR_REG_DR0);
3579                writel(SAR_CMD_WRITE_SRAM | (addr << 2), SAR_REG_CMD);
3580
3581                writel(SAR_CMD_READ_SRAM | (0 << 2), SAR_REG_CMD);
3582                data = readl(SAR_REG_DR0);
3583
3584                if (data != 0)
3585                        break;
3586        }
3587
3588        return addr * sizeof(u32);
3589}
3590
3591static int idt77252_init_one(struct pci_dev *pcidev,
3592                             const struct pci_device_id *id)
3593{
3594        static struct idt77252_dev **last = &idt77252_chain;
3595        static int index = 0;
3596
3597        unsigned long membase, srambase;
3598        struct idt77252_dev *card;
3599        struct atm_dev *dev;
3600        int i, err;
3601
3602
3603        if ((err = pci_enable_device(pcidev))) {
3604                printk("idt77252: can't enable PCI device at %s\n", pci_name(pcidev));
3605                return err;
3606        }
3607
3608        if ((err = dma_set_mask_and_coherent(&pcidev->dev, DMA_BIT_MASK(32)))) {
3609                printk("idt77252: can't enable DMA for PCI device at %s\n", pci_name(pcidev));
3610                return err;
3611        }
3612
3613        card = kzalloc(sizeof(struct idt77252_dev), GFP_KERNEL);
3614        if (!card) {
3615                printk("idt77252-%d: can't allocate private data\n", index);
3616                err = -ENOMEM;
3617                goto err_out_disable_pdev;
3618        }
3619        card->revision = pcidev->revision;
3620        card->index = index;
3621        card->pcidev = pcidev;
3622        sprintf(card->name, "idt77252-%d", card->index);
3623
3624        INIT_WORK(&card->tqueue, idt77252_softint);
3625
3626        membase = pci_resource_start(pcidev, 1);
3627        srambase = pci_resource_start(pcidev, 2);
3628
3629        mutex_init(&card->mutex);
3630        spin_lock_init(&card->cmd_lock);
3631        spin_lock_init(&card->tst_lock);
3632
3633        timer_setup(&card->tst_timer, tst_timer, 0);
3634
3635        /* Do the I/O remapping... */
3636        card->membase = ioremap(membase, 1024);
3637        if (!card->membase) {
3638                printk("%s: can't ioremap() membase\n", card->name);
3639                err = -EIO;
3640                goto err_out_free_card;
3641        }
3642
3643        if (idt77252_preset(card)) {
3644                printk("%s: preset failed\n", card->name);
3645                err = -EIO;
3646                goto err_out_iounmap;
3647        }
3648
3649        dev = atm_dev_register("idt77252", &pcidev->dev, &idt77252_ops, -1,
3650                               NULL);
3651        if (!dev) {
3652                printk("%s: can't register atm device\n", card->name);
3653                err = -EIO;
3654                goto err_out_iounmap;
3655        }
3656        dev->dev_data = card;
3657        card->atmdev = dev;
3658
3659#ifdef  CONFIG_ATM_IDT77252_USE_SUNI
3660        suni_init(dev);
3661        if (!dev->phy) {
3662                printk("%s: can't init SUNI\n", card->name);
3663                err = -EIO;
3664                goto err_out_deinit_card;
3665        }
3666#endif  /* CONFIG_ATM_IDT77252_USE_SUNI */
3667
3668        card->sramsize = probe_sram(card);
3669
3670        for (i = 0; i < 4; i++) {
3671                card->fbq[i] = ioremap(srambase | 0x200000 | (i << 18), 4);
3672                if (!card->fbq[i]) {
3673                        printk("%s: can't ioremap() FBQ%d\n", card->name, i);
3674                        err = -EIO;
3675                        goto err_out_deinit_card;
3676                }
3677        }
3678
3679        printk("%s: ABR SAR (Rev %c): MEM %08lx SRAM %08lx [%u KB]\n",
3680               card->name, ((card->revision > 1) && (card->revision < 25)) ?
3681               'A' + card->revision - 1 : '?', membase, srambase,
3682               card->sramsize / 1024);
3683
3684        if (init_card(dev)) {
3685                printk("%s: init_card failed\n", card->name);
3686                err = -EIO;
3687                goto err_out_deinit_card;
3688        }
3689
3690        dev->ci_range.vpi_bits = card->vpibits;
3691        dev->ci_range.vci_bits = card->vcibits;
3692        dev->link_rate = card->link_pcr;
3693
3694        if (dev->phy->start)
3695                dev->phy->start(dev);
3696
3697        if (idt77252_dev_open(card)) {
3698                printk("%s: dev_open failed\n", card->name);
3699                err = -EIO;
3700                goto err_out_stop;
3701        }
3702
3703        *last = card;
3704        last = &card->next;
3705        index++;
3706
3707        return 0;
3708
3709err_out_stop:
3710        if (dev->phy->stop)
3711                dev->phy->stop(dev);
3712
3713err_out_deinit_card:
3714        deinit_card(card);
3715
3716err_out_iounmap:
3717        iounmap(card->membase);
3718
3719err_out_free_card:
3720        kfree(card);
3721
3722err_out_disable_pdev:
3723        pci_disable_device(pcidev);
3724        return err;
3725}
3726
3727static const struct pci_device_id idt77252_pci_tbl[] =
3728{
3729        { PCI_VDEVICE(IDT, PCI_DEVICE_ID_IDT_IDT77252), 0 },
3730        { 0, }
3731};
3732
3733MODULE_DEVICE_TABLE(pci, idt77252_pci_tbl);
3734
3735static struct pci_driver idt77252_driver = {
3736        .name           = "idt77252",
3737        .id_table       = idt77252_pci_tbl,
3738        .probe          = idt77252_init_one,
3739};
3740
3741static int __init idt77252_init(void)
3742{
3743        struct sk_buff *skb;
3744
3745        printk("%s: at %p\n", __func__, idt77252_init);
3746
3747        if (sizeof(skb->cb) < sizeof(struct atm_skb_data) +
3748                              sizeof(struct idt77252_skb_prv)) {
3749                printk(KERN_ERR "%s: skb->cb is too small (%lu < %lu)\n",
3750                       __func__, (unsigned long) sizeof(skb->cb),
3751                       (unsigned long) sizeof(struct atm_skb_data) +
3752                                       sizeof(struct idt77252_skb_prv));
3753                return -EIO;
3754        }
3755
3756        return pci_register_driver(&idt77252_driver);
3757}
3758
3759static void __exit idt77252_exit(void)
3760{
3761        struct idt77252_dev *card;
3762        struct atm_dev *dev;
3763
3764        pci_unregister_driver(&idt77252_driver);
3765
3766        while (idt77252_chain) {
3767                card = idt77252_chain;
3768                dev = card->atmdev;
3769                idt77252_chain = card->next;
3770
3771                if (dev->phy->stop)
3772                        dev->phy->stop(dev);
3773                deinit_card(card);
3774                pci_disable_device(card->pcidev);
3775                kfree(card);
3776        }
3777
3778        DIPRINTK("idt77252: finished cleanup-module().\n");
3779}
3780
3781module_init(idt77252_init);
3782module_exit(idt77252_exit);
3783
3784MODULE_LICENSE("GPL");
3785
3786module_param(vpibits, uint, 0);
3787MODULE_PARM_DESC(vpibits, "number of VPI bits supported (0, 1, or 2)");
3788#ifdef CONFIG_ATM_IDT77252_DEBUG
3789module_param(debug, ulong, 0644);
3790MODULE_PARM_DESC(debug,   "debug bitmap, see drivers/atm/idt77252.h");
3791#endif
3792
3793MODULE_AUTHOR("Eddie C. Dost <ecd@atecom.com>");
3794MODULE_DESCRIPTION("IDT77252 ABR SAR Driver");
3795