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 #ifdef CONFIG_GIGASET_DEBUG
 569         bcs->emptycount = 0;
 570 #endif
 571
 572         gig_dbg(DEBUG_INIT, "allocating bcs[%d]->skb", channel);
 573         bcs->fcs = PPP_INITFCS;
 574         bcs->inputstate = 0;
 575         if (cs->ignoreframes) {
 576                 bcs->inputstate |= INS_skip_frame;
 577                 bcs->skb = NULL;
 578         } else if ((bcs->skb = dev_alloc_skb(SBUFSIZE + HW_HDR_LEN)) != NULL)
 579                 skb_reserve(bcs->skb, HW_HDR_LEN);
 580         else {
 581                 pr_err("out of memory\n");
 582                 bcs->inputstate |= INS_skip_frame;
 583         }
 584
 585         bcs->channel = channel;
 586         bcs->cs = cs;
 587
 588         bcs->chstate = 0;
 589         bcs->use_count = 1;
 590         bcs->busy = 0;
 591         bcs->ignore = cs->ignoreframes;
 592
 593         for (i = 0; i < AT_NUM; ++i)
 594                 bcs->commands[i] = NULL;
 595
 596         gig_dbg(DEBUG_INIT, "  setting up bcs[%d]->hw", channel);
 597         if (cs->ops->initbcshw(bcs))
 598                 return bcs;
 599
 600         gig_dbg(DEBUG_INIT, "  failed");
 601
 602         gig_dbg(DEBUG_INIT, "  freeing bcs[%d]->skb", channel);
 603         if (bcs->skb)
 604                 dev_kfree_skb(bcs->skb);
 605
 606         return NULL;
 607 }
 608
 609 /* gigaset_initcs
 610  * Allocate and initialize cardstate structure for Gigaset driver
 611  * Calls hardware dependent gigaset_initcshw() function
 612  * Calls B channel initialization function gigaset_initbcs() for each B channel
 613  * parameters:
 614  *      drv             hardware driver the device belongs to
 615  *      channels        number of B channels supported by device
 616  *      onechannel      !=0: B channel data and AT commands share one
 617  *                           communication channel
 618  *                      ==0: B channels have separate communication channels
 619  *      ignoreframes    number of frames to ignore after setting up B channel
 620  *      cidmode         !=0: start in CallID mode
 621  *      modulename      name of driver module (used for I4L registration)
 622  * return value:
 623  *      pointer to cardstate structure
 624  */
 625 struct cardstate *gigaset_initcs(struct gigaset_driver *drv, int channels,
 626                                  int onechannel, int ignoreframes,
 627                                  int cidmode, const char *modulename)
 628 {
 629         struct cardstate *cs = NULL;
 630         unsigned long flags;
 631         int i;
 632
 633         gig_dbg(DEBUG_INIT, "allocating cs");
 634         if (!(cs = alloc_cs(drv))) {
 635                 pr_err("maximum number of devices exceeded\n");
 636                 return NULL;
 637         }
 638
 639         gig_dbg(DEBUG_INIT, "allocating bcs[0..%d]", channels - 1);
 640         cs->bcs = kmalloc(channels * sizeof(struct bc_state), GFP_KERNEL);
 641         if (!cs->bcs) {
 642                 pr_err("out of memory\n");
 643                 goto error;
 644         }
 645         gig_dbg(DEBUG_INIT, "allocating inbuf");
 646         cs->inbuf = kmalloc(sizeof(struct inbuf_t), GFP_KERNEL);
 647         if (!cs->inbuf) {
 648                 pr_err("out of memory\n");
 649                 goto error;
 650         }
 651
 652         cs->cs_init = 0;
 653         cs->channels = channels;
 654         cs->onechannel = onechannel;
 655         cs->ignoreframes = ignoreframes;
 656         INIT_LIST_HEAD(&cs->temp_at_states);
 657         cs->running = 0;
 658         init_timer(&cs->timer); /* clear next & prev */
 659         spin_lock_init(&cs->ev_lock);
 660         cs->ev_tail = 0;
 661         cs->ev_head = 0;
 662
 663         tasklet_init(&cs->event_tasklet, &gigaset_handle_event,
 664                      (unsigned long) cs);
 665         cs->commands_pending = 0;
 666         cs->cur_at_seq = 0;
 667         cs->gotfwver = -1;
 668         cs->open_count = 0;
 669         cs->dev = NULL;
 670         cs->tty = NULL;
 671         cs->tty_dev = NULL;
 672         cs->cidmode = cidmode != 0;
 673         cs->tabnocid = gigaset_tab_nocid;
 674         cs->tabcid = gigaset_tab_cid;
 675
 676         init_waitqueue_head(&cs->waitqueue);
 677         cs->waiting = 0;
 678
 679         cs->mode = M_UNKNOWN;
 680         cs->mstate = MS_UNINITIALIZED;
 681
 682         for (i = 0; i < channels; ++i) {
 683                 gig_dbg(DEBUG_INIT, "setting up bcs[%d].read", i);
 684                 if (!gigaset_initbcs(cs->bcs + i, cs, i)) {
 685                         pr_err("could not allocate channel %d data\n", i);
 686                         goto error;
 687                 }
 688         }
 689
 690         ++cs->cs_init;
 691
 692         gig_dbg(DEBUG_INIT, "setting up at_state");
 693         spin_lock_init(&cs->lock);
 694         gigaset_at_init(&cs->at_state, NULL, cs, 0);
 695         cs->dle = 0;
 696         cs->cbytes = 0;
 697
 698         gig_dbg(DEBUG_INIT, "setting up inbuf");
 699         if (onechannel) {                       //FIXME distinction necessary?
 700                 gigaset_inbuf_init(cs->inbuf, cs->bcs, cs, INS_command);
 701         } else
 702                 gigaset_inbuf_init(cs->inbuf, NULL,    cs, INS_command);
 703
 704         cs->connected = 0;
 705         cs->isdn_up = 0;
 706
 707         gig_dbg(DEBUG_INIT, "setting up cmdbuf");
 708         cs->cmdbuf = cs->lastcmdbuf = NULL;
 709         spin_lock_init(&cs->cmdlock);
 710         cs->curlen = 0;
 711         cs->cmdbytes = 0;
 712
 713         gig_dbg(DEBUG_INIT, "setting up iif");
 714         if (!gigaset_register_to_LL(cs, modulename)) {
 715                 pr_err("error registering ISDN device\n");
 716                 goto error;
 717         }
 718
 719         make_valid(cs, VALID_ID);
 720         ++cs->cs_init;
 721         gig_dbg(DEBUG_INIT, "setting up hw");
 722         if (!cs->ops->initcshw(cs))
 723                 goto error;
 724
 725         ++cs->cs_init;
 726
 727         /* set up character device */
 728         gigaset_if_init(cs);
 729
 730         /* set up device sysfs */
 731         gigaset_init_dev_sysfs(cs);
 732
 733         spin_lock_irqsave(&cs->lock, flags);
 734         cs->running = 1;
 735         spin_unlock_irqrestore(&cs->lock, flags);
 736         setup_timer(&cs->timer, timer_tick, (unsigned long) cs);
 737         cs->timer.expires = jiffies + msecs_to_jiffies(GIG_TICK);
 738         /* FIXME: can jiffies increase too much until the timer is added?
 739          * Same problem(?) with mod_timer() in timer_tick(). */
 740         add_timer(&cs->timer);
 741
 742         gig_dbg(DEBUG_INIT, "cs initialized");
 743         return cs;
 744
 745 error:
 746         gig_dbg(DEBUG_INIT, "failed");
 747         gigaset_freecs(cs);
 748         return NULL;
 749 }
 750 EXPORT_SYMBOL_GPL(gigaset_initcs);
 751
 752 /* ReInitialize the b-channel structure on hangup */
 753 void gigaset_bcs_reinit(struct bc_state *bcs)
 754 {
 755         struct sk_buff *skb;
 756         struct cardstate *cs = bcs->cs;
 757         unsigned long flags;
 758
 759         while ((skb = skb_dequeue(&bcs->squeue)) != NULL)
 760                 dev_kfree_skb(skb);
 761
 762         spin_lock_irqsave(&cs->lock, flags);
 763         clear_at_state(&bcs->at_state);
 764         bcs->at_state.ConState = 0;
 765         bcs->at_state.timer_active = 0;
 766         bcs->at_state.timer_expires = 0;
 767         bcs->at_state.cid = -1;                 /* No CID defined */
 768         spin_unlock_irqrestore(&cs->lock, flags);
 769
 770         bcs->inputstate = 0;
 771
 772 #ifdef CONFIG_GIGASET_DEBUG
 773         bcs->emptycount = 0;
 774 #endif
 775
 776         bcs->fcs = PPP_INITFCS;
 777         bcs->chstate = 0;
 778
 779         bcs->ignore = cs->ignoreframes;
 780         if (bcs->ignore)
 781                 bcs->inputstate |= INS_skip_frame;
 782
 783
 784         cs->ops->reinitbcshw(bcs);
 785 }
 786
 787 static void cleanup_cs(struct cardstate *cs)
 788 {
 789         struct cmdbuf_t *cb, *tcb;
 790         int i;
 791         unsigned long flags;
 792
 793         spin_lock_irqsave(&cs->lock, flags);
 794
 795         cs->mode = M_UNKNOWN;
 796         cs->mstate = MS_UNINITIALIZED;
 797
 798         clear_at_state(&cs->at_state);
 799         dealloc_at_states(cs);
 800         free_strings(&cs->at_state);
 801         gigaset_at_init(&cs->at_state, NULL, cs, 0);
 802
 803         kfree(cs->inbuf->rcvbuf);
 804         cs->inbuf->rcvbuf = NULL;
 805         cs->inbuf->inputstate = INS_command;
 806         cs->inbuf->head = 0;
 807         cs->inbuf->tail = 0;
 808
 809         cb = cs->cmdbuf;
 810         while (cb) {
 811                 tcb = cb;
 812                 cb = cb->next;
 813                 kfree(tcb);
 814         }
 815         cs->cmdbuf = cs->lastcmdbuf = NULL;
 816         cs->curlen = 0;
 817         cs->cmdbytes = 0;
 818         cs->gotfwver = -1;
 819         cs->dle = 0;
 820         cs->cur_at_seq = 0;
 821         cs->commands_pending = 0;
 822         cs->cbytes = 0;
 823
 824         spin_unlock_irqrestore(&cs->lock, flags);
 825
 826         for (i = 0; i < cs->channels; ++i) {
 827                 gigaset_freebcs(cs->bcs + i);
 828                 if (!gigaset_initbcs(cs->bcs + i, cs, i))
 829                         pr_err("could not allocate channel %d data\n", i);
 830         }
 831
 832         if (cs->waiting) {
 833                 cs->cmd_result = -ENODEV;
 834                 cs->waiting = 0;
 835                 wake_up_interruptible(&cs->waitqueue);
 836         }
 837 }
 838
 839
 840 int gigaset_start(struct cardstate *cs)
 841 {
 842         unsigned long flags;
 843
 844         if (mutex_lock_interruptible(&cs->mutex))
 845                 return 0;
 846
 847         spin_lock_irqsave(&cs->lock, flags);
 848         cs->connected = 1;
 849         spin_unlock_irqrestore(&cs->lock, flags);
 850
 851         if (cs->mstate != MS_LOCKED) {
 852                 cs->ops->set_modem_ctrl(cs, 0, TIOCM_DTR|TIOCM_RTS);
 853                 cs->ops->baud_rate(cs, B115200);
 854                 cs->ops->set_line_ctrl(cs, CS8);
 855                 cs->control_state = TIOCM_DTR|TIOCM_RTS;
 856         } else {
 857                 //FIXME use some saved values?
 858         }
 859
 860         cs->waiting = 1;
 861
 862         if (!gigaset_add_event(cs, &cs->at_state, EV_START, NULL, 0, NULL)) {
 863                 cs->waiting = 0;
 864                 //FIXME what should we do?
 865                 goto error;
 866         }
 867
 868         gig_dbg(DEBUG_CMD, "scheduling START");
 869         gigaset_schedule_event(cs);
 870
 871         wait_event(cs->waitqueue, !cs->waiting);
 872
 873         mutex_unlock(&cs->mutex);
 874         return 1;
 875
 876 error:
 877         mutex_unlock(&cs->mutex);
 878         return 0;
 879 }
 880 EXPORT_SYMBOL_GPL(gigaset_start);
 881
 882 /* gigaset_shutdown
 883  * check if a device is associated to the cardstate structure and stop it
 884  * return value: 0 if ok, -1 if no device was associated
 885  */
 886 int gigaset_shutdown(struct cardstate *cs)
 887 {
 888         mutex_lock(&cs->mutex);
 889
 890         if (!(cs->flags & VALID_MINOR)) {
 891                 mutex_unlock(&cs->mutex);
 892                 return -1;
 893         }
 894
 895         cs->waiting = 1;
 896
 897         if (!gigaset_add_event(cs, &cs->at_state, EV_SHUTDOWN, NULL, 0, NULL)) {
 898                 //FIXME what should we do?
 899                 goto exit;
 900         }
 901
 902         gig_dbg(DEBUG_CMD, "scheduling SHUTDOWN");
 903         gigaset_schedule_event(cs);
 904
 905         wait_event(cs->waitqueue, !cs->waiting);
 906
 907         cleanup_cs(cs);
 908
 909 exit:
 910         mutex_unlock(&cs->mutex);
 911         return 0;
 912 }
 913 EXPORT_SYMBOL_GPL(gigaset_shutdown);
 914
 915 void gigaset_stop(struct cardstate *cs)
 916 {
 917         mutex_lock(&cs->mutex);
 918
 919         cs->waiting = 1;
 920
 921         if (!gigaset_add_event(cs, &cs->at_state, EV_STOP, NULL, 0, NULL)) {
 922                 //FIXME what should we do?
 923                 goto exit;
 924         }
 925
 926         gig_dbg(DEBUG_CMD, "scheduling STOP");
 927         gigaset_schedule_event(cs);
 928
 929         wait_event(cs->waitqueue, !cs->waiting);
 930
 931         cleanup_cs(cs);
 932
 933 exit:
 934         mutex_unlock(&cs->mutex);
 935 }
 936 EXPORT_SYMBOL_GPL(gigaset_stop);
 937
 938 static LIST_HEAD(drivers);
 939 static DEFINE_SPINLOCK(driver_lock);
 940
 941 struct cardstate *gigaset_get_cs_by_id(int id)
 942 {
 943         unsigned long flags;
 944         struct cardstate *ret = NULL;
 945         struct cardstate *cs;
 946         struct gigaset_driver *drv;
 947         unsigned i;
 948
 949         spin_lock_irqsave(&driver_lock, flags);
 950         list_for_each_entry(drv, &drivers, list) {
 951                 spin_lock(&drv->lock);
 952                 for (i = 0; i < drv->minors; ++i) {
 953                         cs = drv->cs + i;
 954                         if ((cs->flags & VALID_ID) && cs->myid == id) {
 955                                 ret = cs;
 956                                 break;
 957                         }
 958                 }
 959                 spin_unlock(&drv->lock);
 960                 if (ret)
 961                         break;
 962         }
 963         spin_unlock_irqrestore(&driver_lock, flags);
 964         return ret;
 965 }
 966
 967 void gigaset_debugdrivers(void)
 968 {
 969         unsigned long flags;
 970         static struct cardstate *cs;
 971         struct gigaset_driver *drv;
 972         unsigned i;
 973
 974         spin_lock_irqsave(&driver_lock, flags);
 975         list_for_each_entry(drv, &drivers, list) {
 976                 gig_dbg(DEBUG_DRIVER, "driver %p", drv);
 977                 spin_lock(&drv->lock);
 978                 for (i = 0; i < drv->minors; ++i) {
 979                         gig_dbg(DEBUG_DRIVER, "  index %u", i);
 980                         cs = drv->cs + i;
 981                         gig_dbg(DEBUG_DRIVER, "    cardstate %p", cs);
 982                         gig_dbg(DEBUG_DRIVER, "    flags 0x%02x", cs->flags);
 983                         gig_dbg(DEBUG_DRIVER, "    minor_index %u",
 984                                 cs->minor_index);
 985                         gig_dbg(DEBUG_DRIVER, "    driver %p", cs->driver);
 986                         gig_dbg(DEBUG_DRIVER, "    i4l id %d", cs->myid);
 987                 }
 988                 spin_unlock(&drv->lock);
 989         }
 990         spin_unlock_irqrestore(&driver_lock, flags);
 991 }
 992
 993 static struct cardstate *gigaset_get_cs_by_minor(unsigned minor)
 994 {
 995         unsigned long flags;
 996         struct cardstate *ret = NULL;
 997         struct gigaset_driver *drv;
 998         unsigned index;
 999
1000         spin_lock_irqsave(&driver_lock, flags);
1001         list_for_each_entry(drv, &drivers, list) {
1002                 if (minor < drv->minor || minor >= drv->minor + drv->minors)
1003                         continue;
1004                 index = minor - drv->minor;
1005                 spin_lock(&drv->lock);
1006                 if (drv->cs[index].flags & VALID_MINOR)
1007                         ret = drv->cs + index;
1008                 spin_unlock(&drv->lock);
1009                 if (ret)
1010                         break;
1011         }
1012         spin_unlock_irqrestore(&driver_lock, flags);
1013         return ret;
1014 }
1015
1016 struct cardstate *gigaset_get_cs_by_tty(struct tty_struct *tty)
1017 {
1018         if (tty->index < 0 || tty->index >= tty->driver->num)
1019                 return NULL;
1020         return gigaset_get_cs_by_minor(tty->index + tty->driver->minor_start);
1021 }
1022
1023 void gigaset_freedriver(struct gigaset_driver *drv)
1024 {
1025         unsigned long flags;
1026
1027         spin_lock_irqsave(&driver_lock, flags);
1028         list_del(&drv->list);
1029         spin_unlock_irqrestore(&driver_lock, flags);
1030
1031         gigaset_if_freedriver(drv);
1032
1033         kfree(drv->cs);
1034         kfree(drv);
1035 }
1036 EXPORT_SYMBOL_GPL(gigaset_freedriver);
1037
1038 /* gigaset_initdriver
1039  * Allocate and initialize gigaset_driver structure. Initialize interface.
1040  * parameters:
1041  *      minor           First minor number
1042  *      minors          Number of minors this driver can handle
1043  *      procname        Name of the driver
1044  *      devname         Name of the device files (prefix without minor number)
1045  * return value:
1046  *      Pointer to the gigaset_driver structure on success, NULL on failure.
1047  */
1048 struct gigaset_driver *gigaset_initdriver(unsigned minor, unsigned minors,
1049                                           const char *procname,
1050                                           const char *devname,
1051                                           const struct gigaset_ops *ops,
1052                                           struct module *owner)
1053 {
1054         struct gigaset_driver *drv;
1055         unsigned long flags;
1056         unsigned i;
1057
1058         drv = kmalloc(sizeof *drv, GFP_KERNEL);
1059         if (!drv)
1060                 return NULL;
1061
1062         drv->have_tty = 0;
1063         drv->minor = minor;
1064         drv->minors = minors;
1065         spin_lock_init(&drv->lock);
1066         drv->blocked = 0;
1067         drv->ops = ops;
1068         drv->owner = owner;
1069         INIT_LIST_HEAD(&drv->list);
1070
1071         drv->cs = kmalloc(minors * sizeof *drv->cs, GFP_KERNEL);
1072         if (!drv->cs)
1073                 goto error;
1074
1075         for (i = 0; i < minors; ++i) {
1076                 drv->cs[i].flags = 0;
1077                 drv->cs[i].driver = drv;
1078                 drv->cs[i].ops = drv->ops;
1079                 drv->cs[i].minor_index = i;
1080                 mutex_init(&drv->cs[i].mutex);
1081         }
1082
1083         gigaset_if_initdriver(drv, procname, devname);
1084
1085         spin_lock_irqsave(&driver_lock, flags);
1086         list_add(&drv->list, &drivers);
1087         spin_unlock_irqrestore(&driver_lock, flags);
1088
1089         return drv;
1090
1091 error:
1092         kfree(drv->cs);
1093         kfree(drv);
1094         return NULL;
1095 }
1096 EXPORT_SYMBOL_GPL(gigaset_initdriver);
1097
1098 void gigaset_blockdriver(struct gigaset_driver *drv)
1099 {
1100         drv->blocked = 1;
1101 }
1102 EXPORT_SYMBOL_GPL(gigaset_blockdriver);
1103
1104 static int __init gigaset_init_module(void)
1105 {
1106         /* in accordance with the principle of least astonishment,
1107          * setting the 'debug' parameter to 1 activates a sensible
1108          * set of default debug levels
1109          */
1110         if (gigaset_debuglevel == 1)
1111                 gigaset_debuglevel = DEBUG_DEFAULT;
1112
1113         pr_info(DRIVER_DESC "\n");
1114         return 0;
1115 }
1116
1117 static void __exit gigaset_exit_module(void)
1118 {
1119 }
1120
1121 module_init(gigaset_init_module);
1122 module_exit(gigaset_exit_module);
1123
1124 MODULE_AUTHOR(DRIVER_AUTHOR);
1125 MODULE_DESCRIPTION(DRIVER_DESC);
1126
1127 MODULE_LICENSE("GPL");