icc.c 18 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681
  1. /* $Id: icc.c,v 1.8.2.3 2004/01/13 14:31:25 keil Exp $
  2. *
  3. * ICC specific routines
  4. *
  5. * Author Matt Henderson & Guy Ellis
  6. * Copyright by Traverse Technologies Pty Ltd, www.travers.com.au
  7. *
  8. * This software may be used and distributed according to the terms
  9. * of the GNU General Public License, incorporated herein by reference.
  10. *
  11. * 1999.6.25 Initial implementation of routines for Siemens ISDN
  12. * Communication Controller PEB 2070 based on the ISAC routines
  13. * written by Karsten Keil.
  14. *
  15. */
  16. #include <linux/init.h>
  17. #include "hisax.h"
  18. #include "icc.h"
  19. // #include "arcofi.h"
  20. #include "isdnl1.h"
  21. #include <linux/interrupt.h>
  22. #define DBUSY_TIMER_VALUE 80
  23. #define ARCOFI_USE 0
  24. static char *ICCVer[] =
  25. {"2070 A1/A3", "2070 B1", "2070 B2/B3", "2070 V2.4"};
  26. void
  27. ICCVersion(struct IsdnCardState *cs, char *s)
  28. {
  29. int val;
  30. val = cs->readisac(cs, ICC_RBCH);
  31. printk(KERN_INFO "%s ICC version (%x): %s\n", s, val, ICCVer[(val >> 5) & 3]);
  32. }
  33. static void
  34. ph_command(struct IsdnCardState *cs, unsigned int command)
  35. {
  36. if (cs->debug & L1_DEB_ISAC)
  37. debugl1(cs, "ph_command %x", command);
  38. cs->writeisac(cs, ICC_CIX0, (command << 2) | 3);
  39. }
  40. static void
  41. icc_new_ph(struct IsdnCardState *cs)
  42. {
  43. switch (cs->dc.icc.ph_state) {
  44. case (ICC_IND_EI1):
  45. ph_command(cs, ICC_CMD_DI);
  46. l1_msg(cs, HW_RESET | INDICATION, NULL);
  47. break;
  48. case (ICC_IND_DC):
  49. l1_msg(cs, HW_DEACTIVATE | CONFIRM, NULL);
  50. break;
  51. case (ICC_IND_DR):
  52. l1_msg(cs, HW_DEACTIVATE | INDICATION, NULL);
  53. break;
  54. case (ICC_IND_PU):
  55. l1_msg(cs, HW_POWERUP | CONFIRM, NULL);
  56. break;
  57. case (ICC_IND_FJ):
  58. l1_msg(cs, HW_RSYNC | INDICATION, NULL);
  59. break;
  60. case (ICC_IND_AR):
  61. l1_msg(cs, HW_INFO2 | INDICATION, NULL);
  62. break;
  63. case (ICC_IND_AI):
  64. l1_msg(cs, HW_INFO4 | INDICATION, NULL);
  65. break;
  66. default:
  67. break;
  68. }
  69. }
  70. static void
  71. icc_bh(struct IsdnCardState *cs)
  72. {
  73. struct PStack *stptr;
  74. if (!cs)
  75. return;
  76. if (test_and_clear_bit(D_CLEARBUSY, &cs->event)) {
  77. if (cs->debug)
  78. debugl1(cs, "D-Channel Busy cleared");
  79. stptr = cs->stlist;
  80. while (stptr != NULL) {
  81. stptr->l1.l1l2(stptr, PH_PAUSE | CONFIRM, NULL);
  82. stptr = stptr->next;
  83. }
  84. }
  85. if (test_and_clear_bit(D_L1STATECHANGE, &cs->event))
  86. icc_new_ph(cs);
  87. if (test_and_clear_bit(D_RCVBUFREADY, &cs->event))
  88. DChannel_proc_rcv(cs);
  89. if (test_and_clear_bit(D_XMTBUFREADY, &cs->event))
  90. DChannel_proc_xmt(cs);
  91. #if ARCOFI_USE
  92. if (!test_bit(HW_ARCOFI, &cs->HW_Flags))
  93. return;
  94. if (test_and_clear_bit(D_RX_MON1, &cs->event))
  95. arcofi_fsm(cs, ARCOFI_RX_END, NULL);
  96. if (test_and_clear_bit(D_TX_MON1, &cs->event))
  97. arcofi_fsm(cs, ARCOFI_TX_END, NULL);
  98. #endif
  99. }
  100. static void
  101. icc_empty_fifo(struct IsdnCardState *cs, int count)
  102. {
  103. u_char *ptr;
  104. if ((cs->debug & L1_DEB_ISAC) && !(cs->debug & L1_DEB_ISAC_FIFO))
  105. debugl1(cs, "icc_empty_fifo");
  106. if ((cs->rcvidx + count) >= MAX_DFRAME_LEN_L1) {
  107. if (cs->debug & L1_DEB_WARN)
  108. debugl1(cs, "icc_empty_fifo overrun %d",
  109. cs->rcvidx + count);
  110. cs->writeisac(cs, ICC_CMDR, 0x80);
  111. cs->rcvidx = 0;
  112. return;
  113. }
  114. ptr = cs->rcvbuf + cs->rcvidx;
  115. cs->rcvidx += count;
  116. cs->readisacfifo(cs, ptr, count);
  117. cs->writeisac(cs, ICC_CMDR, 0x80);
  118. if (cs->debug & L1_DEB_ISAC_FIFO) {
  119. char *t = cs->dlog;
  120. t += sprintf(t, "icc_empty_fifo cnt %d", count);
  121. QuickHex(t, ptr, count);
  122. debugl1(cs, cs->dlog);
  123. }
  124. }
  125. static void
  126. icc_fill_fifo(struct IsdnCardState *cs)
  127. {
  128. int count, more;
  129. u_char *ptr;
  130. if ((cs->debug & L1_DEB_ISAC) && !(cs->debug & L1_DEB_ISAC_FIFO))
  131. debugl1(cs, "icc_fill_fifo");
  132. if (!cs->tx_skb)
  133. return;
  134. count = cs->tx_skb->len;
  135. if (count <= 0)
  136. return;
  137. more = 0;
  138. if (count > 32) {
  139. more = !0;
  140. count = 32;
  141. }
  142. ptr = cs->tx_skb->data;
  143. skb_pull(cs->tx_skb, count);
  144. cs->tx_cnt += count;
  145. cs->writeisacfifo(cs, ptr, count);
  146. cs->writeisac(cs, ICC_CMDR, more ? 0x8 : 0xa);
  147. if (test_and_set_bit(FLG_DBUSY_TIMER, &cs->HW_Flags)) {
  148. debugl1(cs, "icc_fill_fifo dbusytimer running");
  149. del_timer(&cs->dbusytimer);
  150. }
  151. init_timer(&cs->dbusytimer);
  152. cs->dbusytimer.expires = jiffies + ((DBUSY_TIMER_VALUE * HZ)/1000);
  153. add_timer(&cs->dbusytimer);
  154. if (cs->debug & L1_DEB_ISAC_FIFO) {
  155. char *t = cs->dlog;
  156. t += sprintf(t, "icc_fill_fifo cnt %d", count);
  157. QuickHex(t, ptr, count);
  158. debugl1(cs, cs->dlog);
  159. }
  160. }
  161. void
  162. icc_interrupt(struct IsdnCardState *cs, u_char val)
  163. {
  164. u_char exval, v1;
  165. struct sk_buff *skb;
  166. unsigned int count;
  167. if (cs->debug & L1_DEB_ISAC)
  168. debugl1(cs, "ICC interrupt %x", val);
  169. if (val & 0x80) { /* RME */
  170. exval = cs->readisac(cs, ICC_RSTA);
  171. if ((exval & 0x70) != 0x20) {
  172. if (exval & 0x40) {
  173. if (cs->debug & L1_DEB_WARN)
  174. debugl1(cs, "ICC RDO");
  175. #ifdef ERROR_STATISTIC
  176. cs->err_rx++;
  177. #endif
  178. }
  179. if (!(exval & 0x20)) {
  180. if (cs->debug & L1_DEB_WARN)
  181. debugl1(cs, "ICC CRC error");
  182. #ifdef ERROR_STATISTIC
  183. cs->err_crc++;
  184. #endif
  185. }
  186. cs->writeisac(cs, ICC_CMDR, 0x80);
  187. } else {
  188. count = cs->readisac(cs, ICC_RBCL) & 0x1f;
  189. if (count == 0)
  190. count = 32;
  191. icc_empty_fifo(cs, count);
  192. if ((count = cs->rcvidx) > 0) {
  193. cs->rcvidx = 0;
  194. if (!(skb = alloc_skb(count, GFP_ATOMIC)))
  195. printk(KERN_WARNING "HiSax: D receive out of memory\n");
  196. else {
  197. memcpy(skb_put(skb, count), cs->rcvbuf, count);
  198. skb_queue_tail(&cs->rq, skb);
  199. }
  200. }
  201. }
  202. cs->rcvidx = 0;
  203. schedule_event(cs, D_RCVBUFREADY);
  204. }
  205. if (val & 0x40) { /* RPF */
  206. icc_empty_fifo(cs, 32);
  207. }
  208. if (val & 0x20) { /* RSC */
  209. /* never */
  210. if (cs->debug & L1_DEB_WARN)
  211. debugl1(cs, "ICC RSC interrupt");
  212. }
  213. if (val & 0x10) { /* XPR */
  214. if (test_and_clear_bit(FLG_DBUSY_TIMER, &cs->HW_Flags))
  215. del_timer(&cs->dbusytimer);
  216. if (test_and_clear_bit(FLG_L1_DBUSY, &cs->HW_Flags))
  217. schedule_event(cs, D_CLEARBUSY);
  218. if (cs->tx_skb) {
  219. if (cs->tx_skb->len) {
  220. icc_fill_fifo(cs);
  221. goto afterXPR;
  222. } else {
  223. dev_kfree_skb_irq(cs->tx_skb);
  224. cs->tx_cnt = 0;
  225. cs->tx_skb = NULL;
  226. }
  227. }
  228. if ((cs->tx_skb = skb_dequeue(&cs->sq))) {
  229. cs->tx_cnt = 0;
  230. icc_fill_fifo(cs);
  231. } else
  232. schedule_event(cs, D_XMTBUFREADY);
  233. }
  234. afterXPR:
  235. if (val & 0x04) { /* CISQ */
  236. exval = cs->readisac(cs, ICC_CIR0);
  237. if (cs->debug & L1_DEB_ISAC)
  238. debugl1(cs, "ICC CIR0 %02X", exval );
  239. if (exval & 2) {
  240. cs->dc.icc.ph_state = (exval >> 2) & 0xf;
  241. if (cs->debug & L1_DEB_ISAC)
  242. debugl1(cs, "ph_state change %x", cs->dc.icc.ph_state);
  243. schedule_event(cs, D_L1STATECHANGE);
  244. }
  245. if (exval & 1) {
  246. exval = cs->readisac(cs, ICC_CIR1);
  247. if (cs->debug & L1_DEB_ISAC)
  248. debugl1(cs, "ICC CIR1 %02X", exval );
  249. }
  250. }
  251. if (val & 0x02) { /* SIN */
  252. /* never */
  253. if (cs->debug & L1_DEB_WARN)
  254. debugl1(cs, "ICC SIN interrupt");
  255. }
  256. if (val & 0x01) { /* EXI */
  257. exval = cs->readisac(cs, ICC_EXIR);
  258. if (cs->debug & L1_DEB_WARN)
  259. debugl1(cs, "ICC EXIR %02x", exval);
  260. if (exval & 0x80) { /* XMR */
  261. debugl1(cs, "ICC XMR");
  262. printk(KERN_WARNING "HiSax: ICC XMR\n");
  263. }
  264. if (exval & 0x40) { /* XDU */
  265. debugl1(cs, "ICC XDU");
  266. printk(KERN_WARNING "HiSax: ICC XDU\n");
  267. #ifdef ERROR_STATISTIC
  268. cs->err_tx++;
  269. #endif
  270. if (test_and_clear_bit(FLG_DBUSY_TIMER, &cs->HW_Flags))
  271. del_timer(&cs->dbusytimer);
  272. if (test_and_clear_bit(FLG_L1_DBUSY, &cs->HW_Flags))
  273. schedule_event(cs, D_CLEARBUSY);
  274. if (cs->tx_skb) { /* Restart frame */
  275. skb_push(cs->tx_skb, cs->tx_cnt);
  276. cs->tx_cnt = 0;
  277. icc_fill_fifo(cs);
  278. } else {
  279. printk(KERN_WARNING "HiSax: ICC XDU no skb\n");
  280. debugl1(cs, "ICC XDU no skb");
  281. }
  282. }
  283. if (exval & 0x04) { /* MOS */
  284. v1 = cs->readisac(cs, ICC_MOSR);
  285. if (cs->debug & L1_DEB_MONITOR)
  286. debugl1(cs, "ICC MOSR %02x", v1);
  287. #if ARCOFI_USE
  288. if (v1 & 0x08) {
  289. if (!cs->dc.icc.mon_rx) {
  290. if (!(cs->dc.icc.mon_rx = kmalloc(MAX_MON_FRAME, GFP_ATOMIC))) {
  291. if (cs->debug & L1_DEB_WARN)
  292. debugl1(cs, "ICC MON RX out of memory!");
  293. cs->dc.icc.mocr &= 0xf0;
  294. cs->dc.icc.mocr |= 0x0a;
  295. cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
  296. goto afterMONR0;
  297. } else
  298. cs->dc.icc.mon_rxp = 0;
  299. }
  300. if (cs->dc.icc.mon_rxp >= MAX_MON_FRAME) {
  301. cs->dc.icc.mocr &= 0xf0;
  302. cs->dc.icc.mocr |= 0x0a;
  303. cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
  304. cs->dc.icc.mon_rxp = 0;
  305. if (cs->debug & L1_DEB_WARN)
  306. debugl1(cs, "ICC MON RX overflow!");
  307. goto afterMONR0;
  308. }
  309. cs->dc.icc.mon_rx[cs->dc.icc.mon_rxp++] = cs->readisac(cs, ICC_MOR0);
  310. if (cs->debug & L1_DEB_MONITOR)
  311. debugl1(cs, "ICC MOR0 %02x", cs->dc.icc.mon_rx[cs->dc.icc.mon_rxp -1]);
  312. if (cs->dc.icc.mon_rxp == 1) {
  313. cs->dc.icc.mocr |= 0x04;
  314. cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
  315. }
  316. }
  317. afterMONR0:
  318. if (v1 & 0x80) {
  319. if (!cs->dc.icc.mon_rx) {
  320. if (!(cs->dc.icc.mon_rx = kmalloc(MAX_MON_FRAME, GFP_ATOMIC))) {
  321. if (cs->debug & L1_DEB_WARN)
  322. debugl1(cs, "ICC MON RX out of memory!");
  323. cs->dc.icc.mocr &= 0x0f;
  324. cs->dc.icc.mocr |= 0xa0;
  325. cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
  326. goto afterMONR1;
  327. } else
  328. cs->dc.icc.mon_rxp = 0;
  329. }
  330. if (cs->dc.icc.mon_rxp >= MAX_MON_FRAME) {
  331. cs->dc.icc.mocr &= 0x0f;
  332. cs->dc.icc.mocr |= 0xa0;
  333. cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
  334. cs->dc.icc.mon_rxp = 0;
  335. if (cs->debug & L1_DEB_WARN)
  336. debugl1(cs, "ICC MON RX overflow!");
  337. goto afterMONR1;
  338. }
  339. cs->dc.icc.mon_rx[cs->dc.icc.mon_rxp++] = cs->readisac(cs, ICC_MOR1);
  340. if (cs->debug & L1_DEB_MONITOR)
  341. debugl1(cs, "ICC MOR1 %02x", cs->dc.icc.mon_rx[cs->dc.icc.mon_rxp -1]);
  342. cs->dc.icc.mocr |= 0x40;
  343. cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
  344. }
  345. afterMONR1:
  346. if (v1 & 0x04) {
  347. cs->dc.icc.mocr &= 0xf0;
  348. cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
  349. cs->dc.icc.mocr |= 0x0a;
  350. cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
  351. schedule_event(cs, D_RX_MON0);
  352. }
  353. if (v1 & 0x40) {
  354. cs->dc.icc.mocr &= 0x0f;
  355. cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
  356. cs->dc.icc.mocr |= 0xa0;
  357. cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
  358. schedule_event(cs, D_RX_MON1);
  359. }
  360. if (v1 & 0x02) {
  361. if ((!cs->dc.icc.mon_tx) || (cs->dc.icc.mon_txc &&
  362. (cs->dc.icc.mon_txp >= cs->dc.icc.mon_txc) &&
  363. !(v1 & 0x08))) {
  364. cs->dc.icc.mocr &= 0xf0;
  365. cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
  366. cs->dc.icc.mocr |= 0x0a;
  367. cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
  368. if (cs->dc.icc.mon_txc &&
  369. (cs->dc.icc.mon_txp >= cs->dc.icc.mon_txc))
  370. schedule_event(cs, D_TX_MON0);
  371. goto AfterMOX0;
  372. }
  373. if (cs->dc.icc.mon_txc && (cs->dc.icc.mon_txp >= cs->dc.icc.mon_txc)) {
  374. schedule_event(cs, D_TX_MON0);
  375. goto AfterMOX0;
  376. }
  377. cs->writeisac(cs, ICC_MOX0,
  378. cs->dc.icc.mon_tx[cs->dc.icc.mon_txp++]);
  379. if (cs->debug & L1_DEB_MONITOR)
  380. debugl1(cs, "ICC %02x -> MOX0", cs->dc.icc.mon_tx[cs->dc.icc.mon_txp -1]);
  381. }
  382. AfterMOX0:
  383. if (v1 & 0x20) {
  384. if ((!cs->dc.icc.mon_tx) || (cs->dc.icc.mon_txc &&
  385. (cs->dc.icc.mon_txp >= cs->dc.icc.mon_txc) &&
  386. !(v1 & 0x80))) {
  387. cs->dc.icc.mocr &= 0x0f;
  388. cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
  389. cs->dc.icc.mocr |= 0xa0;
  390. cs->writeisac(cs, ICC_MOCR, cs->dc.icc.mocr);
  391. if (cs->dc.icc.mon_txc &&
  392. (cs->dc.icc.mon_txp >= cs->dc.icc.mon_txc))
  393. schedule_event(cs, D_TX_MON1);
  394. goto AfterMOX1;
  395. }
  396. if (cs->dc.icc.mon_txc && (cs->dc.icc.mon_txp >= cs->dc.icc.mon_txc)) {
  397. schedule_event(cs, D_TX_MON1);
  398. goto AfterMOX1;
  399. }
  400. cs->writeisac(cs, ICC_MOX1,
  401. cs->dc.icc.mon_tx[cs->dc.icc.mon_txp++]);
  402. if (cs->debug & L1_DEB_MONITOR)
  403. debugl1(cs, "ICC %02x -> MOX1", cs->dc.icc.mon_tx[cs->dc.icc.mon_txp -1]);
  404. }
  405. AfterMOX1:
  406. #endif
  407. }
  408. }
  409. }
  410. static void
  411. ICC_l1hw(struct PStack *st, int pr, void *arg)
  412. {
  413. struct IsdnCardState *cs = (struct IsdnCardState *) st->l1.hardware;
  414. struct sk_buff *skb = arg;
  415. u_long flags;
  416. int val;
  417. switch (pr) {
  418. case (PH_DATA |REQUEST):
  419. if (cs->debug & DEB_DLOG_HEX)
  420. LogFrame(cs, skb->data, skb->len);
  421. if (cs->debug & DEB_DLOG_VERBOSE)
  422. dlogframe(cs, skb, 0);
  423. spin_lock_irqsave(&cs->lock, flags);
  424. if (cs->tx_skb) {
  425. skb_queue_tail(&cs->sq, skb);
  426. #ifdef L2FRAME_DEBUG /* psa */
  427. if (cs->debug & L1_DEB_LAPD)
  428. Logl2Frame(cs, skb, "PH_DATA Queued", 0);
  429. #endif
  430. } else {
  431. cs->tx_skb = skb;
  432. cs->tx_cnt = 0;
  433. #ifdef L2FRAME_DEBUG /* psa */
  434. if (cs->debug & L1_DEB_LAPD)
  435. Logl2Frame(cs, skb, "PH_DATA", 0);
  436. #endif
  437. icc_fill_fifo(cs);
  438. }
  439. spin_unlock_irqrestore(&cs->lock, flags);
  440. break;
  441. case (PH_PULL |INDICATION):
  442. spin_lock_irqsave(&cs->lock, flags);
  443. if (cs->tx_skb) {
  444. if (cs->debug & L1_DEB_WARN)
  445. debugl1(cs, " l2l1 tx_skb exist this shouldn't happen");
  446. skb_queue_tail(&cs->sq, skb);
  447. break;
  448. }
  449. if (cs->debug & DEB_DLOG_HEX)
  450. LogFrame(cs, skb->data, skb->len);
  451. if (cs->debug & DEB_DLOG_VERBOSE)
  452. dlogframe(cs, skb, 0);
  453. cs->tx_skb = skb;
  454. cs->tx_cnt = 0;
  455. #ifdef L2FRAME_DEBUG /* psa */
  456. if (cs->debug & L1_DEB_LAPD)
  457. Logl2Frame(cs, skb, "PH_DATA_PULLED", 0);
  458. #endif
  459. icc_fill_fifo(cs);
  460. spin_unlock_irqrestore(&cs->lock, flags);
  461. break;
  462. case (PH_PULL | REQUEST):
  463. #ifdef L2FRAME_DEBUG /* psa */
  464. if (cs->debug & L1_DEB_LAPD)
  465. debugl1(cs, "-> PH_REQUEST_PULL");
  466. #endif
  467. if (!cs->tx_skb) {
  468. test_and_clear_bit(FLG_L1_PULL_REQ, &st->l1.Flags);
  469. st->l1.l1l2(st, PH_PULL | CONFIRM, NULL);
  470. } else
  471. test_and_set_bit(FLG_L1_PULL_REQ, &st->l1.Flags);
  472. break;
  473. case (HW_RESET | REQUEST):
  474. spin_lock_irqsave(&cs->lock, flags);
  475. if ((cs->dc.icc.ph_state == ICC_IND_EI1) ||
  476. (cs->dc.icc.ph_state == ICC_IND_DR))
  477. ph_command(cs, ICC_CMD_DI);
  478. else
  479. ph_command(cs, ICC_CMD_RES);
  480. spin_unlock_irqrestore(&cs->lock, flags);
  481. break;
  482. case (HW_ENABLE | REQUEST):
  483. spin_lock_irqsave(&cs->lock, flags);
  484. ph_command(cs, ICC_CMD_DI);
  485. spin_unlock_irqrestore(&cs->lock, flags);
  486. break;
  487. case (HW_INFO1 | REQUEST):
  488. spin_lock_irqsave(&cs->lock, flags);
  489. ph_command(cs, ICC_CMD_AR);
  490. spin_unlock_irqrestore(&cs->lock, flags);
  491. break;
  492. case (HW_INFO3 | REQUEST):
  493. spin_lock_irqsave(&cs->lock, flags);
  494. ph_command(cs, ICC_CMD_AI);
  495. spin_unlock_irqrestore(&cs->lock, flags);
  496. break;
  497. case (HW_TESTLOOP | REQUEST):
  498. spin_lock_irqsave(&cs->lock, flags);
  499. val = 0;
  500. if (1 & (long) arg)
  501. val |= 0x0c;
  502. if (2 & (long) arg)
  503. val |= 0x3;
  504. if (test_bit(HW_IOM1, &cs->HW_Flags)) {
  505. /* IOM 1 Mode */
  506. if (!val) {
  507. cs->writeisac(cs, ICC_SPCR, 0xa);
  508. cs->writeisac(cs, ICC_ADF1, 0x2);
  509. } else {
  510. cs->writeisac(cs, ICC_SPCR, val);
  511. cs->writeisac(cs, ICC_ADF1, 0xa);
  512. }
  513. } else {
  514. /* IOM 2 Mode */
  515. cs->writeisac(cs, ICC_SPCR, val);
  516. if (val)
  517. cs->writeisac(cs, ICC_ADF1, 0x8);
  518. else
  519. cs->writeisac(cs, ICC_ADF1, 0x0);
  520. }
  521. spin_unlock_irqrestore(&cs->lock, flags);
  522. break;
  523. case (HW_DEACTIVATE | RESPONSE):
  524. skb_queue_purge(&cs->rq);
  525. skb_queue_purge(&cs->sq);
  526. if (cs->tx_skb) {
  527. dev_kfree_skb_any(cs->tx_skb);
  528. cs->tx_skb = NULL;
  529. }
  530. if (test_and_clear_bit(FLG_DBUSY_TIMER, &cs->HW_Flags))
  531. del_timer(&cs->dbusytimer);
  532. if (test_and_clear_bit(FLG_L1_DBUSY, &cs->HW_Flags))
  533. schedule_event(cs, D_CLEARBUSY);
  534. break;
  535. default:
  536. if (cs->debug & L1_DEB_WARN)
  537. debugl1(cs, "icc_l1hw unknown %04x", pr);
  538. break;
  539. }
  540. }
  541. static void
  542. setstack_icc(struct PStack *st, struct IsdnCardState *cs)
  543. {
  544. st->l1.l1hw = ICC_l1hw;
  545. }
  546. static void
  547. DC_Close_icc(struct IsdnCardState *cs) {
  548. kfree(cs->dc.icc.mon_rx);
  549. cs->dc.icc.mon_rx = NULL;
  550. kfree(cs->dc.icc.mon_tx);
  551. cs->dc.icc.mon_tx = NULL;
  552. }
  553. static void
  554. dbusy_timer_handler(struct IsdnCardState *cs)
  555. {
  556. struct PStack *stptr;
  557. int rbch, star;
  558. if (test_bit(FLG_DBUSY_TIMER, &cs->HW_Flags)) {
  559. rbch = cs->readisac(cs, ICC_RBCH);
  560. star = cs->readisac(cs, ICC_STAR);
  561. if (cs->debug)
  562. debugl1(cs, "D-Channel Busy RBCH %02x STAR %02x",
  563. rbch, star);
  564. if (rbch & ICC_RBCH_XAC) { /* D-Channel Busy */
  565. test_and_set_bit(FLG_L1_DBUSY, &cs->HW_Flags);
  566. stptr = cs->stlist;
  567. while (stptr != NULL) {
  568. stptr->l1.l1l2(stptr, PH_PAUSE | INDICATION, NULL);
  569. stptr = stptr->next;
  570. }
  571. } else {
  572. /* discard frame; reset transceiver */
  573. test_and_clear_bit(FLG_DBUSY_TIMER, &cs->HW_Flags);
  574. if (cs->tx_skb) {
  575. dev_kfree_skb_any(cs->tx_skb);
  576. cs->tx_cnt = 0;
  577. cs->tx_skb = NULL;
  578. } else {
  579. printk(KERN_WARNING "HiSax: ICC D-Channel Busy no skb\n");
  580. debugl1(cs, "D-Channel Busy no skb");
  581. }
  582. cs->writeisac(cs, ICC_CMDR, 0x01); /* Transmitter reset */
  583. cs->irq_func(cs->irq, cs);
  584. }
  585. }
  586. }
  587. void
  588. initicc(struct IsdnCardState *cs)
  589. {
  590. cs->setstack_d = setstack_icc;
  591. cs->DC_Close = DC_Close_icc;
  592. cs->dc.icc.mon_tx = NULL;
  593. cs->dc.icc.mon_rx = NULL;
  594. cs->writeisac(cs, ICC_MASK, 0xff);
  595. cs->dc.icc.mocr = 0xaa;
  596. if (test_bit(HW_IOM1, &cs->HW_Flags)) {
  597. /* IOM 1 Mode */
  598. cs->writeisac(cs, ICC_ADF2, 0x0);
  599. cs->writeisac(cs, ICC_SPCR, 0xa);
  600. cs->writeisac(cs, ICC_ADF1, 0x2);
  601. cs->writeisac(cs, ICC_STCR, 0x70);
  602. cs->writeisac(cs, ICC_MODE, 0xc9);
  603. } else {
  604. /* IOM 2 Mode */
  605. if (!cs->dc.icc.adf2)
  606. cs->dc.icc.adf2 = 0x80;
  607. cs->writeisac(cs, ICC_ADF2, cs->dc.icc.adf2);
  608. cs->writeisac(cs, ICC_SQXR, 0xa0);
  609. cs->writeisac(cs, ICC_SPCR, 0x20);
  610. cs->writeisac(cs, ICC_STCR, 0x70);
  611. cs->writeisac(cs, ICC_MODE, 0xca);
  612. cs->writeisac(cs, ICC_TIMR, 0x00);
  613. cs->writeisac(cs, ICC_ADF1, 0x20);
  614. }
  615. ph_command(cs, ICC_CMD_RES);
  616. cs->writeisac(cs, ICC_MASK, 0x0);
  617. ph_command(cs, ICC_CMD_DI);
  618. }
  619. void
  620. clear_pending_icc_ints(struct IsdnCardState *cs)
  621. {
  622. int val, eval;
  623. val = cs->readisac(cs, ICC_STAR);
  624. debugl1(cs, "ICC STAR %x", val);
  625. val = cs->readisac(cs, ICC_MODE);
  626. debugl1(cs, "ICC MODE %x", val);
  627. val = cs->readisac(cs, ICC_ADF2);
  628. debugl1(cs, "ICC ADF2 %x", val);
  629. val = cs->readisac(cs, ICC_ISTA);
  630. debugl1(cs, "ICC ISTA %x", val);
  631. if (val & 0x01) {
  632. eval = cs->readisac(cs, ICC_EXIR);
  633. debugl1(cs, "ICC EXIR %x", eval);
  634. }
  635. val = cs->readisac(cs, ICC_CIR0);
  636. debugl1(cs, "ICC CIR0 %x", val);
  637. cs->dc.icc.ph_state = (val >> 2) & 0xf;
  638. schedule_event(cs, D_L1STATECHANGE);
  639. /* Disable all IRQ */
  640. cs->writeisac(cs, ICC_MASK, 0xFF);
  641. }
  642. void __devinit
  643. setup_icc(struct IsdnCardState *cs)
  644. {
  645. INIT_WORK(&cs->tqueue, (void *)(void *) icc_bh, cs);
  646. cs->dbusytimer.function = (void *) dbusy_timer_handler;
  647. cs->dbusytimer.data = (long) cs;
  648. init_timer(&cs->dbusytimer);
  649. }