drivers/isdn/hardware/avm/b1.c

   1 /* $Id: b1.c,v 1.1.2.2 2004/01/16 21:09:27 keil Exp $
   2  *
   3  * Common module for AVM B1 cards.
   4  *
   5  * Copyright 1999 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/pci.h>
  15 #include <linux/skbuff.h>
  16 #include <linux/delay.h>
  17 #include <linux/mm.h>
  18 #include <linux/interrupt.h>
  19 #include <linux/ioport.h>
  20 #include <linux/capi.h>
  21 #include <linux/kernelcapi.h>
  22 #include <asm/io.h>
  23 #include <linux/init.h>
  24 #include <asm/uaccess.h>
  25 #include <linux/netdevice.h>
  26 #include <linux/isdn/capilli.h>
  27 #include "avmcard.h"
  28 #include <linux/isdn/capicmd.h>
  29 #include <linux/isdn/capiutil.h>
  30
  31 static char *revision = "$Revision: 1.1.2.2 $";
  32
  33 /* ------------------------------------------------------------- */
  34
  35 MODULE_DESCRIPTION("CAPI4Linux: Common support for active AVM cards");
  36 MODULE_AUTHOR("Carsten Paeth");
  37 MODULE_LICENSE("GPL");
  38
  39 /* ------------------------------------------------------------- */
  40
  41 int b1_irq_table[16] =
  42 {0,
  43  0,
  44  0,
  45  192,                           /* irq 3 */
  46  32,                            /* irq 4 */
  47  160,                           /* irq 5 */
  48  96,                            /* irq 6 */
  49  224,                           /* irq 7 */
  50  0,
  51  64,                            /* irq 9 */
  52  80,                            /* irq 10 */
  53  208,                           /* irq 11 */
  54  48,                            /* irq 12 */
  55  0,
  56  0,
  57  112,                           /* irq 15 */
  58 };
  59
  60 /* ------------------------------------------------------------- */
  61
  62 avmcard *b1_alloc_card(int nr_controllers)
  63 {
  64         avmcard *card;
  65         avmctrl_info *cinfo;
  66         int i;
  67
  68         card = kmalloc(sizeof(*card), GFP_KERNEL);
  69         if (!card)
  70                 return NULL;
  71
  72         memset(card, 0, sizeof(*card));
  73
  74         cinfo = kmalloc(sizeof(*cinfo) * nr_controllers, GFP_KERNEL);
  75         if (!cinfo) {
  76                 kfree(card);
  77                 return NULL;
  78         }
  79         memset(cinfo, 0, sizeof(*cinfo) * nr_controllers);
  80
  81         card->ctrlinfo = cinfo;
  82         for (i = 0; i < nr_controllers; i++) {
  83                 INIT_LIST_HEAD(&cinfo[i].ncci_head);
  84                 cinfo[i].card = card;
  85         }
  86         spin_lock_init(&card->lock);
  87         card->nr_controllers = nr_controllers;
  88
  89         return card;
  90 }
  91
  92 /* ------------------------------------------------------------- */
  93
  94 void b1_free_card(avmcard *card)
  95 {
  96         kfree(card->ctrlinfo);
  97         kfree(card);
  98 }
  99
 100 /* ------------------------------------------------------------- */
 101
 102 int b1_detect(unsigned int base, enum avmcardtype cardtype)
 103 {
 104         int onoff, i;
 105
 106         /*
 107          * Statusregister 0000 00xx
 108          */
 109         if ((inb(base + B1_INSTAT) & 0xfc)
 110             || (inb(base + B1_OUTSTAT) & 0xfc))
 111                 return 1;
 112         /*
 113          * Statusregister 0000 001x
 114          */
 115         b1outp(base, B1_INSTAT, 0x2);   /* enable irq */
 116         /* b1outp(base, B1_OUTSTAT, 0x2); */
 117         if ((inb(base + B1_INSTAT) & 0xfe) != 0x2
 118             /* || (inb(base + B1_OUTSTAT) & 0xfe) != 0x2 */)
 119                 return 2;
 120         /*
 121          * Statusregister 0000 000x
 122          */
 123         b1outp(base, B1_INSTAT, 0x0);   /* disable irq */
 124         b1outp(base, B1_OUTSTAT, 0x0);
 125         if ((inb(base + B1_INSTAT) & 0xfe)
 126             || (inb(base + B1_OUTSTAT) & 0xfe))
 127                 return 3;
 128
 129         for (onoff = !0, i= 0; i < 10 ; i++) {
 130                 b1_set_test_bit(base, cardtype, onoff);
 131                 if (b1_get_test_bit(base, cardtype) != onoff)
 132                    return 4;
 133                 onoff = !onoff;
 134         }
 135
 136         if (cardtype == avm_m1)
 137            return 0;
 138
 139         if ((b1_rd_reg(base, B1_STAT1(cardtype)) & 0x0f) != 0x01)
 140            return 5;
 141
 142         return 0;
 143 }
 144
 145 void b1_getrevision(avmcard *card)
 146 {
 147     card->class = inb(card->port + B1_ANALYSE);
 148     card->revision = inb(card->port + B1_REVISION);
 149 }
 150
 151 #define FWBUF_SIZE      256
 152 int b1_load_t4file(avmcard *card, capiloaddatapart * t4file)
 153 {
 154         unsigned char buf[FWBUF_SIZE];
 155         unsigned char *dp;
 156         int i, left;
 157         unsigned int base = card->port;
 158
 159         dp = t4file->data;
 160         left = t4file->len;
 161         while (left > FWBUF_SIZE) {
 162                 if (t4file->user) {
 163                         if (copy_from_user(buf, dp, FWBUF_SIZE))
 164                                 return -EFAULT;
 165                 } else {
 166                         memcpy(buf, dp, FWBUF_SIZE);
 167                 }
 168                 for (i = 0; i < FWBUF_SIZE; i++)
 169                         if (b1_save_put_byte(base, buf[i]) < 0) {
 170                                 printk(KERN_ERR "%s: corrupted firmware file ?\n",
 171                                                 card->name);
 172                                 return -EIO;
 173                         }
 174                 left -= FWBUF_SIZE;
 175                 dp += FWBUF_SIZE;
 176         }
 177         if (left) {
 178                 if (t4file->user) {
 179                         if (copy_from_user(buf, dp, left))
 180                                 return -EFAULT;
 181                 } else {
 182                         memcpy(buf, dp, left);
 183                 }
 184                 for (i = 0; i < left; i++)
 185                         if (b1_save_put_byte(base, buf[i]) < 0) {
 186                                 printk(KERN_ERR "%s: corrupted firmware file ?\n",
 187                                                 card->name);
 188                                 return -EIO;
 189                         }
 190         }
 191         return 0;
 192 }
 193
 194 int b1_load_config(avmcard *card, capiloaddatapart * config)
 195 {
 196         unsigned char buf[FWBUF_SIZE];
 197         unsigned char *dp;
 198         unsigned int base = card->port;
 199         int i, j, left;
 200
 201         dp = config->data;
 202         left = config->len;
 203         if (left) {
 204                 b1_put_byte(base, SEND_CONFIG);
 205                 b1_put_word(base, 1);
 206                 b1_put_byte(base, SEND_CONFIG);
 207                 b1_put_word(base, left);
 208         }
 209         while (left > FWBUF_SIZE) {
 210                 if (config->user) {
 211                         if (copy_from_user(buf, dp, FWBUF_SIZE))
 212                                 return -EFAULT;
 213                 } else {
 214                         memcpy(buf, dp, FWBUF_SIZE);
 215                 }
 216                 for (i = 0; i < FWBUF_SIZE; ) {
 217                         b1_put_byte(base, SEND_CONFIG);
 218                         for (j=0; j < 4; j++) {
 219                                 b1_put_byte(base, buf[i++]);
 220                         }
 221                 }
 222                 left -= FWBUF_SIZE;
 223                 dp += FWBUF_SIZE;
 224         }
 225         if (left) {
 226                 if (config->user) {
 227                         if (copy_from_user(buf, dp, left))
 228                                 return -EFAULT;
 229                 } else {
 230                         memcpy(buf, dp, left);
 231                 }
 232                 for (i = 0; i < left; ) {
 233                         b1_put_byte(base, SEND_CONFIG);
 234                         for (j=0; j < 4; j++) {
 235                                 if (i < left)
 236                                         b1_put_byte(base, buf[i++]);
 237                                 else
 238                                         b1_put_byte(base, 0);
 239                         }
 240                 }
 241         }
 242         return 0;
 243 }
 244
 245 int b1_loaded(avmcard *card)
 246 {
 247         unsigned int base = card->port;
 248         unsigned long stop;
 249         unsigned char ans;
 250         unsigned long tout = 2;
 251
 252         for (stop = jiffies + tout * HZ; time_before(jiffies, stop);) {
 253                 if (b1_tx_empty(base))
 254                         break;
 255         }
 256         if (!b1_tx_empty(base)) {
 257                 printk(KERN_ERR "%s: b1_loaded: tx err, corrupted t4 file ?\n",
 258                                 card->name);
 259                 return 0;
 260         }
 261         b1_put_byte(base, SEND_POLL);
 262         for (stop = jiffies + tout * HZ; time_before(jiffies, stop);) {
 263                 if (b1_rx_full(base)) {
 264                         if ((ans = b1_get_byte(base)) == RECEIVE_POLL) {
 265                                 return 1;
 266                         }
 267                         printk(KERN_ERR "%s: b1_loaded: got 0x%x, firmware not running\n",
 268                                         card->name, ans);
 269                         return 0;
 270                 }
 271         }
 272         printk(KERN_ERR "%s: b1_loaded: firmware not running\n", card->name);
 273         return 0;
 274 }
 275
 276 /* ------------------------------------------------------------- */
 277
 278 int b1_load_firmware(struct capi_ctr *ctrl, capiloaddata *data)
 279 {
 280         avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata);
 281         avmcard *card = cinfo->card;
 282         unsigned int port = card->port;
 283         unsigned long flags;
 284         int retval;
 285
 286         b1_reset(port);
 287
 288         if ((retval = b1_load_t4file(card, &data->firmware))) {
 289                 b1_reset(port);
 290                 printk(KERN_ERR "%s: failed to load t4file!!\n",
 291                                         card->name);
 292                 return retval;
 293         }
 294
 295         b1_disable_irq(port);
 296
 297         if (data->configuration.len > 0 && data->configuration.data) {
 298                 if ((retval = b1_load_config(card, &data->configuration))) {
 299                         b1_reset(port);
 300                         printk(KERN_ERR "%s: failed to load config!!\n",
 301                                         card->name);
 302                         return retval;
 303                 }
 304         }
 305
 306         if (!b1_loaded(card)) {
 307                 printk(KERN_ERR "%s: failed to load t4file.\n", card->name);
 308                 return -EIO;
 309         }
 310
 311         spin_lock_irqsave(&card->lock, flags);
 312         b1_setinterrupt(port, card->irq, card->cardtype);
 313         b1_put_byte(port, SEND_INIT);
 314         b1_put_word(port, CAPI_MAXAPPL);
 315         b1_put_word(port, AVM_NCCI_PER_CHANNEL*2);
 316         b1_put_word(port, ctrl->cnr - 1);
 317         spin_unlock_irqrestore(&card->lock, flags);
 318
 319         return 0;
 320 }
 321
 322 void b1_reset_ctr(struct capi_ctr *ctrl)
 323 {
 324         avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata);
 325         avmcard *card = cinfo->card;
 326         unsigned int port = card->port;
 327
 328         b1_reset(port);
 329         b1_reset(port);
 330
 331         memset(cinfo->version, 0, sizeof(cinfo->version));
 332         capilib_release(&cinfo->ncci_head);
 333         capi_ctr_reseted(ctrl);
 334 }
 335
 336 void b1_register_appl(struct capi_ctr *ctrl,
 337                                 u16 appl,
 338                                 capi_register_params *rp)
 339 {
 340         avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata);
 341         avmcard *card = cinfo->card;
 342         unsigned int port = card->port;
 343         unsigned long flags;
 344         int nconn, want = rp->level3cnt;
 345
 346         if (want > 0) nconn = want;
 347         else nconn = ctrl->profile.nbchannel * -want;
 348         if (nconn == 0) nconn = ctrl->profile.nbchannel;
 349
 350         spin_lock_irqsave(&card->lock, flags);
 351         b1_put_byte(port, SEND_REGISTER);
 352         b1_put_word(port, appl);
 353         b1_put_word(port, 1024 * (nconn+1));
 354         b1_put_word(port, nconn);
 355         b1_put_word(port, rp->datablkcnt);
 356         b1_put_word(port, rp->datablklen);
 357         spin_unlock_irqrestore(&card->lock, flags);
 358 }
 359
 360 void b1_release_appl(struct capi_ctr *ctrl, u16 appl)
 361 {
 362         avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata);
 363         avmcard *card = cinfo->card;
 364         unsigned int port = card->port;
 365         unsigned long flags;
 366
 367         capilib_release_appl(&cinfo->ncci_head, appl);
 368
 369         spin_lock_irqsave(&card->lock, flags);
 370         b1_put_byte(port, SEND_RELEASE);
 371         b1_put_word(port, appl);
 372         spin_unlock_irqrestore(&card->lock, flags);
 373 }
 374
 375 u16 b1_send_message(struct capi_ctr *ctrl, struct sk_buff *skb)
 376 {
 377         avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata);
 378         avmcard *card = cinfo->card;
 379         unsigned int port = card->port;
 380         unsigned long flags;
 381         u16 len = CAPIMSG_LEN(skb->data);
 382         u8 cmd = CAPIMSG_COMMAND(skb->data);
 383         u8 subcmd = CAPIMSG_SUBCOMMAND(skb->data);
 384         u16 dlen, retval;
 385
 386         if (CAPICMD(cmd, subcmd) == CAPI_DATA_B3_REQ) {
 387                 retval = capilib_data_b3_req(&cinfo->ncci_head,
 388                                              CAPIMSG_APPID(skb->data),
 389                                              CAPIMSG_NCCI(skb->data),
 390                                              CAPIMSG_MSGID(skb->data));
 391                 if (retval != CAPI_NOERROR)
 392                         goto out;
 393
 394                 dlen = CAPIMSG_DATALEN(skb->data);
 395
 396                 spin_lock_irqsave(&card->lock, flags);
 397                 b1_put_byte(port, SEND_DATA_B3_REQ);
 398                 b1_put_slice(port, skb->data, len);
 399                 b1_put_slice(port, skb->data + len, dlen);
 400                 spin_unlock_irqrestore(&card->lock, flags);
 401         } else {
 402                 retval = CAPI_NOERROR;
 403
 404                 spin_lock_irqsave(&card->lock, flags);
 405                 b1_put_byte(port, SEND_MESSAGE);
 406                 b1_put_slice(port, skb->data, len);
 407                 spin_unlock_irqrestore(&card->lock, flags);
 408         }
 409  out:
 410         dev_kfree_skb_any(skb);
 411         return retval;
 412 }
 413
 414 /* ------------------------------------------------------------- */
 415
 416 void b1_parse_version(avmctrl_info *cinfo)
 417 {
 418         struct capi_ctr *ctrl = &cinfo->capi_ctrl;
 419         avmcard *card = cinfo->card;
 420         capi_profile *profp;
 421         u8 *dversion;
 422         u8 flag;
 423         int i, j;
 424
 425         for (j = 0; j < AVM_MAXVERSION; j++)
 426                 cinfo->version[j] = "\0\0" + 1;
 427         for (i = 0, j = 0;
 428              j < AVM_MAXVERSION && i < cinfo->versionlen;
 429              j++, i += cinfo->versionbuf[i] + 1)
 430                 cinfo->version[j] = &cinfo->versionbuf[i + 1];
 431
 432         strlcpy(ctrl->serial, cinfo->version[VER_SERIAL], sizeof(ctrl->serial));
 433         memcpy(&ctrl->profile, cinfo->version[VER_PROFILE],sizeof(capi_profile));
 434         strlcpy(ctrl->manu, "AVM GmbH", sizeof(ctrl->manu));
 435         dversion = cinfo->version[VER_DRIVER];
 436         ctrl->version.majorversion = 2;
 437         ctrl->version.minorversion = 0;
 438         ctrl->version.majormanuversion = (((dversion[0] - '0') & 0xf) << 4);
 439         ctrl->version.majormanuversion |= ((dversion[2] - '0') & 0xf);
 440         ctrl->version.minormanuversion = (dversion[3] - '0') << 4;
 441         ctrl->version.minormanuversion |=
 442                         (dversion[5] - '0') * 10 + ((dversion[6] - '0') & 0xf);
 443
 444         profp = &ctrl->profile;
 445
 446         flag = ((u8 *)(profp->manu))[1];
 447         switch (flag) {
 448         case 0: if (cinfo->version[VER_CARDTYPE])
 449                    strcpy(cinfo->cardname, cinfo->version[VER_CARDTYPE]);
 450                 else strcpy(cinfo->cardname, "B1");
 451                 break;
 452         case 3: strcpy(cinfo->cardname,"PCMCIA B"); break;
 453         case 4: strcpy(cinfo->cardname,"PCMCIA M1"); break;
 454         case 5: strcpy(cinfo->cardname,"PCMCIA M2"); break;
 455         case 6: strcpy(cinfo->cardname,"B1 V3.0"); break;
 456         case 7: strcpy(cinfo->cardname,"B1 PCI"); break;
 457         default: sprintf(cinfo->cardname, "AVM?%u", (unsigned int)flag); break;
 458         }
 459         printk(KERN_NOTICE "%s: card %d \"%s\" ready.\n",
 460                                 card->name, ctrl->cnr, cinfo->cardname);
 461
 462         flag = ((u8 *)(profp->manu))[3];
 463         if (flag)
 464                 printk(KERN_NOTICE "%s: card %d Protocol:%s%s%s%s%s%s%s\n",
 465                         card->name,
 466                         ctrl->cnr,
 467                         (flag & 0x01) ? " DSS1" : "",
 468                         (flag & 0x02) ? " CT1" : "",
 469                         (flag & 0x04) ? " VN3" : "",
 470                         (flag & 0x08) ? " NI1" : "",
 471                         (flag & 0x10) ? " AUSTEL" : "",
 472                         (flag & 0x20) ? " ESS" : "",
 473                         (flag & 0x40) ? " 1TR6" : ""
 474                         );
 475
 476         flag = ((u8 *)(profp->manu))[5];
 477         if (flag)
 478                 printk(KERN_NOTICE "%s: card %d Linetype:%s%s%s%s\n",
 479                         card->name,
 480                         ctrl->cnr,
 481                         (flag & 0x01) ? " point to point" : "",
 482                         (flag & 0x02) ? " point to multipoint" : "",
 483                         (flag & 0x08) ? " leased line without D-channel" : "",
 484                         (flag & 0x04) ? " leased line with D-channel" : ""
 485                         );
 486 }
 487
 488 /* ------------------------------------------------------------- */
 489
 490 irqreturn_t b1_interrupt(int interrupt, void *devptr, struct pt_regs *regs)
 491 {
 492         avmcard *card = devptr;
 493         avmctrl_info *cinfo = &card->ctrlinfo[0];
 494         struct capi_ctr *ctrl = &cinfo->capi_ctrl;
 495         unsigned char b1cmd;
 496         struct sk_buff *skb;
 497
 498         unsigned ApplId;
 499         unsigned MsgLen;
 500         unsigned DataB3Len;
 501         unsigned NCCI;
 502         unsigned WindowSize;
 503         unsigned long flags;
 504
 505         spin_lock_irqsave(&card->lock, flags);
 506
 507         if (!b1_rx_full(card->port)) {
 508                 spin_unlock_irqrestore(&card->lock, flags);
 509                 return IRQ_NONE;
 510         }
 511
 512         b1cmd = b1_get_byte(card->port);
 513
 514         switch (b1cmd) {
 515
 516         case RECEIVE_DATA_B3_IND:
 517
 518                 ApplId = (unsigned) b1_get_word(card->port);
 519                 MsgLen = b1_get_slice(card->port, card->msgbuf);
 520                 DataB3Len = b1_get_slice(card->port, card->databuf);
 521                 spin_unlock_irqrestore(&card->lock, flags);
 522
 523                 if (MsgLen < 30) { /* not CAPI 64Bit */
 524                         memset(card->msgbuf+MsgLen, 0, 30-MsgLen);
 525                         MsgLen = 30;
 526                         CAPIMSG_SETLEN(card->msgbuf, 30);
 527                 }
 528                 if (!(skb = alloc_skb(DataB3Len + MsgLen, GFP_ATOMIC))) {
 529                         printk(KERN_ERR "%s: incoming packet dropped\n",
 530                                         card->name);
 531                 } else {
 532                         memcpy(skb_put(skb, MsgLen), card->msgbuf, MsgLen);
 533                         memcpy(skb_put(skb, DataB3Len), card->databuf, DataB3Len);
 534                         capi_ctr_handle_message(ctrl, ApplId, skb);
 535                 }
 536                 break;
 537
 538         case RECEIVE_MESSAGE:
 539
 540                 ApplId = (unsigned) b1_get_word(card->port);
 541                 MsgLen = b1_get_slice(card->port, card->msgbuf);
 542                 spin_unlock_irqrestore(&card->lock, flags);
 543                 if (!(skb = alloc_skb(MsgLen, GFP_ATOMIC))) {
 544                         printk(KERN_ERR "%s: incoming packet dropped\n",
 545                                         card->name);
 546                 } else {
 547                         memcpy(skb_put(skb, MsgLen), card->msgbuf, MsgLen);
 548                         if (CAPIMSG_CMD(skb->data) == CAPI_DATA_B3_CONF)
 549                                 capilib_data_b3_conf(&cinfo->ncci_head, ApplId,
 550                                                      CAPIMSG_NCCI(skb->data),
 551                                                      CAPIMSG_MSGID(skb->data));
 552
 553                         capi_ctr_handle_message(ctrl, ApplId, skb);
 554                 }
 555                 break;
 556
 557         case RECEIVE_NEW_NCCI:
 558
 559                 ApplId = b1_get_word(card->port);
 560                 NCCI = b1_get_word(card->port);
 561                 WindowSize = b1_get_word(card->port);
 562                 spin_unlock_irqrestore(&card->lock, flags);
 563
 564                 capilib_new_ncci(&cinfo->ncci_head, ApplId, NCCI, WindowSize);
 565
 566                 break;
 567
 568         case RECEIVE_FREE_NCCI:
 569
 570                 ApplId = b1_get_word(card->port);
 571                 NCCI = b1_get_word(card->port);
 572                 spin_unlock_irqrestore(&card->lock, flags);
 573
 574                 if (NCCI != 0xffffffff)
 575                         capilib_free_ncci(&cinfo->ncci_head, ApplId, NCCI);
 576
 577                 break;
 578
 579         case RECEIVE_START:
 580                 /* b1_put_byte(card->port, SEND_POLLACK); */
 581                 spin_unlock_irqrestore(&card->lock, flags);
 582                 capi_ctr_resume_output(ctrl);
 583                 break;
 584
 585         case RECEIVE_STOP:
 586                 spin_unlock_irqrestore(&card->lock, flags);
 587                 capi_ctr_suspend_output(ctrl);
 588                 break;
 589
 590         case RECEIVE_INIT:
 591
 592                 cinfo->versionlen = b1_get_slice(card->port, cinfo->versionbuf);
 593                 spin_unlock_irqrestore(&card->lock, flags);
 594                 b1_parse_version(cinfo);
 595                 printk(KERN_INFO "%s: %s-card (%s) now active\n",
 596                        card->name,
 597                        cinfo->version[VER_CARDTYPE],
 598                        cinfo->version[VER_DRIVER]);
 599                 capi_ctr_ready(ctrl);
 600                 break;
 601
 602         case RECEIVE_TASK_READY:
 603                 ApplId = (unsigned) b1_get_word(card->port);
 604                 MsgLen = b1_get_slice(card->port, card->msgbuf);
 605                 spin_unlock_irqrestore(&card->lock, flags);
 606                 card->msgbuf[MsgLen] = 0;
 607                 while (    MsgLen > 0
 608                        && (   card->msgbuf[MsgLen-1] == '\n'
 609                            || card->msgbuf[MsgLen-1] == '\r')) {
 610                         card->msgbuf[MsgLen-1] = 0;
 611                         MsgLen--;
 612                 }
 613                 printk(KERN_INFO "%s: task %d \"%s\" ready.\n",
 614                                 card->name, ApplId, card->msgbuf);
 615                 break;
 616
 617         case RECEIVE_DEBUGMSG:
 618                 MsgLen = b1_get_slice(card->port, card->msgbuf);
 619                 spin_unlock_irqrestore(&card->lock, flags);
 620                 card->msgbuf[MsgLen] = 0;
 621                 while (    MsgLen > 0
 622                        && (   card->msgbuf[MsgLen-1] == '\n'
 623                            || card->msgbuf[MsgLen-1] == '\r')) {
 624                         card->msgbuf[MsgLen-1] = 0;
 625                         MsgLen--;
 626                 }
 627                 printk(KERN_INFO "%s: DEBUG: %s\n", card->name, card->msgbuf);
 628                 break;
 629
 630         case 0xff:
 631                 spin_unlock_irqrestore(&card->lock, flags);
 632                 printk(KERN_ERR "%s: card removed ?\n", card->name);
 633                 return IRQ_NONE;
 634         default:
 635                 spin_unlock_irqrestore(&card->lock, flags);
 636                 printk(KERN_ERR "%s: b1_interrupt: 0x%x ???\n",
 637                                 card->name, b1cmd);
 638                 return IRQ_HANDLED;
 639         }
 640         return IRQ_HANDLED;
 641 }
 642
 643 /* ------------------------------------------------------------- */
 644 int b1ctl_read_proc(char *page, char **start, off_t off,
 645                         int count, int *eof, struct capi_ctr *ctrl)
 646 {
 647         avmctrl_info *cinfo = (avmctrl_info *)(ctrl->driverdata);
 648         avmcard *card = cinfo->card;
 649         u8 flag;
 650         int len = 0;
 651         char *s;
 652
 653         len += sprintf(page+len, "%-16s %s\n", "name", card->name);
 654         len += sprintf(page+len, "%-16s 0x%x\n", "io", card->port);
 655         len += sprintf(page+len, "%-16s %d\n", "irq", card->irq);
 656         switch (card->cardtype) {
 657         case avm_b1isa: s = "B1 ISA"; break;
 658         case avm_b1pci: s = "B1 PCI"; break;
 659         case avm_b1pcmcia: s = "B1 PCMCIA"; break;
 660         case avm_m1: s = "M1"; break;
 661         case avm_m2: s = "M2"; break;
 662         case avm_t1isa: s = "T1 ISA (HEMA)"; break;
 663         case avm_t1pci: s = "T1 PCI"; break;
 664         case avm_c4: s = "C4"; break;
 665         case avm_c2: s = "C2"; break;
 666         default: s = "???"; break;
 667         }
 668         len += sprintf(page+len, "%-16s %s\n", "type", s);
 669         if (card->cardtype == avm_t1isa)
 670            len += sprintf(page+len, "%-16s %d\n", "cardnr", card->cardnr);
 671         if ((s = cinfo->version[VER_DRIVER]) != 0)
 672            len += sprintf(page+len, "%-16s %s\n", "ver_driver", s);
 673         if ((s = cinfo->version[VER_CARDTYPE]) != 0)
 674            len += sprintf(page+len, "%-16s %s\n", "ver_cardtype", s);
 675         if ((s = cinfo->version[VER_SERIAL]) != 0)
 676            len += sprintf(page+len, "%-16s %s\n", "ver_serial", s);
 677
 678         if (card->cardtype != avm_m1) {
 679                 flag = ((u8 *)(ctrl->profile.manu))[3];
 680                 if (flag)
 681                         len += sprintf(page+len, "%-16s%s%s%s%s%s%s%s\n",
 682                         "protocol",
 683                         (flag & 0x01) ? " DSS1" : "",
 684                         (flag & 0x02) ? " CT1" : "",
 685                         (flag & 0x04) ? " VN3" : "",
 686                         (flag & 0x08) ? " NI1" : "",
 687                         (flag & 0x10) ? " AUSTEL" : "",
 688                         (flag & 0x20) ? " ESS" : "",
 689                         (flag & 0x40) ? " 1TR6" : ""
 690                         );
 691         }
 692         if (card->cardtype != avm_m1) {
 693                 flag = ((u8 *)(ctrl->profile.manu))[5];
 694                 if (flag)
 695                         len += sprintf(page+len, "%-16s%s%s%s%s\n",
 696                         "linetype",
 697                         (flag & 0x01) ? " point to point" : "",
 698                         (flag & 0x02) ? " point to multipoint" : "",
 699                         (flag & 0x08) ? " leased line without D-channel" : "",
 700                         (flag & 0x04) ? " leased line with D-channel" : ""
 701                         );
 702         }
 703         len += sprintf(page+len, "%-16s %s\n", "cardname", cinfo->cardname);
 704
 705         if (off+count >= len)
 706            *eof = 1;
 707         if (len < off)
 708            return 0;
 709         *start = page + off;
 710         return ((count < len-off) ? count : len-off);
 711 }
 712
 713 /* ------------------------------------------------------------- */
 714
 715 #ifdef CONFIG_PCI
 716
 717 avmcard_dmainfo *
 718 avmcard_dma_alloc(char *name, struct pci_dev *pdev, long rsize, long ssize)
 719 {
 720         avmcard_dmainfo *p;
 721         void *buf;
 722
 723         p = kmalloc(sizeof(avmcard_dmainfo), GFP_KERNEL);
 724         if (!p) {
 725                 printk(KERN_WARNING "%s: no memory.\n", name);
 726                 goto err;
 727         }
 728         memset(p, 0, sizeof(avmcard_dmainfo));
 729
 730         p->recvbuf.size = rsize;
 731         buf = pci_alloc_consistent(pdev, rsize, &p->recvbuf.dmaaddr);
 732         if (!buf) {
 733                 printk(KERN_WARNING "%s: allocation of receive dma buffer failed.\n", name);
 734                 goto err_kfree;
 735         }
 736         p->recvbuf.dmabuf = buf;
 737
 738         p->sendbuf.size = ssize;
 739         buf = pci_alloc_consistent(pdev, ssize, &p->sendbuf.dmaaddr);
 740         if (!buf) {
 741                 printk(KERN_WARNING "%s: allocation of send dma buffer failed.\n", name);
 742                 goto err_free_consistent;
 743         }
 744
 745         p->sendbuf.dmabuf = buf;
 746         skb_queue_head_init(&p->send_queue);
 747
 748         return p;
 749
 750  err_free_consistent:
 751         pci_free_consistent(p->pcidev, p->recvbuf.size,
 752                             p->recvbuf.dmabuf, p->recvbuf.dmaaddr);
 753  err_kfree:
 754         kfree(p);
 755  err:
 756         return NULL;
 757 }
 758
 759 void avmcard_dma_free(avmcard_dmainfo *p)
 760 {
 761         pci_free_consistent(p->pcidev, p->recvbuf.size,
 762                             p->recvbuf.dmabuf, p->recvbuf.dmaaddr);
 763         pci_free_consistent(p->pcidev, p->sendbuf.size,
 764                             p->sendbuf.dmabuf, p->sendbuf.dmaaddr);
 765         skb_queue_purge(&p->send_queue);
 766         kfree(p);
 767 }
 768
 769 EXPORT_SYMBOL(avmcard_dma_alloc);
 770 EXPORT_SYMBOL(avmcard_dma_free);
 771
 772 #endif
 773
 774 EXPORT_SYMBOL(b1_irq_table);
 775
 776 EXPORT_SYMBOL(b1_alloc_card);
 777 EXPORT_SYMBOL(b1_free_card);
 778 EXPORT_SYMBOL(b1_detect);
 779 EXPORT_SYMBOL(b1_getrevision);
 780 EXPORT_SYMBOL(b1_load_t4file);
 781 EXPORT_SYMBOL(b1_load_config);
 782 EXPORT_SYMBOL(b1_loaded);
 783 EXPORT_SYMBOL(b1_load_firmware);
 784 EXPORT_SYMBOL(b1_reset_ctr);
 785 EXPORT_SYMBOL(b1_register_appl);
 786 EXPORT_SYMBOL(b1_release_appl);
 787 EXPORT_SYMBOL(b1_send_message);
 788
 789 EXPORT_SYMBOL(b1_parse_version);
 790 EXPORT_SYMBOL(b1_interrupt);
 791
 792 EXPORT_SYMBOL(b1ctl_read_proc);
 793
 794 static int __init b1_init(void)
 795 {
 796         char *p;
 797         char rev[32];
 798
 799         if ((p = strchr(revision, ':')) != 0 && p[1]) {
 800                 strlcpy(rev, p + 2, 32);
 801                 if ((p = strchr(rev, '$')) != 0 && p > rev)
 802                    *(p-1) = 0;
 803         } else
 804                 strcpy(rev, "1.0");
 805
 806         printk(KERN_INFO "b1: revision %s\n", rev);
 807
 808         return 0;
 809 }
 810
 811 static void __exit b1_exit(void)
 812 {
 813 }
 814
 815 module_init(b1_init);
 816 module_exit(b1_exit);