Merge branch 'next' into for-linus
[linux-2.6] / drivers / isdn / gigaset / common.c
1 /*
2  * Stuff used by all variants of the driver
3  *
4  * Copyright (c) 2001 by Stefan Eilers,
5  *                       Hansjoerg Lipp <hjlipp@web.de>,
6  *                       Tilman Schmidt <tilman@imap.cc>.
7  *
8  * =====================================================================
9  *      This program is free software; you can redistribute it and/or
10  *      modify it under the terms of the GNU General Public License as
11  *      published by the Free Software Foundation; either version 2 of
12  *      the License, or (at your option) any later version.
13  * =====================================================================
14  */
15
16 #include "gigaset.h"
17 #include <linux/ctype.h>
18 #include <linux/module.h>
19 #include <linux/moduleparam.h>
20
21 /* Version Information */
22 #define DRIVER_AUTHOR "Hansjoerg Lipp <hjlipp@web.de>, Tilman Schmidt <tilman@imap.cc>, Stefan Eilers"
23 #define DRIVER_DESC "Driver for Gigaset 307x"
24
25 /* Module parameters */
26 int gigaset_debuglevel = DEBUG_DEFAULT;
27 EXPORT_SYMBOL_GPL(gigaset_debuglevel);
28 module_param_named(debug, gigaset_debuglevel, int, S_IRUGO|S_IWUSR);
29 MODULE_PARM_DESC(debug, "debug level");
30
31 /* driver state flags */
32 #define VALID_MINOR     0x01
33 #define VALID_ID        0x02
34
35 void gigaset_dbg_buffer(enum debuglevel level, const unsigned char *msg,
36                         size_t len, const unsigned char *buf)
37 {
38         unsigned char outbuf[80];
39         unsigned char c;
40         size_t space = sizeof outbuf - 1;
41         unsigned char *out = outbuf;
42         size_t numin = len;
43
44         while (numin--) {
45                 c = *buf++;
46                 if (c == '~' || c == '^' || c == '\\') {
47                         if (!space--)
48                                 break;
49                         *out++ = '\\';
50                 }
51                 if (c & 0x80) {
52                         if (!space--)
53                                 break;
54                         *out++ = '~';
55                         c ^= 0x80;
56                 }
57                 if (c < 0x20 || c == 0x7f) {
58                         if (!space--)
59                                 break;
60                         *out++ = '^';
61                         c ^= 0x40;
62                 }
63                 if (!space--)
64                         break;
65                 *out++ = c;
66         }
67         *out = 0;
68
69         gig_dbg(level, "%s (%u bytes): %s", msg, (unsigned) len, outbuf);
70 }
71 EXPORT_SYMBOL_GPL(gigaset_dbg_buffer);
72
73 static int setflags(struct cardstate *cs, unsigned flags, unsigned delay)
74 {
75         int r;
76
77         r = cs->ops->set_modem_ctrl(cs, cs->control_state, flags);
78         cs->control_state = flags;
79         if (r < 0)
80                 return r;
81
82         if (delay) {
83                 set_current_state(TASK_INTERRUPTIBLE);
84                 schedule_timeout(delay * HZ / 1000);
85         }
86
87         return 0;
88 }
89
90 int gigaset_enterconfigmode(struct cardstate *cs)
91 {
92         int i, r;
93
94         cs->control_state = TIOCM_RTS; //FIXME
95
96         r = setflags(cs, TIOCM_DTR, 200);
97         if (r < 0)
98                 goto error;
99         r = setflags(cs, 0, 200);
100         if (r < 0)
101                 goto error;
102         for (i = 0; i < 5; ++i) {
103                 r = setflags(cs, TIOCM_RTS, 100);
104                 if (r < 0)
105                         goto error;
106                 r = setflags(cs, 0, 100);
107                 if (r < 0)
108                         goto error;
109         }
110         r = setflags(cs, TIOCM_RTS|TIOCM_DTR, 800);
111         if (r < 0)
112                 goto error;
113
114         return 0;
115
116 error:
117         dev_err(cs->dev, "error %d on setuartbits\n", -r);
118         cs->control_state = TIOCM_RTS|TIOCM_DTR; // FIXME is this a good value?
119         cs->ops->set_modem_ctrl(cs, 0, TIOCM_RTS|TIOCM_DTR);
120
121         return -1; //r
122 }
123
124 static int test_timeout(struct at_state_t *at_state)
125 {
126         if (!at_state->timer_expires)
127                 return 0;
128
129         if (--at_state->timer_expires) {
130                 gig_dbg(DEBUG_MCMD, "decreased timer of %p to %lu",
131                         at_state, at_state->timer_expires);
132                 return 0;
133         }
134
135         if (!gigaset_add_event(at_state->cs, at_state, EV_TIMEOUT, NULL,
136                                at_state->timer_index, NULL)) {
137                 //FIXME what should we do?
138         }
139
140         return 1;
141 }
142
143 static void timer_tick(unsigned long data)
144 {
145         struct cardstate *cs = (struct cardstate *) data;
146         unsigned long flags;
147         unsigned channel;
148         struct at_state_t *at_state;
149         int timeout = 0;
150
151         spin_lock_irqsave(&cs->lock, flags);
152
153         for (channel = 0; channel < cs->channels; ++channel)
154                 if (test_timeout(&cs->bcs[channel].at_state))
155                         timeout = 1;
156
157         if (test_timeout(&cs->at_state))
158                 timeout = 1;
159
160         list_for_each_entry(at_state, &cs->temp_at_states, list)
161                 if (test_timeout(at_state))
162                         timeout = 1;
163
164         if (cs->running) {
165                 mod_timer(&cs->timer, jiffies + msecs_to_jiffies(GIG_TICK));
166                 if (timeout) {
167                         gig_dbg(DEBUG_CMD, "scheduling timeout");
168                         tasklet_schedule(&cs->event_tasklet);
169                 }
170         }
171
172         spin_unlock_irqrestore(&cs->lock, flags);
173 }
174
175 int gigaset_get_channel(struct bc_state *bcs)
176 {
177         unsigned long flags;
178
179         spin_lock_irqsave(&bcs->cs->lock, flags);
180         if (bcs->use_count || !try_module_get(bcs->cs->driver->owner)) {
181                 gig_dbg(DEBUG_ANY, "could not allocate channel %d",
182                         bcs->channel);
183                 spin_unlock_irqrestore(&bcs->cs->lock, flags);
184                 return 0;
185         }
186         ++bcs->use_count;
187         bcs->busy = 1;
188         gig_dbg(DEBUG_ANY, "allocated channel %d", bcs->channel);
189         spin_unlock_irqrestore(&bcs->cs->lock, flags);
190         return 1;
191 }
192
193 void gigaset_free_channel(struct bc_state *bcs)
194 {
195         unsigned long flags;
196
197         spin_lock_irqsave(&bcs->cs->lock, flags);
198         if (!bcs->busy) {
199                 gig_dbg(DEBUG_ANY, "could not free channel %d", bcs->channel);
200                 spin_unlock_irqrestore(&bcs->cs->lock, flags);
201                 return;
202         }
203         --bcs->use_count;
204         bcs->busy = 0;
205         module_put(bcs->cs->driver->owner);
206         gig_dbg(DEBUG_ANY, "freed channel %d", bcs->channel);
207         spin_unlock_irqrestore(&bcs->cs->lock, flags);
208 }
209
210 int gigaset_get_channels(struct cardstate *cs)
211 {
212         unsigned long flags;
213         int i;
214
215         spin_lock_irqsave(&cs->lock, flags);
216         for (i = 0; i < cs->channels; ++i)
217                 if (cs->bcs[i].use_count) {
218                         spin_unlock_irqrestore(&cs->lock, flags);
219                         gig_dbg(DEBUG_ANY, "could not allocate all channels");
220                         return 0;
221                 }
222         for (i = 0; i < cs->channels; ++i)
223                 ++cs->bcs[i].use_count;
224         spin_unlock_irqrestore(&cs->lock, flags);
225
226         gig_dbg(DEBUG_ANY, "allocated all channels");
227
228         return 1;
229 }
230
231 void gigaset_free_channels(struct cardstate *cs)
232 {
233         unsigned long flags;
234         int i;
235
236         gig_dbg(DEBUG_ANY, "unblocking all channels");
237         spin_lock_irqsave(&cs->lock, flags);
238         for (i = 0; i < cs->channels; ++i)
239                 --cs->bcs[i].use_count;
240         spin_unlock_irqrestore(&cs->lock, flags);
241 }
242
243 void gigaset_block_channels(struct cardstate *cs)
244 {
245         unsigned long flags;
246         int i;
247
248         gig_dbg(DEBUG_ANY, "blocking all channels");
249         spin_lock_irqsave(&cs->lock, flags);
250         for (i = 0; i < cs->channels; ++i)
251                 ++cs->bcs[i].use_count;
252         spin_unlock_irqrestore(&cs->lock, flags);
253 }
254
255 static void clear_events(struct cardstate *cs)
256 {
257         struct event_t *ev;
258         unsigned head, tail;
259         unsigned long flags;
260
261         spin_lock_irqsave(&cs->ev_lock, flags);
262
263         head = cs->ev_head;
264         tail = cs->ev_tail;
265
266         while (tail != head) {
267                 ev = cs->events + head;
268                 kfree(ev->ptr);
269                 head = (head + 1) % MAX_EVENTS;
270         }
271
272         cs->ev_head = tail;
273
274         spin_unlock_irqrestore(&cs->ev_lock, flags);
275 }
276
277 struct event_t *gigaset_add_event(struct cardstate *cs,
278                                   struct at_state_t *at_state, int type,
279                                   void *ptr, int parameter, void *arg)
280 {
281         unsigned long flags;
282         unsigned next, tail;
283         struct event_t *event = NULL;
284
285         spin_lock_irqsave(&cs->ev_lock, flags);
286
287         tail = cs->ev_tail;
288         next = (tail + 1) % MAX_EVENTS;
289         if (unlikely(next == cs->ev_head))
290                 dev_err(cs->dev, "event queue full\n");
291         else {
292                 event = cs->events + tail;
293                 event->type = type;
294                 event->at_state = at_state;
295                 event->cid = -1;
296                 event->ptr = ptr;
297                 event->arg = arg;
298                 event->parameter = parameter;
299                 cs->ev_tail = next;
300         }
301
302         spin_unlock_irqrestore(&cs->ev_lock, flags);
303
304         return event;
305 }
306 EXPORT_SYMBOL_GPL(gigaset_add_event);
307
308 static void free_strings(struct at_state_t *at_state)
309 {
310         int i;
311
312         for (i = 0; i < STR_NUM; ++i) {
313                 kfree(at_state->str_var[i]);
314                 at_state->str_var[i] = NULL;
315         }
316 }
317
318 static void clear_at_state(struct at_state_t *at_state)
319 {
320         free_strings(at_state);
321 }
322
323 static void dealloc_at_states(struct cardstate *cs)
324 {
325         struct at_state_t *cur, *next;
326
327         list_for_each_entry_safe(cur, next, &cs->temp_at_states, list) {
328                 list_del(&cur->list);
329                 free_strings(cur);
330                 kfree(cur);
331         }
332 }
333
334 static void gigaset_freebcs(struct bc_state *bcs)
335 {
336         int i;
337
338         gig_dbg(DEBUG_INIT, "freeing bcs[%d]->hw", bcs->channel);
339         if (!bcs->cs->ops->freebcshw(bcs)) {
340                 gig_dbg(DEBUG_INIT, "failed");
341         }
342
343         gig_dbg(DEBUG_INIT, "clearing bcs[%d]->at_state", bcs->channel);
344         clear_at_state(&bcs->at_state);
345         gig_dbg(DEBUG_INIT, "freeing bcs[%d]->skb", bcs->channel);
346
347         if (bcs->skb)
348                 dev_kfree_skb(bcs->skb);
349         for (i = 0; i < AT_NUM; ++i) {
350                 kfree(bcs->commands[i]);
351                 bcs->commands[i] = NULL;
352         }
353 }
354
355 static struct cardstate *alloc_cs(struct gigaset_driver *drv)
356 {
357         unsigned long flags;
358         unsigned i;
359         struct cardstate *cs;
360         struct cardstate *ret = NULL;
361
362         spin_lock_irqsave(&drv->lock, flags);
363         if (drv->blocked)
364                 goto exit;
365         for (i = 0; i < drv->minors; ++i) {
366                 cs = drv->cs + i;
367                 if (!(cs->flags & VALID_MINOR)) {
368                         cs->flags = VALID_MINOR;
369                         ret = cs;
370                         break;
371                 }
372         }
373 exit:
374         spin_unlock_irqrestore(&drv->lock, flags);
375         return ret;
376 }
377
378 static void free_cs(struct cardstate *cs)
379 {
380         cs->flags = 0;
381 }
382
383 static void make_valid(struct cardstate *cs, unsigned mask)
384 {
385         unsigned long flags;
386         struct gigaset_driver *drv = cs->driver;
387         spin_lock_irqsave(&drv->lock, flags);
388         cs->flags |= mask;
389         spin_unlock_irqrestore(&drv->lock, flags);
390 }
391
392 static void make_invalid(struct cardstate *cs, unsigned mask)
393 {
394         unsigned long flags;
395         struct gigaset_driver *drv = cs->driver;
396         spin_lock_irqsave(&drv->lock, flags);
397         cs->flags &= ~mask;
398         spin_unlock_irqrestore(&drv->lock, flags);
399 }
400
401 void gigaset_freecs(struct cardstate *cs)
402 {
403         int i;
404         unsigned long flags;
405
406         if (!cs)
407                 return;
408
409         mutex_lock(&cs->mutex);
410
411         if (!cs->bcs)
412                 goto f_cs;
413         if (!cs->inbuf)
414                 goto f_bcs;
415
416         spin_lock_irqsave(&cs->lock, flags);
417         cs->running = 0;
418         spin_unlock_irqrestore(&cs->lock, flags); /* event handler and timer are
419                                                      not rescheduled below */
420
421         tasklet_kill(&cs->event_tasklet);
422         del_timer_sync(&cs->timer);
423
424         switch (cs->cs_init) {
425         default:
426                 /* clear device sysfs */
427                 gigaset_free_dev_sysfs(cs);
428
429                 gigaset_if_free(cs);
430
431                 gig_dbg(DEBUG_INIT, "clearing hw");
432                 cs->ops->freecshw(cs);
433
434                 //FIXME cmdbuf
435
436                 /* fall through */
437         case 2: /* error in initcshw */
438                 /* Deregister from LL */
439                 make_invalid(cs, VALID_ID);
440                 gig_dbg(DEBUG_INIT, "clearing iif");
441                 gigaset_i4l_cmd(cs, ISDN_STAT_UNLOAD);
442
443                 /* fall through */
444         case 1: /* error when regestering to LL */
445                 gig_dbg(DEBUG_INIT, "clearing at_state");
446                 clear_at_state(&cs->at_state);
447                 dealloc_at_states(cs);
448
449                 /* fall through */
450         case 0: /* error in one call to initbcs */
451                 for (i = 0; i < cs->channels; ++i) {
452                         gig_dbg(DEBUG_INIT, "clearing bcs[%d]", i);
453                         gigaset_freebcs(cs->bcs + i);
454                 }
455
456                 clear_events(cs);
457                 gig_dbg(DEBUG_INIT, "freeing inbuf");
458                 kfree(cs->inbuf);
459         }
460 f_bcs:  gig_dbg(DEBUG_INIT, "freeing bcs[]");
461         kfree(cs->bcs);
462 f_cs:   gig_dbg(DEBUG_INIT, "freeing cs");
463         mutex_unlock(&cs->mutex);
464         free_cs(cs);
465 }
466 EXPORT_SYMBOL_GPL(gigaset_freecs);
467
468 void gigaset_at_init(struct at_state_t *at_state, struct bc_state *bcs,
469                      struct cardstate *cs, int cid)
470 {
471         int i;
472
473         INIT_LIST_HEAD(&at_state->list);
474         at_state->waiting = 0;
475         at_state->getstring = 0;
476         at_state->pending_commands = 0;
477         at_state->timer_expires = 0;
478         at_state->timer_active = 0;
479         at_state->timer_index = 0;
480         at_state->seq_index = 0;
481         at_state->ConState = 0;
482         for (i = 0; i < STR_NUM; ++i)
483                 at_state->str_var[i] = NULL;
484         at_state->int_var[VAR_ZDLE] = 0;
485         at_state->int_var[VAR_ZCTP] = -1;
486         at_state->int_var[VAR_ZSAU] = ZSAU_NULL;
487         at_state->cs = cs;
488         at_state->bcs = bcs;
489         at_state->cid = cid;
490         if (!cid)
491                 at_state->replystruct = cs->tabnocid;
492         else
493                 at_state->replystruct = cs->tabcid;
494 }
495
496
497 static void gigaset_inbuf_init(struct inbuf_t *inbuf, struct bc_state *bcs,
498                                struct cardstate *cs, int inputstate)
499 /* inbuf->read must be allocated before! */
500 {
501         inbuf->head = 0;
502         inbuf->tail = 0;
503         inbuf->cs = cs;
504         inbuf->bcs = bcs; /*base driver: NULL*/
505         inbuf->rcvbuf = NULL;
506         inbuf->inputstate = inputstate;
507 }
508
509 /* append received bytes to inbuf */
510 int gigaset_fill_inbuf(struct inbuf_t *inbuf, const unsigned char *src,
511                        unsigned numbytes)
512 {
513         unsigned n, head, tail, bytesleft;
514
515         gig_dbg(DEBUG_INTR, "received %u bytes", numbytes);
516
517         if (!numbytes)
518                 return 0;
519
520         bytesleft = numbytes;
521         tail = inbuf->tail;
522         head = inbuf->head;
523         gig_dbg(DEBUG_INTR, "buffer state: %u -> %u", head, tail);
524
525         while (bytesleft) {
526                 if (head > tail)
527                         n = head - 1 - tail;
528                 else if (head == 0)
529                         n = (RBUFSIZE-1) - tail;
530                 else
531                         n = RBUFSIZE - tail;
532                 if (!n) {
533                         dev_err(inbuf->cs->dev,
534                                 "buffer overflow (%u bytes lost)\n",
535                                 bytesleft);
536                         break;
537                 }
538                 if (n > bytesleft)
539                         n = bytesleft;
540                 memcpy(inbuf->data + tail, src, n);
541                 bytesleft -= n;
542                 tail = (tail + n) % RBUFSIZE;
543                 src += n;
544         }
545         gig_dbg(DEBUG_INTR, "setting tail to %u", tail);
546         inbuf->tail = tail;
547         return numbytes != bytesleft;
548 }
549 EXPORT_SYMBOL_GPL(gigaset_fill_inbuf);
550
551 /* Initialize the b-channel structure */
552 static struct bc_state *gigaset_initbcs(struct bc_state *bcs,
553                                         struct cardstate *cs, int channel)
554 {
555         int i;
556
557         bcs->tx_skb = NULL; //FIXME -> hw part
558
559         skb_queue_head_init(&bcs->squeue);
560
561         bcs->corrupted = 0;
562         bcs->trans_down = 0;
563         bcs->trans_up = 0;
564
565         gig_dbg(DEBUG_INIT, "setting up bcs[%d]->at_state", channel);
566         gigaset_at_init(&bcs->at_state, bcs, cs, -1);
567
568         bcs->rcvbytes = 0;
569
570 #ifdef CONFIG_GIGASET_DEBUG
571         bcs->emptycount = 0;
572 #endif
573
574         gig_dbg(DEBUG_INIT, "allocating bcs[%d]->skb", channel);
575         bcs->fcs = PPP_INITFCS;
576         bcs->inputstate = 0;
577         if (cs->ignoreframes) {
578                 bcs->inputstate |= INS_skip_frame;
579                 bcs->skb = NULL;
580         } else if ((bcs->skb = dev_alloc_skb(SBUFSIZE + HW_HDR_LEN)) != NULL)
581                 skb_reserve(bcs->skb, HW_HDR_LEN);
582         else {
583                 pr_err("out of memory\n");
584                 bcs->inputstate |= INS_skip_frame;
585         }
586
587         bcs->channel = channel;
588         bcs->cs = cs;
589
590         bcs->chstate = 0;
591         bcs->use_count = 1;
592         bcs->busy = 0;
593         bcs->ignore = cs->ignoreframes;
594
595         for (i = 0; i < AT_NUM; ++i)
596                 bcs->commands[i] = NULL;
597
598         gig_dbg(DEBUG_INIT, "  setting up bcs[%d]->hw", channel);
599         if (cs->ops->initbcshw(bcs))
600                 return bcs;
601
602         gig_dbg(DEBUG_INIT, "  failed");
603
604         gig_dbg(DEBUG_INIT, "  freeing bcs[%d]->skb", channel);
605         if (bcs->skb)
606                 dev_kfree_skb(bcs->skb);
607
608         return NULL;
609 }
610
611 /* gigaset_initcs
612  * Allocate and initialize cardstate structure for Gigaset driver
613  * Calls hardware dependent gigaset_initcshw() function
614  * Calls B channel initialization function gigaset_initbcs() for each B channel
615  * parameters:
616  *      drv             hardware driver the device belongs to
617  *      channels        number of B channels supported by device
618  *      onechannel      !=0: B channel data and AT commands share one
619  *                           communication channel
620  *                      ==0: B channels have separate communication channels
621  *      ignoreframes    number of frames to ignore after setting up B channel
622  *      cidmode         !=0: start in CallID mode
623  *      modulename      name of driver module (used for I4L registration)
624  * return value:
625  *      pointer to cardstate structure
626  */
627 struct cardstate *gigaset_initcs(struct gigaset_driver *drv, int channels,
628                                  int onechannel, int ignoreframes,
629                                  int cidmode, const char *modulename)
630 {
631         struct cardstate *cs = NULL;
632         unsigned long flags;
633         int i;
634
635         gig_dbg(DEBUG_INIT, "allocating cs");
636         if (!(cs = alloc_cs(drv))) {
637                 pr_err("maximum number of devices exceeded\n");
638                 return NULL;
639         }
640
641         gig_dbg(DEBUG_INIT, "allocating bcs[0..%d]", channels - 1);
642         cs->bcs = kmalloc(channels * sizeof(struct bc_state), GFP_KERNEL);
643         if (!cs->bcs) {
644                 pr_err("out of memory\n");
645                 goto error;
646         }
647         gig_dbg(DEBUG_INIT, "allocating inbuf");
648         cs->inbuf = kmalloc(sizeof(struct inbuf_t), GFP_KERNEL);
649         if (!cs->inbuf) {
650                 pr_err("out of memory\n");
651                 goto error;
652         }
653
654         cs->cs_init = 0;
655         cs->channels = channels;
656         cs->onechannel = onechannel;
657         cs->ignoreframes = ignoreframes;
658         INIT_LIST_HEAD(&cs->temp_at_states);
659         cs->running = 0;
660         init_timer(&cs->timer); /* clear next & prev */
661         spin_lock_init(&cs->ev_lock);
662         cs->ev_tail = 0;
663         cs->ev_head = 0;
664
665         tasklet_init(&cs->event_tasklet, &gigaset_handle_event,
666                      (unsigned long) cs);
667         cs->commands_pending = 0;
668         cs->cur_at_seq = 0;
669         cs->gotfwver = -1;
670         cs->open_count = 0;
671         cs->dev = NULL;
672         cs->tty = NULL;
673         cs->tty_dev = NULL;
674         cs->cidmode = cidmode != 0;
675
676         //if(onechannel) { //FIXME
677                 cs->tabnocid = gigaset_tab_nocid_m10x;
678                 cs->tabcid = gigaset_tab_cid_m10x;
679         //} else {
680         //      cs->tabnocid = gigaset_tab_nocid;
681         //      cs->tabcid = gigaset_tab_cid;
682         //}
683
684         init_waitqueue_head(&cs->waitqueue);
685         cs->waiting = 0;
686
687         cs->mode = M_UNKNOWN;
688         cs->mstate = MS_UNINITIALIZED;
689
690         for (i = 0; i < channels; ++i) {
691                 gig_dbg(DEBUG_INIT, "setting up bcs[%d].read", i);
692                 if (!gigaset_initbcs(cs->bcs + i, cs, i)) {
693                         pr_err("could not allocate channel %d data\n", i);
694                         goto error;
695                 }
696         }
697
698         ++cs->cs_init;
699
700         gig_dbg(DEBUG_INIT, "setting up at_state");
701         spin_lock_init(&cs->lock);
702         gigaset_at_init(&cs->at_state, NULL, cs, 0);
703         cs->dle = 0;
704         cs->cbytes = 0;
705
706         gig_dbg(DEBUG_INIT, "setting up inbuf");
707         if (onechannel) {                       //FIXME distinction necessary?
708                 gigaset_inbuf_init(cs->inbuf, cs->bcs, cs, INS_command);
709         } else
710                 gigaset_inbuf_init(cs->inbuf, NULL,    cs, INS_command);
711
712         cs->connected = 0;
713         cs->isdn_up = 0;
714
715         gig_dbg(DEBUG_INIT, "setting up cmdbuf");
716         cs->cmdbuf = cs->lastcmdbuf = NULL;
717         spin_lock_init(&cs->cmdlock);
718         cs->curlen = 0;
719         cs->cmdbytes = 0;
720
721         gig_dbg(DEBUG_INIT, "setting up iif");
722         if (!gigaset_register_to_LL(cs, modulename)) {
723                 pr_err("error registering ISDN device\n");
724                 goto error;
725         }
726
727         make_valid(cs, VALID_ID);
728         ++cs->cs_init;
729         gig_dbg(DEBUG_INIT, "setting up hw");
730         if (!cs->ops->initcshw(cs))
731                 goto error;
732
733         ++cs->cs_init;
734
735         /* set up character device */
736         gigaset_if_init(cs);
737
738         /* set up device sysfs */
739         gigaset_init_dev_sysfs(cs);
740
741         spin_lock_irqsave(&cs->lock, flags);
742         cs->running = 1;
743         spin_unlock_irqrestore(&cs->lock, flags);
744         setup_timer(&cs->timer, timer_tick, (unsigned long) cs);
745         cs->timer.expires = jiffies + msecs_to_jiffies(GIG_TICK);
746         /* FIXME: can jiffies increase too much until the timer is added?
747          * Same problem(?) with mod_timer() in timer_tick(). */
748         add_timer(&cs->timer);
749
750         gig_dbg(DEBUG_INIT, "cs initialized");
751         return cs;
752
753 error:
754         gig_dbg(DEBUG_INIT, "failed");
755         gigaset_freecs(cs);
756         return NULL;
757 }
758 EXPORT_SYMBOL_GPL(gigaset_initcs);
759
760 /* ReInitialize the b-channel structure on hangup */
761 void gigaset_bcs_reinit(struct bc_state *bcs)
762 {
763         struct sk_buff *skb;
764         struct cardstate *cs = bcs->cs;
765         unsigned long flags;
766
767         while ((skb = skb_dequeue(&bcs->squeue)) != NULL)
768                 dev_kfree_skb(skb);
769
770         spin_lock_irqsave(&cs->lock, flags);
771         clear_at_state(&bcs->at_state);
772         bcs->at_state.ConState = 0;
773         bcs->at_state.timer_active = 0;
774         bcs->at_state.timer_expires = 0;
775         bcs->at_state.cid = -1;                 /* No CID defined */
776         spin_unlock_irqrestore(&cs->lock, flags);
777
778         bcs->inputstate = 0;
779
780 #ifdef CONFIG_GIGASET_DEBUG
781         bcs->emptycount = 0;
782 #endif
783
784         bcs->fcs = PPP_INITFCS;
785         bcs->chstate = 0;
786
787         bcs->ignore = cs->ignoreframes;
788         if (bcs->ignore)
789                 bcs->inputstate |= INS_skip_frame;
790
791
792         cs->ops->reinitbcshw(bcs);
793 }
794
795 static void cleanup_cs(struct cardstate *cs)
796 {
797         struct cmdbuf_t *cb, *tcb;
798         int i;
799         unsigned long flags;
800
801         spin_lock_irqsave(&cs->lock, flags);
802
803         cs->mode = M_UNKNOWN;
804         cs->mstate = MS_UNINITIALIZED;
805
806         clear_at_state(&cs->at_state);
807         dealloc_at_states(cs);
808         free_strings(&cs->at_state);
809         gigaset_at_init(&cs->at_state, NULL, cs, 0);
810
811         kfree(cs->inbuf->rcvbuf);
812         cs->inbuf->rcvbuf = NULL;
813         cs->inbuf->inputstate = INS_command;
814         cs->inbuf->head = 0;
815         cs->inbuf->tail = 0;
816
817         cb = cs->cmdbuf;
818         while (cb) {
819                 tcb = cb;
820                 cb = cb->next;
821                 kfree(tcb);
822         }
823         cs->cmdbuf = cs->lastcmdbuf = NULL;
824         cs->curlen = 0;
825         cs->cmdbytes = 0;
826         cs->gotfwver = -1;
827         cs->dle = 0;
828         cs->cur_at_seq = 0;
829         cs->commands_pending = 0;
830         cs->cbytes = 0;
831
832         spin_unlock_irqrestore(&cs->lock, flags);
833
834         for (i = 0; i < cs->channels; ++i) {
835                 gigaset_freebcs(cs->bcs + i);
836                 if (!gigaset_initbcs(cs->bcs + i, cs, i))
837                         pr_err("could not allocate channel %d data\n", i);
838         }
839
840         if (cs->waiting) {
841                 cs->cmd_result = -ENODEV;
842                 cs->waiting = 0;
843                 wake_up_interruptible(&cs->waitqueue);
844         }
845 }
846
847
848 int gigaset_start(struct cardstate *cs)
849 {
850         unsigned long flags;
851
852         if (mutex_lock_interruptible(&cs->mutex))
853                 return 0;
854
855         spin_lock_irqsave(&cs->lock, flags);
856         cs->connected = 1;
857         spin_unlock_irqrestore(&cs->lock, flags);
858
859         if (cs->mstate != MS_LOCKED) {
860                 cs->ops->set_modem_ctrl(cs, 0, TIOCM_DTR|TIOCM_RTS);
861                 cs->ops->baud_rate(cs, B115200);
862                 cs->ops->set_line_ctrl(cs, CS8);
863                 cs->control_state = TIOCM_DTR|TIOCM_RTS;
864         } else {
865                 //FIXME use some saved values?
866         }
867
868         cs->waiting = 1;
869
870         if (!gigaset_add_event(cs, &cs->at_state, EV_START, NULL, 0, NULL)) {
871                 cs->waiting = 0;
872                 //FIXME what should we do?
873                 goto error;
874         }
875
876         gig_dbg(DEBUG_CMD, "scheduling START");
877         gigaset_schedule_event(cs);
878
879         wait_event(cs->waitqueue, !cs->waiting);
880
881         mutex_unlock(&cs->mutex);
882         return 1;
883
884 error:
885         mutex_unlock(&cs->mutex);
886         return 0;
887 }
888 EXPORT_SYMBOL_GPL(gigaset_start);
889
890 /* gigaset_shutdown
891  * check if a device is associated to the cardstate structure and stop it
892  * return value: 0 if ok, -1 if no device was associated
893  */
894 int gigaset_shutdown(struct cardstate *cs)
895 {
896         mutex_lock(&cs->mutex);
897
898         if (!(cs->flags & VALID_MINOR)) {
899                 mutex_unlock(&cs->mutex);
900                 return -1;
901         }
902
903         cs->waiting = 1;
904
905         if (!gigaset_add_event(cs, &cs->at_state, EV_SHUTDOWN, NULL, 0, NULL)) {
906                 //FIXME what should we do?
907                 goto exit;
908         }
909
910         gig_dbg(DEBUG_CMD, "scheduling SHUTDOWN");
911         gigaset_schedule_event(cs);
912
913         wait_event(cs->waitqueue, !cs->waiting);
914
915         cleanup_cs(cs);
916
917 exit:
918         mutex_unlock(&cs->mutex);
919         return 0;
920 }
921 EXPORT_SYMBOL_GPL(gigaset_shutdown);
922
923 void gigaset_stop(struct cardstate *cs)
924 {
925         mutex_lock(&cs->mutex);
926
927         cs->waiting = 1;
928
929         if (!gigaset_add_event(cs, &cs->at_state, EV_STOP, NULL, 0, NULL)) {
930                 //FIXME what should we do?
931                 goto exit;
932         }
933
934         gig_dbg(DEBUG_CMD, "scheduling STOP");
935         gigaset_schedule_event(cs);
936
937         wait_event(cs->waitqueue, !cs->waiting);
938
939         cleanup_cs(cs);
940
941 exit:
942         mutex_unlock(&cs->mutex);
943 }
944 EXPORT_SYMBOL_GPL(gigaset_stop);
945
946 static LIST_HEAD(drivers);
947 static DEFINE_SPINLOCK(driver_lock);
948
949 struct cardstate *gigaset_get_cs_by_id(int id)
950 {
951         unsigned long flags;
952         struct cardstate *ret = NULL;
953         struct cardstate *cs;
954         struct gigaset_driver *drv;
955         unsigned i;
956
957         spin_lock_irqsave(&driver_lock, flags);
958         list_for_each_entry(drv, &drivers, list) {
959                 spin_lock(&drv->lock);
960                 for (i = 0; i < drv->minors; ++i) {
961                         cs = drv->cs + i;
962                         if ((cs->flags & VALID_ID) && cs->myid == id) {
963                                 ret = cs;
964                                 break;
965                         }
966                 }
967                 spin_unlock(&drv->lock);
968                 if (ret)
969                         break;
970         }
971         spin_unlock_irqrestore(&driver_lock, flags);
972         return ret;
973 }
974
975 void gigaset_debugdrivers(void)
976 {
977         unsigned long flags;
978         static struct cardstate *cs;
979         struct gigaset_driver *drv;
980         unsigned i;
981
982         spin_lock_irqsave(&driver_lock, flags);
983         list_for_each_entry(drv, &drivers, list) {
984                 gig_dbg(DEBUG_DRIVER, "driver %p", drv);
985                 spin_lock(&drv->lock);
986                 for (i = 0; i < drv->minors; ++i) {
987                         gig_dbg(DEBUG_DRIVER, "  index %u", i);
988                         cs = drv->cs + i;
989                         gig_dbg(DEBUG_DRIVER, "    cardstate %p", cs);
990                         gig_dbg(DEBUG_DRIVER, "    flags 0x%02x", cs->flags);
991                         gig_dbg(DEBUG_DRIVER, "    minor_index %u",
992                                 cs->minor_index);
993                         gig_dbg(DEBUG_DRIVER, "    driver %p", cs->driver);
994                         gig_dbg(DEBUG_DRIVER, "    i4l id %d", cs->myid);
995                 }
996                 spin_unlock(&drv->lock);
997         }
998         spin_unlock_irqrestore(&driver_lock, flags);
999 }
1000
1001 static struct cardstate *gigaset_get_cs_by_minor(unsigned minor)
1002 {
1003         unsigned long flags;
1004         struct cardstate *ret = NULL;
1005         struct gigaset_driver *drv;
1006         unsigned index;
1007
1008         spin_lock_irqsave(&driver_lock, flags);
1009         list_for_each_entry(drv, &drivers, list) {
1010                 if (minor < drv->minor || minor >= drv->minor + drv->minors)
1011                         continue;
1012                 index = minor - drv->minor;
1013                 spin_lock(&drv->lock);
1014                 if (drv->cs[index].flags & VALID_MINOR)
1015                         ret = drv->cs + index;
1016                 spin_unlock(&drv->lock);
1017                 if (ret)
1018                         break;
1019         }
1020         spin_unlock_irqrestore(&driver_lock, flags);
1021         return ret;
1022 }
1023
1024 struct cardstate *gigaset_get_cs_by_tty(struct tty_struct *tty)
1025 {
1026         if (tty->index < 0 || tty->index >= tty->driver->num)
1027                 return NULL;
1028         return gigaset_get_cs_by_minor(tty->index + tty->driver->minor_start);
1029 }
1030
1031 void gigaset_freedriver(struct gigaset_driver *drv)
1032 {
1033         unsigned long flags;
1034
1035         spin_lock_irqsave(&driver_lock, flags);
1036         list_del(&drv->list);
1037         spin_unlock_irqrestore(&driver_lock, flags);
1038
1039         gigaset_if_freedriver(drv);
1040
1041         kfree(drv->cs);
1042         kfree(drv);
1043 }
1044 EXPORT_SYMBOL_GPL(gigaset_freedriver);
1045
1046 /* gigaset_initdriver
1047  * Allocate and initialize gigaset_driver structure. Initialize interface.
1048  * parameters:
1049  *      minor           First minor number
1050  *      minors          Number of minors this driver can handle
1051  *      procname        Name of the driver
1052  *      devname         Name of the device files (prefix without minor number)
1053  * return value:
1054  *      Pointer to the gigaset_driver structure on success, NULL on failure.
1055  */
1056 struct gigaset_driver *gigaset_initdriver(unsigned minor, unsigned minors,
1057                                           const char *procname,
1058                                           const char *devname,
1059                                           const struct gigaset_ops *ops,
1060                                           struct module *owner)
1061 {
1062         struct gigaset_driver *drv;
1063         unsigned long flags;
1064         unsigned i;
1065
1066         drv = kmalloc(sizeof *drv, GFP_KERNEL);
1067         if (!drv)
1068                 return NULL;
1069
1070         drv->have_tty = 0;
1071         drv->minor = minor;
1072         drv->minors = minors;
1073         spin_lock_init(&drv->lock);
1074         drv->blocked = 0;
1075         drv->ops = ops;
1076         drv->owner = owner;
1077         INIT_LIST_HEAD(&drv->list);
1078
1079         drv->cs = kmalloc(minors * sizeof *drv->cs, GFP_KERNEL);
1080         if (!drv->cs)
1081                 goto error;
1082
1083         for (i = 0; i < minors; ++i) {
1084                 drv->cs[i].flags = 0;
1085                 drv->cs[i].driver = drv;
1086                 drv->cs[i].ops = drv->ops;
1087                 drv->cs[i].minor_index = i;
1088                 mutex_init(&drv->cs[i].mutex);
1089         }
1090
1091         gigaset_if_initdriver(drv, procname, devname);
1092
1093         spin_lock_irqsave(&driver_lock, flags);
1094         list_add(&drv->list, &drivers);
1095         spin_unlock_irqrestore(&driver_lock, flags);
1096
1097         return drv;
1098
1099 error:
1100         kfree(drv->cs);
1101         kfree(drv);
1102         return NULL;
1103 }
1104 EXPORT_SYMBOL_GPL(gigaset_initdriver);
1105
1106 void gigaset_blockdriver(struct gigaset_driver *drv)
1107 {
1108         drv->blocked = 1;
1109 }
1110 EXPORT_SYMBOL_GPL(gigaset_blockdriver);
1111
1112 static int __init gigaset_init_module(void)
1113 {
1114         /* in accordance with the principle of least astonishment,
1115          * setting the 'debug' parameter to 1 activates a sensible
1116          * set of default debug levels
1117          */
1118         if (gigaset_debuglevel == 1)
1119                 gigaset_debuglevel = DEBUG_DEFAULT;
1120
1121         pr_info(DRIVER_DESC "\n");
1122         return 0;
1123 }
1124
1125 static void __exit gigaset_exit_module(void)
1126 {
1127 }
1128
1129 module_init(gigaset_init_module);
1130 module_exit(gigaset_exit_module);
1131
1132 MODULE_AUTHOR(DRIVER_AUTHOR);
1133 MODULE_DESCRIPTION(DRIVER_DESC);
1134
1135 MODULE_LICENSE("GPL");