drivers/isdn/avmb1/b1dma.c

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