drivers/isdn/gigaset/ev-layer.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
  18 /* ========================================================== */
  19 /* bit masks for pending commands */
  20 #define PC_DIAL         0x001
  21 #define PC_HUP          0x002
  22 #define PC_INIT         0x004
  23 #define PC_DLE0         0x008
  24 #define PC_DLE1         0x010
  25 #define PC_SHUTDOWN     0x020
  26 #define PC_ACCEPT       0x040
  27 #define PC_CID          0x080
  28 #define PC_NOCID        0x100
  29 #define PC_CIDMODE      0x200
  30 #define PC_UMMODE       0x400
  31
  32 /* types of modem responses */
  33 #define RT_NOTHING      0
  34 #define RT_ZSAU         1
  35 #define RT_RING         2
  36 #define RT_NUMBER       3
  37 #define RT_STRING       4
  38 #define RT_HEX          5
  39 #define RT_ZCAU         6
  40
  41 /* Possible ASCII responses */
  42 #define RSP_OK          0
  43 #define RSP_BUSY        1
  44 #define RSP_CONNECT     2
  45 #define RSP_ZGCI        3
  46 #define RSP_RING        4
  47 #define RSP_ZAOC        5
  48 #define RSP_ZCSTR       6
  49 #define RSP_ZCFGT       7
  50 #define RSP_ZCFG        8
  51 #define RSP_ZCCR        9
  52 #define RSP_EMPTY       10
  53 #define RSP_ZLOG        11
  54 #define RSP_ZCAU        12
  55 #define RSP_ZMWI        13
  56 #define RSP_ZABINFO     14
  57 #define RSP_ZSMLSTCHG   15
  58 #define RSP_VAR         100
  59 #define RSP_ZSAU        (RSP_VAR + VAR_ZSAU)
  60 #define RSP_ZDLE        (RSP_VAR + VAR_ZDLE)
  61 #define RSP_ZVLS        (RSP_VAR + VAR_ZVLS)
  62 #define RSP_ZCTP        (RSP_VAR + VAR_ZCTP)
  63 #define RSP_STR         (RSP_VAR + VAR_NUM)
  64 #define RSP_NMBR        (RSP_STR + STR_NMBR)
  65 #define RSP_ZCPN        (RSP_STR + STR_ZCPN)
  66 #define RSP_ZCON        (RSP_STR + STR_ZCON)
  67 #define RSP_ZBC         (RSP_STR + STR_ZBC)
  68 #define RSP_ZHLC        (RSP_STR + STR_ZHLC)
  69 #define RSP_ERROR       -1      /* ERROR              */
  70 #define RSP_WRONG_CID   -2      /* unknown cid in cmd */
  71 #define RSP_UNKNOWN     -4      /* unknown response   */
  72 #define RSP_FAIL        -5      /* internal error     */
  73 #define RSP_INVAL       -6      /* invalid response   */
  74
  75 #define RSP_NONE        -19
  76 #define RSP_STRING      -20
  77 #define RSP_NULL        -21
  78 #define RSP_RETRYFAIL   -22
  79 #define RSP_RETRY       -23
  80 #define RSP_SKIP        -24
  81 #define RSP_INIT        -27
  82 #define RSP_ANY         -26
  83 #define RSP_LAST        -28
  84 #define RSP_NODEV       -9
  85
  86 /* actions for process_response */
  87 #define ACT_NOTHING             0
  88 #define ACT_SETDLE1             1
  89 #define ACT_SETDLE0             2
  90 #define ACT_FAILINIT            3
  91 #define ACT_HUPMODEM            4
  92 #define ACT_CONFIGMODE          5
  93 #define ACT_INIT                6
  94 #define ACT_DLE0                7
  95 #define ACT_DLE1                8
  96 #define ACT_FAILDLE0            9
  97 #define ACT_FAILDLE1            10
  98 #define ACT_RING                11
  99 #define ACT_CID                 12
 100 #define ACT_FAILCID             13
 101 #define ACT_SDOWN               14
 102 #define ACT_FAILSDOWN           15
 103 #define ACT_DEBUG               16
 104 #define ACT_WARN                17
 105 #define ACT_DIALING             18
 106 #define ACT_ABORTDIAL           19
 107 #define ACT_DISCONNECT          20
 108 #define ACT_CONNECT             21
 109 #define ACT_REMOTEREJECT        22
 110 #define ACT_CONNTIMEOUT         23
 111 #define ACT_REMOTEHUP           24
 112 #define ACT_ABORTHUP            25
 113 #define ACT_ICALL               26
 114 #define ACT_ACCEPTED            27
 115 #define ACT_ABORTACCEPT         28
 116 #define ACT_TIMEOUT             29
 117 #define ACT_GETSTRING           30
 118 #define ACT_SETVER              31
 119 #define ACT_FAILVER             32
 120 #define ACT_GOTVER              33
 121 #define ACT_TEST                34
 122 #define ACT_ERROR               35
 123 #define ACT_ABORTCID            36
 124 #define ACT_ZCAU                37
 125 #define ACT_NOTIFY_BC_DOWN      38
 126 #define ACT_NOTIFY_BC_UP        39
 127 #define ACT_DIAL                40
 128 #define ACT_ACCEPT              41
 129 #define ACT_HUP                 43
 130 #define ACT_IF_LOCK             44
 131 #define ACT_START               45
 132 #define ACT_STOP                46
 133 #define ACT_FAKEDLE0            47
 134 #define ACT_FAKEHUP             48
 135 #define ACT_FAKESDOWN           49
 136 #define ACT_SHUTDOWN            50
 137 #define ACT_PROC_CIDMODE        51
 138 #define ACT_UMODESET            52
 139 #define ACT_FAILUMODE           53
 140 #define ACT_CMODESET            54
 141 #define ACT_FAILCMODE           55
 142 #define ACT_IF_VER              56
 143 #define ACT_CMD                 100
 144
 145 /* at command sequences */
 146 #define SEQ_NONE        0
 147 #define SEQ_INIT        100
 148 #define SEQ_DLE0        200
 149 #define SEQ_DLE1        250
 150 #define SEQ_CID         300
 151 #define SEQ_NOCID       350
 152 #define SEQ_HUP         400
 153 #define SEQ_DIAL        600
 154 #define SEQ_ACCEPT      720
 155 #define SEQ_SHUTDOWN    500
 156 #define SEQ_CIDMODE     10
 157 #define SEQ_UMMODE      11
 158
 159
 160 /* 100: init, 200: dle0, 250:dle1, 300: get cid (dial), 350: "hup" (no cid),
 161  * 400: hup, 500: reset, 600: dial, 700: ring */
 162 struct reply_t gigaset_tab_nocid[] =
 163 {
 164 /* resp_code, min_ConState, max_ConState, parameter, new_ConState, timeout,
 165  * action, command */
 166
 167 /* initialize device, set cid mode if possible */
 168 {RSP_INIT,       -1,  -1, SEQ_INIT,             100,  1, {ACT_TIMEOUT} },
 169
 170 {EV_TIMEOUT,    100, 100, -1,                   101,  3, {0},   "Z\r"},
 171 {RSP_OK,        101, 103, -1,                   120,  5, {ACT_GETSTRING},
 172                                                                 "+GMR\r"},
 173
 174 {EV_TIMEOUT,    101, 101, -1,                   102,  5, {0},   "Z\r"},
 175 {RSP_ERROR,     101, 101, -1,                   102,  5, {0},   "Z\r"},
 176
 177 {EV_TIMEOUT,    102, 102, -1,                   108,  5, {ACT_SETDLE1},
 178                                                                 "^SDLE=0\r"},
 179 {RSP_OK,        108, 108, -1,                   104, -1},
 180 {RSP_ZDLE,      104, 104,  0,                   103,  5, {0},   "Z\r"},
 181 {EV_TIMEOUT,    104, 104, -1,                     0,  0, {ACT_FAILINIT} },
 182 {RSP_ERROR,     108, 108, -1,                     0,  0, {ACT_FAILINIT} },
 183
 184 {EV_TIMEOUT,    108, 108, -1,                   105,  2, {ACT_SETDLE0,
 185                                                           ACT_HUPMODEM,
 186                                                           ACT_TIMEOUT} },
 187 {EV_TIMEOUT,    105, 105, -1,                   103,  5, {0},   "Z\r"},
 188
 189 {RSP_ERROR,     102, 102, -1,                   107,  5, {0},   "^GETPRE\r"},
 190 {RSP_OK,        107, 107, -1,                     0,  0, {ACT_CONFIGMODE} },
 191 {RSP_ERROR,     107, 107, -1,                     0,  0, {ACT_FAILINIT} },
 192 {EV_TIMEOUT,    107, 107, -1,                     0,  0, {ACT_FAILINIT} },
 193
 194 {RSP_ERROR,     103, 103, -1,                     0,  0, {ACT_FAILINIT} },
 195 {EV_TIMEOUT,    103, 103, -1,                     0,  0, {ACT_FAILINIT} },
 196
 197 {RSP_STRING,    120, 120, -1,                   121, -1, {ACT_SETVER} },
 198
 199 {EV_TIMEOUT,    120, 121, -1,                     0,  0, {ACT_FAILVER,
 200                                                           ACT_INIT} },
 201 {RSP_ERROR,     120, 121, -1,                     0,  0, {ACT_FAILVER,
 202                                                           ACT_INIT} },
 203 {RSP_OK,        121, 121, -1,                     0,  0, {ACT_GOTVER,
 204                                                           ACT_INIT} },
 205
 206 /* leave dle mode */
 207 {RSP_INIT,        0,   0, SEQ_DLE0,             201,  5, {0},   "^SDLE=0\r"},
 208 {RSP_OK,        201, 201, -1,                   202, -1},
 209 {RSP_ZDLE,      202, 202,  0,                     0,  0, {ACT_DLE0} },
 210 {RSP_NODEV,     200, 249, -1,                     0,  0, {ACT_FAKEDLE0} },
 211 {RSP_ERROR,     200, 249, -1,                     0,  0, {ACT_FAILDLE0} },
 212 {EV_TIMEOUT,    200, 249, -1,                     0,  0, {ACT_FAILDLE0} },
 213
 214 /* enter dle mode */
 215 {RSP_INIT,        0,   0, SEQ_DLE1,             251,  5, {0},   "^SDLE=1\r"},
 216 {RSP_OK,        251, 251, -1,                   252, -1},
 217 {RSP_ZDLE,      252, 252,  1,                     0,  0, {ACT_DLE1} },
 218 {RSP_ERROR,     250, 299, -1,                     0,  0, {ACT_FAILDLE1} },
 219 {EV_TIMEOUT,    250, 299, -1,                     0,  0, {ACT_FAILDLE1} },
 220
 221 /* incoming call */
 222 {RSP_RING,       -1,  -1, -1,                    -1, -1, {ACT_RING} },
 223
 224 /* get cid */
 225 {RSP_INIT,        0,   0, SEQ_CID,              301,  5, {0},   "^SGCI?\r"},
 226 {RSP_OK,        301, 301, -1,                   302, -1},
 227 {RSP_ZGCI,      302, 302, -1,                     0,  0, {ACT_CID} },
 228 {RSP_ERROR,     301, 349, -1,                     0,  0, {ACT_FAILCID} },
 229 {EV_TIMEOUT,    301, 349, -1,                     0,  0, {ACT_FAILCID} },
 230
 231 /* enter cid mode */
 232 {RSP_INIT,        0,   0, SEQ_CIDMODE,          150,  5, {0},   "^SGCI=1\r"},
 233 {RSP_OK,        150, 150, -1,                     0,  0, {ACT_CMODESET} },
 234 {RSP_ERROR,     150, 150, -1,                     0,  0, {ACT_FAILCMODE} },
 235 {EV_TIMEOUT,    150, 150, -1,                     0,  0, {ACT_FAILCMODE} },
 236
 237 /* leave cid mode */
 238 {RSP_INIT,        0,   0, SEQ_UMMODE,           160,  5, {0},   "Z\r"},
 239 {RSP_OK,        160, 160, -1,                     0,  0, {ACT_UMODESET} },
 240 {RSP_ERROR,     160, 160, -1,                     0,  0, {ACT_FAILUMODE} },
 241 {EV_TIMEOUT,    160, 160, -1,                     0,  0, {ACT_FAILUMODE} },
 242
 243 /* abort getting cid */
 244 {RSP_INIT,        0,   0, SEQ_NOCID,              0,  0, {ACT_ABORTCID} },
 245
 246 /* reset */
 247 {RSP_INIT,        0,   0, SEQ_SHUTDOWN,         504,  5, {0},   "Z\r"},
 248 {RSP_OK,        504, 504, -1,                     0,  0, {ACT_SDOWN} },
 249 {RSP_ERROR,     501, 599, -1,                     0,  0, {ACT_FAILSDOWN} },
 250 {EV_TIMEOUT,    501, 599, -1,                     0,  0, {ACT_FAILSDOWN} },
 251 {RSP_NODEV,     501, 599, -1,                     0,  0, {ACT_FAKESDOWN} },
 252
 253 {EV_PROC_CIDMODE, -1, -1, -1,                    -1, -1, {ACT_PROC_CIDMODE} },
 254 {EV_IF_LOCK,     -1,  -1, -1,                    -1, -1, {ACT_IF_LOCK} },
 255 {EV_IF_VER,      -1,  -1, -1,                    -1, -1, {ACT_IF_VER} },
 256 {EV_START,       -1,  -1, -1,                    -1, -1, {ACT_START} },
 257 {EV_STOP,        -1,  -1, -1,                    -1, -1, {ACT_STOP} },
 258 {EV_SHUTDOWN,    -1,  -1, -1,                    -1, -1, {ACT_SHUTDOWN} },
 259
 260 /* misc. */
 261 {RSP_ERROR,      -1,  -1, -1,                    -1, -1, {ACT_ERROR} },
 262 {RSP_ZCFGT,      -1,  -1, -1,                    -1, -1, {ACT_DEBUG} },
 263 {RSP_ZCFG,       -1,  -1, -1,                    -1, -1, {ACT_DEBUG} },
 264 {RSP_ZLOG,       -1,  -1, -1,                    -1, -1, {ACT_DEBUG} },
 265 {RSP_ZMWI,       -1,  -1, -1,                    -1, -1, {ACT_DEBUG} },
 266 {RSP_ZABINFO,    -1,  -1, -1,                    -1, -1, {ACT_DEBUG} },
 267 {RSP_ZSMLSTCHG,  -1,  -1, -1,                    -1, -1, {ACT_DEBUG} },
 268
 269 {RSP_ZCAU,       -1,  -1, -1,                    -1, -1, {ACT_ZCAU} },
 270 {RSP_NONE,       -1,  -1, -1,                    -1, -1, {ACT_DEBUG} },
 271 {RSP_ANY,        -1,  -1, -1,                    -1, -1, {ACT_WARN} },
 272 {RSP_LAST}
 273 };
 274
 275 /* 600: start dialing, 650: dial in progress, 800: connection is up, 700: ring,
 276  * 400: hup, 750: accepted icall */
 277 struct reply_t gigaset_tab_cid[] =
 278 {
 279 /* resp_code, min_ConState, max_ConState, parameter, new_ConState, timeout,
 280  * action, command */
 281
 282 /* dial */
 283 {EV_DIAL,        -1,  -1, -1,                    -1, -1, {ACT_DIAL} },
 284 {RSP_INIT,        0,   0, SEQ_DIAL,             601,  5, {ACT_CMD+AT_BC} },
 285 {RSP_OK,        601, 601, -1,                   602,  5, {ACT_CMD+AT_HLC} },
 286 {RSP_NULL,      602, 602, -1,                   603,  5, {ACT_CMD+AT_PROTO} },
 287 {RSP_OK,        602, 602, -1,                   603,  5, {ACT_CMD+AT_PROTO} },
 288 {RSP_OK,        603, 603, -1,                   604,  5, {ACT_CMD+AT_TYPE} },
 289 {RSP_OK,        604, 604, -1,                   605,  5, {ACT_CMD+AT_MSN} },
 290 {RSP_NULL,      605, 605, -1,                   606,  5, {ACT_CMD+AT_CLIP} },
 291 {RSP_OK,        605, 605, -1,                   606,  5, {ACT_CMD+AT_CLIP} },
 292 {RSP_NULL,      606, 606, -1,                   607,  5, {ACT_CMD+AT_ISO} },
 293 {RSP_OK,        606, 606, -1,                   607,  5, {ACT_CMD+AT_ISO} },
 294 {RSP_OK,        607, 607, -1,                   608,  5, {0},   "+VLS=17\r"},
 295 {RSP_OK,        608, 608, -1,                   609, -1},
 296 {RSP_ZSAU,      609, 609, ZSAU_PROCEEDING,      610,  5, {ACT_CMD+AT_DIAL} },
 297 {RSP_OK,        610, 610, -1,                   650,  0, {ACT_DIALING} },
 298
 299 {RSP_ERROR,     601, 610, -1,                     0,  0, {ACT_ABORTDIAL} },
 300 {EV_TIMEOUT,    601, 610, -1,                     0,  0, {ACT_ABORTDIAL} },
 301
 302 /* optional dialing responses */
 303 {EV_BC_OPEN,    650, 650, -1,                   651, -1},
 304 {RSP_ZVLS,      609, 651, 17,                    -1, -1, {ACT_DEBUG} },
 305 {RSP_ZCTP,      610, 651, -1,                    -1, -1, {ACT_DEBUG} },
 306 {RSP_ZCPN,      610, 651, -1,                    -1, -1, {ACT_DEBUG} },
 307 {RSP_ZSAU,      650, 651, ZSAU_CALL_DELIVERED,   -1, -1, {ACT_DEBUG} },
 308
 309 /* connect */
 310 {RSP_ZSAU,      650, 650, ZSAU_ACTIVE,          800, -1, {ACT_CONNECT} },
 311 {RSP_ZSAU,      651, 651, ZSAU_ACTIVE,          800, -1, {ACT_CONNECT,
 312                                                           ACT_NOTIFY_BC_UP} },
 313 {RSP_ZSAU,      750, 750, ZSAU_ACTIVE,          800, -1, {ACT_CONNECT} },
 314 {RSP_ZSAU,      751, 751, ZSAU_ACTIVE,          800, -1, {ACT_CONNECT,
 315                                                           ACT_NOTIFY_BC_UP} },
 316 {EV_BC_OPEN,    800, 800, -1,                   800, -1, {ACT_NOTIFY_BC_UP} },
 317
 318 /* remote hangup */
 319 {RSP_ZSAU,      650, 651, ZSAU_DISCONNECT_IND,    0,  0, {ACT_REMOTEREJECT} },
 320 {RSP_ZSAU,      750, 751, ZSAU_DISCONNECT_IND,    0,  0, {ACT_REMOTEHUP} },
 321 {RSP_ZSAU,      800, 800, ZSAU_DISCONNECT_IND,    0,  0, {ACT_REMOTEHUP} },
 322
 323 /* hangup */
 324 {EV_HUP,         -1,  -1, -1,                    -1, -1, {ACT_HUP} },
 325 {RSP_INIT,       -1,  -1, SEQ_HUP,              401,  5, {0},   "+VLS=0\r"},
 326 {RSP_OK,        401, 401, -1,                   402,  5},
 327 {RSP_ZVLS,      402, 402,  0,                   403,  5},
 328 {RSP_ZSAU,      403, 403, ZSAU_DISCONNECT_REQ,   -1, -1, {ACT_DEBUG} },
 329 {RSP_ZSAU,      403, 403, ZSAU_NULL,              0,  0, {ACT_DISCONNECT} },
 330 {RSP_NODEV,     401, 403, -1,                     0,  0, {ACT_FAKEHUP} },
 331 {RSP_ERROR,     401, 401, -1,                     0,  0, {ACT_ABORTHUP} },
 332 {EV_TIMEOUT,    401, 403, -1,                     0,  0, {ACT_ABORTHUP} },
 333
 334 {EV_BC_CLOSED,    0,   0, -1,                     0, -1, {ACT_NOTIFY_BC_DOWN} },
 335
 336 /* ring */
 337 {RSP_ZBC,       700, 700, -1,                    -1, -1, {0} },
 338 {RSP_ZHLC,      700, 700, -1,                    -1, -1, {0} },
 339 {RSP_NMBR,      700, 700, -1,                    -1, -1, {0} },
 340 {RSP_ZCPN,      700, 700, -1,                    -1, -1, {0} },
 341 {RSP_ZCTP,      700, 700, -1,                    -1, -1, {0} },
 342 {EV_TIMEOUT,    700, 700, -1,                   720, 720, {ACT_ICALL} },
 343 {EV_BC_CLOSED,  720, 720, -1,                     0, -1, {ACT_NOTIFY_BC_DOWN} },
 344
 345 /*accept icall*/
 346 {EV_ACCEPT,      -1,  -1, -1,                    -1, -1, {ACT_ACCEPT} },
 347 {RSP_INIT,      720, 720, SEQ_ACCEPT,           721,  5, {ACT_CMD+AT_PROTO} },
 348 {RSP_OK,        721, 721, -1,                   722,  5, {ACT_CMD+AT_ISO} },
 349 {RSP_OK,        722, 722, -1,                   723,  5, {0},   "+VLS=17\r"},
 350 {RSP_OK,        723, 723, -1,                   724,  5, {0} },
 351 {RSP_ZVLS,      724, 724, 17,                   750, 50, {ACT_ACCEPTED} },
 352 {RSP_ERROR,     721, 729, -1,                     0,  0, {ACT_ABORTACCEPT} },
 353 {EV_TIMEOUT,    721, 729, -1,                     0,  0, {ACT_ABORTACCEPT} },
 354 {RSP_ZSAU,      700, 729, ZSAU_NULL,              0,  0, {ACT_ABORTACCEPT} },
 355 {RSP_ZSAU,      700, 729, ZSAU_ACTIVE,            0,  0, {ACT_ABORTACCEPT} },
 356 {RSP_ZSAU,      700, 729, ZSAU_DISCONNECT_IND,    0,  0, {ACT_ABORTACCEPT} },
 357
 358 {EV_BC_OPEN,    750, 750, -1,                   751, -1},
 359 {EV_TIMEOUT,    750, 751, -1,                     0,  0, {ACT_CONNTIMEOUT} },
 360
 361 /* B channel closed (general case) */
 362 {EV_BC_CLOSED,   -1,  -1, -1,                    -1, -1, {ACT_NOTIFY_BC_DOWN} },
 363
 364 /* misc. */
 365 {RSP_ZCON,       -1,  -1, -1,                    -1, -1, {ACT_DEBUG} },
 366 {RSP_ZCCR,       -1,  -1, -1,                    -1, -1, {ACT_DEBUG} },
 367 {RSP_ZAOC,       -1,  -1, -1,                    -1, -1, {ACT_DEBUG} },
 368 {RSP_ZCSTR,      -1,  -1, -1,                    -1, -1, {ACT_DEBUG} },
 369
 370 {RSP_ZCAU,       -1,  -1, -1,                    -1, -1, {ACT_ZCAU} },
 371 {RSP_NONE,       -1,  -1, -1,                    -1, -1, {ACT_DEBUG} },
 372 {RSP_ANY,        -1,  -1, -1,                    -1, -1, {ACT_WARN} },
 373 {RSP_LAST}
 374 };
 375
 376
 377 static const struct resp_type_t {
 378         unsigned char   *response;
 379         int             resp_code;
 380         int             type;
 381 } resp_type[] =
 382 {
 383         {"OK",          RSP_OK,         RT_NOTHING},
 384         {"ERROR",       RSP_ERROR,      RT_NOTHING},
 385         {"ZSAU",        RSP_ZSAU,       RT_ZSAU},
 386         {"ZCAU",        RSP_ZCAU,       RT_ZCAU},
 387         {"RING",        RSP_RING,       RT_RING},
 388         {"ZGCI",        RSP_ZGCI,       RT_NUMBER},
 389         {"ZVLS",        RSP_ZVLS,       RT_NUMBER},
 390         {"ZCTP",        RSP_ZCTP,       RT_NUMBER},
 391         {"ZDLE",        RSP_ZDLE,       RT_NUMBER},
 392         {"ZCFGT",       RSP_ZCFGT,      RT_NUMBER},
 393         {"ZCCR",        RSP_ZCCR,       RT_NUMBER},
 394         {"ZMWI",        RSP_ZMWI,       RT_NUMBER},
 395         {"ZHLC",        RSP_ZHLC,       RT_STRING},
 396         {"ZBC",         RSP_ZBC,        RT_STRING},
 397         {"NMBR",        RSP_NMBR,       RT_STRING},
 398         {"ZCPN",        RSP_ZCPN,       RT_STRING},
 399         {"ZCON",        RSP_ZCON,       RT_STRING},
 400         {"ZAOC",        RSP_ZAOC,       RT_STRING},
 401         {"ZCSTR",       RSP_ZCSTR,      RT_STRING},
 402         {"ZCFG",        RSP_ZCFG,       RT_HEX},
 403         {"ZLOG",        RSP_ZLOG,       RT_NOTHING},
 404         {"ZABINFO",     RSP_ZABINFO,    RT_NOTHING},
 405         {"ZSMLSTCHG",   RSP_ZSMLSTCHG,  RT_NOTHING},
 406         {NULL,          0,              0}
 407 };
 408
 409 static const struct zsau_resp_t {
 410         unsigned char   *str;
 411         int             code;
 412 } zsau_resp[] =
 413 {
 414         {"OUTGOING_CALL_PROCEEDING",    ZSAU_OUTGOING_CALL_PROCEEDING},
 415         {"CALL_DELIVERED",              ZSAU_CALL_DELIVERED},
 416         {"ACTIVE",                      ZSAU_ACTIVE},
 417         {"DISCONNECT_IND",              ZSAU_DISCONNECT_IND},
 418         {"NULL",                        ZSAU_NULL},
 419         {"DISCONNECT_REQ",              ZSAU_DISCONNECT_REQ},
 420         {NULL,                          ZSAU_UNKNOWN}
 421 };
 422
 423 /*
 424  * Get integer from char-pointer
 425  */
 426 static int isdn_getnum(char *p)
 427 {
 428         int v = -1;
 429
 430         gig_dbg(DEBUG_EVENT, "string: %s", p);
 431
 432         while (*p >= '0' && *p <= '9')
 433                 v = ((v < 0) ? 0 : (v * 10)) + (int) ((*p++) - '0');
 434         if (*p)
 435                 v = -1; /* invalid Character */
 436         return v;
 437 }
 438
 439 /*
 440  * Get integer from char-pointer
 441  */
 442 static int isdn_gethex(char *p)
 443 {
 444         int v = 0;
 445         int c;
 446
 447         gig_dbg(DEBUG_EVENT, "string: %s", p);
 448
 449         if (!*p)
 450                 return -1;
 451
 452         do {
 453                 if (v > (INT_MAX - 15) / 16)
 454                         return -1;
 455                 c = *p;
 456                 if (c >= '0' && c <= '9')
 457                         c -= '0';
 458                 else if (c >= 'a' && c <= 'f')
 459                         c -= 'a' - 10;
 460                 else if (c >= 'A' && c <= 'F')
 461                         c -= 'A' - 10;
 462                 else
 463                         return -1;
 464                 v = v * 16 + c;
 465         } while (*++p);
 466
 467         return v;
 468 }
 469
 470 /* retrieve CID from parsed response
 471  * returns 0 if no CID, -1 if invalid CID, or CID value 1..65535
 472  */
 473 static int cid_of_response(char *s)
 474 {
 475         int cid;
 476
 477         if (s[-1] != ';')
 478                 return 0;       /* no CID separator */
 479         cid = isdn_getnum(s);
 480         if (cid < 0)
 481                 return 0;       /* CID not numeric */
 482         if (cid < 1 || cid > 65535)
 483                 return -1;      /* CID out of range */
 484         return cid;
 485 }
 486
 487 /**
 488  * gigaset_handle_modem_response() - process received modem response
 489  * @cs:         device descriptor structure.
 490  *
 491  * Called by asyncdata/isocdata if a block of data received from the
 492  * device must be processed as a modem command response. The data is
 493  * already in the cs structure.
 494  */
 495 void gigaset_handle_modem_response(struct cardstate *cs)
 496 {
 497         unsigned char *argv[MAX_REC_PARAMS + 1];
 498         int params;
 499         int i, j;
 500         const struct resp_type_t *rt;
 501         const struct zsau_resp_t *zr;
 502         int curarg;
 503         unsigned long flags;
 504         unsigned next, tail, head;
 505         struct event_t *event;
 506         int resp_code;
 507         int param_type;
 508         int abort;
 509         size_t len;
 510         int cid;
 511         int rawstring;
 512
 513         len = cs->cbytes;
 514         if (!len) {
 515                 /* ignore additional LFs/CRs (M10x config mode or cx100) */
 516                 gig_dbg(DEBUG_MCMD, "skipped EOL [%02X]", cs->respdata[len]);
 517                 return;
 518         }
 519         cs->respdata[len] = 0;
 520         argv[0] = cs->respdata;
 521         params = 1;
 522         if (cs->at_state.getstring) {
 523                 /* getstring only allowed without cid at the moment */
 524                 cs->at_state.getstring = 0;
 525                 rawstring = 1;
 526                 cid = 0;
 527         } else {
 528                 /* parse line */
 529                 for (i = 0; i < len; i++)
 530                         switch (cs->respdata[i]) {
 531                         case ';':
 532                         case ',':
 533                         case '=':
 534                                 if (params > MAX_REC_PARAMS) {
 535                                         dev_warn(cs->dev,
 536                                            "too many parameters in response\n");
 537                                         /* need last parameter (might be CID) */
 538                                         params--;
 539                                 }
 540                                 argv[params++] = cs->respdata + i + 1;
 541                         }
 542
 543                 rawstring = 0;
 544                 cid = params > 1 ? cid_of_response(argv[params-1]) : 0;
 545                 if (cid < 0) {
 546                         gigaset_add_event(cs, &cs->at_state, RSP_INVAL,
 547                                           NULL, 0, NULL);
 548                         return;
 549                 }
 550
 551                 for (j = 1; j < params; ++j)
 552                         argv[j][-1] = 0;
 553
 554                 gig_dbg(DEBUG_EVENT, "CMD received: %s", argv[0]);
 555                 if (cid) {
 556                         --params;
 557                         gig_dbg(DEBUG_EVENT, "CID: %s", argv[params]);
 558                 }
 559                 gig_dbg(DEBUG_EVENT, "available params: %d", params - 1);
 560                 for (j = 1; j < params; j++)
 561                         gig_dbg(DEBUG_EVENT, "param %d: %s", j, argv[j]);
 562         }
 563
 564         spin_lock_irqsave(&cs->ev_lock, flags);
 565         head = cs->ev_head;
 566         tail = cs->ev_tail;
 567
 568         abort = 1;
 569         curarg = 0;
 570         while (curarg < params) {
 571                 next = (tail + 1) % MAX_EVENTS;
 572                 if (unlikely(next == head)) {
 573                         dev_err(cs->dev, "event queue full\n");
 574                         break;
 575                 }
 576
 577                 event = cs->events + tail;
 578                 event->at_state = NULL;
 579                 event->cid = cid;
 580                 event->ptr = NULL;
 581                 event->arg = NULL;
 582                 tail = next;
 583
 584                 if (rawstring) {
 585                         resp_code = RSP_STRING;
 586                         param_type = RT_STRING;
 587                 } else {
 588                         for (rt = resp_type; rt->response; ++rt)
 589                                 if (!strcmp(argv[curarg], rt->response))
 590                                         break;
 591
 592                         if (!rt->response) {
 593                                 event->type = RSP_UNKNOWN;
 594                                 dev_warn(cs->dev,
 595                                          "unknown modem response: %s\n",
 596                                          argv[curarg]);
 597                                 break;
 598                         }
 599
 600                         resp_code = rt->resp_code;
 601                         param_type = rt->type;
 602                         ++curarg;
 603                 }
 604
 605                 event->type = resp_code;
 606
 607                 switch (param_type) {
 608                 case RT_NOTHING:
 609                         break;
 610                 case RT_RING:
 611                         if (!cid) {
 612                                 dev_err(cs->dev,
 613                                         "received RING without CID!\n");
 614                                 event->type = RSP_INVAL;
 615                                 abort = 1;
 616                         } else {
 617                                 event->cid = 0;
 618                                 event->parameter = cid;
 619                                 abort = 0;
 620                         }
 621                         break;
 622                 case RT_ZSAU:
 623                         if (curarg >= params) {
 624                                 event->parameter = ZSAU_NONE;
 625                                 break;
 626                         }
 627                         for (zr = zsau_resp; zr->str; ++zr)
 628                                 if (!strcmp(argv[curarg], zr->str))
 629                                         break;
 630                         event->parameter = zr->code;
 631                         if (!zr->str)
 632                                 dev_warn(cs->dev,
 633                                         "%s: unknown parameter %s after ZSAU\n",
 634                                          __func__, argv[curarg]);
 635                         ++curarg;
 636                         break;
 637                 case RT_STRING:
 638                         if (curarg < params) {
 639                                 event->ptr = kstrdup(argv[curarg], GFP_ATOMIC);
 640                                 if (!event->ptr)
 641                                         dev_err(cs->dev, "out of memory\n");
 642                                 ++curarg;
 643                         }
 644                         gig_dbg(DEBUG_EVENT, "string==%s",
 645                                 event->ptr ? (char *) event->ptr : "NULL");
 646                         break;
 647                 case RT_ZCAU:
 648                         event->parameter = -1;
 649                         if (curarg + 1 < params) {
 650                                 i = isdn_gethex(argv[curarg]);
 651                                 j = isdn_gethex(argv[curarg + 1]);
 652                                 if (i >= 0 && i < 256 && j >= 0 && j < 256)
 653                                         event->parameter = (unsigned) i << 8
 654                                                            | j;
 655                                 curarg += 2;
 656                         } else
 657                                 curarg = params - 1;
 658                         break;
 659                 case RT_NUMBER:
 660                 case RT_HEX:
 661                         if (curarg < params) {
 662                                 if (param_type == RT_HEX)
 663                                         event->parameter =
 664                                                 isdn_gethex(argv[curarg]);
 665                                 else
 666                                         event->parameter =
 667                                                 isdn_getnum(argv[curarg]);
 668                                 ++curarg;
 669                         } else
 670                                 event->parameter = -1;
 671                         gig_dbg(DEBUG_EVENT, "parameter==%d", event->parameter);
 672                         break;
 673                 }
 674
 675                 if (resp_code == RSP_ZDLE)
 676                         cs->dle = event->parameter;
 677
 678                 if (abort)
 679                         break;
 680         }
 681
 682         cs->ev_tail = tail;
 683         spin_unlock_irqrestore(&cs->ev_lock, flags);
 684
 685         if (curarg != params)
 686                 gig_dbg(DEBUG_EVENT,
 687                         "invalid number of processed parameters: %d/%d",
 688                         curarg, params);
 689 }
 690 EXPORT_SYMBOL_GPL(gigaset_handle_modem_response);
 691
 692 /* disconnect
 693  * process closing of connection associated with given AT state structure
 694  */
 695 static void disconnect(struct at_state_t **at_state_p)
 696 {
 697         unsigned long flags;
 698         struct bc_state *bcs = (*at_state_p)->bcs;
 699         struct cardstate *cs = (*at_state_p)->cs;
 700
 701         spin_lock_irqsave(&cs->lock, flags);
 702         ++(*at_state_p)->seq_index;
 703
 704         /* revert to selected idle mode */
 705         if (!cs->cidmode) {
 706                 cs->at_state.pending_commands |= PC_UMMODE;
 707                 gig_dbg(DEBUG_EVENT, "Scheduling PC_UMMODE");
 708                 cs->commands_pending = 1;
 709         }
 710         spin_unlock_irqrestore(&cs->lock, flags);
 711
 712         if (bcs) {
 713                 /* B channel assigned: invoke hardware specific handler */
 714                 cs->ops->close_bchannel(bcs);
 715                 /* notify LL */
 716                 if (bcs->chstate & (CHS_D_UP | CHS_NOTIFY_LL)) {
 717                         bcs->chstate &= ~(CHS_D_UP | CHS_NOTIFY_LL);
 718                         gigaset_isdn_hupD(bcs);
 719                 }
 720         } else {
 721                 /* no B channel assigned: just deallocate */
 722                 spin_lock_irqsave(&cs->lock, flags);
 723                 list_del(&(*at_state_p)->list);
 724                 kfree(*at_state_p);
 725                 *at_state_p = NULL;
 726                 spin_unlock_irqrestore(&cs->lock, flags);
 727         }
 728 }
 729
 730 /* get_free_channel
 731  * get a free AT state structure: either one of those associated with the
 732  * B channels of the Gigaset device, or if none of those is available,
 733  * a newly allocated one with bcs=NULL
 734  * The structure should be freed by calling disconnect() after use.
 735  */
 736 static inline struct at_state_t *get_free_channel(struct cardstate *cs,
 737                                                   int cid)
 738 /* cids: >0: siemens-cid
 739           0: without cid
 740          -1: no cid assigned yet
 741 */
 742 {
 743         unsigned long flags;
 744         int i;
 745         struct at_state_t *ret;
 746
 747         for (i = 0; i < cs->channels; ++i)
 748                 if (gigaset_get_channel(cs->bcs + i)) {
 749                         ret = &cs->bcs[i].at_state;
 750                         ret->cid = cid;
 751                         return ret;
 752                 }
 753
 754         spin_lock_irqsave(&cs->lock, flags);
 755         ret = kmalloc(sizeof(struct at_state_t), GFP_ATOMIC);
 756         if (ret) {
 757                 gigaset_at_init(ret, NULL, cs, cid);
 758                 list_add(&ret->list, &cs->temp_at_states);
 759         }
 760         spin_unlock_irqrestore(&cs->lock, flags);
 761         return ret;
 762 }
 763
 764 static void init_failed(struct cardstate *cs, int mode)
 765 {
 766         int i;
 767         struct at_state_t *at_state;
 768
 769         cs->at_state.pending_commands &= ~PC_INIT;
 770         cs->mode = mode;
 771         cs->mstate = MS_UNINITIALIZED;
 772         gigaset_free_channels(cs);
 773         for (i = 0; i < cs->channels; ++i) {
 774                 at_state = &cs->bcs[i].at_state;
 775                 if (at_state->pending_commands & PC_CID) {
 776                         at_state->pending_commands &= ~PC_CID;
 777                         at_state->pending_commands |= PC_NOCID;
 778                         cs->commands_pending = 1;
 779                 }
 780         }
 781 }
 782
 783 static void schedule_init(struct cardstate *cs, int state)
 784 {
 785         if (cs->at_state.pending_commands & PC_INIT) {
 786                 gig_dbg(DEBUG_EVENT, "not scheduling PC_INIT again");
 787                 return;
 788         }
 789         cs->mstate = state;
 790         cs->mode = M_UNKNOWN;
 791         gigaset_block_channels(cs);
 792         cs->at_state.pending_commands |= PC_INIT;
 793         gig_dbg(DEBUG_EVENT, "Scheduling PC_INIT");
 794         cs->commands_pending = 1;
 795 }
 796
 797 /* Add "AT" to a command, add the cid, dle encode it, send the result to the
 798    hardware. */
 799 static void send_command(struct cardstate *cs, const char *cmd, int cid,
 800                          int dle, gfp_t kmallocflags)
 801 {
 802         size_t cmdlen, buflen;
 803         char *cmdpos, *cmdbuf, *cmdtail;
 804
 805         cmdlen = strlen(cmd);
 806         buflen = 11 + cmdlen;
 807         if (unlikely(buflen <= cmdlen)) {
 808                 dev_err(cs->dev, "integer overflow in buflen\n");
 809                 return;
 810         }
 811
 812         cmdbuf = kmalloc(buflen, kmallocflags);
 813         if (unlikely(!cmdbuf)) {
 814                 dev_err(cs->dev, "out of memory\n");
 815                 return;
 816         }
 817
 818         cmdpos = cmdbuf + 9;
 819         cmdtail = cmdpos + cmdlen;
 820         memcpy(cmdpos, cmd, cmdlen);
 821
 822         if (cid > 0 && cid <= 65535) {
 823                 do {
 824                         *--cmdpos = '0' + cid % 10;
 825                         cid /= 10;
 826                         ++cmdlen;
 827                 } while (cid);
 828         }
 829
 830         cmdlen += 2;
 831         *--cmdpos = 'T';
 832         *--cmdpos = 'A';
 833
 834         if (dle) {
 835                 cmdlen += 4;
 836                 *--cmdpos = '(';
 837                 *--cmdpos = 0x10;
 838                 *cmdtail++ = 0x10;
 839                 *cmdtail++ = ')';
 840         }
 841
 842         cs->ops->write_cmd(cs, cmdpos, cmdlen, NULL);
 843         kfree(cmdbuf);
 844 }
 845
 846 static struct at_state_t *at_state_from_cid(struct cardstate *cs, int cid)
 847 {
 848         struct at_state_t *at_state;
 849         int i;
 850         unsigned long flags;
 851
 852         if (cid == 0)
 853                 return &cs->at_state;
 854
 855         for (i = 0; i < cs->channels; ++i)
 856                 if (cid == cs->bcs[i].at_state.cid)
 857                         return &cs->bcs[i].at_state;
 858
 859         spin_lock_irqsave(&cs->lock, flags);
 860
 861         list_for_each_entry(at_state, &cs->temp_at_states, list)
 862                 if (cid == at_state->cid) {
 863                         spin_unlock_irqrestore(&cs->lock, flags);
 864                         return at_state;
 865                 }
 866
 867         spin_unlock_irqrestore(&cs->lock, flags);
 868
 869         return NULL;
 870 }
 871
 872 static void bchannel_down(struct bc_state *bcs)
 873 {
 874         if (bcs->chstate & CHS_B_UP) {
 875                 bcs->chstate &= ~CHS_B_UP;
 876                 gigaset_isdn_hupB(bcs);
 877         }
 878
 879         if (bcs->chstate & (CHS_D_UP | CHS_NOTIFY_LL)) {
 880                 bcs->chstate &= ~(CHS_D_UP | CHS_NOTIFY_LL);
 881                 gigaset_isdn_hupD(bcs);
 882         }
 883
 884         gigaset_free_channel(bcs);
 885
 886         gigaset_bcs_reinit(bcs);
 887 }
 888
 889 static void bchannel_up(struct bc_state *bcs)
 890 {
 891         if (bcs->chstate & CHS_B_UP) {
 892                 dev_notice(bcs->cs->dev, "%s: B channel already up\n",
 893                            __func__);
 894                 return;
 895         }
 896
 897         bcs->chstate |= CHS_B_UP;
 898         gigaset_isdn_connB(bcs);
 899 }
 900
 901 static void start_dial(struct at_state_t *at_state, void *data,
 902                         unsigned seq_index)
 903 {
 904         struct bc_state *bcs = at_state->bcs;
 905         struct cardstate *cs = at_state->cs;
 906         char **commands = data;
 907         unsigned long flags;
 908         int i;
 909
 910         bcs->chstate |= CHS_NOTIFY_LL;
 911
 912         spin_lock_irqsave(&cs->lock, flags);
 913         if (at_state->seq_index != seq_index) {
 914                 spin_unlock_irqrestore(&cs->lock, flags);
 915                 goto error;
 916         }
 917         spin_unlock_irqrestore(&cs->lock, flags);
 918
 919         for (i = 0; i < AT_NUM; ++i) {
 920                 kfree(bcs->commands[i]);
 921                 bcs->commands[i] = commands[i];
 922         }
 923
 924         at_state->pending_commands |= PC_CID;
 925         gig_dbg(DEBUG_EVENT, "Scheduling PC_CID");
 926         cs->commands_pending = 1;
 927         return;
 928
 929 error:
 930         for (i = 0; i < AT_NUM; ++i) {
 931                 kfree(commands[i]);
 932                 commands[i] = NULL;
 933         }
 934         at_state->pending_commands |= PC_NOCID;
 935         gig_dbg(DEBUG_EVENT, "Scheduling PC_NOCID");
 936         cs->commands_pending = 1;
 937         return;
 938 }
 939
 940 static void start_accept(struct at_state_t *at_state)
 941 {
 942         struct cardstate *cs = at_state->cs;
 943         struct bc_state *bcs = at_state->bcs;
 944         int i;
 945
 946         for (i = 0; i < AT_NUM; ++i) {
 947                 kfree(bcs->commands[i]);
 948                 bcs->commands[i] = NULL;
 949         }
 950
 951         bcs->commands[AT_PROTO] = kmalloc(9, GFP_ATOMIC);
 952         bcs->commands[AT_ISO] = kmalloc(9, GFP_ATOMIC);
 953         if (!bcs->commands[AT_PROTO] || !bcs->commands[AT_ISO]) {
 954                 dev_err(at_state->cs->dev, "out of memory\n");
 955                 /* error reset */
 956                 at_state->pending_commands |= PC_HUP;
 957                 gig_dbg(DEBUG_EVENT, "Scheduling PC_HUP");
 958                 cs->commands_pending = 1;
 959                 return;
 960         }
 961
 962         snprintf(bcs->commands[AT_PROTO], 9, "^SBPR=%u\r", bcs->proto2);
 963         snprintf(bcs->commands[AT_ISO], 9, "^SISO=%u\r", bcs->channel + 1);
 964
 965         at_state->pending_commands |= PC_ACCEPT;
 966         gig_dbg(DEBUG_EVENT, "Scheduling PC_ACCEPT");
 967         cs->commands_pending = 1;
 968 }
 969
 970 static void do_start(struct cardstate *cs)
 971 {
 972         gigaset_free_channels(cs);
 973
 974         if (cs->mstate != MS_LOCKED)
 975                 schedule_init(cs, MS_INIT);
 976
 977         cs->isdn_up = 1;
 978         gigaset_isdn_start(cs);
 979
 980         cs->waiting = 0;
 981         wake_up(&cs->waitqueue);
 982 }
 983
 984 static void finish_shutdown(struct cardstate *cs)
 985 {
 986         if (cs->mstate != MS_LOCKED) {
 987                 cs->mstate = MS_UNINITIALIZED;
 988                 cs->mode = M_UNKNOWN;
 989         }
 990
 991         /* Tell the LL that the device is not available .. */
 992         if (cs->isdn_up) {
 993                 cs->isdn_up = 0;
 994                 gigaset_isdn_stop(cs);
 995         }
 996
 997         /* The rest is done by cleanup_cs () in user mode. */
 998
 999         cs->cmd_result = -ENODEV;
1000         cs->waiting = 0;
1001         wake_up(&cs->waitqueue);
1002 }
1003
1004 static void do_shutdown(struct cardstate *cs)
1005 {
1006         gigaset_block_channels(cs);
1007
1008         if (cs->mstate == MS_READY) {
1009                 cs->mstate = MS_SHUTDOWN;
1010                 cs->at_state.pending_commands |= PC_SHUTDOWN;
1011                 gig_dbg(DEBUG_EVENT, "Scheduling PC_SHUTDOWN");
1012                 cs->commands_pending = 1;
1013         } else
1014                 finish_shutdown(cs);
1015 }
1016
1017 static void do_stop(struct cardstate *cs)
1018 {
1019         unsigned long flags;
1020
1021         spin_lock_irqsave(&cs->lock, flags);
1022         cs->connected = 0;
1023         spin_unlock_irqrestore(&cs->lock, flags);
1024
1025         do_shutdown(cs);
1026 }
1027
1028 /* Entering cid mode or getting a cid failed:
1029  * try to initialize the device and try again.
1030  *
1031  * channel >= 0: getting cid for the channel failed
1032  * channel < 0:  entering cid mode failed
1033  *
1034  * returns 0 on failure
1035  */
1036 static int reinit_and_retry(struct cardstate *cs, int channel)
1037 {
1038         int i;
1039
1040         if (--cs->retry_count <= 0)
1041                 return 0;
1042
1043         for (i = 0; i < cs->channels; ++i)
1044                 if (cs->bcs[i].at_state.cid > 0)
1045                         return 0;
1046
1047         if (channel < 0)
1048                 dev_warn(cs->dev,
1049                     "Could not enter cid mode. Reinit device and try again.\n");
1050         else {
1051                 dev_warn(cs->dev,
1052                     "Could not get a call id. Reinit device and try again.\n");
1053                 cs->bcs[channel].at_state.pending_commands |= PC_CID;
1054         }
1055         schedule_init(cs, MS_INIT);
1056         return 1;
1057 }
1058
1059 static int at_state_invalid(struct cardstate *cs,
1060                             struct at_state_t *test_ptr)
1061 {
1062         unsigned long flags;
1063         unsigned channel;
1064         struct at_state_t *at_state;
1065         int retval = 0;
1066
1067         spin_lock_irqsave(&cs->lock, flags);
1068
1069         if (test_ptr == &cs->at_state)
1070                 goto exit;
1071
1072         list_for_each_entry(at_state, &cs->temp_at_states, list)
1073                 if (at_state == test_ptr)
1074                         goto exit;
1075
1076         for (channel = 0; channel < cs->channels; ++channel)
1077                 if (&cs->bcs[channel].at_state == test_ptr)
1078                         goto exit;
1079
1080         retval = 1;
1081 exit:
1082         spin_unlock_irqrestore(&cs->lock, flags);
1083         return retval;
1084 }
1085
1086 static void handle_icall(struct cardstate *cs, struct bc_state *bcs,
1087                          struct at_state_t **p_at_state)
1088 {
1089         int retval;
1090         struct at_state_t *at_state = *p_at_state;
1091
1092         retval = gigaset_isdn_icall(at_state);
1093         switch (retval) {
1094         case ICALL_ACCEPT:
1095                 break;
1096         default:
1097                 dev_err(cs->dev, "internal error: disposition=%d\n", retval);
1098                 /* --v-- fall through --v-- */
1099         case ICALL_IGNORE:
1100         case ICALL_REJECT:
1101                 /* hang up actively
1102                  * Device doc says that would reject the call.
1103                  * In fact it doesn't.
1104                  */
1105                 at_state->pending_commands |= PC_HUP;
1106                 cs->commands_pending = 1;
1107                 break;
1108         }
1109 }
1110
1111 static int do_lock(struct cardstate *cs)
1112 {
1113         int mode;
1114         int i;
1115
1116         switch (cs->mstate) {
1117         case MS_UNINITIALIZED:
1118         case MS_READY:
1119                 if (cs->cur_at_seq || !list_empty(&cs->temp_at_states) ||
1120                     cs->at_state.pending_commands)
1121                         return -EBUSY;
1122
1123                 for (i = 0; i < cs->channels; ++i)
1124                         if (cs->bcs[i].at_state.pending_commands)
1125                                 return -EBUSY;
1126
1127                 if (!gigaset_get_channels(cs))
1128                         return -EBUSY;
1129
1130                 break;
1131         case MS_LOCKED:
1132                 break;
1133         default:
1134                 return -EBUSY;
1135         }
1136
1137         mode = cs->mode;
1138         cs->mstate = MS_LOCKED;
1139         cs->mode = M_UNKNOWN;
1140
1141         return mode;
1142 }
1143
1144 static int do_unlock(struct cardstate *cs)
1145 {
1146         if (cs->mstate != MS_LOCKED)
1147                 return -EINVAL;
1148
1149         cs->mstate = MS_UNINITIALIZED;
1150         cs->mode = M_UNKNOWN;
1151         gigaset_free_channels(cs);
1152         if (cs->connected)
1153                 schedule_init(cs, MS_INIT);
1154
1155         return 0;
1156 }
1157
1158 static void do_action(int action, struct cardstate *cs,
1159                       struct bc_state *bcs,
1160                       struct at_state_t **p_at_state, char **pp_command,
1161                       int *p_genresp, int *p_resp_code,
1162                       struct event_t *ev)
1163 {
1164         struct at_state_t *at_state = *p_at_state;
1165         struct at_state_t *at_state2;
1166         unsigned long flags;
1167
1168         int channel;
1169
1170         unsigned char *s, *e;
1171         int i;
1172         unsigned long val;
1173
1174         switch (action) {
1175         case ACT_NOTHING:
1176                 break;
1177         case ACT_TIMEOUT:
1178                 at_state->waiting = 1;
1179                 break;
1180         case ACT_INIT:
1181                 cs->at_state.pending_commands &= ~PC_INIT;
1182                 cs->cur_at_seq = SEQ_NONE;
1183                 cs->mode = M_UNIMODEM;
1184                 spin_lock_irqsave(&cs->lock, flags);
1185                 if (!cs->cidmode) {
1186                         spin_unlock_irqrestore(&cs->lock, flags);
1187                         gigaset_free_channels(cs);
1188                         cs->mstate = MS_READY;
1189                         break;
1190                 }
1191                 spin_unlock_irqrestore(&cs->lock, flags);
1192                 cs->at_state.pending_commands |= PC_CIDMODE;
1193                 gig_dbg(DEBUG_EVENT, "Scheduling PC_CIDMODE");
1194                 cs->commands_pending = 1;
1195                 break;
1196         case ACT_FAILINIT:
1197                 dev_warn(cs->dev, "Could not initialize the device.\n");
1198                 cs->dle = 0;
1199                 init_failed(cs, M_UNKNOWN);
1200                 cs->cur_at_seq = SEQ_NONE;
1201                 break;
1202         case ACT_CONFIGMODE:
1203                 init_failed(cs, M_CONFIG);
1204                 cs->cur_at_seq = SEQ_NONE;
1205                 break;
1206         case ACT_SETDLE1:
1207                 cs->dle = 1;
1208                 /* cs->inbuf[0].inputstate |= INS_command | INS_DLE_command; */
1209                 cs->inbuf[0].inputstate &=
1210                         ~(INS_command | INS_DLE_command);
1211                 break;
1212         case ACT_SETDLE0:
1213                 cs->dle = 0;
1214                 cs->inbuf[0].inputstate =
1215                         (cs->inbuf[0].inputstate & ~INS_DLE_command)
1216                         | INS_command;
1217                 break;
1218         case ACT_CMODESET:
1219                 if (cs->mstate == MS_INIT || cs->mstate == MS_RECOVER) {
1220                         gigaset_free_channels(cs);
1221                         cs->mstate = MS_READY;
1222                 }
1223                 cs->mode = M_CID;
1224                 cs->cur_at_seq = SEQ_NONE;
1225                 break;
1226         case ACT_UMODESET:
1227                 cs->mode = M_UNIMODEM;
1228                 cs->cur_at_seq = SEQ_NONE;
1229                 break;
1230         case ACT_FAILCMODE:
1231                 cs->cur_at_seq = SEQ_NONE;
1232                 if (cs->mstate == MS_INIT || cs->mstate == MS_RECOVER) {
1233                         init_failed(cs, M_UNKNOWN);
1234                         break;
1235                 }
1236                 if (!reinit_and_retry(cs, -1))
1237                         schedule_init(cs, MS_RECOVER);
1238                 break;
1239         case ACT_FAILUMODE:
1240                 cs->cur_at_seq = SEQ_NONE;
1241                 schedule_init(cs, MS_RECOVER);
1242                 break;
1243         case ACT_HUPMODEM:
1244                 /* send "+++" (hangup in unimodem mode) */
1245                 if (cs->connected)
1246                         cs->ops->write_cmd(cs, "+++", 3, NULL);
1247                 break;
1248         case ACT_RING:
1249                 /* get fresh AT state structure for new CID */
1250                 at_state2 = get_free_channel(cs, ev->parameter);
1251                 if (!at_state2) {
1252                         dev_warn(cs->dev,
1253                         "RING ignored: could not allocate channel structure\n");
1254                         break;
1255                 }
1256
1257                 /* initialize AT state structure
1258                  * note that bcs may be NULL if no B channel is free
1259                  */
1260                 at_state2->ConState = 700;
1261                 kfree(at_state2->str_var[STR_NMBR]);
1262                 at_state2->str_var[STR_NMBR] = NULL;
1263                 kfree(at_state2->str_var[STR_ZCPN]);
1264                 at_state2->str_var[STR_ZCPN] = NULL;
1265                 kfree(at_state2->str_var[STR_ZBC]);
1266                 at_state2->str_var[STR_ZBC] = NULL;
1267                 kfree(at_state2->str_var[STR_ZHLC]);
1268                 at_state2->str_var[STR_ZHLC] = NULL;
1269                 at_state2->int_var[VAR_ZCTP] = -1;
1270
1271                 spin_lock_irqsave(&cs->lock, flags);
1272                 at_state2->timer_expires = RING_TIMEOUT;
1273                 at_state2->timer_active = 1;
1274                 spin_unlock_irqrestore(&cs->lock, flags);
1275                 break;
1276         case ACT_ICALL:
1277                 handle_icall(cs, bcs, p_at_state);
1278                 break;
1279         case ACT_FAILSDOWN:
1280                 dev_warn(cs->dev, "Could not shut down the device.\n");
1281                 /* fall through */
1282         case ACT_FAKESDOWN:
1283         case ACT_SDOWN:
1284                 cs->cur_at_seq = SEQ_NONE;
1285                 finish_shutdown(cs);
1286                 break;
1287         case ACT_CONNECT:
1288                 if (cs->onechannel) {
1289                         at_state->pending_commands |= PC_DLE1;
1290                         cs->commands_pending = 1;
1291                         break;
1292                 }
1293                 bcs->chstate |= CHS_D_UP;
1294                 gigaset_isdn_connD(bcs);
1295                 cs->ops->init_bchannel(bcs);
1296                 break;
1297         case ACT_DLE1:
1298                 cs->cur_at_seq = SEQ_NONE;
1299                 bcs = cs->bcs + cs->curchannel;
1300
1301                 bcs->chstate |= CHS_D_UP;
1302                 gigaset_isdn_connD(bcs);
1303                 cs->ops->init_bchannel(bcs);
1304                 break;
1305         case ACT_FAKEHUP:
1306                 at_state->int_var[VAR_ZSAU] = ZSAU_NULL;
1307                 /* fall through */
1308         case ACT_DISCONNECT:
1309                 cs->cur_at_seq = SEQ_NONE;
1310                 at_state->cid = -1;
1311                 if (bcs && cs->onechannel && cs->dle) {
1312                         /* Check for other open channels not needed:
1313                          * DLE only used for M10x with one B channel.
1314                          */
1315                         at_state->pending_commands |= PC_DLE0;
1316                         cs->commands_pending = 1;
1317                 } else
1318                         disconnect(p_at_state);
1319                 break;
1320         case ACT_FAKEDLE0:
1321                 at_state->int_var[VAR_ZDLE] = 0;
1322                 cs->dle = 0;
1323                 /* fall through */
1324         case ACT_DLE0:
1325                 cs->cur_at_seq = SEQ_NONE;
1326                 at_state2 = &cs->bcs[cs->curchannel].at_state;
1327                 disconnect(&at_state2);
1328                 break;
1329         case ACT_ABORTHUP:
1330                 cs->cur_at_seq = SEQ_NONE;
1331                 dev_warn(cs->dev, "Could not hang up.\n");
1332                 at_state->cid = -1;
1333                 if (bcs && cs->onechannel)
1334                         at_state->pending_commands |= PC_DLE0;
1335                 else
1336                         disconnect(p_at_state);
1337                 schedule_init(cs, MS_RECOVER);
1338                 break;
1339         case ACT_FAILDLE0:
1340                 cs->cur_at_seq = SEQ_NONE;
1341                 dev_warn(cs->dev, "Could not leave DLE mode.\n");
1342                 at_state2 = &cs->bcs[cs->curchannel].at_state;
1343                 disconnect(&at_state2);
1344                 schedule_init(cs, MS_RECOVER);
1345                 break;
1346         case ACT_FAILDLE1:
1347                 cs->cur_at_seq = SEQ_NONE;
1348                 dev_warn(cs->dev,
1349                          "Could not enter DLE mode. Trying to hang up.\n");
1350                 channel = cs->curchannel;
1351                 cs->bcs[channel].at_state.pending_commands |= PC_HUP;
1352                 cs->commands_pending = 1;
1353                 break;
1354
1355         case ACT_CID: /* got cid; start dialing */
1356                 cs->cur_at_seq = SEQ_NONE;
1357                 channel = cs->curchannel;
1358                 if (ev->parameter > 0 && ev->parameter <= 65535) {
1359                         cs->bcs[channel].at_state.cid = ev->parameter;
1360                         cs->bcs[channel].at_state.pending_commands |=
1361                                 PC_DIAL;
1362                         cs->commands_pending = 1;
1363                         break;
1364                 }
1365                 /* fall through */
1366         case ACT_FAILCID:
1367                 cs->cur_at_seq = SEQ_NONE;
1368                 channel = cs->curchannel;
1369                 if (!reinit_and_retry(cs, channel)) {
1370                         dev_warn(cs->dev,
1371                                  "Could not get a call ID. Cannot dial.\n");
1372                         at_state2 = &cs->bcs[channel].at_state;
1373                         disconnect(&at_state2);
1374                 }
1375                 break;
1376         case ACT_ABORTCID:
1377                 cs->cur_at_seq = SEQ_NONE;
1378                 at_state2 = &cs->bcs[cs->curchannel].at_state;
1379                 disconnect(&at_state2);
1380                 break;
1381
1382         case ACT_DIALING:
1383         case ACT_ACCEPTED:
1384                 cs->cur_at_seq = SEQ_NONE;
1385                 break;
1386
1387         case ACT_ABORTACCEPT:   /* hangup/error/timeout during ICALL procssng */
1388                 disconnect(p_at_state);
1389                 break;
1390
1391         case ACT_ABORTDIAL:     /* error/timeout during dial preparation */
1392                 cs->cur_at_seq = SEQ_NONE;
1393                 at_state->pending_commands |= PC_HUP;
1394                 cs->commands_pending = 1;
1395                 break;
1396
1397         case ACT_REMOTEREJECT:  /* DISCONNECT_IND after dialling */
1398         case ACT_CONNTIMEOUT:   /* timeout waiting for ZSAU=ACTIVE */
1399         case ACT_REMOTEHUP:     /* DISCONNECT_IND with established connection */
1400                 at_state->pending_commands |= PC_HUP;
1401                 cs->commands_pending = 1;
1402                 break;
1403         case ACT_GETSTRING: /* warning: RING, ZDLE, ...
1404                                are not handled properly anymore */
1405                 at_state->getstring = 1;
1406                 break;
1407         case ACT_SETVER:
1408                 if (!ev->ptr) {
1409                         *p_genresp = 1;
1410                         *p_resp_code = RSP_ERROR;
1411                         break;
1412                 }
1413                 s = ev->ptr;
1414
1415                 if (!strcmp(s, "OK")) {
1416                         *p_genresp = 1;
1417                         *p_resp_code = RSP_ERROR;
1418                         break;
1419                 }
1420
1421                 for (i = 0; i < 4; ++i) {
1422                         val = simple_strtoul(s, (char **) &e, 10);
1423                         if (val > INT_MAX || e == s)
1424                                 break;
1425                         if (i == 3) {
1426                                 if (*e)
1427                                         break;
1428                         } else if (*e != '.')
1429                                 break;
1430                         else
1431                                 s = e + 1;
1432                         cs->fwver[i] = val;
1433                 }
1434                 if (i != 4) {
1435                         *p_genresp = 1;
1436                         *p_resp_code = RSP_ERROR;
1437                         break;
1438                 }
1439                 /*at_state->getstring = 1;*/
1440                 cs->gotfwver = 0;
1441                 break;
1442         case ACT_GOTVER:
1443                 if (cs->gotfwver == 0) {
1444                         cs->gotfwver = 1;
1445                         gig_dbg(DEBUG_EVENT,
1446                                 "firmware version %02d.%03d.%02d.%02d",
1447                                 cs->fwver[0], cs->fwver[1],
1448                                 cs->fwver[2], cs->fwver[3]);
1449                         break;
1450                 }
1451                 /* fall through */
1452         case ACT_FAILVER:
1453                 cs->gotfwver = -1;
1454                 dev_err(cs->dev, "could not read firmware version.\n");
1455                 break;
1456         case ACT_ERROR:
1457                 gig_dbg(DEBUG_ANY, "%s: ERROR response in ConState %d",
1458                         __func__, at_state->ConState);
1459                 cs->cur_at_seq = SEQ_NONE;
1460                 break;
1461         case ACT_DEBUG:
1462                 gig_dbg(DEBUG_ANY, "%s: resp_code %d in ConState %d",
1463                         __func__, ev->type, at_state->ConState);
1464                 break;
1465         case ACT_WARN:
1466                 dev_warn(cs->dev, "%s: resp_code %d in ConState %d!\n",
1467                          __func__, ev->type, at_state->ConState);
1468                 break;
1469         case ACT_ZCAU:
1470                 dev_warn(cs->dev, "cause code %04x in connection state %d.\n",
1471                          ev->parameter, at_state->ConState);
1472                 break;
1473
1474         /* events from the LL */
1475         case ACT_DIAL:
1476                 start_dial(at_state, ev->ptr, ev->parameter);
1477                 break;
1478         case ACT_ACCEPT:
1479                 start_accept(at_state);
1480                 break;
1481         case ACT_HUP:
1482                 at_state->pending_commands |= PC_HUP;
1483                 gig_dbg(DEBUG_EVENT, "Scheduling PC_HUP");
1484                 cs->commands_pending = 1;
1485                 break;
1486
1487         /* hotplug events */
1488         case ACT_STOP:
1489                 do_stop(cs);
1490                 break;
1491         case ACT_START:
1492                 do_start(cs);
1493                 break;
1494
1495         /* events from the interface */
1496         case ACT_IF_LOCK:
1497                 cs->cmd_result = ev->parameter ? do_lock(cs) : do_unlock(cs);
1498                 cs->waiting = 0;
1499                 wake_up(&cs->waitqueue);
1500                 break;
1501         case ACT_IF_VER:
1502                 if (ev->parameter != 0)
1503                         cs->cmd_result = -EINVAL;
1504                 else if (cs->gotfwver != 1) {
1505                         cs->cmd_result = -ENOENT;
1506                 } else {
1507                         memcpy(ev->arg, cs->fwver, sizeof cs->fwver);
1508                         cs->cmd_result = 0;
1509                 }
1510                 cs->waiting = 0;
1511                 wake_up(&cs->waitqueue);
1512                 break;
1513
1514         /* events from the proc file system */
1515         case ACT_PROC_CIDMODE:
1516                 spin_lock_irqsave(&cs->lock, flags);
1517                 if (ev->parameter != cs->cidmode) {
1518                         cs->cidmode = ev->parameter;
1519                         if (ev->parameter) {
1520                                 cs->at_state.pending_commands |= PC_CIDMODE;
1521                                 gig_dbg(DEBUG_EVENT, "Scheduling PC_CIDMODE");
1522                         } else {
1523                                 cs->at_state.pending_commands |= PC_UMMODE;
1524                                 gig_dbg(DEBUG_EVENT, "Scheduling PC_UMMODE");
1525                         }
1526                         cs->commands_pending = 1;
1527                 }
1528                 spin_unlock_irqrestore(&cs->lock, flags);
1529                 cs->waiting = 0;
1530                 wake_up(&cs->waitqueue);
1531                 break;
1532
1533         /* events from the hardware drivers */
1534         case ACT_NOTIFY_BC_DOWN:
1535                 bchannel_down(bcs);
1536                 break;
1537         case ACT_NOTIFY_BC_UP:
1538                 bchannel_up(bcs);
1539                 break;
1540         case ACT_SHUTDOWN:
1541                 do_shutdown(cs);
1542                 break;
1543
1544
1545         default:
1546                 if (action >= ACT_CMD && action < ACT_CMD + AT_NUM) {
1547                         *pp_command = at_state->bcs->commands[action - ACT_CMD];
1548                         if (!*pp_command) {
1549                                 *p_genresp = 1;
1550                                 *p_resp_code = RSP_NULL;
1551                         }
1552                 } else
1553                         dev_err(cs->dev, "%s: action==%d!\n", __func__, action);
1554         }
1555 }
1556
1557 /* State machine to do the calling and hangup procedure */
1558 static void process_event(struct cardstate *cs, struct event_t *ev)
1559 {
1560         struct bc_state *bcs;
1561         char *p_command = NULL;
1562         struct reply_t *rep;
1563         int rcode;
1564         int genresp = 0;
1565         int resp_code = RSP_ERROR;
1566         int sendcid;
1567         struct at_state_t *at_state;
1568         int index;
1569         int curact;
1570         unsigned long flags;
1571
1572         if (ev->cid >= 0) {
1573                 at_state = at_state_from_cid(cs, ev->cid);
1574                 if (!at_state) {
1575                         gig_dbg(DEBUG_EVENT, "event %d for invalid cid %d",
1576                                 ev->type, ev->cid);
1577                         gigaset_add_event(cs, &cs->at_state, RSP_WRONG_CID,
1578                                           NULL, 0, NULL);
1579                         return;
1580                 }
1581         } else {
1582                 at_state = ev->at_state;
1583                 if (at_state_invalid(cs, at_state)) {
1584                         gig_dbg(DEBUG_EVENT, "event for invalid at_state %p",
1585                                 at_state);
1586                         return;
1587                 }
1588         }
1589
1590         gig_dbg(DEBUG_EVENT, "connection state %d, event %d",
1591                 at_state->ConState, ev->type);
1592
1593         bcs = at_state->bcs;
1594         sendcid = at_state->cid;
1595
1596         /* Setting the pointer to the dial array */
1597         rep = at_state->replystruct;
1598
1599         spin_lock_irqsave(&cs->lock, flags);
1600         if (ev->type == EV_TIMEOUT) {
1601                 if (ev->parameter != at_state->timer_index
1602                     || !at_state->timer_active) {
1603                         ev->type = RSP_NONE; /* old timeout */
1604                         gig_dbg(DEBUG_EVENT, "old timeout");
1605                 } else if (!at_state->waiting)
1606                         gig_dbg(DEBUG_EVENT, "timeout occurred");
1607                 else
1608                         gig_dbg(DEBUG_EVENT, "stopped waiting");
1609         }
1610         spin_unlock_irqrestore(&cs->lock, flags);
1611
1612         /* if the response belongs to a variable in at_state->int_var[VAR_XXXX]
1613            or at_state->str_var[STR_XXXX], set it */
1614         if (ev->type >= RSP_VAR && ev->type < RSP_VAR + VAR_NUM) {
1615                 index = ev->type - RSP_VAR;
1616                 at_state->int_var[index] = ev->parameter;
1617         } else if (ev->type >= RSP_STR && ev->type < RSP_STR + STR_NUM) {
1618                 index = ev->type - RSP_STR;
1619                 kfree(at_state->str_var[index]);
1620                 at_state->str_var[index] = ev->ptr;
1621                 ev->ptr = NULL; /* prevent process_events() from
1622                                    deallocating ptr */
1623         }
1624
1625         if (ev->type == EV_TIMEOUT || ev->type == RSP_STRING)
1626                 at_state->getstring = 0;
1627
1628         /* Search row in dial array which matches modem response and current
1629            constate */
1630         for (;; rep++) {
1631                 rcode = rep->resp_code;
1632                 if (rcode == RSP_LAST) {
1633                         /* found nothing...*/
1634                         dev_warn(cs->dev, "%s: rcode=RSP_LAST: "
1635                                         "resp_code %d in ConState %d!\n",
1636                                  __func__, ev->type, at_state->ConState);
1637                         return;
1638                 }
1639                 if ((rcode == RSP_ANY || rcode == ev->type)
1640                   && ((int) at_state->ConState >= rep->min_ConState)
1641                   && (rep->max_ConState < 0
1642                       || (int) at_state->ConState <= rep->max_ConState)
1643                   && (rep->parameter < 0 || rep->parameter == ev->parameter))
1644                         break;
1645         }
1646
1647         p_command = rep->command;
1648
1649         at_state->waiting = 0;
1650         for (curact = 0; curact < MAXACT; ++curact) {
1651                 /* The row tells us what we should do  ..
1652                  */
1653                 do_action(rep->action[curact], cs, bcs, &at_state, &p_command,
1654                           &genresp, &resp_code, ev);
1655                 if (!at_state)
1656                         break; /* may be freed after disconnect */
1657         }
1658
1659         if (at_state) {
1660                 /* Jump to the next con-state regarding the array */
1661                 if (rep->new_ConState >= 0)
1662                         at_state->ConState = rep->new_ConState;
1663
1664                 if (genresp) {
1665                         spin_lock_irqsave(&cs->lock, flags);
1666                         at_state->timer_expires = 0;
1667                         at_state->timer_active = 0;
1668                         spin_unlock_irqrestore(&cs->lock, flags);
1669                         gigaset_add_event(cs, at_state, resp_code,
1670                                           NULL, 0, NULL);
1671                 } else {
1672                         /* Send command to modem if not NULL... */
1673                         if (p_command) {
1674                                 if (cs->connected)
1675                                         send_command(cs, p_command,
1676                                                      sendcid, cs->dle,
1677                                                      GFP_ATOMIC);
1678                                 else
1679                                         gigaset_add_event(cs, at_state,
1680                                                           RSP_NODEV,
1681                                                           NULL, 0, NULL);
1682                         }
1683
1684                         spin_lock_irqsave(&cs->lock, flags);
1685                         if (!rep->timeout) {
1686                                 at_state->timer_expires = 0;
1687                                 at_state->timer_active = 0;
1688                         } else if (rep->timeout > 0) { /* new timeout */
1689                                 at_state->timer_expires = rep->timeout * 10;
1690                                 at_state->timer_active = 1;
1691                                 ++at_state->timer_index;
1692                         }
1693                         spin_unlock_irqrestore(&cs->lock, flags);
1694                 }
1695         }
1696 }
1697
1698 static void schedule_sequence(struct cardstate *cs,
1699                               struct at_state_t *at_state, int sequence)
1700 {
1701         cs->cur_at_seq = sequence;
1702         gigaset_add_event(cs, at_state, RSP_INIT, NULL, sequence, NULL);
1703 }
1704
1705 static void process_command_flags(struct cardstate *cs)
1706 {
1707         struct at_state_t *at_state = NULL;
1708         struct bc_state *bcs;
1709         int i;
1710         int sequence;
1711         unsigned long flags;
1712
1713         cs->commands_pending = 0;
1714
1715         if (cs->cur_at_seq) {
1716                 gig_dbg(DEBUG_EVENT, "not searching scheduled commands: busy");
1717                 return;
1718         }
1719
1720         gig_dbg(DEBUG_EVENT, "searching scheduled commands");
1721
1722         sequence = SEQ_NONE;
1723
1724         /* clear pending_commands and hangup channels on shutdown */
1725         if (cs->at_state.pending_commands & PC_SHUTDOWN) {
1726                 cs->at_state.pending_commands &= ~PC_CIDMODE;
1727                 for (i = 0; i < cs->channels; ++i) {
1728                         bcs = cs->bcs + i;
1729                         at_state = &bcs->at_state;
1730                         at_state->pending_commands &=
1731                                 ~(PC_DLE1 | PC_ACCEPT | PC_DIAL);
1732                         if (at_state->cid > 0)
1733                                 at_state->pending_commands |= PC_HUP;
1734                         if (at_state->pending_commands & PC_CID) {
1735                                 at_state->pending_commands |= PC_NOCID;
1736                                 at_state->pending_commands &= ~PC_CID;
1737                         }
1738                 }
1739         }
1740
1741         /* clear pending_commands and hangup channels on reset */
1742         if (cs->at_state.pending_commands & PC_INIT) {
1743                 cs->at_state.pending_commands &= ~PC_CIDMODE;
1744                 for (i = 0; i < cs->channels; ++i) {
1745                         bcs = cs->bcs + i;
1746                         at_state = &bcs->at_state;
1747                         at_state->pending_commands &=
1748                                 ~(PC_DLE1 | PC_ACCEPT | PC_DIAL);
1749                         if (at_state->cid > 0)
1750                                 at_state->pending_commands |= PC_HUP;
1751                         if (cs->mstate == MS_RECOVER) {
1752                                 if (at_state->pending_commands & PC_CID) {
1753                                         at_state->pending_commands |= PC_NOCID;
1754                                         at_state->pending_commands &= ~PC_CID;
1755                                 }
1756                         }
1757                 }
1758         }
1759
1760         /* only switch back to unimodem mode if no commands are pending and
1761          * no channels are up */
1762         spin_lock_irqsave(&cs->lock, flags);
1763         if (cs->at_state.pending_commands == PC_UMMODE
1764             && !cs->cidmode
1765             && list_empty(&cs->temp_at_states)
1766             && cs->mode == M_CID) {
1767                 sequence = SEQ_UMMODE;
1768                 at_state = &cs->at_state;
1769                 for (i = 0; i < cs->channels; ++i) {
1770                         bcs = cs->bcs + i;
1771                         if (bcs->at_state.pending_commands ||
1772                             bcs->at_state.cid > 0) {
1773                                 sequence = SEQ_NONE;
1774                                 break;
1775                         }
1776                 }
1777         }
1778         spin_unlock_irqrestore(&cs->lock, flags);
1779         cs->at_state.pending_commands &= ~PC_UMMODE;
1780         if (sequence != SEQ_NONE) {
1781                 schedule_sequence(cs, at_state, sequence);
1782                 return;
1783         }
1784
1785         for (i = 0; i < cs->channels; ++i) {
1786                 bcs = cs->bcs + i;
1787                 if (bcs->at_state.pending_commands & PC_HUP) {
1788                         bcs->at_state.pending_commands &= ~PC_HUP;
1789                         if (bcs->at_state.pending_commands & PC_CID) {
1790                                 /* not yet dialing: PC_NOCID is sufficient */
1791                                 bcs->at_state.pending_commands |= PC_NOCID;
1792                                 bcs->at_state.pending_commands &= ~PC_CID;
1793                         } else {
1794                                 schedule_sequence(cs, &bcs->at_state, SEQ_HUP);
1795                                 return;
1796                         }
1797                 }
1798                 if (bcs->at_state.pending_commands & PC_NOCID) {
1799                         bcs->at_state.pending_commands &= ~PC_NOCID;
1800                         cs->curchannel = bcs->channel;
1801                         schedule_sequence(cs, &cs->at_state, SEQ_NOCID);
1802                         return;
1803                 } else if (bcs->at_state.pending_commands & PC_DLE0) {
1804                         bcs->at_state.pending_commands &= ~PC_DLE0;
1805                         cs->curchannel = bcs->channel;
1806                         schedule_sequence(cs, &cs->at_state, SEQ_DLE0);
1807                         return;
1808                 }
1809         }
1810
1811         list_for_each_entry(at_state, &cs->temp_at_states, list)
1812                 if (at_state->pending_commands & PC_HUP) {
1813                         at_state->pending_commands &= ~PC_HUP;
1814                         schedule_sequence(cs, at_state, SEQ_HUP);
1815                         return;
1816                 }
1817
1818         if (cs->at_state.pending_commands & PC_INIT) {
1819                 cs->at_state.pending_commands &= ~PC_INIT;
1820                 cs->dle = 0;
1821                 cs->inbuf->inputstate = INS_command;
1822                 schedule_sequence(cs, &cs->at_state, SEQ_INIT);
1823                 return;
1824         }
1825         if (cs->at_state.pending_commands & PC_SHUTDOWN) {
1826                 cs->at_state.pending_commands &= ~PC_SHUTDOWN;
1827                 schedule_sequence(cs, &cs->at_state, SEQ_SHUTDOWN);
1828                 return;
1829         }
1830         if (cs->at_state.pending_commands & PC_CIDMODE) {
1831                 cs->at_state.pending_commands &= ~PC_CIDMODE;
1832                 if (cs->mode == M_UNIMODEM) {
1833                         cs->retry_count = 1;
1834                         schedule_sequence(cs, &cs->at_state, SEQ_CIDMODE);
1835                         return;
1836                 }
1837         }
1838
1839         for (i = 0; i < cs->channels; ++i) {
1840                 bcs = cs->bcs + i;
1841                 if (bcs->at_state.pending_commands & PC_DLE1) {
1842                         bcs->at_state.pending_commands &= ~PC_DLE1;
1843                         cs->curchannel = bcs->channel;
1844                         schedule_sequence(cs, &cs->at_state, SEQ_DLE1);
1845                         return;
1846                 }
1847                 if (bcs->at_state.pending_commands & PC_ACCEPT) {
1848                         bcs->at_state.pending_commands &= ~PC_ACCEPT;
1849                         schedule_sequence(cs, &bcs->at_state, SEQ_ACCEPT);
1850                         return;
1851                 }
1852                 if (bcs->at_state.pending_commands & PC_DIAL) {
1853                         bcs->at_state.pending_commands &= ~PC_DIAL;
1854                         schedule_sequence(cs, &bcs->at_state, SEQ_DIAL);
1855                         return;
1856                 }
1857                 if (bcs->at_state.pending_commands & PC_CID) {
1858                         switch (cs->mode) {
1859                         case M_UNIMODEM:
1860                                 cs->at_state.pending_commands |= PC_CIDMODE;
1861                                 gig_dbg(DEBUG_EVENT, "Scheduling PC_CIDMODE");
1862                                 cs->commands_pending = 1;
1863                                 return;
1864 #ifdef GIG_MAYINITONDIAL
1865                         case M_UNKNOWN:
1866                                 schedule_init(cs, MS_INIT);
1867                                 return;
1868 #endif
1869                         }
1870                         bcs->at_state.pending_commands &= ~PC_CID;
1871                         cs->curchannel = bcs->channel;
1872 #ifdef GIG_RETRYCID
1873                         cs->retry_count = 2;
1874 #else
1875                         cs->retry_count = 1;
1876 #endif
1877                         schedule_sequence(cs, &cs->at_state, SEQ_CID);
1878                         return;
1879                 }
1880         }
1881 }
1882
1883 static void process_events(struct cardstate *cs)
1884 {
1885         struct event_t *ev;
1886         unsigned head, tail;
1887         int i;
1888         int check_flags = 0;
1889         int was_busy;
1890         unsigned long flags;
1891
1892         spin_lock_irqsave(&cs->ev_lock, flags);
1893         head = cs->ev_head;
1894
1895         for (i = 0; i < 2 * MAX_EVENTS; ++i) {
1896                 tail = cs->ev_tail;
1897                 if (tail == head) {
1898                         if (!check_flags && !cs->commands_pending)
1899                                 break;
1900                         check_flags = 0;
1901                         spin_unlock_irqrestore(&cs->ev_lock, flags);
1902                         process_command_flags(cs);
1903                         spin_lock_irqsave(&cs->ev_lock, flags);
1904                         tail = cs->ev_tail;
1905                         if (tail == head) {
1906                                 if (!cs->commands_pending)
1907                                         break;
1908                                 continue;
1909                         }
1910                 }
1911
1912                 ev = cs->events + head;
1913                 was_busy = cs->cur_at_seq != SEQ_NONE;
1914                 spin_unlock_irqrestore(&cs->ev_lock, flags);
1915                 process_event(cs, ev);
1916                 spin_lock_irqsave(&cs->ev_lock, flags);
1917                 kfree(ev->ptr);
1918                 ev->ptr = NULL;
1919                 if (was_busy && cs->cur_at_seq == SEQ_NONE)
1920                         check_flags = 1;
1921
1922                 head = (head + 1) % MAX_EVENTS;
1923                 cs->ev_head = head;
1924         }
1925
1926         spin_unlock_irqrestore(&cs->ev_lock, flags);
1927
1928         if (i == 2 * MAX_EVENTS) {
1929                 dev_err(cs->dev,
1930                         "infinite loop in process_events; aborting.\n");
1931         }
1932 }
1933
1934 /* tasklet scheduled on any event received from the Gigaset device
1935  * parameter:
1936  *      data    ISDN controller state structure
1937  */
1938 void gigaset_handle_event(unsigned long data)
1939 {
1940         struct cardstate *cs = (struct cardstate *) data;
1941
1942         /* handle incoming data on control/common channel */
1943         if (cs->inbuf->head != cs->inbuf->tail) {
1944                 gig_dbg(DEBUG_INTR, "processing new data");
1945                 cs->ops->handle_input(cs->inbuf);
1946         }
1947
1948         process_events(cs);
1949 }