drivers/isdn/hardware/avm/b1dma.c

   1 /* $Id: b1dma.c,v 1.1.2.3 2004/02/10 01:07:12 keil Exp $
   2  *
   3  * Common module for AVM B1 cards that support dma with AMCC
   4  *
   5  * Copyright 2000 by Carsten Paeth <calle@calle.de>
   6  *
   7  * This software may be used and distributed according to the terms
   8  * of the GNU General Public License, incorporated herein by reference.
   9  *
  10  */
  11
  12 #include <linux/module.h>
  13 #include <linux/kernel.h>
  14 #include <linux/proc_fs.h>
  15 #include <linux/seq_file.h>
  16 #include <linux/skbuff.h>
  17 #include <linux/delay.h>
  18 #include <linux/mm.h>
  19 #include <linux/interrupt.h>
  20 #include <linux/ioport.h>
  21 #include <linux/capi.h>
  22 #include <linux/kernelcapi.h>
  23 #include <linux/gfp.h>
  24 #include <asm/io.h>
  25 #include <linux/init.h>
  26 #include <asm/uaccess.h>
  27 #include <linux/netdevice.h>
  28 #include <linux/isdn/capilli.h>
  29 #include "avmcard.h"
  30 #include <linux/isdn/capicmd.h>
  31 #include <linux/isdn/capiutil.h>
  32
  33 static char *revision = "$Revision: 1.1.2.3 $";
  34
  35 #undef AVM_B1DMA_DEBUG
  36
  37 /* ------------------------------------------------------------- */
  38
  39 MODULE_DESCRIPTION("CAPI4Linux: DMA support for active AVM cards");
  40 MODULE_AUTHOR("Carsten Paeth");
  41 MODULE_LICENSE("GPL");
  42
  43 static bool suppress_pollack = 0;
  44 module_param(suppress_pollack, bool, 0);
  45
  46 /* ------------------------------------------------------------- */
  47
  48 static void b1dma_dispatch_tx(avmcard *card);
  49
  50 /* ------------------------------------------------------------- */
  51
  52 /* S5933 */
  53
  54 #define AMCC_RXPTR      0x24
  55 #define AMCC_RXLEN      0x28
  56 #define AMCC_TXPTR      0x2c
  57 #define AMCC_TXLEN      0x30
  58
  59 #define AMCC_INTCSR     0x38
  60 #       define EN_READ_TC_INT           0x00008000L
  61 #       define EN_WRITE_TC_INT          0x00004000L
  62 #       define EN_TX_TC_INT             EN_READ_TC_INT
  63 #       define EN_RX_TC_INT             EN_WRITE_TC_INT
  64 #       define AVM_FLAG                 0x30000000L
  65
  66 #       define ANY_S5933_INT            0x00800000L
  67 #       define READ_TC_INT              0x00080000L
  68 #       define WRITE_TC_INT             0x00040000L
  69 #       define  TX_TC_INT               READ_TC_INT
  70 #       define  RX_TC_INT               WRITE_TC_INT
  71 #       define MASTER_ABORT_INT         0x00100000L
  72 #       define TARGET_ABORT_INT         0x00200000L
  73 #       define BUS_MASTER_INT           0x00200000L
  74 #       define ALL_INT                  0x000C0000L
  75
  76 #define AMCC_MCSR       0x3c
  77 #       define A2P_HI_PRIORITY          0x00000100L
  78 #       define EN_A2P_TRANSFERS         0x00000400L
  79 #       define P2A_HI_PRIORITY          0x00001000L
  80 #       define EN_P2A_TRANSFERS         0x00004000L
  81 #       define RESET_A2P_FLAGS          0x04000000L
  82 #       define RESET_P2A_FLAGS          0x02000000L
  83
  84 /* ------------------------------------------------------------- */
  85
  86 static inline void b1dma_writel(avmcard *card, u32 value, int off)
  87 {
  88         writel(value, card->mbase + off);
  89 }
  90
  91 static inline u32 b1dma_readl(avmcard *card, int off)
  92 {
  93         return readl(card->mbase + off);
  94 }
  95
  96 /* ------------------------------------------------------------- */
  97
  98 static inline int b1dma_tx_empty(unsigned int port)
  99 {
 100         return inb(port + 0x03) & 0x1;
 101 }
 102
 103 static inline int b1dma_rx_full(unsigned int port)
 104 {
 105         return inb(port + 0x02) & 0x1;
 106 }
 107
 108 static int b1dma_tolink(avmcard *card, void *buf, unsigned int len)
 109 {
 110         unsigned long stop = jiffies + 1 * HZ;  /* maximum wait time 1 sec */
 111         unsigned char *s = (unsigned char *)buf;
 112         while (len--) {
 113                 while (!b1dma_tx_empty(card->port)
 114                        && time_before(jiffies, stop));
 115                 if (!b1dma_tx_empty(card->port))
 116                         return -1;
 117                 t1outp(card->port, 0x01, *s++);
 118         }
 119         return 0;
 120 }
 121
 122 static int b1dma_fromlink(avmcard *card, void *buf, unsigned int len)
 123 {
 124         unsigned long stop = jiffies + 1 * HZ;  /* maximum wait time 1 sec */
 125         unsigned char *s = (unsigned char *)buf;
 126         while (len--) {
 127                 while (!b1dma_rx_full(card->port)
 128                        && time_before(jiffies, stop));
 129                 if (!b1dma_rx_full(card->port))
 130                         return -1;
 131                 *s++ = t1inp(card->port, 0x00);
 132         }
 133         return 0;
 134 }
 135
 136 static int WriteReg(avmcard *card, u32 reg, u8 val)
 137 {
 138         u8 cmd = 0x00;
 139         if (b1dma_tolink(card, &cmd, 1) == 0
 140             && b1dma_tolink(card, &reg, 4) == 0) {
 141                 u32 tmp = val;
 142                 return b1dma_tolink(card, &tmp, 4);
 143         }
 144         return -1;
 145 }
 146
 147 static u8 ReadReg(avmcard *card, u32 reg)
 148 {
 149         u8 cmd = 0x01;
 150         if (b1dma_tolink(card, &cmd, 1) == 0
 151             && b1dma_tolink(card, &reg, 4) == 0) {
 152                 u32 tmp;
 153                 if (b1dma_fromlink(card, &tmp, 4) == 0)
 154                         return (u8)tmp;
 155         }
 156         return 0xff;
 157 }
 158
 159 /* ------------------------------------------------------------- */
 160
 161 static inline void _put_byte(void **pp, u8 val)
 162 {
 163         u8 *s = *pp;
 164         *s++ = val;
 165         *pp = s;
 166 }
 167
 168 static inline void _put_word(void **pp, u32 val)
 169 {
 170         u8 *s = *pp;
 171         *s++ = val & 0xff;
 172         *s++ = (val >> 8) & 0xff;
 173         *s++ = (val >> 16) & 0xff;
 174         *s++ = (val >> 24) & 0xff;
 175         *pp = s;
 176 }
 177
 178 static inline void _put_slice(void **pp, unsigned char *dp, unsigned int len)
 179 {
 180         unsigned i = len;
 181         _put_word(pp, i);
 182         while (i-- > 0)
 183                 _put_byte(pp, *dp++);
 184 }
 185
 186 static inline u8 _get_byte(void **pp)
 187 {
 188         u8 *s = *pp;
 189         u8 val;
 190         val = *s++;
 191         *pp = s;
 192         return val;
 193 }
 194
 195 static inline u32 _get_word(void **pp)
 196 {
 197         u8 *s = *pp;
 198         u32 val;
 199         val = *s++;
 200         val |= (*s++ << 8);
 201         val |= (*s++ << 16);
 202         val |= (*s++ << 24);
 203         *pp = s;
 204         return val;
 205 }
 206
 207 static inline u32 _get_slice(void **pp, unsigned char *dp)
 208 {
 209         unsigned int len, i;
 210
 211         len = i = _get_word(pp);
 212         while (i-- > 0) *dp++ = _get_byte(pp);
 213         return len;
 214 }
 215
 216 /* ------------------------------------------------------------- */
 217
 218 void b1dma_reset(avmcard *card)
 219 {
 220         card->csr = 0x0;
 221         b1dma_writel(card, card->csr, AMCC_INTCSR);
 222         b1dma_writel(card, 0, AMCC_MCSR);
 223         b1dma_writel(card, 0, AMCC_RXLEN);
 224         b1dma_writel(card, 0, AMCC_TXLEN);
 225
 226         t1outp(card->port, 0x10, 0x00);
 227         t1outp(card->port, 0x07, 0x00);
 228
 229         b1dma_writel(card, 0, AMCC_MCSR);
 230         mdelay(10);
 231         b1dma_writel(card, 0x0f000000, AMCC_MCSR); /* reset all */
 232         mdelay(10);
 233         b1dma_writel(card, 0, AMCC_MCSR);
 234         if (card->cardtype == avm_t1pci)
 235                 mdelay(42);
 236         else
 237                 mdelay(10);
 238 }
 239
 240 /* ------------------------------------------------------------- */
 241
 242 static int b1dma_detect(avmcard *card)
 243 {
 244         b1dma_writel(card, 0, AMCC_MCSR);
 245         mdelay(10);
 246         b1dma_writel(card, 0x0f000000, AMCC_MCSR); /* reset all */
 247         mdelay(10);
 248         b1dma_writel(card, 0, AMCC_MCSR);
 249         mdelay(42);
 250
 251         b1dma_writel(card, 0, AMCC_RXLEN);
 252         b1dma_writel(card, 0, AMCC_TXLEN);
 253         card->csr = 0x0;
 254         b1dma_writel(card, card->csr, AMCC_INTCSR);
 255
 256         if (b1dma_readl(card, AMCC_MCSR) != 0x000000E6)
 257                 return 1;
 258
 259         b1dma_writel(card, 0xffffffff, AMCC_RXPTR);
 260         b1dma_writel(card, 0xffffffff, AMCC_TXPTR);
 261         if (b1dma_readl(card, AMCC_RXPTR) != 0xfffffffc
 262             || b1dma_readl(card, AMCC_TXPTR) != 0xfffffffc)
 263                 return 2;
 264
 265         b1dma_writel(card, 0x0, AMCC_RXPTR);
 266         b1dma_writel(card, 0x0, AMCC_TXPTR);
 267         if (b1dma_readl(card, AMCC_RXPTR) != 0x0
 268             || b1dma_readl(card, AMCC_TXPTR) != 0x0)
 269                 return 3;
 270
 271         t1outp(card->port, 0x10, 0x00);
 272         t1outp(card->port, 0x07, 0x00);
 273
 274         t1outp(card->port, 0x02, 0x02);
 275         t1outp(card->port, 0x03, 0x02);
 276
 277         if ((t1inp(card->port, 0x02) & 0xFE) != 0x02
 278             || t1inp(card->port, 0x3) != 0x03)
 279                 return 4;
 280
 281         t1outp(card->port, 0x02, 0x00);
 282         t1outp(card->port, 0x03, 0x00);
 283
 284         if ((t1inp(card->port, 0x02) & 0xFE) != 0x00
 285             || t1inp(card->port, 0x3) != 0x01)
 286                 return 5;
 287
 288         return 0;
 289 }
 290
 291 int t1pci_detect(avmcard *card)
 292 {
 293         int ret;
 294
 295         if ((ret = b1dma_detect(card)) != 0)
 296                 return ret;
 297
 298         /* Transputer test */
 299
 300         if (WriteReg(card, 0x80001000, 0x11) != 0
 301             || WriteReg(card, 0x80101000, 0x22) != 0
 302             || WriteReg(card, 0x80201000, 0x33) != 0
 303             || WriteReg(card, 0x80301000, 0x44) != 0)
 304                 return 6;
 305
 306         if (ReadReg(card, 0x80001000) != 0x11
 307             || ReadReg(card, 0x80101000) != 0x22
 308             || ReadReg(card, 0x80201000) != 0x33
 309             || ReadReg(card, 0x80301000) != 0x44)
 310                 return 7;
 311
 312         if (WriteReg(card, 0x80001000, 0x55) != 0
 313             || WriteReg(card, 0x80101000, 0x66) != 0
 314             || WriteReg(card, 0x80201000, 0x77) != 0
 315             || WriteReg(card, 0x80301000, 0x88) != 0)
 316                 return 8;
 317
 318         if (ReadReg(card, 0x80001000) != 0x55
 319             || ReadReg(card, 0x80101000) != 0x66
 320             || ReadReg(card, 0x80201000) != 0x77
 321             || ReadReg(card, 0x80301000) != 0x88)
 322                 return 9;
 323
 324         return 0;
 325 }
 326
 327 int b1pciv4_detect(avmcard *card)
 328 {
 329         int ret, i;
 330
 331         if ((ret = b1dma_detect(card)) != 0)
 332                 return ret;
 333
 334         for (i = 0; i < 5; i++) {
 335                 if (WriteReg(card, 0x80A00000, 0x21) != 0)
 336                         return 6;
 337                 if ((ReadReg(card, 0x80A00000) & 0x01) != 0x01)
 338                         return 7;
 339         }
 340         for (i = 0; i < 5; i++) {
 341                 if (WriteReg(card, 0x80A00000, 0x20) != 0)
 342                         return 8;
 343                 if ((ReadReg(card, 0x80A00000) & 0x01) != 0x00)
 344                         return 9;
 345         }
 346
 347         return 0;
 348 }
 349
 350 static void b1dma_queue_tx(avmcard *card, struct sk_buff *skb)
 351 {
 352         unsigned long flags;
 353
 354         spin_lock_irqsave(&card->lock, flags);
 355
 356         skb_queue_tail(&card->dma->send_queue, skb);
 357
 358         if (!(card->csr & EN_TX_TC_INT)) {
 359                 b1dma_dispatch_tx(card);
 360                 b1dma_writel(card, card->csr, AMCC_INTCSR);
 361         }
 362
 363         spin_unlock_irqrestore(&card->lock, flags);
 364 }
 365
 366 /* ------------------------------------------------------------- */
 367
 368 static void b1dma_dispatch_tx(avmcard *card)
 369 {
 370         avmcard_dmainfo *dma = card->dma;
 371         struct sk_buff *skb;
 372         u8 cmd, subcmd;
 373         u16 len;
 374         u32 txlen;
 375         void *p;
 376
 377         skb = skb_dequeue(&dma->send_queue);
 378
 379         len = CAPIMSG_LEN(skb->data);
 380
 381         if (len) {
 382                 cmd = CAPIMSG_COMMAND(skb->data);
 383                 subcmd = CAPIMSG_SUBCOMMAND(skb->data);
 384
 385                 p = dma->sendbuf.dmabuf;
 386
 387                 if (CAPICMD(cmd, subcmd) == CAPI_DATA_B3_REQ) {
 388                         u16 dlen = CAPIMSG_DATALEN(skb->data);
 389                         _put_byte(&p, SEND_DATA_B3_REQ);
 390                         _put_slice(&p, skb->data, len);
 391                         _put_slice(&p, skb->data + len, dlen);
 392                 } else {
 393                         _put_byte(&p, SEND_MESSAGE);
 394                         _put_slice(&p, skb->data, len);
 395                 }
 396                 txlen = (u8 *)p - (u8 *)dma->sendbuf.dmabuf;
 397 #ifdef AVM_B1DMA_DEBUG
 398                 printk(KERN_DEBUG "tx: put msg len=%d\n", txlen);
 399 #endif
 400         } else {
 401                 txlen = skb->len - 2;
 402 #ifdef AVM_B1DMA_POLLDEBUG
 403                 if (skb->data[2] == SEND_POLLACK)
 404                         printk(KERN_INFO "%s: send ack\n", card->name);
 405 #endif
 406 #ifdef AVM_B1DMA_DEBUG
 407                 printk(KERN_DEBUG "tx: put 0x%x len=%d\n",
 408                        skb->data[2], txlen);
 409 #endif
 410                 skb_copy_from_linear_data_offset(skb, 2, dma->sendbuf.dmabuf,
 411                                                  skb->len - 2);
 412         }
 413         txlen = (txlen + 3) & ~3;
 414
 415         b1dma_writel(card, dma->sendbuf.dmaaddr, AMCC_TXPTR);
 416         b1dma_writel(card, txlen, AMCC_TXLEN);
 417
 418         card->csr |= EN_TX_TC_INT;
 419
 420         dev_kfree_skb_any(skb);
 421 }
 422
 423 /* ------------------------------------------------------------- */
 424
 425 static void queue_pollack(avmcard *card)
 426 {
 427         struct sk_buff *skb;
 428         void *p;
 429
 430         skb = alloc_skb(3, GFP_ATOMIC);
 431         if (!skb) {
 432                 printk(KERN_CRIT "%s: no memory, lost poll ack\n",
 433                        card->name);
 434                 return;
 435         }
 436         p = skb->data;
 437         _put_byte(&p, 0);
 438         _put_byte(&p, 0);
 439         _put_byte(&p, SEND_POLLACK);
 440         skb_put(skb, (u8 *)p - (u8 *)skb->data);
 441
 442         b1dma_queue_tx(card, skb);
 443 }
 444
 445 /* ------------------------------------------------------------- */
 446
 447 static void b1dma_handle_rx(avmcard *card)
 448 {
 449         avmctrl_info *cinfo = &card->ctrlinfo[0];
 450         avmcard_dmainfo *dma = card->dma;
 451         struct capi_ctr *ctrl = &cinfo->capi_ctrl;
 452         struct sk_buff *skb;
 453         void *p = dma->recvbuf.dmabuf + 4;
 454         u32 ApplId, MsgLen, DataB3Len, NCCI, WindowSize;
 455         u8 b1cmd =  _get_byte(&p);
 456
 457 #ifdef AVM_B1DMA_DEBUG
 458         printk(KERN_DEBUG "rx: 0x%x %lu\n", b1cmd, (unsigned long)dma->recvlen);
 459 #endif
 460
 461         switch (b1cmd) {
 462         case RECEIVE_DATA_B3_IND:
 463
 464                 ApplId = (unsigned) _get_word(&p);
 465                 MsgLen = _get_slice(&p, card->msgbuf);
 466                 DataB3Len = _get_slice(&p, card->databuf);
 467
 468                 if (MsgLen < 30) { /* not CAPI 64Bit */
 469                         memset(card->msgbuf + MsgLen, 0, 30 - MsgLen);
 470                         MsgLen = 30;
 471                         CAPIMSG_SETLEN(card->msgbuf, 30);
 472                 }
 473                 if (!(skb = alloc_skb(DataB3Len + MsgLen, GFP_ATOMIC))) {
 474                         printk(KERN_ERR "%s: incoming packet dropped\n",
 475                                card->name);
 476                 } else {
 477                         memcpy(skb_put(skb, MsgLen), card->msgbuf, MsgLen);
 478                         memcpy(skb_put(skb, DataB3Len), card->databuf, DataB3Len);
 479                         capi_ctr_handle_message(ctrl, ApplId, skb);
 480                 }
 481                 break;
 482
 483         case RECEIVE_MESSAGE:
 484
 485                 ApplId = (unsigned) _get_word(&p);
 486                 MsgLen = _get_slice(&p, card->msgbuf);
 487                 if (!(skb = alloc_skb(MsgLen, GFP_ATOMIC))) {
 488                         printk(KERN_ERR "%s: incoming packet dropped\n",
 489                                card->name);
 490                 } else {
 491                         memcpy(skb_put(skb, MsgLen), card->msgbuf, MsgLen);
 492                         if (CAPIMSG_CMD(skb->data) == CAPI_DATA_B3_CONF) {
 493                                 spin_lock(&card->lock);
 494                                 capilib_data_b3_conf(&cinfo->ncci_head, ApplId,
 495                                                      CAPIMSG_NCCI(skb->data),
 496                                                      CAPIMSG_MSGID(skb->data));
 497                                 spin_unlock(&card->lock);
 498                         }
 499                         capi_ctr_handle_message(ctrl, ApplId, skb);
 500                 }
 501                 break;
 502
 503         case RECEIVE_NEW_NCCI:
 504
 505                 ApplId = _get_word(&p);
 506                 NCCI = _get_word(&p);
 507                 WindowSize = _get_word(&p);
 508                 spin_lock(&card->lock);
 509                 capilib_new_ncci(&cinfo->ncci_head, ApplId, NCCI, WindowSize);
 510                 spin_unlock(&card->lock);
 511                 break;
 512
 513         case RECEIVE_FREE_NCCI:
 514
 515                 ApplId = _get_word(&p);
 516                 NCCI = _get_word(&p);
 517
 518                 if (NCCI != 0xffffffff) {
 519                         spin_lock(&card->lock);
 520                         capilib_free_ncci(&cinfo->ncci_head, ApplId, NCCI);
 521                         spin_unlock(&card->lock);
 522                 }
 523                 break;
 524
 525         case RECEIVE_START:
 526 #ifdef AVM_B1DMA_POLLDEBUG
 527                 printk(KERN_INFO "%s: receive poll\n", card->name);
 528 #endif
 529                 if (!suppress_pollack)
 530                         queue_pollack(card);
 531                 capi_ctr_resume_output(ctrl);
 532                 break;
 533
 534         case RECEIVE_STOP:
 535                 capi_ctr_suspend_output(ctrl);
 536                 break;
 537
 538         case RECEIVE_INIT:
 539
 540                 cinfo->versionlen = _get_slice(&p, cinfo->versionbuf);
 541                 b1_parse_version(cinfo);
 542                 printk(KERN_INFO "%s: %s-card (%s) now active\n",
 543                        card->name,
 544                        cinfo->version[VER_CARDTYPE],
 545                        cinfo->version[VER_DRIVER]);
 546                 capi_ctr_ready(ctrl);
 547                 break;
 548
 549         case RECEIVE_TASK_READY:
 550                 ApplId = (unsigned) _get_word(&p);
 551                 MsgLen = _get_slice(&p, card->msgbuf);
 552                 card->msgbuf[MsgLen] = 0;
 553                 while (MsgLen > 0
 554                        && (card->msgbuf[MsgLen - 1] == '\n'
 555                            || card->msgbuf[MsgLen - 1] == '\r')) {
 556                         card->msgbuf[MsgLen - 1] = 0;
 557                         MsgLen--;
 558                 }
 559                 printk(KERN_INFO "%s: task %d \"%s\" ready.\n",
 560                        card->name, ApplId, card->msgbuf);
 561                 break;
 562
 563         case RECEIVE_DEBUGMSG:
 564                 MsgLen = _get_slice(&p, card->msgbuf);
 565                 card->msgbuf[MsgLen] = 0;
 566                 while (MsgLen > 0
 567                        && (card->msgbuf[MsgLen - 1] == '\n'
 568                            || card->msgbuf[MsgLen - 1] == '\r')) {
 569                         card->msgbuf[MsgLen - 1] = 0;
 570                         MsgLen--;
 571                 }
 572                 printk(KERN_INFO "%s: DEBUG: %s\n", card->name, card->msgbuf);
 573                 break;
 574
 575         default:
 576                 printk(KERN_ERR "%s: b1dma_interrupt: 0x%x ???\n",
 577                        card->name, b1cmd);
 578                 return;
 579         }
 580 }
 581
 582 /* ------------------------------------------------------------- */
 583
 584 static void b1dma_handle_interrupt(avmcard *card)
 585 {
 586         u32 status;
 587         u32 newcsr;
 588
 589         spin_lock(&card->lock);
 590
 591         status = b1dma_readl(card, AMCC_INTCSR);
 592         if ((status & ANY_S5933_INT) == 0) {
 593                 spin_unlock(&card->lock);
 594                 return;
 595         }
 596
 597         newcsr = card->csr | (status & ALL_INT);
 598         if (status & TX_TC_INT) newcsr &= ~EN_TX_TC_INT;
 599         if (status & RX_TC_INT) newcsr &= ~EN_RX_TC_INT;
 600         b1dma_writel(card, newcsr, AMCC_INTCSR);
 601
 602         if ((status & RX_TC_INT) != 0) {
 603                 struct avmcard_dmainfo *dma = card->dma;
 604                 u32 rxlen;
 605                 if (card->dma->recvlen == 0) {
 606                         rxlen = b1dma_readl(card, AMCC_RXLEN);
 607                         if (rxlen == 0) {
 608                                 dma->recvlen = *((u32 *)dma->recvbuf.dmabuf);
 609                                 rxlen = (dma->recvlen + 3) & ~3;
 610                                 b1dma_writel(card, dma->recvbuf.dmaaddr + 4, AMCC_RXPTR);
 611                                 b1dma_writel(card, rxlen, AMCC_RXLEN);
 612 #ifdef AVM_B1DMA_DEBUG
 613                         } else {
 614                                 printk(KERN_ERR "%s: rx not complete (%d).\n",
 615                                        card->name, rxlen);
 616 #endif
 617                         }
 618                 } else {
 619                         spin_unlock(&card->lock);
 620                         b1dma_handle_rx(card);
 621                         dma->recvlen = 0;
 622                         spin_lock(&card->lock);
 623                         b1dma_writel(card, dma->recvbuf.dmaaddr, AMCC_RXPTR);
 624                         b1dma_writel(card, 4, AMCC_RXLEN);
 625                 }
 626         }
 627
 628         if ((status & TX_TC_INT) != 0) {
 629                 if (skb_queue_empty(&card->dma->send_queue))
 630                         card->csr &= ~EN_TX_TC_INT;
 631                 else
 632                         b1dma_dispatch_tx(card);
 633         }
 634         b1dma_writel(card, card->csr, AMCC_INTCSR);
 635
 636         spin_unlock(&card->lock);
 637 }
 638
 639 irqreturn_t b1dma_interrupt(int interrupt, void *devptr)
 640 {
 641         avmcard *card = devptr;
 642
 643         b1dma_handle_interrupt(card);
 644         return IRQ_HANDLED;
 645 }
 646
 647 /* ------------------------------------------------------------- */
 648
 649 static int b1dma_loaded(avmcard *card)
 650 {
 651         unsigned long stop;
 652         unsigned char ans;
 653         unsigned long tout = 2;
 654         unsigned int base = card->port;
 655
 656         for (stop = jiffies + tout * HZ; time_before(jiffies, stop);) {
 657                 if (b1_tx_empty(base))
 658                         break;
 659         }
 660         if (!b1_tx_empty(base)) {
 661                 printk(KERN_ERR "%s: b1dma_loaded: tx err, corrupted t4 file ?\n",
 662                        card->name);
 663                 return 0;
 664         }
 665         b1_put_byte(base, SEND_POLLACK);
 666         for (stop = jiffies + tout * HZ; time_before(jiffies, stop);) {
 667                 if (b1_rx_full(base)) {
 668                         if ((ans = b1_get_byte(base)) == RECEIVE_POLLDWORD) {
 669                                 return 1;
 670                         }
 671                         printk(KERN_ERR "%s: b1dma_loaded: got 0x%x, firmware not running in dword mode\n", card->name, ans);
 672                         return 0;
 673                 }
 674         }
 675         printk(KERN_ERR "%s: b1dma_loaded: firmware not running\n", card->name);
 676         return 0;
 677 }
 678
 679 /* ------------------------------------------------------------- */
 680
 681 static void b1dma_send_init(avmcard *card)
 682 {
 683         struct sk_buff *skb;
 684         void *p;
 685
 686         skb = alloc_skb(15, GFP_ATOMIC);
 687         if (!skb) {
 688                 printk(KERN_CRIT "%s: no memory, lost register appl.\n",
 689                        card->name);
 690                 return;
 691         }
 692         p = skb->data;
 693         _put_byte(&p, 0);
 694         _put_byte(&p, 0);
 695         _put_byte(&p, SEND_INIT);
 696         _put_word(&p, CAPI_MAXAPPL);
 697         _put_word(&p, AVM_NCCI_PER_CHANNEL * 30);
 698         _put_word(&p, card->cardnr - 1);
 699         skb_put(skb, (u8 *)p - (u8 *)skb->data);
 700
 701         b1dma_queue_tx(card, skb);
 702 }
 703
 704 int b1dma_load_firmware(struct capi_ctr *ctrl, capiloaddata *data)
 705 {
 706         avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata);
 707         avmcard *card = cinfo->card;
 708         int retval;
 709
 710         b1dma_reset(card);
 711
 712         if ((retval = b1_load_t4file(card, &data->firmware))) {
 713                 b1dma_reset(card);
 714                 printk(KERN_ERR "%s: failed to load t4file!!\n",
 715                        card->name);
 716                 return retval;
 717         }
 718
 719         if (data->configuration.len > 0 && data->configuration.data) {
 720                 if ((retval = b1_load_config(card, &data->configuration))) {
 721                         b1dma_reset(card);
 722                         printk(KERN_ERR "%s: failed to load config!!\n",
 723                                card->name);
 724                         return retval;
 725                 }
 726         }
 727
 728         if (!b1dma_loaded(card)) {
 729                 b1dma_reset(card);
 730                 printk(KERN_ERR "%s: failed to load t4file.\n", card->name);
 731                 return -EIO;
 732         }
 733
 734         card->csr = AVM_FLAG;
 735         b1dma_writel(card, card->csr, AMCC_INTCSR);
 736         b1dma_writel(card, EN_A2P_TRANSFERS | EN_P2A_TRANSFERS | A2P_HI_PRIORITY |
 737                      P2A_HI_PRIORITY | RESET_A2P_FLAGS | RESET_P2A_FLAGS,
 738                      AMCC_MCSR);
 739         t1outp(card->port, 0x07, 0x30);
 740         t1outp(card->port, 0x10, 0xF0);
 741
 742         card->dma->recvlen = 0;
 743         b1dma_writel(card, card->dma->recvbuf.dmaaddr, AMCC_RXPTR);
 744         b1dma_writel(card, 4, AMCC_RXLEN);
 745         card->csr |= EN_RX_TC_INT;
 746         b1dma_writel(card, card->csr, AMCC_INTCSR);
 747
 748         b1dma_send_init(card);
 749
 750         return 0;
 751 }
 752
 753 void b1dma_reset_ctr(struct capi_ctr *ctrl)
 754 {
 755         avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata);
 756         avmcard *card = cinfo->card;
 757         unsigned long flags;
 758
 759         spin_lock_irqsave(&card->lock, flags);
 760         b1dma_reset(card);
 761
 762         memset(cinfo->version, 0, sizeof(cinfo->version));
 763         capilib_release(&cinfo->ncci_head);
 764         spin_unlock_irqrestore(&card->lock, flags);
 765         capi_ctr_down(ctrl);
 766 }
 767
 768 /* ------------------------------------------------------------- */
 769
 770 void b1dma_register_appl(struct capi_ctr *ctrl,
 771                          u16 appl,
 772                          capi_register_params *rp)
 773 {
 774         avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata);
 775         avmcard *card = cinfo->card;
 776         struct sk_buff *skb;
 777         int want = rp->level3cnt;
 778         int nconn;
 779         void *p;
 780
 781         if (want > 0) nconn = want;
 782         else nconn = ctrl->profile.nbchannel * -want;
 783         if (nconn == 0) nconn = ctrl->profile.nbchannel;
 784
 785         skb = alloc_skb(23, GFP_ATOMIC);
 786         if (!skb) {
 787                 printk(KERN_CRIT "%s: no memory, lost register appl.\n",
 788                        card->name);
 789                 return;
 790         }
 791         p = skb->data;
 792         _put_byte(&p, 0);
 793         _put_byte(&p, 0);
 794         _put_byte(&p, SEND_REGISTER);
 795         _put_word(&p, appl);
 796         _put_word(&p, 1024 * (nconn + 1));
 797         _put_word(&p, nconn);
 798         _put_word(&p, rp->datablkcnt);
 799         _put_word(&p, rp->datablklen);
 800         skb_put(skb, (u8 *)p - (u8 *)skb->data);
 801
 802         b1dma_queue_tx(card, skb);
 803 }
 804
 805 /* ------------------------------------------------------------- */
 806
 807 void b1dma_release_appl(struct capi_ctr *ctrl, u16 appl)
 808 {
 809         avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata);
 810         avmcard *card = cinfo->card;
 811         struct sk_buff *skb;
 812         void *p;
 813         unsigned long flags;
 814
 815         spin_lock_irqsave(&card->lock, flags);
 816         capilib_release_appl(&cinfo->ncci_head, appl);
 817         spin_unlock_irqrestore(&card->lock, flags);
 818
 819         skb = alloc_skb(7, GFP_ATOMIC);
 820         if (!skb) {
 821                 printk(KERN_CRIT "%s: no memory, lost release appl.\n",
 822                        card->name);
 823                 return;
 824         }
 825         p = skb->data;
 826         _put_byte(&p, 0);
 827         _put_byte(&p, 0);
 828         _put_byte(&p, SEND_RELEASE);
 829         _put_word(&p, appl);
 830
 831         skb_put(skb, (u8 *)p - (u8 *)skb->data);
 832
 833         b1dma_queue_tx(card, skb);
 834 }
 835
 836 /* ------------------------------------------------------------- */
 837
 838 u16 b1dma_send_message(struct capi_ctr *ctrl, struct sk_buff *skb)
 839 {
 840         avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata);
 841         avmcard *card = cinfo->card;
 842         u16 retval = CAPI_NOERROR;
 843
 844         if (CAPIMSG_CMD(skb->data) == CAPI_DATA_B3_REQ) {
 845                 unsigned long flags;
 846                 spin_lock_irqsave(&card->lock, flags);
 847                 retval = capilib_data_b3_req(&cinfo->ncci_head,
 848                                              CAPIMSG_APPID(skb->data),
 849                                              CAPIMSG_NCCI(skb->data),
 850                                              CAPIMSG_MSGID(skb->data));
 851                 spin_unlock_irqrestore(&card->lock, flags);
 852         }
 853         if (retval == CAPI_NOERROR)
 854                 b1dma_queue_tx(card, skb);
 855
 856         return retval;
 857 }
 858
 859 /* ------------------------------------------------------------- */
 860
 861 static int b1dmactl_proc_show(struct seq_file *m, void *v)
 862 {
 863         struct capi_ctr *ctrl = m->private;
 864         avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata);
 865         avmcard *card = cinfo->card;
 866         u8 flag;
 867         char *s;
 868         u32 txoff, txlen, rxoff, rxlen, csr;
 869         unsigned long flags;
 870
 871         seq_printf(m, "%-16s %s\n", "name", card->name);
 872         seq_printf(m, "%-16s 0x%x\n", "io", card->port);
 873         seq_printf(m, "%-16s %d\n", "irq", card->irq);
 874         seq_printf(m, "%-16s 0x%lx\n", "membase", card->membase);
 875         switch (card->cardtype) {
 876         case avm_b1isa: s = "B1 ISA"; break;
 877         case avm_b1pci: s = "B1 PCI"; break;
 878         case avm_b1pcmcia: s = "B1 PCMCIA"; break;
 879         case avm_m1: s = "M1"; break;
 880         case avm_m2: s = "M2"; break;
 881         case avm_t1isa: s = "T1 ISA (HEMA)"; break;
 882         case avm_t1pci: s = "T1 PCI"; break;
 883         case avm_c4: s = "C4"; break;
 884         case avm_c2: s = "C2"; break;
 885         default: s = "???"; break;
 886         }
 887         seq_printf(m, "%-16s %s\n", "type", s);
 888         if ((s = cinfo->version[VER_DRIVER]) != NULL)
 889                 seq_printf(m, "%-16s %s\n", "ver_driver", s);
 890         if ((s = cinfo->version[VER_CARDTYPE]) != NULL)
 891                 seq_printf(m, "%-16s %s\n", "ver_cardtype", s);
 892         if ((s = cinfo->version[VER_SERIAL]) != NULL)
 893                 seq_printf(m, "%-16s %s\n", "ver_serial", s);
 894
 895         if (card->cardtype != avm_m1) {
 896                 flag = ((u8 *)(ctrl->profile.manu))[3];
 897                 if (flag)
 898                         seq_printf(m, "%-16s%s%s%s%s%s%s%s\n",
 899                                    "protocol",
 900                                    (flag & 0x01) ? " DSS1" : "",
 901                                    (flag & 0x02) ? " CT1" : "",
 902                                    (flag & 0x04) ? " VN3" : "",
 903                                    (flag & 0x08) ? " NI1" : "",
 904                                    (flag & 0x10) ? " AUSTEL" : "",
 905                                    (flag & 0x20) ? " ESS" : "",
 906                                    (flag & 0x40) ? " 1TR6" : ""
 907                                 );
 908         }
 909         if (card->cardtype != avm_m1) {
 910                 flag = ((u8 *)(ctrl->profile.manu))[5];
 911                 if (flag)
 912                         seq_printf(m, "%-16s%s%s%s%s\n",
 913                                    "linetype",
 914                                    (flag & 0x01) ? " point to point" : "",
 915                                    (flag & 0x02) ? " point to multipoint" : "",
 916                                    (flag & 0x08) ? " leased line without D-channel" : "",
 917                                    (flag & 0x04) ? " leased line with D-channel" : ""
 918                                 );
 919         }
 920         seq_printf(m, "%-16s %s\n", "cardname", cinfo->cardname);
 921
 922
 923         spin_lock_irqsave(&card->lock, flags);
 924
 925         txoff = (dma_addr_t)b1dma_readl(card, AMCC_TXPTR)-card->dma->sendbuf.dmaaddr;
 926         txlen = b1dma_readl(card, AMCC_TXLEN);
 927
 928         rxoff = (dma_addr_t)b1dma_readl(card, AMCC_RXPTR)-card->dma->recvbuf.dmaaddr;
 929         rxlen = b1dma_readl(card, AMCC_RXLEN);
 930
 931         csr  = b1dma_readl(card, AMCC_INTCSR);
 932
 933         spin_unlock_irqrestore(&card->lock, flags);
 934
 935         seq_printf(m, "%-16s 0x%lx\n", "csr (cached)", (unsigned long)card->csr);
 936         seq_printf(m, "%-16s 0x%lx\n", "csr", (unsigned long)csr);
 937         seq_printf(m, "%-16s %lu\n", "txoff", (unsigned long)txoff);
 938         seq_printf(m, "%-16s %lu\n", "txlen", (unsigned long)txlen);
 939         seq_printf(m, "%-16s %lu\n", "rxoff", (unsigned long)rxoff);
 940         seq_printf(m, "%-16s %lu\n", "rxlen", (unsigned long)rxlen);
 941
 942         return 0;
 943 }
 944
 945 static int b1dmactl_proc_open(struct inode *inode, struct file *file)
 946 {
 947         return single_open(file, b1dmactl_proc_show, PDE_DATA(inode));
 948 }
 949
 950 const struct file_operations b1dmactl_proc_fops = {
 951         .owner          = THIS_MODULE,
 952         .open           = b1dmactl_proc_open,
 953         .read           = seq_read,
 954         .llseek         = seq_lseek,
 955         .release        = single_release,
 956 };
 957 EXPORT_SYMBOL(b1dmactl_proc_fops);
 958
 959 /* ------------------------------------------------------------- */
 960
 961 EXPORT_SYMBOL(b1dma_reset);
 962 EXPORT_SYMBOL(t1pci_detect);
 963 EXPORT_SYMBOL(b1pciv4_detect);
 964 EXPORT_SYMBOL(b1dma_interrupt);
 965
 966 EXPORT_SYMBOL(b1dma_load_firmware);
 967 EXPORT_SYMBOL(b1dma_reset_ctr);
 968 EXPORT_SYMBOL(b1dma_register_appl);
 969 EXPORT_SYMBOL(b1dma_release_appl);
 970 EXPORT_SYMBOL(b1dma_send_message);
 971
 972 static int __init b1dma_init(void)
 973 {
 974         char *p;
 975         char rev[32];
 976
 977         if ((p = strchr(revision, ':')) != NULL && p[1]) {
 978                 strlcpy(rev, p + 2, sizeof(rev));
 979                 if ((p = strchr(rev, '$')) != NULL && p > rev)
 980                         *(p - 1) = 0;
 981         } else
 982                 strcpy(rev, "1.0");
 983
 984         printk(KERN_INFO "b1dma: revision %s\n", rev);
 985
 986         return 0;
 987 }
 988
 989 static void __exit b1dma_exit(void)
 990 {
 991 }
 992
 993 module_init(b1dma_init);
 994 module_exit(b1dma_exit);