drivers/isdn/capi/capi.c

   1 /* $Id: capi.c,v 1.1.2.7 2004/04/28 09:48:59 armin Exp $
   2  *
   3  * CAPI 2.0 Interface for Linux
   4  *
   5  * Copyright 1996 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/config.h>
  13 #include <linux/module.h>
  14 #include <linux/errno.h>
  15 #include <linux/kernel.h>
  16 #include <linux/major.h>
  17 #include <linux/sched.h>
  18 #include <linux/slab.h>
  19 #include <linux/fcntl.h>
  20 #include <linux/fs.h>
  21 #include <linux/signal.h>
  22 #include <linux/mm.h>
  23 #include <linux/smp_lock.h>
  24 #include <linux/timer.h>
  25 #include <linux/wait.h>
  26 #ifdef CONFIG_ISDN_CAPI_MIDDLEWARE
  27 #include <linux/tty.h>
  28 #ifdef CONFIG_PPP
  29 #include <linux/netdevice.h>
  30 #include <linux/ppp_defs.h>
  31 #include <linux/if_ppp.h>
  32 #endif /* CONFIG_PPP */
  33 #endif /* CONFIG_ISDN_CAPI_MIDDLEWARE */
  34 #include <linux/skbuff.h>
  35 #include <linux/proc_fs.h>
  36 #include <linux/poll.h>
  37 #include <linux/capi.h>
  38 #include <linux/kernelcapi.h>
  39 #include <linux/init.h>
  40 #include <linux/device.h>
  41 #include <linux/devfs_fs_kernel.h>
  42 #include <linux/isdn/capiutil.h>
  43 #include <linux/isdn/capicmd.h>
  44 #if defined(CONFIG_ISDN_CAPI_CAPIFS) || defined(CONFIG_ISDN_CAPI_CAPIFS_MODULE)
  45 #include "capifs.h"
  46 #endif
  47
  48 static char *revision = "$Revision: 1.1.2.7 $";
  49
  50 MODULE_DESCRIPTION("CAPI4Linux: Userspace /dev/capi20 interface");
  51 MODULE_AUTHOR("Carsten Paeth");
  52 MODULE_LICENSE("GPL");
  53
  54 #undef _DEBUG_REFCOUNT          /* alloc/free and open/close debug */
  55 #undef _DEBUG_TTYFUNCS          /* call to tty_driver */
  56 #undef _DEBUG_DATAFLOW          /* data flow */
  57
  58 /* -------- driver information -------------------------------------- */
  59
  60 static struct class_simple *capi_class;
  61
  62 int capi_major = 68;            /* allocated */
  63 #ifdef CONFIG_ISDN_CAPI_MIDDLEWARE
  64 #define CAPINC_NR_PORTS 32
  65 #define CAPINC_MAX_PORTS        256
  66 int capi_ttymajor = 191;
  67 int capi_ttyminors = CAPINC_NR_PORTS;
  68 #endif /* CONFIG_ISDN_CAPI_MIDDLEWARE */
  69
  70 MODULE_PARM(capi_major, "i");
  71 #ifdef CONFIG_ISDN_CAPI_MIDDLEWARE
  72 MODULE_PARM(capi_ttymajor, "i");
  73 MODULE_PARM(capi_ttyminors, "i");
  74 #endif /* CONFIG_ISDN_CAPI_MIDDLEWARE */
  75
  76 /* -------- defines ------------------------------------------------- */
  77
  78 #define CAPINC_MAX_RECVQUEUE    10
  79 #define CAPINC_MAX_SENDQUEUE    10
  80 #define CAPI_MAX_BLKSIZE        2048
  81
  82 /* -------- data structures ----------------------------------------- */
  83
  84 struct capidev;
  85 struct capincci;
  86 #ifdef CONFIG_ISDN_CAPI_MIDDLEWARE
  87 struct capiminor;
  88
  89 struct capiminor {
  90         struct list_head list;
  91         struct capincci  *nccip;
  92         unsigned int      minor;
  93
  94         struct capi20_appl *ap;
  95         u32              ncci;
  96         u16              datahandle;
  97         u16              msgid;
  98
  99         struct tty_struct *tty;
 100         int                ttyinstop;
 101         int                ttyoutstop;
 102         struct sk_buff    *ttyskb;
 103         atomic_t           ttyopencount;
 104
 105         struct sk_buff_head inqueue;
 106         int                 inbytes;
 107         struct sk_buff_head outqueue;
 108         int                 outbytes;
 109
 110         /* transmit path */
 111         struct datahandle_queue {
 112                     struct datahandle_queue *next;
 113                     u16                    datahandle;
 114         } *ackqueue;
 115         int nack;
 116
 117 };
 118 #endif /* CONFIG_ISDN_CAPI_MIDDLEWARE */
 119
 120 struct capincci {
 121         struct capincci *next;
 122         u32              ncci;
 123         struct capidev  *cdev;
 124 #ifdef CONFIG_ISDN_CAPI_MIDDLEWARE
 125         struct capiminor *minorp;
 126 #endif /* CONFIG_ISDN_CAPI_MIDDLEWARE */
 127 };
 128
 129 struct capidev {
 130         struct list_head list;
 131         struct capi20_appl ap;
 132         u16             errcode;
 133         unsigned        userflags;
 134
 135         struct sk_buff_head recvqueue;
 136         wait_queue_head_t recvwait;
 137
 138         struct capincci *nccis;
 139
 140         struct semaphore ncci_list_sem;
 141 };
 142
 143 /* -------- global variables ---------------------------------------- */
 144
 145 static rwlock_t capidev_list_lock = RW_LOCK_UNLOCKED;
 146 static LIST_HEAD(capidev_list);
 147
 148 #ifdef CONFIG_ISDN_CAPI_MIDDLEWARE
 149 static rwlock_t capiminor_list_lock = RW_LOCK_UNLOCKED;
 150 static LIST_HEAD(capiminor_list);
 151 #endif /* CONFIG_ISDN_CAPI_MIDDLEWARE */
 152
 153 #ifdef CONFIG_ISDN_CAPI_MIDDLEWARE
 154 /* -------- datahandles --------------------------------------------- */
 155
 156 static int capincci_add_ack(struct capiminor *mp, u16 datahandle)
 157 {
 158         struct datahandle_queue *n, **pp;
 159
 160         n = kmalloc(sizeof(*n), GFP_ATOMIC);
 161         if (!n) {
 162            printk(KERN_ERR "capi: alloc datahandle failed\n");
 163            return -1;
 164         }
 165         n->next = NULL;
 166         n->datahandle = datahandle;
 167         for (pp = &mp->ackqueue; *pp; pp = &(*pp)->next) ;
 168         *pp = n;
 169         mp->nack++;
 170         return 0;
 171 }
 172
 173 static int capiminor_del_ack(struct capiminor *mp, u16 datahandle)
 174 {
 175         struct datahandle_queue **pp, *p;
 176
 177         for (pp = &mp->ackqueue; *pp; pp = &(*pp)->next) {
 178                 if ((*pp)->datahandle == datahandle) {
 179                         p = *pp;
 180                         *pp = (*pp)->next;
 181                         kfree(p);
 182                         mp->nack--;
 183                         return 0;
 184                 }
 185         }
 186         return -1;
 187 }
 188
 189 static void capiminor_del_all_ack(struct capiminor *mp)
 190 {
 191         struct datahandle_queue **pp, *p;
 192
 193         pp = &mp->ackqueue;
 194         while (*pp) {
 195                 p = *pp;
 196                 *pp = (*pp)->next;
 197                 kfree(p);
 198                 mp->nack--;
 199         }
 200 }
 201
 202
 203 /* -------- struct capiminor ---------------------------------------- */
 204
 205 static struct capiminor *capiminor_alloc(struct capi20_appl *ap, u32 ncci)
 206 {
 207         struct capiminor *mp, *p;
 208         unsigned int minor = 0;
 209         unsigned long flags;
 210
 211         mp = kmalloc(sizeof(*mp), GFP_ATOMIC);
 212         if (!mp) {
 213                 printk(KERN_ERR "capi: can't alloc capiminor\n");
 214                 return NULL;
 215         }
 216
 217         memset(mp, 0, sizeof(struct capiminor));
 218         mp->ap = ap;
 219         mp->ncci = ncci;
 220         mp->msgid = 0;
 221         atomic_set(&mp->ttyopencount,0);
 222
 223         skb_queue_head_init(&mp->inqueue);
 224         skb_queue_head_init(&mp->outqueue);
 225
 226         /* Allocate the least unused minor number.
 227          */
 228         write_lock_irqsave(&capiminor_list_lock, flags);
 229         if (list_empty(&capiminor_list))
 230                 list_add(&mp->list, &capiminor_list);
 231         else {
 232                 list_for_each_entry(p, &capiminor_list, list) {
 233                         if (p->minor > minor)
 234                                 break;
 235                         minor++;
 236                 }
 237
 238                 if (minor < capi_ttyminors) {
 239                         mp->minor = minor;
 240                         list_add(&mp->list, p->list.prev);
 241                 }
 242         }
 243                 write_unlock_irqrestore(&capiminor_list_lock, flags);
 244
 245         if (!(minor < capi_ttyminors)) {
 246                 printk(KERN_NOTICE "capi: out of minors\n");
 247                         kfree(mp);
 248                 return NULL;
 249         }
 250
 251         return mp;
 252 }
 253
 254 static void capiminor_free(struct capiminor *mp)
 255 {
 256         unsigned long flags;
 257
 258         write_lock_irqsave(&capiminor_list_lock, flags);
 259         list_del(&mp->list);
 260         write_unlock_irqrestore(&capiminor_list_lock, flags);
 261
 262         if (mp->ttyskb) kfree_skb(mp->ttyskb);
 263         mp->ttyskb = NULL;
 264         skb_queue_purge(&mp->inqueue);
 265         skb_queue_purge(&mp->outqueue);
 266         capiminor_del_all_ack(mp);
 267         kfree(mp);
 268 }
 269
 270 struct capiminor *capiminor_find(unsigned int minor)
 271 {
 272         struct list_head *l;
 273         struct capiminor *p = NULL;
 274
 275         read_lock(&capiminor_list_lock);
 276         list_for_each(l, &capiminor_list) {
 277                 p = list_entry(l, struct capiminor, list);
 278                 if (p->minor == minor)
 279                         break;
 280         }
 281         read_unlock(&capiminor_list_lock);
 282         if (l == &capiminor_list)
 283                 return NULL;
 284
 285         return p;
 286 }
 287 #endif /* CONFIG_ISDN_CAPI_MIDDLEWARE */
 288
 289 /* -------- struct capincci ----------------------------------------- */
 290
 291 static struct capincci *capincci_alloc(struct capidev *cdev, u32 ncci)
 292 {
 293         struct capincci *np, **pp;
 294 #ifdef CONFIG_ISDN_CAPI_MIDDLEWARE
 295         struct capiminor *mp = NULL;
 296 #endif /* CONFIG_ISDN_CAPI_MIDDLEWARE */
 297
 298         np = kmalloc(sizeof(*np), GFP_ATOMIC);
 299         if (!np)
 300                 return NULL;
 301         memset(np, 0, sizeof(struct capincci));
 302         np->ncci = ncci;
 303         np->cdev = cdev;
 304 #ifdef CONFIG_ISDN_CAPI_MIDDLEWARE
 305         mp = NULL;
 306         if (cdev->userflags & CAPIFLAG_HIGHJACKING)
 307                 mp = np->minorp = capiminor_alloc(&cdev->ap, ncci);
 308         if (mp) {
 309                 mp->nccip = np;
 310 #ifdef _DEBUG_REFCOUNT
 311                 printk(KERN_DEBUG "set mp->nccip\n");
 312 #endif
 313 #if defined(CONFIG_ISDN_CAPI_CAPIFS) || defined(CONFIG_ISDN_CAPI_CAPIFS_MODULE)
 314                 capifs_new_ncci(mp->minor, MKDEV(capi_ttymajor, mp->minor));
 315 #endif
 316         }
 317 #endif /* CONFIG_ISDN_CAPI_MIDDLEWARE */
 318         for (pp=&cdev->nccis; *pp; pp = &(*pp)->next)
 319                 ;
 320         *pp = np;
 321         return np;
 322 }
 323
 324 static void capincci_free(struct capidev *cdev, u32 ncci)
 325 {
 326         struct capincci *np, **pp;
 327 #ifdef CONFIG_ISDN_CAPI_MIDDLEWARE
 328         struct capiminor *mp;
 329 #endif /* CONFIG_ISDN_CAPI_MIDDLEWARE */
 330
 331         pp=&cdev->nccis;
 332         while (*pp) {
 333                 np = *pp;
 334                 if (ncci == 0xffffffff || np->ncci == ncci) {
 335                         *pp = (*pp)->next;
 336 #ifdef CONFIG_ISDN_CAPI_MIDDLEWARE
 337                         if ((mp = np->minorp) != 0) {
 338 #if defined(CONFIG_ISDN_CAPI_CAPIFS) || defined(CONFIG_ISDN_CAPI_CAPIFS_MODULE)
 339                                 capifs_free_ncci(mp->minor);
 340 #endif
 341                                 if (mp->tty) {
 342                                         mp->nccip = NULL;
 343 #ifdef _DEBUG_REFCOUNT
 344                                         printk(KERN_DEBUG "reset mp->nccip\n");
 345 #endif
 346                                         tty_hangup(mp->tty);
 347                                 } else {
 348                                         capiminor_free(mp);
 349                                 }
 350                         }
 351 #endif /* CONFIG_ISDN_CAPI_MIDDLEWARE */
 352                         kfree(np);
 353                         if (*pp == 0) return;
 354                 } else {
 355                         pp = &(*pp)->next;
 356                 }
 357         }
 358 }
 359
 360 static struct capincci *capincci_find(struct capidev *cdev, u32 ncci)
 361 {
 362         struct capincci *p;
 363
 364         for (p=cdev->nccis; p ; p = p->next) {
 365                 if (p->ncci == ncci)
 366                         break;
 367         }
 368         return p;
 369 }
 370
 371 /* -------- struct capidev ------------------------------------------ */
 372
 373 static struct capidev *capidev_alloc(void)
 374 {
 375         struct capidev *cdev;
 376         unsigned long flags;
 377
 378         cdev = kmalloc(sizeof(*cdev), GFP_KERNEL);
 379         if (!cdev)
 380                 return NULL;
 381         memset(cdev, 0, sizeof(struct capidev));
 382
 383         init_MUTEX(&cdev->ncci_list_sem);
 384         skb_queue_head_init(&cdev->recvqueue);
 385         init_waitqueue_head(&cdev->recvwait);
 386         write_lock_irqsave(&capidev_list_lock, flags);
 387         list_add_tail(&cdev->list, &capidev_list);
 388         write_unlock_irqrestore(&capidev_list_lock, flags);
 389         return cdev;
 390 }
 391
 392 static void capidev_free(struct capidev *cdev)
 393 {
 394         unsigned long flags;
 395
 396         if (cdev->ap.applid) {
 397                 capi20_release(&cdev->ap);
 398                 cdev->ap.applid = 0;
 399         }
 400         skb_queue_purge(&cdev->recvqueue);
 401
 402         down(&cdev->ncci_list_sem);
 403         capincci_free(cdev, 0xffffffff);
 404         up(&cdev->ncci_list_sem);
 405
 406         write_lock_irqsave(&capidev_list_lock, flags);
 407         list_del(&cdev->list);
 408         write_unlock_irqrestore(&capidev_list_lock, flags);
 409         kfree(cdev);
 410 }
 411
 412 #ifdef CONFIG_ISDN_CAPI_MIDDLEWARE
 413 /* -------- handle data queue --------------------------------------- */
 414
 415 static struct sk_buff *
 416 gen_data_b3_resp_for(struct capiminor *mp, struct sk_buff *skb)
 417 {
 418         struct sk_buff *nskb;
 419         nskb = alloc_skb(CAPI_DATA_B3_RESP_LEN, GFP_ATOMIC);
 420         if (nskb) {
 421                 u16 datahandle = CAPIMSG_U16(skb->data,CAPIMSG_BASELEN+4+4+2);
 422                 unsigned char *s = skb_put(nskb, CAPI_DATA_B3_RESP_LEN);
 423                 capimsg_setu16(s, 0, CAPI_DATA_B3_RESP_LEN);
 424                 capimsg_setu16(s, 2, mp->ap->applid);
 425                 capimsg_setu8 (s, 4, CAPI_DATA_B3);
 426                 capimsg_setu8 (s, 5, CAPI_RESP);
 427                 capimsg_setu16(s, 6, mp->msgid++);
 428                 capimsg_setu32(s, 8, mp->ncci);
 429                 capimsg_setu16(s, 12, datahandle);
 430         }
 431         return nskb;
 432 }
 433
 434 static int handle_recv_skb(struct capiminor *mp, struct sk_buff *skb)
 435 {
 436         struct sk_buff *nskb;
 437         int datalen;
 438         u16 errcode, datahandle;
 439
 440         datalen = skb->len - CAPIMSG_LEN(skb->data);
 441         if (mp->tty) {
 442                 if (mp->tty->ldisc.receive_buf == 0) {
 443                         printk(KERN_ERR "capi: ldisc has no receive_buf function\n");
 444                         return -1;
 445                 }
 446                 if (mp->ttyinstop) {
 447 #if defined(_DEBUG_DATAFLOW) || defined(_DEBUG_TTYFUNCS)
 448                         printk(KERN_DEBUG "capi: recv tty throttled\n");
 449 #endif
 450                         return -1;
 451                 }
 452                 if (mp->tty->ldisc.receive_room &&
 453                     mp->tty->ldisc.receive_room(mp->tty) < datalen) {
 454 #if defined(_DEBUG_DATAFLOW) || defined(_DEBUG_TTYFUNCS)
 455                         printk(KERN_DEBUG "capi: no room in tty\n");
 456 #endif
 457                         return -1;
 458                 }
 459                 if ((nskb = gen_data_b3_resp_for(mp, skb)) == 0) {
 460                         printk(KERN_ERR "capi: gen_data_b3_resp failed\n");
 461                         return -1;
 462                 }
 463                 datahandle = CAPIMSG_U16(skb->data,CAPIMSG_BASELEN+4);
 464                 errcode = capi20_put_message(mp->ap, nskb);
 465                 if (errcode != CAPI_NOERROR) {
 466                         printk(KERN_ERR "capi: send DATA_B3_RESP failed=%x\n",
 467                                         errcode);
 468                         kfree_skb(nskb);
 469                         return -1;
 470                 }
 471                 (void)skb_pull(skb, CAPIMSG_LEN(skb->data));
 472 #ifdef _DEBUG_DATAFLOW
 473                 printk(KERN_DEBUG "capi: DATA_B3_RESP %u len=%d => ldisc\n",
 474                                         datahandle, skb->len);
 475 #endif
 476                 mp->tty->ldisc.receive_buf(mp->tty, skb->data, NULL, skb->len);
 477                 kfree_skb(skb);
 478                 return 0;
 479
 480         }
 481 #ifdef _DEBUG_DATAFLOW
 482         printk(KERN_DEBUG "capi: currently no receiver\n");
 483 #endif
 484         return -1;
 485 }
 486
 487 static void handle_minor_recv(struct capiminor *mp)
 488 {
 489         struct sk_buff *skb;
 490         while ((skb = skb_dequeue(&mp->inqueue)) != 0) {
 491                 unsigned int len = skb->len;
 492                 mp->inbytes -= len;
 493                 if (handle_recv_skb(mp, skb) < 0) {
 494                         skb_queue_head(&mp->inqueue, skb);
 495                         mp->inbytes += len;
 496                         return;
 497                 }
 498         }
 499 }
 500
 501 static int handle_minor_send(struct capiminor *mp)
 502 {
 503         struct sk_buff *skb;
 504         u16 len;
 505         int count = 0;
 506         u16 errcode;
 507         u16 datahandle;
 508
 509         if (mp->tty && mp->ttyoutstop) {
 510 #if defined(_DEBUG_DATAFLOW) || defined(_DEBUG_TTYFUNCS)
 511                 printk(KERN_DEBUG "capi: send: tty stopped\n");
 512 #endif
 513                 return 0;
 514         }
 515
 516         while ((skb = skb_dequeue(&mp->outqueue)) != 0) {
 517                 datahandle = mp->datahandle;
 518                 len = (u16)skb->len;
 519                 skb_push(skb, CAPI_DATA_B3_REQ_LEN);
 520                 memset(skb->data, 0, CAPI_DATA_B3_REQ_LEN);
 521                 capimsg_setu16(skb->data, 0, CAPI_DATA_B3_REQ_LEN);
 522                 capimsg_setu16(skb->data, 2, mp->ap->applid);
 523                 capimsg_setu8 (skb->data, 4, CAPI_DATA_B3);
 524                 capimsg_setu8 (skb->data, 5, CAPI_REQ);
 525                 capimsg_setu16(skb->data, 6, mp->msgid++);
 526                 capimsg_setu32(skb->data, 8, mp->ncci); /* NCCI */
 527                 capimsg_setu32(skb->data, 12, (u32) skb->data); /* Data32 */
 528                 capimsg_setu16(skb->data, 16, len);     /* Data length */
 529                 capimsg_setu16(skb->data, 18, datahandle);
 530                 capimsg_setu16(skb->data, 20, 0);       /* Flags */
 531
 532                 if (capincci_add_ack(mp, datahandle) < 0) {
 533                         skb_pull(skb, CAPI_DATA_B3_REQ_LEN);
 534                         skb_queue_head(&mp->outqueue, skb);
 535                         return count;
 536                 }
 537                 errcode = capi20_put_message(mp->ap, skb);
 538                 if (errcode == CAPI_NOERROR) {
 539                         mp->datahandle++;
 540                         count++;
 541                         mp->outbytes -= len;
 542 #ifdef _DEBUG_DATAFLOW
 543                         printk(KERN_DEBUG "capi: DATA_B3_REQ %u len=%u\n",
 544                                                         datahandle, len);
 545 #endif
 546                         continue;
 547                 }
 548                 capiminor_del_ack(mp, datahandle);
 549
 550                 if (errcode == CAPI_SENDQUEUEFULL) {
 551                         skb_pull(skb, CAPI_DATA_B3_REQ_LEN);
 552                         skb_queue_head(&mp->outqueue, skb);
 553                         break;
 554                 }
 555
 556                 /* ups, drop packet */
 557                 printk(KERN_ERR "capi: put_message = %x\n", errcode);
 558                 mp->outbytes -= len;
 559                 kfree_skb(skb);
 560         }
 561         return count;
 562 }
 563
 564 #endif /* CONFIG_ISDN_CAPI_MIDDLEWARE */
 565 /* -------- function called by lower level -------------------------- */
 566
 567 static void capi_recv_message(struct capi20_appl *ap, struct sk_buff *skb)
 568 {
 569         struct capidev *cdev = ap->private;
 570 #ifdef CONFIG_ISDN_CAPI_MIDDLEWARE
 571         struct capiminor *mp;
 572         u16 datahandle;
 573 #endif /* CONFIG_ISDN_CAPI_MIDDLEWARE */
 574         struct capincci *np;
 575         u32 ncci;
 576
 577         if (CAPIMSG_CMD(skb->data) == CAPI_CONNECT_B3_CONF) {
 578                 u16 info = CAPIMSG_U16(skb->data, 12); // Info field
 579                 if (info == 0) {
 580                         down(&cdev->ncci_list_sem);
 581                         capincci_alloc(cdev, CAPIMSG_NCCI(skb->data));
 582                         up(&cdev->ncci_list_sem);
 583                 }
 584         }
 585         if (CAPIMSG_CMD(skb->data) == CAPI_CONNECT_B3_IND) {
 586                 down(&cdev->ncci_list_sem);
 587                 capincci_alloc(cdev, CAPIMSG_NCCI(skb->data));
 588                 up(&cdev->ncci_list_sem);
 589         }
 590         if (CAPIMSG_COMMAND(skb->data) != CAPI_DATA_B3) {
 591                 skb_queue_tail(&cdev->recvqueue, skb);
 592                 wake_up_interruptible(&cdev->recvwait);
 593                 return;
 594         }
 595         ncci = CAPIMSG_CONTROL(skb->data);
 596         for (np = cdev->nccis; np && np->ncci != ncci; np = np->next)
 597                 ;
 598         if (!np) {
 599                 printk(KERN_ERR "BUG: capi_signal: ncci not found\n");
 600                 skb_queue_tail(&cdev->recvqueue, skb);
 601                 wake_up_interruptible(&cdev->recvwait);
 602                 return;
 603         }
 604 #ifndef CONFIG_ISDN_CAPI_MIDDLEWARE
 605         skb_queue_tail(&cdev->recvqueue, skb);
 606         wake_up_interruptible(&cdev->recvwait);
 607 #else /* CONFIG_ISDN_CAPI_MIDDLEWARE */
 608         mp = np->minorp;
 609         if (!mp) {
 610                 skb_queue_tail(&cdev->recvqueue, skb);
 611                 wake_up_interruptible(&cdev->recvwait);
 612                 return;
 613         }
 614
 615
 616         if (CAPIMSG_SUBCOMMAND(skb->data) == CAPI_IND) {
 617                 datahandle = CAPIMSG_U16(skb->data, CAPIMSG_BASELEN+4+4+2);
 618 #ifdef _DEBUG_DATAFLOW
 619                 printk(KERN_DEBUG "capi_signal: DATA_B3_IND %u len=%d\n",
 620                                 datahandle, skb->len-CAPIMSG_LEN(skb->data));
 621 #endif
 622                 skb_queue_tail(&mp->inqueue, skb);
 623                 mp->inbytes += skb->len;
 624                 handle_minor_recv(mp);
 625
 626         } else if (CAPIMSG_SUBCOMMAND(skb->data) == CAPI_CONF) {
 627
 628                 datahandle = CAPIMSG_U16(skb->data, CAPIMSG_BASELEN+4);
 629 #ifdef _DEBUG_DATAFLOW
 630                 printk(KERN_DEBUG "capi_signal: DATA_B3_CONF %u 0x%x\n",
 631                                 datahandle,
 632                                 CAPIMSG_U16(skb->data, CAPIMSG_BASELEN+4+2));
 633 #endif
 634                 kfree_skb(skb);
 635                 (void)capiminor_del_ack(mp, datahandle);
 636                 if (mp->tty) {
 637                         if (mp->tty->ldisc.write_wakeup)
 638                                 mp->tty->ldisc.write_wakeup(mp->tty);
 639                 }
 640                 (void)handle_minor_send(mp);
 641
 642         } else {
 643                 /* ups, let capi application handle it :-) */
 644                 skb_queue_tail(&cdev->recvqueue, skb);
 645                 wake_up_interruptible(&cdev->recvwait);
 646         }
 647 #endif /* CONFIG_ISDN_CAPI_MIDDLEWARE */
 648 }
 649
 650 /* -------- file_operations for capidev ----------------------------- */
 651
 652 static ssize_t
 653 capi_read(struct file *file, char __user *buf, size_t count, loff_t *ppos)
 654 {
 655         struct capidev *cdev = (struct capidev *)file->private_data;
 656         struct sk_buff *skb;
 657         size_t copied;
 658
 659         if (ppos != &file->f_pos)
 660                 return -ESPIPE;
 661
 662         if (!cdev->ap.applid)
 663                 return -ENODEV;
 664
 665         if ((skb = skb_dequeue(&cdev->recvqueue)) == 0) {
 666
 667                 if (file->f_flags & O_NONBLOCK)
 668                         return -EAGAIN;
 669
 670                 for (;;) {
 671                         interruptible_sleep_on(&cdev->recvwait);
 672                         if ((skb = skb_dequeue(&cdev->recvqueue)) != 0)
 673                                 break;
 674                         if (signal_pending(current))
 675                                 break;
 676                 }
 677                 if (skb == 0)
 678                         return -ERESTARTNOHAND;
 679         }
 680         if (skb->len > count) {
 681                 skb_queue_head(&cdev->recvqueue, skb);
 682                 return -EMSGSIZE;
 683         }
 684         if (copy_to_user(buf, skb->data, skb->len)) {
 685                 skb_queue_head(&cdev->recvqueue, skb);
 686                 return -EFAULT;
 687         }
 688         copied = skb->len;
 689
 690         kfree_skb(skb);
 691
 692         return copied;
 693 }
 694
 695 static ssize_t
 696 capi_write(struct file *file, const char __user *buf, size_t count, loff_t *ppos)
 697 {
 698         struct capidev *cdev = (struct capidev *)file->private_data;
 699         struct sk_buff *skb;
 700         u16 mlen;
 701
 702         if (ppos != &file->f_pos)
 703                 return -ESPIPE;
 704
 705         if (!cdev->ap.applid)
 706                 return -ENODEV;
 707
 708         skb = alloc_skb(count, GFP_USER);
 709         if (!skb)
 710                 return -ENOMEM;
 711
 712         if (copy_from_user(skb_put(skb, count), buf, count)) {
 713                 kfree_skb(skb);
 714                 return -EFAULT;
 715         }
 716         mlen = CAPIMSG_LEN(skb->data);
 717         if (CAPIMSG_CMD(skb->data) == CAPI_DATA_B3_REQ) {
 718                 if ((size_t)(mlen + CAPIMSG_DATALEN(skb->data)) != count) {
 719                         kfree_skb(skb);
 720                         return -EINVAL;
 721                 }
 722         } else {
 723                 if (mlen != count) {
 724                         kfree_skb(skb);
 725                         return -EINVAL;
 726                 }
 727         }
 728         CAPIMSG_SETAPPID(skb->data, cdev->ap.applid);
 729
 730         if (CAPIMSG_CMD(skb->data) == CAPI_DISCONNECT_B3_RESP) {
 731                 down(&cdev->ncci_list_sem);
 732                 capincci_free(cdev, CAPIMSG_NCCI(skb->data));
 733                 up(&cdev->ncci_list_sem);
 734         }
 735
 736         cdev->errcode = capi20_put_message(&cdev->ap, skb);
 737
 738         if (cdev->errcode) {
 739                 kfree_skb(skb);
 740                 return -EIO;
 741         }
 742         return count;
 743 }
 744
 745 static unsigned int
 746 capi_poll(struct file *file, poll_table * wait)
 747 {
 748         struct capidev *cdev = (struct capidev *)file->private_data;
 749         unsigned int mask = 0;
 750
 751         if (!cdev->ap.applid)
 752                 return POLLERR;
 753
 754         poll_wait(file, &(cdev->recvwait), wait);
 755         mask = POLLOUT | POLLWRNORM;
 756         if (!skb_queue_empty(&cdev->recvqueue))
 757                 mask |= POLLIN | POLLRDNORM;
 758         return mask;
 759 }
 760
 761 static int
 762 capi_ioctl(struct inode *inode, struct file *file,
 763            unsigned int cmd, unsigned long arg)
 764 {
 765         struct capidev *cdev = file->private_data;
 766         struct capi20_appl *ap = &cdev->ap;
 767         capi_ioctl_struct data;
 768         int retval = -EINVAL;
 769         void __user *argp = (void __user *)arg;
 770
 771         switch (cmd) {
 772         case CAPI_REGISTER:
 773                 {
 774                         if (ap->applid)
 775                                 return -EEXIST;
 776
 777                         if (copy_from_user(&cdev->ap.rparam, argp,
 778                                            sizeof(struct capi_register_params)))
 779                                 return -EFAULT;
 780
 781                         cdev->ap.private = cdev;
 782                         cdev->ap.recv_message = capi_recv_message;
 783                         cdev->errcode = capi20_register(ap);
 784                         if (cdev->errcode) {
 785                                 ap->applid = 0;
 786                                 return -EIO;
 787                         }
 788                 }
 789                 return (int)ap->applid;
 790
 791         case CAPI_GET_VERSION:
 792                 {
 793                         if (copy_from_user(&data.contr, argp,
 794                                                 sizeof(data.contr)))
 795                                 return -EFAULT;
 796                         cdev->errcode = capi20_get_version(data.contr, &data.version);
 797                         if (cdev->errcode)
 798                                 return -EIO;
 799                         if (copy_to_user(argp, &data.version,
 800                                          sizeof(data.version)))
 801                                 return -EFAULT;
 802                 }
 803                 return 0;
 804
 805         case CAPI_GET_SERIAL:
 806                 {
 807                         if (copy_from_user(&data.contr, argp,
 808                                            sizeof(data.contr)))
 809                                 return -EFAULT;
 810                         cdev->errcode = capi20_get_serial (data.contr, data.serial);
 811                         if (cdev->errcode)
 812                                 return -EIO;
 813                         if (copy_to_user(argp, data.serial,
 814                                          sizeof(data.serial)))
 815                                 return -EFAULT;
 816                 }
 817                 return 0;
 818         case CAPI_GET_PROFILE:
 819                 {
 820                         if (copy_from_user(&data.contr, argp,
 821                                            sizeof(data.contr)))
 822                                 return -EFAULT;
 823
 824                         if (data.contr == 0) {
 825                                 cdev->errcode = capi20_get_profile(data.contr, &data.profile);
 826                                 if (cdev->errcode)
 827                                         return -EIO;
 828
 829                                 retval = copy_to_user(argp,
 830                                       &data.profile.ncontroller,
 831                                        sizeof(data.profile.ncontroller));
 832
 833                         } else {
 834                                 cdev->errcode = capi20_get_profile(data.contr, &data.profile);
 835                                 if (cdev->errcode)
 836                                         return -EIO;
 837
 838                                 retval = copy_to_user(argp, &data.profile,
 839                                                    sizeof(data.profile));
 840                         }
 841                         if (retval)
 842                                 return -EFAULT;
 843                 }
 844                 return 0;
 845
 846         case CAPI_GET_MANUFACTURER:
 847                 {
 848                         if (copy_from_user(&data.contr, argp,
 849                                            sizeof(data.contr)))
 850                                 return -EFAULT;
 851                         cdev->errcode = capi20_get_manufacturer(data.contr, data.manufacturer);
 852                         if (cdev->errcode)
 853                                 return -EIO;
 854
 855                         if (copy_to_user(argp, data.manufacturer,
 856                                          sizeof(data.manufacturer)))
 857                                 return -EFAULT;
 858
 859                 }
 860                 return 0;
 861         case CAPI_GET_ERRCODE:
 862                 data.errcode = cdev->errcode;
 863                 cdev->errcode = CAPI_NOERROR;
 864                 if (arg) {
 865                         if (copy_to_user(argp, &data.errcode,
 866                                          sizeof(data.errcode)))
 867                                 return -EFAULT;
 868                 }
 869                 return data.errcode;
 870
 871         case CAPI_INSTALLED:
 872                 if (capi20_isinstalled() == CAPI_NOERROR)
 873                         return 0;
 874                 return -ENXIO;
 875
 876         case CAPI_MANUFACTURER_CMD:
 877                 {
 878                         struct capi_manufacturer_cmd mcmd;
 879                         if (!capable(CAP_SYS_ADMIN))
 880                                 return -EPERM;
 881                         if (copy_from_user(&mcmd, argp, sizeof(mcmd)))
 882                                 return -EFAULT;
 883                         return capi20_manufacturer(mcmd.cmd, mcmd.data);
 884                 }
 885                 return 0;
 886
 887         case CAPI_SET_FLAGS:
 888         case CAPI_CLR_FLAGS:
 889                 {
 890                         unsigned userflags;
 891                         if (copy_from_user(&userflags, argp,
 892                                            sizeof(userflags)))
 893                                 return -EFAULT;
 894                         if (cmd == CAPI_SET_FLAGS)
 895                                 cdev->userflags |= userflags;
 896                         else
 897                                 cdev->userflags &= ~userflags;
 898                 }
 899                 return 0;
 900
 901         case CAPI_GET_FLAGS:
 902                 if (copy_to_user(argp, &cdev->userflags,
 903                                  sizeof(cdev->userflags)))
 904                         return -EFAULT;
 905                 return 0;
 906
 907         case CAPI_NCCI_OPENCOUNT:
 908                 {
 909                         struct capincci *nccip;
 910 #ifdef CONFIG_ISDN_CAPI_MIDDLEWARE
 911                         struct capiminor *mp;
 912 #endif /* CONFIG_ISDN_CAPI_MIDDLEWARE */
 913                         unsigned ncci;
 914                         int count = 0;
 915                         if (copy_from_user(&ncci, argp, sizeof(ncci)))
 916                                 return -EFAULT;
 917
 918                         down(&cdev->ncci_list_sem);
 919                         if ((nccip = capincci_find(cdev, (u32) ncci)) == 0) {
 920                                 up(&cdev->ncci_list_sem);
 921                                 return 0;
 922                         }
 923 #ifdef CONFIG_ISDN_CAPI_MIDDLEWARE
 924                         if ((mp = nccip->minorp) != 0) {
 925                                 count += atomic_read(&mp->ttyopencount);
 926                         }
 927 #endif /* CONFIG_ISDN_CAPI_MIDDLEWARE */
 928                         up(&cdev->ncci_list_sem);
 929                         return count;
 930                 }
 931                 return 0;
 932
 933 #ifdef CONFIG_ISDN_CAPI_MIDDLEWARE
 934         case CAPI_NCCI_GETUNIT:
 935                 {
 936                         struct capincci *nccip;
 937                         struct capiminor *mp;
 938                         unsigned ncci;
 939                         int unit = 0;
 940                         if (copy_from_user(&ncci, argp,
 941                                            sizeof(ncci)))
 942                                 return -EFAULT;
 943                         down(&cdev->ncci_list_sem);
 944                         nccip = capincci_find(cdev, (u32) ncci);
 945                         if (!nccip || (mp = nccip->minorp) == 0) {
 946                                 up(&cdev->ncci_list_sem);
 947                                 return -ESRCH;
 948                         }
 949                         unit = mp->minor;
 950                         up(&cdev->ncci_list_sem);
 951                         return unit;
 952                 }
 953                 return 0;
 954 #endif /* CONFIG_ISDN_CAPI_MIDDLEWARE */
 955         }
 956         return -EINVAL;
 957 }
 958
 959 static int
 960 capi_open(struct inode *inode, struct file *file)
 961 {
 962         if (file->private_data)
 963                 return -EEXIST;
 964
 965         if ((file->private_data = capidev_alloc()) == 0)
 966                 return -ENOMEM;
 967
 968         return 0;
 969 }
 970
 971 static int
 972 capi_release(struct inode *inode, struct file *file)
 973 {
 974         struct capidev *cdev = (struct capidev *)file->private_data;
 975
 976         capidev_free(cdev);
 977         file->private_data = NULL;
 978
 979         return 0;
 980 }
 981
 982 static struct file_operations capi_fops =
 983 {
 984         .owner          = THIS_MODULE,
 985         .llseek         = no_llseek,
 986         .read           = capi_read,
 987         .write          = capi_write,
 988         .poll           = capi_poll,
 989         .ioctl          = capi_ioctl,
 990         .open           = capi_open,
 991         .release        = capi_release,
 992 };
 993
 994 #ifdef CONFIG_ISDN_CAPI_MIDDLEWARE
 995 /* -------- tty_operations for capincci ----------------------------- */
 996
 997 static int capinc_tty_open(struct tty_struct * tty, struct file * file)
 998 {
 999         struct capiminor *mp;
1000
1001         if ((mp = capiminor_find(iminor(file->f_dentry->d_inode))) == 0)
1002                 return -ENXIO;
1003         if (mp->nccip == 0)
1004                 return -ENXIO;
1005
1006         tty->driver_data = (void *)mp;
1007
1008         if (atomic_read(&mp->ttyopencount) == 0)
1009                 mp->tty = tty;
1010         atomic_inc(&mp->ttyopencount);
1011 #ifdef _DEBUG_REFCOUNT
1012         printk(KERN_DEBUG "capinc_tty_open ocount=%d\n", atomic_read(&mp->ttyopencount));
1013 #endif
1014         handle_minor_recv(mp);
1015         return 0;
1016 }
1017
1018 static void capinc_tty_close(struct tty_struct * tty, struct file * file)
1019 {
1020         struct capiminor *mp;
1021
1022         mp = (struct capiminor *)tty->driver_data;
1023         if (mp) {
1024                 if (atomic_dec_and_test(&mp->ttyopencount)) {
1025 #ifdef _DEBUG_REFCOUNT
1026                         printk(KERN_DEBUG "capinc_tty_close lastclose\n");
1027 #endif
1028                         tty->driver_data = NULL;
1029                         mp->tty = NULL;
1030                 }
1031 #ifdef _DEBUG_REFCOUNT
1032                 printk(KERN_DEBUG "capinc_tty_close ocount=%d\n", atomic_read(&mp->ttyopencount));
1033 #endif
1034                 if (mp->nccip == 0)
1035                         capiminor_free(mp);
1036         }
1037
1038 #ifdef _DEBUG_REFCOUNT
1039         printk(KERN_DEBUG "capinc_tty_close\n");
1040 #endif
1041 }
1042
1043 static int capinc_tty_write(struct tty_struct * tty, int from_user,
1044                             const unsigned char *buf, int count)
1045 {
1046         struct capiminor *mp = (struct capiminor *)tty->driver_data;
1047         struct sk_buff *skb;
1048         int retval;
1049
1050 #ifdef _DEBUG_TTYFUNCS
1051         printk(KERN_DEBUG "capinc_tty_write(from_user=%d,count=%d)\n",
1052                                 from_user, count);
1053 #endif
1054
1055         if (!mp || !mp->nccip) {
1056 #ifdef _DEBUG_TTYFUNCS
1057                 printk(KERN_DEBUG "capinc_tty_write: mp or mp->ncci NULL\n");
1058 #endif
1059                 return 0;
1060         }
1061
1062         skb = mp->ttyskb;
1063         if (skb) {
1064                 mp->ttyskb = NULL;
1065                 skb_queue_tail(&mp->outqueue, skb);
1066                 mp->outbytes += skb->len;
1067         }
1068
1069         skb = alloc_skb(CAPI_DATA_B3_REQ_LEN+count, GFP_ATOMIC);
1070         if (!skb) {
1071                 printk(KERN_ERR "capinc_tty_write: alloc_skb failed\n");
1072                 return -ENOMEM;
1073         }
1074
1075         skb_reserve(skb, CAPI_DATA_B3_REQ_LEN);
1076         if (from_user) {
1077                 retval = copy_from_user(skb_put(skb, count), buf, count);
1078                 if (retval) {
1079                         kfree_skb(skb);
1080 #ifdef _DEBUG_TTYFUNCS
1081                         printk(KERN_DEBUG "capinc_tty_write: copy_from_user=%d\n", retval);
1082 #endif
1083                         return -EFAULT;
1084                 }
1085         } else {
1086                 memcpy(skb_put(skb, count), buf, count);
1087         }
1088
1089         skb_queue_tail(&mp->outqueue, skb);
1090         mp->outbytes += skb->len;
1091         (void)handle_minor_send(mp);
1092         (void)handle_minor_recv(mp);
1093         return count;
1094 }
1095
1096 static void capinc_tty_put_char(struct tty_struct *tty, unsigned char ch)
1097 {
1098         struct capiminor *mp = (struct capiminor *)tty->driver_data;
1099         struct sk_buff *skb;
1100
1101 #ifdef _DEBUG_TTYFUNCS
1102         printk(KERN_DEBUG "capinc_put_char(%u)\n", ch);
1103 #endif
1104
1105         if (!mp || !mp->nccip) {
1106 #ifdef _DEBUG_TTYFUNCS
1107                 printk(KERN_DEBUG "capinc_tty_put_char: mp or mp->ncci NULL\n");
1108 #endif
1109                 return;
1110         }
1111
1112         skb = mp->ttyskb;
1113         if (skb) {
1114                 if (skb_tailroom(skb) > 0) {
1115                         *(skb_put(skb, 1)) = ch;
1116                         return;
1117                 }
1118                 mp->ttyskb = NULL;
1119                 skb_queue_tail(&mp->outqueue, skb);
1120                 mp->outbytes += skb->len;
1121                 (void)handle_minor_send(mp);
1122         }
1123         skb = alloc_skb(CAPI_DATA_B3_REQ_LEN+CAPI_MAX_BLKSIZE, GFP_ATOMIC);
1124         if (skb) {
1125                 skb_reserve(skb, CAPI_DATA_B3_REQ_LEN);
1126                 *(skb_put(skb, 1)) = ch;
1127                 mp->ttyskb = skb;
1128         } else {
1129                 printk(KERN_ERR "capinc_put_char: char %u lost\n", ch);
1130         }
1131 }
1132
1133 static void capinc_tty_flush_chars(struct tty_struct *tty)
1134 {
1135         struct capiminor *mp = (struct capiminor *)tty->driver_data;
1136         struct sk_buff *skb;
1137
1138 #ifdef _DEBUG_TTYFUNCS
1139         printk(KERN_DEBUG "capinc_tty_flush_chars\n");
1140 #endif
1141
1142         if (!mp || !mp->nccip) {
1143 #ifdef _DEBUG_TTYFUNCS
1144                 printk(KERN_DEBUG "capinc_tty_flush_chars: mp or mp->ncci NULL\n");
1145 #endif
1146                 return;
1147         }
1148
1149         skb = mp->ttyskb;
1150         if (skb) {
1151                 mp->ttyskb = NULL;
1152                 skb_queue_tail(&mp->outqueue, skb);
1153                 mp->outbytes += skb->len;
1154                 (void)handle_minor_send(mp);
1155         }
1156         (void)handle_minor_recv(mp);
1157 }
1158
1159 static int capinc_tty_write_room(struct tty_struct *tty)
1160 {
1161         struct capiminor *mp = (struct capiminor *)tty->driver_data;
1162         int room;
1163         if (!mp || !mp->nccip) {
1164 #ifdef _DEBUG_TTYFUNCS
1165                 printk(KERN_DEBUG "capinc_tty_write_room: mp or mp->ncci NULL\n");
1166 #endif
1167                 return 0;
1168         }
1169         room = CAPINC_MAX_SENDQUEUE-skb_queue_len(&mp->outqueue);
1170         room *= CAPI_MAX_BLKSIZE;
1171 #ifdef _DEBUG_TTYFUNCS
1172         printk(KERN_DEBUG "capinc_tty_write_room = %d\n", room);
1173 #endif
1174         return room;
1175 }
1176
1177 int capinc_tty_chars_in_buffer(struct tty_struct *tty)
1178 {
1179         struct capiminor *mp = (struct capiminor *)tty->driver_data;
1180         if (!mp || !mp->nccip) {
1181 #ifdef _DEBUG_TTYFUNCS
1182                 printk(KERN_DEBUG "capinc_tty_chars_in_buffer: mp or mp->ncci NULL\n");
1183 #endif
1184                 return 0;
1185         }
1186 #ifdef _DEBUG_TTYFUNCS
1187         printk(KERN_DEBUG "capinc_tty_chars_in_buffer = %d nack=%d sq=%d rq=%d\n",
1188                         mp->outbytes, mp->nack,
1189                         skb_queue_len(&mp->outqueue),
1190                         skb_queue_len(&mp->inqueue));
1191 #endif
1192         return mp->outbytes;
1193 }
1194
1195 static int capinc_tty_ioctl(struct tty_struct *tty, struct file * file,
1196                     unsigned int cmd, unsigned long arg)
1197 {
1198         int error = 0;
1199         switch (cmd) {
1200         default:
1201                 error = n_tty_ioctl (tty, file, cmd, arg);
1202                 break;
1203         }
1204         return error;
1205 }
1206
1207 static void capinc_tty_set_termios(struct tty_struct *tty, struct termios * old)
1208 {
1209 #ifdef _DEBUG_TTYFUNCS
1210         printk(KERN_DEBUG "capinc_tty_set_termios\n");
1211 #endif
1212 }
1213
1214 static void capinc_tty_throttle(struct tty_struct * tty)
1215 {
1216         struct capiminor *mp = (struct capiminor *)tty->driver_data;
1217 #ifdef _DEBUG_TTYFUNCS
1218         printk(KERN_DEBUG "capinc_tty_throttle\n");
1219 #endif
1220         if (mp)
1221                 mp->ttyinstop = 1;
1222 }
1223
1224 static void capinc_tty_unthrottle(struct tty_struct * tty)
1225 {
1226         struct capiminor *mp = (struct capiminor *)tty->driver_data;
1227 #ifdef _DEBUG_TTYFUNCS
1228         printk(KERN_DEBUG "capinc_tty_unthrottle\n");
1229 #endif
1230         if (mp) {
1231                 mp->ttyinstop = 0;
1232                 handle_minor_recv(mp);
1233         }
1234 }
1235
1236 static void capinc_tty_stop(struct tty_struct *tty)
1237 {
1238         struct capiminor *mp = (struct capiminor *)tty->driver_data;
1239 #ifdef _DEBUG_TTYFUNCS
1240         printk(KERN_DEBUG "capinc_tty_stop\n");
1241 #endif
1242         if (mp) {
1243                 mp->ttyoutstop = 1;
1244         }
1245 }
1246
1247 static void capinc_tty_start(struct tty_struct *tty)
1248 {
1249         struct capiminor *mp = (struct capiminor *)tty->driver_data;
1250 #ifdef _DEBUG_TTYFUNCS
1251         printk(KERN_DEBUG "capinc_tty_start\n");
1252 #endif
1253         if (mp) {
1254                 mp->ttyoutstop = 0;
1255                 (void)handle_minor_send(mp);
1256         }
1257 }
1258
1259 static void capinc_tty_hangup(struct tty_struct *tty)
1260 {
1261 #ifdef _DEBUG_TTYFUNCS
1262         printk(KERN_DEBUG "capinc_tty_hangup\n");
1263 #endif
1264 }
1265
1266 static void capinc_tty_break_ctl(struct tty_struct *tty, int state)
1267 {
1268 #ifdef _DEBUG_TTYFUNCS
1269         printk(KERN_DEBUG "capinc_tty_break_ctl(%d)\n", state);
1270 #endif
1271 }
1272
1273 static void capinc_tty_flush_buffer(struct tty_struct *tty)
1274 {
1275 #ifdef _DEBUG_TTYFUNCS
1276         printk(KERN_DEBUG "capinc_tty_flush_buffer\n");
1277 #endif
1278 }
1279
1280 static void capinc_tty_set_ldisc(struct tty_struct *tty)
1281 {
1282 #ifdef _DEBUG_TTYFUNCS
1283         printk(KERN_DEBUG "capinc_tty_set_ldisc\n");
1284 #endif
1285 }
1286
1287 static void capinc_tty_send_xchar(struct tty_struct *tty, char ch)
1288 {
1289 #ifdef _DEBUG_TTYFUNCS
1290         printk(KERN_DEBUG "capinc_tty_send_xchar(%d)\n", ch);
1291 #endif
1292 }
1293
1294 static int capinc_tty_read_proc(char *page, char **start, off_t off,
1295                                 int count, int *eof, void *data)
1296 {
1297         return 0;
1298 }
1299
1300 static struct tty_driver *capinc_tty_driver;
1301
1302 static struct tty_operations capinc_ops = {
1303         .open = capinc_tty_open,
1304         .close = capinc_tty_close,
1305         .write = capinc_tty_write,
1306         .put_char = capinc_tty_put_char,
1307         .flush_chars = capinc_tty_flush_chars,
1308         .write_room = capinc_tty_write_room,
1309         .chars_in_buffer = capinc_tty_chars_in_buffer,
1310         .ioctl = capinc_tty_ioctl,
1311         .set_termios = capinc_tty_set_termios,
1312         .throttle = capinc_tty_throttle,
1313         .unthrottle = capinc_tty_unthrottle,
1314         .stop = capinc_tty_stop,
1315         .start = capinc_tty_start,
1316         .hangup = capinc_tty_hangup,
1317         .break_ctl = capinc_tty_break_ctl,
1318         .flush_buffer = capinc_tty_flush_buffer,
1319         .set_ldisc = capinc_tty_set_ldisc,
1320         .send_xchar = capinc_tty_send_xchar,
1321         .read_proc = capinc_tty_read_proc,
1322 };
1323
1324 static int capinc_tty_init(void)
1325 {
1326         struct tty_driver *drv;
1327
1328         if (capi_ttyminors > CAPINC_MAX_PORTS)
1329                 capi_ttyminors = CAPINC_MAX_PORTS;
1330         if (capi_ttyminors <= 0)
1331                 capi_ttyminors = CAPINC_NR_PORTS;
1332
1333         drv = alloc_tty_driver(capi_ttyminors);
1334         if (!drv)
1335                 return -ENOMEM;
1336
1337         drv->owner = THIS_MODULE;
1338         drv->driver_name = "capi_nc";
1339         drv->devfs_name = "capi/";
1340         drv->name = "capi";
1341         drv->major = capi_ttymajor;
1342         drv->minor_start = 0;
1343         drv->type = TTY_DRIVER_TYPE_SERIAL;
1344         drv->subtype = SERIAL_TYPE_NORMAL;
1345         drv->init_termios = tty_std_termios;
1346         drv->init_termios.c_iflag = ICRNL;
1347         drv->init_termios.c_oflag = OPOST | ONLCR;
1348         drv->init_termios.c_cflag = B9600 | CS8 | CREAD | HUPCL | CLOCAL;
1349         drv->init_termios.c_lflag = 0;
1350         drv->flags = TTY_DRIVER_REAL_RAW|TTY_DRIVER_RESET_TERMIOS;
1351         tty_set_operations(drv, &capinc_ops);
1352         if (tty_register_driver(drv)) {
1353                 put_tty_driver(drv);
1354                 printk(KERN_ERR "Couldn't register capi_nc driver\n");
1355                 return -1;
1356         }
1357         capinc_tty_driver = drv;
1358         return 0;
1359 }
1360
1361 static void capinc_tty_exit(void)
1362 {
1363         struct tty_driver *drv = capinc_tty_driver;
1364         int retval;
1365         if ((retval = tty_unregister_driver(drv)))
1366                 printk(KERN_ERR "capi: failed to unregister capi_nc driver (%d)\n", retval);
1367         put_tty_driver(drv);
1368 }
1369
1370 #endif /* CONFIG_ISDN_CAPI_MIDDLEWARE */
1371
1372 /* -------- /proc functions ----------------------------------------- */
1373
1374 /*
1375  * /proc/capi/capi20:
1376  *  minor applid nrecvctlpkt nrecvdatapkt nsendctlpkt nsenddatapkt
1377  */
1378 static int proc_capidev_read_proc(char *page, char **start, off_t off,
1379                                        int count, int *eof, void *data)
1380 {
1381         struct capidev *cdev;
1382         struct list_head *l;
1383         int len = 0;
1384
1385         read_lock(&capidev_list_lock);
1386         list_for_each(l, &capidev_list) {
1387                 cdev = list_entry(l, struct capidev, list);
1388                 len += sprintf(page+len, "0 %d %lu %lu %lu %lu\n",
1389                         cdev->ap.applid,
1390                         cdev->ap.nrecvctlpkt,
1391                         cdev->ap.nrecvdatapkt,
1392                         cdev->ap.nsentctlpkt,
1393                         cdev->ap.nsentdatapkt);
1394                 if (len <= off) {
1395                         off -= len;
1396                         len = 0;
1397                 } else {
1398                         if (len-off > count)
1399                                 goto endloop;
1400                 }
1401         }
1402
1403 endloop:
1404         read_unlock(&capidev_list_lock);
1405         if (len < count)
1406                 *eof = 1;
1407         if (len > count) len = count;
1408         if (len < 0) len = 0;
1409         return len;
1410 }
1411
1412 /*
1413  * /proc/capi/capi20ncci:
1414  *  applid ncci
1415  */
1416 static int proc_capincci_read_proc(char *page, char **start, off_t off,
1417                                        int count, int *eof, void *data)
1418 {
1419         struct capidev *cdev;
1420         struct capincci *np;
1421         struct list_head *l;
1422         int len = 0;
1423
1424         read_lock(&capidev_list_lock);
1425         list_for_each(l, &capidev_list) {
1426                 cdev = list_entry(l, struct capidev, list);
1427                 for (np=cdev->nccis; np; np = np->next) {
1428                         len += sprintf(page+len, "%d 0x%x\n",
1429                                        cdev->ap.applid,
1430                                        np->ncci);
1431                         if (len <= off) {
1432                                 off -= len;
1433                                 len = 0;
1434                         } else {
1435                                 if (len-off > count)
1436                                         goto endloop;
1437                         }
1438                 }
1439         }
1440 endloop:
1441         read_unlock(&capidev_list_lock);
1442         *start = page+off;
1443         if (len < count)
1444                 *eof = 1;
1445         if (len>count) len = count;
1446         if (len<0) len = 0;
1447         return len;
1448 }
1449
1450 static struct procfsentries {
1451   char *name;
1452   mode_t mode;
1453   int (*read_proc)(char *page, char **start, off_t off,
1454                                        int count, int *eof, void *data);
1455   struct proc_dir_entry *procent;
1456 } procfsentries[] = {
1457    /* { "capi",           S_IFDIR, 0 }, */
1458    { "capi/capi20",       0      , proc_capidev_read_proc },
1459    { "capi/capi20ncci",   0      , proc_capincci_read_proc },
1460 };
1461
1462 static void __init proc_init(void)
1463 {
1464     int nelem = sizeof(procfsentries)/sizeof(procfsentries[0]);
1465     int i;
1466
1467     for (i=0; i < nelem; i++) {
1468         struct procfsentries *p = procfsentries + i;
1469         p->procent = create_proc_entry(p->name, p->mode, NULL);
1470         if (p->procent) p->procent->read_proc = p->read_proc;
1471     }
1472 }
1473
1474 static void __exit proc_exit(void)
1475 {
1476     int nelem = sizeof(procfsentries)/sizeof(procfsentries[0]);
1477     int i;
1478
1479     for (i=nelem-1; i >= 0; i--) {
1480         struct procfsentries *p = procfsentries + i;
1481         if (p->procent) {
1482            remove_proc_entry(p->name, NULL);
1483            p->procent = NULL;
1484         }
1485     }
1486 }
1487
1488 /* -------- init function and module interface ---------------------- */
1489
1490
1491 static char rev[32];
1492
1493 static int __init capi_init(void)
1494 {
1495         char *p;
1496         char *compileinfo;
1497
1498         if ((p = strchr(revision, ':')) != 0 && p[1]) {
1499                 strlcpy(rev, p + 2, sizeof(rev));
1500                 if ((p = strchr(rev, '$')) != 0 && p > rev)
1501                    *(p-1) = 0;
1502         } else
1503                 strcpy(rev, "1.0");
1504
1505         if (register_chrdev(capi_major, "capi20", &capi_fops)) {
1506                 printk(KERN_ERR "capi20: unable to get major %d\n", capi_major);
1507                 return -EIO;
1508         }
1509
1510         capi_class = class_simple_create(THIS_MODULE, "capi");
1511         if (IS_ERR(capi_class)) {
1512                 unregister_chrdev(capi_major, "capi20");
1513                 return PTR_ERR(capi_class);
1514         }
1515
1516         class_simple_device_add(capi_class, MKDEV(capi_major, 0), NULL, "capi");
1517         devfs_mk_cdev(MKDEV(capi_major, 0), S_IFCHR | S_IRUSR | S_IWUSR,
1518                         "isdn/capi20");
1519
1520 #ifdef CONFIG_ISDN_CAPI_MIDDLEWARE
1521         if (capinc_tty_init() < 0) {
1522                 class_simple_device_remove(MKDEV(capi_major, 0));
1523                 class_simple_destroy(capi_class);
1524                 unregister_chrdev(capi_major, "capi20");
1525                 return -ENOMEM;
1526         }
1527 #endif /* CONFIG_ISDN_CAPI_MIDDLEWARE */
1528
1529         proc_init();
1530
1531 #ifdef CONFIG_ISDN_CAPI_MIDDLEWARE
1532 #if defined(CONFIG_ISDN_CAPI_CAPIFS) || defined(CONFIG_ISDN_CAPI_CAPIFS_MODULE)
1533         compileinfo = " (middleware+capifs)";
1534 #else
1535         compileinfo = " (no capifs)";
1536 #endif
1537 #else
1538         compileinfo = " (no middleware)";
1539 #endif
1540         printk(KERN_NOTICE "capi20: Rev %s: started up with major %d%s\n",
1541                                 rev, capi_major, compileinfo);
1542
1543         return 0;
1544 }
1545
1546 static void __exit capi_exit(void)
1547 {
1548         proc_exit();
1549
1550         class_simple_device_remove(MKDEV(capi_major, 0));
1551         class_simple_destroy(capi_class);
1552         unregister_chrdev(capi_major, "capi20");
1553         devfs_remove("isdn/capi20");
1554
1555 #ifdef CONFIG_ISDN_CAPI_MIDDLEWARE
1556         capinc_tty_exit();
1557 #endif
1558         printk(KERN_NOTICE "capi: Rev %s: unloaded\n", rev);
1559 }
1560
1561 module_init(capi_init);
1562 module_exit(capi_exit);