Commit | Line | Data |
---|---|---|
1da177e4 LT |
1 | /* |
2 | * Driver for AVM Fritz!PCI, Fritz!PCI v2, Fritz!PnP ISDN cards | |
3 | * | |
4 | * Author Kai Germaschewski | |
5 | * Copyright 2001 by Kai Germaschewski <kai.germaschewski@gmx.de> | |
6 | * 2001 by Karsten Keil <keil@isdn4linux.de> | |
7 | * | |
8 | * based upon Karsten Keil's original avm_pci.c driver | |
9 | * | |
10 | * This software may be used and distributed according to the terms | |
11 | * of the GNU General Public License, incorporated herein by reference. | |
12 | * | |
13 | * Thanks to Wizard Computersysteme GmbH, Bremervoerde and | |
14 | * SoHaNet Technology GmbH, Berlin | |
15 | * for supporting the development of this driver | |
16 | */ | |
17 | ||
18 | ||
19 | /* TODO: | |
20 | * | |
21 | * o POWER PC | |
22 | * o clean up debugging | |
23 | * o tx_skb at PH_DEACTIVATE time | |
24 | */ | |
25 | ||
1da177e4 LT |
26 | #include <linux/module.h> |
27 | #include <linux/init.h> | |
28 | #include <linux/pci.h> | |
29 | #include <linux/isapnp.h> | |
30 | #include <linux/kmod.h> | |
31 | #include <linux/slab.h> | |
32 | #include <linux/skbuff.h> | |
33 | #include <linux/netdevice.h> | |
34 | #include <linux/delay.h> | |
35 | ||
36 | #include <asm/io.h> | |
37 | ||
38 | #include "hisax_fcpcipnp.h" | |
39 | ||
40 | // debugging cruft | |
41 | #define __debug_variable debug | |
42 | #include "hisax_debug.h" | |
43 | ||
44 | #ifdef CONFIG_HISAX_DEBUG | |
45 | static int debug = 0; | |
46 | /* static int hdlcfifosize = 32; */ | |
47 | module_param(debug, int, 0); | |
48 | /* module_param(hdlcfifosize, int, 0); */ | |
49 | #endif | |
50 | ||
51 | MODULE_AUTHOR("Kai Germaschewski <kai.germaschewski@gmx.de>/Karsten Keil <kkeil@suse.de>"); | |
52 | MODULE_DESCRIPTION("AVM Fritz!PCI/PnP ISDN driver"); | |
53 | ||
54 | static struct pci_device_id fcpci_ids[] = { | |
55 | { .vendor = PCI_VENDOR_ID_AVM, | |
56 | .device = PCI_DEVICE_ID_AVM_A1, | |
57 | .subvendor = PCI_ANY_ID, | |
58 | .subdevice = PCI_ANY_ID, | |
59 | .driver_data = (unsigned long) "Fritz!Card PCI", | |
60 | }, | |
61 | { .vendor = PCI_VENDOR_ID_AVM, | |
62 | .device = PCI_DEVICE_ID_AVM_A1_V2, | |
63 | .subvendor = PCI_ANY_ID, | |
64 | .subdevice = PCI_ANY_ID, | |
65 | .driver_data = (unsigned long) "Fritz!Card PCI v2" }, | |
66 | {} | |
67 | }; | |
68 | ||
69 | MODULE_DEVICE_TABLE(pci, fcpci_ids); | |
70 | ||
71 | #ifdef __ISAPNP__ | |
72 | static struct pnp_device_id fcpnp_ids[] __devinitdata = { | |
73 | { | |
74 | .id = "AVM0900", | |
75 | .driver_data = (unsigned long) "Fritz!Card PnP", | |
76 | }, | |
77 | }; | |
78 | ||
79 | MODULE_DEVICE_TABLE(isapnp, fcpnp_ids); | |
80 | #endif | |
81 | ||
82 | static int protocol = 2; /* EURO-ISDN Default */ | |
83 | module_param(protocol, int, 0); | |
84 | MODULE_LICENSE("GPL"); | |
85 | ||
86 | // ---------------------------------------------------------------------- | |
87 | ||
88 | #define AVM_INDEX 0x04 | |
89 | #define AVM_DATA 0x10 | |
90 | ||
91 | #define AVM_IDX_HDLC_1 0x00 | |
92 | #define AVM_IDX_HDLC_2 0x01 | |
93 | #define AVM_IDX_ISAC_FIFO 0x02 | |
94 | #define AVM_IDX_ISAC_REG_LOW 0x04 | |
95 | #define AVM_IDX_ISAC_REG_HIGH 0x06 | |
96 | ||
97 | #define AVM_STATUS0 0x02 | |
98 | ||
99 | #define AVM_STATUS0_IRQ_ISAC 0x01 | |
100 | #define AVM_STATUS0_IRQ_HDLC 0x02 | |
101 | #define AVM_STATUS0_IRQ_TIMER 0x04 | |
102 | #define AVM_STATUS0_IRQ_MASK 0x07 | |
103 | ||
104 | #define AVM_STATUS0_RESET 0x01 | |
105 | #define AVM_STATUS0_DIS_TIMER 0x02 | |
106 | #define AVM_STATUS0_RES_TIMER 0x04 | |
107 | #define AVM_STATUS0_ENA_IRQ 0x08 | |
108 | #define AVM_STATUS0_TESTBIT 0x10 | |
109 | ||
110 | #define AVM_STATUS1 0x03 | |
111 | #define AVM_STATUS1_ENA_IOM 0x80 | |
112 | ||
113 | #define HDLC_FIFO 0x0 | |
114 | #define HDLC_STATUS 0x4 | |
115 | #define HDLC_CTRL 0x4 | |
116 | ||
117 | #define HDLC_MODE_ITF_FLG 0x01 | |
118 | #define HDLC_MODE_TRANS 0x02 | |
119 | #define HDLC_MODE_CCR_7 0x04 | |
120 | #define HDLC_MODE_CCR_16 0x08 | |
121 | #define HDLC_MODE_TESTLOOP 0x80 | |
122 | ||
123 | #define HDLC_INT_XPR 0x80 | |
124 | #define HDLC_INT_XDU 0x40 | |
125 | #define HDLC_INT_RPR 0x20 | |
126 | #define HDLC_INT_MASK 0xE0 | |
127 | ||
128 | #define HDLC_STAT_RME 0x01 | |
129 | #define HDLC_STAT_RDO 0x10 | |
130 | #define HDLC_STAT_CRCVFRRAB 0x0E | |
131 | #define HDLC_STAT_CRCVFR 0x06 | |
132 | #define HDLC_STAT_RML_MASK 0xff00 | |
133 | ||
134 | #define HDLC_CMD_XRS 0x80 | |
135 | #define HDLC_CMD_XME 0x01 | |
136 | #define HDLC_CMD_RRS 0x20 | |
137 | #define HDLC_CMD_XML_MASK 0xff00 | |
138 | ||
139 | #define AVM_HDLC_FIFO_1 0x10 | |
140 | #define AVM_HDLC_FIFO_2 0x18 | |
141 | ||
142 | #define AVM_HDLC_STATUS_1 0x14 | |
143 | #define AVM_HDLC_STATUS_2 0x1c | |
144 | ||
145 | #define AVM_ISACSX_INDEX 0x04 | |
146 | #define AVM_ISACSX_DATA 0x08 | |
147 | ||
148 | // ---------------------------------------------------------------------- | |
149 | // Fritz!PCI | |
150 | ||
151 | static unsigned char fcpci_read_isac(struct isac *isac, unsigned char offset) | |
152 | { | |
153 | struct fritz_adapter *adapter = isac->priv; | |
154 | unsigned char idx = (offset > 0x2f) ? | |
155 | AVM_IDX_ISAC_REG_HIGH : AVM_IDX_ISAC_REG_LOW; | |
156 | unsigned char val; | |
157 | unsigned long flags; | |
158 | ||
159 | spin_lock_irqsave(&adapter->hw_lock, flags); | |
160 | outb(idx, adapter->io + AVM_INDEX); | |
161 | val = inb(adapter->io + AVM_DATA + (offset & 0xf)); | |
162 | spin_unlock_irqrestore(&adapter->hw_lock, flags); | |
163 | DBG(0x1000, " port %#x, value %#x", | |
164 | offset, val); | |
165 | return val; | |
166 | } | |
167 | ||
168 | static void fcpci_write_isac(struct isac *isac, unsigned char offset, | |
169 | unsigned char value) | |
170 | { | |
171 | struct fritz_adapter *adapter = isac->priv; | |
172 | unsigned char idx = (offset > 0x2f) ? | |
173 | AVM_IDX_ISAC_REG_HIGH : AVM_IDX_ISAC_REG_LOW; | |
174 | unsigned long flags; | |
175 | ||
176 | DBG(0x1000, " port %#x, value %#x", | |
177 | offset, value); | |
178 | spin_lock_irqsave(&adapter->hw_lock, flags); | |
179 | outb(idx, adapter->io + AVM_INDEX); | |
180 | outb(value, adapter->io + AVM_DATA + (offset & 0xf)); | |
181 | spin_unlock_irqrestore(&adapter->hw_lock, flags); | |
182 | } | |
183 | ||
184 | static void fcpci_read_isac_fifo(struct isac *isac, unsigned char * data, | |
185 | int size) | |
186 | { | |
187 | struct fritz_adapter *adapter = isac->priv; | |
188 | unsigned long flags; | |
189 | ||
190 | spin_lock_irqsave(&adapter->hw_lock, flags); | |
191 | outb(AVM_IDX_ISAC_FIFO, adapter->io + AVM_INDEX); | |
192 | insb(adapter->io + AVM_DATA, data, size); | |
193 | spin_unlock_irqrestore(&adapter->hw_lock, flags); | |
194 | } | |
195 | ||
196 | static void fcpci_write_isac_fifo(struct isac *isac, unsigned char * data, | |
197 | int size) | |
198 | { | |
199 | struct fritz_adapter *adapter = isac->priv; | |
200 | unsigned long flags; | |
201 | ||
202 | spin_lock_irqsave(&adapter->hw_lock, flags); | |
203 | outb(AVM_IDX_ISAC_FIFO, adapter->io + AVM_INDEX); | |
204 | outsb(adapter->io + AVM_DATA, data, size); | |
205 | spin_unlock_irqrestore(&adapter->hw_lock, flags); | |
206 | } | |
207 | ||
208 | static u32 fcpci_read_hdlc_status(struct fritz_adapter *adapter, int nr) | |
209 | { | |
210 | u32 val; | |
211 | int idx = nr ? AVM_IDX_HDLC_2 : AVM_IDX_HDLC_1; | |
212 | unsigned long flags; | |
213 | ||
214 | spin_lock_irqsave(&adapter->hw_lock, flags); | |
215 | outl(idx, adapter->io + AVM_INDEX); | |
216 | val = inl(adapter->io + AVM_DATA + HDLC_STATUS); | |
217 | spin_unlock_irqrestore(&adapter->hw_lock, flags); | |
218 | return val; | |
219 | } | |
220 | ||
221 | static void __fcpci_write_ctrl(struct fritz_bcs *bcs, int which) | |
222 | { | |
223 | struct fritz_adapter *adapter = bcs->adapter; | |
224 | int idx = bcs->channel ? AVM_IDX_HDLC_2 : AVM_IDX_HDLC_1; | |
225 | ||
226 | DBG(0x40, "hdlc %c wr%x ctrl %x", | |
227 | 'A' + bcs->channel, which, bcs->ctrl.ctrl); | |
228 | ||
229 | outl(idx, adapter->io + AVM_INDEX); | |
230 | outl(bcs->ctrl.ctrl, adapter->io + AVM_DATA + HDLC_CTRL); | |
231 | } | |
232 | ||
233 | static void fcpci_write_ctrl(struct fritz_bcs *bcs, int which) | |
234 | { | |
235 | struct fritz_adapter *adapter = bcs->adapter; | |
236 | unsigned long flags; | |
237 | ||
238 | spin_lock_irqsave(&adapter->hw_lock, flags); | |
239 | __fcpci_write_ctrl(bcs, which); | |
240 | spin_unlock_irqrestore(&adapter->hw_lock, flags); | |
241 | } | |
242 | ||
243 | // ---------------------------------------------------------------------- | |
244 | // Fritz!PCI v2 | |
245 | ||
246 | static unsigned char fcpci2_read_isac(struct isac *isac, unsigned char offset) | |
247 | { | |
248 | struct fritz_adapter *adapter = isac->priv; | |
249 | unsigned char val; | |
250 | unsigned long flags; | |
251 | ||
252 | spin_lock_irqsave(&adapter->hw_lock, flags); | |
253 | outl(offset, adapter->io + AVM_ISACSX_INDEX); | |
254 | val = inl(adapter->io + AVM_ISACSX_DATA); | |
255 | spin_unlock_irqrestore(&adapter->hw_lock, flags); | |
256 | DBG(0x1000, " port %#x, value %#x", | |
257 | offset, val); | |
258 | ||
259 | return val; | |
260 | } | |
261 | ||
262 | static void fcpci2_write_isac(struct isac *isac, unsigned char offset, | |
263 | unsigned char value) | |
264 | { | |
265 | struct fritz_adapter *adapter = isac->priv; | |
266 | unsigned long flags; | |
267 | ||
268 | DBG(0x1000, " port %#x, value %#x", | |
269 | offset, value); | |
270 | spin_lock_irqsave(&adapter->hw_lock, flags); | |
271 | outl(offset, adapter->io + AVM_ISACSX_INDEX); | |
272 | outl(value, adapter->io + AVM_ISACSX_DATA); | |
273 | spin_unlock_irqrestore(&adapter->hw_lock, flags); | |
274 | } | |
275 | ||
276 | static void fcpci2_read_isac_fifo(struct isac *isac, unsigned char * data, | |
277 | int size) | |
278 | { | |
279 | struct fritz_adapter *adapter = isac->priv; | |
280 | int i; | |
281 | unsigned long flags; | |
282 | ||
283 | spin_lock_irqsave(&adapter->hw_lock, flags); | |
284 | outl(0, adapter->io + AVM_ISACSX_INDEX); | |
285 | for (i = 0; i < size; i++) | |
286 | data[i] = inl(adapter->io + AVM_ISACSX_DATA); | |
287 | spin_unlock_irqrestore(&adapter->hw_lock, flags); | |
288 | } | |
289 | ||
290 | static void fcpci2_write_isac_fifo(struct isac *isac, unsigned char * data, | |
291 | int size) | |
292 | { | |
293 | struct fritz_adapter *adapter = isac->priv; | |
294 | int i; | |
295 | unsigned long flags; | |
296 | ||
297 | spin_lock_irqsave(&adapter->hw_lock, flags); | |
298 | outl(0, adapter->io + AVM_ISACSX_INDEX); | |
299 | for (i = 0; i < size; i++) | |
300 | outl(data[i], adapter->io + AVM_ISACSX_DATA); | |
301 | spin_unlock_irqrestore(&adapter->hw_lock, flags); | |
302 | } | |
303 | ||
304 | static u32 fcpci2_read_hdlc_status(struct fritz_adapter *adapter, int nr) | |
305 | { | |
306 | int offset = nr ? AVM_HDLC_STATUS_2 : AVM_HDLC_STATUS_1; | |
307 | ||
308 | return inl(adapter->io + offset); | |
309 | } | |
310 | ||
311 | static void fcpci2_write_ctrl(struct fritz_bcs *bcs, int which) | |
312 | { | |
313 | struct fritz_adapter *adapter = bcs->adapter; | |
314 | int offset = bcs->channel ? AVM_HDLC_STATUS_2 : AVM_HDLC_STATUS_1; | |
315 | ||
316 | DBG(0x40, "hdlc %c wr%x ctrl %x", | |
317 | 'A' + bcs->channel, which, bcs->ctrl.ctrl); | |
318 | ||
319 | outl(bcs->ctrl.ctrl, adapter->io + offset); | |
320 | } | |
321 | ||
322 | // ---------------------------------------------------------------------- | |
323 | // Fritz!PnP (ISAC access as for Fritz!PCI) | |
324 | ||
325 | static u32 fcpnp_read_hdlc_status(struct fritz_adapter *adapter, int nr) | |
326 | { | |
327 | unsigned char idx = nr ? AVM_IDX_HDLC_2 : AVM_IDX_HDLC_1; | |
328 | u32 val; | |
329 | unsigned long flags; | |
330 | ||
331 | spin_lock_irqsave(&adapter->hw_lock, flags); | |
332 | outb(idx, adapter->io + AVM_INDEX); | |
333 | val = inb(adapter->io + AVM_DATA + HDLC_STATUS); | |
334 | if (val & HDLC_INT_RPR) | |
335 | val |= inb(adapter->io + AVM_DATA + HDLC_STATUS + 1) << 8; | |
336 | spin_unlock_irqrestore(&adapter->hw_lock, flags); | |
337 | return val; | |
338 | } | |
339 | ||
340 | static void __fcpnp_write_ctrl(struct fritz_bcs *bcs, int which) | |
341 | { | |
342 | struct fritz_adapter *adapter = bcs->adapter; | |
343 | unsigned char idx = bcs->channel ? AVM_IDX_HDLC_2 : AVM_IDX_HDLC_1; | |
344 | ||
345 | DBG(0x40, "hdlc %c wr%x ctrl %x", | |
346 | 'A' + bcs->channel, which, bcs->ctrl.ctrl); | |
347 | ||
348 | outb(idx, adapter->io + AVM_INDEX); | |
349 | if (which & 4) | |
350 | outb(bcs->ctrl.sr.mode, | |
351 | adapter->io + AVM_DATA + HDLC_STATUS + 2); | |
352 | if (which & 2) | |
353 | outb(bcs->ctrl.sr.xml, | |
354 | adapter->io + AVM_DATA + HDLC_STATUS + 1); | |
355 | if (which & 1) | |
356 | outb(bcs->ctrl.sr.cmd, | |
357 | adapter->io + AVM_DATA + HDLC_STATUS + 0); | |
358 | } | |
359 | ||
360 | static void fcpnp_write_ctrl(struct fritz_bcs *bcs, int which) | |
361 | { | |
362 | struct fritz_adapter *adapter = bcs->adapter; | |
363 | unsigned long flags; | |
364 | ||
365 | spin_lock_irqsave(&adapter->hw_lock, flags); | |
366 | __fcpnp_write_ctrl(bcs, which); | |
367 | spin_unlock_irqrestore(&adapter->hw_lock, flags); | |
368 | } | |
369 | ||
370 | // ---------------------------------------------------------------------- | |
371 | ||
372 | static inline void B_L1L2(struct fritz_bcs *bcs, int pr, void *arg) | |
373 | { | |
374 | struct hisax_if *ifc = (struct hisax_if *) &bcs->b_if; | |
375 | ||
376 | DBG(2, "pr %#x", pr); | |
377 | ifc->l1l2(ifc, pr, arg); | |
378 | } | |
379 | ||
380 | static void hdlc_fill_fifo(struct fritz_bcs *bcs) | |
381 | { | |
382 | struct fritz_adapter *adapter = bcs->adapter; | |
383 | struct sk_buff *skb = bcs->tx_skb; | |
384 | int count; | |
385 | unsigned long flags; | |
386 | unsigned char *p; | |
387 | ||
388 | DBG(0x40, "hdlc_fill_fifo"); | |
389 | ||
6dd44a74 | 390 | BUG_ON(skb->len == 0); |
1da177e4 LT |
391 | |
392 | bcs->ctrl.sr.cmd &= ~HDLC_CMD_XME; | |
393 | if (bcs->tx_skb->len > bcs->fifo_size) { | |
394 | count = bcs->fifo_size; | |
395 | } else { | |
396 | count = bcs->tx_skb->len; | |
397 | if (bcs->mode != L1_MODE_TRANS) | |
398 | bcs->ctrl.sr.cmd |= HDLC_CMD_XME; | |
399 | } | |
400 | DBG(0x40, "hdlc_fill_fifo %d/%d", count, bcs->tx_skb->len); | |
401 | p = bcs->tx_skb->data; | |
402 | skb_pull(bcs->tx_skb, count); | |
403 | bcs->tx_cnt += count; | |
404 | bcs->ctrl.sr.xml = ((count == bcs->fifo_size) ? 0 : count); | |
405 | ||
406 | switch (adapter->type) { | |
407 | case AVM_FRITZ_PCI: | |
408 | spin_lock_irqsave(&adapter->hw_lock, flags); | |
409 | // sets the correct AVM_INDEX, too | |
410 | __fcpci_write_ctrl(bcs, 3); | |
411 | outsl(adapter->io + AVM_DATA + HDLC_FIFO, | |
412 | p, (count + 3) / 4); | |
413 | spin_unlock_irqrestore(&adapter->hw_lock, flags); | |
414 | break; | |
415 | case AVM_FRITZ_PCIV2: | |
416 | fcpci2_write_ctrl(bcs, 3); | |
417 | outsl(adapter->io + | |
418 | (bcs->channel ? AVM_HDLC_FIFO_2 : AVM_HDLC_FIFO_1), | |
419 | p, (count + 3) / 4); | |
420 | break; | |
421 | case AVM_FRITZ_PNP: | |
422 | spin_lock_irqsave(&adapter->hw_lock, flags); | |
423 | // sets the correct AVM_INDEX, too | |
424 | __fcpnp_write_ctrl(bcs, 3); | |
425 | outsb(adapter->io + AVM_DATA, p, count); | |
426 | spin_unlock_irqrestore(&adapter->hw_lock, flags); | |
427 | break; | |
428 | } | |
429 | } | |
430 | ||
431 | static inline void hdlc_empty_fifo(struct fritz_bcs *bcs, int count) | |
432 | { | |
433 | struct fritz_adapter *adapter = bcs->adapter; | |
434 | unsigned char *p; | |
435 | unsigned char idx = bcs->channel ? AVM_IDX_HDLC_2 : AVM_IDX_HDLC_1; | |
436 | ||
437 | DBG(0x10, "hdlc_empty_fifo %d", count); | |
438 | if (bcs->rcvidx + count > HSCX_BUFMAX) { | |
439 | DBG(0x10, "hdlc_empty_fifo: incoming packet too large"); | |
440 | return; | |
441 | } | |
442 | p = bcs->rcvbuf + bcs->rcvidx; | |
443 | bcs->rcvidx += count; | |
444 | switch (adapter->type) { | |
445 | case AVM_FRITZ_PCI: | |
446 | spin_lock(&adapter->hw_lock); | |
447 | outl(idx, adapter->io + AVM_INDEX); | |
448 | insl(adapter->io + AVM_DATA + HDLC_FIFO, | |
449 | p, (count + 3) / 4); | |
450 | spin_unlock(&adapter->hw_lock); | |
451 | break; | |
452 | case AVM_FRITZ_PCIV2: | |
453 | insl(adapter->io + | |
454 | (bcs->channel ? AVM_HDLC_FIFO_2 : AVM_HDLC_FIFO_1), | |
455 | p, (count + 3) / 4); | |
456 | break; | |
457 | case AVM_FRITZ_PNP: | |
458 | spin_lock(&adapter->hw_lock); | |
459 | outb(idx, adapter->io + AVM_INDEX); | |
460 | insb(adapter->io + AVM_DATA, p, count); | |
461 | spin_unlock(&adapter->hw_lock); | |
462 | break; | |
463 | } | |
464 | } | |
465 | ||
466 | static inline void hdlc_rpr_irq(struct fritz_bcs *bcs, u32 stat) | |
467 | { | |
468 | struct fritz_adapter *adapter = bcs->adapter; | |
469 | struct sk_buff *skb; | |
470 | int len; | |
471 | ||
472 | if (stat & HDLC_STAT_RDO) { | |
473 | DBG(0x10, "RDO"); | |
474 | bcs->ctrl.sr.xml = 0; | |
475 | bcs->ctrl.sr.cmd |= HDLC_CMD_RRS; | |
476 | adapter->write_ctrl(bcs, 1); | |
477 | bcs->ctrl.sr.cmd &= ~HDLC_CMD_RRS; | |
478 | adapter->write_ctrl(bcs, 1); | |
479 | bcs->rcvidx = 0; | |
480 | return; | |
481 | } | |
482 | ||
483 | len = (stat & HDLC_STAT_RML_MASK) >> 8; | |
484 | if (len == 0) | |
485 | len = bcs->fifo_size; | |
486 | ||
487 | hdlc_empty_fifo(bcs, len); | |
488 | ||
489 | if ((stat & HDLC_STAT_RME) || (bcs->mode == L1_MODE_TRANS)) { | |
490 | if (((stat & HDLC_STAT_CRCVFRRAB)== HDLC_STAT_CRCVFR) || | |
491 | (bcs->mode == L1_MODE_TRANS)) { | |
492 | skb = dev_alloc_skb(bcs->rcvidx); | |
493 | if (!skb) { | |
494 | printk(KERN_WARNING "HDLC: receive out of memory\n"); | |
495 | } else { | |
496 | memcpy(skb_put(skb, bcs->rcvidx), bcs->rcvbuf, | |
497 | bcs->rcvidx); | |
498 | DBG_SKB(1, skb); | |
499 | B_L1L2(bcs, PH_DATA | INDICATION, skb); | |
500 | } | |
501 | bcs->rcvidx = 0; | |
502 | } else { | |
503 | DBG(0x10, "ch%d invalid frame %#x", | |
504 | bcs->channel, stat); | |
505 | bcs->rcvidx = 0; | |
506 | } | |
507 | } | |
508 | } | |
509 | ||
510 | static inline void hdlc_xdu_irq(struct fritz_bcs *bcs) | |
511 | { | |
512 | struct fritz_adapter *adapter = bcs->adapter; | |
513 | ||
514 | ||
515 | /* Here we lost an TX interrupt, so | |
516 | * restart transmitting the whole frame. | |
517 | */ | |
518 | bcs->ctrl.sr.xml = 0; | |
519 | bcs->ctrl.sr.cmd |= HDLC_CMD_XRS; | |
520 | adapter->write_ctrl(bcs, 1); | |
521 | bcs->ctrl.sr.cmd &= ~HDLC_CMD_XRS; | |
522 | ||
523 | if (!bcs->tx_skb) { | |
524 | DBG(0x10, "XDU without skb"); | |
525 | adapter->write_ctrl(bcs, 1); | |
526 | return; | |
527 | } | |
528 | /* only hdlc restarts the frame, transparent mode must continue */ | |
529 | if (bcs->mode == L1_MODE_HDLC) { | |
530 | skb_push(bcs->tx_skb, bcs->tx_cnt); | |
531 | bcs->tx_cnt = 0; | |
532 | } | |
533 | } | |
534 | ||
535 | static inline void hdlc_xpr_irq(struct fritz_bcs *bcs) | |
536 | { | |
537 | struct sk_buff *skb; | |
538 | ||
539 | skb = bcs->tx_skb; | |
540 | if (!skb) | |
541 | return; | |
542 | ||
543 | if (skb->len) { | |
544 | hdlc_fill_fifo(bcs); | |
545 | return; | |
546 | } | |
547 | bcs->tx_cnt = 0; | |
548 | bcs->tx_skb = NULL; | |
549 | B_L1L2(bcs, PH_DATA | CONFIRM, (void *) skb->truesize); | |
550 | dev_kfree_skb_irq(skb); | |
551 | } | |
552 | ||
553 | static void hdlc_irq_one(struct fritz_bcs *bcs, u32 stat) | |
554 | { | |
555 | DBG(0x10, "ch%d stat %#x", bcs->channel, stat); | |
556 | if (stat & HDLC_INT_RPR) { | |
557 | DBG(0x10, "RPR"); | |
558 | hdlc_rpr_irq(bcs, stat); | |
559 | } | |
560 | if (stat & HDLC_INT_XDU) { | |
561 | DBG(0x10, "XDU"); | |
562 | hdlc_xdu_irq(bcs); | |
563 | hdlc_xpr_irq(bcs); | |
564 | return; | |
565 | } | |
566 | if (stat & HDLC_INT_XPR) { | |
567 | DBG(0x10, "XPR"); | |
568 | hdlc_xpr_irq(bcs); | |
569 | } | |
570 | } | |
571 | ||
572 | static inline void hdlc_irq(struct fritz_adapter *adapter) | |
573 | { | |
574 | int nr; | |
575 | u32 stat; | |
576 | ||
577 | for (nr = 0; nr < 2; nr++) { | |
578 | stat = adapter->read_hdlc_status(adapter, nr); | |
579 | DBG(0x10, "HDLC %c stat %#x", 'A' + nr, stat); | |
580 | if (stat & HDLC_INT_MASK) | |
581 | hdlc_irq_one(&adapter->bcs[nr], stat); | |
582 | } | |
583 | } | |
584 | ||
585 | static void modehdlc(struct fritz_bcs *bcs, int mode) | |
586 | { | |
587 | struct fritz_adapter *adapter = bcs->adapter; | |
588 | ||
589 | DBG(0x40, "hdlc %c mode %d --> %d", | |
590 | 'A' + bcs->channel, bcs->mode, mode); | |
591 | ||
592 | if (bcs->mode == mode) | |
593 | return; | |
594 | ||
595 | bcs->fifo_size = 32; | |
596 | bcs->ctrl.ctrl = 0; | |
597 | bcs->ctrl.sr.cmd = HDLC_CMD_XRS | HDLC_CMD_RRS; | |
598 | switch (mode) { | |
599 | case L1_MODE_NULL: | |
600 | bcs->ctrl.sr.mode = HDLC_MODE_TRANS; | |
601 | adapter->write_ctrl(bcs, 5); | |
602 | break; | |
603 | case L1_MODE_TRANS: | |
604 | case L1_MODE_HDLC: | |
605 | bcs->rcvidx = 0; | |
606 | bcs->tx_cnt = 0; | |
607 | bcs->tx_skb = NULL; | |
608 | if (mode == L1_MODE_TRANS) { | |
609 | bcs->ctrl.sr.mode = HDLC_MODE_TRANS; | |
610 | } else { | |
611 | bcs->ctrl.sr.mode = HDLC_MODE_ITF_FLG; | |
612 | } | |
613 | adapter->write_ctrl(bcs, 5); | |
614 | bcs->ctrl.sr.cmd = HDLC_CMD_XRS; | |
615 | adapter->write_ctrl(bcs, 1); | |
616 | bcs->ctrl.sr.cmd = 0; | |
617 | break; | |
618 | } | |
619 | bcs->mode = mode; | |
620 | } | |
621 | ||
622 | static void fritz_b_l2l1(struct hisax_if *ifc, int pr, void *arg) | |
623 | { | |
624 | struct fritz_bcs *bcs = ifc->priv; | |
625 | struct sk_buff *skb = arg; | |
626 | int mode; | |
627 | ||
628 | DBG(0x10, "pr %#x", pr); | |
629 | ||
630 | switch (pr) { | |
631 | case PH_DATA | REQUEST: | |
6dd44a74 | 632 | BUG_ON(bcs->tx_skb); |
1da177e4 LT |
633 | bcs->tx_skb = skb; |
634 | DBG_SKB(1, skb); | |
635 | hdlc_fill_fifo(bcs); | |
636 | break; | |
637 | case PH_ACTIVATE | REQUEST: | |
638 | mode = (int) arg; | |
639 | DBG(4,"B%d,PH_ACTIVATE_REQUEST %d", bcs->channel + 1, mode); | |
640 | modehdlc(bcs, mode); | |
641 | B_L1L2(bcs, PH_ACTIVATE | INDICATION, NULL); | |
642 | break; | |
643 | case PH_DEACTIVATE | REQUEST: | |
644 | DBG(4,"B%d,PH_DEACTIVATE_REQUEST", bcs->channel + 1); | |
645 | modehdlc(bcs, L1_MODE_NULL); | |
646 | B_L1L2(bcs, PH_DEACTIVATE | INDICATION, NULL); | |
647 | break; | |
648 | } | |
649 | } | |
650 | ||
651 | // ---------------------------------------------------------------------- | |
652 | ||
653 | static irqreturn_t | |
654 | fcpci2_irq(int intno, void *dev, struct pt_regs *regs) | |
655 | { | |
656 | struct fritz_adapter *adapter = dev; | |
657 | unsigned char val; | |
658 | ||
659 | val = inb(adapter->io + AVM_STATUS0); | |
660 | if (!(val & AVM_STATUS0_IRQ_MASK)) | |
661 | /* hopefully a shared IRQ reqest */ | |
662 | return IRQ_NONE; | |
663 | DBG(2, "STATUS0 %#x", val); | |
664 | if (val & AVM_STATUS0_IRQ_ISAC) | |
665 | isacsx_irq(&adapter->isac); | |
666 | if (val & AVM_STATUS0_IRQ_HDLC) | |
667 | hdlc_irq(adapter); | |
668 | if (val & AVM_STATUS0_IRQ_ISAC) | |
669 | isacsx_irq(&adapter->isac); | |
670 | return IRQ_HANDLED; | |
671 | } | |
672 | ||
673 | static irqreturn_t | |
674 | fcpci_irq(int intno, void *dev, struct pt_regs *regs) | |
675 | { | |
676 | struct fritz_adapter *adapter = dev; | |
677 | unsigned char sval; | |
678 | ||
679 | sval = inb(adapter->io + 2); | |
680 | if ((sval & AVM_STATUS0_IRQ_MASK) == AVM_STATUS0_IRQ_MASK) | |
681 | /* possibly a shared IRQ reqest */ | |
682 | return IRQ_NONE; | |
683 | DBG(2, "sval %#x", sval); | |
684 | if (!(sval & AVM_STATUS0_IRQ_ISAC)) | |
685 | isac_irq(&adapter->isac); | |
686 | ||
687 | if (!(sval & AVM_STATUS0_IRQ_HDLC)) | |
688 | hdlc_irq(adapter); | |
689 | return IRQ_HANDLED; | |
690 | } | |
691 | ||
692 | // ---------------------------------------------------------------------- | |
693 | ||
694 | static inline void fcpci2_init(struct fritz_adapter *adapter) | |
695 | { | |
696 | outb(AVM_STATUS0_RES_TIMER, adapter->io + AVM_STATUS0); | |
697 | outb(AVM_STATUS0_ENA_IRQ, adapter->io + AVM_STATUS0); | |
698 | ||
699 | } | |
700 | ||
701 | static inline void fcpci_init(struct fritz_adapter *adapter) | |
702 | { | |
703 | outb(AVM_STATUS0_DIS_TIMER | AVM_STATUS0_RES_TIMER | | |
704 | AVM_STATUS0_ENA_IRQ, adapter->io + AVM_STATUS0); | |
705 | ||
706 | outb(AVM_STATUS1_ENA_IOM | adapter->irq, | |
707 | adapter->io + AVM_STATUS1); | |
708 | mdelay(10); | |
709 | } | |
710 | ||
711 | // ---------------------------------------------------------------------- | |
712 | ||
713 | static int __devinit fcpcipnp_setup(struct fritz_adapter *adapter) | |
714 | { | |
715 | u32 val = 0; | |
716 | int retval; | |
717 | ||
718 | DBG(1,""); | |
719 | ||
720 | isac_init(&adapter->isac); // FIXME is this okay now | |
721 | ||
722 | retval = -EBUSY; | |
723 | if (!request_region(adapter->io, 32, "fcpcipnp")) | |
724 | goto err; | |
725 | ||
726 | switch (adapter->type) { | |
727 | case AVM_FRITZ_PCIV2: | |
9ba02bec | 728 | retval = request_irq(adapter->irq, fcpci2_irq, IRQF_SHARED, |
1da177e4 LT |
729 | "fcpcipnp", adapter); |
730 | break; | |
731 | case AVM_FRITZ_PCI: | |
9ba02bec | 732 | retval = request_irq(adapter->irq, fcpci_irq, IRQF_SHARED, |
1da177e4 LT |
733 | "fcpcipnp", adapter); |
734 | break; | |
735 | case AVM_FRITZ_PNP: | |
736 | retval = request_irq(adapter->irq, fcpci_irq, 0, | |
737 | "fcpcipnp", adapter); | |
738 | break; | |
739 | } | |
740 | if (retval) | |
741 | goto err_region; | |
742 | ||
743 | switch (adapter->type) { | |
744 | case AVM_FRITZ_PCIV2: | |
745 | case AVM_FRITZ_PCI: | |
746 | val = inl(adapter->io); | |
747 | break; | |
748 | case AVM_FRITZ_PNP: | |
749 | val = inb(adapter->io); | |
750 | val |= inb(adapter->io + 1) << 8; | |
751 | break; | |
752 | } | |
753 | ||
754 | DBG(1, "stat %#x Class %X Rev %d", | |
755 | val, val & 0xff, (val>>8) & 0xff); | |
756 | ||
757 | spin_lock_init(&adapter->hw_lock); | |
758 | adapter->isac.priv = adapter; | |
759 | switch (adapter->type) { | |
760 | case AVM_FRITZ_PCIV2: | |
761 | adapter->isac.read_isac = &fcpci2_read_isac; | |
762 | adapter->isac.write_isac = &fcpci2_write_isac; | |
763 | adapter->isac.read_isac_fifo = &fcpci2_read_isac_fifo; | |
764 | adapter->isac.write_isac_fifo = &fcpci2_write_isac_fifo; | |
765 | ||
766 | adapter->read_hdlc_status = &fcpci2_read_hdlc_status; | |
767 | adapter->write_ctrl = &fcpci2_write_ctrl; | |
768 | break; | |
769 | case AVM_FRITZ_PCI: | |
770 | adapter->isac.read_isac = &fcpci_read_isac; | |
771 | adapter->isac.write_isac = &fcpci_write_isac; | |
772 | adapter->isac.read_isac_fifo = &fcpci_read_isac_fifo; | |
773 | adapter->isac.write_isac_fifo = &fcpci_write_isac_fifo; | |
774 | ||
775 | adapter->read_hdlc_status = &fcpci_read_hdlc_status; | |
776 | adapter->write_ctrl = &fcpci_write_ctrl; | |
777 | break; | |
778 | case AVM_FRITZ_PNP: | |
779 | adapter->isac.read_isac = &fcpci_read_isac; | |
780 | adapter->isac.write_isac = &fcpci_write_isac; | |
781 | adapter->isac.read_isac_fifo = &fcpci_read_isac_fifo; | |
782 | adapter->isac.write_isac_fifo = &fcpci_write_isac_fifo; | |
783 | ||
784 | adapter->read_hdlc_status = &fcpnp_read_hdlc_status; | |
785 | adapter->write_ctrl = &fcpnp_write_ctrl; | |
786 | break; | |
787 | } | |
788 | ||
789 | // Reset | |
790 | outb(0, adapter->io + AVM_STATUS0); | |
791 | mdelay(10); | |
792 | outb(AVM_STATUS0_RESET, adapter->io + AVM_STATUS0); | |
793 | mdelay(10); | |
794 | outb(0, adapter->io + AVM_STATUS0); | |
795 | mdelay(10); | |
796 | ||
797 | switch (adapter->type) { | |
798 | case AVM_FRITZ_PCIV2: | |
799 | fcpci2_init(adapter); | |
800 | isacsx_setup(&adapter->isac); | |
801 | break; | |
802 | case AVM_FRITZ_PCI: | |
803 | case AVM_FRITZ_PNP: | |
804 | fcpci_init(adapter); | |
805 | isac_setup(&adapter->isac); | |
806 | break; | |
807 | } | |
808 | val = adapter->read_hdlc_status(adapter, 0); | |
809 | DBG(0x20, "HDLC A STA %x", val); | |
810 | val = adapter->read_hdlc_status(adapter, 1); | |
811 | DBG(0x20, "HDLC B STA %x", val); | |
812 | ||
813 | adapter->bcs[0].mode = -1; | |
814 | adapter->bcs[1].mode = -1; | |
815 | modehdlc(&adapter->bcs[0], L1_MODE_NULL); | |
816 | modehdlc(&adapter->bcs[1], L1_MODE_NULL); | |
817 | ||
818 | return 0; | |
819 | ||
820 | err_region: | |
821 | release_region(adapter->io, 32); | |
822 | err: | |
823 | return retval; | |
824 | } | |
825 | ||
826 | static void __devexit fcpcipnp_release(struct fritz_adapter *adapter) | |
827 | { | |
828 | DBG(1,""); | |
829 | ||
830 | outb(0, adapter->io + AVM_STATUS0); | |
831 | free_irq(adapter->irq, adapter); | |
832 | release_region(adapter->io, 32); | |
833 | } | |
834 | ||
835 | // ---------------------------------------------------------------------- | |
836 | ||
837 | static struct fritz_adapter * __devinit | |
838 | new_adapter(void) | |
839 | { | |
840 | struct fritz_adapter *adapter; | |
841 | struct hisax_b_if *b_if[2]; | |
842 | int i; | |
843 | ||
844 | adapter = kmalloc(sizeof(struct fritz_adapter), GFP_KERNEL); | |
845 | if (!adapter) | |
846 | return NULL; | |
847 | ||
848 | memset(adapter, 0, sizeof(struct fritz_adapter)); | |
849 | ||
850 | adapter->isac.hisax_d_if.owner = THIS_MODULE; | |
851 | adapter->isac.hisax_d_if.ifc.priv = &adapter->isac; | |
852 | adapter->isac.hisax_d_if.ifc.l2l1 = isac_d_l2l1; | |
853 | ||
854 | for (i = 0; i < 2; i++) { | |
855 | adapter->bcs[i].adapter = adapter; | |
856 | adapter->bcs[i].channel = i; | |
857 | adapter->bcs[i].b_if.ifc.priv = &adapter->bcs[i]; | |
858 | adapter->bcs[i].b_if.ifc.l2l1 = fritz_b_l2l1; | |
859 | } | |
860 | ||
861 | for (i = 0; i < 2; i++) | |
862 | b_if[i] = &adapter->bcs[i].b_if; | |
863 | ||
864 | hisax_register(&adapter->isac.hisax_d_if, b_if, "fcpcipnp", protocol); | |
865 | ||
866 | return adapter; | |
867 | } | |
868 | ||
869 | static void delete_adapter(struct fritz_adapter *adapter) | |
870 | { | |
871 | hisax_unregister(&adapter->isac.hisax_d_if); | |
872 | kfree(adapter); | |
873 | } | |
874 | ||
875 | static int __devinit fcpci_probe(struct pci_dev *pdev, | |
876 | const struct pci_device_id *ent) | |
877 | { | |
878 | struct fritz_adapter *adapter; | |
879 | int retval; | |
880 | ||
881 | retval = -ENOMEM; | |
882 | adapter = new_adapter(); | |
883 | if (!adapter) | |
884 | goto err; | |
885 | ||
886 | pci_set_drvdata(pdev, adapter); | |
887 | ||
888 | if (pdev->device == PCI_DEVICE_ID_AVM_A1_V2) | |
889 | adapter->type = AVM_FRITZ_PCIV2; | |
890 | else | |
891 | adapter->type = AVM_FRITZ_PCI; | |
892 | ||
893 | retval = pci_enable_device(pdev); | |
894 | if (retval) | |
895 | goto err_free; | |
896 | ||
897 | adapter->io = pci_resource_start(pdev, 1); | |
898 | adapter->irq = pdev->irq; | |
899 | ||
900 | printk(KERN_INFO "hisax_fcpcipnp: found adapter %s at %s\n", | |
901 | (char *) ent->driver_data, pci_name(pdev)); | |
902 | ||
903 | retval = fcpcipnp_setup(adapter); | |
904 | if (retval) | |
905 | goto err_free; | |
906 | ||
907 | return 0; | |
908 | ||
909 | err_free: | |
910 | delete_adapter(adapter); | |
911 | err: | |
912 | return retval; | |
913 | } | |
914 | ||
915 | #ifdef __ISAPNP__ | |
916 | static int __devinit fcpnp_probe(struct pnp_dev *pdev, const struct pnp_device_id *dev_id) | |
917 | { | |
918 | struct fritz_adapter *adapter; | |
919 | int retval; | |
920 | ||
921 | if (!pdev) | |
922 | return(-ENODEV); | |
923 | ||
924 | retval = -ENOMEM; | |
925 | adapter = new_adapter(); | |
926 | if (!adapter) | |
927 | goto err; | |
928 | ||
929 | pnp_set_drvdata(pdev, adapter); | |
930 | ||
931 | adapter->type = AVM_FRITZ_PNP; | |
932 | ||
933 | pnp_disable_dev(pdev); | |
934 | retval = pnp_activate_dev(pdev); | |
935 | if (retval < 0) { | |
936 | printk(KERN_WARNING "%s: pnp_activate_dev(%s) ret(%d)\n", __FUNCTION__, | |
937 | (char *)dev_id->driver_data, retval); | |
938 | goto err_free; | |
939 | } | |
940 | adapter->io = pnp_port_start(pdev, 0); | |
941 | adapter->irq = pnp_irq(pdev, 0); | |
942 | ||
943 | printk(KERN_INFO "hisax_fcpcipnp: found adapter %s at IO %#x irq %d\n", | |
944 | (char *) dev_id->driver_data, adapter->io, adapter->irq); | |
945 | ||
946 | retval = fcpcipnp_setup(adapter); | |
947 | if (retval) | |
948 | goto err_free; | |
949 | ||
950 | return 0; | |
951 | ||
952 | err_free: | |
953 | delete_adapter(adapter); | |
954 | err: | |
955 | return retval; | |
956 | } | |
957 | ||
958 | static void __devexit fcpnp_remove(struct pnp_dev *pdev) | |
959 | { | |
960 | struct fritz_adapter *adapter = pnp_get_drvdata(pdev); | |
961 | ||
962 | if (adapter) { | |
963 | fcpcipnp_release(adapter); | |
964 | delete_adapter(adapter); | |
965 | } | |
966 | pnp_disable_dev(pdev); | |
967 | } | |
968 | ||
969 | static struct pnp_driver fcpnp_driver = { | |
970 | .name = "fcpnp", | |
971 | .probe = fcpnp_probe, | |
972 | .remove = __devexit_p(fcpnp_remove), | |
973 | .id_table = fcpnp_ids, | |
974 | }; | |
975 | #endif | |
976 | ||
977 | static void __devexit fcpci_remove(struct pci_dev *pdev) | |
978 | { | |
979 | struct fritz_adapter *adapter = pci_get_drvdata(pdev); | |
980 | ||
981 | fcpcipnp_release(adapter); | |
982 | pci_disable_device(pdev); | |
983 | delete_adapter(adapter); | |
984 | } | |
985 | ||
986 | static struct pci_driver fcpci_driver = { | |
987 | .name = "fcpci", | |
988 | .probe = fcpci_probe, | |
989 | .remove = __devexit_p(fcpci_remove), | |
990 | .id_table = fcpci_ids, | |
991 | }; | |
992 | ||
993 | static int __init hisax_fcpcipnp_init(void) | |
994 | { | |
995 | int retval; | |
996 | ||
997 | printk(KERN_INFO "hisax_fcpcipnp: Fritz!Card PCI/PCIv2/PnP ISDN driver v0.0.1\n"); | |
998 | ||
999 | retval = pci_register_driver(&fcpci_driver); | |
1000 | if (retval) | |
1001 | goto out; | |
1002 | #ifdef __ISAPNP__ | |
1003 | retval = pnp_register_driver(&fcpnp_driver); | |
1004 | if (retval < 0) | |
1005 | goto out_unregister_pci; | |
1006 | #endif | |
1007 | return 0; | |
1008 | ||
1009 | out_unregister_pci: | |
1010 | pci_unregister_driver(&fcpci_driver); | |
1011 | out: | |
1012 | return retval; | |
1013 | } | |
1014 | ||
1015 | static void __exit hisax_fcpcipnp_exit(void) | |
1016 | { | |
1017 | #ifdef __ISAPNP__ | |
1018 | pnp_unregister_driver(&fcpnp_driver); | |
1019 | #endif | |
1020 | pci_unregister_driver(&fcpci_driver); | |
1021 | } | |
1022 | ||
1023 | module_init(hisax_fcpcipnp_init); | |
1024 | module_exit(hisax_fcpcipnp_exit); |