blob: eb6b432e261fb79ade9e743b842f3c44f319917e [file] [log] [blame]
Linus Torvalds1da177e2005-04-16 15:20:36 -07001/* $Id: avm_a1.c,v 2.15.2.4 2004/01/13 21:46:03 keil Exp $
2 *
3 * low level stuff for AVM A1 (Fritz) isdn cards
4 *
5 * Author Karsten Keil
6 * Copyright by Karsten Keil <keil@isdn4linux.de>
7 *
8 * This software may be used and distributed according to the terms
9 * of the GNU General Public License, incorporated herein by reference.
10 *
11 */
12
13#include <linux/init.h>
14#include "hisax.h"
15#include "isac.h"
16#include "hscx.h"
17#include "isdnl1.h"
18
Linus Torvalds1da177e2005-04-16 15:20:36 -070019static const char *avm_revision = "$Revision: 2.15.2.4 $";
20
21#define AVM_A1_STAT_ISAC 0x01
22#define AVM_A1_STAT_HSCX 0x02
23#define AVM_A1_STAT_TIMER 0x04
24
25#define byteout(addr,val) outb(val,addr)
26#define bytein(addr) inb(addr)
27
28static inline u_char
29readreg(unsigned int adr, u_char off)
30{
31 return (bytein(adr + off));
32}
33
34static inline void
35writereg(unsigned int adr, u_char off, u_char data)
36{
37 byteout(adr + off, data);
38}
39
40
41static inline void
42read_fifo(unsigned int adr, u_char * data, int size)
43{
44 insb(adr, data, size);
45}
46
47static void
48write_fifo(unsigned int adr, u_char * data, int size)
49{
50 outsb(adr, data, size);
51}
52
53/* Interface functions */
54
55static u_char
56ReadISAC(struct IsdnCardState *cs, u_char offset)
57{
58 return (readreg(cs->hw.avm.isac, offset));
59}
60
61static void
62WriteISAC(struct IsdnCardState *cs, u_char offset, u_char value)
63{
64 writereg(cs->hw.avm.isac, offset, value);
65}
66
67static void
68ReadISACfifo(struct IsdnCardState *cs, u_char * data, int size)
69{
70 read_fifo(cs->hw.avm.isacfifo, data, size);
71}
72
73static void
74WriteISACfifo(struct IsdnCardState *cs, u_char * data, int size)
75{
76 write_fifo(cs->hw.avm.isacfifo, data, size);
77}
78
79static u_char
80ReadHSCX(struct IsdnCardState *cs, int hscx, u_char offset)
81{
82 return (readreg(cs->hw.avm.hscx[hscx], offset));
83}
84
85static void
86WriteHSCX(struct IsdnCardState *cs, int hscx, u_char offset, u_char value)
87{
88 writereg(cs->hw.avm.hscx[hscx], offset, value);
89}
90
91/*
92 * fast interrupt HSCX stuff goes here
93 */
94
95#define READHSCX(cs, nr, reg) readreg(cs->hw.avm.hscx[nr], reg)
96#define WRITEHSCX(cs, nr, reg, data) writereg(cs->hw.avm.hscx[nr], reg, data)
97#define READHSCXFIFO(cs, nr, ptr, cnt) read_fifo(cs->hw.avm.hscxfifo[nr], ptr, cnt)
98#define WRITEHSCXFIFO(cs, nr, ptr, cnt) write_fifo(cs->hw.avm.hscxfifo[nr], ptr, cnt)
99
100#include "hscx_irq.c"
101
102static irqreturn_t
David Howells7d12e782006-10-05 14:55:46 +0100103avm_a1_interrupt(int intno, void *dev_id)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700104{
105 struct IsdnCardState *cs = dev_id;
106 u_char val, sval;
107 u_long flags;
108
109 spin_lock_irqsave(&cs->lock, flags);
110 while (((sval = bytein(cs->hw.avm.cfg_reg)) & 0xf) != 0x7) {
111 if (!(sval & AVM_A1_STAT_TIMER)) {
112 byteout(cs->hw.avm.cfg_reg, 0x1E);
113 sval = bytein(cs->hw.avm.cfg_reg);
114 } else if (cs->debug & L1_DEB_INTSTAT)
115 debugl1(cs, "avm IntStatus %x", sval);
116 if (!(sval & AVM_A1_STAT_HSCX)) {
117 val = readreg(cs->hw.avm.hscx[1], HSCX_ISTA);
118 if (val)
119 hscx_int_main(cs, val);
120 }
121 if (!(sval & AVM_A1_STAT_ISAC)) {
122 val = readreg(cs->hw.avm.isac, ISAC_ISTA);
123 if (val)
124 isac_interrupt(cs, val);
125 }
126 }
127 writereg(cs->hw.avm.hscx[0], HSCX_MASK, 0xFF);
128 writereg(cs->hw.avm.hscx[1], HSCX_MASK, 0xFF);
129 writereg(cs->hw.avm.isac, ISAC_MASK, 0xFF);
130 writereg(cs->hw.avm.isac, ISAC_MASK, 0x0);
131 writereg(cs->hw.avm.hscx[0], HSCX_MASK, 0x0);
132 writereg(cs->hw.avm.hscx[1], HSCX_MASK, 0x0);
133 spin_unlock_irqrestore(&cs->lock, flags);
134 return IRQ_HANDLED;
135}
136
Jesper Juhl77933d72005-07-27 11:46:09 -0700137static inline void
Linus Torvalds1da177e2005-04-16 15:20:36 -0700138release_ioregs(struct IsdnCardState *cs, int mask)
139{
140 release_region(cs->hw.avm.cfg_reg, 8);
141 if (mask & 1)
142 release_region(cs->hw.avm.isac + 32, 32);
143 if (mask & 2)
144 release_region(cs->hw.avm.isacfifo, 1);
145 if (mask & 4)
146 release_region(cs->hw.avm.hscx[0] + 32, 32);
147 if (mask & 8)
148 release_region(cs->hw.avm.hscxfifo[0], 1);
149 if (mask & 0x10)
150 release_region(cs->hw.avm.hscx[1] + 32, 32);
151 if (mask & 0x20)
152 release_region(cs->hw.avm.hscxfifo[1], 1);
153}
154
155static int
156AVM_card_msg(struct IsdnCardState *cs, int mt, void *arg)
157{
158 u_long flags;
159
160 switch (mt) {
161 case CARD_RESET:
162 return(0);
163 case CARD_RELEASE:
164 release_ioregs(cs, 0x3f);
165 return(0);
166 case CARD_INIT:
167 spin_lock_irqsave(&cs->lock, flags);
168 inithscxisac(cs, 1);
169 byteout(cs->hw.avm.cfg_reg, 0x16);
170 byteout(cs->hw.avm.cfg_reg, 0x1E);
171 inithscxisac(cs, 2);
172 spin_unlock_irqrestore(&cs->lock, flags);
173 return(0);
174 case CARD_TEST:
175 return(0);
176 }
177 return(0);
178}
179
Karsten Keil67eb5db2006-07-10 04:44:11 -0700180int __devinit
Linus Torvalds1da177e2005-04-16 15:20:36 -0700181setup_avm_a1(struct IsdnCard *card)
182{
183 u_char val;
184 struct IsdnCardState *cs = card->cs;
185 char tmp[64];
186
187 strcpy(tmp, avm_revision);
188 printk(KERN_INFO "HiSax: AVM driver Rev. %s\n", HiSax_getrev(tmp));
189 if (cs->typ != ISDN_CTYPE_A1)
190 return (0);
191
192 cs->hw.avm.cfg_reg = card->para[1] + 0x1800;
193 cs->hw.avm.isac = card->para[1] + 0x1400 - 0x20;
194 cs->hw.avm.hscx[0] = card->para[1] + 0x400 - 0x20;
195 cs->hw.avm.hscx[1] = card->para[1] + 0xc00 - 0x20;
196 cs->hw.avm.isacfifo = card->para[1] + 0x1000;
197 cs->hw.avm.hscxfifo[0] = card->para[1];
198 cs->hw.avm.hscxfifo[1] = card->para[1] + 0x800;
199 cs->irq = card->para[0];
200 if (!request_region(cs->hw.avm.cfg_reg, 8, "avm cfg")) {
201 printk(KERN_WARNING
Jeff Garzik83493042007-10-31 03:42:07 -0400202 "HiSax: AVM A1 config port %x-%x already in use\n",
Linus Torvalds1da177e2005-04-16 15:20:36 -0700203 cs->hw.avm.cfg_reg,
204 cs->hw.avm.cfg_reg + 8);
205 return (0);
206 }
207 if (!request_region(cs->hw.avm.isac + 32, 32, "HiSax isac")) {
208 printk(KERN_WARNING
Jeff Garzik83493042007-10-31 03:42:07 -0400209 "HiSax: AVM A1 isac ports %x-%x already in use\n",
Linus Torvalds1da177e2005-04-16 15:20:36 -0700210 cs->hw.avm.isac + 32,
211 cs->hw.avm.isac + 64);
212 release_ioregs(cs, 0);
213 return (0);
214 }
215 if (!request_region(cs->hw.avm.isacfifo, 1, "HiSax isac fifo")) {
216 printk(KERN_WARNING
Jeff Garzik83493042007-10-31 03:42:07 -0400217 "HiSax: AVM A1 isac fifo port %x already in use\n",
Linus Torvalds1da177e2005-04-16 15:20:36 -0700218 cs->hw.avm.isacfifo);
219 release_ioregs(cs, 1);
220 return (0);
221 }
222 if (!request_region(cs->hw.avm.hscx[0] + 32, 32, "HiSax hscx A")) {
223 printk(KERN_WARNING
Jeff Garzik83493042007-10-31 03:42:07 -0400224 "HiSax: AVM A1 hscx A ports %x-%x already in use\n",
Linus Torvalds1da177e2005-04-16 15:20:36 -0700225 cs->hw.avm.hscx[0] + 32,
226 cs->hw.avm.hscx[0] + 64);
227 release_ioregs(cs, 3);
228 return (0);
229 }
230 if (!request_region(cs->hw.avm.hscxfifo[0], 1, "HiSax hscx A fifo")) {
231 printk(KERN_WARNING
Jeff Garzik83493042007-10-31 03:42:07 -0400232 "HiSax: AVM A1 hscx A fifo port %x already in use\n",
Linus Torvalds1da177e2005-04-16 15:20:36 -0700233 cs->hw.avm.hscxfifo[0]);
234 release_ioregs(cs, 7);
235 return (0);
236 }
237 if (!request_region(cs->hw.avm.hscx[1] + 32, 32, "HiSax hscx B")) {
238 printk(KERN_WARNING
Jeff Garzik83493042007-10-31 03:42:07 -0400239 "HiSax: AVM A1 hscx B ports %x-%x already in use\n",
Linus Torvalds1da177e2005-04-16 15:20:36 -0700240 cs->hw.avm.hscx[1] + 32,
241 cs->hw.avm.hscx[1] + 64);
242 release_ioregs(cs, 0xf);
243 return (0);
244 }
245 if (!request_region(cs->hw.avm.hscxfifo[1], 1, "HiSax hscx B fifo")) {
246 printk(KERN_WARNING
Jeff Garzik83493042007-10-31 03:42:07 -0400247 "HiSax: AVM A1 hscx B fifo port %x already in use\n",
Linus Torvalds1da177e2005-04-16 15:20:36 -0700248 cs->hw.avm.hscxfifo[1]);
249 release_ioregs(cs, 0x1f);
250 return (0);
251 }
252 byteout(cs->hw.avm.cfg_reg, 0x0);
253 HZDELAY(HZ / 5 + 1);
254 byteout(cs->hw.avm.cfg_reg, 0x1);
255 HZDELAY(HZ / 5 + 1);
256 byteout(cs->hw.avm.cfg_reg, 0x0);
257 HZDELAY(HZ / 5 + 1);
258 val = cs->irq;
259 if (val == 9)
260 val = 2;
261 byteout(cs->hw.avm.cfg_reg + 1, val);
262 HZDELAY(HZ / 5 + 1);
263 byteout(cs->hw.avm.cfg_reg, 0x0);
264 HZDELAY(HZ / 5 + 1);
265
266 val = bytein(cs->hw.avm.cfg_reg);
267 printk(KERN_INFO "AVM A1: Byte at %x is %x\n",
268 cs->hw.avm.cfg_reg, val);
269 val = bytein(cs->hw.avm.cfg_reg + 3);
270 printk(KERN_INFO "AVM A1: Byte at %x is %x\n",
271 cs->hw.avm.cfg_reg + 3, val);
272 val = bytein(cs->hw.avm.cfg_reg + 2);
273 printk(KERN_INFO "AVM A1: Byte at %x is %x\n",
274 cs->hw.avm.cfg_reg + 2, val);
275 val = bytein(cs->hw.avm.cfg_reg);
276 printk(KERN_INFO "AVM A1: Byte at %x is %x\n",
277 cs->hw.avm.cfg_reg, val);
278
Jeff Garzik83493042007-10-31 03:42:07 -0400279 printk(KERN_INFO "HiSax: AVM A1 config irq:%d cfg:0x%X\n",
280 cs->irq,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700281 cs->hw.avm.cfg_reg);
282 printk(KERN_INFO
283 "HiSax: isac:0x%X/0x%X\n",
284 cs->hw.avm.isac + 32, cs->hw.avm.isacfifo);
285 printk(KERN_INFO
286 "HiSax: hscx A:0x%X/0x%X hscx B:0x%X/0x%X\n",
287 cs->hw.avm.hscx[0] + 32, cs->hw.avm.hscxfifo[0],
288 cs->hw.avm.hscx[1] + 32, cs->hw.avm.hscxfifo[1]);
289
290 cs->readisac = &ReadISAC;
291 cs->writeisac = &WriteISAC;
292 cs->readisacfifo = &ReadISACfifo;
293 cs->writeisacfifo = &WriteISACfifo;
294 cs->BC_Read_Reg = &ReadHSCX;
295 cs->BC_Write_Reg = &WriteHSCX;
296 cs->BC_Send_Data = &hscx_fill_fifo;
297 setup_isac(cs);
298 cs->cardmsg = &AVM_card_msg;
299 cs->irq_func = &avm_a1_interrupt;
300 ISACVersion(cs, "AVM A1:");
301 if (HscxVersion(cs, "AVM A1:")) {
302 printk(KERN_WARNING
303 "AVM A1: wrong HSCX versions check IO address\n");
304 release_ioregs(cs, 0x3f);
305 return (0);
306 }
307 return (1);
308}