git.oblomov.eu Git - linux-2.6/blob - drivers/isdn/hardware/mISDN/hfcpci.c

   1 /*
   2  *
   3  * hfcpci.c     low level driver for CCD's hfc-pci based cards
   4  *
   5  * Author     Werner Cornelius (werner@isdn4linux.de)
   6  *            based on existing driver for CCD hfc ISA cards
   7  *            type approval valid for HFC-S PCI A based card
   8  *
   9  * Copyright 1999  by Werner Cornelius (werner@isdn-development.de)
  10  * Copyright 2008  by Karsten Keil <kkeil@novell.com>
  11  *
  12  * This program is free software; you can redistribute it and/or modify
  13  * it under the terms of the GNU General Public License as published by
  14  * the Free Software Foundation; either version 2, or (at your option)
  15  * any later version.
  16  *
  17  * This program is distributed in the hope that it will be useful,
  18  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  19  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  20  * GNU General Public License for more details.
  21  *
  22  * You should have received a copy of the GNU General Public License
  23  * along with this program; if not, write to the Free Software
  24  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  25  *
  26  */
  27
  28 #include <linux/module.h>
  29 #include <linux/pci.h>
  30 #include <linux/delay.h>
  31 #include <linux/mISDNhw.h>
  32
  33 #include "hfc_pci.h"
  34
  35 static const char *hfcpci_revision = "2.0";
  36
  37 #define MAX_CARDS       8
  38 static int HFC_cnt;
  39 static uint debug;
  40
  41 MODULE_AUTHOR("Karsten Keil");
  42 MODULE_LICENSE("GPL");
  43 module_param(debug, uint, 0);
  44
  45 static LIST_HEAD(HFClist);
  46 static DEFINE_RWLOCK(HFClock);
  47
  48 enum {
  49         HFC_CCD_2BD0,
  50         HFC_CCD_B000,
  51         HFC_CCD_B006,
  52         HFC_CCD_B007,
  53         HFC_CCD_B008,
  54         HFC_CCD_B009,
  55         HFC_CCD_B00A,
  56         HFC_CCD_B00B,
  57         HFC_CCD_B00C,
  58         HFC_CCD_B100,
  59         HFC_CCD_B700,
  60         HFC_CCD_B701,
  61         HFC_ASUS_0675,
  62         HFC_BERKOM_A1T,
  63         HFC_BERKOM_TCONCEPT,
  64         HFC_ANIGMA_MC145575,
  65         HFC_ZOLTRIX_2BD0,
  66         HFC_DIGI_DF_M_IOM2_E,
  67         HFC_DIGI_DF_M_E,
  68         HFC_DIGI_DF_M_IOM2_A,
  69         HFC_DIGI_DF_M_A,
  70         HFC_ABOCOM_2BD1,
  71         HFC_SITECOM_DC105V2,
  72 };
  73
  74 struct hfcPCI_hw {
  75         unsigned char           cirm;
  76         unsigned char           ctmt;
  77         unsigned char           clkdel;
  78         unsigned char           states;
  79         unsigned char           conn;
  80         unsigned char           mst_m;
  81         unsigned char           int_m1;
  82         unsigned char           int_m2;
  83         unsigned char           sctrl;
  84         unsigned char           sctrl_r;
  85         unsigned char           sctrl_e;
  86         unsigned char           trm;
  87         unsigned char           fifo_en;
  88         unsigned char           bswapped;
  89         unsigned char           protocol;
  90         int                     nt_timer;
  91         unsigned char __iomem   *pci_io; /* start of PCI IO memory */
  92         dma_addr_t              dmahandle;
  93         void                    *fifos; /* FIFO memory */
  94         int                     last_bfifo_cnt[2];
  95             /* marker saving last b-fifo frame count */
  96         struct timer_list       timer;
  97 };
  98
  99 #define HFC_CFG_MASTER          1
 100 #define HFC_CFG_SLAVE           2
 101 #define HFC_CFG_PCM             3
 102 #define HFC_CFG_2HFC            4
 103 #define HFC_CFG_SLAVEHFC        5
 104 #define HFC_CFG_NEG_F0          6
 105 #define HFC_CFG_SW_DD_DU        7
 106
 107 #define FLG_HFC_TIMER_T1        16
 108 #define FLG_HFC_TIMER_T3        17
 109
 110 #define NT_T1_COUNT     1120    /* number of 3.125ms interrupts (3.5s) */
 111 #define NT_T3_COUNT     31      /* number of 3.125ms interrupts (97 ms) */
 112 #define CLKDEL_TE       0x0e    /* CLKDEL in TE mode */
 113 #define CLKDEL_NT       0x6c    /* CLKDEL in NT mode */
 114
 115
 116 struct hfc_pci {
 117         struct list_head        list;
 118         u_char                  subtype;
 119         u_char                  chanlimit;
 120         u_char                  initdone;
 121         u_long                  cfg;
 122         u_int                   irq;
 123         u_int                   irqcnt;
 124         struct pci_dev          *pdev;
 125         struct hfcPCI_hw        hw;
 126         spinlock_t              lock;   /* card lock */
 127         struct dchannel         dch;
 128         struct bchannel         bch[2];
 129 };
 130
 131 /* Interface functions */
 132 static void
 133 enable_hwirq(struct hfc_pci *hc)
 134 {
 135         hc->hw.int_m2 |= HFCPCI_IRQ_ENABLE;
 136         Write_hfc(hc, HFCPCI_INT_M2, hc->hw.int_m2);
 137 }
 138
 139 static void
 140 disable_hwirq(struct hfc_pci *hc)
 141 {
 142         hc->hw.int_m2 &= ~((u_char)HFCPCI_IRQ_ENABLE);
 143         Write_hfc(hc, HFCPCI_INT_M2, hc->hw.int_m2);
 144 }
 145
 146 /*
 147  * free hardware resources used by driver
 148  */
 149 static void
 150 release_io_hfcpci(struct hfc_pci *hc)
 151 {
 152         /* disable memory mapped ports + busmaster */
 153         pci_write_config_word(hc->pdev, PCI_COMMAND, 0);
 154         del_timer(&hc->hw.timer);
 155         pci_free_consistent(hc->pdev, 0x8000, hc->hw.fifos, hc->hw.dmahandle);
 156         iounmap(hc->hw.pci_io);
 157 }
 158
 159 /*
 160  * set mode (NT or TE)
 161  */
 162 static void
 163 hfcpci_setmode(struct hfc_pci *hc)
 164 {
 165         if (hc->hw.protocol == ISDN_P_NT_S0) {
 166                 hc->hw.clkdel = CLKDEL_NT;      /* ST-Bit delay for NT-Mode */
 167                 hc->hw.sctrl |= SCTRL_MODE_NT;  /* NT-MODE */
 168                 hc->hw.states = 1;              /* G1 */
 169         } else {
 170                 hc->hw.clkdel = CLKDEL_TE;      /* ST-Bit delay for TE-Mode */
 171                 hc->hw.sctrl &= ~SCTRL_MODE_NT; /* TE-MODE */
 172                 hc->hw.states = 2;              /* F2 */
 173         }
 174         Write_hfc(hc, HFCPCI_CLKDEL, hc->hw.clkdel);
 175         Write_hfc(hc, HFCPCI_STATES, HFCPCI_LOAD_STATE | hc->hw.states);
 176         udelay(10);
 177         Write_hfc(hc, HFCPCI_STATES, hc->hw.states | 0x40); /* Deactivate */
 178         Write_hfc(hc, HFCPCI_SCTRL, hc->hw.sctrl);
 179 }
 180
 181 /*
 182  * function called to reset the HFC PCI chip. A complete software reset of chip
 183  * and fifos is done.
 184  */
 185 static void
 186 reset_hfcpci(struct hfc_pci *hc)
 187 {
 188         u_char  val;
 189         int     cnt = 0;
 190
 191         printk(KERN_DEBUG "reset_hfcpci: entered\n");
 192         val = Read_hfc(hc, HFCPCI_CHIP_ID);
 193         printk(KERN_INFO "HFC_PCI: resetting HFC ChipId(%x)\n", val);
 194         /* enable memory mapped ports, disable busmaster */
 195         pci_write_config_word(hc->pdev, PCI_COMMAND, PCI_ENA_MEMIO);
 196         disable_hwirq(hc);
 197         /* enable memory ports + busmaster */
 198         pci_write_config_word(hc->pdev, PCI_COMMAND,
 199             PCI_ENA_MEMIO + PCI_ENA_MASTER);
 200         val = Read_hfc(hc, HFCPCI_STATUS);
 201         printk(KERN_DEBUG "HFC-PCI status(%x) before reset\n", val);
 202         hc->hw.cirm = HFCPCI_RESET;     /* Reset On */
 203         Write_hfc(hc, HFCPCI_CIRM, hc->hw.cirm);
 204         set_current_state(TASK_UNINTERRUPTIBLE);
 205         mdelay(10);                     /* Timeout 10ms */
 206         hc->hw.cirm = 0;                /* Reset Off */
 207         Write_hfc(hc, HFCPCI_CIRM, hc->hw.cirm);
 208         val = Read_hfc(hc, HFCPCI_STATUS);
 209         printk(KERN_DEBUG "HFC-PCI status(%x) after reset\n", val);
 210         while (cnt < 50000) { /* max 50000 us */
 211                 udelay(5);
 212                 cnt += 5;
 213                 val = Read_hfc(hc, HFCPCI_STATUS);
 214                 if (!(val & 2))
 215                         break;
 216         }
 217         printk(KERN_DEBUG "HFC-PCI status(%x) after %dus\n", val, cnt);
 218
 219         hc->hw.fifo_en = 0x30;  /* only D fifos enabled */
 220
 221         hc->hw.bswapped = 0;    /* no exchange */
 222         hc->hw.ctmt = HFCPCI_TIM3_125 | HFCPCI_AUTO_TIMER;
 223         hc->hw.trm = HFCPCI_BTRANS_THRESMASK; /* no echo connect , threshold */
 224         hc->hw.sctrl = 0x40;    /* set tx_lo mode, error in datasheet ! */
 225         hc->hw.sctrl_r = 0;
 226         hc->hw.sctrl_e = HFCPCI_AUTO_AWAKE;     /* S/T Auto awake */
 227         hc->hw.mst_m = 0;
 228         if (test_bit(HFC_CFG_MASTER, &hc->cfg))
 229                 hc->hw.mst_m |= HFCPCI_MASTER;  /* HFC Master Mode */
 230         if (test_bit(HFC_CFG_NEG_F0, &hc->cfg))
 231                 hc->hw.mst_m |= HFCPCI_F0_NEGATIV;
 232         Write_hfc(hc, HFCPCI_FIFO_EN, hc->hw.fifo_en);
 233         Write_hfc(hc, HFCPCI_TRM, hc->hw.trm);
 234         Write_hfc(hc, HFCPCI_SCTRL_E, hc->hw.sctrl_e);
 235         Write_hfc(hc, HFCPCI_CTMT, hc->hw.ctmt);
 236
 237         hc->hw.int_m1 = HFCPCI_INTS_DTRANS | HFCPCI_INTS_DREC |
 238             HFCPCI_INTS_L1STATE | HFCPCI_INTS_TIMER;
 239         Write_hfc(hc, HFCPCI_INT_M1, hc->hw.int_m1);
 240
 241         /* Clear already pending ints */
 242         if (Read_hfc(hc, HFCPCI_INT_S1));
 243
 244         /* set NT/TE mode */
 245         hfcpci_setmode(hc);
 246
 247         Write_hfc(hc, HFCPCI_MST_MODE, hc->hw.mst_m);
 248         Write_hfc(hc, HFCPCI_SCTRL_R, hc->hw.sctrl_r);
 249
 250         /*
 251          * Init GCI/IOM2 in master mode
 252          * Slots 0 and 1 are set for B-chan 1 and 2
 253          * D- and monitor/CI channel are not enabled
 254          * STIO1 is used as output for data, B1+B2 from ST->IOM+HFC
 255          * STIO2 is used as data input, B1+B2 from IOM->ST
 256          * ST B-channel send disabled -> continous 1s
 257          * The IOM slots are always enabled
 258          */
 259         if (test_bit(HFC_CFG_PCM, &hc->cfg)) {
 260                 /* set data flow directions: connect B1,B2: HFC to/from PCM */
 261                 hc->hw.conn = 0x09;
 262         } else {
 263                 hc->hw.conn = 0x36;     /* set data flow directions */
 264                 if (test_bit(HFC_CFG_SW_DD_DU, &hc->cfg)) {
 265                         Write_hfc(hc, HFCPCI_B1_SSL, 0xC0);
 266                         Write_hfc(hc, HFCPCI_B2_SSL, 0xC1);
 267                         Write_hfc(hc, HFCPCI_B1_RSL, 0xC0);
 268                         Write_hfc(hc, HFCPCI_B2_RSL, 0xC1);
 269                 } else {
 270                         Write_hfc(hc, HFCPCI_B1_SSL, 0x80);
 271                         Write_hfc(hc, HFCPCI_B2_SSL, 0x81);
 272                         Write_hfc(hc, HFCPCI_B1_RSL, 0x80);
 273                         Write_hfc(hc, HFCPCI_B2_RSL, 0x81);
 274                 }
 275         }
 276         Write_hfc(hc, HFCPCI_CONNECT, hc->hw.conn);
 277         val = Read_hfc(hc, HFCPCI_INT_S2);
 278 }
 279
 280 /*
 281  * Timer function called when kernel timer expires
 282  */
 283 static void
 284 hfcpci_Timer(struct hfc_pci *hc)
 285 {
 286         hc->hw.timer.expires = jiffies + 75;
 287         /* WD RESET */
 288 /*
 289  *      WriteReg(hc, HFCD_DATA, HFCD_CTMT, hc->hw.ctmt | 0x80);
 290  *      add_timer(&hc->hw.timer);
 291  */
 292 }
 293
 294
 295 /*
 296  * select a b-channel entry matching and active
 297  */
 298 static struct bchannel *
 299 Sel_BCS(struct hfc_pci *hc, int channel)
 300 {
 301         if (test_bit(FLG_ACTIVE, &hc->bch[0].Flags) &&
 302                 (hc->bch[0].nr & channel))
 303                 return &hc->bch[0];
 304         else if (test_bit(FLG_ACTIVE, &hc->bch[1].Flags) &&
 305                 (hc->bch[1].nr & channel))
 306                 return &hc->bch[1];
 307         else
 308                 return NULL;
 309 }
 310
 311 /*
 312  * clear the desired B-channel rx fifo
 313  */
 314 static void
 315 hfcpci_clear_fifo_rx(struct hfc_pci *hc, int fifo)
 316 {
 317         u_char          fifo_state;
 318         struct bzfifo   *bzr;
 319
 320         if (fifo) {
 321                 bzr = &((union fifo_area *)(hc->hw.fifos))->b_chans.rxbz_b2;
 322                 fifo_state = hc->hw.fifo_en & HFCPCI_FIFOEN_B2RX;
 323         } else {
 324                 bzr = &((union fifo_area *)(hc->hw.fifos))->b_chans.rxbz_b1;
 325                 fifo_state = hc->hw.fifo_en & HFCPCI_FIFOEN_B1RX;
 326         }
 327         if (fifo_state)
 328                 hc->hw.fifo_en ^= fifo_state;
 329         Write_hfc(hc, HFCPCI_FIFO_EN, hc->hw.fifo_en);
 330         hc->hw.last_bfifo_cnt[fifo] = 0;
 331         bzr->f1 = MAX_B_FRAMES;
 332         bzr->f2 = bzr->f1;      /* init F pointers to remain constant */
 333         bzr->za[MAX_B_FRAMES].z1 = cpu_to_le16(B_FIFO_SIZE + B_SUB_VAL - 1);
 334         bzr->za[MAX_B_FRAMES].z2 = cpu_to_le16(
 335             le16_to_cpu(bzr->za[MAX_B_FRAMES].z1));
 336         if (fifo_state)
 337                 hc->hw.fifo_en |= fifo_state;
 338         Write_hfc(hc, HFCPCI_FIFO_EN, hc->hw.fifo_en);
 339 }
 340
 341 /*
 342  * clear the desired B-channel tx fifo
 343  */
 344 static void hfcpci_clear_fifo_tx(struct hfc_pci *hc, int fifo)
 345 {
 346         u_char          fifo_state;
 347         struct bzfifo   *bzt;
 348
 349         if (fifo) {
 350                 bzt = &((union fifo_area *)(hc->hw.fifos))->b_chans.txbz_b2;
 351                 fifo_state = hc->hw.fifo_en & HFCPCI_FIFOEN_B2TX;
 352         } else {
 353                 bzt = &((union fifo_area *)(hc->hw.fifos))->b_chans.txbz_b1;
 354                 fifo_state = hc->hw.fifo_en & HFCPCI_FIFOEN_B1TX;
 355         }
 356         if (fifo_state)
 357                 hc->hw.fifo_en ^= fifo_state;
 358         Write_hfc(hc, HFCPCI_FIFO_EN, hc->hw.fifo_en);
 359         if (hc->bch[fifo].debug & DEBUG_HW_BCHANNEL)
 360                 printk(KERN_DEBUG "hfcpci_clear_fifo_tx%d f1(%x) f2(%x) "
 361                     "z1(%x) z2(%x) state(%x)\n",
 362                     fifo, bzt->f1, bzt->f2,
 363                     le16_to_cpu(bzt->za[MAX_B_FRAMES].z1),
 364                     le16_to_cpu(bzt->za[MAX_B_FRAMES].z2),
 365                     fifo_state);
 366         bzt->f2 = MAX_B_FRAMES;
 367         bzt->f1 = bzt->f2;      /* init F pointers to remain constant */
 368         bzt->za[MAX_B_FRAMES].z1 = cpu_to_le16(B_FIFO_SIZE + B_SUB_VAL - 1);
 369         bzt->za[MAX_B_FRAMES].z2 = cpu_to_le16(B_FIFO_SIZE + B_SUB_VAL - 2);
 370         if (fifo_state)
 371                 hc->hw.fifo_en |= fifo_state;
 372         Write_hfc(hc, HFCPCI_FIFO_EN, hc->hw.fifo_en);
 373         if (hc->bch[fifo].debug & DEBUG_HW_BCHANNEL)
 374                 printk(KERN_DEBUG
 375                     "hfcpci_clear_fifo_tx%d f1(%x) f2(%x) z1(%x) z2(%x)\n",
 376                     fifo, bzt->f1, bzt->f2,
 377                     le16_to_cpu(bzt->za[MAX_B_FRAMES].z1),
 378                     le16_to_cpu(bzt->za[MAX_B_FRAMES].z2));
 379 }
 380
 381 /*
 382  * read a complete B-frame out of the buffer
 383  */
 384 static void
 385 hfcpci_empty_bfifo(struct bchannel *bch, struct bzfifo *bz,
 386     u_char *bdata, int count)
 387 {
 388         u_char          *ptr, *ptr1, new_f2;
 389         int             total, maxlen, new_z2;
 390         struct zt       *zp;
 391
 392         if ((bch->debug & DEBUG_HW_BCHANNEL) && !(bch->debug & DEBUG_HW_BFIFO))
 393                 printk(KERN_DEBUG "hfcpci_empty_fifo\n");
 394         zp = &bz->za[bz->f2];   /* point to Z-Regs */
 395         new_z2 = le16_to_cpu(zp->z2) + count;   /* new position in fifo */
 396         if (new_z2 >= (B_FIFO_SIZE + B_SUB_VAL))
 397                 new_z2 -= B_FIFO_SIZE;  /* buffer wrap */
 398         new_f2 = (bz->f2 + 1) & MAX_B_FRAMES;
 399         if ((count > MAX_DATA_SIZE + 3) || (count < 4) ||
 400             (*(bdata + (le16_to_cpu(zp->z1) - B_SUB_VAL)))) {
 401                 if (bch->debug & DEBUG_HW)
 402                         printk(KERN_DEBUG "hfcpci_empty_fifo: incoming packet "
 403                             "invalid length %d or crc\n", count);
 404 #ifdef ERROR_STATISTIC
 405                 bch->err_inv++;
 406 #endif
 407                 bz->za[new_f2].z2 = cpu_to_le16(new_z2);
 408                 bz->f2 = new_f2;        /* next buffer */
 409         } else {
 410                 bch->rx_skb = mI_alloc_skb(count - 3, GFP_ATOMIC);
 411                 if (!bch->rx_skb) {
 412                         printk(KERN_WARNING "HFCPCI: receive out of memory\n");
 413                         return;
 414                 }
 415                 total = count;
 416                 count -= 3;
 417                 ptr = skb_put(bch->rx_skb, count);
 418
 419                 if (le16_to_cpu(zp->z2) + count <= B_FIFO_SIZE + B_SUB_VAL)
 420                         maxlen = count;         /* complete transfer */
 421                 else
 422                         maxlen = B_FIFO_SIZE + B_SUB_VAL -
 423                             le16_to_cpu(zp->z2);        /* maximum */
 424
 425                 ptr1 = bdata + (le16_to_cpu(zp->z2) - B_SUB_VAL);
 426                     /* start of data */
 427                 memcpy(ptr, ptr1, maxlen);      /* copy data */
 428                 count -= maxlen;
 429
 430                 if (count) {    /* rest remaining */
 431                         ptr += maxlen;
 432                         ptr1 = bdata;   /* start of buffer */
 433                         memcpy(ptr, ptr1, count);       /* rest */
 434                 }
 435                 bz->za[new_f2].z2 = cpu_to_le16(new_z2);
 436                 bz->f2 = new_f2;        /* next buffer */
 437                 recv_Bchannel(bch);
 438         }
 439 }
 440
 441 /*
 442  * D-channel receive procedure
 443  */
 444 static int
 445 receive_dmsg(struct hfc_pci *hc)
 446 {
 447         struct dchannel *dch = &hc->dch;
 448         int             maxlen;
 449         int             rcnt, total;
 450         int             count = 5;
 451         u_char          *ptr, *ptr1;
 452         struct dfifo    *df;
 453         struct zt       *zp;
 454
 455         df = &((union fifo_area *)(hc->hw.fifos))->d_chan.d_rx;
 456         while (((df->f1 & D_FREG_MASK) != (df->f2 & D_FREG_MASK)) && count--) {
 457                 zp = &df->za[df->f2 & D_FREG_MASK];
 458                 rcnt = le16_to_cpu(zp->z1) - le16_to_cpu(zp->z2);
 459                 if (rcnt < 0)
 460                         rcnt += D_FIFO_SIZE;
 461                 rcnt++;
 462                 if (dch->debug & DEBUG_HW_DCHANNEL)
 463                         printk(KERN_DEBUG
 464                             "hfcpci recd f1(%d) f2(%d) z1(%x) z2(%x) cnt(%d)\n",
 465                                 df->f1, df->f2,
 466                                 le16_to_cpu(zp->z1),
 467                                 le16_to_cpu(zp->z2),
 468                                 rcnt);
 469
 470                 if ((rcnt > MAX_DFRAME_LEN + 3) || (rcnt < 4) ||
 471                     (df->data[le16_to_cpu(zp->z1)])) {
 472                         if (dch->debug & DEBUG_HW)
 473                                 printk(KERN_DEBUG
 474                                     "empty_fifo hfcpci paket inv. len "
 475                                     "%d or crc %d\n",
 476                                     rcnt,
 477                                     df->data[le16_to_cpu(zp->z1)]);
 478 #ifdef ERROR_STATISTIC
 479                         cs->err_rx++;
 480 #endif
 481                         df->f2 = ((df->f2 + 1) & MAX_D_FRAMES) |
 482                             (MAX_D_FRAMES + 1); /* next buffer */
 483                         df->za[df->f2 & D_FREG_MASK].z2 =
 484                             cpu_to_le16((le16_to_cpu(zp->z2) + rcnt) & (D_FIFO_SIZE - 1));
 485                 } else {
 486                         dch->rx_skb = mI_alloc_skb(rcnt - 3, GFP_ATOMIC);
 487                         if (!dch->rx_skb) {
 488                                 printk(KERN_WARNING
 489                                     "HFC-PCI: D receive out of memory\n");
 490                                 break;
 491                         }
 492                         total = rcnt;
 493                         rcnt -= 3;
 494                         ptr = skb_put(dch->rx_skb, rcnt);
 495
 496                         if (le16_to_cpu(zp->z2) + rcnt <= D_FIFO_SIZE)
 497                                 maxlen = rcnt;  /* complete transfer */
 498                         else
 499                                 maxlen = D_FIFO_SIZE - le16_to_cpu(zp->z2);
 500                                     /* maximum */
 501
 502                         ptr1 = df->data + le16_to_cpu(zp->z2);
 503                             /* start of data */
 504                         memcpy(ptr, ptr1, maxlen);      /* copy data */
 505                         rcnt -= maxlen;
 506
 507                         if (rcnt) {     /* rest remaining */
 508                                 ptr += maxlen;
 509                                 ptr1 = df->data;        /* start of buffer */
 510                                 memcpy(ptr, ptr1, rcnt);        /* rest */
 511                         }
 512                         df->f2 = ((df->f2 + 1) & MAX_D_FRAMES) |
 513                             (MAX_D_FRAMES + 1); /* next buffer */
 514                         df->za[df->f2 & D_FREG_MASK].z2 = cpu_to_le16((
 515                             le16_to_cpu(zp->z2) + total) & (D_FIFO_SIZE - 1));
 516                         recv_Dchannel(dch);
 517                 }
 518         }
 519         return 1;
 520 }
 521
 522 /*
 523  * check for transparent receive data and read max one threshold size if avail
 524  */
 525 static int
 526 hfcpci_empty_fifo_trans(struct bchannel *bch, struct bzfifo *bz, u_char *bdata)
 527 {
 528          __le16 *z1r, *z2r;
 529         int             new_z2, fcnt, maxlen;
 530         u_char          *ptr, *ptr1;
 531
 532         z1r = &bz->za[MAX_B_FRAMES].z1;         /* pointer to z reg */
 533         z2r = z1r + 1;
 534
 535         fcnt = le16_to_cpu(*z1r) - le16_to_cpu(*z2r);
 536         if (!fcnt)
 537                 return 0;       /* no data avail */
 538
 539         if (fcnt <= 0)
 540                 fcnt += B_FIFO_SIZE;    /* bytes actually buffered */
 541         if (fcnt > HFCPCI_BTRANS_THRESHOLD)
 542                 fcnt = HFCPCI_BTRANS_THRESHOLD;         /* limit size */
 543
 544         new_z2 = le16_to_cpu(*z2r) + fcnt;      /* new position in fifo */
 545         if (new_z2 >= (B_FIFO_SIZE + B_SUB_VAL))
 546                 new_z2 -= B_FIFO_SIZE;  /* buffer wrap */
 547
 548         bch->rx_skb = mI_alloc_skb(fcnt, GFP_ATOMIC);
 549         if (bch->rx_skb) {
 550                 ptr = skb_put(bch->rx_skb, fcnt);
 551                 if (le16_to_cpu(*z2r) + fcnt <= B_FIFO_SIZE + B_SUB_VAL)
 552                         maxlen = fcnt;  /* complete transfer */
 553                 else
 554                         maxlen = B_FIFO_SIZE + B_SUB_VAL - le16_to_cpu(*z2r);
 555                             /* maximum */
 556
 557                 ptr1 = bdata + (le16_to_cpu(*z2r) - B_SUB_VAL);
 558                     /* start of data */
 559                 memcpy(ptr, ptr1, maxlen);      /* copy data */
 560                 fcnt -= maxlen;
 561
 562                 if (fcnt) {     /* rest remaining */
 563                         ptr += maxlen;
 564                         ptr1 = bdata;   /* start of buffer */
 565                         memcpy(ptr, ptr1, fcnt);        /* rest */
 566                 }
 567                 recv_Bchannel(bch);
 568         } else
 569                 printk(KERN_WARNING "HFCPCI: receive out of memory\n");
 570
 571         *z2r = cpu_to_le16(new_z2);             /* new position */
 572         return 1;
 573 }
 574
 575 /*
 576  * B-channel main receive routine
 577  */
 578 static void
 579 main_rec_hfcpci(struct bchannel *bch)
 580 {
 581         struct hfc_pci  *hc = bch->hw;
 582         int             rcnt, real_fifo;
 583         int             receive, count = 5;
 584         struct bzfifo   *bz;
 585         u_char          *bdata;
 586         struct zt       *zp;
 587
 588
 589         if ((bch->nr & 2) && (!hc->hw.bswapped)) {
 590                 bz = &((union fifo_area *)(hc->hw.fifos))->b_chans.rxbz_b2;
 591                 bdata = ((union fifo_area *)(hc->hw.fifos))->b_chans.rxdat_b2;
 592                 real_fifo = 1;
 593         } else {
 594                 bz = &((union fifo_area *)(hc->hw.fifos))->b_chans.rxbz_b1;
 595                 bdata = ((union fifo_area *)(hc->hw.fifos))->b_chans.rxdat_b1;
 596                 real_fifo = 0;
 597         }
 598 Begin:
 599         count--;
 600         if (bz->f1 != bz->f2) {
 601                 if (bch->debug & DEBUG_HW_BCHANNEL)
 602                         printk(KERN_DEBUG "hfcpci rec ch(%x) f1(%d) f2(%d)\n",
 603                             bch->nr, bz->f1, bz->f2);
 604                 zp = &bz->za[bz->f2];
 605
 606                 rcnt = le16_to_cpu(zp->z1) - le16_to_cpu(zp->z2);
 607                 if (rcnt < 0)
 608                         rcnt += B_FIFO_SIZE;
 609                 rcnt++;
 610                 if (bch->debug & DEBUG_HW_BCHANNEL)
 611                         printk(KERN_DEBUG
 612                             "hfcpci rec ch(%x) z1(%x) z2(%x) cnt(%d)\n",
 613                             bch->nr, le16_to_cpu(zp->z1),
 614                             le16_to_cpu(zp->z2), rcnt);
 615                 hfcpci_empty_bfifo(bch, bz, bdata, rcnt);
 616                 rcnt = bz->f1 - bz->f2;
 617                 if (rcnt < 0)
 618                         rcnt += MAX_B_FRAMES + 1;
 619                 if (hc->hw.last_bfifo_cnt[real_fifo] > rcnt + 1) {
 620                         rcnt = 0;
 621                         hfcpci_clear_fifo_rx(hc, real_fifo);
 622                 }
 623                 hc->hw.last_bfifo_cnt[real_fifo] = rcnt;
 624                 if (rcnt > 1)
 625                         receive = 1;
 626                 else
 627                         receive = 0;
 628         } else if (test_bit(FLG_TRANSPARENT, &bch->Flags))
 629                 receive = hfcpci_empty_fifo_trans(bch, bz, bdata);
 630         else
 631                 receive = 0;
 632         if (count && receive)
 633                 goto Begin;
 634
 635 }
 636
 637 /*
 638  * D-channel send routine
 639  */
 640 static void
 641 hfcpci_fill_dfifo(struct hfc_pci *hc)
 642 {
 643         struct dchannel *dch = &hc->dch;
 644         int             fcnt;
 645         int             count, new_z1, maxlen;
 646         struct dfifo    *df;
 647         u_char          *src, *dst, new_f1;
 648
 649         if ((dch->debug & DEBUG_HW_DCHANNEL) && !(dch->debug & DEBUG_HW_DFIFO))
 650                 printk(KERN_DEBUG "%s\n", __func__);
 651
 652         if (!dch->tx_skb)
 653                 return;
 654         count = dch->tx_skb->len - dch->tx_idx;
 655         if (count <= 0)
 656                 return;
 657         df = &((union fifo_area *) (hc->hw.fifos))->d_chan.d_tx;
 658
 659         if (dch->debug & DEBUG_HW_DFIFO)
 660                 printk(KERN_DEBUG "%s:f1(%d) f2(%d) z1(f1)(%x)\n", __func__,
 661                     df->f1, df->f2,
 662                     le16_to_cpu(df->za[df->f1 & D_FREG_MASK].z1));
 663         fcnt = df->f1 - df->f2; /* frame count actually buffered */
 664         if (fcnt < 0)
 665                 fcnt += (MAX_D_FRAMES + 1);     /* if wrap around */
 666         if (fcnt > (MAX_D_FRAMES - 1)) {
 667                 if (dch->debug & DEBUG_HW_DCHANNEL)
 668                         printk(KERN_DEBUG
 669                             "hfcpci_fill_Dfifo more as 14 frames\n");
 670 #ifdef ERROR_STATISTIC
 671                 cs->err_tx++;
 672 #endif
 673                 return;
 674         }
 675         /* now determine free bytes in FIFO buffer */
 676         maxlen = le16_to_cpu(df->za[df->f2 & D_FREG_MASK].z2) -
 677             le16_to_cpu(df->za[df->f1 & D_FREG_MASK].z1) - 1;
 678         if (maxlen <= 0)
 679                 maxlen += D_FIFO_SIZE;  /* count now contains available bytes */
 680
 681         if (dch->debug & DEBUG_HW_DCHANNEL)
 682                 printk(KERN_DEBUG "hfcpci_fill_Dfifo count(%d/%d)\n",
 683                         count, maxlen);
 684         if (count > maxlen) {
 685                 if (dch->debug & DEBUG_HW_DCHANNEL)
 686                         printk(KERN_DEBUG "hfcpci_fill_Dfifo no fifo mem\n");
 687                 return;
 688         }
 689         new_z1 = (le16_to_cpu(df->za[df->f1 & D_FREG_MASK].z1) + count) &
 690             (D_FIFO_SIZE - 1);
 691         new_f1 = ((df->f1 + 1) & D_FREG_MASK) | (D_FREG_MASK + 1);
 692         src = dch->tx_skb->data + dch->tx_idx;  /* source pointer */
 693         dst = df->data + le16_to_cpu(df->za[df->f1 & D_FREG_MASK].z1);
 694         maxlen = D_FIFO_SIZE - le16_to_cpu(df->za[df->f1 & D_FREG_MASK].z1);
 695             /* end fifo */
 696         if (maxlen > count)
 697                 maxlen = count; /* limit size */
 698         memcpy(dst, src, maxlen);       /* first copy */
 699
 700         count -= maxlen;        /* remaining bytes */
 701         if (count) {
 702                 dst = df->data; /* start of buffer */
 703                 src += maxlen;  /* new position */
 704                 memcpy(dst, src, count);
 705         }
 706         df->za[new_f1 & D_FREG_MASK].z1 = cpu_to_le16(new_z1);
 707             /* for next buffer */
 708         df->za[df->f1 & D_FREG_MASK].z1 = cpu_to_le16(new_z1);
 709             /* new pos actual buffer */
 710         df->f1 = new_f1;        /* next frame */
 711         dch->tx_idx = dch->tx_skb->len;
 712 }
 713
 714 /*
 715  * B-channel send routine
 716  */
 717 static void
 718 hfcpci_fill_fifo(struct bchannel *bch)
 719 {
 720         struct hfc_pci  *hc = bch->hw;
 721         int             maxlen, fcnt;
 722         int             count, new_z1;
 723         struct bzfifo   *bz;
 724         u_char          *bdata;
 725         u_char          new_f1, *src, *dst;
 726         __le16 *z1t, *z2t;
 727
 728         if ((bch->debug & DEBUG_HW_BCHANNEL) && !(bch->debug & DEBUG_HW_BFIFO))
 729                 printk(KERN_DEBUG "%s\n", __func__);
 730         if ((!bch->tx_skb) || bch->tx_skb->len <= 0)
 731                 return;
 732         count = bch->tx_skb->len - bch->tx_idx;
 733         if ((bch->nr & 2) && (!hc->hw.bswapped)) {
 734                 bz = &((union fifo_area *)(hc->hw.fifos))->b_chans.txbz_b2;
 735                 bdata = ((union fifo_area *)(hc->hw.fifos))->b_chans.txdat_b2;
 736         } else {
 737                 bz = &((union fifo_area *)(hc->hw.fifos))->b_chans.txbz_b1;
 738                 bdata = ((union fifo_area *)(hc->hw.fifos))->b_chans.txdat_b1;
 739         }
 740
 741         if (test_bit(FLG_TRANSPARENT, &bch->Flags)) {
 742                 z1t = &bz->za[MAX_B_FRAMES].z1;
 743                 z2t = z1t + 1;
 744                 if (bch->debug & DEBUG_HW_BCHANNEL)
 745                         printk(KERN_DEBUG "hfcpci_fill_fifo_trans ch(%x) "
 746                             "cnt(%d) z1(%x) z2(%x)\n", bch->nr, count,
 747                             le16_to_cpu(*z1t), le16_to_cpu(*z2t));
 748                 fcnt = le16_to_cpu(*z2t) - le16_to_cpu(*z1t);
 749                 if (fcnt <= 0)
 750                         fcnt += B_FIFO_SIZE;
 751                             /* fcnt contains available bytes in fifo */
 752                 fcnt = B_FIFO_SIZE - fcnt;
 753                     /* remaining bytes to send (bytes in fifo) */
 754 next_t_frame:
 755                 count = bch->tx_skb->len - bch->tx_idx;
 756                 /* maximum fill shall be HFCPCI_BTRANS_MAX */
 757                 if (count > HFCPCI_BTRANS_MAX - fcnt)
 758                         count = HFCPCI_BTRANS_MAX - fcnt;
 759                 if (count <= 0)
 760                         return;
 761                 /* data is suitable for fifo */
 762                 new_z1 = le16_to_cpu(*z1t) + count;
 763                     /* new buffer Position */
 764                 if (new_z1 >= (B_FIFO_SIZE + B_SUB_VAL))
 765                         new_z1 -= B_FIFO_SIZE;  /* buffer wrap */
 766                 src = bch->tx_skb->data + bch->tx_idx;
 767                     /* source pointer */
 768                 dst = bdata + (le16_to_cpu(*z1t) - B_SUB_VAL);
 769                 maxlen = (B_FIFO_SIZE + B_SUB_VAL) - le16_to_cpu(*z1t);
 770                     /* end of fifo */
 771                 if (bch->debug & DEBUG_HW_BFIFO)
 772                         printk(KERN_DEBUG "hfcpci_FFt fcnt(%d) "
 773                             "maxl(%d) nz1(%x) dst(%p)\n",
 774                             fcnt, maxlen, new_z1, dst);
 775                 fcnt += count;
 776                 bch->tx_idx += count;
 777                 if (maxlen > count)
 778                         maxlen = count;         /* limit size */
 779                 memcpy(dst, src, maxlen);       /* first copy */
 780                 count -= maxlen;        /* remaining bytes */
 781                 if (count) {
 782                         dst = bdata;    /* start of buffer */
 783                         src += maxlen;  /* new position */
 784                         memcpy(dst, src, count);
 785                 }
 786                 *z1t = cpu_to_le16(new_z1);     /* now send data */
 787                 if (bch->tx_idx < bch->tx_skb->len)
 788                         return;
 789                 /* send confirm, on trans, free on hdlc. */
 790                 if (test_bit(FLG_TRANSPARENT, &bch->Flags))
 791                         confirm_Bsend(bch);
 792                 dev_kfree_skb(bch->tx_skb);
 793                 if (get_next_bframe(bch))
 794                         goto next_t_frame;
 795                 return;
 796         }
 797         if (bch->debug & DEBUG_HW_BCHANNEL)
 798                 printk(KERN_DEBUG
 799                     "%s: ch(%x) f1(%d) f2(%d) z1(f1)(%x)\n",
 800                     __func__, bch->nr, bz->f1, bz->f2,
 801                     bz->za[bz->f1].z1);
 802         fcnt = bz->f1 - bz->f2; /* frame count actually buffered */
 803         if (fcnt < 0)
 804                 fcnt += (MAX_B_FRAMES + 1);     /* if wrap around */
 805         if (fcnt > (MAX_B_FRAMES - 1)) {
 806                 if (bch->debug & DEBUG_HW_BCHANNEL)
 807                         printk(KERN_DEBUG
 808                             "hfcpci_fill_Bfifo more as 14 frames\n");
 809                 return;
 810         }
 811         /* now determine free bytes in FIFO buffer */
 812         maxlen = le16_to_cpu(bz->za[bz->f2].z2) -
 813             le16_to_cpu(bz->za[bz->f1].z1) - 1;
 814         if (maxlen <= 0)
 815                 maxlen += B_FIFO_SIZE;  /* count now contains available bytes */
 816
 817         if (bch->debug & DEBUG_HW_BCHANNEL)
 818                 printk(KERN_DEBUG "hfcpci_fill_fifo ch(%x) count(%d/%d)\n",
 819                         bch->nr, count, maxlen);
 820
 821         if (maxlen < count) {
 822                 if (bch->debug & DEBUG_HW_BCHANNEL)
 823                         printk(KERN_DEBUG "hfcpci_fill_fifo no fifo mem\n");
 824                 return;
 825         }
 826         new_z1 = le16_to_cpu(bz->za[bz->f1].z1) + count;
 827             /* new buffer Position */
 828         if (new_z1 >= (B_FIFO_SIZE + B_SUB_VAL))
 829                 new_z1 -= B_FIFO_SIZE;  /* buffer wrap */
 830
 831         new_f1 = ((bz->f1 + 1) & MAX_B_FRAMES);
 832         src = bch->tx_skb->data + bch->tx_idx;  /* source pointer */
 833         dst = bdata + (le16_to_cpu(bz->za[bz->f1].z1) - B_SUB_VAL);
 834         maxlen = (B_FIFO_SIZE + B_SUB_VAL) - le16_to_cpu(bz->za[bz->f1].z1);
 835             /* end fifo */
 836         if (maxlen > count)
 837                 maxlen = count; /* limit size */
 838         memcpy(dst, src, maxlen);       /* first copy */
 839
 840         count -= maxlen;        /* remaining bytes */
 841         if (count) {
 842                 dst = bdata;    /* start of buffer */
 843                 src += maxlen;  /* new position */
 844                 memcpy(dst, src, count);
 845         }
 846         bz->za[new_f1].z1 = cpu_to_le16(new_z1);        /* for next buffer */
 847         bz->f1 = new_f1;        /* next frame */
 848         dev_kfree_skb(bch->tx_skb);
 849         get_next_bframe(bch);
 850 }
 851
 852
 853
 854 /*
 855  * handle L1 state changes TE
 856  */
 857
 858 static void
 859 ph_state_te(struct dchannel *dch)
 860 {
 861         if (dch->debug)
 862                 printk(KERN_DEBUG "%s: TE newstate %x\n",
 863                         __func__, dch->state);
 864         switch (dch->state) {
 865         case 0:
 866                 l1_event(dch->l1, HW_RESET_IND);
 867                 break;
 868         case 3:
 869                 l1_event(dch->l1, HW_DEACT_IND);
 870                 break;
 871         case 5:
 872         case 8:
 873                 l1_event(dch->l1, ANYSIGNAL);
 874                 break;
 875         case 6:
 876                 l1_event(dch->l1, INFO2);
 877                 break;
 878         case 7:
 879                 l1_event(dch->l1, INFO4_P8);
 880                 break;
 881         }
 882 }
 883
 884 /*
 885  * handle L1 state changes NT
 886  */
 887
 888 static void
 889 handle_nt_timer3(struct dchannel *dch) {
 890         struct hfc_pci  *hc = dch->hw;
 891
 892         test_and_clear_bit(FLG_HFC_TIMER_T3, &dch->Flags);
 893         hc->hw.int_m1 &= ~HFCPCI_INTS_TIMER;
 894         Write_hfc(hc, HFCPCI_INT_M1, hc->hw.int_m1);
 895         hc->hw.nt_timer = 0;
 896         test_and_set_bit(FLG_ACTIVE, &dch->Flags);
 897         if (test_bit(HFC_CFG_MASTER, &hc->cfg))
 898                 hc->hw.mst_m |= HFCPCI_MASTER;
 899         Write_hfc(hc, HFCPCI_MST_MODE, hc->hw.mst_m);
 900         _queue_data(&dch->dev.D, PH_ACTIVATE_IND,
 901             MISDN_ID_ANY, 0, NULL, GFP_ATOMIC);
 902 }
 903
 904 static void
 905 ph_state_nt(struct dchannel *dch)
 906 {
 907         struct hfc_pci  *hc = dch->hw;
 908
 909         if (dch->debug)
 910                 printk(KERN_DEBUG "%s: NT newstate %x\n",
 911                         __func__, dch->state);
 912         switch (dch->state) {
 913         case 2:
 914                 if (hc->hw.nt_timer < 0) {
 915                         hc->hw.nt_timer = 0;
 916                         test_and_clear_bit(FLG_HFC_TIMER_T3, &dch->Flags);
 917                         test_and_clear_bit(FLG_HFC_TIMER_T1, &dch->Flags);
 918                         hc->hw.int_m1 &= ~HFCPCI_INTS_TIMER;
 919                         Write_hfc(hc, HFCPCI_INT_M1, hc->hw.int_m1);
 920                         /* Clear already pending ints */
 921                         if (Read_hfc(hc, HFCPCI_INT_S1));
 922                         Write_hfc(hc, HFCPCI_STATES, 4 | HFCPCI_LOAD_STATE);
 923                         udelay(10);
 924                         Write_hfc(hc, HFCPCI_STATES, 4);
 925                         dch->state = 4;
 926                 } else if (hc->hw.nt_timer == 0) {
 927                         hc->hw.int_m1 |= HFCPCI_INTS_TIMER;
 928                         Write_hfc(hc, HFCPCI_INT_M1, hc->hw.int_m1);
 929                         hc->hw.nt_timer = NT_T1_COUNT;
 930                         hc->hw.ctmt &= ~HFCPCI_AUTO_TIMER;
 931                         hc->hw.ctmt |= HFCPCI_TIM3_125;
 932                         Write_hfc(hc, HFCPCI_CTMT, hc->hw.ctmt |
 933                                 HFCPCI_CLTIMER);
 934                         test_and_clear_bit(FLG_HFC_TIMER_T3, &dch->Flags);
 935                         test_and_set_bit(FLG_HFC_TIMER_T1, &dch->Flags);
 936                         /* allow G2 -> G3 transition */
 937                         Write_hfc(hc, HFCPCI_STATES, 2 | HFCPCI_NT_G2_G3);
 938                 } else {
 939                         Write_hfc(hc, HFCPCI_STATES, 2 | HFCPCI_NT_G2_G3);
 940                 }
 941                 break;
 942         case 1:
 943                 hc->hw.nt_timer = 0;
 944                 test_and_clear_bit(FLG_HFC_TIMER_T3, &dch->Flags);
 945                 test_and_clear_bit(FLG_HFC_TIMER_T1, &dch->Flags);
 946                 hc->hw.int_m1 &= ~HFCPCI_INTS_TIMER;
 947                 Write_hfc(hc, HFCPCI_INT_M1, hc->hw.int_m1);
 948                 test_and_clear_bit(FLG_ACTIVE, &dch->Flags);
 949                 hc->hw.mst_m &= ~HFCPCI_MASTER;
 950                 Write_hfc(hc, HFCPCI_MST_MODE, hc->hw.mst_m);
 951                 test_and_clear_bit(FLG_L2_ACTIVATED, &dch->Flags);
 952                 _queue_data(&dch->dev.D, PH_DEACTIVATE_IND,
 953                     MISDN_ID_ANY, 0, NULL, GFP_ATOMIC);
 954                 break;
 955         case 4:
 956                 hc->hw.nt_timer = 0;
 957                 test_and_clear_bit(FLG_HFC_TIMER_T3, &dch->Flags);
 958                 test_and_clear_bit(FLG_HFC_TIMER_T1, &dch->Flags);
 959                 hc->hw.int_m1 &= ~HFCPCI_INTS_TIMER;
 960                 Write_hfc(hc, HFCPCI_INT_M1, hc->hw.int_m1);
 961                 break;
 962         case 3:
 963                 if (!test_and_set_bit(FLG_HFC_TIMER_T3, &dch->Flags)) {
 964                         if (!test_and_clear_bit(FLG_L2_ACTIVATED,
 965                             &dch->Flags)) {
 966                                 handle_nt_timer3(dch);
 967                                 break;
 968                         }
 969                         test_and_clear_bit(FLG_HFC_TIMER_T1, &dch->Flags);
 970                         hc->hw.int_m1 |= HFCPCI_INTS_TIMER;
 971                         Write_hfc(hc, HFCPCI_INT_M1, hc->hw.int_m1);
 972                         hc->hw.nt_timer = NT_T3_COUNT;
 973                         hc->hw.ctmt &= ~HFCPCI_AUTO_TIMER;
 974                         hc->hw.ctmt |= HFCPCI_TIM3_125;
 975                         Write_hfc(hc, HFCPCI_CTMT, hc->hw.ctmt |
 976                                 HFCPCI_CLTIMER);
 977                 }
 978                 break;
 979         }
 980 }
 981
 982 static void
 983 ph_state(struct dchannel *dch)
 984 {
 985         struct hfc_pci  *hc = dch->hw;
 986
 987         if (hc->hw.protocol == ISDN_P_NT_S0) {
 988                 if (test_bit(FLG_HFC_TIMER_T3, &dch->Flags) &&
 989                     hc->hw.nt_timer < 0)
 990                         handle_nt_timer3(dch);
 991                 else
 992                         ph_state_nt(dch);
 993         } else
 994                 ph_state_te(dch);
 995 }
 996
 997 /*
 998  * Layer 1 callback function
 999  */
