blob: 1f879b500d838998969597e8af63b08ce1912fae [file] [log] [blame]
Linus Torvalds1da177e2005-04-16 15:20:36 -07001/* $Id: asuscom.c,v 1.14.2.4 2004/01/13 23:48:39 keil Exp $
2 *
3 * low level stuff for ASUSCOM NETWORK INC. ISDNLink 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 * Thanks to ASUSCOM NETWORK INC. Taiwan and Dynalink NL for information
12 *
13 */
14
15#include <linux/init.h>
16#include <linux/isapnp.h>
17#include "hisax.h"
18#include "isac.h"
19#include "ipac.h"
20#include "hscx.h"
21#include "isdnl1.h"
22
Adrian Bunk672c3fd2005-06-25 14:59:18 -070023static const char *Asuscom_revision = "$Revision: 1.14.2.4 $";
Linus Torvalds1da177e2005-04-16 15:20:36 -070024
25#define byteout(addr,val) outb(val,addr)
26#define bytein(addr) inb(addr)
27
28#define ASUS_ISAC 0
29#define ASUS_HSCX 1
30#define ASUS_ADR 2
31#define ASUS_CTRL_U7 3
32#define ASUS_CTRL_POTS 5
33
34#define ASUS_IPAC_ALE 0
35#define ASUS_IPAC_DATA 1
36
37#define ASUS_ISACHSCX 1
38#define ASUS_IPAC 2
39
40/* CARD_ADR (Write) */
41#define ASUS_RESET 0x80 /* Bit 7 Reset-Leitung */
42
43static inline u_char
44readreg(unsigned int ale, unsigned int adr, u_char off)
45{
46 register u_char ret;
47
48 byteout(ale, off);
49 ret = bytein(adr);
50 return (ret);
51}
52
53static inline void
54readfifo(unsigned int ale, unsigned int adr, u_char off, u_char * data, int size)
55{
56 byteout(ale, off);
57 insb(adr, data, size);
58}
59
60
61static inline void
62writereg(unsigned int ale, unsigned int adr, u_char off, u_char data)
63{
64 byteout(ale, off);
65 byteout(adr, data);
66}
67
68static inline void
69writefifo(unsigned int ale, unsigned int adr, u_char off, u_char * data, int size)
70{
71 byteout(ale, off);
72 outsb(adr, data, size);
73}
74
75/* Interface functions */
76
77static u_char
78ReadISAC(struct IsdnCardState *cs, u_char offset)
79{
80 return (readreg(cs->hw.asus.adr, cs->hw.asus.isac, offset));
81}
82
83static void
84WriteISAC(struct IsdnCardState *cs, u_char offset, u_char value)
85{
86 writereg(cs->hw.asus.adr, cs->hw.asus.isac, offset, value);
87}
88
89static void
90ReadISACfifo(struct IsdnCardState *cs, u_char * data, int size)
91{
92 readfifo(cs->hw.asus.adr, cs->hw.asus.isac, 0, data, size);
93}
94
95static void
96WriteISACfifo(struct IsdnCardState *cs, u_char * data, int size)
97{
98 writefifo(cs->hw.asus.adr, cs->hw.asus.isac, 0, data, size);
99}
100
101static u_char
102ReadISAC_IPAC(struct IsdnCardState *cs, u_char offset)
103{
104 return (readreg(cs->hw.asus.adr, cs->hw.asus.isac, offset|0x80));
105}
106
107static void
108WriteISAC_IPAC(struct IsdnCardState *cs, u_char offset, u_char value)
109{
110 writereg(cs->hw.asus.adr, cs->hw.asus.isac, offset|0x80, value);
111}
112
113static void
114ReadISACfifo_IPAC(struct IsdnCardState *cs, u_char * data, int size)
115{
116 readfifo(cs->hw.asus.adr, cs->hw.asus.isac, 0x80, data, size);
117}
118
119static void
120WriteISACfifo_IPAC(struct IsdnCardState *cs, u_char * data, int size)
121{
122 writefifo(cs->hw.asus.adr, cs->hw.asus.isac, 0x80, data, size);
123}
124
125static u_char
126ReadHSCX(struct IsdnCardState *cs, int hscx, u_char offset)
127{
128 return (readreg(cs->hw.asus.adr,
129 cs->hw.asus.hscx, offset + (hscx ? 0x40 : 0)));
130}
131
132static void
133WriteHSCX(struct IsdnCardState *cs, int hscx, u_char offset, u_char value)
134{
135 writereg(cs->hw.asus.adr,
136 cs->hw.asus.hscx, offset + (hscx ? 0x40 : 0), value);
137}
138
139/*
140 * fast interrupt HSCX stuff goes here
141 */
142
143#define READHSCX(cs, nr, reg) readreg(cs->hw.asus.adr, \
144 cs->hw.asus.hscx, reg + (nr ? 0x40 : 0))
145#define WRITEHSCX(cs, nr, reg, data) writereg(cs->hw.asus.adr, \
146 cs->hw.asus.hscx, reg + (nr ? 0x40 : 0), data)
147
148#define READHSCXFIFO(cs, nr, ptr, cnt) readfifo(cs->hw.asus.adr, \
149 cs->hw.asus.hscx, (nr ? 0x40 : 0), ptr, cnt)
150
151#define WRITEHSCXFIFO(cs, nr, ptr, cnt) writefifo(cs->hw.asus.adr, \
152 cs->hw.asus.hscx, (nr ? 0x40 : 0), ptr, cnt)
153
154#include "hscx_irq.c"
155
156static irqreturn_t
David Howells7d12e782006-10-05 14:55:46 +0100157asuscom_interrupt(int intno, void *dev_id)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700158{
159 struct IsdnCardState *cs = dev_id;
160 u_char val;
161 u_long flags;
162
163 spin_lock_irqsave(&cs->lock, flags);
164 val = readreg(cs->hw.asus.adr, cs->hw.asus.hscx, HSCX_ISTA + 0x40);
165 Start_HSCX:
166 if (val)
167 hscx_int_main(cs, val);
168 val = readreg(cs->hw.asus.adr, cs->hw.asus.isac, ISAC_ISTA);
169 Start_ISAC:
170 if (val)
171 isac_interrupt(cs, val);
172 val = readreg(cs->hw.asus.adr, cs->hw.asus.hscx, HSCX_ISTA + 0x40);
173 if (val) {
174 if (cs->debug & L1_DEB_HSCX)
175 debugl1(cs, "HSCX IntStat after IntRoutine");
176 goto Start_HSCX;
177 }
178 val = readreg(cs->hw.asus.adr, cs->hw.asus.isac, ISAC_ISTA);
179 if (val) {
180 if (cs->debug & L1_DEB_ISAC)
181 debugl1(cs, "ISAC IntStat after IntRoutine");
182 goto Start_ISAC;
183 }
184 writereg(cs->hw.asus.adr, cs->hw.asus.hscx, HSCX_MASK, 0xFF);
185 writereg(cs->hw.asus.adr, cs->hw.asus.hscx, HSCX_MASK + 0x40, 0xFF);
186 writereg(cs->hw.asus.adr, cs->hw.asus.isac, ISAC_MASK, 0xFF);
187 writereg(cs->hw.asus.adr, cs->hw.asus.isac, ISAC_MASK, 0x0);
188 writereg(cs->hw.asus.adr, cs->hw.asus.hscx, HSCX_MASK, 0x0);
189 writereg(cs->hw.asus.adr, cs->hw.asus.hscx, HSCX_MASK + 0x40, 0x0);
190 spin_unlock_irqrestore(&cs->lock, flags);
191 return IRQ_HANDLED;
192}
193
194static irqreturn_t
David Howells7d12e782006-10-05 14:55:46 +0100195asuscom_interrupt_ipac(int intno, void *dev_id)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700196{
197 struct IsdnCardState *cs = dev_id;
198 u_char ista, val, icnt = 5;
199 u_long flags;
200
201 spin_lock_irqsave(&cs->lock, flags);
202 ista = readreg(cs->hw.asus.adr, cs->hw.asus.isac, IPAC_ISTA);
203Start_IPAC:
204 if (cs->debug & L1_DEB_IPAC)
205 debugl1(cs, "IPAC ISTA %02X", ista);
206 if (ista & 0x0f) {
207 val = readreg(cs->hw.asus.adr, cs->hw.asus.hscx, HSCX_ISTA + 0x40);
208 if (ista & 0x01)
209 val |= 0x01;
210 if (ista & 0x04)
211 val |= 0x02;
212 if (ista & 0x08)
213 val |= 0x04;
214 if (val)
215 hscx_int_main(cs, val);
216 }
217 if (ista & 0x20) {
218 val = 0xfe & readreg(cs->hw.asus.adr, cs->hw.asus.isac, ISAC_ISTA | 0x80);
219 if (val) {
220 isac_interrupt(cs, val);
221 }
222 }
223 if (ista & 0x10) {
224 val = 0x01;
225 isac_interrupt(cs, val);
226 }
227 ista = readreg(cs->hw.asus.adr, cs->hw.asus.isac, IPAC_ISTA);
228 if ((ista & 0x3f) && icnt) {
229 icnt--;
230 goto Start_IPAC;
231 }
232 if (!icnt)
233 printk(KERN_WARNING "ASUS IRQ LOOP\n");
234 writereg(cs->hw.asus.adr, cs->hw.asus.isac, IPAC_MASK, 0xFF);
235 writereg(cs->hw.asus.adr, cs->hw.asus.isac, IPAC_MASK, 0xC0);
236 spin_unlock_irqrestore(&cs->lock, flags);
237 return IRQ_HANDLED;
238}
239
Adrian Bunk672c3fd2005-06-25 14:59:18 -0700240static void
Linus Torvalds1da177e2005-04-16 15:20:36 -0700241release_io_asuscom(struct IsdnCardState *cs)
242{
243 int bytecnt = 8;
244
245 if (cs->hw.asus.cfg_reg)
246 release_region(cs->hw.asus.cfg_reg, bytecnt);
247}
248
249static void
250reset_asuscom(struct IsdnCardState *cs)
251{
252 if (cs->subtyp == ASUS_IPAC)
253 writereg(cs->hw.asus.adr, cs->hw.asus.isac, IPAC_POTA2, 0x20);
254 else
255 byteout(cs->hw.asus.adr, ASUS_RESET); /* Reset On */
256 mdelay(10);
257 if (cs->subtyp == ASUS_IPAC)
258 writereg(cs->hw.asus.adr, cs->hw.asus.isac, IPAC_POTA2, 0x0);
259 else
260 byteout(cs->hw.asus.adr, 0); /* Reset Off */
261 mdelay(10);
262 if (cs->subtyp == ASUS_IPAC) {
263 writereg(cs->hw.asus.adr, cs->hw.asus.isac, IPAC_CONF, 0x0);
264 writereg(cs->hw.asus.adr, cs->hw.asus.isac, IPAC_ACFG, 0xff);
265 writereg(cs->hw.asus.adr, cs->hw.asus.isac, IPAC_AOE, 0x0);
266 writereg(cs->hw.asus.adr, cs->hw.asus.isac, IPAC_MASK, 0xc0);
267 writereg(cs->hw.asus.adr, cs->hw.asus.isac, IPAC_PCFG, 0x12);
268 }
269}
270
271static int
272Asus_card_msg(struct IsdnCardState *cs, int mt, void *arg)
273{
274 u_long flags;
275
276 switch (mt) {
277 case CARD_RESET:
278 spin_lock_irqsave(&cs->lock, flags);
279 reset_asuscom(cs);
280 spin_unlock_irqrestore(&cs->lock, flags);
281 return(0);
282 case CARD_RELEASE:
283 release_io_asuscom(cs);
284 return(0);
285 case CARD_INIT:
286 spin_lock_irqsave(&cs->lock, flags);
287 cs->debug |= L1_DEB_IPAC;
288 inithscxisac(cs, 3);
289 spin_unlock_irqrestore(&cs->lock, flags);
290 return(0);
291 case CARD_TEST:
292 return(0);
293 }
294 return(0);
295}
296
297#ifdef __ISAPNP__
Karsten Keil67eb5db2006-07-10 04:44:11 -0700298static struct isapnp_device_id asus_ids[] __devinitdata = {
Linus Torvalds1da177e2005-04-16 15:20:36 -0700299 { ISAPNP_VENDOR('A', 'S', 'U'), ISAPNP_FUNCTION(0x1688),
300 ISAPNP_VENDOR('A', 'S', 'U'), ISAPNP_FUNCTION(0x1688),
301 (unsigned long) "Asus1688 PnP" },
302 { ISAPNP_VENDOR('A', 'S', 'U'), ISAPNP_FUNCTION(0x1690),
303 ISAPNP_VENDOR('A', 'S', 'U'), ISAPNP_FUNCTION(0x1690),
304 (unsigned long) "Asus1690 PnP" },
305 { ISAPNP_VENDOR('S', 'I', 'E'), ISAPNP_FUNCTION(0x0020),
306 ISAPNP_VENDOR('S', 'I', 'E'), ISAPNP_FUNCTION(0x0020),
307 (unsigned long) "Isurf2 PnP" },
308 { ISAPNP_VENDOR('E', 'L', 'F'), ISAPNP_FUNCTION(0x0000),
309 ISAPNP_VENDOR('E', 'L', 'F'), ISAPNP_FUNCTION(0x0000),
310 (unsigned long) "Iscas TE320" },
311 { 0, }
312};
313
Karsten Keil67eb5db2006-07-10 04:44:11 -0700314static struct isapnp_device_id *ipid __devinitdata = &asus_ids[0];
Linus Torvalds1da177e2005-04-16 15:20:36 -0700315static struct pnp_card *pnp_c __devinitdata = NULL;
316#endif
317
Karsten Keil67eb5db2006-07-10 04:44:11 -0700318int __devinit
Linus Torvalds1da177e2005-04-16 15:20:36 -0700319setup_asuscom(struct IsdnCard *card)
320{
321 int bytecnt;
322 struct IsdnCardState *cs = card->cs;
323 u_char val;
324 char tmp[64];
325
326 strcpy(tmp, Asuscom_revision);
327 printk(KERN_INFO "HiSax: Asuscom ISDNLink driver Rev. %s\n", HiSax_getrev(tmp));
328 if (cs->typ != ISDN_CTYPE_ASUSCOM)
329 return (0);
330#ifdef __ISAPNP__
331 if (!card->para[1] && isapnp_present()) {
332 struct pnp_dev *pnp_d;
333 while(ipid->card_vendor) {
334 if ((pnp_c = pnp_find_card(ipid->card_vendor,
335 ipid->card_device, pnp_c))) {
336 pnp_d = NULL;
337 if ((pnp_d = pnp_find_dev(pnp_c,
338 ipid->vendor, ipid->function, pnp_d))) {
339 int err;
340
341 printk(KERN_INFO "HiSax: %s detected\n",
342 (char *)ipid->driver_data);
343 pnp_disable_dev(pnp_d);
344 err = pnp_activate_dev(pnp_d);
345 if (err<0) {
346 printk(KERN_WARNING "%s: pnp_activate_dev ret(%d)\n",
Harvey Harrison156f1ed2008-04-28 02:14:40 -0700347 __func__, err);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700348 return(0);
349 }
350 card->para[1] = pnp_port_start(pnp_d, 0);
351 card->para[0] = pnp_irq(pnp_d, 0);
352 if (!card->para[0] || !card->para[1]) {
353 printk(KERN_ERR "AsusPnP:some resources are missing %ld/%lx\n",
354 card->para[0], card->para[1]);
355 pnp_disable_dev(pnp_d);
356 return(0);
357 }
358 break;
359 } else {
360 printk(KERN_ERR "AsusPnP: PnP error card found, no device\n");
361 }
362 }
363 ipid++;
364 pnp_c = NULL;
365 }
366 if (!ipid->card_vendor) {
367 printk(KERN_INFO "AsusPnP: no ISAPnP card found\n");
368 return(0);
369 }
370 }
371#endif
372 bytecnt = 8;
373 cs->hw.asus.cfg_reg = card->para[1];
374 cs->irq = card->para[0];
375 if (!request_region(cs->hw.asus.cfg_reg, bytecnt, "asuscom isdn")) {
376 printk(KERN_WARNING
Jeff Garzik83493042007-10-31 03:42:07 -0400377 "HiSax: ISDNLink config port %x-%x already in use\n",
Linus Torvalds1da177e2005-04-16 15:20:36 -0700378 cs->hw.asus.cfg_reg,
379 cs->hw.asus.cfg_reg + bytecnt);
380 return (0);
381 }
382 printk(KERN_INFO "ISDNLink: defined at 0x%x IRQ %d\n",
383 cs->hw.asus.cfg_reg, cs->irq);
384 setup_isac(cs);
385 cs->BC_Read_Reg = &ReadHSCX;
386 cs->BC_Write_Reg = &WriteHSCX;
387 cs->BC_Send_Data = &hscx_fill_fifo;
388 cs->cardmsg = &Asus_card_msg;
389 val = readreg(cs->hw.asus.cfg_reg + ASUS_IPAC_ALE,
390 cs->hw.asus.cfg_reg + ASUS_IPAC_DATA, IPAC_ID);
391 if ((val == 1) || (val == 2)) {
392 cs->subtyp = ASUS_IPAC;
393 cs->hw.asus.adr = cs->hw.asus.cfg_reg + ASUS_IPAC_ALE;
394 cs->hw.asus.isac = cs->hw.asus.cfg_reg + ASUS_IPAC_DATA;
395 cs->hw.asus.hscx = cs->hw.asus.cfg_reg + ASUS_IPAC_DATA;
396 test_and_set_bit(HW_IPAC, &cs->HW_Flags);
397 cs->readisac = &ReadISAC_IPAC;
398 cs->writeisac = &WriteISAC_IPAC;
399 cs->readisacfifo = &ReadISACfifo_IPAC;
400 cs->writeisacfifo = &WriteISACfifo_IPAC;
401 cs->irq_func = &asuscom_interrupt_ipac;
402 printk(KERN_INFO "Asus: IPAC version %x\n", val);
403 } else {
404 cs->subtyp = ASUS_ISACHSCX;
405 cs->hw.asus.adr = cs->hw.asus.cfg_reg + ASUS_ADR;
406 cs->hw.asus.isac = cs->hw.asus.cfg_reg + ASUS_ISAC;
407 cs->hw.asus.hscx = cs->hw.asus.cfg_reg + ASUS_HSCX;
408 cs->hw.asus.u7 = cs->hw.asus.cfg_reg + ASUS_CTRL_U7;
409 cs->hw.asus.pots = cs->hw.asus.cfg_reg + ASUS_CTRL_POTS;
410 cs->readisac = &ReadISAC;
411 cs->writeisac = &WriteISAC;
412 cs->readisacfifo = &ReadISACfifo;
413 cs->writeisacfifo = &WriteISACfifo;
414 cs->irq_func = &asuscom_interrupt;
415 ISACVersion(cs, "ISDNLink:");
416 if (HscxVersion(cs, "ISDNLink:")) {
417 printk(KERN_WARNING
418 "ISDNLink: wrong HSCX versions check IO address\n");
419 release_io_asuscom(cs);
420 return (0);
421 }
422 }
423 return (1);
424}