]> git.proxmox.com Git - mirror_ubuntu-bionic-kernel.git/blob - drivers/isdn/hardware/mISDN/hfcpci.c
Merge branch 'for-linus' of git://oss.sgi.com/xfs/xfs
[mirror_ubuntu-bionic-kernel.git] / drivers / isdn / hardware / mISDN / hfcpci.c
1 /*
2 *
3 * hfcpci.c low level driver for CCD's hfc-pci based cards
4 *
5 * Author Werner Cornelius (werner@isdn4linux.de)
6 * based on existing driver for CCD hfc ISA cards
7 * type approval valid for HFC-S PCI A based card
8 *
9 * Copyright 1999 by Werner Cornelius (werner@isdn-development.de)
10 * Copyright 2008 by Karsten Keil <kkeil@novell.com>
11 *
12 * This program is free software; you can redistribute it and/or modify
13 * it under the terms of the GNU General Public License as published by
14 * the Free Software Foundation; either version 2, or (at your option)
15 * any later version.
16 *
17 * This program is distributed in the hope that it will be useful,
18 * but WITHOUT ANY WARRANTY; without even the implied warranty of
19 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
20 * GNU General Public License for more details.
21 *
22 * You should have received a copy of the GNU General Public License
23 * along with this program; if not, write to the Free Software
24 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
25 *
26 * Module options:
27 *
28 * debug:
29 * NOTE: only one poll value must be given for all cards
30 * See hfc_pci.h for debug flags.
31 *
32 * poll:
33 * NOTE: only one poll value must be given for all cards
34 * Give the number of samples for each fifo process.
35 * By default 128 is used. Decrease to reduce delay, increase to
36 * reduce cpu load. If unsure, don't mess with it!
37 * A value of 128 will use controller's interrupt. Other values will
38 * use kernel timer, because the controller will not allow lower values
39 * than 128.
40 * Also note that the value depends on the kernel timer frequency.
41 * If kernel uses a frequency of 1000 Hz, steps of 8 samples are possible.
42 * If the kernel uses 100 Hz, steps of 80 samples are possible.
43 * If the kernel uses 300 Hz, steps of about 26 samples are possible.
44 *
45 */
46
47 #include <linux/interrupt.h>
48 #include <linux/module.h>
49 #include <linux/pci.h>
50 #include <linux/delay.h>
51 #include <linux/mISDNhw.h>
52 #include <linux/slab.h>
53
54 #include "hfc_pci.h"
55
56 static const char *hfcpci_revision = "2.0";
57
58 static int HFC_cnt;
59 static uint debug;
60 static uint poll, tics;
61 static struct timer_list hfc_tl;
62 static unsigned long hfc_jiffies;
63
64 MODULE_AUTHOR("Karsten Keil");
65 MODULE_LICENSE("GPL");
66 module_param(debug, uint, S_IRUGO | S_IWUSR);
67 module_param(poll, uint, S_IRUGO | S_IWUSR);
68
69 enum {
70 HFC_CCD_2BD0,
71 HFC_CCD_B000,
72 HFC_CCD_B006,
73 HFC_CCD_B007,
74 HFC_CCD_B008,
75 HFC_CCD_B009,
76 HFC_CCD_B00A,
77 HFC_CCD_B00B,
78 HFC_CCD_B00C,
79 HFC_CCD_B100,
80 HFC_CCD_B700,
81 HFC_CCD_B701,
82 HFC_ASUS_0675,
83 HFC_BERKOM_A1T,
84 HFC_BERKOM_TCONCEPT,
85 HFC_ANIGMA_MC145575,
86 HFC_ZOLTRIX_2BD0,
87 HFC_DIGI_DF_M_IOM2_E,
88 HFC_DIGI_DF_M_E,
89 HFC_DIGI_DF_M_IOM2_A,
90 HFC_DIGI_DF_M_A,
91 HFC_ABOCOM_2BD1,
92 HFC_SITECOM_DC105V2,
93 };
94
95 struct hfcPCI_hw {
96 unsigned char cirm;
97 unsigned char ctmt;
98 unsigned char clkdel;
99 unsigned char states;
100 unsigned char conn;
101 unsigned char mst_m;
102 unsigned char int_m1;
103 unsigned char int_m2;
104 unsigned char sctrl;
105 unsigned char sctrl_r;
106 unsigned char sctrl_e;
107 unsigned char trm;
108 unsigned char fifo_en;
109 unsigned char bswapped;
110 unsigned char protocol;
111 int nt_timer;
112 unsigned char __iomem *pci_io; /* start of PCI IO memory */
113 dma_addr_t dmahandle;
114 void *fifos; /* FIFO memory */
115 int last_bfifo_cnt[2];
116 /* marker saving last b-fifo frame count */
117 struct timer_list timer;
118 };
119
120 #define HFC_CFG_MASTER 1
121 #define HFC_CFG_SLAVE 2
122 #define HFC_CFG_PCM 3
123 #define HFC_CFG_2HFC 4
124 #define HFC_CFG_SLAVEHFC 5
125 #define HFC_CFG_NEG_F0 6
126 #define HFC_CFG_SW_DD_DU 7
127
128 #define FLG_HFC_TIMER_T1 16
129 #define FLG_HFC_TIMER_T3 17
130
131 #define NT_T1_COUNT 1120 /* number of 3.125ms interrupts (3.5s) */
132 #define NT_T3_COUNT 31 /* number of 3.125ms interrupts (97 ms) */
133 #define CLKDEL_TE 0x0e /* CLKDEL in TE mode */
134 #define CLKDEL_NT 0x6c /* CLKDEL in NT mode */
135
136
137 struct hfc_pci {
138 u_char subtype;
139 u_char chanlimit;
140 u_char initdone;
141 u_long cfg;
142 u_int irq;
143 u_int irqcnt;
144 struct pci_dev *pdev;
145 struct hfcPCI_hw hw;
146 spinlock_t lock; /* card lock */
147 struct dchannel dch;
148 struct bchannel bch[2];
149 };
150
151 /* Interface functions */
152 static void
153 enable_hwirq(struct hfc_pci *hc)
154 {
155 hc->hw.int_m2 |= HFCPCI_IRQ_ENABLE;
156 Write_hfc(hc, HFCPCI_INT_M2, hc->hw.int_m2);
157 }
158
159 static void
160 disable_hwirq(struct hfc_pci *hc)
161 {
162 hc->hw.int_m2 &= ~((u_char)HFCPCI_IRQ_ENABLE);
163 Write_hfc(hc, HFCPCI_INT_M2, hc->hw.int_m2);
164 }
165
166 /*
167 * free hardware resources used by driver
168 */
169 static void
170 release_io_hfcpci(struct hfc_pci *hc)
171 {
172 /* disable memory mapped ports + busmaster */
173 pci_write_config_word(hc->pdev, PCI_COMMAND, 0);
174 del_timer(&hc->hw.timer);
175 pci_free_consistent(hc->pdev, 0x8000, hc->hw.fifos, hc->hw.dmahandle);
176 iounmap(hc->hw.pci_io);
177 }
178
179 /*
180 * set mode (NT or TE)
181 */
182 static void
183 hfcpci_setmode(struct hfc_pci *hc)
184 {
185 if (hc->hw.protocol == ISDN_P_NT_S0) {
186 hc->hw.clkdel = CLKDEL_NT; /* ST-Bit delay for NT-Mode */
187 hc->hw.sctrl |= SCTRL_MODE_NT; /* NT-MODE */
188 hc->hw.states = 1; /* G1 */
189 } else {
190 hc->hw.clkdel = CLKDEL_TE; /* ST-Bit delay for TE-Mode */
191 hc->hw.sctrl &= ~SCTRL_MODE_NT; /* TE-MODE */
192 hc->hw.states = 2; /* F2 */
193 }
194 Write_hfc(hc, HFCPCI_CLKDEL, hc->hw.clkdel);
195 Write_hfc(hc, HFCPCI_STATES, HFCPCI_LOAD_STATE | hc->hw.states);
196 udelay(10);
197 Write_hfc(hc, HFCPCI_STATES, hc->hw.states | 0x40); /* Deactivate */
198 Write_hfc(hc, HFCPCI_SCTRL, hc->hw.sctrl);
199 }
200
201 /*
202 * function called to reset the HFC PCI chip. A complete software reset of chip
203 * and fifos is done.
204 */
205 static void
206 reset_hfcpci(struct hfc_pci *hc)
207 {
208 u_char val;
209 int cnt = 0;
210
211 printk(KERN_DEBUG "reset_hfcpci: entered\n");
212 val = Read_hfc(hc, HFCPCI_CHIP_ID);
213 printk(KERN_INFO "HFC_PCI: resetting HFC ChipId(%x)\n", val);
214 /* enable memory mapped ports, disable busmaster */
215 pci_write_config_word(hc->pdev, PCI_COMMAND, PCI_ENA_MEMIO);
216 disable_hwirq(hc);
217 /* enable memory ports + busmaster */
218 pci_write_config_word(hc->pdev, PCI_COMMAND,
219 PCI_ENA_MEMIO + PCI_ENA_MASTER);
220 val = Read_hfc(hc, HFCPCI_STATUS);
221 printk(KERN_DEBUG "HFC-PCI status(%x) before reset\n", val);
222 hc->hw.cirm = HFCPCI_RESET; /* Reset On */
223 Write_hfc(hc, HFCPCI_CIRM, hc->hw.cirm);
224 set_current_state(TASK_UNINTERRUPTIBLE);
225 mdelay(10); /* Timeout 10ms */
226 hc->hw.cirm = 0; /* Reset Off */
227 Write_hfc(hc, HFCPCI_CIRM, hc->hw.cirm);
228 val = Read_hfc(hc, HFCPCI_STATUS);
229 printk(KERN_DEBUG "HFC-PCI status(%x) after reset\n", val);
230 while (cnt < 50000) { /* max 50000 us */
231 udelay(5);
232 cnt += 5;
233 val = Read_hfc(hc, HFCPCI_STATUS);
234 if (!(val & 2))
235 break;
236 }
237 printk(KERN_DEBUG "HFC-PCI status(%x) after %dus\n", val, cnt);
238
239 hc->hw.fifo_en = 0x30; /* only D fifos enabled */
240
241 hc->hw.bswapped = 0; /* no exchange */
242 hc->hw.ctmt = HFCPCI_TIM3_125 | HFCPCI_AUTO_TIMER;
243 hc->hw.trm = HFCPCI_BTRANS_THRESMASK; /* no echo connect , threshold */
244 hc->hw.sctrl = 0x40; /* set tx_lo mode, error in datasheet ! */
245 hc->hw.sctrl_r = 0;
246 hc->hw.sctrl_e = HFCPCI_AUTO_AWAKE; /* S/T Auto awake */
247 hc->hw.mst_m = 0;
248 if (test_bit(HFC_CFG_MASTER, &hc->cfg))
249 hc->hw.mst_m |= HFCPCI_MASTER; /* HFC Master Mode */
250 if (test_bit(HFC_CFG_NEG_F0, &hc->cfg))
251 hc->hw.mst_m |= HFCPCI_F0_NEGATIV;
252 Write_hfc(hc, HFCPCI_FIFO_EN, hc->hw.fifo_en);
253 Write_hfc(hc, HFCPCI_TRM, hc->hw.trm);
254 Write_hfc(hc, HFCPCI_SCTRL_E, hc->hw.sctrl_e);
255 Write_hfc(hc, HFCPCI_CTMT, hc->hw.ctmt);
256
257 hc->hw.int_m1 = HFCPCI_INTS_DTRANS | HFCPCI_INTS_DREC |
258 HFCPCI_INTS_L1STATE | HFCPCI_INTS_TIMER;
259 Write_hfc(hc, HFCPCI_INT_M1, hc->hw.int_m1);
260
261 /* Clear already pending ints */
262 val = Read_hfc(hc, HFCPCI_INT_S1);
263
264 /* set NT/TE mode */
265 hfcpci_setmode(hc);
266
267 Write_hfc(hc, HFCPCI_MST_MODE, hc->hw.mst_m);
268 Write_hfc(hc, HFCPCI_SCTRL_R, hc->hw.sctrl_r);
269
270 /*
271 * Init GCI/IOM2 in master mode
272 * Slots 0 and 1 are set for B-chan 1 and 2
273 * D- and monitor/CI channel are not enabled
274 * STIO1 is used as output for data, B1+B2 from ST->IOM+HFC
275 * STIO2 is used as data input, B1+B2 from IOM->ST
276 * ST B-channel send disabled -> continuous 1s
277 * The IOM slots are always enabled
278 */
279 if (test_bit(HFC_CFG_PCM, &hc->cfg)) {
280 /* set data flow directions: connect B1,B2: HFC to/from PCM */
281 hc->hw.conn = 0x09;
282 } else {
283 hc->hw.conn = 0x36; /* set data flow directions */
284 if (test_bit(HFC_CFG_SW_DD_DU, &hc->cfg)) {
285 Write_hfc(hc, HFCPCI_B1_SSL, 0xC0);
286 Write_hfc(hc, HFCPCI_B2_SSL, 0xC1);
287 Write_hfc(hc, HFCPCI_B1_RSL, 0xC0);
288 Write_hfc(hc, HFCPCI_B2_RSL, 0xC1);
289 } else {
290 Write_hfc(hc, HFCPCI_B1_SSL, 0x80);
291 Write_hfc(hc, HFCPCI_B2_SSL, 0x81);
292 Write_hfc(hc, HFCPCI_B1_RSL, 0x80);
293 Write_hfc(hc, HFCPCI_B2_RSL, 0x81);
294 }
295 }
296 Write_hfc(hc, HFCPCI_CONNECT, hc->hw.conn);
297 val = Read_hfc(hc, HFCPCI_INT_S2);
298 }
299
300 /*
301 * Timer function called when kernel timer expires
302 */
303 static void
304 hfcpci_Timer(struct hfc_pci *hc)
305 {
306 hc->hw.timer.expires = jiffies + 75;
307 /* WD RESET */
308 /*
309 * WriteReg(hc, HFCD_DATA, HFCD_CTMT, hc->hw.ctmt | 0x80);
310 * add_timer(&hc->hw.timer);
311 */
312 }
313
314
315 /*
316 * select a b-channel entry matching and active
317 */
318 static struct bchannel *
319 Sel_BCS(struct hfc_pci *hc, int channel)
320 {
321 if (test_bit(FLG_ACTIVE, &hc->bch[0].Flags) &&
322 (hc->bch[0].nr & channel))
323 return &hc->bch[0];
324 else if (test_bit(FLG_ACTIVE, &hc->bch[1].Flags) &&
325 (hc->bch[1].nr & channel))
326 return &hc->bch[1];
327 else
328 return NULL;
329 }
330
331 /*
332 * clear the desired B-channel rx fifo
333 */
334 static void
335 hfcpci_clear_fifo_rx(struct hfc_pci *hc, int fifo)
336 {
337 u_char fifo_state;
338 struct bzfifo *bzr;
339
340 if (fifo) {
341 bzr = &((union fifo_area *)(hc->hw.fifos))->b_chans.rxbz_b2;
342 fifo_state = hc->hw.fifo_en & HFCPCI_FIFOEN_B2RX;
343 } else {
344 bzr = &((union fifo_area *)(hc->hw.fifos))->b_chans.rxbz_b1;
345 fifo_state = hc->hw.fifo_en & HFCPCI_FIFOEN_B1RX;
346 }
347 if (fifo_state)
348 hc->hw.fifo_en ^= fifo_state;
349 Write_hfc(hc, HFCPCI_FIFO_EN, hc->hw.fifo_en);
350 hc->hw.last_bfifo_cnt[fifo] = 0;
351 bzr->f1 = MAX_B_FRAMES;
352 bzr->f2 = bzr->f1; /* init F pointers to remain constant */
353 bzr->za[MAX_B_FRAMES].z1 = cpu_to_le16(B_FIFO_SIZE + B_SUB_VAL - 1);
354 bzr->za[MAX_B_FRAMES].z2 = cpu_to_le16(
355 le16_to_cpu(bzr->za[MAX_B_FRAMES].z1));
356 if (fifo_state)
357 hc->hw.fifo_en |= fifo_state;
358 Write_hfc(hc, HFCPCI_FIFO_EN, hc->hw.fifo_en);
359 }
360
361 /*
362 * clear the desired B-channel tx fifo
363 */
364 static void hfcpci_clear_fifo_tx(struct hfc_pci *hc, int fifo)
365 {
366 u_char fifo_state;
367 struct bzfifo *bzt;
368
369 if (fifo) {
370 bzt = &((union fifo_area *)(hc->hw.fifos))->b_chans.txbz_b2;
371 fifo_state = hc->hw.fifo_en & HFCPCI_FIFOEN_B2TX;
372 } else {
373 bzt = &((union fifo_area *)(hc->hw.fifos))->b_chans.txbz_b1;
374 fifo_state = hc->hw.fifo_en & HFCPCI_FIFOEN_B1TX;
375 }
376 if (fifo_state)
377 hc->hw.fifo_en ^= fifo_state;
378 Write_hfc(hc, HFCPCI_FIFO_EN, hc->hw.fifo_en);
379 if (hc->bch[fifo].debug & DEBUG_HW_BCHANNEL)
380 printk(KERN_DEBUG "hfcpci_clear_fifo_tx%d f1(%x) f2(%x) "
381 "z1(%x) z2(%x) state(%x)\n",
382 fifo, bzt->f1, bzt->f2,
383 le16_to_cpu(bzt->za[MAX_B_FRAMES].z1),
384 le16_to_cpu(bzt->za[MAX_B_FRAMES].z2),
385 fifo_state);
386 bzt->f2 = MAX_B_FRAMES;
387 bzt->f1 = bzt->f2; /* init F pointers to remain constant */
388 bzt->za[MAX_B_FRAMES].z1 = cpu_to_le16(B_FIFO_SIZE + B_SUB_VAL - 1);
389 bzt->za[MAX_B_FRAMES].z2 = cpu_to_le16(B_FIFO_SIZE + B_SUB_VAL - 2);
390 if (fifo_state)
391 hc->hw.fifo_en |= fifo_state;
392 Write_hfc(hc, HFCPCI_FIFO_EN, hc->hw.fifo_en);
393 if (hc->bch[fifo].debug & DEBUG_HW_BCHANNEL)
394 printk(KERN_DEBUG
395 "hfcpci_clear_fifo_tx%d f1(%x) f2(%x) z1(%x) z2(%x)\n",
396 fifo, bzt->f1, bzt->f2,
397 le16_to_cpu(bzt->za[MAX_B_FRAMES].z1),
398 le16_to_cpu(bzt->za[MAX_B_FRAMES].z2));
399 }
400
401 /*
402 * read a complete B-frame out of the buffer
403 */
404 static void
405 hfcpci_empty_bfifo(struct bchannel *bch, struct bzfifo *bz,
406 u_char *bdata, int count)
407 {
408 u_char *ptr, *ptr1, new_f2;
409 int maxlen, new_z2;
410 struct zt *zp;
411
412 if ((bch->debug & DEBUG_HW_BCHANNEL) && !(bch->debug & DEBUG_HW_BFIFO))
413 printk(KERN_DEBUG "hfcpci_empty_fifo\n");
414 zp = &bz->za[bz->f2]; /* point to Z-Regs */
415 new_z2 = le16_to_cpu(zp->z2) + count; /* new position in fifo */
416 if (new_z2 >= (B_FIFO_SIZE + B_SUB_VAL))
417 new_z2 -= B_FIFO_SIZE; /* buffer wrap */
418 new_f2 = (bz->f2 + 1) & MAX_B_FRAMES;
419 if ((count > MAX_DATA_SIZE + 3) || (count < 4) ||
420 (*(bdata + (le16_to_cpu(zp->z1) - B_SUB_VAL)))) {
421 if (bch->debug & DEBUG_HW)
422 printk(KERN_DEBUG "hfcpci_empty_fifo: incoming packet "
423 "invalid length %d or crc\n", count);
424 #ifdef ERROR_STATISTIC
425 bch->err_inv++;
426 #endif
427 bz->za[new_f2].z2 = cpu_to_le16(new_z2);
428 bz->f2 = new_f2; /* next buffer */
429 } else {
430 bch->rx_skb = mI_alloc_skb(count - 3, GFP_ATOMIC);
431 if (!bch->rx_skb) {
432 printk(KERN_WARNING "HFCPCI: receive out of memory\n");
433 return;
434 }
435 count -= 3;
436 ptr = skb_put(bch->rx_skb, count);
437
438 if (le16_to_cpu(zp->z2) + count <= B_FIFO_SIZE + B_SUB_VAL)
439 maxlen = count; /* complete transfer */
440 else
441 maxlen = B_FIFO_SIZE + B_SUB_VAL -
442 le16_to_cpu(zp->z2); /* maximum */
443
444 ptr1 = bdata + (le16_to_cpu(zp->z2) - B_SUB_VAL);
445 /* start of data */
446 memcpy(ptr, ptr1, maxlen); /* copy data */
447 count -= maxlen;
448
449 if (count) { /* rest remaining */
450 ptr += maxlen;
451 ptr1 = bdata; /* start of buffer */
452 memcpy(ptr, ptr1, count); /* rest */
453 }
454 bz->za[new_f2].z2 = cpu_to_le16(new_z2);
455 bz->f2 = new_f2; /* next buffer */
456 recv_Bchannel(bch, MISDN_ID_ANY);
457 }
458 }
459
460 /*
461 * D-channel receive procedure
462 */
463 static int
464 receive_dmsg(struct hfc_pci *hc)
465 {
466 struct dchannel *dch = &hc->dch;
467 int maxlen;
468 int rcnt, total;
469 int count = 5;
470 u_char *ptr, *ptr1;
471 struct dfifo *df;
472 struct zt *zp;
473
474 df = &((union fifo_area *)(hc->hw.fifos))->d_chan.d_rx;
475 while (((df->f1 & D_FREG_MASK) != (df->f2 & D_FREG_MASK)) && count--) {
476 zp = &df->za[df->f2 & D_FREG_MASK];
477 rcnt = le16_to_cpu(zp->z1) - le16_to_cpu(zp->z2);
478 if (rcnt < 0)
479 rcnt += D_FIFO_SIZE;
480 rcnt++;
481 if (dch->debug & DEBUG_HW_DCHANNEL)
482 printk(KERN_DEBUG
483 "hfcpci recd f1(%d) f2(%d) z1(%x) z2(%x) cnt(%d)\n",
484 df->f1, df->f2,
485 le16_to_cpu(zp->z1),
486 le16_to_cpu(zp->z2),
487 rcnt);
488
489 if ((rcnt > MAX_DFRAME_LEN + 3) || (rcnt < 4) ||
490 (df->data[le16_to_cpu(zp->z1)])) {
491 if (dch->debug & DEBUG_HW)
492 printk(KERN_DEBUG
493 "empty_fifo hfcpci paket inv. len "
494 "%d or crc %d\n",
495 rcnt,
496 df->data[le16_to_cpu(zp->z1)]);
497 #ifdef ERROR_STATISTIC
498 cs->err_rx++;
499 #endif
500 df->f2 = ((df->f2 + 1) & MAX_D_FRAMES) |
501 (MAX_D_FRAMES + 1); /* next buffer */
502 df->za[df->f2 & D_FREG_MASK].z2 =
503 cpu_to_le16((le16_to_cpu(zp->z2) + rcnt) &
504 (D_FIFO_SIZE - 1));
505 } else {
506 dch->rx_skb = mI_alloc_skb(rcnt - 3, GFP_ATOMIC);
507 if (!dch->rx_skb) {
508 printk(KERN_WARNING
509 "HFC-PCI: D receive out of memory\n");
510 break;
511 }
512 total = rcnt;
513 rcnt -= 3;
514 ptr = skb_put(dch->rx_skb, rcnt);
515
516 if (le16_to_cpu(zp->z2) + rcnt <= D_FIFO_SIZE)
517 maxlen = rcnt; /* complete transfer */
518 else
519 maxlen = D_FIFO_SIZE - le16_to_cpu(zp->z2);
520 /* maximum */
521
522 ptr1 = df->data + le16_to_cpu(zp->z2);
523 /* start of data */
524 memcpy(ptr, ptr1, maxlen); /* copy data */
525 rcnt -= maxlen;
526
527 if (rcnt) { /* rest remaining */
528 ptr += maxlen;
529 ptr1 = df->data; /* start of buffer */
530 memcpy(ptr, ptr1, rcnt); /* rest */
531 }
532 df->f2 = ((df->f2 + 1) & MAX_D_FRAMES) |
533 (MAX_D_FRAMES + 1); /* next buffer */
534 df->za[df->f2 & D_FREG_MASK].z2 = cpu_to_le16((
535 le16_to_cpu(zp->z2) + total) & (D_FIFO_SIZE - 1));
536 recv_Dchannel(dch);
537 }
538 }
539 return 1;
540 }
541
542 /*
543 * check for transparent receive data and read max one 'poll' size if avail
544 */
545 static void
546 hfcpci_empty_fifo_trans(struct bchannel *bch, struct bzfifo *rxbz,
547 struct bzfifo *txbz, u_char *bdata)
548 {
549 __le16 *z1r, *z2r, *z1t, *z2t;
550 int new_z2, fcnt_rx, fcnt_tx, maxlen;
551 u_char *ptr, *ptr1;
552
553 z1r = &rxbz->za[MAX_B_FRAMES].z1; /* pointer to z reg */
554 z2r = z1r + 1;
555 z1t = &txbz->za[MAX_B_FRAMES].z1;
556 z2t = z1t + 1;
557
558 fcnt_rx = le16_to_cpu(*z1r) - le16_to_cpu(*z2r);
559 if (!fcnt_rx)
560 return; /* no data avail */
561
562 if (fcnt_rx <= 0)
563 fcnt_rx += B_FIFO_SIZE; /* bytes actually buffered */
564 new_z2 = le16_to_cpu(*z2r) + fcnt_rx; /* new position in fifo */
565 if (new_z2 >= (B_FIFO_SIZE + B_SUB_VAL))
566 new_z2 -= B_FIFO_SIZE; /* buffer wrap */
567
568 if (fcnt_rx > MAX_DATA_SIZE) { /* flush, if oversized */
569 *z2r = cpu_to_le16(new_z2); /* new position */
570 return;
571 }
572
573 fcnt_tx = le16_to_cpu(*z2t) - le16_to_cpu(*z1t);
574 if (fcnt_tx <= 0)
575 fcnt_tx += B_FIFO_SIZE;
576 /* fcnt_tx contains available bytes in tx-fifo */
577 fcnt_tx = B_FIFO_SIZE - fcnt_tx;
578 /* remaining bytes to send (bytes in tx-fifo) */
579
580 bch->rx_skb = mI_alloc_skb(fcnt_rx, GFP_ATOMIC);
581 if (bch->rx_skb) {
582 ptr = skb_put(bch->rx_skb, fcnt_rx);
583 if (le16_to_cpu(*z2r) + fcnt_rx <= B_FIFO_SIZE + B_SUB_VAL)
584 maxlen = fcnt_rx; /* complete transfer */
585 else
586 maxlen = B_FIFO_SIZE + B_SUB_VAL - le16_to_cpu(*z2r);
587 /* maximum */
588
589 ptr1 = bdata + (le16_to_cpu(*z2r) - B_SUB_VAL);
590 /* start of data */
591 memcpy(ptr, ptr1, maxlen); /* copy data */
592 fcnt_rx -= maxlen;
593
594 if (fcnt_rx) { /* rest remaining */
595 ptr += maxlen;
596 ptr1 = bdata; /* start of buffer */
597 memcpy(ptr, ptr1, fcnt_rx); /* rest */
598 }
599 recv_Bchannel(bch, fcnt_tx); /* bch, id */
600 } else
601 printk(KERN_WARNING "HFCPCI: receive out of memory\n");
602
603 *z2r = cpu_to_le16(new_z2); /* new position */
604 }
605
606 /*
607 * B-channel main receive routine
608 */
609 static void
610 main_rec_hfcpci(struct bchannel *bch)
611 {
612 struct hfc_pci *hc = bch->hw;
613 int rcnt, real_fifo;
614 int receive = 0, count = 5;
615 struct bzfifo *txbz, *rxbz;
616 u_char *bdata;
617 struct zt *zp;
618
619 if ((bch->nr & 2) && (!hc->hw.bswapped)) {
620 rxbz = &((union fifo_area *)(hc->hw.fifos))->b_chans.rxbz_b2;
621 txbz = &((union fifo_area *)(hc->hw.fifos))->b_chans.txbz_b2;
622 bdata = ((union fifo_area *)(hc->hw.fifos))->b_chans.rxdat_b2;
623 real_fifo = 1;
624 } else {
625 rxbz = &((union fifo_area *)(hc->hw.fifos))->b_chans.rxbz_b1;
626 txbz = &((union fifo_area *)(hc->hw.fifos))->b_chans.txbz_b1;
627 bdata = ((union fifo_area *)(hc->hw.fifos))->b_chans.rxdat_b1;
628 real_fifo = 0;
629 }
630 Begin:
631 count--;
632 if (rxbz->f1 != rxbz->f2) {
633 if (bch->debug & DEBUG_HW_BCHANNEL)
634 printk(KERN_DEBUG "hfcpci rec ch(%x) f1(%d) f2(%d)\n",
635 bch->nr, rxbz->f1, rxbz->f2);
636 zp = &rxbz->za[rxbz->f2];
637
638 rcnt = le16_to_cpu(zp->z1) - le16_to_cpu(zp->z2);
639 if (rcnt < 0)
640 rcnt += B_FIFO_SIZE;
641 rcnt++;
642 if (bch->debug & DEBUG_HW_BCHANNEL)
643 printk(KERN_DEBUG
644 "hfcpci rec ch(%x) z1(%x) z2(%x) cnt(%d)\n",
645 bch->nr, le16_to_cpu(zp->z1),
646 le16_to_cpu(zp->z2), rcnt);
647 hfcpci_empty_bfifo(bch, rxbz, bdata, rcnt);
648 rcnt = rxbz->f1 - rxbz->f2;
649 if (rcnt < 0)
650 rcnt += MAX_B_FRAMES + 1;
651 if (hc->hw.last_bfifo_cnt[real_fifo] > rcnt + 1) {
652 rcnt = 0;
653 hfcpci_clear_fifo_rx(hc, real_fifo);
654 }
655 hc->hw.last_bfifo_cnt[real_fifo] = rcnt;
656 if (rcnt > 1)
657 receive = 1;
658 else
659 receive = 0;
660 } else if (test_bit(FLG_TRANSPARENT, &bch->Flags)) {
661 hfcpci_empty_fifo_trans(bch, rxbz, txbz, bdata);
662 return;
663 } else
664 receive = 0;
665 if (count && receive)
666 goto Begin;
667
668 }
669
670 /*
671 * D-channel send routine
672 */
673 static void
674 hfcpci_fill_dfifo(struct hfc_pci *hc)
675 {
676 struct dchannel *dch = &hc->dch;
677 int fcnt;
678 int count, new_z1, maxlen;
679 struct dfifo *df;
680 u_char *src, *dst, new_f1;
681
682 if ((dch->debug & DEBUG_HW_DCHANNEL) && !(dch->debug & DEBUG_HW_DFIFO))
683 printk(KERN_DEBUG "%s\n", __func__);
684
685 if (!dch->tx_skb)
686 return;
687 count = dch->tx_skb->len - dch->tx_idx;
688 if (count <= 0)
689 return;
690 df = &((union fifo_area *) (hc->hw.fifos))->d_chan.d_tx;
691
692 if (dch->debug & DEBUG_HW_DFIFO)
693 printk(KERN_DEBUG "%s:f1(%d) f2(%d) z1(f1)(%x)\n", __func__,
694 df->f1, df->f2,
695 le16_to_cpu(df->za[df->f1 & D_FREG_MASK].z1));
696 fcnt = df->f1 - df->f2; /* frame count actually buffered */
697 if (fcnt < 0)
698 fcnt += (MAX_D_FRAMES + 1); /* if wrap around */
699 if (fcnt > (MAX_D_FRAMES - 1)) {
700 if (dch->debug & DEBUG_HW_DCHANNEL)
701 printk(KERN_DEBUG
702 "hfcpci_fill_Dfifo more as 14 frames\n");
703 #ifdef ERROR_STATISTIC
704 cs->err_tx++;
705 #endif
706 return;
707 }
708 /* now determine free bytes in FIFO buffer */
709 maxlen = le16_to_cpu(df->za[df->f2 & D_FREG_MASK].z2) -
710 le16_to_cpu(df->za[df->f1 & D_FREG_MASK].z1) - 1;
711 if (maxlen <= 0)
712 maxlen += D_FIFO_SIZE; /* count now contains available bytes */
713
714 if (dch->debug & DEBUG_HW_DCHANNEL)
715 printk(KERN_DEBUG "hfcpci_fill_Dfifo count(%d/%d)\n",
716 count, maxlen);
717 if (count > maxlen) {
718 if (dch->debug & DEBUG_HW_DCHANNEL)
719 printk(KERN_DEBUG "hfcpci_fill_Dfifo no fifo mem\n");
720 return;
721 }
722 new_z1 = (le16_to_cpu(df->za[df->f1 & D_FREG_MASK].z1) + count) &
723 (D_FIFO_SIZE - 1);
724 new_f1 = ((df->f1 + 1) & D_FREG_MASK) | (D_FREG_MASK + 1);
725 src = dch->tx_skb->data + dch->tx_idx; /* source pointer */
726 dst = df->data + le16_to_cpu(df->za[df->f1 & D_FREG_MASK].z1);
727 maxlen = D_FIFO_SIZE - le16_to_cpu(df->za[df->f1 & D_FREG_MASK].z1);
728 /* end fifo */
729 if (maxlen > count)
730 maxlen = count; /* limit size */
731 memcpy(dst, src, maxlen); /* first copy */
732
733 count -= maxlen; /* remaining bytes */
734 if (count) {
735 dst = df->data; /* start of buffer */
736 src += maxlen; /* new position */
737 memcpy(dst, src, count);
738 }
739 df->za[new_f1 & D_FREG_MASK].z1 = cpu_to_le16(new_z1);
740 /* for next buffer */
741 df->za[df->f1 & D_FREG_MASK].z1 = cpu_to_le16(new_z1);
742 /* new pos actual buffer */
743 df->f1 = new_f1; /* next frame */
744 dch->tx_idx = dch->tx_skb->len;
745 }
746
747 /*
748 * B-channel send routine
749 */
750 static void
751 hfcpci_fill_fifo(struct bchannel *bch)
752 {
753 struct hfc_pci *hc = bch->hw;
754 int maxlen, fcnt;
755 int count, new_z1;
756 struct bzfifo *bz;
757 u_char *bdata;
758 u_char new_f1, *src, *dst;
759 __le16 *z1t, *z2t;
760
761 if ((bch->debug & DEBUG_HW_BCHANNEL) && !(bch->debug & DEBUG_HW_BFIFO))
762 printk(KERN_DEBUG "%s\n", __func__);
763 if ((!bch->tx_skb) || bch->tx_skb->len <= 0)
764 return;
765 count = bch->tx_skb->len - bch->tx_idx;
766 if ((bch->nr & 2) && (!hc->hw.bswapped)) {
767 bz = &((union fifo_area *)(hc->hw.fifos))->b_chans.txbz_b2;
768 bdata = ((union fifo_area *)(hc->hw.fifos))->b_chans.txdat_b2;
769 } else {
770 bz = &((union fifo_area *)(hc->hw.fifos))->b_chans.txbz_b1;
771 bdata = ((union fifo_area *)(hc->hw.fifos))->b_chans.txdat_b1;
772 }
773
774 if (test_bit(FLG_TRANSPARENT, &bch->Flags)) {
775 z1t = &bz->za[MAX_B_FRAMES].z1;
776 z2t = z1t + 1;
777 if (bch->debug & DEBUG_HW_BCHANNEL)
778 printk(KERN_DEBUG "hfcpci_fill_fifo_trans ch(%x) "
779 "cnt(%d) z1(%x) z2(%x)\n", bch->nr, count,
780 le16_to_cpu(*z1t), le16_to_cpu(*z2t));
781 fcnt = le16_to_cpu(*z2t) - le16_to_cpu(*z1t);
782 if (fcnt <= 0)
783 fcnt += B_FIFO_SIZE;
784 /* fcnt contains available bytes in fifo */
785 fcnt = B_FIFO_SIZE - fcnt;
786 /* remaining bytes to send (bytes in fifo) */
787
788 /* "fill fifo if empty" feature */
789 if (test_bit(FLG_FILLEMPTY, &bch->Flags) && !fcnt) {
790 /* printk(KERN_DEBUG "%s: buffer empty, so we have "
791 "underrun\n", __func__); */
792 /* fill buffer, to prevent future underrun */
793 count = HFCPCI_FILLEMPTY;
794 new_z1 = le16_to_cpu(*z1t) + count;
795 /* new buffer Position */
796 if (new_z1 >= (B_FIFO_SIZE + B_SUB_VAL))
797 new_z1 -= B_FIFO_SIZE; /* buffer wrap */
798 dst = bdata + (le16_to_cpu(*z1t) - B_SUB_VAL);
799 maxlen = (B_FIFO_SIZE + B_SUB_VAL) - le16_to_cpu(*z1t);
800 /* end of fifo */
801 if (bch->debug & DEBUG_HW_BFIFO)
802 printk(KERN_DEBUG "hfcpci_FFt fillempty "
803 "fcnt(%d) maxl(%d) nz1(%x) dst(%p)\n",
804 fcnt, maxlen, new_z1, dst);
805 fcnt += count;
806 if (maxlen > count)
807 maxlen = count; /* limit size */
808 memset(dst, 0x2a, maxlen); /* first copy */
809 count -= maxlen; /* remaining bytes */
810 if (count) {
811 dst = bdata; /* start of buffer */
812 memset(dst, 0x2a, count);
813 }
814 *z1t = cpu_to_le16(new_z1); /* now send data */
815 }
816
817 next_t_frame:
818 count = bch->tx_skb->len - bch->tx_idx;
819 /* maximum fill shall be poll*2 */
820 if (count > (poll << 1) - fcnt)
821 count = (poll << 1) - fcnt;
822 if (count <= 0)
823 return;
824 /* data is suitable for fifo */
825 new_z1 = le16_to_cpu(*z1t) + count;
826 /* new buffer Position */
827 if (new_z1 >= (B_FIFO_SIZE + B_SUB_VAL))
828 new_z1 -= B_FIFO_SIZE; /* buffer wrap */
829 src = bch->tx_skb->data + bch->tx_idx;
830 /* source pointer */
831 dst = bdata + (le16_to_cpu(*z1t) - B_SUB_VAL);
832 maxlen = (B_FIFO_SIZE + B_SUB_VAL) - le16_to_cpu(*z1t);
833 /* end of fifo */
834 if (bch->debug & DEBUG_HW_BFIFO)
835 printk(KERN_DEBUG "hfcpci_FFt fcnt(%d) "
836 "maxl(%d) nz1(%x) dst(%p)\n",
837 fcnt, maxlen, new_z1, dst);
838 fcnt += count;
839 bch->tx_idx += count;
840 if (maxlen > count)
841 maxlen = count; /* limit size */
842 memcpy(dst, src, maxlen); /* first copy */
843 count -= maxlen; /* remaining bytes */
844 if (count) {
845 dst = bdata; /* start of buffer */
846 src += maxlen; /* new position */
847 memcpy(dst, src, count);
848 }
849 *z1t = cpu_to_le16(new_z1); /* now send data */
850 if (bch->tx_idx < bch->tx_skb->len)
851 return;
852 /* send confirm, on trans, free on hdlc. */
853 if (test_bit(FLG_TRANSPARENT, &bch->Flags))
854 confirm_Bsend(bch);
855 dev_kfree_skb(bch->tx_skb);
856 if (get_next_bframe(bch))
857 goto next_t_frame;
858 return;
859 }
860 if (bch->debug & DEBUG_HW_BCHANNEL)
861 printk(KERN_DEBUG
862 "%s: ch(%x) f1(%d) f2(%d) z1(f1)(%x)\n",
863 __func__, bch->nr, bz->f1, bz->f2,
864 bz->za[bz->f1].z1);
865 fcnt = bz->f1 - bz->f2; /* frame count actually buffered */
866 if (fcnt < 0)
867 fcnt += (MAX_B_FRAMES + 1); /* if wrap around */
868 if (fcnt > (MAX_B_FRAMES - 1)) {
869 if (bch->debug & DEBUG_HW_BCHANNEL)
870 printk(KERN_DEBUG
871 "hfcpci_fill_Bfifo more as 14 frames\n");
872 return;
873 }
874 /* now determine free bytes in FIFO buffer */
875 maxlen = le16_to_cpu(bz->za[bz->f2].z2) -
876 le16_to_cpu(bz->za[bz->f1].z1) - 1;
877 if (maxlen <= 0)
878 maxlen += B_FIFO_SIZE; /* count now contains available bytes */
879
880 if (bch->debug & DEBUG_HW_BCHANNEL)
881 printk(KERN_DEBUG "hfcpci_fill_fifo ch(%x) count(%d/%d)\n",
882 bch->nr, count, maxlen);
883
884 if (maxlen < count) {
885 if (bch->debug & DEBUG_HW_BCHANNEL)
886 printk(KERN_DEBUG "hfcpci_fill_fifo no fifo mem\n");
887 return;
888 }
889 new_z1 = le16_to_cpu(bz->za[bz->f1].z1) + count;
890 /* new buffer Position */
891 if (new_z1 >= (B_FIFO_SIZE + B_SUB_VAL))
892 new_z1 -= B_FIFO_SIZE; /* buffer wrap */
893
894 new_f1 = ((bz->f1 + 1) & MAX_B_FRAMES);
895 src = bch->tx_skb->data + bch->tx_idx; /* source pointer */
896 dst = bdata + (le16_to_cpu(bz->za[bz->f1].z1) - B_SUB_VAL);
897 maxlen = (B_FIFO_SIZE + B_SUB_VAL) - le16_to_cpu(bz->za[bz->f1].z1);
898 /* end fifo */
899 if (maxlen > count)
900 maxlen = count; /* limit size */
901 memcpy(dst, src, maxlen); /* first copy */
902
903 count -= maxlen; /* remaining bytes */
904 if (count) {
905 dst = bdata; /* start of buffer */
906 src += maxlen; /* new position */
907 memcpy(dst, src, count);
908 }
909 bz->za[new_f1].z1 = cpu_to_le16(new_z1); /* for next buffer */
910 bz->f1 = new_f1; /* next frame */
911 dev_kfree_skb(bch->tx_skb);
912 get_next_bframe(bch);
913 }
914
915
916
917 /*
918 * handle L1 state changes TE
919 */
920
921 static void
922 ph_state_te(struct dchannel *dch)
923 {
924 if (dch->debug)
925 printk(KERN_DEBUG "%s: TE newstate %x\n",
926 __func__, dch->state);
927 switch (dch->state) {
928 case 0:
929 l1_event(dch->l1, HW_RESET_IND);
930 break;
931 case 3:
932 l1_event(dch->l1, HW_DEACT_IND);
933 break;
934 case 5:
935 case 8:
936 l1_event(dch->l1, ANYSIGNAL);
937 break;
938 case 6:
939 l1_event(dch->l1, INFO2);
940 break;
941 case 7:
942 l1_event(dch->l1, INFO4_P8);
943 break;
944 }
945 }
946
947 /*
948 * handle L1 state changes NT
949 */
950
951 static void
952 handle_nt_timer3(struct dchannel *dch) {
953 struct hfc_pci *hc = dch->hw;
954
955 test_and_clear_bit(FLG_HFC_TIMER_T3, &dch->Flags);
956 hc->hw.int_m1 &= ~HFCPCI_INTS_TIMER;
957 Write_hfc(hc, HFCPCI_INT_M1, hc->hw.int_m1);
958 hc->hw.nt_timer = 0;
959 test_and_set_bit(FLG_ACTIVE, &dch->Flags);
960 if (test_bit(HFC_CFG_MASTER, &hc->cfg))
961 hc->hw.mst_m |= HFCPCI_MASTER;
962 Write_hfc(hc, HFCPCI_MST_MODE, hc->hw.mst_m);
963 _queue_data(&dch->dev.D, PH_ACTIVATE_IND,
964 MISDN_ID_ANY, 0, NULL, GFP_ATOMIC);
965 }
966
967 static void
968 ph_state_nt(struct dchannel *dch)
969 {
970 struct hfc_pci *hc = dch->hw;
971
972 if (dch->debug)
973 printk(KERN_DEBUG "%s: NT newstate %x\n",
974 __func__, dch->state);
975 switch (dch->state) {
976 case 2:
977 if (hc->hw.nt_timer < 0) {
978 hc->hw.nt_timer = 0;
979 test_and_clear_bit(FLG_HFC_TIMER_T3, &dch->Flags);
980 test_and_clear_bit(FLG_HFC_TIMER_T1, &dch->Flags);
981 hc->hw.int_m1 &= ~HFCPCI_INTS_TIMER;
982 Write_hfc(hc, HFCPCI_INT_M1, hc->hw.int_m1);
983 /* Clear already pending ints */
984 (void) Read_hfc(hc, HFCPCI_INT_S1);
985 Write_hfc(hc, HFCPCI_STATES, 4 | HFCPCI_LOAD_STATE);
986 udelay(10);
987 Write_hfc(hc, HFCPCI_STATES, 4);
988 dch->state = 4;
989 } else if (hc->hw.nt_timer == 0) {
990 hc->hw.int_m1 |= HFCPCI_INTS_TIMER;
991 Write_hfc(hc, HFCPCI_INT_M1, hc->hw.int_m1);
992 hc->hw.nt_timer = NT_T1_COUNT;
993 hc->hw.ctmt &= ~HFCPCI_AUTO_TIMER;
994 hc->hw.ctmt |= HFCPCI_TIM3_125;
995 Write_hfc(hc, HFCPCI_CTMT, hc->hw.ctmt |
996 HFCPCI_CLTIMER);
997 test_and_clear_bit(FLG_HFC_TIMER_T3, &dch->Flags);
998 test_and_set_bit(FLG_HFC_TIMER_T1, &dch->Flags);
999 /* allow G2 -> G3 transition */
1000 Write_hfc(hc, HFCPCI_STATES, 2 | HFCPCI_NT_G2_G3);
1001 } else {
1002 Write_hfc(hc, HFCPCI_STATES, 2 | HFCPCI_NT_G2_G3);
1003 }
1004 break;
1005 case 1:
1006 hc->hw.nt_timer = 0;
1007 test_and_clear_bit(FLG_HFC_TIMER_T3, &dch->Flags);
1008 test_and_clear_bit(FLG_HFC_TIMER_T1, &dch->Flags);
1009 hc->hw.int_m1 &= ~HFCPCI_INTS_TIMER;
1010 Write_hfc(hc, HFCPCI_INT_M1, hc->hw.int_m1);
1011 test_and_clear_bit(FLG_ACTIVE, &dch->Flags);
1012 hc->hw.mst_m &= ~HFCPCI_MASTER;
1013 Write_hfc(hc, HFCPCI_MST_MODE, hc->hw.mst_m);
1014 test_and_clear_bit(FLG_L2_ACTIVATED, &dch->Flags);
1015 _queue_data(&dch->dev.D, PH_DEACTIVATE_IND,
1016 MISDN_ID_ANY, 0, NULL, GFP_ATOMIC);
1017 break;
1018 case 4:
1019 hc->hw.nt_timer = 0;
1020 test_and_clear_bit(FLG_HFC_TIMER_T3, &dch->Flags);
1021 test_and_clear_bit(FLG_HFC_TIMER_T1, &dch->Flags);
1022 hc->hw.int_m1 &= ~HFCPCI_INTS_TIMER;
1023 Write_hfc(hc, HFCPCI_INT_M1, hc->hw.int_m1);
1024 break;
1025 case 3:
1026 if (!test_and_set_bit(FLG_HFC_TIMER_T3, &dch->Flags)) {
1027 if (!test_and_clear_bit(FLG_L2_ACTIVATED,
1028 &dch->Flags)) {
1029 handle_nt_timer3(dch);
1030 break;
1031 }
1032 test_and_clear_bit(FLG_HFC_TIMER_T1, &dch->Flags);
1033 hc->hw.int_m1 |= HFCPCI_INTS_TIMER;
1034 Write_hfc(hc, HFCPCI_INT_M1, hc->hw.int_m1);
1035 hc->hw.nt_timer = NT_T3_COUNT;
1036 hc->hw.ctmt &= ~HFCPCI_AUTO_TIMER;
1037 hc->hw.ctmt |= HFCPCI_TIM3_125;
1038 Write_hfc(hc, HFCPCI_CTMT, hc->hw.ctmt |
1039 HFCPCI_CLTIMER);
1040 }
1041 break;
1042 }
1043 }
1044
1045 static void
1046 ph_state(struct dchannel *dch)
1047 {
1048 struct hfc_pci *hc = dch->hw;
1049
1050 if (hc->hw.protocol == ISDN_P_NT_S0) {
1051 if (test_bit(FLG_HFC_TIMER_T3, &dch->Flags) &&
1052 hc->hw.nt_timer < 0)
1053 handle_nt_timer3(dch);
1054 else
1055 ph_state_nt(dch);
1056 } else
1057 ph_state_te(dch);
1058 }
1059
1060 /*
1061 * Layer 1 callback function
1062 */
1063 static int
1064 hfc_l1callback(struct dchannel *dch, u_int cmd)
1065 {
1066 struct hfc_pci *hc = dch->hw;
1067
1068 switch (cmd) {
1069 case INFO3_P8:
1070 case INFO3_P10:
1071 if (test_bit(HFC_CFG_MASTER, &hc->cfg))
1072 hc->hw.mst_m |= HFCPCI_MASTER;
1073 Write_hfc(hc, HFCPCI_MST_MODE, hc->hw.mst_m);
1074 break;
1075 case HW_RESET_REQ:
1076 Write_hfc(hc, HFCPCI_STATES, HFCPCI_LOAD_STATE | 3);
1077 /* HFC ST 3 */
1078 udelay(6);
1079 Write_hfc(hc, HFCPCI_STATES, 3); /* HFC ST 2 */
1080 if (test_bit(HFC_CFG_MASTER, &hc->cfg))
1081 hc->hw.mst_m |= HFCPCI_MASTER;
1082 Write_hfc(hc, HFCPCI_MST_MODE, hc->hw.mst_m);
1083 Write_hfc(hc, HFCPCI_STATES, HFCPCI_ACTIVATE |
1084 HFCPCI_DO_ACTION);
1085 l1_event(dch->l1, HW_POWERUP_IND);
1086 break;
1087 case HW_DEACT_REQ:
1088 hc->hw.mst_m &= ~HFCPCI_MASTER;
1089 Write_hfc(hc, HFCPCI_MST_MODE, hc->hw.mst_m);
1090 skb_queue_purge(&dch->squeue);
1091 if (dch->tx_skb) {
1092 dev_kfree_skb(dch->tx_skb);
1093 dch->tx_skb = NULL;
1094 }
1095 dch->tx_idx = 0;
1096 if (dch->rx_skb) {
1097 dev_kfree_skb(dch->rx_skb);
1098 dch->rx_skb = NULL;
1099 }
1100 test_and_clear_bit(FLG_TX_BUSY, &dch->Flags);
1101 if (test_and_clear_bit(FLG_BUSY_TIMER, &dch->Flags))
1102 del_timer(&dch->timer);
1103 break;
1104 case HW_POWERUP_REQ:
1105 Write_hfc(hc, HFCPCI_STATES, HFCPCI_DO_ACTION);
1106 break;
1107 case PH_ACTIVATE_IND:
1108 test_and_set_bit(FLG_ACTIVE, &dch->Flags);
1109 _queue_data(&dch->dev.D, cmd, MISDN_ID_ANY, 0, NULL,
1110 GFP_ATOMIC);
1111 break;
1112 case PH_DEACTIVATE_IND:
1113 test_and_clear_bit(FLG_ACTIVE, &dch->Flags);
1114 _queue_data(&dch->dev.D, cmd, MISDN_ID_ANY, 0, NULL,
1115 GFP_ATOMIC);
1116 break;
1117 default:
1118 if (dch->debug & DEBUG_HW)
1119 printk(KERN_DEBUG "%s: unknown command %x\n",
1120 __func__, cmd);
1121 return -1;
1122 }
1123 return 0;
1124 }
1125
1126 /*
1127 * Interrupt handler
1128 */
1129 static inline void
1130 tx_birq(struct bchannel *bch)
1131 {
1132 if (bch->tx_skb && bch->tx_idx < bch->tx_skb->len)
1133 hfcpci_fill_fifo(bch);
1134 else {
1135 if (bch->tx_skb)
1136 dev_kfree_skb(bch->tx_skb);
1137 if (get_next_bframe(bch))
1138 hfcpci_fill_fifo(bch);
1139 }
1140 }
1141
1142 static inline void
1143 tx_dirq(struct dchannel *dch)
1144 {
1145 if (dch->tx_skb && dch->tx_idx < dch->tx_skb->len)
1146 hfcpci_fill_dfifo(dch->hw);
1147 else {
1148 if (dch->tx_skb)
1149 dev_kfree_skb(dch->tx_skb);
1150 if (get_next_dframe(dch))
1151 hfcpci_fill_dfifo(dch->hw);
1152 }
1153 }
1154
1155 static irqreturn_t
1156 hfcpci_int(int intno, void *dev_id)
1157 {
1158 struct hfc_pci *hc = dev_id;
1159 u_char exval;
1160 struct bchannel *bch;
1161 u_char val, stat;
1162
1163 spin_lock(&hc->lock);
1164 if (!(hc->hw.int_m2 & 0x08)) {
1165 spin_unlock(&hc->lock);
1166 return IRQ_NONE; /* not initialised */
1167 }
1168 stat = Read_hfc(hc, HFCPCI_STATUS);
1169 if (HFCPCI_ANYINT & stat) {
1170 val = Read_hfc(hc, HFCPCI_INT_S1);
1171 if (hc->dch.debug & DEBUG_HW_DCHANNEL)
1172 printk(KERN_DEBUG
1173 "HFC-PCI: stat(%02x) s1(%02x)\n", stat, val);
1174 } else {
1175 /* shared */
1176 spin_unlock(&hc->lock);
1177 return IRQ_NONE;
1178 }
1179 hc->irqcnt++;
1180
1181 if (hc->dch.debug & DEBUG_HW_DCHANNEL)
1182 printk(KERN_DEBUG "HFC-PCI irq %x\n", val);
1183 val &= hc->hw.int_m1;
1184 if (val & 0x40) { /* state machine irq */
1185 exval = Read_hfc(hc, HFCPCI_STATES) & 0xf;
1186 if (hc->dch.debug & DEBUG_HW_DCHANNEL)
1187 printk(KERN_DEBUG "ph_state chg %d->%d\n",
1188 hc->dch.state, exval);
1189 hc->dch.state = exval;
1190 schedule_event(&hc->dch, FLG_PHCHANGE);
1191 val &= ~0x40;
1192 }
1193 if (val & 0x80) { /* timer irq */
1194 if (hc->hw.protocol == ISDN_P_NT_S0) {
1195 if ((--hc->hw.nt_timer) < 0)
1196 schedule_event(&hc->dch, FLG_PHCHANGE);
1197 }
1198 val &= ~0x80;
1199 Write_hfc(hc, HFCPCI_CTMT, hc->hw.ctmt | HFCPCI_CLTIMER);
1200 }
1201 if (val & 0x08) { /* B1 rx */
1202 bch = Sel_BCS(hc, hc->hw.bswapped ? 2 : 1);
1203 if (bch)
1204 main_rec_hfcpci(bch);
1205 else if (hc->dch.debug)
1206 printk(KERN_DEBUG "hfcpci spurious 0x08 IRQ\n");
1207 }
1208 if (val & 0x10) { /* B2 rx */
1209 bch = Sel_BCS(hc, 2);
1210 if (bch)
1211 main_rec_hfcpci(bch);
1212 else if (hc->dch.debug)
1213 printk(KERN_DEBUG "hfcpci spurious 0x10 IRQ\n");
1214 }
1215 if (val & 0x01) { /* B1 tx */
1216 bch = Sel_BCS(hc, hc->hw.bswapped ? 2 : 1);
1217 if (bch)
1218 tx_birq(bch);
1219 else if (hc->dch.debug)
1220 printk(KERN_DEBUG "hfcpci spurious 0x01 IRQ\n");
1221 }
1222 if (val & 0x02) { /* B2 tx */
1223 bch = Sel_BCS(hc, 2);
1224 if (bch)
1225 tx_birq(bch);
1226 else if (hc->dch.debug)
1227 printk(KERN_DEBUG "hfcpci spurious 0x02 IRQ\n");
1228 }
1229 if (val & 0x20) /* D rx */
1230 receive_dmsg(hc);
1231 if (val & 0x04) { /* D tx */
1232 if (test_and_clear_bit(FLG_BUSY_TIMER, &hc->dch.Flags))
1233 del_timer(&hc->dch.timer);
1234 tx_dirq(&hc->dch);
1235 }
1236 spin_unlock(&hc->lock);
1237 return IRQ_HANDLED;
1238 }
1239
1240 /*
1241 * timer callback for D-chan busy resolution. Currently no function
1242 */
1243 static void
1244 hfcpci_dbusy_timer(struct hfc_pci *hc)
1245 {
1246 }
1247
1248 /*
1249 * activate/deactivate hardware for selected channels and mode
1250 */
1251 static int
1252 mode_hfcpci(struct bchannel *bch, int bc, int protocol)
1253 {
1254 struct hfc_pci *hc = bch->hw;
1255 int fifo2;
1256 u_char rx_slot = 0, tx_slot = 0, pcm_mode;
1257
1258 if (bch->debug & DEBUG_HW_BCHANNEL)
1259 printk(KERN_DEBUG
1260 "HFCPCI bchannel protocol %x-->%x ch %x-->%x\n",
1261 bch->state, protocol, bch->nr, bc);
1262
1263 fifo2 = bc;
1264 pcm_mode = (bc >> 24) & 0xff;
1265 if (pcm_mode) { /* PCM SLOT USE */
1266 if (!test_bit(HFC_CFG_PCM, &hc->cfg))
1267 printk(KERN_WARNING
1268 "%s: pcm channel id without HFC_CFG_PCM\n",
1269 __func__);
1270 rx_slot = (bc >> 8) & 0xff;
1271 tx_slot = (bc >> 16) & 0xff;
1272 bc = bc & 0xff;
1273 } else if (test_bit(HFC_CFG_PCM, &hc->cfg) && (protocol > ISDN_P_NONE))
1274 printk(KERN_WARNING "%s: no pcm channel id but HFC_CFG_PCM\n",
1275 __func__);
1276 if (hc->chanlimit > 1) {
1277 hc->hw.bswapped = 0; /* B1 and B2 normal mode */
1278 hc->hw.sctrl_e &= ~0x80;
1279 } else {
1280 if (bc & 2) {
1281 if (protocol != ISDN_P_NONE) {
1282 hc->hw.bswapped = 1; /* B1 and B2 exchanged */
1283 hc->hw.sctrl_e |= 0x80;
1284 } else {
1285 hc->hw.bswapped = 0; /* B1 and B2 normal mode */
1286 hc->hw.sctrl_e &= ~0x80;
1287 }
1288 fifo2 = 1;
1289 } else {
1290 hc->hw.bswapped = 0; /* B1 and B2 normal mode */
1291 hc->hw.sctrl_e &= ~0x80;
1292 }
1293 }
1294 switch (protocol) {
1295 case (-1): /* used for init */
1296 bch->state = -1;
1297 bch->nr = bc;
1298 case (ISDN_P_NONE):
1299 if (bch->state == ISDN_P_NONE)
1300 return 0;
1301 if (bc & 2) {
1302 hc->hw.sctrl &= ~SCTRL_B2_ENA;
1303 hc->hw.sctrl_r &= ~SCTRL_B2_ENA;
1304 } else {
1305 hc->hw.sctrl &= ~SCTRL_B1_ENA;
1306 hc->hw.sctrl_r &= ~SCTRL_B1_ENA;
1307 }
1308 if (fifo2 & 2) {
1309 hc->hw.fifo_en &= ~HFCPCI_FIFOEN_B2;
1310 hc->hw.int_m1 &= ~(HFCPCI_INTS_B2TRANS +
1311 HFCPCI_INTS_B2REC);
1312 } else {
1313 hc->hw.fifo_en &= ~HFCPCI_FIFOEN_B1;
1314 hc->hw.int_m1 &= ~(HFCPCI_INTS_B1TRANS +
1315 HFCPCI_INTS_B1REC);
1316 }
1317 #ifdef REVERSE_BITORDER
1318 if (bch->nr & 2)
1319 hc->hw.cirm &= 0x7f;
1320 else
1321 hc->hw.cirm &= 0xbf;
1322 #endif
1323 bch->state = ISDN_P_NONE;
1324 bch->nr = bc;
1325 test_and_clear_bit(FLG_HDLC, &bch->Flags);
1326 test_and_clear_bit(FLG_TRANSPARENT, &bch->Flags);
1327 break;
1328 case (ISDN_P_B_RAW):
1329 bch->state = protocol;
1330 bch->nr = bc;
1331 hfcpci_clear_fifo_rx(hc, (fifo2 & 2) ? 1 : 0);
1332 hfcpci_clear_fifo_tx(hc, (fifo2 & 2) ? 1 : 0);
1333 if (bc & 2) {
1334 hc->hw.sctrl |= SCTRL_B2_ENA;
1335 hc->hw.sctrl_r |= SCTRL_B2_ENA;
1336 #ifdef REVERSE_BITORDER
1337 hc->hw.cirm |= 0x80;
1338 #endif
1339 } else {
1340 hc->hw.sctrl |= SCTRL_B1_ENA;
1341 hc->hw.sctrl_r |= SCTRL_B1_ENA;
1342 #ifdef REVERSE_BITORDER
1343 hc->hw.cirm |= 0x40;
1344 #endif
1345 }
1346 if (fifo2 & 2) {
1347 hc->hw.fifo_en |= HFCPCI_FIFOEN_B2;
1348 if (!tics)
1349 hc->hw.int_m1 |= (HFCPCI_INTS_B2TRANS +
1350 HFCPCI_INTS_B2REC);
1351 hc->hw.ctmt |= 2;
1352 hc->hw.conn &= ~0x18;
1353 } else {
1354 hc->hw.fifo_en |= HFCPCI_FIFOEN_B1;
1355 if (!tics)
1356 hc->hw.int_m1 |= (HFCPCI_INTS_B1TRANS +
1357 HFCPCI_INTS_B1REC);
1358 hc->hw.ctmt |= 1;
1359 hc->hw.conn &= ~0x03;
1360 }
1361 test_and_set_bit(FLG_TRANSPARENT, &bch->Flags);
1362 break;
1363 case (ISDN_P_B_HDLC):
1364 bch->state = protocol;
1365 bch->nr = bc;
1366 hfcpci_clear_fifo_rx(hc, (fifo2 & 2) ? 1 : 0);
1367 hfcpci_clear_fifo_tx(hc, (fifo2 & 2) ? 1 : 0);
1368 if (bc & 2) {
1369 hc->hw.sctrl |= SCTRL_B2_ENA;
1370 hc->hw.sctrl_r |= SCTRL_B2_ENA;
1371 } else {
1372 hc->hw.sctrl |= SCTRL_B1_ENA;
1373 hc->hw.sctrl_r |= SCTRL_B1_ENA;
1374 }
1375 if (fifo2 & 2) {
1376 hc->hw.last_bfifo_cnt[1] = 0;
1377 hc->hw.fifo_en |= HFCPCI_FIFOEN_B2;
1378 hc->hw.int_m1 |= (HFCPCI_INTS_B2TRANS +
1379 HFCPCI_INTS_B2REC);
1380 hc->hw.ctmt &= ~2;
1381 hc->hw.conn &= ~0x18;
1382 } else {
1383 hc->hw.last_bfifo_cnt[0] = 0;
1384 hc->hw.fifo_en |= HFCPCI_FIFOEN_B1;
1385 hc->hw.int_m1 |= (HFCPCI_INTS_B1TRANS +
1386 HFCPCI_INTS_B1REC);
1387 hc->hw.ctmt &= ~1;
1388 hc->hw.conn &= ~0x03;
1389 }
1390 test_and_set_bit(FLG_HDLC, &bch->Flags);
1391 break;
1392 default:
1393 printk(KERN_DEBUG "prot not known %x\n", protocol);
1394 return -ENOPROTOOPT;
1395 }
1396 if (test_bit(HFC_CFG_PCM, &hc->cfg)) {
1397 if ((protocol == ISDN_P_NONE) ||
1398 (protocol == -1)) { /* init case */
1399 rx_slot = 0;
1400 tx_slot = 0;
1401 } else {
1402 if (test_bit(HFC_CFG_SW_DD_DU, &hc->cfg)) {
1403 rx_slot |= 0xC0;
1404 tx_slot |= 0xC0;
1405 } else {
1406 rx_slot |= 0x80;
1407 tx_slot |= 0x80;
1408 }
1409 }
1410 if (bc & 2) {
1411 hc->hw.conn &= 0xc7;
1412 hc->hw.conn |= 0x08;
1413 printk(KERN_DEBUG "%s: Write_hfc: B2_SSL 0x%x\n",
1414 __func__, tx_slot);
1415 printk(KERN_DEBUG "%s: Write_hfc: B2_RSL 0x%x\n",
1416 __func__, rx_slot);
1417 Write_hfc(hc, HFCPCI_B2_SSL, tx_slot);
1418 Write_hfc(hc, HFCPCI_B2_RSL, rx_slot);
1419 } else {
1420 hc->hw.conn &= 0xf8;
1421 hc->hw.conn |= 0x01;
1422 printk(KERN_DEBUG "%s: Write_hfc: B1_SSL 0x%x\n",
1423 __func__, tx_slot);
1424 printk(KERN_DEBUG "%s: Write_hfc: B1_RSL 0x%x\n",
1425 __func__, rx_slot);
1426 Write_hfc(hc, HFCPCI_B1_SSL, tx_slot);
1427 Write_hfc(hc, HFCPCI_B1_RSL, rx_slot);
1428 }
1429 }
1430 Write_hfc(hc, HFCPCI_SCTRL_E, hc->hw.sctrl_e);
1431 Write_hfc(hc, HFCPCI_INT_M1, hc->hw.int_m1);
1432 Write_hfc(hc, HFCPCI_FIFO_EN, hc->hw.fifo_en);
1433 Write_hfc(hc, HFCPCI_SCTRL, hc->hw.sctrl);
1434 Write_hfc(hc, HFCPCI_SCTRL_R, hc->hw.sctrl_r);
1435 Write_hfc(hc, HFCPCI_CTMT, hc->hw.ctmt);
1436 Write_hfc(hc, HFCPCI_CONNECT, hc->hw.conn);
1437 #ifdef REVERSE_BITORDER
1438 Write_hfc(hc, HFCPCI_CIRM, hc->hw.cirm);
1439 #endif
1440 return 0;
1441 }
1442
1443 static int
1444 set_hfcpci_rxtest(struct bchannel *bch, int protocol, int chan)
1445 {
1446 struct hfc_pci *hc = bch->hw;
1447
1448 if (bch->debug & DEBUG_HW_BCHANNEL)
1449 printk(KERN_DEBUG
1450 "HFCPCI bchannel test rx protocol %x-->%x ch %x-->%x\n",
1451 bch->state, protocol, bch->nr, chan);
1452 if (bch->nr != chan) {
1453 printk(KERN_DEBUG
1454 "HFCPCI rxtest wrong channel parameter %x/%x\n",
1455 bch->nr, chan);
1456 return -EINVAL;
1457 }
1458 switch (protocol) {
1459 case (ISDN_P_B_RAW):
1460 bch->state = protocol;
1461 hfcpci_clear_fifo_rx(hc, (chan & 2) ? 1 : 0);
1462 if (chan & 2) {
1463 hc->hw.sctrl_r |= SCTRL_B2_ENA;
1464 hc->hw.fifo_en |= HFCPCI_FIFOEN_B2RX;
1465 if (!tics)
1466 hc->hw.int_m1 |= HFCPCI_INTS_B2REC;
1467 hc->hw.ctmt |= 2;
1468 hc->hw.conn &= ~0x18;
1469 #ifdef REVERSE_BITORDER
1470 hc->hw.cirm |= 0x80;
1471 #endif
1472 } else {
1473 hc->hw.sctrl_r |= SCTRL_B1_ENA;
1474 hc->hw.fifo_en |= HFCPCI_FIFOEN_B1RX;
1475 if (!tics)
1476 hc->hw.int_m1 |= HFCPCI_INTS_B1REC;
1477 hc->hw.ctmt |= 1;
1478 hc->hw.conn &= ~0x03;
1479 #ifdef REVERSE_BITORDER
1480 hc->hw.cirm |= 0x40;
1481 #endif
1482 }
1483 break;
1484 case (ISDN_P_B_HDLC):
1485 bch->state = protocol;
1486 hfcpci_clear_fifo_rx(hc, (chan & 2) ? 1 : 0);
1487 if (chan & 2) {
1488 hc->hw.sctrl_r |= SCTRL_B2_ENA;
1489 hc->hw.last_bfifo_cnt[1] = 0;
1490 hc->hw.fifo_en |= HFCPCI_FIFOEN_B2RX;
1491 hc->hw.int_m1 |= HFCPCI_INTS_B2REC;
1492 hc->hw.ctmt &= ~2;
1493 hc->hw.conn &= ~0x18;
1494 } else {
1495 hc->hw.sctrl_r |= SCTRL_B1_ENA;
1496 hc->hw.last_bfifo_cnt[0] = 0;
1497 hc->hw.fifo_en |= HFCPCI_FIFOEN_B1RX;
1498 hc->hw.int_m1 |= HFCPCI_INTS_B1REC;
1499 hc->hw.ctmt &= ~1;
1500 hc->hw.conn &= ~0x03;
1501 }
1502 break;
1503 default:
1504 printk(KERN_DEBUG "prot not known %x\n", protocol);
1505 return -ENOPROTOOPT;
1506 }
1507 Write_hfc(hc, HFCPCI_INT_M1, hc->hw.int_m1);
1508 Write_hfc(hc, HFCPCI_FIFO_EN, hc->hw.fifo_en);
1509 Write_hfc(hc, HFCPCI_SCTRL_R, hc->hw.sctrl_r);
1510 Write_hfc(hc, HFCPCI_CTMT, hc->hw.ctmt);
1511 Write_hfc(hc, HFCPCI_CONNECT, hc->hw.conn);
1512 #ifdef REVERSE_BITORDER
1513 Write_hfc(hc, HFCPCI_CIRM, hc->hw.cirm);
1514 #endif
1515 return 0;
1516 }
1517
1518 static void
1519 deactivate_bchannel(struct bchannel *bch)
1520 {
1521 struct hfc_pci *hc = bch->hw;
1522 u_long flags;
1523
1524 spin_lock_irqsave(&hc->lock, flags);
1525 mISDN_clear_bchannel(bch);
1526 mode_hfcpci(bch, bch->nr, ISDN_P_NONE);
1527 spin_unlock_irqrestore(&hc->lock, flags);
1528 }
1529
1530 /*
1531 * Layer 1 B-channel hardware access
1532 */
1533 static int
1534 channel_bctrl(struct bchannel *bch, struct mISDN_ctrl_req *cq)
1535 {
1536 int ret = 0;
1537
1538 switch (cq->op) {
1539 case MISDN_CTRL_GETOP:
1540 cq->op = MISDN_CTRL_FILL_EMPTY;
1541 break;
1542 case MISDN_CTRL_FILL_EMPTY: /* fill fifo, if empty */
1543 test_and_set_bit(FLG_FILLEMPTY, &bch->Flags);
1544 if (debug & DEBUG_HW_OPEN)
1545 printk(KERN_DEBUG "%s: FILL_EMPTY request (nr=%d "
1546 "off=%d)\n", __func__, bch->nr, !!cq->p1);
1547 break;
1548 default:
1549 printk(KERN_WARNING "%s: unknown Op %x\n", __func__, cq->op);
1550 ret = -EINVAL;
1551 break;
1552 }
1553 return ret;
1554 }
1555 static int
1556 hfc_bctrl(struct mISDNchannel *ch, u_int cmd, void *arg)
1557 {
1558 struct bchannel *bch = container_of(ch, struct bchannel, ch);
1559 struct hfc_pci *hc = bch->hw;
1560 int ret = -EINVAL;
1561 u_long flags;
1562
1563 if (bch->debug & DEBUG_HW)
1564 printk(KERN_DEBUG "%s: cmd:%x %p\n", __func__, cmd, arg);
1565 switch (cmd) {
1566 case HW_TESTRX_RAW:
1567 spin_lock_irqsave(&hc->lock, flags);
1568 ret = set_hfcpci_rxtest(bch, ISDN_P_B_RAW, (int)(long)arg);
1569 spin_unlock_irqrestore(&hc->lock, flags);
1570 break;
1571 case HW_TESTRX_HDLC:
1572 spin_lock_irqsave(&hc->lock, flags);
1573 ret = set_hfcpci_rxtest(bch, ISDN_P_B_HDLC, (int)(long)arg);
1574 spin_unlock_irqrestore(&hc->lock, flags);
1575 break;
1576 case HW_TESTRX_OFF:
1577 spin_lock_irqsave(&hc->lock, flags);
1578 mode_hfcpci(bch, bch->nr, ISDN_P_NONE);
1579 spin_unlock_irqrestore(&hc->lock, flags);
1580 ret = 0;
1581 break;
1582 case CLOSE_CHANNEL:
1583 test_and_clear_bit(FLG_OPEN, &bch->Flags);
1584 if (test_bit(FLG_ACTIVE, &bch->Flags))
1585 deactivate_bchannel(bch);
1586 ch->protocol = ISDN_P_NONE;
1587 ch->peer = NULL;
1588 module_put(THIS_MODULE);
1589 ret = 0;
1590 break;
1591 case CONTROL_CHANNEL:
1592 ret = channel_bctrl(bch, arg);
1593 break;
1594 default:
1595 printk(KERN_WARNING "%s: unknown prim(%x)\n",
1596 __func__, cmd);
1597 }
1598 return ret;
1599 }
1600
1601 /*
1602 * Layer2 -> Layer 1 Dchannel data
1603 */
1604 static int
1605 hfcpci_l2l1D(struct mISDNchannel *ch, struct sk_buff *skb)
1606 {
1607 struct mISDNdevice *dev = container_of(ch, struct mISDNdevice, D);
1608 struct dchannel *dch = container_of(dev, struct dchannel, dev);
1609 struct hfc_pci *hc = dch->hw;
1610 int ret = -EINVAL;
1611 struct mISDNhead *hh = mISDN_HEAD_P(skb);
1612 unsigned int id;
1613 u_long flags;
1614
1615 switch (hh->prim) {
1616 case PH_DATA_REQ:
1617 spin_lock_irqsave(&hc->lock, flags);
1618 ret = dchannel_senddata(dch, skb);
1619 if (ret > 0) { /* direct TX */
1620 id = hh->id; /* skb can be freed */
1621 hfcpci_fill_dfifo(dch->hw);
1622 ret = 0;
1623 spin_unlock_irqrestore(&hc->lock, flags);
1624 queue_ch_frame(ch, PH_DATA_CNF, id, NULL);
1625 } else
1626 spin_unlock_irqrestore(&hc->lock, flags);
1627 return ret;
1628 case PH_ACTIVATE_REQ:
1629 spin_lock_irqsave(&hc->lock, flags);
1630 if (hc->hw.protocol == ISDN_P_NT_S0) {
1631 ret = 0;
1632 if (test_bit(HFC_CFG_MASTER, &hc->cfg))
1633 hc->hw.mst_m |= HFCPCI_MASTER;
1634 Write_hfc(hc, HFCPCI_MST_MODE, hc->hw.mst_m);
1635 if (test_bit(FLG_ACTIVE, &dch->Flags)) {
1636 spin_unlock_irqrestore(&hc->lock, flags);
1637 _queue_data(&dch->dev.D, PH_ACTIVATE_IND,
1638 MISDN_ID_ANY, 0, NULL, GFP_ATOMIC);
1639 break;
1640 }
1641 test_and_set_bit(FLG_L2_ACTIVATED, &dch->Flags);
1642 Write_hfc(hc, HFCPCI_STATES, HFCPCI_ACTIVATE |
1643 HFCPCI_DO_ACTION | 1);
1644 } else
1645 ret = l1_event(dch->l1, hh->prim);
1646 spin_unlock_irqrestore(&hc->lock, flags);
1647 break;
1648 case PH_DEACTIVATE_REQ:
1649 test_and_clear_bit(FLG_L2_ACTIVATED, &dch->Flags);
1650 spin_lock_irqsave(&hc->lock, flags);
1651 if (hc->hw.protocol == ISDN_P_NT_S0) {
1652 /* prepare deactivation */
1653 Write_hfc(hc, HFCPCI_STATES, 0x40);
1654 skb_queue_purge(&dch->squeue);
1655 if (dch->tx_skb) {
1656 dev_kfree_skb(dch->tx_skb);
1657 dch->tx_skb = NULL;
1658 }
1659 dch->tx_idx = 0;
1660 if (dch->rx_skb) {
1661 dev_kfree_skb(dch->rx_skb);
1662 dch->rx_skb = NULL;
1663 }
1664 test_and_clear_bit(FLG_TX_BUSY, &dch->Flags);
1665 if (test_and_clear_bit(FLG_BUSY_TIMER, &dch->Flags))
1666 del_timer(&dch->timer);
1667 #ifdef FIXME
1668 if (test_and_clear_bit(FLG_L1_BUSY, &dch->Flags))
1669 dchannel_sched_event(&hc->dch, D_CLEARBUSY);
1670 #endif
1671 hc->hw.mst_m &= ~HFCPCI_MASTER;
1672 Write_hfc(hc, HFCPCI_MST_MODE, hc->hw.mst_m);
1673 ret = 0;
1674 } else {
1675 ret = l1_event(dch->l1, hh->prim);
1676 }
1677 spin_unlock_irqrestore(&hc->lock, flags);
1678 break;
1679 }
1680 if (!ret)
1681 dev_kfree_skb(skb);
1682 return ret;
1683 }
1684
1685 /*
1686 * Layer2 -> Layer 1 Bchannel data
1687 */
1688 static int
1689 hfcpci_l2l1B(struct mISDNchannel *ch, struct sk_buff *skb)
1690 {
1691 struct bchannel *bch = container_of(ch, struct bchannel, ch);
1692 struct hfc_pci *hc = bch->hw;
1693 int ret = -EINVAL;
1694 struct mISDNhead *hh = mISDN_HEAD_P(skb);
1695 unsigned int id;
1696 u_long flags;
1697
1698 switch (hh->prim) {
1699 case PH_DATA_REQ:
1700 spin_lock_irqsave(&hc->lock, flags);
1701 ret = bchannel_senddata(bch, skb);
1702 if (ret > 0) { /* direct TX */
1703 id = hh->id; /* skb can be freed */
1704 hfcpci_fill_fifo(bch);
1705 ret = 0;
1706 spin_unlock_irqrestore(&hc->lock, flags);
1707 if (!test_bit(FLG_TRANSPARENT, &bch->Flags))
1708 queue_ch_frame(ch, PH_DATA_CNF, id, NULL);
1709 } else
1710 spin_unlock_irqrestore(&hc->lock, flags);
1711 return ret;
1712 case PH_ACTIVATE_REQ:
1713 spin_lock_irqsave(&hc->lock, flags);
1714 if (!test_and_set_bit(FLG_ACTIVE, &bch->Flags))
1715 ret = mode_hfcpci(bch, bch->nr, ch->protocol);
1716 else
1717 ret = 0;
1718 spin_unlock_irqrestore(&hc->lock, flags);
1719 if (!ret)
1720 _queue_data(ch, PH_ACTIVATE_IND, MISDN_ID_ANY, 0,
1721 NULL, GFP_KERNEL);
1722 break;
1723 case PH_DEACTIVATE_REQ:
1724 deactivate_bchannel(bch);
1725 _queue_data(ch, PH_DEACTIVATE_IND, MISDN_ID_ANY, 0,
1726 NULL, GFP_KERNEL);
1727 ret = 0;
1728 break;
1729 }
1730 if (!ret)
1731 dev_kfree_skb(skb);
1732 return ret;
1733 }
1734
1735 /*
1736 * called for card init message
1737 */
1738
1739 static void
1740 inithfcpci(struct hfc_pci *hc)
1741 {
1742 printk(KERN_DEBUG "inithfcpci: entered\n");
1743 hc->dch.timer.function = (void *) hfcpci_dbusy_timer;
1744 hc->dch.timer.data = (long) &hc->dch;
1745 init_timer(&hc->dch.timer);
1746 hc->chanlimit = 2;
1747 mode_hfcpci(&hc->bch[0], 1, -1);
1748 mode_hfcpci(&hc->bch[1], 2, -1);
1749 }
1750
1751
1752 static int
1753 init_card(struct hfc_pci *hc)
1754 {
1755 int cnt = 3;
1756 u_long flags;
1757
1758 printk(KERN_DEBUG "init_card: entered\n");
1759
1760
1761 spin_lock_irqsave(&hc->lock, flags);
1762 disable_hwirq(hc);
1763 spin_unlock_irqrestore(&hc->lock, flags);
1764 if (request_irq(hc->irq, hfcpci_int, IRQF_SHARED, "HFC PCI", hc)) {
1765 printk(KERN_WARNING
1766 "mISDN: couldn't get interrupt %d\n", hc->irq);
1767 return -EIO;
1768 }
1769 spin_lock_irqsave(&hc->lock, flags);
1770 reset_hfcpci(hc);
1771 while (cnt) {
1772 inithfcpci(hc);
1773 /*
1774 * Finally enable IRQ output
1775 * this is only allowed, if an IRQ routine is already
1776 * established for this HFC, so don't do that earlier
1777 */
1778 enable_hwirq(hc);
1779 spin_unlock_irqrestore(&hc->lock, flags);
1780 /* Timeout 80ms */
1781 current->state = TASK_UNINTERRUPTIBLE;
1782 schedule_timeout((80 * HZ) / 1000);
1783 printk(KERN_INFO "HFC PCI: IRQ %d count %d\n",
1784 hc->irq, hc->irqcnt);
1785 /* now switch timer interrupt off */
1786 spin_lock_irqsave(&hc->lock, flags);
1787 hc->hw.int_m1 &= ~HFCPCI_INTS_TIMER;
1788 Write_hfc(hc, HFCPCI_INT_M1, hc->hw.int_m1);
1789 /* reinit mode reg */
1790 Write_hfc(hc, HFCPCI_MST_MODE, hc->hw.mst_m);
1791 if (!hc->irqcnt) {
1792 printk(KERN_WARNING
1793 "HFC PCI: IRQ(%d) getting no interrupts "
1794 "during init %d\n", hc->irq, 4 - cnt);
1795 if (cnt == 1)
1796 break;
1797 else {
1798 reset_hfcpci(hc);
1799 cnt--;
1800 }
1801 } else {
1802 spin_unlock_irqrestore(&hc->lock, flags);
1803 hc->initdone = 1;
1804 return 0;
1805 }
1806 }
1807 disable_hwirq(hc);
1808 spin_unlock_irqrestore(&hc->lock, flags);
1809 free_irq(hc->irq, hc);
1810 return -EIO;
1811 }
1812
1813 static int
1814 channel_ctrl(struct hfc_pci *hc, struct mISDN_ctrl_req *cq)
1815 {
1816 int ret = 0;
1817 u_char slot;
1818
1819 switch (cq->op) {
1820 case MISDN_CTRL_GETOP:
1821 cq->op = MISDN_CTRL_LOOP | MISDN_CTRL_CONNECT |
1822 MISDN_CTRL_DISCONNECT;
1823 break;
1824 case MISDN_CTRL_LOOP:
1825 /* channel 0 disabled loop */
1826 if (cq->channel < 0 || cq->channel > 2) {
1827 ret = -EINVAL;
1828 break;
1829 }
1830 if (cq->channel & 1) {
1831 if (test_bit(HFC_CFG_SW_DD_DU, &hc->cfg))
1832 slot = 0xC0;
1833 else
1834 slot = 0x80;
1835 printk(KERN_DEBUG "%s: Write_hfc: B1_SSL/RSL 0x%x\n",
1836 __func__, slot);
1837 Write_hfc(hc, HFCPCI_B1_SSL, slot);
1838 Write_hfc(hc, HFCPCI_B1_RSL, slot);
1839 hc->hw.conn = (hc->hw.conn & ~7) | 6;
1840 Write_hfc(hc, HFCPCI_CONNECT, hc->hw.conn);
1841 }
1842 if (cq->channel & 2) {
1843 if (test_bit(HFC_CFG_SW_DD_DU, &hc->cfg))
1844 slot = 0xC1;
1845 else
1846 slot = 0x81;
1847 printk(KERN_DEBUG "%s: Write_hfc: B2_SSL/RSL 0x%x\n",
1848 __func__, slot);
1849 Write_hfc(hc, HFCPCI_B2_SSL, slot);
1850 Write_hfc(hc, HFCPCI_B2_RSL, slot);
1851 hc->hw.conn = (hc->hw.conn & ~0x38) | 0x30;
1852 Write_hfc(hc, HFCPCI_CONNECT, hc->hw.conn);
1853 }
1854 if (cq->channel & 3)
1855 hc->hw.trm |= 0x80; /* enable IOM-loop */
1856 else {
1857 hc->hw.conn = (hc->hw.conn & ~0x3f) | 0x09;
1858 Write_hfc(hc, HFCPCI_CONNECT, hc->hw.conn);
1859 hc->hw.trm &= 0x7f; /* disable IOM-loop */
1860 }
1861 Write_hfc(hc, HFCPCI_TRM, hc->hw.trm);
1862 break;
1863 case MISDN_CTRL_CONNECT:
1864 if (cq->channel == cq->p1) {
1865 ret = -EINVAL;
1866 break;
1867 }
1868 if (cq->channel < 1 || cq->channel > 2 ||
1869 cq->p1 < 1 || cq->p1 > 2) {
1870 ret = -EINVAL;
1871 break;
1872 }
1873 if (test_bit(HFC_CFG_SW_DD_DU, &hc->cfg))
1874 slot = 0xC0;
1875 else
1876 slot = 0x80;
1877 printk(KERN_DEBUG "%s: Write_hfc: B1_SSL/RSL 0x%x\n",
1878 __func__, slot);
1879 Write_hfc(hc, HFCPCI_B1_SSL, slot);
1880 Write_hfc(hc, HFCPCI_B2_RSL, slot);
1881 if (test_bit(HFC_CFG_SW_DD_DU, &hc->cfg))
1882 slot = 0xC1;
1883 else
1884 slot = 0x81;
1885 printk(KERN_DEBUG "%s: Write_hfc: B2_SSL/RSL 0x%x\n",
1886 __func__, slot);
1887 Write_hfc(hc, HFCPCI_B2_SSL, slot);
1888 Write_hfc(hc, HFCPCI_B1_RSL, slot);
1889 hc->hw.conn = (hc->hw.conn & ~0x3f) | 0x36;
1890 Write_hfc(hc, HFCPCI_CONNECT, hc->hw.conn);
1891 hc->hw.trm |= 0x80;
1892 Write_hfc(hc, HFCPCI_TRM, hc->hw.trm);
1893 break;
1894 case MISDN_CTRL_DISCONNECT:
1895 hc->hw.conn = (hc->hw.conn & ~0x3f) | 0x09;
1896 Write_hfc(hc, HFCPCI_CONNECT, hc->hw.conn);
1897 hc->hw.trm &= 0x7f; /* disable IOM-loop */
1898 break;
1899 default:
1900 printk(KERN_WARNING "%s: unknown Op %x\n",
1901 __func__, cq->op);
1902 ret = -EINVAL;
1903 break;
1904 }
1905 return ret;
1906 }
1907
1908 static int
1909 open_dchannel(struct hfc_pci *hc, struct mISDNchannel *ch,
1910 struct channel_req *rq)
1911 {
1912 int err = 0;
1913
1914 if (debug & DEBUG_HW_OPEN)
1915 printk(KERN_DEBUG "%s: dev(%d) open from %p\n", __func__,
1916 hc->dch.dev.id, __builtin_return_address(0));
1917 if (rq->protocol == ISDN_P_NONE)
1918 return -EINVAL;
1919 if (rq->adr.channel == 1) {
1920 /* TODO: E-Channel */
1921 return -EINVAL;
1922 }
1923 if (!hc->initdone) {
1924 if (rq->protocol == ISDN_P_TE_S0) {
1925 err = create_l1(&hc->dch, hfc_l1callback);
1926 if (err)
1927 return err;
1928 }
1929 hc->hw.protocol = rq->protocol;
1930 ch->protocol = rq->protocol;
1931 err = init_card(hc);
1932 if (err)
1933 return err;
1934 } else {
1935 if (rq->protocol != ch->protocol) {
1936 if (hc->hw.protocol == ISDN_P_TE_S0)
1937 l1_event(hc->dch.l1, CLOSE_CHANNEL);
1938 if (rq->protocol == ISDN_P_TE_S0) {
1939 err = create_l1(&hc->dch, hfc_l1callback);
1940 if (err)
1941 return err;
1942 }
1943 hc->hw.protocol = rq->protocol;
1944 ch->protocol = rq->protocol;
1945 hfcpci_setmode(hc);
1946 }
1947 }
1948
1949 if (((ch->protocol == ISDN_P_NT_S0) && (hc->dch.state == 3)) ||
1950 ((ch->protocol == ISDN_P_TE_S0) && (hc->dch.state == 7))) {
1951 _queue_data(ch, PH_ACTIVATE_IND, MISDN_ID_ANY,
1952 0, NULL, GFP_KERNEL);
1953 }
1954 rq->ch = ch;
1955 if (!try_module_get(THIS_MODULE))
1956 printk(KERN_WARNING "%s:cannot get module\n", __func__);
1957 return 0;
1958 }
1959
1960 static int
1961 open_bchannel(struct hfc_pci *hc, struct channel_req *rq)
1962 {
1963 struct bchannel *bch;
1964
1965 if (rq->adr.channel > 2)
1966 return -EINVAL;
1967 if (rq->protocol == ISDN_P_NONE)
1968 return -EINVAL;
1969 bch = &hc->bch[rq->adr.channel - 1];
1970 if (test_and_set_bit(FLG_OPEN, &bch->Flags))
1971 return -EBUSY; /* b-channel can be only open once */
1972 test_and_clear_bit(FLG_FILLEMPTY, &bch->Flags);
1973 bch->ch.protocol = rq->protocol;
1974 rq->ch = &bch->ch; /* TODO: E-channel */
1975 if (!try_module_get(THIS_MODULE))
1976 printk(KERN_WARNING "%s:cannot get module\n", __func__);
1977 return 0;
1978 }
1979
1980 /*
1981 * device control function
1982 */
1983 static int
1984 hfc_dctrl(struct mISDNchannel *ch, u_int cmd, void *arg)
1985 {
1986 struct mISDNdevice *dev = container_of(ch, struct mISDNdevice, D);
1987 struct dchannel *dch = container_of(dev, struct dchannel, dev);
1988 struct hfc_pci *hc = dch->hw;
1989 struct channel_req *rq;
1990 int err = 0;
1991
1992 if (dch->debug & DEBUG_HW)
1993 printk(KERN_DEBUG "%s: cmd:%x %p\n",
1994 __func__, cmd, arg);
1995 switch (cmd) {
1996 case OPEN_CHANNEL:
1997 rq = arg;
1998 if ((rq->protocol == ISDN_P_TE_S0) ||
1999 (rq->protocol == ISDN_P_NT_S0))
2000 err = open_dchannel(hc, ch, rq);
2001 else
2002 err = open_bchannel(hc, rq);
2003 break;
2004 case CLOSE_CHANNEL:
2005 if (debug & DEBUG_HW_OPEN)
2006 printk(KERN_DEBUG "%s: dev(%d) close from %p\n",
2007 __func__, hc->dch.dev.id,
2008 __builtin_return_address(0));
2009 module_put(THIS_MODULE);
2010 break;
2011 case CONTROL_CHANNEL:
2012 err = channel_ctrl(hc, arg);
2013 break;
2014 default:
2015 if (dch->debug & DEBUG_HW)
2016 printk(KERN_DEBUG "%s: unknown command %x\n",
2017 __func__, cmd);
2018 return -EINVAL;
2019 }
2020 return err;
2021 }
2022
2023 static int
2024 setup_hw(struct hfc_pci *hc)
2025 {
2026 void *buffer;
2027
2028 printk(KERN_INFO "mISDN: HFC-PCI driver %s\n", hfcpci_revision);
2029 hc->hw.cirm = 0;
2030 hc->dch.state = 0;
2031 pci_set_master(hc->pdev);
2032 if (!hc->irq) {
2033 printk(KERN_WARNING "HFC-PCI: No IRQ for PCI card found\n");
2034 return 1;
2035 }
2036 hc->hw.pci_io =
2037 (char __iomem *)(unsigned long)hc->pdev->resource[1].start;
2038
2039 if (!hc->hw.pci_io) {
2040 printk(KERN_WARNING "HFC-PCI: No IO-Mem for PCI card found\n");
2041 return 1;
2042 }
2043 /* Allocate memory for FIFOS */
2044 /* the memory needs to be on a 32k boundary within the first 4G */
2045 pci_set_dma_mask(hc->pdev, 0xFFFF8000);
2046 buffer = pci_alloc_consistent(hc->pdev, 0x8000, &hc->hw.dmahandle);
2047 /* We silently assume the address is okay if nonzero */
2048 if (!buffer) {
2049 printk(KERN_WARNING
2050 "HFC-PCI: Error allocating memory for FIFO!\n");
2051 return 1;
2052 }
2053 hc->hw.fifos = buffer;
2054 pci_write_config_dword(hc->pdev, 0x80, hc->hw.dmahandle);
2055 hc->hw.pci_io = ioremap((ulong) hc->hw.pci_io, 256);
2056 printk(KERN_INFO
2057 "HFC-PCI: defined at mem %#lx fifo %#lx(%#lx) IRQ %d HZ %d\n",
2058 (u_long) hc->hw.pci_io, (u_long) hc->hw.fifos,
2059 (u_long) hc->hw.dmahandle, hc->irq, HZ);
2060 /* enable memory mapped ports, disable busmaster */
2061 pci_write_config_word(hc->pdev, PCI_COMMAND, PCI_ENA_MEMIO);
2062 hc->hw.int_m2 = 0;
2063 disable_hwirq(hc);
2064 hc->hw.int_m1 = 0;
2065 Write_hfc(hc, HFCPCI_INT_M1, hc->hw.int_m1);
2066 /* At this point the needed PCI config is done */
2067 /* fifos are still not enabled */
2068 hc->hw.timer.function = (void *) hfcpci_Timer;
2069 hc->hw.timer.data = (long) hc;
2070 init_timer(&hc->hw.timer);
2071 /* default PCM master */
2072 test_and_set_bit(HFC_CFG_MASTER, &hc->cfg);
2073 return 0;
2074 }
2075
2076 static void
2077 release_card(struct hfc_pci *hc) {
2078 u_long flags;
2079
2080 spin_lock_irqsave(&hc->lock, flags);
2081 hc->hw.int_m2 = 0; /* interrupt output off ! */
2082 disable_hwirq(hc);
2083 mode_hfcpci(&hc->bch[0], 1, ISDN_P_NONE);
2084 mode_hfcpci(&hc->bch[1], 2, ISDN_P_NONE);
2085 if (hc->dch.timer.function != NULL) {
2086 del_timer(&hc->dch.timer);
2087 hc->dch.timer.function = NULL;
2088 }
2089 spin_unlock_irqrestore(&hc->lock, flags);
2090 if (hc->hw.protocol == ISDN_P_TE_S0)
2091 l1_event(hc->dch.l1, CLOSE_CHANNEL);
2092 if (hc->initdone)
2093 free_irq(hc->irq, hc);
2094 release_io_hfcpci(hc); /* must release after free_irq! */
2095 mISDN_unregister_device(&hc->dch.dev);
2096 mISDN_freebchannel(&hc->bch[1]);
2097 mISDN_freebchannel(&hc->bch[0]);
2098 mISDN_freedchannel(&hc->dch);
2099 pci_set_drvdata(hc->pdev, NULL);
2100 kfree(hc);
2101 }
2102
2103 static int
2104 setup_card(struct hfc_pci *card)
2105 {
2106 int err = -EINVAL;
2107 u_int i;
2108 char name[MISDN_MAX_IDLEN];
2109
2110 card->dch.debug = debug;
2111 spin_lock_init(&card->lock);
2112 mISDN_initdchannel(&card->dch, MAX_DFRAME_LEN_L1, ph_state);
2113 card->dch.hw = card;
2114 card->dch.dev.Dprotocols = (1 << ISDN_P_TE_S0) | (1 << ISDN_P_NT_S0);
2115 card->dch.dev.Bprotocols = (1 << (ISDN_P_B_RAW & ISDN_P_B_MASK)) |
2116 (1 << (ISDN_P_B_HDLC & ISDN_P_B_MASK));
2117 card->dch.dev.D.send = hfcpci_l2l1D;
2118 card->dch.dev.D.ctrl = hfc_dctrl;
2119 card->dch.dev.nrbchan = 2;
2120 for (i = 0; i < 2; i++) {
2121 card->bch[i].nr = i + 1;
2122 set_channelmap(i + 1, card->dch.dev.channelmap);
2123 card->bch[i].debug = debug;
2124 mISDN_initbchannel(&card->bch[i], MAX_DATA_MEM);
2125 card->bch[i].hw = card;
2126 card->bch[i].ch.send = hfcpci_l2l1B;
2127 card->bch[i].ch.ctrl = hfc_bctrl;
2128 card->bch[i].ch.nr = i + 1;
2129 list_add(&card->bch[i].ch.list, &card->dch.dev.bchannels);
2130 }
2131 err = setup_hw(card);
2132 if (err)
2133 goto error;
2134 snprintf(name, MISDN_MAX_IDLEN - 1, "hfc-pci.%d", HFC_cnt + 1);
2135 err = mISDN_register_device(&card->dch.dev, &card->pdev->dev, name);
2136 if (err)
2137 goto error;
2138 HFC_cnt++;
2139 printk(KERN_INFO "HFC %d cards installed\n", HFC_cnt);
2140 return 0;
2141 error:
2142 mISDN_freebchannel(&card->bch[1]);
2143 mISDN_freebchannel(&card->bch[0]);
2144 mISDN_freedchannel(&card->dch);
2145 kfree(card);
2146 return err;
2147 }
2148
2149 /* private data in the PCI devices list */
2150 struct _hfc_map {
2151 u_int subtype;
2152 u_int flag;
2153 char *name;
2154 };
2155
2156 static const struct _hfc_map hfc_map[] =
2157 {
2158 {HFC_CCD_2BD0, 0, "CCD/Billion/Asuscom 2BD0"},
2159 {HFC_CCD_B000, 0, "Billion B000"},
2160 {HFC_CCD_B006, 0, "Billion B006"},
2161 {HFC_CCD_B007, 0, "Billion B007"},
2162 {HFC_CCD_B008, 0, "Billion B008"},
2163 {HFC_CCD_B009, 0, "Billion B009"},
2164 {HFC_CCD_B00A, 0, "Billion B00A"},
2165 {HFC_CCD_B00B, 0, "Billion B00B"},
2166 {HFC_CCD_B00C, 0, "Billion B00C"},
2167 {HFC_CCD_B100, 0, "Seyeon B100"},
2168 {HFC_CCD_B700, 0, "Primux II S0 B700"},
2169 {HFC_CCD_B701, 0, "Primux II S0 NT B701"},
2170 {HFC_ABOCOM_2BD1, 0, "Abocom/Magitek 2BD1"},
2171 {HFC_ASUS_0675, 0, "Asuscom/Askey 675"},
2172 {HFC_BERKOM_TCONCEPT, 0, "German telekom T-Concept"},
2173 {HFC_BERKOM_A1T, 0, "German telekom A1T"},
2174 {HFC_ANIGMA_MC145575, 0, "Motorola MC145575"},
2175 {HFC_ZOLTRIX_2BD0, 0, "Zoltrix 2BD0"},
2176 {HFC_DIGI_DF_M_IOM2_E, 0,
2177 "Digi International DataFire Micro V IOM2 (Europe)"},
2178 {HFC_DIGI_DF_M_E, 0,
2179 "Digi International DataFire Micro V (Europe)"},
2180 {HFC_DIGI_DF_M_IOM2_A, 0,
2181 "Digi International DataFire Micro V IOM2 (North America)"},
2182 {HFC_DIGI_DF_M_A, 0,
2183 "Digi International DataFire Micro V (North America)"},
2184 {HFC_SITECOM_DC105V2, 0, "Sitecom Connectivity DC-105 ISDN TA"},
2185 {},
2186 };
2187
2188 static struct pci_device_id hfc_ids[] =
2189 {
2190 { PCI_VDEVICE(CCD, PCI_DEVICE_ID_CCD_2BD0),
2191 (unsigned long) &hfc_map[0] },
2192 { PCI_VDEVICE(CCD, PCI_DEVICE_ID_CCD_B000),
2193 (unsigned long) &hfc_map[1] },
2194 { PCI_VDEVICE(CCD, PCI_DEVICE_ID_CCD_B006),
2195 (unsigned long) &hfc_map[2] },
2196 { PCI_VDEVICE(CCD, PCI_DEVICE_ID_CCD_B007),
2197 (unsigned long) &hfc_map[3] },
2198 { PCI_VDEVICE(CCD, PCI_DEVICE_ID_CCD_B008),
2199 (unsigned long) &hfc_map[4] },
2200 { PCI_VDEVICE(CCD, PCI_DEVICE_ID_CCD_B009),
2201 (unsigned long) &hfc_map[5] },
2202 { PCI_VDEVICE(CCD, PCI_DEVICE_ID_CCD_B00A),
2203 (unsigned long) &hfc_map[6] },
2204 { PCI_VDEVICE(CCD, PCI_DEVICE_ID_CCD_B00B),
2205 (unsigned long) &hfc_map[7] },
2206 { PCI_VDEVICE(CCD, PCI_DEVICE_ID_CCD_B00C),
2207 (unsigned long) &hfc_map[8] },
2208 { PCI_VDEVICE(CCD, PCI_DEVICE_ID_CCD_B100),
2209 (unsigned long) &hfc_map[9] },
2210 { PCI_VDEVICE(CCD, PCI_DEVICE_ID_CCD_B700),
2211 (unsigned long) &hfc_map[10] },
2212 { PCI_VDEVICE(CCD, PCI_DEVICE_ID_CCD_B701),
2213 (unsigned long) &hfc_map[11] },
2214 { PCI_VDEVICE(ABOCOM, PCI_DEVICE_ID_ABOCOM_2BD1),
2215 (unsigned long) &hfc_map[12] },
2216 { PCI_VDEVICE(ASUSTEK, PCI_DEVICE_ID_ASUSTEK_0675),
2217 (unsigned long) &hfc_map[13] },
2218 { PCI_VDEVICE(BERKOM, PCI_DEVICE_ID_BERKOM_T_CONCEPT),
2219 (unsigned long) &hfc_map[14] },
2220 { PCI_VDEVICE(BERKOM, PCI_DEVICE_ID_BERKOM_A1T),
2221 (unsigned long) &hfc_map[15] },
2222 { PCI_VDEVICE(ANIGMA, PCI_DEVICE_ID_ANIGMA_MC145575),
2223 (unsigned long) &hfc_map[16] },
2224 { PCI_VDEVICE(ZOLTRIX, PCI_DEVICE_ID_ZOLTRIX_2BD0),
2225 (unsigned long) &hfc_map[17] },
2226 { PCI_VDEVICE(DIGI, PCI_DEVICE_ID_DIGI_DF_M_IOM2_E),
2227 (unsigned long) &hfc_map[18] },
2228 { PCI_VDEVICE(DIGI, PCI_DEVICE_ID_DIGI_DF_M_E),
2229 (unsigned long) &hfc_map[19] },
2230 { PCI_VDEVICE(DIGI, PCI_DEVICE_ID_DIGI_DF_M_IOM2_A),
2231 (unsigned long) &hfc_map[20] },
2232 { PCI_VDEVICE(DIGI, PCI_DEVICE_ID_DIGI_DF_M_A),
2233 (unsigned long) &hfc_map[21] },
2234 { PCI_VDEVICE(SITECOM, PCI_DEVICE_ID_SITECOM_DC105V2),
2235 (unsigned long) &hfc_map[22] },
2236 {},
2237 };
2238
2239 static int __devinit
2240 hfc_probe(struct pci_dev *pdev, const struct pci_device_id *ent)
2241 {
2242 int err = -ENOMEM;
2243 struct hfc_pci *card;
2244 struct _hfc_map *m = (struct _hfc_map *)ent->driver_data;
2245
2246 card = kzalloc(sizeof(struct hfc_pci), GFP_ATOMIC);
2247 if (!card) {
2248 printk(KERN_ERR "No kmem for HFC card\n");
2249 return err;
2250 }
2251 card->pdev = pdev;
2252 card->subtype = m->subtype;
2253 err = pci_enable_device(pdev);
2254 if (err) {
2255 kfree(card);
2256 return err;
2257 }
2258
2259 printk(KERN_INFO "mISDN_hfcpci: found adapter %s at %s\n",
2260 m->name, pci_name(pdev));
2261
2262 card->irq = pdev->irq;
2263 pci_set_drvdata(pdev, card);
2264 err = setup_card(card);
2265 if (err)
2266 pci_set_drvdata(pdev, NULL);
2267 return err;
2268 }
2269
2270 static void __devexit
2271 hfc_remove_pci(struct pci_dev *pdev)
2272 {
2273 struct hfc_pci *card = pci_get_drvdata(pdev);
2274
2275 if (card)
2276 release_card(card);
2277 else
2278 if (debug)
2279 printk(KERN_DEBUG "%s: drvdata already removed\n",
2280 __func__);
2281 }
2282
2283
2284 static struct pci_driver hfc_driver = {
2285 .name = "hfcpci",
2286 .probe = hfc_probe,
2287 .remove = __devexit_p(hfc_remove_pci),
2288 .id_table = hfc_ids,
2289 };
2290
2291 static int
2292 _hfcpci_softirq(struct device *dev, void *arg)
2293 {
2294 struct hfc_pci *hc = dev_get_drvdata(dev);
2295 struct bchannel *bch;
2296 if (hc == NULL)
2297 return 0;
2298
2299 if (hc->hw.int_m2 & HFCPCI_IRQ_ENABLE) {
2300 spin_lock(&hc->lock);
2301 bch = Sel_BCS(hc, hc->hw.bswapped ? 2 : 1);
2302 if (bch && bch->state == ISDN_P_B_RAW) { /* B1 rx&tx */
2303 main_rec_hfcpci(bch);
2304 tx_birq(bch);
2305 }
2306 bch = Sel_BCS(hc, hc->hw.bswapped ? 1 : 2);
2307 if (bch && bch->state == ISDN_P_B_RAW) { /* B2 rx&tx */
2308 main_rec_hfcpci(bch);
2309 tx_birq(bch);
2310 }
2311 spin_unlock(&hc->lock);
2312 }
2313 return 0;
2314 }
2315
2316 static void
2317 hfcpci_softirq(void *arg)
2318 {
2319 (void) driver_for_each_device(&hfc_driver.driver, NULL, arg,
2320 _hfcpci_softirq);
2321
2322 /* if next event would be in the past ... */
2323 if ((s32)(hfc_jiffies + tics - jiffies) <= 0)
2324 hfc_jiffies = jiffies + 1;
2325 else
2326 hfc_jiffies += tics;
2327 hfc_tl.expires = hfc_jiffies;
2328 add_timer(&hfc_tl);
2329 }
2330
2331 static int __init
2332 HFC_init(void)
2333 {
2334 int err;
2335
2336 if (!poll)
2337 poll = HFCPCI_BTRANS_THRESHOLD;
2338
2339 if (poll != HFCPCI_BTRANS_THRESHOLD) {
2340 tics = (poll * HZ) / 8000;
2341 if (tics < 1)
2342 tics = 1;
2343 poll = (tics * 8000) / HZ;
2344 if (poll > 256 || poll < 8) {
2345 printk(KERN_ERR "%s: Wrong poll value %d not in range "
2346 "of 8..256.\n", __func__, poll);
2347 err = -EINVAL;
2348 return err;
2349 }
2350 }
2351 if (poll != HFCPCI_BTRANS_THRESHOLD) {
2352 printk(KERN_INFO "%s: Using alternative poll value of %d\n",
2353 __func__, poll);
2354 hfc_tl.function = (void *)hfcpci_softirq;
2355 hfc_tl.data = 0;
2356 init_timer(&hfc_tl);
2357 hfc_tl.expires = jiffies + tics;
2358 hfc_jiffies = hfc_tl.expires;
2359 add_timer(&hfc_tl);
2360 } else
2361 tics = 0; /* indicate the use of controller's timer */
2362
2363 err = pci_register_driver(&hfc_driver);
2364 if (err) {
2365 if (timer_pending(&hfc_tl))
2366 del_timer(&hfc_tl);
2367 }
2368
2369 return err;
2370 }
2371
2372 static void __exit
2373 HFC_cleanup(void)
2374 {
2375 if (timer_pending(&hfc_tl))
2376 del_timer(&hfc_tl);
2377
2378 pci_unregister_driver(&hfc_driver);
2379 }
2380
2381 module_init(HFC_init);
2382 module_exit(HFC_cleanup);
2383
2384 MODULE_DEVICE_TABLE(pci, hfc_ids);