1000 static int
1001 hfc_l1callback(struct dchannel *dch, u_int cmd)
1002 {
1003         struct hfc_pci          *hc = dch->hw;
1004
1005         switch (cmd) {
1006         case INFO3_P8:
1007         case INFO3_P10:
1008                 if (test_bit(HFC_CFG_MASTER, &hc->cfg))
1009                         hc->hw.mst_m |= HFCPCI_MASTER;
1010                 Write_hfc(hc, HFCPCI_MST_MODE, hc->hw.mst_m);
1011                 break;
1012         case HW_RESET_REQ:
1013                 Write_hfc(hc, HFCPCI_STATES, HFCPCI_LOAD_STATE | 3);
1014                 /* HFC ST 3 */
1015                 udelay(6);
1016                 Write_hfc(hc, HFCPCI_STATES, 3);        /* HFC ST 2 */
1017                 if (test_bit(HFC_CFG_MASTER, &hc->cfg))
1018                         hc->hw.mst_m |= HFCPCI_MASTER;
1019                 Write_hfc(hc, HFCPCI_MST_MODE, hc->hw.mst_m);
1020                 Write_hfc(hc, HFCPCI_STATES, HFCPCI_ACTIVATE |
1021                    HFCPCI_DO_ACTION);
1022                 l1_event(dch->l1, HW_POWERUP_IND);
1023                 break;
1024         case HW_DEACT_REQ:
1025                 hc->hw.mst_m &= ~HFCPCI_MASTER;
1026                 Write_hfc(hc, HFCPCI_MST_MODE, hc->hw.mst_m);
1027                 skb_queue_purge(&dch->squeue);
1028                 if (dch->tx_skb) {
1029                         dev_kfree_skb(dch->tx_skb);
1030                         dch->tx_skb = NULL;
1031                 }
1032                 dch->tx_idx = 0;
1033                 if (dch->rx_skb) {
1034                         dev_kfree_skb(dch->rx_skb);
1035                         dch->rx_skb = NULL;
1036                 }
1037                 test_and_clear_bit(FLG_TX_BUSY, &dch->Flags);
1038                 if (test_and_clear_bit(FLG_BUSY_TIMER, &dch->Flags))
1039                         del_timer(&dch->timer);
1040                 break;
1041         case HW_POWERUP_REQ:
1042                 Write_hfc(hc, HFCPCI_STATES, HFCPCI_DO_ACTION);
1043                 break;
1044         case PH_ACTIVATE_IND:
1045                 test_and_set_bit(FLG_ACTIVE, &dch->Flags);
1046                 _queue_data(&dch->dev.D, cmd, MISDN_ID_ANY, 0, NULL,
1047                         GFP_ATOMIC);
1048                 break;
1049         case PH_DEACTIVATE_IND:
1050                 test_and_clear_bit(FLG_ACTIVE, &dch->Flags);
1051                 _queue_data(&dch->dev.D, cmd, MISDN_ID_ANY, 0, NULL,
1052                         GFP_ATOMIC);
1053                 break;
1054         default:
1055                 if (dch->debug & DEBUG_HW)
1056                         printk(KERN_DEBUG "%s: unknown command %x\n",
1057                             __func__, cmd);
1058                 return -1;
1059         }
1060         return 0;
1061 }
1062
1063 /*
1064  * Interrupt handler
1065  */
1066 static inline void
1067 tx_birq(struct bchannel *bch)
1068 {
1069         if (bch->tx_skb && bch->tx_idx < bch->tx_skb->len)
1070                 hfcpci_fill_fifo(bch);
1071         else {
1072                 if (bch->tx_skb)
1073                         dev_kfree_skb(bch->tx_skb);
1074                 if (get_next_bframe(bch))
1075                         hfcpci_fill_fifo(bch);
1076         }
1077 }
1078
1079 static inline void
1080 tx_dirq(struct dchannel *dch)
1081 {
1082         if (dch->tx_skb && dch->tx_idx < dch->tx_skb->len)
1083                 hfcpci_fill_dfifo(dch->hw);
1084         else {
1085                 if (dch->tx_skb)
1086                         dev_kfree_skb(dch->tx_skb);
1087                 if (get_next_dframe(dch))
1088                         hfcpci_fill_dfifo(dch->hw);
1089         }
1090 }
1091
1092 static irqreturn_t
1093 hfcpci_int(int intno, void *dev_id)
1094 {
1095         struct hfc_pci  *hc = dev_id;
1096         u_char          exval;
1097         struct bchannel *bch;
1098         u_char          val, stat;
1099
1100         spin_lock(&hc->lock);
1101         if (!(hc->hw.int_m2 & 0x08)) {
1102                 spin_unlock(&hc->lock);
1103                 return IRQ_NONE; /* not initialised */
1104         }
1105         stat = Read_hfc(hc, HFCPCI_STATUS);
1106         if (HFCPCI_ANYINT & stat) {
1107                 val = Read_hfc(hc, HFCPCI_INT_S1);
1108                 if (hc->dch.debug & DEBUG_HW_DCHANNEL)
1109                         printk(KERN_DEBUG
1110                             "HFC-PCI: stat(%02x) s1(%02x)\n", stat, val);
1111         } else {
1112                 /* shared */
1113                 spin_unlock(&hc->lock);
1114                 return IRQ_NONE;
1115         }
1116         hc->irqcnt++;
1117
1118         if (hc->dch.debug & DEBUG_HW_DCHANNEL)
1119                 printk(KERN_DEBUG "HFC-PCI irq %x\n", val);
1120         val &= hc->hw.int_m1;
1121         if (val & 0x40) {       /* state machine irq */
1122                 exval = Read_hfc(hc, HFCPCI_STATES) & 0xf;
1123                 if (hc->dch.debug & DEBUG_HW_DCHANNEL)
1124                         printk(KERN_DEBUG "ph_state chg %d->%d\n",
1125                                 hc->dch.state, exval);
1126                 hc->dch.state = exval;
1127                 schedule_event(&hc->dch, FLG_PHCHANGE);
1128                 val &= ~0x40;
1129         }
1130         if (val & 0x80) {       /* timer irq */
1131                 if (hc->hw.protocol == ISDN_P_NT_S0) {
1132                         if ((--hc->hw.nt_timer) < 0)
1133                                 schedule_event(&hc->dch, FLG_PHCHANGE);
1134                 }
1135                 val &= ~0x80;
1136                 Write_hfc(hc, HFCPCI_CTMT, hc->hw.ctmt | HFCPCI_CLTIMER);
1137         }
1138         if (val & 0x08) {
1139                 bch = Sel_BCS(hc, hc->hw.bswapped ? 2 : 1);
1140                 if (bch)
1141                         main_rec_hfcpci(bch);
1142                 else if (hc->dch.debug)
1143                         printk(KERN_DEBUG "hfcpci spurious 0x08 IRQ\n");
1144         }
1145         if (val & 0x10) {
1146                 bch = Sel_BCS(hc, 2);
1147                 if (bch)
1148                         main_rec_hfcpci(bch);
1149                 else if (hc->dch.debug)
1150                         printk(KERN_DEBUG "hfcpci spurious 0x10 IRQ\n");
1151         }
1152         if (val & 0x01) {
1153                 bch = Sel_BCS(hc, hc->hw.bswapped ? 2 : 1);
1154                 if (bch)
1155                         tx_birq(bch);
1156                 else if (hc->dch.debug)
1157                         printk(KERN_DEBUG "hfcpci spurious 0x01 IRQ\n");
1158         }
1159         if (val & 0x02) {
1160                 bch = Sel_BCS(hc, 2);
1161                 if (bch)
1162                         tx_birq(bch);
1163                 else if (hc->dch.debug)
1164                         printk(KERN_DEBUG "hfcpci spurious 0x02 IRQ\n");
1165         }
1166         if (val & 0x20)
1167                 receive_dmsg(hc);
1168         if (val & 0x04) {       /* dframe transmitted */
1169                 if (test_and_clear_bit(FLG_BUSY_TIMER, &hc->dch.Flags))
1170                         del_timer(&hc->dch.timer);
1171                 tx_dirq(&hc->dch);
1172         }
1173         spin_unlock(&hc->lock);
1174         return IRQ_HANDLED;
1175 }
1176
1177 /*
1178  * timer callback for D-chan busy resolution. Currently no function
1179  */
1180 static void
1181 hfcpci_dbusy_timer(struct hfc_pci *hc)
1182 {
1183 }
1184
1185 /*
1186  * activate/deactivate hardware for selected channels and mode
1187  */
1188 static int
1189 mode_hfcpci(struct bchannel *bch, int bc, int protocol)
1190 {
1191         struct hfc_pci  *hc = bch->hw;
1192         int             fifo2;
1193         u_char          rx_slot = 0, tx_slot = 0, pcm_mode;
1194
1195         if (bch->debug & DEBUG_HW_BCHANNEL)
1196                 printk(KERN_DEBUG
1197                     "HFCPCI bchannel protocol %x-->%x ch %x-->%x\n",
1198                     bch->state, protocol, bch->nr, bc);
1199
1200         fifo2 = bc;
1201         pcm_mode = (bc>>24) & 0xff;
1202         if (pcm_mode) { /* PCM SLOT USE */
1203                 if (!test_bit(HFC_CFG_PCM, &hc->cfg))
1204                         printk(KERN_WARNING
1205                             "%s: pcm channel id without HFC_CFG_PCM\n",
1206                             __func__);
1207                 rx_slot = (bc>>8) & 0xff;
1208                 tx_slot = (bc>>16) & 0xff;
1209                 bc = bc & 0xff;
1210         } else if (test_bit(HFC_CFG_PCM, &hc->cfg) &&
1211             (protocol > ISDN_P_NONE))
1212                 printk(KERN_WARNING "%s: no pcm channel id but HFC_CFG_PCM\n",
1213                     __func__);
1214         if (hc->chanlimit > 1) {
1215                 hc->hw.bswapped = 0;    /* B1 and B2 normal mode */
1216                 hc->hw.sctrl_e &= ~0x80;
1217         } else {
1218                 if (bc & 2) {
1219                         if (protocol != ISDN_P_NONE) {
1220                                 hc->hw.bswapped = 1; /* B1 and B2 exchanged */
1221                                 hc->hw.sctrl_e |= 0x80;
1222                         } else {
1223                                 hc->hw.bswapped = 0; /* B1 and B2 normal mode */
1224                                 hc->hw.sctrl_e &= ~0x80;
1225                         }
1226                         fifo2 = 1;
1227                 } else {
1228                         hc->hw.bswapped = 0;    /* B1 and B2 normal mode */
1229                         hc->hw.sctrl_e &= ~0x80;
1230                 }
1231         }
1232         switch (protocol) {
1233         case (-1): /* used for init */
1234                 bch->state = -1;
1235                 bch->nr = bc;
1236         case (ISDN_P_NONE):
1237                 if (bch->state == ISDN_P_NONE)
1238                         return 0;
1239                 if (bc & 2) {
1240                         hc->hw.sctrl &= ~SCTRL_B2_ENA;
1241                         hc->hw.sctrl_r &= ~SCTRL_B2_ENA;
1242                 } else {
1243                         hc->hw.sctrl &= ~SCTRL_B1_ENA;
1244                         hc->hw.sctrl_r &= ~SCTRL_B1_ENA;
1245                 }
1246                 if (fifo2 & 2) {
1247                         hc->hw.fifo_en &= ~HFCPCI_FIFOEN_B2;
1248                         hc->hw.int_m1 &= ~(HFCPCI_INTS_B2TRANS +
1249                                 HFCPCI_INTS_B2REC);
1250                 } else {
1251                         hc->hw.fifo_en &= ~HFCPCI_FIFOEN_B1;
1252                         hc->hw.int_m1 &= ~(HFCPCI_INTS_B1TRANS +
1253                                 HFCPCI_INTS_B1REC);
1254                 }
1255 #ifdef REVERSE_BITORDER
1256                 if (bch->nr & 2)
1257                         hc->hw.cirm &= 0x7f;
1258                 else
1259                         hc->hw.cirm &= 0xbf;
1260 #endif
1261                 bch->state = ISDN_P_NONE;
1262                 bch->nr = bc;
1263                 test_and_clear_bit(FLG_HDLC, &bch->Flags);
1264                 test_and_clear_bit(FLG_TRANSPARENT, &bch->Flags);
1265                 break;
1266         case (ISDN_P_B_RAW):
1267                 bch->state = protocol;
1268                 bch->nr = bc;
1269                 hfcpci_clear_fifo_rx(hc, (fifo2 & 2)?1:0);
1270                 hfcpci_clear_fifo_tx(hc, (fifo2 & 2)?1:0);
1271                 if (bc & 2) {
1272                         hc->hw.sctrl |= SCTRL_B2_ENA;
1273                         hc->hw.sctrl_r |= SCTRL_B2_ENA;
1274 #ifdef REVERSE_BITORDER
1275                         hc->hw.cirm |= 0x80;
1276 #endif
1277                 } else {
1278                         hc->hw.sctrl |= SCTRL_B1_ENA;
1279                         hc->hw.sctrl_r |= SCTRL_B1_ENA;
1280 #ifdef REVERSE_BITORDER
1281                         hc->hw.cirm |= 0x40;
1282 #endif
1283                 }
1284                 if (fifo2 & 2) {
1285                         hc->hw.fifo_en |= HFCPCI_FIFOEN_B2;
1286                         hc->hw.int_m1 |= (HFCPCI_INTS_B2TRANS +
1287                             HFCPCI_INTS_B2REC);
1288                         hc->hw.ctmt |= 2;
1289                         hc->hw.conn &= ~0x18;
1290                 } else {
1291                         hc->hw.fifo_en |= HFCPCI_FIFOEN_B1;
1292                         hc->hw.int_m1 |= (HFCPCI_INTS_B1TRANS +
1293                             HFCPCI_INTS_B1REC);
1294                         hc->hw.ctmt |= 1;
1295                         hc->hw.conn &= ~0x03;
1296                 }
1297                 test_and_set_bit(FLG_TRANSPARENT, &bch->Flags);
1298                 break;
1299         case (ISDN_P_B_HDLC):
1300                 bch->state = protocol;
1301                 bch->nr = bc;
1302                 hfcpci_clear_fifo_rx(hc, (fifo2 & 2)?1:0);
1303                 hfcpci_clear_fifo_tx(hc, (fifo2 & 2)?1:0);
1304                 if (bc & 2) {
1305                         hc->hw.sctrl |= SCTRL_B2_ENA;
1306                         hc->hw.sctrl_r |= SCTRL_B2_ENA;
1307                 } else {
1308                         hc->hw.sctrl |= SCTRL_B1_ENA;
1309                         hc->hw.sctrl_r |= SCTRL_B1_ENA;
1310                 }
1311                 if (fifo2 & 2) {
1312                         hc->hw.last_bfifo_cnt[1] = 0;
1313                         hc->hw.fifo_en |= HFCPCI_FIFOEN_B2;
1314                         hc->hw.int_m1 |= (HFCPCI_INTS_B2TRANS +
1315                             HFCPCI_INTS_B2REC);
1316                         hc->hw.ctmt &= ~2;
1317                         hc->hw.conn &= ~0x18;
1318                 } else {
1319                         hc->hw.last_bfifo_cnt[0] = 0;
1320                         hc->hw.fifo_en |= HFCPCI_FIFOEN_B1;
1321                         hc->hw.int_m1 |= (HFCPCI_INTS_B1TRANS +
1322                             HFCPCI_INTS_B1REC);
1323                         hc->hw.ctmt &= ~1;
1324                         hc->hw.conn &= ~0x03;
1325                 }
1326                 test_and_set_bit(FLG_HDLC, &bch->Flags);
1327                 break;
1328         default:
1329                 printk(KERN_DEBUG "prot not known %x\n", protocol);
1330                 return -ENOPROTOOPT;
1331         }
1332         if (test_bit(HFC_CFG_PCM, &hc->cfg)) {
1333                 if ((protocol == ISDN_P_NONE) ||
1334                         (protocol == -1)) {     /* init case */
1335                         rx_slot = 0;
1336                         tx_slot = 0;
1337                 } else {
1338                         if (test_bit(HFC_CFG_SW_DD_DU, &hc->cfg)) {
1339                                 rx_slot |= 0xC0;
1340                                 tx_slot |= 0xC0;
1341                         } else {
1342                                 rx_slot |= 0x80;
1343                                 tx_slot |= 0x80;
1344                         }
1345                 }
1346                 if (bc & 2) {
1347                         hc->hw.conn &= 0xc7;
1348                         hc->hw.conn |= 0x08;
1349                         printk(KERN_DEBUG "%s: Write_hfc: B2_SSL 0x%x\n",
1350                                 __func__, tx_slot);
1351                         printk(KERN_DEBUG "%s: Write_hfc: B2_RSL 0x%x\n",
1352                                 __func__, rx_slot);
1353                         Write_hfc(hc, HFCPCI_B2_SSL, tx_slot);
1354                         Write_hfc(hc, HFCPCI_B2_RSL, rx_slot);
1355                 } else {
1356                         hc->hw.conn &= 0xf8;
1357                         hc->hw.conn |= 0x01;
1358                         printk(KERN_DEBUG "%s: Write_hfc: B1_SSL 0x%x\n",
1359                                 __func__, tx_slot);
1360                         printk(KERN_DEBUG "%s: Write_hfc: B1_RSL 0x%x\n",
1361                                 __func__, rx_slot);
1362                         Write_hfc(hc, HFCPCI_B1_SSL, tx_slot);
1363                         Write_hfc(hc, HFCPCI_B1_RSL, rx_slot);
1364                 }
1365         }
1366         Write_hfc(hc, HFCPCI_SCTRL_E, hc->hw.sctrl_e);
1367         Write_hfc(hc, HFCPCI_INT_M1, hc->hw.int_m1);
1368         Write_hfc(hc, HFCPCI_FIFO_EN, hc->hw.fifo_en);
1369         Write_hfc(hc, HFCPCI_SCTRL, hc->hw.sctrl);
1370         Write_hfc(hc, HFCPCI_SCTRL_R, hc->hw.sctrl_r);
1371         Write_hfc(hc, HFCPCI_CTMT, hc->hw.ctmt);
1372         Write_hfc(hc, HFCPCI_CONNECT, hc->hw.conn);
1373 #ifdef REVERSE_BITORDER
1374         Write_hfc(hc, HFCPCI_CIRM, hc->hw.cirm);
1375 #endif
1376         return 0;
1377 }
1378
1379 static int
1380 set_hfcpci_rxtest(struct bchannel *bch, int protocol, int chan)
1381 {
1382         struct hfc_pci  *hc = bch->hw;
1383
1384         if (bch->debug & DEBUG_HW_BCHANNEL)
1385                 printk(KERN_DEBUG
1386                     "HFCPCI bchannel test rx protocol %x-->%x ch %x-->%x\n",
1387                     bch->state, protocol, bch->nr, chan);
1388         if (bch->nr != chan) {
1389                 printk(KERN_DEBUG
1390                     "HFCPCI rxtest wrong channel parameter %x/%x\n",
1391                     bch->nr, chan);
1392                 return -EINVAL;
1393         }
1394         switch (protocol) {
1395         case (ISDN_P_B_RAW):
1396                 bch->state = protocol;
1397                 hfcpci_clear_fifo_rx(hc, (chan & 2)?1:0);
1398                 if (chan & 2) {
1399                         hc->hw.sctrl_r |= SCTRL_B2_ENA;
1400                         hc->hw.fifo_en |= HFCPCI_FIFOEN_B2RX;
1401                         hc->hw.int_m1 |= HFCPCI_INTS_B2REC;
1402                         hc->hw.ctmt |= 2;
1403                         hc->hw.conn &= ~0x18;
1404 #ifdef REVERSE_BITORDER
1405                         hc->hw.cirm |= 0x80;
1406 #endif
1407                 } else {
1408                         hc->hw.sctrl_r |= SCTRL_B1_ENA;
1409                         hc->hw.fifo_en |= HFCPCI_FIFOEN_B1RX;
1410                         hc->hw.int_m1 |= HFCPCI_INTS_B1REC;
1411                         hc->hw.ctmt |= 1;
1412                         hc->hw.conn &= ~0x03;
1413 #ifdef REVERSE_BITORDER
1414                         hc->hw.cirm |= 0x40;
1415 #endif
1416                 }
1417                 break;
1418         case (ISDN_P_B_HDLC):
1419                 bch->state = protocol;
1420                 hfcpci_clear_fifo_rx(hc, (chan & 2)?1:0);
1421                 if (chan & 2) {
1422                         hc->hw.sctrl_r |= SCTRL_B2_ENA;
1423                         hc->hw.last_bfifo_cnt[1] = 0;
1424                         hc->hw.fifo_en |= HFCPCI_FIFOEN_B2RX;
1425                         hc->hw.int_m1 |= HFCPCI_INTS_B2REC;
1426                         hc->hw.ctmt &= ~2;
1427                         hc->hw.conn &= ~0x18;
1428                 } else {
1429                         hc->hw.sctrl_r |= SCTRL_B1_ENA;
1430                         hc->hw.last_bfifo_cnt[0] = 0;
1431                         hc->hw.fifo_en |= HFCPCI_FIFOEN_B1RX;
1432                         hc->hw.int_m1 |= HFCPCI_INTS_B1REC;
1433                         hc->hw.ctmt &= ~1;
1434                         hc->hw.conn &= ~0x03;
1435                 }
1436                 break;
1437         default:
1438                 printk(KERN_DEBUG "prot not known %x\n", protocol);
1439                 return -ENOPROTOOPT;
1440         }
1441         Write_hfc(hc, HFCPCI_INT_M1, hc->hw.int_m1);
1442         Write_hfc(hc, HFCPCI_FIFO_EN, hc->hw.fifo_en);
1443         Write_hfc(hc, HFCPCI_SCTRL_R, hc->hw.sctrl_r);
1444         Write_hfc(hc, HFCPCI_CTMT, hc->hw.ctmt);
1445         Write_hfc(hc, HFCPCI_CONNECT, hc->hw.conn);
1446 #ifdef REVERSE_BITORDER
1447         Write_hfc(hc, HFCPCI_CIRM, hc->hw.cirm);
1448 #endif
1449         return 0;
1450 }
1451
1452 static void
1453 deactivate_bchannel(struct bchannel *bch)
1454 {
1455         struct hfc_pci  *hc = bch->hw;
1456         u_long          flags;
1457
1458         spin_lock_irqsave(&hc->lock, flags);
1459         if (test_and_clear_bit(FLG_TX_NEXT, &bch->Flags)) {
1460                 dev_kfree_skb(bch->next_skb);
1461                 bch->next_skb = NULL;
1462         }
1463         if (bch->tx_skb) {
1464                 dev_kfree_skb(bch->tx_skb);
1465                 bch->tx_skb = NULL;
1466         }
1467         bch->tx_idx = 0;
1468         if (bch->rx_skb) {
1469                 dev_kfree_skb(bch->rx_skb);
1470                 bch->rx_skb = NULL;
1471         }
1472         mode_hfcpci(bch, bch->nr, ISDN_P_NONE);
1473         test_and_clear_bit(FLG_ACTIVE, &bch->Flags);
1474         test_and_clear_bit(FLG_TX_BUSY, &bch->Flags);
1475         spin_unlock_irqrestore(&hc->lock, flags);
1476 }
1477
1478 /*
1479  * Layer 1 B-channel hardware access
1480  */
1481 static int
1482 channel_bctrl(struct bchannel *bch, struct mISDN_ctrl_req *cq)
1483 {
1484         int                     ret = 0;
1485
1486         switch (cq->op) {
1487         case MISDN_CTRL_GETOP:
1488                 cq->op = 0;
1489                 break;
1490         default:
1491                 printk(KERN_WARNING "%s: unknown Op %x\n", __func__, cq->op);
1492                 ret = -EINVAL;
1493                 break;
1494         }
1495         return ret;
1496 }
1497 static int
1498 hfc_bctrl(struct mISDNchannel *ch, u_int cmd, void *arg)
1499 {
1500         struct bchannel *bch = container_of(ch, struct bchannel, ch);
1501         struct hfc_pci  *hc = bch->hw;
1502         int             ret = -EINVAL;
1503         u_long          flags;
1504
1505         if (bch->debug & DEBUG_HW)
1506                 printk(KERN_DEBUG "%s: cmd:%x %p\n", __func__, cmd, arg);
1507         switch (cmd) {
1508         case HW_TESTRX_RAW:
1509                 spin_lock_irqsave(&hc->lock, flags);
1510                 ret = set_hfcpci_rxtest(bch, ISDN_P_B_RAW, (int)(long)arg);
1511                 spin_unlock_irqrestore(&hc->lock, flags);
1512                 break;
1513         case HW_TESTRX_HDLC:
1514                 spin_lock_irqsave(&hc->lock, flags);
1515                 ret = set_hfcpci_rxtest(bch, ISDN_P_B_HDLC, (int)(long)arg);
1516                 spin_unlock_irqrestore(&hc->lock, flags);
1517                 break;
1518         case HW_TESTRX_OFF:
1519                 spin_lock_irqsave(&hc->lock, flags);
1520                 mode_hfcpci(bch, bch->nr, ISDN_P_NONE);
1521                 spin_unlock_irqrestore(&hc->lock, flags);
1522                 ret = 0;
1523                 break;
1524         case CLOSE_CHANNEL:
1525                 test_and_clear_bit(FLG_OPEN, &bch->Flags);
1526                 if (test_bit(FLG_ACTIVE, &bch->Flags))
1527                         deactivate_bchannel(bch);
1528                 ch->protocol = ISDN_P_NONE;
1529                 ch->peer = NULL;
1530                 module_put(THIS_MODULE);
1531                 ret = 0;
1532                 break;
1533         case CONTROL_CHANNEL:
1534                 ret = channel_bctrl(bch, arg);
1535                 break;
1536         default:
1537                 printk(KERN_WARNING "%s: unknown prim(%x)\n",
1538                         __func__, cmd);
1539         }
1540         return ret;
1541 }
1542
1543 /*
1544  * Layer2 -> Layer 1 Dchannel data
1545  */
1546 static int
1547 hfcpci_l2l1D(struct mISDNchannel *ch, struct sk_buff *skb)
1548 {
1549         struct mISDNdevice      *dev = container_of(ch, struct mISDNdevice, D);
1550         struct dchannel         *dch = container_of(dev, struct dchannel, dev);
1551         struct hfc_pci          *hc = dch->hw;
1552         int                     ret = -EINVAL;
1553         struct mISDNhead        *hh = mISDN_HEAD_P(skb);
1554         unsigned int            id;
1555         u_long                  flags;
1556
1557         switch (hh->prim) {
1558         case PH_DATA_REQ:
1559                 spin_lock_irqsave(&hc->lock, flags);
1560                 ret = dchannel_senddata(dch, skb);
1561                 if (ret > 0) { /* direct TX */
1562                         id = hh->id; /* skb can be freed */
1563                         hfcpci_fill_dfifo(dch->hw);
1564                         ret = 0;
1565                         spin_unlock_irqrestore(&hc->lock, flags);
1566                         queue_ch_frame(ch, PH_DATA_CNF, id, NULL);
1567                 } else
1568                         spin_unlock_irqrestore(&hc->lock, flags);
1569                 return ret;
1570         case PH_ACTIVATE_REQ:
1571                 spin_lock_irqsave(&hc->lock, flags);
1572                 if (hc->hw.protocol == ISDN_P_NT_S0) {
1573                         ret = 0;
1574                         if (test_bit(HFC_CFG_MASTER, &hc->cfg))
1575                                 hc->hw.mst_m |= HFCPCI_MASTER;
1576                         Write_hfc(hc, HFCPCI_MST_MODE, hc->hw.mst_m);
1577                         if (test_bit(FLG_ACTIVE, &dch->Flags)) {
1578                                 spin_unlock_irqrestore(&hc->lock, flags);
1579                                 _queue_data(&dch->dev.D, PH_ACTIVATE_IND,
1580                                     MISDN_ID_ANY, 0, NULL, GFP_ATOMIC);
1581                                 break;
1582                         }
1583                         test_and_set_bit(FLG_L2_ACTIVATED, &dch->Flags);
1584                         Write_hfc(hc, HFCPCI_STATES, HFCPCI_ACTIVATE |
1585                             HFCPCI_DO_ACTION | 1);
1586                 } else
1587                         ret = l1_event(dch->l1, hh->prim);
1588                 spin_unlock_irqrestore(&hc->lock, flags);
1589                 break;
1590         case PH_DEACTIVATE_REQ:
1591                 test_and_clear_bit(FLG_L2_ACTIVATED, &dch->Flags);
1592                 spin_lock_irqsave(&hc->lock, flags);
1593                 if (hc->hw.protocol == ISDN_P_NT_S0) {
1594                         /* prepare deactivation */
1595                         Write_hfc(hc, HFCPCI_STATES, 0x40);
1596                         skb_queue_purge(&dch->squeue);
1597                         if (dch->tx_skb) {
1598                                 dev_kfree_skb(dch->tx_skb);
1599                                 dch->tx_skb = NULL;
1600                         }
1601                         dch->tx_idx = 0;
1602                         if (dch->rx_skb) {
1603                                 dev_kfree_skb(dch->rx_skb);
1604                                 dch->rx_skb = NULL;
1605                         }
1606                         test_and_clear_bit(FLG_TX_BUSY, &dch->Flags);
1607                         if (test_and_clear_bit(FLG_BUSY_TIMER, &dch->Flags))
1608                                 del_timer(&dch->timer);
1609 #ifdef FIXME
1610                         if (test_and_clear_bit(FLG_L1_BUSY, &dch->Flags))
1611                                 dchannel_sched_event(&hc->dch, D_CLEARBUSY);
1612 #endif
1613                         hc->hw.mst_m &= ~HFCPCI_MASTER;
1614                         Write_hfc(hc, HFCPCI_MST_MODE, hc->hw.mst_m);
1615                         ret = 0;
1616                 } else {
1617                         ret = l1_event(dch->l1, hh->prim);
1618                 }
1619                 spin_unlock_irqrestore(&hc->lock, flags);
1620                 break;
1621         }
1622         if (!ret)
1623                 dev_kfree_skb(skb);
1624         return ret;
1625 }
1626
1627 /*
1628  * Layer2 -> Layer 1 Bchannel data
1629  */
1630 static int
1631 hfcpci_l2l1B(struct mISDNchannel *ch, struct sk_buff *skb)
1632 {
1633         struct bchannel         *bch = container_of(ch, struct bchannel, ch);
1634         struct hfc_pci          *hc = bch->hw;
1635         int                     ret = -EINVAL;
1636         struct mISDNhead        *hh = mISDN_HEAD_P(skb);
1637         unsigned int            id;
1638         u_long                  flags;
1639
1640         switch (hh->prim) {
1641         case PH_DATA_REQ:
1642                 spin_lock_irqsave(&hc->lock, flags);
1643                 ret = bchannel_senddata(bch, skb);
1644                 if (ret > 0) { /* direct TX */
1645                         id = hh->id; /* skb can be freed */
1646                         hfcpci_fill_fifo(bch);
1647                         ret = 0;
1648                         spin_unlock_irqrestore(&hc->lock, flags);
1649                         if (!test_bit(FLG_TRANSPARENT, &bch->Flags))
1650                                 queue_ch_frame(ch, PH_DATA_CNF, id, NULL);
1651                 } else
1652                         spin_unlock_irqrestore(&hc->lock, flags);
1653                 return ret;
1654         case PH_ACTIVATE_REQ:
1655                 spin_lock_irqsave(&hc->lock, flags);
1656                 if (!test_and_set_bit(FLG_ACTIVE, &bch->Flags))
1657                         ret = mode_hfcpci(bch, bch->nr, ch->protocol);
1658                 else
1659                         ret = 0;
1660                 spin_unlock_irqrestore(&hc->lock, flags);
1661                 if (!ret)
1662                         _queue_data(ch, PH_ACTIVATE_IND, MISDN_ID_ANY, 0,
1663                                 NULL, GFP_KERNEL);
1664                 break;
1665         case PH_DEACTIVATE_REQ:
1666                 deactivate_bchannel(bch);
1667                 _queue_data(ch, PH_DEACTIVATE_IND, MISDN_ID_ANY, 0,
1668                         NULL, GFP_KERNEL);
1669                 ret = 0;
1670                 break;
1671         }
1672         if (!ret)
1673                 dev_kfree_skb(skb);
1674         return ret;
1675 }
1676
1677 /*
1678  * called for card init message
1679  */
1680
1681 static void
1682 inithfcpci(struct hfc_pci *hc)
1683 {
1684         printk(KERN_DEBUG "inithfcpci: entered\n");
1685         hc->dch.timer.function = (void *) hfcpci_dbusy_timer;
1686         hc->dch.timer.data = (long) &hc->dch;
1687         init_timer(&hc->dch.timer);
1688         hc->chanlimit = 2;
1689         mode_hfcpci(&hc->bch[0], 1, -1);
1690         mode_hfcpci(&hc->bch[1], 2, -1);
1691 }
1692
1693
1694 static int
1695 init_card(struct hfc_pci *hc)
1696 {
1697         int     cnt = 3;
1698         u_long  flags;
1699
1700         printk(KERN_DEBUG "init_card: entered\n");
1701
1702
1703         spin_lock_irqsave(&hc->lock, flags);
1704         disable_hwirq(hc);
1705         spin_unlock_irqrestore(&hc->lock, flags);
1706         if (request_irq(hc->irq, hfcpci_int, IRQF_SHARED, "HFC PCI", hc)) {
1707                 printk(KERN_WARNING
1708                     "mISDN: couldn't get interrupt %d\n", hc->irq);
1709                 return -EIO;
1710         }
1711         spin_lock_irqsave(&hc->lock, flags);
1712         reset_hfcpci(hc);
1713         while (cnt) {
1714                 inithfcpci(hc);
1715                 /*
1716                  * Finally enable IRQ output
1717                  * this is only allowed, if an IRQ routine is allready
1718                  * established for this HFC, so don't do that earlier
1719                  */
1720                 enable_hwirq(hc);
1721                 spin_unlock_irqrestore(&hc->lock, flags);
1722                 /* Timeout 80ms */
1723                 current->state = TASK_UNINTERRUPTIBLE;
1724                 schedule_timeout((80*HZ)/1000);
1725                 printk(KERN_INFO "HFC PCI: IRQ %d count %d\n",
1726                         hc->irq, hc->irqcnt);
1727                 /* now switch timer interrupt off */
1728                 spin_lock_irqsave(&hc->lock, flags);
1729                 hc->hw.int_m1 &= ~HFCPCI_INTS_TIMER;
1730                 Write_hfc(hc, HFCPCI_INT_M1, hc->hw.int_m1);
1731                 /* reinit mode reg */
1732                 Write_hfc(hc, HFCPCI_MST_MODE, hc->hw.mst_m);
1733                 if (!hc->irqcnt) {
1734                         printk(KERN_WARNING
1735                             "HFC PCI: IRQ(%d) getting no interrupts "
1736                             "during init %d\n", hc->irq, 4 - cnt);
1737                         if (cnt == 1) {
1738                                 spin_unlock_irqrestore(&hc->lock, flags);
1739                                 return -EIO;
1740                         } else {
1741                                 reset_hfcpci(hc);
1742                                 cnt--;
1743                         }
1744                 } else {
1745                         spin_unlock_irqrestore(&hc->lock, flags);
1746                         hc->initdone = 1;
1747                         return 0;
1748                 }
1749         }
1750         disable_hwirq(hc);
1751         spin_unlock_irqrestore(&hc->lock, flags);
1752         free_irq(hc->irq, hc);
1753         return -EIO;
1754 }
1755
1756 static int
1757 channel_ctrl(struct hfc_pci *hc, struct mISDN_ctrl_req *cq)
1758 {
1759         int     ret = 0;
1760         u_char  slot;
1761
1762         switch (cq->op) {
1763         case MISDN_CTRL_GETOP:
1764                 cq->op = MISDN_CTRL_LOOP | MISDN_CTRL_CONNECT |
1765                     MISDN_CTRL_DISCONNECT;
1766                 break;
1767         case MISDN_CTRL_LOOP:
1768                 /* channel 0 disabled loop */
1769                 if (cq->channel < 0 || cq->channel > 2) {
1770                         ret = -EINVAL;
1771                         break;
1772                 }
1773                 if (cq->channel & 1) {
1774                         if (test_bit(HFC_CFG_SW_DD_DU, &hc->cfg))
1775                                 slot = 0xC0;
1776                         else
1777                                 slot = 0x80;
1778                         printk(KERN_DEBUG "%s: Write_hfc: B1_SSL/RSL 0x%x\n",
1779                             __func__, slot);
1780                         Write_hfc(hc, HFCPCI_B1_SSL, slot);
1781                         Write_hfc(hc, HFCPCI_B1_RSL, slot);
1782                         hc->hw.conn = (hc->hw.conn & ~7) | 6;
1783                         Write_hfc(hc, HFCPCI_CONNECT, hc->hw.conn);
1784                 }
1785                 if (cq->channel & 2) {
1786                         if (test_bit(HFC_CFG_SW_DD_DU, &hc->cfg))
1787                                 slot = 0xC1;
1788                         else
1789                                 slot = 0x81;
1790                         printk(KERN_DEBUG "%s: Write_hfc: B2_SSL/RSL 0x%x\n",
1791                             __func__, slot);
1792                         Write_hfc(hc, HFCPCI_B2_SSL, slot);
1793                         Write_hfc(hc, HFCPCI_B2_RSL, slot);
1794                         hc->hw.conn = (hc->hw.conn & ~0x38) | 0x30;
1795                         Write_hfc(hc, HFCPCI_CONNECT, hc->hw.conn);
1796                 }
1797                 if (cq->channel & 3)
1798                         hc->hw.trm |= 0x80;     /* enable IOM-loop */
1799                 else {
1800                         hc->hw.conn = (hc->hw.conn & ~0x3f) | 0x09;
1801                         Write_hfc(hc, HFCPCI_CONNECT, hc->hw.conn);
1802                         hc->hw.trm &= 0x7f;     /* disable IOM-loop */
1803                 }
1804                 Write_hfc(hc, HFCPCI_TRM, hc->hw.trm);
1805                 break;
1806         case MISDN_CTRL_CONNECT:
1807                 if (cq->channel == cq->p1) {
1808                         ret = -EINVAL;
1809                         break;
1810                 }
1811                 if (cq->channel < 1 || cq->channel > 2 ||
1812                     cq->p1 < 1 || cq->p1 > 2) {
1813                         ret = -EINVAL;
1814                         break;
1815                 }
1816                 if (test_bit(HFC_CFG_SW_DD_DU, &hc->cfg))
1817                         slot = 0xC0;
1818                 else
1819                         slot = 0x80;
1820                 printk(KERN_DEBUG "%s: Write_hfc: B1_SSL/RSL 0x%x\n",
1821                     __func__, slot);
1822                 Write_hfc(hc, HFCPCI_B1_SSL, slot);
1823                 Write_hfc(hc, HFCPCI_B2_RSL, slot);
1824                 if (test_bit(HFC_CFG_SW_DD_DU, &hc->cfg))
1825                         slot = 0xC1;
1826                 else
1827                         slot = 0x81;
1828                 printk(KERN_DEBUG "%s: Write_hfc: B2_SSL/RSL 0x%x\n",
1829                     __func__, slot);
1830                 Write_hfc(hc, HFCPCI_B2_SSL, slot);
1831                 Write_hfc(hc, HFCPCI_B1_RSL, slot);
1832                 hc->hw.conn = (hc->hw.conn & ~0x3f) | 0x36;
1833                 Write_hfc(hc, HFCPCI_CONNECT, hc->hw.conn);
1834                 hc->hw.trm |= 0x80;
1835                 Write_hfc(hc, HFCPCI_TRM, hc->hw.trm);
1836                 break;
1837         case MISDN_CTRL_DISCONNECT:
1838                 hc->hw.conn = (hc->hw.conn & ~0x3f) | 0x09;
1839                 Write_hfc(hc, HFCPCI_CONNECT, hc->hw.conn);
1840                 hc->hw.trm &= 0x7f;     /* disable IOM-loop */
1841                 break;
1842         default:
1843                 printk(KERN_WARNING "%s: unknown Op %x\n",
1844                     __func__, cq->op);
1845                 ret = -EINVAL;
1846                 break;
1847         }
1848         return ret;
1849 }
1850
1851 static int
1852 open_dchannel(struct hfc_pci *hc, struct mISDNchannel *ch,
1853     struct channel_req *rq)
1854 {
1855         int err = 0;
1856
1857         if (debug & DEBUG_HW_OPEN)
1858                 printk(KERN_DEBUG "%s: dev(%d) open from %p\n", __func__,
1859                     hc->dch.dev.id, __builtin_return_address(0));
1860         if (rq->protocol == ISDN_P_NONE)
1861                 return -EINVAL;
1862         if (!hc->initdone) {
1863                 if (rq->protocol == ISDN_P_TE_S0) {
1864                         err = create_l1(&hc->dch, hfc_l1callback);
1865                         if (err)
1866                                 return err;
1867                 }
1868                 hc->hw.protocol = rq->protocol;
1869                 ch->protocol = rq->protocol;
1870                 err = init_card(hc);
1871                 if (err)
1872                         return err;
1873         } else {
1874                 if (rq->protocol != ch->protocol) {
1875                         if (hc->hw.protocol == ISDN_P_TE_S0)
1876                                 l1_event(hc->dch.l1, CLOSE_CHANNEL);
1877                         hc->hw.protocol = rq->protocol;
1878                         ch->protocol = rq->protocol;
1879                         hfcpci_setmode(hc);
1880                 }
1881         }
1882
1883         if (((ch->protocol == ISDN_P_NT_S0) && (hc->dch.state == 3)) ||
1884             ((ch->protocol == ISDN_P_TE_S0) && (hc->dch.state == 7))) {
1885                 _queue_data(ch, PH_ACTIVATE_IND, MISDN_ID_ANY,
1886                     0, NULL, GFP_KERNEL);
1887         }
1888         rq->ch = ch;
1889         if (!try_module_get(THIS_MODULE))
1890                 printk(KERN_WARNING "%s:cannot get module\n", __func__);
1891         return 0;
1892 }
1893
1894 static int
1895 open_bchannel(struct hfc_pci *hc, struct channel_req *rq)
1896 {
1897         struct bchannel         *bch;
1898
1899         if (rq->adr.channel > 2)
1900                 return -EINVAL;
1901         if (rq->protocol == ISDN_P_NONE)
1902                 return -EINVAL;
1903         bch = &hc->bch[rq->adr.channel - 1];
1904         if (test_and_set_bit(FLG_OPEN, &bch->Flags))
1905                 return -EBUSY; /* b-channel can be only open once */
1906         bch->ch.protocol = rq->protocol;
1907         rq->ch = &bch->ch; /* TODO: E-channel */
1908         if (!try_module_get(THIS_MODULE))
1909                 printk(KERN_WARNING "%s:cannot get module\n", __func__);
1910         return 0;
1911 }
1912
1913 /*
1914  * device control function
1915  */
1916 static int
1917 hfc_dctrl(struct mISDNchannel *ch, u_int cmd, void *arg)
1918 {
1919         struct mISDNdevice      *dev = container_of(ch, struct mISDNdevice, D);
1920         struct dchannel         *dch = container_of(dev, struct dchannel, dev);
1921         struct hfc_pci          *hc = dch->hw;
1922         struct channel_req      *rq;
1923         int                     err = 0;
1924
1925         if (dch->debug & DEBUG_HW)
1926                 printk(KERN_DEBUG "%s: cmd:%x %p\n",
1927                     __func__, cmd, arg);
1928         switch (cmd) {
1929         case OPEN_CHANNEL:
1930                 rq = arg;
1931                 if (rq->adr.channel == 0)
1932                         err = open_dchannel(hc, ch, rq);
1933                 else
1934                         err = open_bchannel(hc, rq);
1935                 break;
1936         case CLOSE_CHANNEL:
1937                 if (debug & DEBUG_HW_OPEN)
1938                         printk(KERN_DEBUG "%s: dev(%d) close from %p\n",
1939                             __func__, hc->dch.dev.id,
1940                             __builtin_return_address(0));
1941                 module_put(THIS_MODULE);
1942                 break;
1943         case CONTROL_CHANNEL:
1944                 err = channel_ctrl(hc, arg);
1945                 break;
1946         default:
1947                 if (dch->debug & DEBUG_HW)
1948                         printk(KERN_DEBUG "%s: unknown command %x\n",
1949                             __func__, cmd);
1950                 return -EINVAL;
1951         }
1952         return err;
1953 }
1954
1955 static int
1956 setup_hw(struct hfc_pci *hc)
1957 {
1958         void    *buffer;
1959
1960         printk(KERN_INFO "mISDN: HFC-PCI driver %s\n", hfcpci_revision);
1961         hc->hw.cirm = 0;
1962         hc->dch.state = 0;
1963         pci_set_master(hc->pdev);
1964         if (!hc->irq) {
1965                 printk(KERN_WARNING "HFC-PCI: No IRQ for PCI card found\n");
1966                 return 1;
1967         }
1968         hc->hw.pci_io = (char __iomem *)(unsigned long)hc->pdev->resource[1].start;
1969
1970         if (!hc->hw.pci_io) {
1971                 printk(KERN_WARNING "HFC-PCI: No IO-Mem for PCI card found\n");
1972                 return 1;
1973         }
1974         /* Allocate memory for FIFOS */
1975         /* the memory needs to be on a 32k boundary within the first 4G */
1976         pci_set_dma_mask(hc->pdev, 0xFFFF8000);
1977         buffer = pci_alloc_consistent(hc->pdev, 0x8000, &hc->hw.dmahandle);
1978         /* We silently assume the address is okay if nonzero */
1979         if (!buffer) {
1980                 printk(KERN_WARNING
1981                     "HFC-PCI: Error allocating memory for FIFO!\n");
1982                 return 1;
1983         }
1984         hc->hw.fifos = buffer;
1985         pci_write_config_dword(hc->pdev, 0x80, hc->hw.dmahandle);
1986         hc->hw.pci_io = ioremap((ulong) hc->hw.pci_io, 256);
1987         printk(KERN_INFO
1988                 "HFC-PCI: defined at mem %#lx fifo %#lx(%#lx) IRQ %d HZ %d\n",
1989                 (u_long) hc->hw.pci_io, (u_long) hc->hw.fifos,
1990                 (u_long) hc->hw.dmahandle, hc->irq, HZ);
1991         /* enable memory mapped ports, disable busmaster */
1992         pci_write_config_word(hc->pdev, PCI_COMMAND, PCI_ENA_MEMIO);
1993         hc->hw.int_m2 = 0;
1994         disable_hwirq(hc);
1995         hc->hw.int_m1 = 0;
1996         Write_hfc(hc, HFCPCI_INT_M1, hc->hw.int_m1);
1997         /* At this point the needed PCI config is done */
1998         /* fifos are still not enabled */
1999         hc->hw.timer.function = (void *) hfcpci_Timer;
2000         hc->hw.timer.data = (long) hc;
2001         init_timer(&hc->hw.timer);
2002         /* default PCM master */
2003         test_and_set_bit(HFC_CFG_MASTER, &hc->cfg);
2004         return 0;
2005 }
2006
2007 static void
2008 release_card(struct hfc_pci *hc) {
2009         u_long  flags;
2010
2011         spin_lock_irqsave(&hc->lock, flags);
2012         hc->hw.int_m2 = 0; /* interrupt output off ! */
2013         disable_hwirq(hc);
2014         mode_hfcpci(&hc->bch[0], 1, ISDN_P_NONE);
2015         mode_hfcpci(&hc->bch[1], 2, ISDN_P_NONE);
2016         if (hc->dch.timer.function != NULL) {
2017                 del_timer(&hc->dch.timer);
2018                 hc->dch.timer.function = NULL;
2019         }
2020         spin_unlock_irqrestore(&hc->lock, flags);
2021         if (hc->hw.protocol == ISDN_P_TE_S0)
2022                 l1_event(hc->dch.l1, CLOSE_CHANNEL);
2023         if (hc->initdone)
2024                 free_irq(hc->irq, hc);
2025         release_io_hfcpci(hc); /* must release after free_irq! */
2026         mISDN_unregister_device(&hc->dch.dev);
2027         mISDN_freebchannel(&hc->bch[1]);
2028         mISDN_freebchannel(&hc->bch[0]);
2029         mISDN_freedchannel(&hc->dch);
2030         list_del(&hc->list);
2031         pci_set_drvdata(hc->pdev, NULL);
2032         kfree(hc);
2033 }
2034
2035 static int
2036 setup_card(struct hfc_pci *card)
2037 {
2038         int             err = -EINVAL;
2039         u_int           i;
2040         u_long          flags;
2041         char            name[MISDN_MAX_IDLEN];
2042
2043         if (HFC_cnt >= MAX_CARDS)
2044                 return -EINVAL; /* maybe better value */
2045
2046         card->dch.debug = debug;
2047         spin_lock_init(&card->lock);
2048         mISDN_initdchannel(&card->dch, MAX_DFRAME_LEN_L1, ph_state);
2049         card->dch.hw = card;
2050         card->dch.dev.Dprotocols = (1 << ISDN_P_TE_S0) | (1 << ISDN_P_NT_S0);
2051         card->dch.dev.Bprotocols = (1 << (ISDN_P_B_RAW & ISDN_P_B_MASK)) |
2052             (1 << (ISDN_P_B_HDLC & ISDN_P_B_MASK));
2053         card->dch.dev.D.send = hfcpci_l2l1D;
2054         card->dch.dev.D.ctrl = hfc_dctrl;
2055         card->dch.dev.nrbchan = 2;
2056         for (i = 0; i < 2; i++) {
2057                 card->bch[i].nr = i + 1;
2058                 set_channelmap(i + 1, card->dch.dev.channelmap);
2059                 card->bch[i].debug = debug;
2060                 mISDN_initbchannel(&card->bch[i], MAX_DATA_MEM);
2061                 card->bch[i].hw = card;
2062                 card->bch[i].ch.send = hfcpci_l2l1B;
2063                 card->bch[i].ch.ctrl = hfc_bctrl;
2064                 card->bch[i].ch.nr = i + 1;
2065                 list_add(&card->bch[i].ch.list, &card->dch.dev.bchannels);
2066         }
2067         err = setup_hw(card);
2068         if (err)
2069                 goto error;
2070         snprintf(name, MISDN_MAX_IDLEN - 1, "hfc-pci.%d", HFC_cnt + 1);
2071         err = mISDN_register_device(&card->dch.dev, name);
2072         if (err)
2073                 goto error;
2074         HFC_cnt++;
2075         write_lock_irqsave(&HFClock, flags);
2076         list_add_tail(&card->list, &HFClist);
2077         write_unlock_irqrestore(&HFClock, flags);
2078         printk(KERN_INFO "HFC %d cards installed\n", HFC_cnt);
2079         return 0;
2080 error:
2081         mISDN_freebchannel(&card->bch[1]);
2082         mISDN_freebchannel(&card->bch[0]);
2083         mISDN_freedchannel(&card->dch);
2084         kfree(card);
2085         return err;
2086 }
2087
2088 /* private data in the PCI devices list */
2089 struct _hfc_map {
2090         u_int   subtype;
2091         u_int   flag;
2092         char    *name;
2093 };
2094
2095 static const struct _hfc_map hfc_map[] =
2096 {
2097         {HFC_CCD_2BD0, 0, "CCD/Billion/Asuscom 2BD0"},
2098         {HFC_CCD_B000, 0, "Billion B000"},
2099         {HFC_CCD_B006, 0, "Billion B006"},
2100         {HFC_CCD_B007, 0, "Billion B007"},
2101         {HFC_CCD_B008, 0, "Billion B008"},
2102         {HFC_CCD_B009, 0, "Billion B009"},
2103         {HFC_CCD_B00A, 0, "Billion B00A"},
2104         {HFC_CCD_B00B, 0, "Billion B00B"},
2105         {HFC_CCD_B00C, 0, "Billion B00C"},
2106         {HFC_CCD_B100, 0, "Seyeon B100"},
2107         {HFC_CCD_B700, 0, "Primux II S0 B700"},
2108         {HFC_CCD_B701, 0, "Primux II S0 NT B701"},
2109         {HFC_ABOCOM_2BD1, 0, "Abocom/Magitek 2BD1"},
2110         {HFC_ASUS_0675, 0, "Asuscom/Askey 675"},
2111         {HFC_BERKOM_TCONCEPT, 0, "German telekom T-Concept"},
2112         {HFC_BERKOM_A1T, 0, "German telekom A1T"},
2113         {HFC_ANIGMA_MC145575, 0, "Motorola MC145575"},
2114         {HFC_ZOLTRIX_2BD0, 0, "Zoltrix 2BD0"},
2115         {HFC_DIGI_DF_M_IOM2_E, 0,
2116             "Digi International DataFire Micro V IOM2 (Europe)"},
2117         {HFC_DIGI_DF_M_E, 0,
2118             "Digi International DataFire Micro V (Europe)"},
2119         {HFC_DIGI_DF_M_IOM2_A, 0,
2120             "Digi International DataFire Micro V IOM2 (North America)"},
2121         {HFC_DIGI_DF_M_A, 0,
2122             "Digi International DataFire Micro V (North America)"},
2123         {HFC_SITECOM_DC105V2, 0, "Sitecom Connectivity DC-105 ISDN TA"},
2124         {},
2125 };
2126
2127 static struct pci_device_id hfc_ids[] =
2128 {
2129         {PCI_VENDOR_ID_CCD, PCI_DEVICE_ID_CCD_2BD0,
2130                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, (unsigned long) &hfc_map[0]},
2131         {PCI_VENDOR_ID_CCD, PCI_DEVICE_ID_CCD_B000,
2132                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, (unsigned long) &hfc_map[1]},
2133         {PCI_VENDOR_ID_CCD, PCI_DEVICE_ID_CCD_B006,
2134                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, (unsigned long) &hfc_map[2]},
2135         {PCI_VENDOR_ID_CCD, PCI_DEVICE_ID_CCD_B007,
2136                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, (unsigned long) &hfc_map[3]},
2137         {PCI_VENDOR_ID_CCD, PCI_DEVICE_ID_CCD_B008,
2138                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, (unsigned long) &hfc_map[4]},
2139         {PCI_VENDOR_ID_CCD, PCI_DEVICE_ID_CCD_B009,
2140                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, (unsigned long) &hfc_map[5]},
2141         {PCI_VENDOR_ID_CCD, PCI_DEVICE_ID_CCD_B00A,
2142                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, (unsigned long) &hfc_map[6]},
2143         {PCI_VENDOR_ID_CCD, PCI_DEVICE_ID_CCD_B00B,
2144                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, (unsigned long) &hfc_map[7]},
2145         {PCI_VENDOR_ID_CCD, PCI_DEVICE_ID_CCD_B00C,
2146                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, (unsigned long) &hfc_map[8]},
2147         {PCI_VENDOR_ID_CCD, PCI_DEVICE_ID_CCD_B100,
2148                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, (unsigned long) &hfc_map[9]},
2149         {PCI_VENDOR_ID_CCD, PCI_DEVICE_ID_CCD_B700,
2150                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, (unsigned long) &hfc_map[10]},
2151         {PCI_VENDOR_ID_CCD, PCI_DEVICE_ID_CCD_B701,
2152                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, (unsigned long) &hfc_map[11]},
2153         {PCI_VENDOR_ID_ABOCOM, PCI_DEVICE_ID_ABOCOM_2BD1,
2154                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, (unsigned long) &hfc_map[12]},
2155         {PCI_VENDOR_ID_ASUSTEK, PCI_DEVICE_ID_ASUSTEK_0675,
2156                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, (unsigned long) &hfc_map[13]},
2157         {PCI_VENDOR_ID_BERKOM, PCI_DEVICE_ID_BERKOM_T_CONCEPT,
2158                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, (unsigned long) &hfc_map[14]},
2159         {PCI_VENDOR_ID_BERKOM, PCI_DEVICE_ID_BERKOM_A1T,
2160                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, (unsigned long) &hfc_map[15]},
2161         {PCI_VENDOR_ID_ANIGMA, PCI_DEVICE_ID_ANIGMA_MC145575,
2162                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, (unsigned long) &hfc_map[16]},
2163         {PCI_VENDOR_ID_ZOLTRIX, PCI_DEVICE_ID_ZOLTRIX_2BD0,
2164                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, (unsigned long) &hfc_map[17]},
2165         {PCI_VENDOR_ID_DIGI, PCI_DEVICE_ID_DIGI_DF_M_IOM2_E,
2166                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, (unsigned long) &hfc_map[18]},
2167         {PCI_VENDOR_ID_DIGI, PCI_DEVICE_ID_DIGI_DF_M_E,
2168                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, (unsigned long) &hfc_map[19]},
2169         {PCI_VENDOR_ID_DIGI, PCI_DEVICE_ID_DIGI_DF_M_IOM2_A,
2170                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, (unsigned long) &hfc_map[20]},
2171         {PCI_VENDOR_ID_DIGI, PCI_DEVICE_ID_DIGI_DF_M_A,
2172                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, (unsigned long) &hfc_map[21]},
2173         {PCI_VENDOR_ID_SITECOM, PCI_DEVICE_ID_SITECOM_DC105V2,
2174                 PCI_ANY_ID, PCI_ANY_ID, 0, 0, (unsigned long) &hfc_map[22]},
2175         {},
2176 };
2177
2178 static int __devinit
2179 hfc_probe(struct pci_dev *pdev, const struct pci_device_id *ent)
2180 {
2181         int             err = -ENOMEM;
2182         struct hfc_pci  *card;
2183         struct _hfc_map *m = (struct _hfc_map *)ent->driver_data;
2184
2185         card = kzalloc(sizeof(struct hfc_pci), GFP_ATOMIC);
2186         if (!card) {
2187                 printk(KERN_ERR "No kmem for HFC card\n");
2188                 return err;
2189         }
2190         card->pdev = pdev;
2191         card->subtype = m->subtype;
2192         err = pci_enable_device(pdev);
2193         if (err) {
2194                 kfree(card);
2195                 return err;
2196         }
2197
2198         printk(KERN_INFO "mISDN_hfcpci: found adapter %s at %s\n",
2199                m->name, pci_name(pdev));
2200
2201         card->irq = pdev->irq;
2202         pci_set_drvdata(pdev, card);
2203         err = setup_card(card);
2204         if (err)
2205                 pci_set_drvdata(pdev, NULL);
2206         return err;
2207 }
2208
2209 static void __devexit
2210 hfc_remove_pci(struct pci_dev *pdev)
2211 {
2212         struct hfc_pci  *card = pci_get_drvdata(pdev);
2213         u_long          flags;
2214
2215         if (card) {
2216                 write_lock_irqsave(&HFClock, flags);
2217                 release_card(card);
2218                 write_unlock_irqrestore(&HFClock, flags);
2219         } else
2220                 if (debug)
2221                         printk(KERN_WARNING "%s: drvdata allready removed\n",
2222                             __func__);
2223 }
2224
2225
2226 static struct pci_driver hfc_driver = {
2227         .name = "hfcpci",
2228         .probe = hfc_probe,
2229         .remove = __devexit_p(hfc_remove_pci),
2230         .id_table = hfc_ids,
2231 };
2232
2233 static int __init
2234 HFC_init(void)
2235 {
2236         int             err;
2237
2238         err = pci_register_driver(&hfc_driver);
2239         return err;
2240 }
2241
2242 static void __exit
2243 HFC_cleanup(void)
2244 {
2245         struct hfc_pci  *card, *next;
2246
2247         list_for_each_entry_safe(card, next, &HFClist, list) {
2248                 release_card(card);
2249         }
2250         pci_unregister_driver(&hfc_driver);
2251 }
2252
2253 module_init(HFC_init);
2254 module_exit(HFC_cleanup);