proc_fops: convert drivers/isdn/ to seq_file
[safe/jmp/linux-2.6] / 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);