ath5k: Minor QCU updates
[linux-2.6] / drivers / isdn / hisax / asuscom.c
1 /* $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
23 static const char *Asuscom_revision = "$Revision: 1.14.2.4 $";
24
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
43 static inline u_char
44 readreg(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
53 static inline void
54 readfifo(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
61 static inline void
62 writereg(unsigned int ale, unsigned int adr, u_char off, u_char data)
63 {
64         byteout(ale, off);
65         byteout(adr, data);
66 }
67
68 static inline void
69 writefifo(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
77 static u_char
78 ReadISAC(struct IsdnCardState *cs, u_char offset)
79 {
80         return (readreg(cs->hw.asus.adr, cs->hw.asus.isac, offset));
81 }
82
83 static void
84 WriteISAC(struct IsdnCardState *cs, u_char offset, u_char value)
85 {
86         writereg(cs->hw.asus.adr, cs->hw.asus.isac, offset, value);
87 }
88
89 static void
90 ReadISACfifo(struct IsdnCardState *cs, u_char * data, int size)
91 {
92         readfifo(cs->hw.asus.adr, cs->hw.asus.isac, 0, data, size);
93 }
94
95 static void
96 WriteISACfifo(struct IsdnCardState *cs, u_char * data, int size)
97 {
98         writefifo(cs->hw.asus.adr, cs->hw.asus.isac, 0, data, size);
99 }
100
101 static u_char
102 ReadISAC_IPAC(struct IsdnCardState *cs, u_char offset)
103 {
104         return (readreg(cs->hw.asus.adr, cs->hw.asus.isac, offset|0x80));
105 }
106
107 static void
108 WriteISAC_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
113 static void
114 ReadISACfifo_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
119 static void
120 WriteISACfifo_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
125 static u_char
126 ReadHSCX(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
132 static void
133 WriteHSCX(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
156 static irqreturn_t
157 asuscom_interrupt(int intno, void *dev_id)
158 {
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
194 static irqreturn_t
195 asuscom_interrupt_ipac(int intno, void *dev_id)
196 {
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);
203 Start_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
240 static void
241 release_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
249 static void
250 reset_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
271 static int
272 Asus_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__
298 static struct isapnp_device_id asus_ids[] __devinitdata = {
299         { 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
314 static struct isapnp_device_id *ipid __devinitdata = &asus_ids[0];
315 static struct pnp_card *pnp_c __devinitdata = NULL;
316 #endif
317
318 int __devinit
319 setup_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",
347                                                         __func__, err);
348                                                 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
377                        "HiSax: ISDNLink config port %x-%x already in use\n",
378                        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 }