drivers/isdn/capi/kcapi.c

   1 /* $Id: kcapi.c,v 1.1.2.8 2004/03/26 19:57:20 armin Exp $
   2  *
   3  * Kernel CAPI 2.0 Module
   4  *
   5  * Copyright 1999 by Carsten Paeth <calle@calle.de>
   6  * Copyright 2002 by Kai Germaschewski <kai@germaschewski.name>
   7  *
   8  * This software may be used and distributed according to the terms
   9  * of the GNU General Public License, incorporated herein by reference.
  10  *
  11  */
  12
  13 #define AVMB1_COMPAT
  14
  15 #include "kcapi.h"
  16 #include <linux/module.h>
  17 #include <linux/mm.h>
  18 #include <linux/interrupt.h>
  19 #include <linux/ioport.h>
  20 #include <linux/proc_fs.h>
  21 #include <linux/sched.h>
  22 #include <linux/seq_file.h>
  23 #include <linux/skbuff.h>
  24 #include <linux/workqueue.h>
  25 #include <linux/capi.h>
  26 #include <linux/kernelcapi.h>
  27 #include <linux/init.h>
  28 #include <linux/moduleparam.h>
  29 #include <linux/delay.h>
  30 #include <asm/uaccess.h>
  31 #include <linux/isdn/capicmd.h>
  32 #include <linux/isdn/capiutil.h>
  33 #ifdef AVMB1_COMPAT
  34 #include <linux/b1lli.h>
  35 #endif
  36 #include <linux/mutex.h>
  37
  38 static char *revision = "$Revision: 1.1.2.8 $";
  39
  40 /* ------------------------------------------------------------- */
  41
  42 static int showcapimsgs = 0;
  43
  44 MODULE_DESCRIPTION("CAPI4Linux: kernel CAPI layer");
  45 MODULE_AUTHOR("Carsten Paeth");
  46 MODULE_LICENSE("GPL");
  47 module_param(showcapimsgs, uint, 0);
  48
  49 /* ------------------------------------------------------------- */
  50
  51 struct capi_notifier {
  52         struct work_struct work;
  53         unsigned int cmd;
  54         u32 controller;
  55         u16 applid;
  56         u32 ncci;
  57 };
  58
  59 /* ------------------------------------------------------------- */
  60
  61 static struct capi_version driver_version = {2, 0, 1, 1<<4};
  62 static char driver_serial[CAPI_SERIAL_LEN] = "0004711";
  63 static char capi_manufakturer[64] = "AVM Berlin";
  64
  65 #define NCCI2CTRL(ncci)    (((ncci) >> 24) & 0x7f)
  66
  67 LIST_HEAD(capi_drivers);
  68 DEFINE_RWLOCK(capi_drivers_list_lock);
  69
  70 static DEFINE_RWLOCK(application_lock);
  71 static DEFINE_MUTEX(controller_mutex);
  72
  73 struct capi20_appl *capi_applications[CAPI_MAXAPPL];
  74 struct capi_ctr *capi_cards[CAPI_MAXCONTR];
  75
  76 static int ncards;
  77
  78 /* -------- controller ref counting -------------------------------------- */
  79
  80 static inline struct capi_ctr *
  81 capi_ctr_get(struct capi_ctr *card)
  82 {
  83         if (!try_module_get(card->owner))
  84                 return NULL;
  85         return card;
  86 }
  87
  88 static inline void
  89 capi_ctr_put(struct capi_ctr *card)
  90 {
  91         module_put(card->owner);
  92 }
  93
  94 /* ------------------------------------------------------------- */
  95
  96 static inline struct capi_ctr *get_capi_ctr_by_nr(u16 contr)
  97 {
  98         if (contr - 1 >= CAPI_MAXCONTR)
  99                 return NULL;
 100
 101         return capi_cards[contr - 1];
 102 }
 103
 104 static inline struct capi20_appl *get_capi_appl_by_nr(u16 applid)
 105 {
 106         if (applid - 1 >= CAPI_MAXAPPL)
 107                 return NULL;
 108
 109         return capi_applications[applid - 1];
 110 }
 111
 112 /* -------- util functions ------------------------------------ */
 113
 114 static inline int capi_cmd_valid(u8 cmd)
 115 {
 116         switch (cmd) {
 117         case CAPI_ALERT:
 118         case CAPI_CONNECT:
 119         case CAPI_CONNECT_ACTIVE:
 120         case CAPI_CONNECT_B3_ACTIVE:
 121         case CAPI_CONNECT_B3:
 122         case CAPI_CONNECT_B3_T90_ACTIVE:
 123         case CAPI_DATA_B3:
 124         case CAPI_DISCONNECT_B3:
 125         case CAPI_DISCONNECT:
 126         case CAPI_FACILITY:
 127         case CAPI_INFO:
 128         case CAPI_LISTEN:
 129         case CAPI_MANUFACTURER:
 130         case CAPI_RESET_B3:
 131         case CAPI_SELECT_B_PROTOCOL:
 132                 return 1;
 133         }
 134         return 0;
 135 }
 136
 137 static inline int capi_subcmd_valid(u8 subcmd)
 138 {
 139         switch (subcmd) {
 140         case CAPI_REQ:
 141         case CAPI_CONF:
 142         case CAPI_IND:
 143         case CAPI_RESP:
 144                 return 1;
 145         }
 146         return 0;
 147 }
 148
 149 /* ------------------------------------------------------------ */
 150
 151 static void register_appl(struct capi_ctr *card, u16 applid, capi_register_params *rparam)
 152 {
 153         card = capi_ctr_get(card);
 154
 155         if (card)
 156                 card->register_appl(card, applid, rparam);
 157         else
 158                 printk(KERN_WARNING "%s: cannot get card resources\n", __func__);
 159 }
 160
 161
 162 static void release_appl(struct capi_ctr *card, u16 applid)
 163 {
 164         DBG("applid %#x", applid);
 165
 166         card->release_appl(card, applid);
 167         capi_ctr_put(card);
 168 }
 169
 170 /* -------- KCI_CONTRUP --------------------------------------- */
 171
 172 static void notify_up(u32 contr)
 173 {
 174         struct capi_ctr *card = get_capi_ctr_by_nr(contr);
 175         struct capi20_appl *ap;
 176         u16 applid;
 177
 178         if (showcapimsgs & 1) {
 179                 printk(KERN_DEBUG "kcapi: notify up contr %d\n", contr);
 180         }
 181         if (!card) {
 182                 printk(KERN_WARNING "%s: invalid contr %d\n", __func__, contr);
 183                 return;
 184         }
 185         for (applid = 1; applid <= CAPI_MAXAPPL; applid++) {
 186                 ap = get_capi_appl_by_nr(applid);
 187                 if (!ap || ap->release_in_progress) continue;
 188                 register_appl(card, applid, &ap->rparam);
 189                 if (ap->callback && !ap->release_in_progress)
 190                         ap->callback(KCI_CONTRUP, contr, &card->profile);
 191         }
 192 }
 193
 194 /* -------- KCI_CONTRDOWN ------------------------------------- */
 195
 196 static void notify_down(u32 contr)
 197 {
 198         struct capi20_appl *ap;
 199         u16 applid;
 200
 201         if (showcapimsgs & 1) {
 202                 printk(KERN_DEBUG "kcapi: notify down contr %d\n", contr);
 203         }
 204
 205         for (applid = 1; applid <= CAPI_MAXAPPL; applid++) {
 206                 ap = get_capi_appl_by_nr(applid);
 207                 if (ap && ap->callback && !ap->release_in_progress)
 208                         ap->callback(KCI_CONTRDOWN, contr, NULL);
 209         }
 210 }
 211
 212 static void notify_handler(struct work_struct *work)
 213 {
 214         struct capi_notifier *np =
 215                 container_of(work, struct capi_notifier, work);
 216
 217         switch (np->cmd) {
 218         case KCI_CONTRUP:
 219                 notify_up(np->controller);
 220                 break;
 221         case KCI_CONTRDOWN:
 222                 notify_down(np->controller);
 223                 break;
 224         }
 225
 226         kfree(np);
 227 }
 228
 229 /*
 230  * The notifier will result in adding/deleteing of devices. Devices can
 231  * only removed in user process, not in bh.
 232  */
 233 static int notify_push(unsigned int cmd, u32 controller, u16 applid, u32 ncci)
 234 {
 235         struct capi_notifier *np = kmalloc(sizeof(*np), GFP_ATOMIC);
 236
 237         if (!np)
 238                 return -ENOMEM;
 239
 240         INIT_WORK(&np->work, notify_handler);
 241         np->cmd = cmd;
 242         np->controller = controller;
 243         np->applid = applid;
 244         np->ncci = ncci;
 245
 246         schedule_work(&np->work);
 247         return 0;
 248 }
 249
 250
 251 /* -------- Receiver ------------------------------------------ */
 252
 253 static void recv_handler(struct work_struct *work)
 254 {
 255         struct sk_buff *skb;
 256         struct capi20_appl *ap =
 257                 container_of(work, struct capi20_appl, recv_work);
 258
 259         if ((!ap) || (ap->release_in_progress))
 260                 return;
 261
 262         mutex_lock(&ap->recv_mtx);
 263         while ((skb = skb_dequeue(&ap->recv_queue))) {
 264                 if (CAPIMSG_CMD(skb->data) == CAPI_DATA_B3_IND)
 265                         ap->nrecvdatapkt++;
 266                 else
 267                         ap->nrecvctlpkt++;
 268
 269                 ap->recv_message(ap, skb);
 270         }
 271         mutex_unlock(&ap->recv_mtx);
 272 }
 273
 274 /**
 275  * capi_ctr_handle_message() - handle incoming CAPI message
 276  * @card:       controller descriptor structure.
 277  * @appl:       application ID.
 278  * @skb:        message.
 279  *
 280  * Called by hardware driver to pass a CAPI message to the application.
 281  */
 282
 283 void capi_ctr_handle_message(struct capi_ctr * card, u16 appl, struct sk_buff *skb)
 284 {
 285         struct capi20_appl *ap;
 286         int showctl = 0;
 287         u8 cmd, subcmd;
 288         unsigned long flags;
 289         _cdebbuf *cdb;
 290
 291         if (card->cardstate != CARD_RUNNING) {
 292                 cdb = capi_message2str(skb->data);
 293                 if (cdb) {
 294                         printk(KERN_INFO "kcapi: controller [%03d] not active, got: %s",
 295                                 card->cnr, cdb->buf);
 296                         cdebbuf_free(cdb);
 297                 } else
 298                         printk(KERN_INFO "kcapi: controller [%03d] not active, cannot trace\n",
 299                                 card->cnr);
 300                 goto error;
 301         }
 302
 303         cmd = CAPIMSG_COMMAND(skb->data);
 304         subcmd = CAPIMSG_SUBCOMMAND(skb->data);
 305         if (cmd == CAPI_DATA_B3 && subcmd == CAPI_IND) {
 306                 card->nrecvdatapkt++;
 307                 if (card->traceflag > 2) showctl |= 2;
 308         } else {
 309                 card->nrecvctlpkt++;
 310                 if (card->traceflag) showctl |= 2;
 311         }
 312         showctl |= (card->traceflag & 1);
 313         if (showctl & 2) {
 314                 if (showctl & 1) {
 315                         printk(KERN_DEBUG "kcapi: got [%03d] id#%d %s len=%u\n",
 316                                card->cnr, CAPIMSG_APPID(skb->data),
 317                                capi_cmd2str(cmd, subcmd),
 318                                CAPIMSG_LEN(skb->data));
 319                 } else {
 320                         cdb = capi_message2str(skb->data);
 321                         if (cdb) {
 322                                 printk(KERN_DEBUG "kcapi: got [%03d] %s\n",
 323                                         card->cnr, cdb->buf);
 324                                 cdebbuf_free(cdb);
 325                         } else
 326                                 printk(KERN_DEBUG "kcapi: got [%03d] id#%d %s len=%u, cannot trace\n",
 327                                         card->cnr, CAPIMSG_APPID(skb->data),
 328                                         capi_cmd2str(cmd, subcmd),
 329                                         CAPIMSG_LEN(skb->data));
 330                 }
 331
 332         }
 333
 334         read_lock_irqsave(&application_lock, flags);
 335         ap = get_capi_appl_by_nr(CAPIMSG_APPID(skb->data));
 336         if ((!ap) || (ap->release_in_progress)) {
 337                 read_unlock_irqrestore(&application_lock, flags);
 338                 cdb = capi_message2str(skb->data);
 339                 if (cdb) {
 340                         printk(KERN_ERR "kcapi: handle_message: applid %d state released (%s)\n",
 341                         CAPIMSG_APPID(skb->data), cdb->buf);
 342                         cdebbuf_free(cdb);
 343                 } else
 344                         printk(KERN_ERR "kcapi: handle_message: applid %d state released (%s) cannot trace\n",
 345                                 CAPIMSG_APPID(skb->data),
 346                                 capi_cmd2str(cmd, subcmd));
 347                 goto error;
 348         }
 349         skb_queue_tail(&ap->recv_queue, skb);
 350         schedule_work(&ap->recv_work);
 351         read_unlock_irqrestore(&application_lock, flags);
 352
 353         return;
 354
 355 error:
 356         kfree_skb(skb);
 357 }
 358
 359 EXPORT_SYMBOL(capi_ctr_handle_message);
 360
 361 /**
 362  * capi_ctr_ready() - signal CAPI controller ready
 363  * @card:       controller descriptor structure.
 364  *
 365  * Called by hardware driver to signal that the controller is up and running.
 366  */
 367
 368 void capi_ctr_ready(struct capi_ctr * card)
 369 {
 370         card->cardstate = CARD_RUNNING;
 371
 372         printk(KERN_NOTICE "kcapi: card [%03d] \"%s\" ready.\n",
 373                card->cnr, card->name);
 374
 375         notify_push(KCI_CONTRUP, card->cnr, 0, 0);
 376 }
 377
 378 EXPORT_SYMBOL(capi_ctr_ready);
 379
 380 /**
 381  * capi_ctr_down() - signal CAPI controller not ready
 382  * @card:       controller descriptor structure.
 383  *
 384  * Called by hardware driver to signal that the controller is down and
 385  * unavailable for use.
 386  */
 387
 388 void capi_ctr_down(struct capi_ctr * card)
 389 {
 390         u16 appl;
 391
 392         DBG("");
 393
 394         if (card->cardstate == CARD_DETECTED)
 395                 return;
 396
 397         card->cardstate = CARD_DETECTED;
 398
 399         memset(card->manu, 0, sizeof(card->manu));
 400         memset(&card->version, 0, sizeof(card->version));
 401         memset(&card->profile, 0, sizeof(card->profile));
 402         memset(card->serial, 0, sizeof(card->serial));
 403
 404         for (appl = 1; appl <= CAPI_MAXAPPL; appl++) {
 405                 struct capi20_appl *ap = get_capi_appl_by_nr(appl);
 406                 if (!ap || ap->release_in_progress)
 407                         continue;
 408
 409                 capi_ctr_put(card);
 410         }
 411
 412         printk(KERN_NOTICE "kcapi: card [%03d] down.\n", card->cnr);
 413
 414         notify_push(KCI_CONTRDOWN, card->cnr, 0, 0);
 415 }
 416
 417 EXPORT_SYMBOL(capi_ctr_down);
 418
 419 /**
 420  * capi_ctr_suspend_output() - suspend controller
 421  * @card:       controller descriptor structure.
 422  *
 423  * Called by hardware driver to stop data flow.
 424  */
 425
 426 void capi_ctr_suspend_output(struct capi_ctr *card)
 427 {
 428         if (!card->blocked) {
 429                 printk(KERN_DEBUG "kcapi: card [%03d] suspend\n", card->cnr);
 430                 card->blocked = 1;
 431         }
 432 }
 433
 434 EXPORT_SYMBOL(capi_ctr_suspend_output);
 435
 436 /**
 437  * capi_ctr_resume_output() - resume controller
 438  * @card:       controller descriptor structure.
 439  *
 440  * Called by hardware driver to resume data flow.
 441  */
 442
 443 void capi_ctr_resume_output(struct capi_ctr *card)
 444 {
 445         if (card->blocked) {
 446                 printk(KERN_DEBUG "kcapi: card [%03d] resume\n", card->cnr);
 447                 card->blocked = 0;
 448         }
 449 }
 450
 451 EXPORT_SYMBOL(capi_ctr_resume_output);
 452
 453 /* ------------------------------------------------------------- */
 454
 455 /**
 456  * attach_capi_ctr() - register CAPI controller
 457  * @card:       controller descriptor structure.
 458  *
 459  * Called by hardware driver to register a controller with the CAPI subsystem.
 460  * Return value: 0 on success, error code < 0 on error
 461  */
 462
 463 int
 464 attach_capi_ctr(struct capi_ctr *card)
 465 {
 466         int i;
 467
 468         mutex_lock(&controller_mutex);
 469
 470         for (i = 0; i < CAPI_MAXCONTR; i++) {
 471                 if (capi_cards[i] == NULL)
 472                         break;
 473         }
 474         if (i == CAPI_MAXCONTR) {
 475                 mutex_unlock(&controller_mutex);
 476                 printk(KERN_ERR "kcapi: out of controller slots\n");
 477                 return -EBUSY;
 478         }
 479         capi_cards[i] = card;
 480
 481         mutex_unlock(&controller_mutex);
 482
 483         card->nrecvctlpkt = 0;
 484         card->nrecvdatapkt = 0;
 485         card->nsentctlpkt = 0;
 486         card->nsentdatapkt = 0;
 487         card->cnr = i + 1;
 488         card->cardstate = CARD_DETECTED;
 489         card->blocked = 0;
 490         card->traceflag = showcapimsgs;
 491
 492         sprintf(card->procfn, "capi/controllers/%d", card->cnr);
 493         card->procent = proc_create_data(card->procfn, 0, NULL, card->proc_fops, card);
 494
 495         ncards++;
 496         printk(KERN_NOTICE "kcapi: Controller [%03d]: %s attached\n",
 497                         card->cnr, card->name);
 498         return 0;
 499 }
 500
 501 EXPORT_SYMBOL(attach_capi_ctr);
 502
 503 /**
 504  * detach_capi_ctr() - unregister CAPI controller
 505  * @card:       controller descriptor structure.
 506  *
 507  * Called by hardware driver to remove the registration of a controller
 508  * with the CAPI subsystem.
 509  * Return value: 0 on success, error code < 0 on error
 510  */
 511
 512 int detach_capi_ctr(struct capi_ctr *card)
 513 {
 514         if (card->cardstate != CARD_DETECTED)
 515                 capi_ctr_down(card);
 516
 517         ncards--;
 518
 519         if (card->procent) {
 520            remove_proc_entry(card->procfn, NULL);
 521            card->procent = NULL;
 522         }
 523         capi_cards[card->cnr - 1] = NULL;
 524         printk(KERN_NOTICE "kcapi: Controller [%03d]: %s unregistered\n",
 525                         card->cnr, card->name);
 526
 527         return 0;
 528 }
 529
 530 EXPORT_SYMBOL(detach_capi_ctr);
 531
 532 /**
 533  * register_capi_driver() - register CAPI driver
 534  * @driver:     driver descriptor structure.
 535  *
 536  * Called by hardware driver to register itself with the CAPI subsystem.
 537  */
 538
 539 void register_capi_driver(struct capi_driver *driver)
 540 {
 541         unsigned long flags;
 542
 543         write_lock_irqsave(&capi_drivers_list_lock, flags);
 544         list_add_tail(&driver->list, &capi_drivers);
 545         write_unlock_irqrestore(&capi_drivers_list_lock, flags);
 546 }
 547
 548 EXPORT_SYMBOL(register_capi_driver);
 549
 550 /**
 551  * unregister_capi_driver() - unregister CAPI driver
 552  * @driver:     driver descriptor structure.
 553  *
 554  * Called by hardware driver to unregister itself from the CAPI subsystem.
 555  */
 556
 557 void unregister_capi_driver(struct capi_driver *driver)
 558 {
 559         unsigned long flags;
 560
 561         write_lock_irqsave(&capi_drivers_list_lock, flags);
 562         list_del(&driver->list);
 563         write_unlock_irqrestore(&capi_drivers_list_lock, flags);
 564 }
 565
 566 EXPORT_SYMBOL(unregister_capi_driver);
 567
 568 /* ------------------------------------------------------------- */
 569 /* -------- CAPI2.0 Interface ---------------------------------- */
 570 /* ------------------------------------------------------------- */
 571
 572 /**
 573  * capi20_isinstalled() - CAPI 2.0 operation CAPI_INSTALLED
 574  *
 575  * Return value: CAPI result code (CAPI_NOERROR if at least one ISDN controller
 576  *      is ready for use, CAPI_REGNOTINSTALLED otherwise)
 577  */
 578
 579 u16 capi20_isinstalled(void)
 580 {
 581         int i;
 582         for (i = 0; i < CAPI_MAXCONTR; i++) {
 583                 if (capi_cards[i] && capi_cards[i]->cardstate == CARD_RUNNING)
 584                         return CAPI_NOERROR;
 585         }
 586         return CAPI_REGNOTINSTALLED;
 587 }
 588
 589 EXPORT_SYMBOL(capi20_isinstalled);
 590
 591 /**
 592  * capi20_register() - CAPI 2.0 operation CAPI_REGISTER
 593  * @ap:         CAPI application descriptor structure.
 594  *
 595  * Register an application's presence with CAPI.
 596  * A unique application ID is assigned and stored in @ap->applid.
 597  * After this function returns successfully, the message receive
 598  * callback function @ap->recv_message() may be called at any time
 599  * until capi20_release() has been called for the same @ap.
 600  * Return value: CAPI result code
 601  */
 602
 603 u16 capi20_register(struct capi20_appl *ap)
 604 {
 605         int i;
 606         u16 applid;
 607         unsigned long flags;
 608
 609         DBG("");
 610
 611         if (ap->rparam.datablklen < 128)
 612                 return CAPI_LOGBLKSIZETOSMALL;
 613
 614         write_lock_irqsave(&application_lock, flags);
 615
 616         for (applid = 1; applid <= CAPI_MAXAPPL; applid++) {
 617                 if (capi_applications[applid - 1] == NULL)
 618                         break;
 619         }
 620         if (applid > CAPI_MAXAPPL) {
 621                 write_unlock_irqrestore(&application_lock, flags);
 622                 return CAPI_TOOMANYAPPLS;
 623         }
 624
 625         ap->applid = applid;
 626         capi_applications[applid - 1] = ap;
 627
 628         ap->nrecvctlpkt = 0;
 629         ap->nrecvdatapkt = 0;
 630         ap->nsentctlpkt = 0;
 631         ap->nsentdatapkt = 0;
 632         ap->callback = NULL;
 633         mutex_init(&ap->recv_mtx);
 634         skb_queue_head_init(&ap->recv_queue);
 635         INIT_WORK(&ap->recv_work, recv_handler);
 636         ap->release_in_progress = 0;
 637
 638         write_unlock_irqrestore(&application_lock, flags);
 639
 640         mutex_lock(&controller_mutex);
 641         for (i = 0; i < CAPI_MAXCONTR; i++) {
 642                 if (!capi_cards[i] || capi_cards[i]->cardstate != CARD_RUNNING)
 643                         continue;
 644                 register_appl(capi_cards[i], applid, &ap->rparam);
 645         }
 646         mutex_unlock(&controller_mutex);
 647
 648         if (showcapimsgs & 1) {
 649                 printk(KERN_DEBUG "kcapi: appl %d up\n", applid);
 650         }
 651
 652         return CAPI_NOERROR;
 653 }
 654
 655 EXPORT_SYMBOL(capi20_register);
 656
 657 /**
 658  * capi20_release() - CAPI 2.0 operation CAPI_RELEASE
 659  * @ap:         CAPI application descriptor structure.
 660  *
 661  * Terminate an application's registration with CAPI.
 662  * After this function returns successfully, the message receive
 663  * callback function @ap->recv_message() will no longer be called.
 664  * Return value: CAPI result code
 665  */
 666
 667 u16 capi20_release(struct capi20_appl *ap)
 668 {
 669         int i;
 670         unsigned long flags;
 671
 672         DBG("applid %#x", ap->applid);
 673
 674         write_lock_irqsave(&application_lock, flags);
 675         ap->release_in_progress = 1;
 676         capi_applications[ap->applid - 1] = NULL;
 677         write_unlock_irqrestore(&application_lock, flags);
 678
 679         mutex_lock(&controller_mutex);
 680         for (i = 0; i < CAPI_MAXCONTR; i++) {
 681                 if (!capi_cards[i] || capi_cards[i]->cardstate != CARD_RUNNING)
 682                         continue;
 683                 release_appl(capi_cards[i], ap->applid);
 684         }
 685         mutex_unlock(&controller_mutex);
 686
 687         flush_scheduled_work();
 688         skb_queue_purge(&ap->recv_queue);
 689
 690         if (showcapimsgs & 1) {
 691                 printk(KERN_DEBUG "kcapi: appl %d down\n", ap->applid);
 692         }
 693
 694         return CAPI_NOERROR;
 695 }
 696
 697 EXPORT_SYMBOL(capi20_release);
 698
 699 /**
 700  * capi20_put_message() - CAPI 2.0 operation CAPI_PUT_MESSAGE
 701  * @ap:         CAPI application descriptor structure.
 702  * @skb:        CAPI message.
 703  *
 704  * Transfer a single message to CAPI.
 705  * Return value: CAPI result code
 706  */
 707
 708 u16 capi20_put_message(struct capi20_appl *ap, struct sk_buff *skb)
 709 {
 710         struct capi_ctr *card;
 711         int showctl = 0;
 712         u8 cmd, subcmd;
 713
 714         DBG("applid %#x", ap->applid);
 715
 716         if (ncards == 0)
 717                 return CAPI_REGNOTINSTALLED;
 718         if ((ap->applid == 0) || ap->release_in_progress)
 719                 return CAPI_ILLAPPNR;
 720         if (skb->len < 12
 721             || !capi_cmd_valid(CAPIMSG_COMMAND(skb->data))
 722             || !capi_subcmd_valid(CAPIMSG_SUBCOMMAND(skb->data)))
 723                 return CAPI_ILLCMDORSUBCMDORMSGTOSMALL;
 724         card = get_capi_ctr_by_nr(CAPIMSG_CONTROLLER(skb->data));
 725         if (!card || card->cardstate != CARD_RUNNING) {
 726                 card = get_capi_ctr_by_nr(1); // XXX why?
 727                 if (!card || card->cardstate != CARD_RUNNING)
 728                         return CAPI_REGNOTINSTALLED;
 729         }
 730         if (card->blocked)
 731                 return CAPI_SENDQUEUEFULL;
 732
 733         cmd = CAPIMSG_COMMAND(skb->data);
 734         subcmd = CAPIMSG_SUBCOMMAND(skb->data);
 735
 736         if (cmd == CAPI_DATA_B3 && subcmd== CAPI_REQ) {
 737                 card->nsentdatapkt++;
 738                 ap->nsentdatapkt++;
 739                 if (card->traceflag > 2) showctl |= 2;
 740         } else {
 741                 card->nsentctlpkt++;
 742                 ap->nsentctlpkt++;
 743                 if (card->traceflag) showctl |= 2;
 744         }
 745         showctl |= (card->traceflag & 1);
 746         if (showctl & 2) {
 747                 if (showctl & 1) {
 748                         printk(KERN_DEBUG "kcapi: put [%03d] id#%d %s len=%u\n",
 749                                CAPIMSG_CONTROLLER(skb->data),
 750                                CAPIMSG_APPID(skb->data),
 751                                capi_cmd2str(cmd, subcmd),
 752                                CAPIMSG_LEN(skb->data));
 753                 } else {
 754                         _cdebbuf *cdb = capi_message2str(skb->data);
 755                         if (cdb) {
 756                                 printk(KERN_DEBUG "kcapi: put [%03d] %s\n",
 757                                         CAPIMSG_CONTROLLER(skb->data),
 758                                         cdb->buf);
 759                                 cdebbuf_free(cdb);
 760                         } else
 761                                 printk(KERN_DEBUG "kcapi: put [%03d] id#%d %s len=%u cannot trace\n",
 762                                         CAPIMSG_CONTROLLER(skb->data),
 763                                         CAPIMSG_APPID(skb->data),
 764                                         capi_cmd2str(cmd, subcmd),
 765                                         CAPIMSG_LEN(skb->data));
 766                 }
 767         }
 768         return card->send_message(card, skb);
 769 }
 770
 771 EXPORT_SYMBOL(capi20_put_message);
 772
 773 /**
 774  * capi20_get_manufacturer() - CAPI 2.0 operation CAPI_GET_MANUFACTURER
 775  * @contr:      controller number.
 776  * @buf:        result buffer (64 bytes).
 777  *
 778  * Retrieve information about the manufacturer of the specified ISDN controller
 779  * or (for @contr == 0) the driver itself.
 780  * Return value: CAPI result code
 781  */
 782
 783 u16 capi20_get_manufacturer(u32 contr, u8 *buf)
 784 {
 785         struct capi_ctr *card;
 786
 787         if (contr == 0) {
 788                 strlcpy(buf, capi_manufakturer, CAPI_MANUFACTURER_LEN);
 789                 return CAPI_NOERROR;
 790         }
 791         card = get_capi_ctr_by_nr(contr);
 792         if (!card || card->cardstate != CARD_RUNNING)
 793                 return CAPI_REGNOTINSTALLED;
 794         strlcpy(buf, card->manu, CAPI_MANUFACTURER_LEN);
 795         return CAPI_NOERROR;
 796 }
 797
 798 EXPORT_SYMBOL(capi20_get_manufacturer);
 799
 800 /**
 801  * capi20_get_version() - CAPI 2.0 operation CAPI_GET_VERSION
 802  * @contr:      controller number.
 803  * @verp:       result structure.
 804  *
 805  * Retrieve version information for the specified ISDN controller
 806  * or (for @contr == 0) the driver itself.
 807  * Return value: CAPI result code
 808  */
 809
 810 u16 capi20_get_version(u32 contr, struct capi_version *verp)
 811 {
 812         struct capi_ctr *card;
 813
 814         if (contr == 0) {
 815                 *verp = driver_version;
 816                 return CAPI_NOERROR;
 817         }
 818         card = get_capi_ctr_by_nr(contr);
 819         if (!card || card->cardstate != CARD_RUNNING)
 820                 return CAPI_REGNOTINSTALLED;
 821
 822         memcpy((void *) verp, &card->version, sizeof(capi_version));
 823         return CAPI_NOERROR;
 824 }
 825
 826 EXPORT_SYMBOL(capi20_get_version);
 827
 828 /**
 829  * capi20_get_serial() - CAPI 2.0 operation CAPI_GET_SERIAL_NUMBER
 830  * @contr:      controller number.
 831  * @serial:     result buffer (8 bytes).
 832  *
 833  * Retrieve the serial number of the specified ISDN controller
 834  * or (for @contr == 0) the driver itself.
 835  * Return value: CAPI result code
 836  */
 837
 838 u16 capi20_get_serial(u32 contr, u8 *serial)
 839 {
 840         struct capi_ctr *card;
 841
 842         if (contr == 0) {
 843                 strlcpy(serial, driver_serial, CAPI_SERIAL_LEN);
 844                 return CAPI_NOERROR;
 845         }
 846         card = get_capi_ctr_by_nr(contr);
 847         if (!card || card->cardstate != CARD_RUNNING)
 848                 return CAPI_REGNOTINSTALLED;
 849
 850         strlcpy((void *) serial, card->serial, CAPI_SERIAL_LEN);
 851         return CAPI_NOERROR;
 852 }
 853
 854 EXPORT_SYMBOL(capi20_get_serial);
 855
 856 /**
 857  * capi20_get_profile() - CAPI 2.0 operation CAPI_GET_PROFILE
 858  * @contr:      controller number.
 859  * @profp:      result structure.
 860  *
 861  * Retrieve capability information for the specified ISDN controller
 862  * or (for @contr == 0) the number of installed controllers.
 863  * Return value: CAPI result code
 864  */
 865
 866 u16 capi20_get_profile(u32 contr, struct capi_profile *profp)
 867 {
 868         struct capi_ctr *card;
 869
 870         if (contr == 0) {
 871                 profp->ncontroller = ncards;
 872                 return CAPI_NOERROR;
 873         }
 874         card = get_capi_ctr_by_nr(contr);
 875         if (!card || card->cardstate != CARD_RUNNING)
 876                 return CAPI_REGNOTINSTALLED;
 877
 878         memcpy((void *) profp, &card->profile,
 879                         sizeof(struct capi_profile));
 880         return CAPI_NOERROR;
 881 }
 882
 883 EXPORT_SYMBOL(capi20_get_profile);
 884
 885 #ifdef AVMB1_COMPAT
 886 static int old_capi_manufacturer(unsigned int cmd, void __user *data)
 887 {
 888         avmb1_loadandconfigdef ldef;
 889         avmb1_extcarddef cdef;
 890         avmb1_resetdef rdef;
 891         capicardparams cparams;
 892         struct capi_ctr *card;
 893         struct capi_driver *driver = NULL;
 894         capiloaddata ldata;
 895         struct list_head *l;
 896         unsigned long flags;
 897         int retval;
 898
 899         switch (cmd) {
 900         case AVMB1_ADDCARD:
 901         case AVMB1_ADDCARD_WITH_TYPE:
 902                 if (cmd == AVMB1_ADDCARD) {
 903                    if ((retval = copy_from_user(&cdef, data,
 904                                             sizeof(avmb1_carddef))))
 905                            return retval;
 906                    cdef.cardtype = AVM_CARDTYPE_B1;
 907                 } else {
 908                    if ((retval = copy_from_user(&cdef, data,
 909                                             sizeof(avmb1_extcarddef))))
 910                            return retval;
 911                 }
 912                 cparams.port = cdef.port;
 913                 cparams.irq = cdef.irq;
 914                 cparams.cardnr = cdef.cardnr;
 915
 916                 read_lock_irqsave(&capi_drivers_list_lock, flags);
 917                 switch (cdef.cardtype) {
 918                         case AVM_CARDTYPE_B1:
 919                                 list_for_each(l, &capi_drivers) {
 920                                         driver = list_entry(l, struct capi_driver, list);
 921                                         if (strcmp(driver->name, "b1isa") == 0)
 922                                                 break;
 923                                 }
 924                                 break;
 925                         case AVM_CARDTYPE_T1:
 926                                 list_for_each(l, &capi_drivers) {
 927                                         driver = list_entry(l, struct capi_driver, list);
 928                                         if (strcmp(driver->name, "t1isa") == 0)
 929                                                 break;
 930                                 }
 931                                 break;
 932                         default:
 933                                 driver = NULL;
 934                                 break;
 935                 }
 936                 if (!driver) {
 937                         read_unlock_irqrestore(&capi_drivers_list_lock, flags);
 938                         printk(KERN_ERR "kcapi: driver not loaded.\n");
 939                         return -EIO;
 940                 }
 941                 if (!driver->add_card) {
 942                         read_unlock_irqrestore(&capi_drivers_list_lock, flags);
 943                         printk(KERN_ERR "kcapi: driver has no add card function.\n");
 944                         return -EIO;
 945                 }
 946
 947                 retval = driver->add_card(driver, &cparams);
 948                 read_unlock_irqrestore(&capi_drivers_list_lock, flags);
 949                 return retval;
 950
 951         case AVMB1_LOAD:
 952         case AVMB1_LOAD_AND_CONFIG:
 953
 954                 if (cmd == AVMB1_LOAD) {
 955                         if (copy_from_user(&ldef, data,
 956                                            sizeof(avmb1_loaddef)))
 957                                 return -EFAULT;
 958                         ldef.t4config.len = 0;
 959                         ldef.t4config.data = NULL;
 960                 } else {
 961                         if (copy_from_user(&ldef, data,
 962                                            sizeof(avmb1_loadandconfigdef)))
 963                                 return -EFAULT;
 964                 }
 965                 card = get_capi_ctr_by_nr(ldef.contr);
 966                 if (!card)
 967                         return -EINVAL;
 968                 card = capi_ctr_get(card);
 969                 if (!card)
 970                         return -ESRCH;
 971                 if (card->load_firmware == NULL) {
 972                         printk(KERN_DEBUG "kcapi: load: no load function\n");
 973                         capi_ctr_put(card);
 974                         return -ESRCH;
 975                 }
 976
 977                 if (ldef.t4file.len <= 0) {
 978                         printk(KERN_DEBUG "kcapi: load: invalid parameter: length of t4file is %d ?\n", ldef.t4file.len);
 979                         capi_ctr_put(card);
 980                         return -EINVAL;
 981                 }
 982                 if (ldef.t4file.data == NULL) {
 983                         printk(KERN_DEBUG "kcapi: load: invalid parameter: dataptr is 0\n");
 984                         capi_ctr_put(card);
 985                         return -EINVAL;
 986                 }
 987
 988                 ldata.firmware.user = 1;
 989                 ldata.firmware.data = ldef.t4file.data;
 990                 ldata.firmware.len = ldef.t4file.len;
 991                 ldata.configuration.user = 1;
 992                 ldata.configuration.data = ldef.t4config.data;
 993                 ldata.configuration.len = ldef.t4config.len;
 994
 995                 if (card->cardstate != CARD_DETECTED) {
 996                         printk(KERN_INFO "kcapi: load: contr=%d not in detect state\n", ldef.contr);
 997                         capi_ctr_put(card);
 998                         return -EBUSY;
 999                 }
1000                 card->cardstate = CARD_LOADING;
1001
1002                 retval = card->load_firmware(card, &ldata);
1003
1004                 if (retval) {
1005                         card->cardstate = CARD_DETECTED;
1006                         capi_ctr_put(card);
1007                         return retval;
1008                 }
1009
1010                 while (card->cardstate != CARD_RUNNING) {
1011
1012                         msleep_interruptible(100);      /* 0.1 sec */
1013
1014                         if (signal_pending(current)) {
1015                                 capi_ctr_put(card);
1016                                 return -EINTR;
1017                         }
1018                 }
1019                 capi_ctr_put(card);
1020                 return 0;
1021
1022         case AVMB1_RESETCARD:
1023                 if (copy_from_user(&rdef, data, sizeof(avmb1_resetdef)))
1024                         return -EFAULT;
1025                 card = get_capi_ctr_by_nr(rdef.contr);
1026                 if (!card)
1027                         return -ESRCH;
1028
1029                 if (card->cardstate == CARD_DETECTED)
1030                         return 0;
1031
1032                 card->reset_ctr(card);
1033
1034                 while (card->cardstate > CARD_DETECTED) {
1035
1036                         msleep_interruptible(100);      /* 0.1 sec */
1037
1038                         if (signal_pending(current))
1039                                 return -EINTR;
1040                 }
1041                 return 0;
1042
1043         }
1044         return -EINVAL;
1045 }
1046 #endif
1047
1048 /**
1049  * capi20_manufacturer() - CAPI 2.0 operation CAPI_MANUFACTURER
1050  * @cmd:        command.
1051  * @data:       parameter.
1052  *
1053  * Perform manufacturer specific command.
1054  * Return value: CAPI result code
1055  */
1056
1057 int capi20_manufacturer(unsigned int cmd, void __user *data)
1058 {
1059         struct capi_ctr *card;
1060
1061         switch (cmd) {
1062 #ifdef AVMB1_COMPAT
1063         case AVMB1_LOAD:
1064         case AVMB1_LOAD_AND_CONFIG:
1065         case AVMB1_RESETCARD:
1066         case AVMB1_GET_CARDINFO:
1067         case AVMB1_REMOVECARD:
1068                 return old_capi_manufacturer(cmd, data);
1069 #endif
1070         case KCAPI_CMD_TRACE:
1071         {
1072                 kcapi_flagdef fdef;
1073
1074                 if (copy_from_user(&fdef, data, sizeof(kcapi_flagdef)))
1075                         return -EFAULT;
1076
1077                 card = get_capi_ctr_by_nr(fdef.contr);
1078                 if (!card)
1079                         return -ESRCH;
1080
1081                 card->traceflag = fdef.flag;
1082                 printk(KERN_INFO "kcapi: contr [%03d] set trace=%d\n",
1083                         card->cnr, card->traceflag);
1084                 return 0;
1085         }
1086         case KCAPI_CMD_ADDCARD:
1087         {
1088                 struct list_head *l;
1089                 struct capi_driver *driver = NULL;
1090                 capicardparams cparams;
1091                 kcapi_carddef cdef;
1092                 int retval;
1093
1094                 if ((retval = copy_from_user(&cdef, data, sizeof(cdef))))
1095                         return retval;
1096
1097                 cparams.port = cdef.port;
1098                 cparams.irq = cdef.irq;
1099                 cparams.membase = cdef.membase;
1100                 cparams.cardnr = cdef.cardnr;
1101                 cparams.cardtype = 0;
1102                 cdef.driver[sizeof(cdef.driver)-1] = 0;
1103
1104                 list_for_each(l, &capi_drivers) {
1105                         driver = list_entry(l, struct capi_driver, list);
1106                         if (strcmp(driver->name, cdef.driver) == 0)
1107                                 break;
1108                 }
1109                 if (driver == NULL) {
1110                         printk(KERN_ERR "kcapi: driver \"%s\" not loaded.\n",
1111                                         cdef.driver);
1112                         return -ESRCH;
1113                 }
1114
1115                 if (!driver->add_card) {
1116                         printk(KERN_ERR "kcapi: driver \"%s\" has no add card function.\n", cdef.driver);
1117                         return -EIO;
1118                 }
1119
1120                 return driver->add_card(driver, &cparams);
1121         }
1122
1123         default:
1124                 printk(KERN_ERR "kcapi: manufacturer command %d unknown.\n",
1125                                         cmd);
1126                 break;
1127
1128         }
1129         return -EINVAL;
1130 }
1131
1132 EXPORT_SYMBOL(capi20_manufacturer);
1133
1134 /* temporary hack */
1135
1136 /**
1137  * capi20_set_callback() - set CAPI application notification callback function
1138  * @ap:         CAPI application descriptor structure.
1139  * @callback:   callback function (NULL to remove).
1140  *
1141  * If not NULL, the callback function will be called to notify the
1142  * application of the addition or removal of a controller.
1143  * The first argument (cmd) will tell whether the controller was added
1144  * (KCI_CONTRUP) or removed (KCI_CONTRDOWN).
1145  * The second argument (contr) will be the controller number.
1146  * For cmd==KCI_CONTRUP the third argument (data) will be a pointer to the
1147  * new controller's capability profile structure.
1148  */
1149
1150 void capi20_set_callback(struct capi20_appl *ap,
1151                          void (*callback) (unsigned int cmd, __u32 contr, void *data))
1152 {
1153         ap->callback = callback;
1154 }
1155
1156 EXPORT_SYMBOL(capi20_set_callback);
1157
1158 /* ------------------------------------------------------------- */
1159 /* -------- Init & Cleanup ------------------------------------- */
1160 /* ------------------------------------------------------------- */
1161
1162 /*
1163  * init / exit functions
1164  */
1165
1166 static int __init kcapi_init(void)
1167 {
1168         char *p;
1169         char rev[32];
1170         int ret;
1171
1172         ret = cdebug_init();
1173         if (ret)
1174                 return ret;
1175         kcapi_proc_init();
1176
1177         if ((p = strchr(revision, ':')) != NULL && p[1]) {
1178                 strlcpy(rev, p + 2, sizeof(rev));
1179                 if ((p = strchr(rev, '$')) != NULL && p > rev)
1180                    *(p-1) = 0;
1181         } else
1182                 strcpy(rev, "1.0");
1183
1184         printk(KERN_NOTICE "CAPI Subsystem Rev %s\n", rev);
1185
1186         return 0;
1187 }
1188
1189 static void __exit kcapi_exit(void)
1190 {
1191         kcapi_proc_exit();
1192
1193         /* make sure all notifiers are finished */
1194         flush_scheduled_work();
1195         cdebug_exit();
1196 }
1197
1198 module_init(kcapi_init);
1199 module_exit(kcapi_exit);