1 // SPDX-License-Identifier: GPL-2.0-only 2 /* 3 * mISDNisar.c ISAR (Siemens PSB 7110) specific functions 4 * 5 * Author Karsten Keil (keil@isdn4linux.de) 6 * 7 * Copyright 2009 by Karsten Keil <keil@isdn4linux.de> 8 */ 9 10 /* define this to enable static debug messages, if you kernel supports 11 * dynamic debugging, you should use debugfs for this 12 */ 13 /* #define DEBUG */ 14 15 #include <linux/gfp.h> 16 #include <linux/delay.h> 17 #include <linux/vmalloc.h> 18 #include <linux/mISDNhw.h> 19 #include <linux/module.h> 20 #include "isar.h" 21 22 #define ISAR_REV "2.1" 23 24 MODULE_AUTHOR("Karsten Keil"); 25 MODULE_LICENSE("GPL v2"); 26 MODULE_VERSION(ISAR_REV); 27 28 #define DEBUG_HW_FIRMWARE_FIFO 0x10000 29 30 static const u8 faxmodulation[] = {3, 24, 48, 72, 73, 74, 96, 97, 98, 121, 31 122, 145, 146}; 32 #define FAXMODCNT 13 33 34 static void isar_setup(struct isar_hw *); 35 36 static inline int 37 waitforHIA(struct isar_hw *isar, int timeout) 38 { 39 int t = timeout; 40 u8 val = isar->read_reg(isar->hw, ISAR_HIA); 41 42 while ((val & 1) && t) { 43 udelay(1); 44 t--; 45 val = isar->read_reg(isar->hw, ISAR_HIA); 46 } 47 pr_debug("%s: HIA after %dus\n", isar->name, timeout - t); 48 return timeout; 49 } 50 51 /* 52 * send msg to ISAR mailbox 53 * if msg is NULL use isar->buf 54 */ 55 static int 56 send_mbox(struct isar_hw *isar, u8 his, u8 creg, u8 len, u8 *msg) 57 { 58 if (!waitforHIA(isar, 1000)) 59 return 0; 60 pr_debug("send_mbox(%02x,%02x,%d)\n", his, creg, len); 61 isar->write_reg(isar->hw, ISAR_CTRL_H, creg); 62 isar->write_reg(isar->hw, ISAR_CTRL_L, len); 63 isar->write_reg(isar->hw, ISAR_WADR, 0); 64 if (!msg) 65 msg = isar->buf; 66 if (msg && len) { 67 isar->write_fifo(isar->hw, ISAR_MBOX, msg, len); 68 if (isar->ch[0].bch.debug & DEBUG_HW_BFIFO) { 69 int l = 0; 70 71 while (l < (int)len) { 72 hex_dump_to_buffer(msg + l, len - l, 32, 1, 73 isar->log, 256, 1); 74 pr_debug("%s: %s %02x: %s\n", isar->name, 75 __func__, l, isar->log); 76 l += 32; 77 } 78 } 79 } 80 isar->write_reg(isar->hw, ISAR_HIS, his); 81 waitforHIA(isar, 1000); 82 return 1; 83 } 84 85 /* 86 * receive message from ISAR mailbox 87 * if msg is NULL use isar->buf 88 */ 89 static void 90 rcv_mbox(struct isar_hw *isar, u8 *msg) 91 { 92 if (!msg) 93 msg = isar->buf; 94 isar->write_reg(isar->hw, ISAR_RADR, 0); 95 if (msg && isar->clsb) { 96 isar->read_fifo(isar->hw, ISAR_MBOX, msg, isar->clsb); 97 if (isar->ch[0].bch.debug & DEBUG_HW_BFIFO) { 98 int l = 0; 99 100 while (l < (int)isar->clsb) { 101 hex_dump_to_buffer(msg + l, isar->clsb - l, 32, 102 1, isar->log, 256, 1); 103 pr_debug("%s: %s %02x: %s\n", isar->name, 104 __func__, l, isar->log); 105 l += 32; 106 } 107 } 108 } 109 isar->write_reg(isar->hw, ISAR_IIA, 0); 110 } 111 112 static inline void 113 get_irq_infos(struct isar_hw *isar) 114 { 115 isar->iis = isar->read_reg(isar->hw, ISAR_IIS); 116 isar->cmsb = isar->read_reg(isar->hw, ISAR_CTRL_H); 117 isar->clsb = isar->read_reg(isar->hw, ISAR_CTRL_L); 118 pr_debug("%s: rcv_mbox(%02x,%02x,%d)\n", isar->name, 119 isar->iis, isar->cmsb, isar->clsb); 120 } 121 122 /* 123 * poll answer message from ISAR mailbox 124 * should be used only with ISAR IRQs disabled before DSP was started 125 * 126 */ 127 static int 128 poll_mbox(struct isar_hw *isar, int maxdelay) 129 { 130 int t = maxdelay; 131 u8 irq; 132 133 irq = isar->read_reg(isar->hw, ISAR_IRQBIT); 134 while (t && !(irq & ISAR_IRQSTA)) { 135 udelay(1); 136 t--; 137 } 138 if (t) { 139 get_irq_infos(isar); 140 rcv_mbox(isar, NULL); 141 } 142 pr_debug("%s: pulled %d bytes after %d us\n", 143 isar->name, isar->clsb, maxdelay - t); 144 return t; 145 } 146 147 static int 148 ISARVersion(struct isar_hw *isar) 149 { 150 int ver; 151 152 /* disable ISAR IRQ */ 153 isar->write_reg(isar->hw, ISAR_IRQBIT, 0); 154 isar->buf[0] = ISAR_MSG_HWVER; 155 isar->buf[1] = 0; 156 isar->buf[2] = 1; 157 if (!send_mbox(isar, ISAR_HIS_VNR, 0, 3, NULL)) 158 return -1; 159 if (!poll_mbox(isar, 1000)) 160 return -2; 161 if (isar->iis == ISAR_IIS_VNR) { 162 if (isar->clsb == 1) { 163 ver = isar->buf[0] & 0xf; 164 return ver; 165 } 166 return -3; 167 } 168 return -4; 169 } 170 171 static int 172 load_firmware(struct isar_hw *isar, const u8 *buf, int size) 173 { 174 u32 saved_debug = isar->ch[0].bch.debug; 175 int ret, cnt; 176 u8 nom, noc; 177 u16 left, val, *sp = (u16 *)buf; 178 u8 *mp; 179 u_long flags; 180 181 struct { 182 u16 sadr; 183 u16 len; 184 u16 d_key; 185 } blk_head; 186 187 if (1 != isar->version) { 188 pr_err("%s: ISAR wrong version %d firmware download aborted\n", 189 isar->name, isar->version); 190 return -EINVAL; 191 } 192 if (!(saved_debug & DEBUG_HW_FIRMWARE_FIFO)) 193 isar->ch[0].bch.debug &= ~DEBUG_HW_BFIFO; 194 pr_debug("%s: load firmware %d words (%d bytes)\n", 195 isar->name, size / 2, size); 196 cnt = 0; 197 size /= 2; 198 /* disable ISAR IRQ */ 199 spin_lock_irqsave(isar->hwlock, flags); 200 isar->write_reg(isar->hw, ISAR_IRQBIT, 0); 201 spin_unlock_irqrestore(isar->hwlock, flags); 202 while (cnt < size) { 203 blk_head.sadr = le16_to_cpu(*sp++); 204 blk_head.len = le16_to_cpu(*sp++); 205 blk_head.d_key = le16_to_cpu(*sp++); 206 cnt += 3; 207 pr_debug("ISAR firmware block (%#x,%d,%#x)\n", 208 blk_head.sadr, blk_head.len, blk_head.d_key & 0xff); 209 left = blk_head.len; 210 if (cnt + left > size) { 211 pr_info("%s: firmware error have %d need %d words\n", 212 isar->name, size, cnt + left); 213 ret = -EINVAL; 214 goto reterrflg; 215 } 216 spin_lock_irqsave(isar->hwlock, flags); 217 if (!send_mbox(isar, ISAR_HIS_DKEY, blk_head.d_key & 0xff, 218 0, NULL)) { 219 pr_info("ISAR send_mbox dkey failed\n"); 220 ret = -ETIME; 221 goto reterror; 222 } 223 if (!poll_mbox(isar, 1000)) { 224 pr_warn("ISAR poll_mbox dkey failed\n"); 225 ret = -ETIME; 226 goto reterror; 227 } 228 spin_unlock_irqrestore(isar->hwlock, flags); 229 if ((isar->iis != ISAR_IIS_DKEY) || isar->cmsb || isar->clsb) { 230 pr_info("ISAR wrong dkey response (%x,%x,%x)\n", 231 isar->iis, isar->cmsb, isar->clsb); 232 ret = 1; 233 goto reterrflg; 234 } 235 while (left > 0) { 236 if (left > 126) 237 noc = 126; 238 else 239 noc = left; 240 nom = (2 * noc) + 3; 241 mp = isar->buf; 242 /* the ISAR is big endian */ 243 *mp++ = blk_head.sadr >> 8; 244 *mp++ = blk_head.sadr & 0xFF; 245 left -= noc; 246 cnt += noc; 247 *mp++ = noc; 248 pr_debug("%s: load %3d words at %04x\n", isar->name, 249 noc, blk_head.sadr); 250 blk_head.sadr += noc; 251 while (noc) { 252 val = le16_to_cpu(*sp++); 253 *mp++ = val >> 8; 254 *mp++ = val & 0xFF; 255 noc--; 256 } 257 spin_lock_irqsave(isar->hwlock, flags); 258 if (!send_mbox(isar, ISAR_HIS_FIRM, 0, nom, NULL)) { 259 pr_info("ISAR send_mbox prog failed\n"); 260 ret = -ETIME; 261 goto reterror; 262 } 263 if (!poll_mbox(isar, 1000)) { 264 pr_info("ISAR poll_mbox prog failed\n"); 265 ret = -ETIME; 266 goto reterror; 267 } 268 spin_unlock_irqrestore(isar->hwlock, flags); 269 if ((isar->iis != ISAR_IIS_FIRM) || 270 isar->cmsb || isar->clsb) { 271 pr_info("ISAR wrong prog response (%x,%x,%x)\n", 272 isar->iis, isar->cmsb, isar->clsb); 273 ret = -EIO; 274 goto reterrflg; 275 } 276 } 277 pr_debug("%s: ISAR firmware block %d words loaded\n", 278 isar->name, blk_head.len); 279 } 280 isar->ch[0].bch.debug = saved_debug; 281 /* 10ms delay */ 282 cnt = 10; 283 while (cnt--) 284 mdelay(1); 285 isar->buf[0] = 0xff; 286 isar->buf[1] = 0xfe; 287 isar->bstat = 0; 288 spin_lock_irqsave(isar->hwlock, flags); 289 if (!send_mbox(isar, ISAR_HIS_STDSP, 0, 2, NULL)) { 290 pr_info("ISAR send_mbox start dsp failed\n"); 291 ret = -ETIME; 292 goto reterror; 293 } 294 if (!poll_mbox(isar, 1000)) { 295 pr_info("ISAR poll_mbox start dsp failed\n"); 296 ret = -ETIME; 297 goto reterror; 298 } 299 if ((isar->iis != ISAR_IIS_STDSP) || isar->cmsb || isar->clsb) { 300 pr_info("ISAR wrong start dsp response (%x,%x,%x)\n", 301 isar->iis, isar->cmsb, isar->clsb); 302 ret = -EIO; 303 goto reterror; 304 } else 305 pr_debug("%s: ISAR start dsp success\n", isar->name); 306 307 /* NORMAL mode entered */ 308 /* Enable IRQs of ISAR */ 309 isar->write_reg(isar->hw, ISAR_IRQBIT, ISAR_IRQSTA); 310 spin_unlock_irqrestore(isar->hwlock, flags); 311 cnt = 1000; /* max 1s */ 312 while ((!isar->bstat) && cnt) { 313 mdelay(1); 314 cnt--; 315 } 316 if (!cnt) { 317 pr_info("ISAR no general status event received\n"); 318 ret = -ETIME; 319 goto reterrflg; 320 } else 321 pr_debug("%s: ISAR general status event %x\n", 322 isar->name, isar->bstat); 323 /* 10ms delay */ 324 cnt = 10; 325 while (cnt--) 326 mdelay(1); 327 isar->iis = 0; 328 spin_lock_irqsave(isar->hwlock, flags); 329 if (!send_mbox(isar, ISAR_HIS_DIAG, ISAR_CTRL_STST, 0, NULL)) { 330 pr_info("ISAR send_mbox self tst failed\n"); 331 ret = -ETIME; 332 goto reterror; 333 } 334 spin_unlock_irqrestore(isar->hwlock, flags); 335 cnt = 10000; /* max 100 ms */ 336 while ((isar->iis != ISAR_IIS_DIAG) && cnt) { 337 udelay(10); 338 cnt--; 339 } 340 mdelay(1); 341 if (!cnt) { 342 pr_info("ISAR no self tst response\n"); 343 ret = -ETIME; 344 goto reterrflg; 345 } 346 if ((isar->cmsb == ISAR_CTRL_STST) && (isar->clsb == 1) 347 && (isar->buf[0] == 0)) 348 pr_debug("%s: ISAR selftest OK\n", isar->name); 349 else { 350 pr_info("ISAR selftest not OK %x/%x/%x\n", 351 isar->cmsb, isar->clsb, isar->buf[0]); 352 ret = -EIO; 353 goto reterrflg; 354 } 355 spin_lock_irqsave(isar->hwlock, flags); 356 isar->iis = 0; 357 if (!send_mbox(isar, ISAR_HIS_DIAG, ISAR_CTRL_SWVER, 0, NULL)) { 358 pr_info("ISAR RQST SVN failed\n"); 359 ret = -ETIME; 360 goto reterror; 361 } 362 spin_unlock_irqrestore(isar->hwlock, flags); 363 cnt = 30000; /* max 300 ms */ 364 while ((isar->iis != ISAR_IIS_DIAG) && cnt) { 365 udelay(10); 366 cnt--; 367 } 368 mdelay(1); 369 if (!cnt) { 370 pr_info("ISAR no SVN response\n"); 371 ret = -ETIME; 372 goto reterrflg; 373 } else { 374 if ((isar->cmsb == ISAR_CTRL_SWVER) && (isar->clsb == 1)) { 375 pr_notice("%s: ISAR software version %#x\n", 376 isar->name, isar->buf[0]); 377 } else { 378 pr_info("%s: ISAR wrong swver response (%x,%x)" 379 " cnt(%d)\n", isar->name, isar->cmsb, 380 isar->clsb, cnt); 381 ret = -EIO; 382 goto reterrflg; 383 } 384 } 385 spin_lock_irqsave(isar->hwlock, flags); 386 isar_setup(isar); 387 spin_unlock_irqrestore(isar->hwlock, flags); 388 ret = 0; 389 reterrflg: 390 spin_lock_irqsave(isar->hwlock, flags); 391 reterror: 392 isar->ch[0].bch.debug = saved_debug; 393 if (ret) 394 /* disable ISAR IRQ */ 395 isar->write_reg(isar->hw, ISAR_IRQBIT, 0); 396 spin_unlock_irqrestore(isar->hwlock, flags); 397 return ret; 398 } 399 400 static inline void 401 deliver_status(struct isar_ch *ch, int status) 402 { 403 pr_debug("%s: HL->LL FAXIND %x\n", ch->is->name, status); 404 _queue_data(&ch->bch.ch, PH_CONTROL_IND, status, 0, NULL, GFP_ATOMIC); 405 } 406 407 static inline void 408 isar_rcv_frame(struct isar_ch *ch) 409 { 410 u8 *ptr; 411 int maxlen; 412 413 if (!ch->is->clsb) { 414 pr_debug("%s; ISAR zero len frame\n", ch->is->name); 415 ch->is->write_reg(ch->is->hw, ISAR_IIA, 0); 416 return; 417 } 418 if (test_bit(FLG_RX_OFF, &ch->bch.Flags)) { 419 ch->bch.dropcnt += ch->is->clsb; 420 ch->is->write_reg(ch->is->hw, ISAR_IIA, 0); 421 return; 422 } 423 switch (ch->bch.state) { 424 case ISDN_P_NONE: 425 pr_debug("%s: ISAR protocol 0 spurious IIS_RDATA %x/%x/%x\n", 426 ch->is->name, ch->is->iis, ch->is->cmsb, ch->is->clsb); 427 ch->is->write_reg(ch->is->hw, ISAR_IIA, 0); 428 break; 429 case ISDN_P_B_RAW: 430 case ISDN_P_B_L2DTMF: 431 case ISDN_P_B_MODEM_ASYNC: 432 maxlen = bchannel_get_rxbuf(&ch->bch, ch->is->clsb); 433 if (maxlen < 0) { 434 pr_warn("%s.B%d: No bufferspace for %d bytes\n", 435 ch->is->name, ch->bch.nr, ch->is->clsb); 436 ch->is->write_reg(ch->is->hw, ISAR_IIA, 0); 437 break; 438 } 439 rcv_mbox(ch->is, skb_put(ch->bch.rx_skb, ch->is->clsb)); 440 recv_Bchannel(&ch->bch, 0, false); 441 break; 442 case ISDN_P_B_HDLC: 443 maxlen = bchannel_get_rxbuf(&ch->bch, ch->is->clsb); 444 if (maxlen < 0) { 445 pr_warn("%s.B%d: No bufferspace for %d bytes\n", 446 ch->is->name, ch->bch.nr, ch->is->clsb); 447 ch->is->write_reg(ch->is->hw, ISAR_IIA, 0); 448 break; 449 } 450 if (ch->is->cmsb & HDLC_ERROR) { 451 pr_debug("%s: ISAR frame error %x len %d\n", 452 ch->is->name, ch->is->cmsb, ch->is->clsb); 453 #ifdef ERROR_STATISTIC 454 if (ch->is->cmsb & HDLC_ERR_RER) 455 ch->bch.err_inv++; 456 if (ch->is->cmsb & HDLC_ERR_CER) 457 ch->bch.err_crc++; 458 #endif 459 skb_trim(ch->bch.rx_skb, 0); 460 ch->is->write_reg(ch->is->hw, ISAR_IIA, 0); 461 break; 462 } 463 if (ch->is->cmsb & HDLC_FSD) 464 skb_trim(ch->bch.rx_skb, 0); 465 ptr = skb_put(ch->bch.rx_skb, ch->is->clsb); 466 rcv_mbox(ch->is, ptr); 467 if (ch->is->cmsb & HDLC_FED) { 468 if (ch->bch.rx_skb->len < 3) { /* last 2 are the FCS */ 469 pr_debug("%s: ISAR frame to short %d\n", 470 ch->is->name, ch->bch.rx_skb->len); 471 skb_trim(ch->bch.rx_skb, 0); 472 break; 473 } 474 skb_trim(ch->bch.rx_skb, ch->bch.rx_skb->len - 2); 475 recv_Bchannel(&ch->bch, 0, false); 476 } 477 break; 478 case ISDN_P_B_T30_FAX: 479 if (ch->state != STFAX_ACTIV) { 480 pr_debug("%s: isar_rcv_frame: not ACTIV\n", 481 ch->is->name); 482 ch->is->write_reg(ch->is->hw, ISAR_IIA, 0); 483 if (ch->bch.rx_skb) 484 skb_trim(ch->bch.rx_skb, 0); 485 break; 486 } 487 if (!ch->bch.rx_skb) { 488 ch->bch.rx_skb = mI_alloc_skb(ch->bch.maxlen, 489 GFP_ATOMIC); 490 if (unlikely(!ch->bch.rx_skb)) { 491 pr_info("%s: B receive out of memory\n", 492 __func__); 493 ch->is->write_reg(ch->is->hw, ISAR_IIA, 0); 494 break; 495 } 496 } 497 if (ch->cmd == PCTRL_CMD_FRM) { 498 rcv_mbox(ch->is, skb_put(ch->bch.rx_skb, ch->is->clsb)); 499 pr_debug("%s: isar_rcv_frame: %d\n", 500 ch->is->name, ch->bch.rx_skb->len); 501 if (ch->is->cmsb & SART_NMD) { /* ABORT */ 502 pr_debug("%s: isar_rcv_frame: no more data\n", 503 ch->is->name); 504 ch->is->write_reg(ch->is->hw, ISAR_IIA, 0); 505 send_mbox(ch->is, SET_DPS(ch->dpath) | 506 ISAR_HIS_PUMPCTRL, PCTRL_CMD_ESC, 507 0, NULL); 508 ch->state = STFAX_ESCAPE; 509 /* set_skb_flag(skb, DF_NOMOREDATA); */ 510 } 511 recv_Bchannel(&ch->bch, 0, false); 512 if (ch->is->cmsb & SART_NMD) 513 deliver_status(ch, HW_MOD_NOCARR); 514 break; 515 } 516 if (ch->cmd != PCTRL_CMD_FRH) { 517 pr_debug("%s: isar_rcv_frame: unknown fax mode %x\n", 518 ch->is->name, ch->cmd); 519 ch->is->write_reg(ch->is->hw, ISAR_IIA, 0); 520 if (ch->bch.rx_skb) 521 skb_trim(ch->bch.rx_skb, 0); 522 break; 523 } 524 /* PCTRL_CMD_FRH */ 525 if ((ch->bch.rx_skb->len + ch->is->clsb) > 526 (ch->bch.maxlen + 2)) { 527 pr_info("%s: %s incoming packet too large\n", 528 ch->is->name, __func__); 529 ch->is->write_reg(ch->is->hw, ISAR_IIA, 0); 530 skb_trim(ch->bch.rx_skb, 0); 531 break; 532 } else if (ch->is->cmsb & HDLC_ERROR) { 533 pr_info("%s: ISAR frame error %x len %d\n", 534 ch->is->name, ch->is->cmsb, ch->is->clsb); 535 skb_trim(ch->bch.rx_skb, 0); 536 ch->is->write_reg(ch->is->hw, ISAR_IIA, 0); 537 break; 538 } 539 if (ch->is->cmsb & HDLC_FSD) 540 skb_trim(ch->bch.rx_skb, 0); 541 ptr = skb_put(ch->bch.rx_skb, ch->is->clsb); 542 rcv_mbox(ch->is, ptr); 543 if (ch->is->cmsb & HDLC_FED) { 544 if (ch->bch.rx_skb->len < 3) { /* last 2 are the FCS */ 545 pr_info("%s: ISAR frame to short %d\n", 546 ch->is->name, ch->bch.rx_skb->len); 547 skb_trim(ch->bch.rx_skb, 0); 548 break; 549 } 550 skb_trim(ch->bch.rx_skb, ch->bch.rx_skb->len - 2); 551 recv_Bchannel(&ch->bch, 0, false); 552 } 553 if (ch->is->cmsb & SART_NMD) { /* ABORT */ 554 pr_debug("%s: isar_rcv_frame: no more data\n", 555 ch->is->name); 556 ch->is->write_reg(ch->is->hw, ISAR_IIA, 0); 557 if (ch->bch.rx_skb) 558 skb_trim(ch->bch.rx_skb, 0); 559 send_mbox(ch->is, SET_DPS(ch->dpath) | 560 ISAR_HIS_PUMPCTRL, PCTRL_CMD_ESC, 0, NULL); 561 ch->state = STFAX_ESCAPE; 562 deliver_status(ch, HW_MOD_NOCARR); 563 } 564 break; 565 default: 566 pr_info("isar_rcv_frame protocol (%x)error\n", ch->bch.state); 567 ch->is->write_reg(ch->is->hw, ISAR_IIA, 0); 568 break; 569 } 570 } 571 572 static void 573 isar_fill_fifo(struct isar_ch *ch) 574 { 575 int count; 576 u8 msb; 577 u8 *ptr; 578 579 pr_debug("%s: ch%d tx_skb %d tx_idx %d\n", ch->is->name, ch->bch.nr, 580 ch->bch.tx_skb ? ch->bch.tx_skb->len : -1, ch->bch.tx_idx); 581 if (!(ch->is->bstat & 582 (ch->dpath == 1 ? BSTAT_RDM1 : BSTAT_RDM2))) 583 return; 584 if (!ch->bch.tx_skb) { 585 if (!test_bit(FLG_TX_EMPTY, &ch->bch.Flags) || 586 (ch->bch.state != ISDN_P_B_RAW)) 587 return; 588 count = ch->mml; 589 /* use the card buffer */ 590 memset(ch->is->buf, ch->bch.fill[0], count); 591 send_mbox(ch->is, SET_DPS(ch->dpath) | ISAR_HIS_SDATA, 592 0, count, ch->is->buf); 593 return; 594 } 595 count = ch->bch.tx_skb->len - ch->bch.tx_idx; 596 if (count <= 0) 597 return; 598 if (count > ch->mml) { 599 msb = 0; 600 count = ch->mml; 601 } else { 602 msb = HDLC_FED; 603 } 604 ptr = ch->bch.tx_skb->data + ch->bch.tx_idx; 605 if (!ch->bch.tx_idx) { 606 pr_debug("%s: frame start\n", ch->is->name); 607 if ((ch->bch.state == ISDN_P_B_T30_FAX) && 608 (ch->cmd == PCTRL_CMD_FTH)) { 609 if (count > 1) { 610 if ((ptr[0] == 0xff) && (ptr[1] == 0x13)) { 611 /* last frame */ 612 test_and_set_bit(FLG_LASTDATA, 613 &ch->bch.Flags); 614 pr_debug("%s: set LASTDATA\n", 615 ch->is->name); 616 if (msb == HDLC_FED) 617 test_and_set_bit(FLG_DLEETX, 618 &ch->bch.Flags); 619 } 620 } 621 } 622 msb |= HDLC_FST; 623 } 624 ch->bch.tx_idx += count; 625 switch (ch->bch.state) { 626 case ISDN_P_NONE: 627 pr_info("%s: wrong protocol 0\n", __func__); 628 break; 629 case ISDN_P_B_RAW: 630 case ISDN_P_B_L2DTMF: 631 case ISDN_P_B_MODEM_ASYNC: 632 send_mbox(ch->is, SET_DPS(ch->dpath) | ISAR_HIS_SDATA, 633 0, count, ptr); 634 break; 635 case ISDN_P_B_HDLC: 636 send_mbox(ch->is, SET_DPS(ch->dpath) | ISAR_HIS_SDATA, 637 msb, count, ptr); 638 break; 639 case ISDN_P_B_T30_FAX: 640 if (ch->state != STFAX_ACTIV) 641 pr_debug("%s: not ACTIV\n", ch->is->name); 642 else if (ch->cmd == PCTRL_CMD_FTH) 643 send_mbox(ch->is, SET_DPS(ch->dpath) | ISAR_HIS_SDATA, 644 msb, count, ptr); 645 else if (ch->cmd == PCTRL_CMD_FTM) 646 send_mbox(ch->is, SET_DPS(ch->dpath) | ISAR_HIS_SDATA, 647 0, count, ptr); 648 else 649 pr_debug("%s: not FTH/FTM\n", ch->is->name); 650 break; 651 default: 652 pr_info("%s: protocol(%x) error\n", 653 __func__, ch->bch.state); 654 break; 655 } 656 } 657 658 static inline struct isar_ch * 659 sel_bch_isar(struct isar_hw *isar, u8 dpath) 660 { 661 struct isar_ch *base = &isar->ch[0]; 662 663 if ((!dpath) || (dpath > 2)) 664 return NULL; 665 if (base->dpath == dpath) 666 return base; 667 base++; 668 if (base->dpath == dpath) 669 return base; 670 return NULL; 671 } 672 673 static void 674 send_next(struct isar_ch *ch) 675 { 676 pr_debug("%s: %s ch%d tx_skb %d tx_idx %d\n", ch->is->name, __func__, 677 ch->bch.nr, ch->bch.tx_skb ? ch->bch.tx_skb->len : -1, 678 ch->bch.tx_idx); 679 if (ch->bch.state == ISDN_P_B_T30_FAX) { 680 if (ch->cmd == PCTRL_CMD_FTH) { 681 if (test_bit(FLG_LASTDATA, &ch->bch.Flags)) { 682 pr_debug("set NMD_DATA\n"); 683 test_and_set_bit(FLG_NMD_DATA, &ch->bch.Flags); 684 } 685 } else if (ch->cmd == PCTRL_CMD_FTM) { 686 if (test_bit(FLG_DLEETX, &ch->bch.Flags)) { 687 test_and_set_bit(FLG_LASTDATA, &ch->bch.Flags); 688 test_and_set_bit(FLG_NMD_DATA, &ch->bch.Flags); 689 } 690 } 691 } 692 dev_kfree_skb(ch->bch.tx_skb); 693 if (get_next_bframe(&ch->bch)) { 694 isar_fill_fifo(ch); 695 test_and_clear_bit(FLG_TX_EMPTY, &ch->bch.Flags); 696 } else if (test_bit(FLG_TX_EMPTY, &ch->bch.Flags)) { 697 isar_fill_fifo(ch); 698 } else { 699 if (test_and_clear_bit(FLG_DLEETX, &ch->bch.Flags)) { 700 if (test_and_clear_bit(FLG_LASTDATA, 701 &ch->bch.Flags)) { 702 if (test_and_clear_bit(FLG_NMD_DATA, 703 &ch->bch.Flags)) { 704 u8 zd = 0; 705 send_mbox(ch->is, SET_DPS(ch->dpath) | 706 ISAR_HIS_SDATA, 0x01, 1, &zd); 707 } 708 test_and_set_bit(FLG_LL_OK, &ch->bch.Flags); 709 } else { 710 deliver_status(ch, HW_MOD_CONNECT); 711 } 712 } else if (test_bit(FLG_FILLEMPTY, &ch->bch.Flags)) { 713 test_and_set_bit(FLG_TX_EMPTY, &ch->bch.Flags); 714 } 715 } 716 } 717 718 static void 719 check_send(struct isar_hw *isar, u8 rdm) 720 { 721 struct isar_ch *ch; 722 723 pr_debug("%s: rdm %x\n", isar->name, rdm); 724 if (rdm & BSTAT_RDM1) { 725 ch = sel_bch_isar(isar, 1); 726 if (ch && test_bit(FLG_ACTIVE, &ch->bch.Flags)) { 727 if (ch->bch.tx_skb && (ch->bch.tx_skb->len > 728 ch->bch.tx_idx)) 729 isar_fill_fifo(ch); 730 else 731 send_next(ch); 732 } 733 } 734 if (rdm & BSTAT_RDM2) { 735 ch = sel_bch_isar(isar, 2); 736 if (ch && test_bit(FLG_ACTIVE, &ch->bch.Flags)) { 737 if (ch->bch.tx_skb && (ch->bch.tx_skb->len > 738 ch->bch.tx_idx)) 739 isar_fill_fifo(ch); 740 else 741 send_next(ch); 742 } 743 } 744 } 745 746 const char *dmril[] = {"NO SPEED", "1200/75", "NODEF2", "75/1200", "NODEF4", 747 "300", "600", "1200", "2400", "4800", "7200", 748 "9600nt", "9600t", "12000", "14400", "WRONG"}; 749 const char *dmrim[] = {"NO MOD", "NO DEF", "V32/V32b", "V22", "V21", 750 "Bell103", "V23", "Bell202", "V17", "V29", "V27ter"}; 751 752 static void 753 isar_pump_status_rsp(struct isar_ch *ch) { 754 u8 ril = ch->is->buf[0]; 755 u8 rim; 756 757 if (!test_and_clear_bit(ISAR_RATE_REQ, &ch->is->Flags)) 758 return; 759 if (ril > 14) { 760 pr_info("%s: wrong pstrsp ril=%d\n", ch->is->name, ril); 761 ril = 15; 762 } 763 switch (ch->is->buf[1]) { 764 case 0: 765 rim = 0; 766 break; 767 case 0x20: 768 rim = 2; 769 break; 770 case 0x40: 771 rim = 3; 772 break; 773 case 0x41: 774 rim = 4; 775 break; 776 case 0x51: 777 rim = 5; 778 break; 779 case 0x61: 780 rim = 6; 781 break; 782 case 0x71: 783 rim = 7; 784 break; 785 case 0x82: 786 rim = 8; 787 break; 788 case 0x92: 789 rim = 9; 790 break; 791 case 0xa2: 792 rim = 10; 793 break; 794 default: 795 rim = 1; 796 break; 797 } 798 sprintf(ch->conmsg, "%s %s", dmril[ril], dmrim[rim]); 799 pr_debug("%s: pump strsp %s\n", ch->is->name, ch->conmsg); 800 } 801 802 static void 803 isar_pump_statev_modem(struct isar_ch *ch, u8 devt) { 804 u8 dps = SET_DPS(ch->dpath); 805 806 switch (devt) { 807 case PSEV_10MS_TIMER: 808 pr_debug("%s: pump stev TIMER\n", ch->is->name); 809 break; 810 case PSEV_CON_ON: 811 pr_debug("%s: pump stev CONNECT\n", ch->is->name); 812 deliver_status(ch, HW_MOD_CONNECT); 813 break; 814 case PSEV_CON_OFF: 815 pr_debug("%s: pump stev NO CONNECT\n", ch->is->name); 816 send_mbox(ch->is, dps | ISAR_HIS_PSTREQ, 0, 0, NULL); 817 deliver_status(ch, HW_MOD_NOCARR); 818 break; 819 case PSEV_V24_OFF: 820 pr_debug("%s: pump stev V24 OFF\n", ch->is->name); 821 break; 822 case PSEV_CTS_ON: 823 pr_debug("%s: pump stev CTS ON\n", ch->is->name); 824 break; 825 case PSEV_CTS_OFF: 826 pr_debug("%s pump stev CTS OFF\n", ch->is->name); 827 break; 828 case PSEV_DCD_ON: 829 pr_debug("%s: pump stev CARRIER ON\n", ch->is->name); 830 test_and_set_bit(ISAR_RATE_REQ, &ch->is->Flags); 831 send_mbox(ch->is, dps | ISAR_HIS_PSTREQ, 0, 0, NULL); 832 break; 833 case PSEV_DCD_OFF: 834 pr_debug("%s: pump stev CARRIER OFF\n", ch->is->name); 835 break; 836 case PSEV_DSR_ON: 837 pr_debug("%s: pump stev DSR ON\n", ch->is->name); 838 break; 839 case PSEV_DSR_OFF: 840 pr_debug("%s: pump stev DSR_OFF\n", ch->is->name); 841 break; 842 case PSEV_REM_RET: 843 pr_debug("%s: pump stev REMOTE RETRAIN\n", ch->is->name); 844 break; 845 case PSEV_REM_REN: 846 pr_debug("%s: pump stev REMOTE RENEGOTIATE\n", ch->is->name); 847 break; 848 case PSEV_GSTN_CLR: 849 pr_debug("%s: pump stev GSTN CLEAR\n", ch->is->name); 850 break; 851 default: 852 pr_info("u%s: unknown pump stev %x\n", ch->is->name, devt); 853 break; 854 } 855 } 856 857 static void 858 isar_pump_statev_fax(struct isar_ch *ch, u8 devt) { 859 u8 dps = SET_DPS(ch->dpath); 860 u8 p1; 861 862 switch (devt) { 863 case PSEV_10MS_TIMER: 864 pr_debug("%s: pump stev TIMER\n", ch->is->name); 865 break; 866 case PSEV_RSP_READY: 867 pr_debug("%s: pump stev RSP_READY\n", ch->is->name); 868 ch->state = STFAX_READY; 869 deliver_status(ch, HW_MOD_READY); 870 #ifdef AUTOCON 871 if (test_bit(BC_FLG_ORIG, &ch->bch.Flags)) 872 isar_pump_cmd(bch, HW_MOD_FRH, 3); 873 else 874 isar_pump_cmd(bch, HW_MOD_FTH, 3); 875 #endif 876 break; 877 case PSEV_LINE_TX_H: 878 if (ch->state == STFAX_LINE) { 879 pr_debug("%s: pump stev LINE_TX_H\n", ch->is->name); 880 ch->state = STFAX_CONT; 881 send_mbox(ch->is, dps | ISAR_HIS_PUMPCTRL, 882 PCTRL_CMD_CONT, 0, NULL); 883 } else { 884 pr_debug("%s: pump stev LINE_TX_H wrong st %x\n", 885 ch->is->name, ch->state); 886 } 887 break; 888 case PSEV_LINE_RX_H: 889 if (ch->state == STFAX_LINE) { 890 pr_debug("%s: pump stev LINE_RX_H\n", ch->is->name); 891 ch->state = STFAX_CONT; 892 send_mbox(ch->is, dps | ISAR_HIS_PUMPCTRL, 893 PCTRL_CMD_CONT, 0, NULL); 894 } else { 895 pr_debug("%s: pump stev LINE_RX_H wrong st %x\n", 896 ch->is->name, ch->state); 897 } 898 break; 899 case PSEV_LINE_TX_B: 900 if (ch->state == STFAX_LINE) { 901 pr_debug("%s: pump stev LINE_TX_B\n", ch->is->name); 902 ch->state = STFAX_CONT; 903 send_mbox(ch->is, dps | ISAR_HIS_PUMPCTRL, 904 PCTRL_CMD_CONT, 0, NULL); 905 } else { 906 pr_debug("%s: pump stev LINE_TX_B wrong st %x\n", 907 ch->is->name, ch->state); 908 } 909 break; 910 case PSEV_LINE_RX_B: 911 if (ch->state == STFAX_LINE) { 912 pr_debug("%s: pump stev LINE_RX_B\n", ch->is->name); 913 ch->state = STFAX_CONT; 914 send_mbox(ch->is, dps | ISAR_HIS_PUMPCTRL, 915 PCTRL_CMD_CONT, 0, NULL); 916 } else { 917 pr_debug("%s: pump stev LINE_RX_B wrong st %x\n", 918 ch->is->name, ch->state); 919 } 920 break; 921 case PSEV_RSP_CONN: 922 if (ch->state == STFAX_CONT) { 923 pr_debug("%s: pump stev RSP_CONN\n", ch->is->name); 924 ch->state = STFAX_ACTIV; 925 test_and_set_bit(ISAR_RATE_REQ, &ch->is->Flags); 926 send_mbox(ch->is, dps | ISAR_HIS_PSTREQ, 0, 0, NULL); 927 if (ch->cmd == PCTRL_CMD_FTH) { 928 int delay = (ch->mod == 3) ? 1000 : 200; 929 /* 1s (200 ms) Flags before data */ 930 if (test_and_set_bit(FLG_FTI_RUN, 931 &ch->bch.Flags)) 932 del_timer(&ch->ftimer); 933 ch->ftimer.expires = 934 jiffies + ((delay * HZ) / 1000); 935 test_and_set_bit(FLG_LL_CONN, 936 &ch->bch.Flags); 937 add_timer(&ch->ftimer); 938 } else { 939 deliver_status(ch, HW_MOD_CONNECT); 940 } 941 } else { 942 pr_debug("%s: pump stev RSP_CONN wrong st %x\n", 943 ch->is->name, ch->state); 944 } 945 break; 946 case PSEV_FLAGS_DET: 947 pr_debug("%s: pump stev FLAGS_DET\n", ch->is->name); 948 break; 949 case PSEV_RSP_DISC: 950 pr_debug("%s: pump stev RSP_DISC state(%d)\n", 951 ch->is->name, ch->state); 952 if (ch->state == STFAX_ESCAPE) { 953 p1 = 5; 954 switch (ch->newcmd) { 955 case 0: 956 ch->state = STFAX_READY; 957 break; 958 case PCTRL_CMD_FTM: 959 p1 = 2; 960 /* fall through */ 961 case PCTRL_CMD_FTH: 962 send_mbox(ch->is, dps | ISAR_HIS_PUMPCTRL, 963 PCTRL_CMD_SILON, 1, &p1); 964 ch->state = STFAX_SILDET; 965 break; 966 case PCTRL_CMD_FRH: 967 case PCTRL_CMD_FRM: 968 ch->mod = ch->newmod; 969 p1 = ch->newmod; 970 ch->newmod = 0; 971 ch->cmd = ch->newcmd; 972 ch->newcmd = 0; 973 send_mbox(ch->is, dps | ISAR_HIS_PUMPCTRL, 974 ch->cmd, 1, &p1); 975 ch->state = STFAX_LINE; 976 ch->try_mod = 3; 977 break; 978 default: 979 pr_debug("%s: RSP_DISC unknown newcmd %x\n", 980 ch->is->name, ch->newcmd); 981 break; 982 } 983 } else if (ch->state == STFAX_ACTIV) { 984 if (test_and_clear_bit(FLG_LL_OK, &ch->bch.Flags)) 985 deliver_status(ch, HW_MOD_OK); 986 else if (ch->cmd == PCTRL_CMD_FRM) 987 deliver_status(ch, HW_MOD_NOCARR); 988 else 989 deliver_status(ch, HW_MOD_FCERROR); 990 ch->state = STFAX_READY; 991 } else if (ch->state != STFAX_SILDET) { 992 /* ignore in STFAX_SILDET */ 993 ch->state = STFAX_READY; 994 deliver_status(ch, HW_MOD_FCERROR); 995 } 996 break; 997 case PSEV_RSP_SILDET: 998 pr_debug("%s: pump stev RSP_SILDET\n", ch->is->name); 999 if (ch->state == STFAX_SILDET) { 1000 ch->mod = ch->newmod; 1001 p1 = ch->newmod; 1002 ch->newmod = 0; 1003 ch->cmd = ch->newcmd; 1004 ch->newcmd = 0; 1005 send_mbox(ch->is, dps | ISAR_HIS_PUMPCTRL, 1006 ch->cmd, 1, &p1); 1007 ch->state = STFAX_LINE; 1008 ch->try_mod = 3; 1009 } 1010 break; 1011 case PSEV_RSP_SILOFF: 1012 pr_debug("%s: pump stev RSP_SILOFF\n", ch->is->name); 1013 break; 1014 case PSEV_RSP_FCERR: 1015 if (ch->state == STFAX_LINE) { 1016 pr_debug("%s: pump stev RSP_FCERR try %d\n", 1017 ch->is->name, ch->try_mod); 1018 if (ch->try_mod--) { 1019 send_mbox(ch->is, dps | ISAR_HIS_PUMPCTRL, 1020 ch->cmd, 1, &ch->mod); 1021 break; 1022 } 1023 } 1024 pr_debug("%s: pump stev RSP_FCERR\n", ch->is->name); 1025 ch->state = STFAX_ESCAPE; 1026 send_mbox(ch->is, dps | ISAR_HIS_PUMPCTRL, PCTRL_CMD_ESC, 1027 0, NULL); 1028 deliver_status(ch, HW_MOD_FCERROR); 1029 break; 1030 default: 1031 break; 1032 } 1033 } 1034 1035 void 1036 mISDNisar_irq(struct isar_hw *isar) 1037 { 1038 struct isar_ch *ch; 1039 1040 get_irq_infos(isar); 1041 switch (isar->iis & ISAR_IIS_MSCMSD) { 1042 case ISAR_IIS_RDATA: 1043 ch = sel_bch_isar(isar, isar->iis >> 6); 1044 if (ch) 1045 isar_rcv_frame(ch); 1046 else { 1047 pr_debug("%s: ISAR spurious IIS_RDATA %x/%x/%x\n", 1048 isar->name, isar->iis, isar->cmsb, 1049 isar->clsb); 1050 isar->write_reg(isar->hw, ISAR_IIA, 0); 1051 } 1052 break; 1053 case ISAR_IIS_GSTEV: 1054 isar->write_reg(isar->hw, ISAR_IIA, 0); 1055 isar->bstat |= isar->cmsb; 1056 check_send(isar, isar->cmsb); 1057 break; 1058 case ISAR_IIS_BSTEV: 1059 #ifdef ERROR_STATISTIC 1060 ch = sel_bch_isar(isar, isar->iis >> 6); 1061 if (ch) { 1062 if (isar->cmsb == BSTEV_TBO) 1063 ch->bch.err_tx++; 1064 if (isar->cmsb == BSTEV_RBO) 1065 ch->bch.err_rdo++; 1066 } 1067 #endif 1068 pr_debug("%s: Buffer STEV dpath%d msb(%x)\n", 1069 isar->name, isar->iis >> 6, isar->cmsb); 1070 isar->write_reg(isar->hw, ISAR_IIA, 0); 1071 break; 1072 case ISAR_IIS_PSTEV: 1073 ch = sel_bch_isar(isar, isar->iis >> 6); 1074 if (ch) { 1075 rcv_mbox(isar, NULL); 1076 if (ch->bch.state == ISDN_P_B_MODEM_ASYNC) 1077 isar_pump_statev_modem(ch, isar->cmsb); 1078 else if (ch->bch.state == ISDN_P_B_T30_FAX) 1079 isar_pump_statev_fax(ch, isar->cmsb); 1080 else if (ch->bch.state == ISDN_P_B_RAW) { 1081 int tt; 1082 tt = isar->cmsb | 0x30; 1083 if (tt == 0x3e) 1084 tt = '*'; 1085 else if (tt == 0x3f) 1086 tt = '#'; 1087 else if (tt > '9') 1088 tt += 7; 1089 tt |= DTMF_TONE_VAL; 1090 _queue_data(&ch->bch.ch, PH_CONTROL_IND, 1091 MISDN_ID_ANY, sizeof(tt), &tt, 1092 GFP_ATOMIC); 1093 } else 1094 pr_debug("%s: ISAR IIS_PSTEV pm %d sta %x\n", 1095 isar->name, ch->bch.state, 1096 isar->cmsb); 1097 } else { 1098 pr_debug("%s: ISAR spurious IIS_PSTEV %x/%x/%x\n", 1099 isar->name, isar->iis, isar->cmsb, 1100 isar->clsb); 1101 isar->write_reg(isar->hw, ISAR_IIA, 0); 1102 } 1103 break; 1104 case ISAR_IIS_PSTRSP: 1105 ch = sel_bch_isar(isar, isar->iis >> 6); 1106 if (ch) { 1107 rcv_mbox(isar, NULL); 1108 isar_pump_status_rsp(ch); 1109 } else { 1110 pr_debug("%s: ISAR spurious IIS_PSTRSP %x/%x/%x\n", 1111 isar->name, isar->iis, isar->cmsb, 1112 isar->clsb); 1113 isar->write_reg(isar->hw, ISAR_IIA, 0); 1114 } 1115 break; 1116 case ISAR_IIS_DIAG: 1117 case ISAR_IIS_BSTRSP: 1118 case ISAR_IIS_IOM2RSP: 1119 rcv_mbox(isar, NULL); 1120 break; 1121 case ISAR_IIS_INVMSG: 1122 rcv_mbox(isar, NULL); 1123 pr_debug("%s: invalid msg his:%x\n", isar->name, isar->cmsb); 1124 break; 1125 default: 1126 rcv_mbox(isar, NULL); 1127 pr_debug("%s: unhandled msg iis(%x) ctrl(%x/%x)\n", 1128 isar->name, isar->iis, isar->cmsb, isar->clsb); 1129 break; 1130 } 1131 } 1132 EXPORT_SYMBOL(mISDNisar_irq); 1133 1134 static void 1135 ftimer_handler(struct timer_list *t) 1136 { 1137 struct isar_ch *ch = from_timer(ch, t, ftimer); 1138 1139 pr_debug("%s: ftimer flags %lx\n", ch->is->name, ch->bch.Flags); 1140 test_and_clear_bit(FLG_FTI_RUN, &ch->bch.Flags); 1141 if (test_and_clear_bit(FLG_LL_CONN, &ch->bch.Flags)) 1142 deliver_status(ch, HW_MOD_CONNECT); 1143 } 1144 1145 static void 1146 setup_pump(struct isar_ch *ch) { 1147 u8 dps = SET_DPS(ch->dpath); 1148 u8 ctrl, param[6]; 1149 1150 switch (ch->bch.state) { 1151 case ISDN_P_NONE: 1152 case ISDN_P_B_RAW: 1153 case ISDN_P_B_HDLC: 1154 send_mbox(ch->is, dps | ISAR_HIS_PUMPCFG, PMOD_BYPASS, 0, NULL); 1155 break; 1156 case ISDN_P_B_L2DTMF: 1157 if (test_bit(FLG_DTMFSEND, &ch->bch.Flags)) { 1158 param[0] = 5; /* TOA 5 db */ 1159 send_mbox(ch->is, dps | ISAR_HIS_PUMPCFG, 1160 PMOD_DTMF_TRANS, 1, param); 1161 } else { 1162 param[0] = 40; /* REL -46 dbm */ 1163 send_mbox(ch->is, dps | ISAR_HIS_PUMPCFG, 1164 PMOD_DTMF, 1, param); 1165 } 1166 /* fall through */ 1167 case ISDN_P_B_MODEM_ASYNC: 1168 ctrl = PMOD_DATAMODEM; 1169 if (test_bit(FLG_ORIGIN, &ch->bch.Flags)) { 1170 ctrl |= PCTRL_ORIG; 1171 param[5] = PV32P6_CTN; 1172 } else { 1173 param[5] = PV32P6_ATN; 1174 } 1175 param[0] = 6; /* 6 db */ 1176 param[1] = PV32P2_V23R | PV32P2_V22A | PV32P2_V22B | 1177 PV32P2_V22C | PV32P2_V21 | PV32P2_BEL; 1178 param[2] = PV32P3_AMOD | PV32P3_V32B | PV32P3_V23B; 1179 param[3] = PV32P4_UT144; 1180 param[4] = PV32P5_UT144; 1181 send_mbox(ch->is, dps | ISAR_HIS_PUMPCFG, ctrl, 6, param); 1182 break; 1183 case ISDN_P_B_T30_FAX: 1184 ctrl = PMOD_FAX; 1185 if (test_bit(FLG_ORIGIN, &ch->bch.Flags)) { 1186 ctrl |= PCTRL_ORIG; 1187 param[1] = PFAXP2_CTN; 1188 } else { 1189 param[1] = PFAXP2_ATN; 1190 } 1191 param[0] = 6; /* 6 db */ 1192 send_mbox(ch->is, dps | ISAR_HIS_PUMPCFG, ctrl, 2, param); 1193 ch->state = STFAX_NULL; 1194 ch->newcmd = 0; 1195 ch->newmod = 0; 1196 test_and_set_bit(FLG_FTI_RUN, &ch->bch.Flags); 1197 break; 1198 } 1199 udelay(1000); 1200 send_mbox(ch->is, dps | ISAR_HIS_PSTREQ, 0, 0, NULL); 1201 udelay(1000); 1202 } 1203 1204 static void 1205 setup_sart(struct isar_ch *ch) { 1206 u8 dps = SET_DPS(ch->dpath); 1207 u8 ctrl, param[2] = {0, 0}; 1208 1209 switch (ch->bch.state) { 1210 case ISDN_P_NONE: 1211 send_mbox(ch->is, dps | ISAR_HIS_SARTCFG, SMODE_DISABLE, 1212 0, NULL); 1213 break; 1214 case ISDN_P_B_RAW: 1215 case ISDN_P_B_L2DTMF: 1216 send_mbox(ch->is, dps | ISAR_HIS_SARTCFG, SMODE_BINARY, 1217 2, param); 1218 break; 1219 case ISDN_P_B_HDLC: 1220 case ISDN_P_B_T30_FAX: 1221 send_mbox(ch->is, dps | ISAR_HIS_SARTCFG, SMODE_HDLC, 1222 1, param); 1223 break; 1224 case ISDN_P_B_MODEM_ASYNC: 1225 ctrl = SMODE_V14 | SCTRL_HDMC_BOTH; 1226 param[0] = S_P1_CHS_8; 1227 param[1] = S_P2_BFT_DEF; 1228 send_mbox(ch->is, dps | ISAR_HIS_SARTCFG, ctrl, 2, param); 1229 break; 1230 } 1231 udelay(1000); 1232 send_mbox(ch->is, dps | ISAR_HIS_BSTREQ, 0, 0, NULL); 1233 udelay(1000); 1234 } 1235 1236 static void 1237 setup_iom2(struct isar_ch *ch) { 1238 u8 dps = SET_DPS(ch->dpath); 1239 u8 cmsb = IOM_CTRL_ENA, msg[5] = {IOM_P1_TXD, 0, 0, 0, 0}; 1240 1241 if (ch->bch.nr == 2) { 1242 msg[1] = 1; 1243 msg[3] = 1; 1244 } 1245 switch (ch->bch.state) { 1246 case ISDN_P_NONE: 1247 cmsb = 0; 1248 /* dummy slot */ 1249 msg[1] = ch->dpath + 2; 1250 msg[3] = ch->dpath + 2; 1251 break; 1252 case ISDN_P_B_RAW: 1253 case ISDN_P_B_HDLC: 1254 break; 1255 case ISDN_P_B_MODEM_ASYNC: 1256 case ISDN_P_B_T30_FAX: 1257 cmsb |= IOM_CTRL_RCV; 1258 /* fall through */ 1259 case ISDN_P_B_L2DTMF: 1260 if (test_bit(FLG_DTMFSEND, &ch->bch.Flags)) 1261 cmsb |= IOM_CTRL_RCV; 1262 cmsb |= IOM_CTRL_ALAW; 1263 break; 1264 } 1265 send_mbox(ch->is, dps | ISAR_HIS_IOM2CFG, cmsb, 5, msg); 1266 udelay(1000); 1267 send_mbox(ch->is, dps | ISAR_HIS_IOM2REQ, 0, 0, NULL); 1268 udelay(1000); 1269 } 1270 1271 static int 1272 modeisar(struct isar_ch *ch, u32 bprotocol) 1273 { 1274 /* Here we are selecting the best datapath for requested protocol */ 1275 if (ch->bch.state == ISDN_P_NONE) { /* New Setup */ 1276 switch (bprotocol) { 1277 case ISDN_P_NONE: /* init */ 1278 if (!ch->dpath) 1279 /* no init for dpath 0 */ 1280 return 0; 1281 test_and_clear_bit(FLG_HDLC, &ch->bch.Flags); 1282 test_and_clear_bit(FLG_TRANSPARENT, &ch->bch.Flags); 1283 break; 1284 case ISDN_P_B_RAW: 1285 case ISDN_P_B_HDLC: 1286 /* best is datapath 2 */ 1287 if (!test_and_set_bit(ISAR_DP2_USE, &ch->is->Flags)) 1288 ch->dpath = 2; 1289 else if (!test_and_set_bit(ISAR_DP1_USE, 1290 &ch->is->Flags)) 1291 ch->dpath = 1; 1292 else { 1293 pr_info("modeisar both paths in use\n"); 1294 return -EBUSY; 1295 } 1296 if (bprotocol == ISDN_P_B_HDLC) 1297 test_and_set_bit(FLG_HDLC, &ch->bch.Flags); 1298 else 1299 test_and_set_bit(FLG_TRANSPARENT, 1300 &ch->bch.Flags); 1301 break; 1302 case ISDN_P_B_MODEM_ASYNC: 1303 case ISDN_P_B_T30_FAX: 1304 case ISDN_P_B_L2DTMF: 1305 /* only datapath 1 */ 1306 if (!test_and_set_bit(ISAR_DP1_USE, &ch->is->Flags)) 1307 ch->dpath = 1; 1308 else { 1309 pr_info("%s: ISAR modeisar analog functions" 1310 "only with DP1\n", ch->is->name); 1311 return -EBUSY; 1312 } 1313 break; 1314 default: 1315 pr_info("%s: protocol not known %x\n", ch->is->name, 1316 bprotocol); 1317 return -ENOPROTOOPT; 1318 } 1319 } 1320 pr_debug("%s: ISAR ch%d dp%d protocol %x->%x\n", ch->is->name, 1321 ch->bch.nr, ch->dpath, ch->bch.state, bprotocol); 1322 ch->bch.state = bprotocol; 1323 setup_pump(ch); 1324 setup_iom2(ch); 1325 setup_sart(ch); 1326 if (ch->bch.state == ISDN_P_NONE) { 1327 /* Clear resources */ 1328 if (ch->dpath == 1) 1329 test_and_clear_bit(ISAR_DP1_USE, &ch->is->Flags); 1330 else if (ch->dpath == 2) 1331 test_and_clear_bit(ISAR_DP2_USE, &ch->is->Flags); 1332 ch->dpath = 0; 1333 ch->is->ctrl(ch->is->hw, HW_DEACT_IND, ch->bch.nr); 1334 } else 1335 ch->is->ctrl(ch->is->hw, HW_ACTIVATE_IND, ch->bch.nr); 1336 return 0; 1337 } 1338 1339 static void 1340 isar_pump_cmd(struct isar_ch *ch, u32 cmd, u8 para) 1341 { 1342 u8 dps = SET_DPS(ch->dpath); 1343 u8 ctrl = 0, nom = 0, p1 = 0; 1344 1345 pr_debug("%s: isar_pump_cmd %x/%x state(%x)\n", 1346 ch->is->name, cmd, para, ch->bch.state); 1347 switch (cmd) { 1348 case HW_MOD_FTM: 1349 if (ch->state == STFAX_READY) { 1350 p1 = para; 1351 ctrl = PCTRL_CMD_FTM; 1352 nom = 1; 1353 ch->state = STFAX_LINE; 1354 ch->cmd = ctrl; 1355 ch->mod = para; 1356 ch->newmod = 0; 1357 ch->newcmd = 0; 1358 ch->try_mod = 3; 1359 } else if ((ch->state == STFAX_ACTIV) && 1360 (ch->cmd == PCTRL_CMD_FTM) && (ch->mod == para)) 1361 deliver_status(ch, HW_MOD_CONNECT); 1362 else { 1363 ch->newmod = para; 1364 ch->newcmd = PCTRL_CMD_FTM; 1365 nom = 0; 1366 ctrl = PCTRL_CMD_ESC; 1367 ch->state = STFAX_ESCAPE; 1368 } 1369 break; 1370 case HW_MOD_FTH: 1371 if (ch->state == STFAX_READY) { 1372 p1 = para; 1373 ctrl = PCTRL_CMD_FTH; 1374 nom = 1; 1375 ch->state = STFAX_LINE; 1376 ch->cmd = ctrl; 1377 ch->mod = para; 1378 ch->newmod = 0; 1379 ch->newcmd = 0; 1380 ch->try_mod = 3; 1381 } else if ((ch->state == STFAX_ACTIV) && 1382 (ch->cmd == PCTRL_CMD_FTH) && (ch->mod == para)) 1383 deliver_status(ch, HW_MOD_CONNECT); 1384 else { 1385 ch->newmod = para; 1386 ch->newcmd = PCTRL_CMD_FTH; 1387 nom = 0; 1388 ctrl = PCTRL_CMD_ESC; 1389 ch->state = STFAX_ESCAPE; 1390 } 1391 break; 1392 case HW_MOD_FRM: 1393 if (ch->state == STFAX_READY) { 1394 p1 = para; 1395 ctrl = PCTRL_CMD_FRM; 1396 nom = 1; 1397 ch->state = STFAX_LINE; 1398 ch->cmd = ctrl; 1399 ch->mod = para; 1400 ch->newmod = 0; 1401 ch->newcmd = 0; 1402 ch->try_mod = 3; 1403 } else if ((ch->state == STFAX_ACTIV) && 1404 (ch->cmd == PCTRL_CMD_FRM) && (ch->mod == para)) 1405 deliver_status(ch, HW_MOD_CONNECT); 1406 else { 1407 ch->newmod = para; 1408 ch->newcmd = PCTRL_CMD_FRM; 1409 nom = 0; 1410 ctrl = PCTRL_CMD_ESC; 1411 ch->state = STFAX_ESCAPE; 1412 } 1413 break; 1414 case HW_MOD_FRH: 1415 if (ch->state == STFAX_READY) { 1416 p1 = para; 1417 ctrl = PCTRL_CMD_FRH; 1418 nom = 1; 1419 ch->state = STFAX_LINE; 1420 ch->cmd = ctrl; 1421 ch->mod = para; 1422 ch->newmod = 0; 1423 ch->newcmd = 0; 1424 ch->try_mod = 3; 1425 } else if ((ch->state == STFAX_ACTIV) && 1426 (ch->cmd == PCTRL_CMD_FRH) && (ch->mod == para)) 1427 deliver_status(ch, HW_MOD_CONNECT); 1428 else { 1429 ch->newmod = para; 1430 ch->newcmd = PCTRL_CMD_FRH; 1431 nom = 0; 1432 ctrl = PCTRL_CMD_ESC; 1433 ch->state = STFAX_ESCAPE; 1434 } 1435 break; 1436 case PCTRL_CMD_TDTMF: 1437 p1 = para; 1438 nom = 1; 1439 ctrl = PCTRL_CMD_TDTMF; 1440 break; 1441 } 1442 if (ctrl) 1443 send_mbox(ch->is, dps | ISAR_HIS_PUMPCTRL, ctrl, nom, &p1); 1444 } 1445 1446 static void 1447 isar_setup(struct isar_hw *isar) 1448 { 1449 u8 msg; 1450 int i; 1451 1452 /* Dpath 1, 2 */ 1453 msg = 61; 1454 for (i = 0; i < 2; i++) { 1455 /* Buffer Config */ 1456 send_mbox(isar, (i ? ISAR_HIS_DPS2 : ISAR_HIS_DPS1) | 1457 ISAR_HIS_P12CFG, 4, 1, &msg); 1458 isar->ch[i].mml = msg; 1459 isar->ch[i].bch.state = 0; 1460 isar->ch[i].dpath = i + 1; 1461 modeisar(&isar->ch[i], ISDN_P_NONE); 1462 } 1463 } 1464 1465 static int 1466 isar_l2l1(struct mISDNchannel *ch, struct sk_buff *skb) 1467 { 1468 struct bchannel *bch = container_of(ch, struct bchannel, ch); 1469 struct isar_ch *ich = container_of(bch, struct isar_ch, bch); 1470 int ret = -EINVAL; 1471 struct mISDNhead *hh = mISDN_HEAD_P(skb); 1472 u32 id, *val; 1473 u_long flags; 1474 1475 switch (hh->prim) { 1476 case PH_DATA_REQ: 1477 spin_lock_irqsave(ich->is->hwlock, flags); 1478 ret = bchannel_senddata(bch, skb); 1479 if (ret > 0) { /* direct TX */ 1480 ret = 0; 1481 isar_fill_fifo(ich); 1482 } 1483 spin_unlock_irqrestore(ich->is->hwlock, flags); 1484 return ret; 1485 case PH_ACTIVATE_REQ: 1486 spin_lock_irqsave(ich->is->hwlock, flags); 1487 if (!test_and_set_bit(FLG_ACTIVE, &bch->Flags)) 1488 ret = modeisar(ich, ch->protocol); 1489 else 1490 ret = 0; 1491 spin_unlock_irqrestore(ich->is->hwlock, flags); 1492 if (!ret) 1493 _queue_data(ch, PH_ACTIVATE_IND, MISDN_ID_ANY, 0, 1494 NULL, GFP_KERNEL); 1495 break; 1496 case PH_DEACTIVATE_REQ: 1497 spin_lock_irqsave(ich->is->hwlock, flags); 1498 mISDN_clear_bchannel(bch); 1499 modeisar(ich, ISDN_P_NONE); 1500 spin_unlock_irqrestore(ich->is->hwlock, flags); 1501 _queue_data(ch, PH_DEACTIVATE_IND, MISDN_ID_ANY, 0, 1502 NULL, GFP_KERNEL); 1503 ret = 0; 1504 break; 1505 case PH_CONTROL_REQ: 1506 val = (u32 *)skb->data; 1507 pr_debug("%s: PH_CONTROL | REQUEST %x/%x\n", ich->is->name, 1508 hh->id, *val); 1509 if ((hh->id == 0) && ((*val & ~DTMF_TONE_MASK) == 1510 DTMF_TONE_VAL)) { 1511 if (bch->state == ISDN_P_B_L2DTMF) { 1512 char tt = *val & DTMF_TONE_MASK; 1513 1514 if (tt == '*') 1515 tt = 0x1e; 1516 else if (tt == '#') 1517 tt = 0x1f; 1518 else if (tt > '9') 1519 tt -= 7; 1520 tt &= 0x1f; 1521 spin_lock_irqsave(ich->is->hwlock, flags); 1522 isar_pump_cmd(ich, PCTRL_CMD_TDTMF, tt); 1523 spin_unlock_irqrestore(ich->is->hwlock, flags); 1524 } else { 1525 pr_info("%s: DTMF send wrong protocol %x\n", 1526 __func__, bch->state); 1527 return -EINVAL; 1528 } 1529 } else if ((hh->id == HW_MOD_FRM) || (hh->id == HW_MOD_FRH) || 1530 (hh->id == HW_MOD_FTM) || (hh->id == HW_MOD_FTH)) { 1531 for (id = 0; id < FAXMODCNT; id++) 1532 if (faxmodulation[id] == *val) 1533 break; 1534 if ((FAXMODCNT > id) && 1535 test_bit(FLG_INITIALIZED, &bch->Flags)) { 1536 pr_debug("%s: isar: new mod\n", ich->is->name); 1537 isar_pump_cmd(ich, hh->id, *val); 1538 ret = 0; 1539 } else { 1540 pr_info("%s: wrong modulation\n", 1541 ich->is->name); 1542 ret = -EINVAL; 1543 } 1544 } else if (hh->id == HW_MOD_LASTDATA) 1545 test_and_set_bit(FLG_DLEETX, &bch->Flags); 1546 else { 1547 pr_info("%s: unknown PH_CONTROL_REQ %x\n", 1548 ich->is->name, hh->id); 1549 ret = -EINVAL; 1550 } 1551 /* fall through */ 1552 default: 1553 pr_info("%s: %s unknown prim(%x,%x)\n", 1554 ich->is->name, __func__, hh->prim, hh->id); 1555 ret = -EINVAL; 1556 } 1557 if (!ret) 1558 dev_kfree_skb(skb); 1559 return ret; 1560 } 1561 1562 static int 1563 channel_bctrl(struct bchannel *bch, struct mISDN_ctrl_req *cq) 1564 { 1565 return mISDN_ctrl_bchannel(bch, cq); 1566 } 1567 1568 static int 1569 isar_bctrl(struct mISDNchannel *ch, u32 cmd, void *arg) 1570 { 1571 struct bchannel *bch = container_of(ch, struct bchannel, ch); 1572 struct isar_ch *ich = container_of(bch, struct isar_ch, bch); 1573 int ret = -EINVAL; 1574 u_long flags; 1575 1576 pr_debug("%s: %s cmd:%x %p\n", ich->is->name, __func__, cmd, arg); 1577 switch (cmd) { 1578 case CLOSE_CHANNEL: 1579 test_and_clear_bit(FLG_OPEN, &bch->Flags); 1580 cancel_work_sync(&bch->workq); 1581 spin_lock_irqsave(ich->is->hwlock, flags); 1582 mISDN_clear_bchannel(bch); 1583 modeisar(ich, ISDN_P_NONE); 1584 spin_unlock_irqrestore(ich->is->hwlock, flags); 1585 ch->protocol = ISDN_P_NONE; 1586 ch->peer = NULL; 1587 module_put(ich->is->owner); 1588 ret = 0; 1589 break; 1590 case CONTROL_CHANNEL: 1591 ret = channel_bctrl(bch, arg); 1592 break; 1593 default: 1594 pr_info("%s: %s unknown prim(%x)\n", 1595 ich->is->name, __func__, cmd); 1596 } 1597 return ret; 1598 } 1599 1600 static void 1601 free_isar(struct isar_hw *isar) 1602 { 1603 modeisar(&isar->ch[0], ISDN_P_NONE); 1604 modeisar(&isar->ch[1], ISDN_P_NONE); 1605 del_timer(&isar->ch[0].ftimer); 1606 del_timer(&isar->ch[1].ftimer); 1607 test_and_clear_bit(FLG_INITIALIZED, &isar->ch[0].bch.Flags); 1608 test_and_clear_bit(FLG_INITIALIZED, &isar->ch[1].bch.Flags); 1609 } 1610 1611 static int 1612 init_isar(struct isar_hw *isar) 1613 { 1614 int cnt = 3; 1615 1616 while (cnt--) { 1617 isar->version = ISARVersion(isar); 1618 if (isar->ch[0].bch.debug & DEBUG_HW) 1619 pr_notice("%s: Testing version %d (%d time)\n", 1620 isar->name, isar->version, 3 - cnt); 1621 if (isar->version == 1) 1622 break; 1623 isar->ctrl(isar->hw, HW_RESET_REQ, 0); 1624 } 1625 if (isar->version != 1) 1626 return -EINVAL; 1627 timer_setup(&isar->ch[0].ftimer, ftimer_handler, 0); 1628 test_and_set_bit(FLG_INITIALIZED, &isar->ch[0].bch.Flags); 1629 timer_setup(&isar->ch[1].ftimer, ftimer_handler, 0); 1630 test_and_set_bit(FLG_INITIALIZED, &isar->ch[1].bch.Flags); 1631 return 0; 1632 } 1633 1634 static int 1635 isar_open(struct isar_hw *isar, struct channel_req *rq) 1636 { 1637 struct bchannel *bch; 1638 1639 if (rq->adr.channel == 0 || rq->adr.channel > 2) 1640 return -EINVAL; 1641 if (rq->protocol == ISDN_P_NONE) 1642 return -EINVAL; 1643 bch = &isar->ch[rq->adr.channel - 1].bch; 1644 if (test_and_set_bit(FLG_OPEN, &bch->Flags)) 1645 return -EBUSY; /* b-channel can be only open once */ 1646 bch->ch.protocol = rq->protocol; 1647 rq->ch = &bch->ch; 1648 return 0; 1649 } 1650 1651 u32 1652 mISDNisar_init(struct isar_hw *isar, void *hw) 1653 { 1654 u32 ret, i; 1655 1656 isar->hw = hw; 1657 for (i = 0; i < 2; i++) { 1658 isar->ch[i].bch.nr = i + 1; 1659 mISDN_initbchannel(&isar->ch[i].bch, MAX_DATA_MEM, 32); 1660 isar->ch[i].bch.ch.nr = i + 1; 1661 isar->ch[i].bch.ch.send = &isar_l2l1; 1662 isar->ch[i].bch.ch.ctrl = isar_bctrl; 1663 isar->ch[i].bch.hw = hw; 1664 isar->ch[i].is = isar; 1665 } 1666 1667 isar->init = &init_isar; 1668 isar->release = &free_isar; 1669 isar->firmware = &load_firmware; 1670 isar->open = &isar_open; 1671 1672 ret = (1 << (ISDN_P_B_RAW & ISDN_P_B_MASK)) | 1673 (1 << (ISDN_P_B_HDLC & ISDN_P_B_MASK)) | 1674 (1 << (ISDN_P_B_L2DTMF & ISDN_P_B_MASK)) | 1675 (1 << (ISDN_P_B_MODEM_ASYNC & ISDN_P_B_MASK)) | 1676 (1 << (ISDN_P_B_T30_FAX & ISDN_P_B_MASK)); 1677 1678 return ret; 1679 } 1680 EXPORT_SYMBOL(mISDNisar_init); 1681 1682 static int __init isar_mod_init(void) 1683 { 1684 pr_notice("mISDN: ISAR driver Rev. %s\n", ISAR_REV); 1685 return 0; 1686 } 1687 1688 static void __exit isar_mod_cleanup(void) 1689 { 1690 pr_notice("mISDN: ISAR module unloaded\n"); 1691 } 1692 module_init(isar_mod_init); 1693 module_exit(isar_mod_cleanup); 1694