df717a02a946f4dcae75f356f3cd59565d005a86
[dragonfly.git] / sys / net / i4b / layer1 / iwic / i4b_iwic_pci.c
1 /*
2  * Copyright (c) 1999, 2000 Dave Boyce. All rights reserved.
3  *
4  * Redistribution and use in source and binary forms, with or without
5  * modification, are permitted provided that the following conditions
6  * are met:
7  * 1. Redistributions of source code must retain the above copyright
8  *    notice, this list of conditions and the following disclaimer.
9  * 2. Redistributions in binary form must reproduce the above copyright
10  *    notice, this list of conditions and the following disclaimer in the
11  *    documentation and/or other materials provided with the distribution.
12  *
13  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
14  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
15  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
16  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
17  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
18  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
19  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
20  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
21  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
22  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
23  * SUCH DAMAGE.
24  *
25  *---------------------------------------------------------------------------
26  *
27  *      i4b_iwic - isdn4bsd Winbond W6692 driver
28  *      ----------------------------------------
29  *
30  * $FreeBSD: src/sys/i4b/layer1/iwic/i4b_iwic_pci.c,v 1.6.2.1 2001/08/10 14:08:40 obrien Exp $
31  * $DragonFly: src/sys/net/i4b/layer1/iwic/i4b_iwic_pci.c,v 1.6 2006/10/25 20:56:03 dillon Exp $
32  *
33  *      last edit-date: [Tue Jan 16 10:53:03 2001]
34  *
35  *---------------------------------------------------------------------------*/
36
37 #include "use_iwic.h"
38 #include "use_pci.h"
39 #include "opt_i4b.h"
40
41 #if (NIWIC > 0) && (NPCI > 0)
42
43 #include <sys/param.h>
44 #include <sys/kernel.h>
45 #include <sys/systm.h>
46 #include <sys/socket.h>
47 #include <sys/bus.h>
48 #include <sys/rman.h>
49
50 #include <bus/pci/pcireg.h>
51 #include <bus/pci/pcivar.h>
52
53 #include <net/if.h>
54 #include <net/i4b/include/machine/i4b_ioctl.h>
55 #include <net/i4b/include/machine/i4b_trace.h>
56
57 #include "../../include/i4b_global.h"
58 #include "../../include/i4b_l3l4.h"
59 #include "../i4b_l1.h"
60
61 #include "i4b_iwic.h"
62 #include "i4b_w6692.h"
63
64 extern struct i4b_l1mux_func iwic_l1mux_func;
65
66 /* Winbond PCI Configuration Space */
67
68 #define BASEREG0_MAPOFF 0x00
69 #define BASEREG1_MAPOFF 0x04
70
71 #define BADDR0 (PCIR_MAPS + BASEREG0_MAPOFF)
72 #define BADDR1 (PCIR_MAPS + BASEREG1_MAPOFF)
73
74
75 static void iwic_pci_intr(struct iwic_softc *sc);
76 static int iwic_pci_probe(device_t dev);
77 static int iwic_pci_attach(device_t dev);
78
79 static device_method_t iwic_pci_methods[] =
80 {
81         DEVMETHOD(device_probe,         iwic_pci_probe),
82         DEVMETHOD(device_attach,        iwic_pci_attach),
83         { 0, 0 }
84 };
85
86 static driver_t iwic_pci_driver =
87 {
88         "iwic",
89         iwic_pci_methods,
90         0
91 };
92
93 static devclass_t iwic_pci_devclass;
94
95 DRIVER_MODULE(iwic, pci, iwic_pci_driver, iwic_pci_devclass, 0, 0);
96
97 #define IWIC_MAXUNIT 4
98
99 struct iwic_softc iwic_sc[IWIC_MAXUNIT];
100
101 /*---------------------------------------------------------------------------*
102  * PCI ID list for ASUSCOM card got from Asuscom in March 2000:
103  *
104  * Vendor ID: 0675 Device ID: 1702
105  * Vendor ID: 0675 Device ID: 1703
106  * Vendor ID: 0675 Device ID: 1707
107  * Vendor ID: 10CF Device ID: 105E
108  * Vendor ID: 1043 Device ID: 0675 SubVendor: 144F SubDevice ID: 2000
109  * Vendor ID: 1043 Device ID: 0675 SubVendor: 144F SubDevice ID: 1702
110  * Vendor ID: 1043 Device ID: 0675 SubVendor: 144F SubDevice ID: 1707
111  * Vendor ID: 1043 Device ID: 0675 SubVendor: 1043 SubDevice ID: 1702
112  * Vendor ID: 1043 Device ID: 0675 SubVendor: 1043 SubDevice ID: 1707
113  * Vendor ID: 1050 Device ID: 6692 SubVendor: 0675 SubDevice ID: 1702
114  *---------------------------------------------------------------------------*/
115
116 static struct winids {
117         u_int32_t type;
118         int sv; 
119         int sd; 
120         const char *desc;
121 } win_ids[] = {
122  { 0x66921050, -1, -1,          "Generic Winbond W6692 ISDN PCI (0x66921050)"      },
123  { 0x66921050, 0x144F, 0x1707,  "Planet PCI ISDN Adapter (Model IA128P-STDV)"      },
124  { 0x17020675, -1, -1,          "ASUSCOM P-IN100-ST-D (Winbond W6692, 0x17020675)" },
125  { 0x17030675, -1, -1,          "ASUSCOM P-IN100-ST-D (Winbond W6692, 0x17030675)" },
126  { 0x17070675, -1, -1,          "ASUSCOM P-IN100-ST-D (Winbond W6692, 0x17070675)" },
127  { 0x105e10cf, -1, -1,          "ASUSCOM P-IN100-ST-D (Winbond W6692, 0x105e10cf)" },
128  { 0x06751043, 0x144F, 0x2000,  "ASUSCOM P-IN100-ST-D (Winbond W6692, 0x06751043)" },
129  { 0x06751043, 0x144F, 0x1702,  "ASUSCOM P-IN100-ST-D (Winbond W6692, 0x06751043)" },
130  { 0x06751043, 0x144F, 0x1707,  "ASUSCOM P-IN100-ST-D (Winbond W6692, 0x06751043)" },
131  { 0x06751043, 0x1443, 0x1702,  "ASUSCOM P-IN100-ST-D (Winbond W6692, 0x06751043)" },
132  { 0x06751043, 0x1443, 0x1707,  "ASUSCOM P-IN100-ST-D (Winbond W6692, 0x06751043)" },
133  { 0x06751043, 0x144F, 0x2000,  "ASUSCOM P-IN100-ST-D (Winbond W6692, 0x06751043)" },
134  { 0x06751043, 0x144F, 0x2000,  "ASUSCOM P-IN100-ST-D (Winbond W6692, 0x06751043)" },
135  { 0x06751043, 0x144F, 0x2000,  "ASUSCOM P-IN100-ST-D (Winbond W6692, 0x06751043)" },
136  { 0x00000000, 0, 0, NULL }
137 };
138
139 /*---------------------------------------------------------------------------*
140  *      iwic PCI probe
141  *---------------------------------------------------------------------------*/
142 static int
143 iwic_pci_probe(device_t dev)
144 {
145         u_int32_t type = pci_get_devid(dev);
146         u_int32_t sv = pci_get_subvendor(dev);
147         u_int32_t sd = pci_get_subdevice(dev);
148         
149         struct winids *wip = win_ids;
150
151         while(wip->type)
152         {
153                 if(wip->type == type)
154                 {
155                         if(((wip->sv == -1) && (wip->sd == -1)) ||
156                            ((wip->sv == sv) && (wip->sd == sd)))
157                                 break;
158                 }
159                 ++wip;
160         }
161
162         if(wip->desc)
163         {
164                 if(bootverbose)
165                 {
166                         printf("iwic_pci_probe: vendor = 0x%x, device = 0x%x\n", pci_get_vendor(dev), pci_get_device(dev));
167                         printf("iwic_pci_probe: subvendor = 0x%x, subdevice = 0x%x\n", sv, sd);
168                 }
169                 device_set_desc(dev, wip->desc);
170                 return(0);
171         }
172         else
173         {
174                 return(ENXIO);
175         }
176 }
177
178 /*---------------------------------------------------------------------------*
179  *      PCI attach
180  *---------------------------------------------------------------------------*/
181 static int
182 iwic_pci_attach(device_t dev)
183 {
184         unsigned short iobase;
185         struct iwic_softc *sc;
186         void *ih = 0;
187         int unit = device_get_unit(dev);
188         struct iwic_bchan *bchan;
189         
190         /* check max unit range */
191         
192         if(unit >= IWIC_MAXUNIT)
193         {
194                 printf("iwic%d: Error, unit %d >= IWIC_MAXUNIT!\n", unit, unit);
195                 return(ENXIO);  
196         }       
197
198         sc = iwic_find_sc(unit);        /* get softc */ 
199         
200         sc->sc_unit = unit;
201
202         /* use the i/o mapped base address */
203         
204         sc->sc_resources.io_rid[0] = BADDR1;
205         
206         if(!(sc->sc_resources.io_base[0] =
207                         bus_alloc_resource(dev, SYS_RES_IOPORT,
208                                                 &sc->sc_resources.io_rid[0],
209                                                 0UL, ~0UL, 1, RF_ACTIVE)))
210         {
211                 printf("iwic%d: Couldn't alloc io port!\n", unit);
212                 return(ENXIO);                                       
213         }
214
215         iobase = rman_get_start(sc->sc_resources.io_base[0]);
216
217         if(!(sc->sc_resources.irq =
218                         bus_alloc_resource(dev, SYS_RES_IRQ,
219                                            &sc->sc_resources.irq_rid,
220                                            0UL, ~0UL, 1, RF_SHAREABLE|RF_ACTIVE)))
221         {
222                 printf("iwic%d: Couldn't alloc irq!\n",unit);
223                 return(ENXIO);                                       
224         }
225         
226         /* setup card type */
227         
228         sc->sc_cardtyp = CARD_TYPEP_WINB6692;
229         sc->sc_iobase = (u_int32_t) iobase;
230         sc->sc_trace = TRACE_OFF;
231         sc->sc_I430state = ST_F3N;      /* Deactivated */
232         sc->enabled = FALSE;
233         
234         if (bus_setup_intr(dev, sc->sc_resources.irq, 0,
235                                 (void(*)(void*))iwic_pci_intr,
236                                 sc, &ih, NULL))
237         {
238                 printf("iwic%d: Couldn't set up irq!\n", unit);
239                 return(ENXIO);
240         }
241
242         /* disable interrupts */
243         IWIC_WRITE(sc, IMASK, 0xff);
244
245         iwic_dchan_init(sc);
246
247         bchan = &sc->sc_bchan[IWIC_BCH_A];
248         bchan->unit = unit;
249         bchan->offset = B1_CHAN_OFFSET;
250         bchan->channel = IWIC_BCH_A;
251         bchan->state = ST_IDLE;
252                 
253         iwic_bchannel_setup(unit, IWIC_BCH_A, BPROT_NONE, 0);
254
255         bchan = &sc->sc_bchan[IWIC_BCH_B];
256         bchan->unit = unit;
257         bchan->offset = B2_CHAN_OFFSET;
258         bchan->channel = IWIC_BCH_B;
259         bchan->state = ST_IDLE;
260         
261         iwic_bchannel_setup(unit, IWIC_BCH_B, BPROT_NONE, 0);
262
263         iwic_init_linktab(sc);
264         
265         if(bootverbose)
266         {
267                 int ver = IWIC_READ(sc, D_RBCH);
268                 printf("iwic%d: W6692 chip version = %d\n", unit, D_RBCH_VN(ver));
269         }
270
271         i4b_l1_mph_status_ind(L0IWICUNIT(sc->sc_unit), STI_ATTACH, sc->sc_cardtyp, &iwic_l1mux_func);
272
273         IWIC_READ(sc, ISTA);
274
275         /* Enable interrupts */
276         IWIC_WRITE(sc, IMASK, IMASK_XINT0 | IMASK_XINT1);
277
278         return(0);
279 }
280
281 /*---------------------------------------------------------------------------*
282  *      IRQ handler
283  *---------------------------------------------------------------------------*/
284 static void
285 iwic_pci_intr(struct iwic_softc *sc)
286 {
287         while (1)
288         {
289                 int irq_stat = IWIC_READ(sc, ISTA);
290
291                 if (irq_stat == 0)
292                         break;
293
294                 if (irq_stat & (ISTA_D_RME | ISTA_D_RMR | ISTA_D_XFR))
295                 {
296                         iwic_dchan_xfer_irq(sc, irq_stat);
297                 }
298                 if (irq_stat & ISTA_D_EXI)
299                 {
300                         iwic_dchan_xirq(sc);
301                 }
302                 if (irq_stat & ISTA_B1_EXI)
303                 {
304                         iwic_bchan_xirq(sc, 0);
305                 }
306                 if (irq_stat & ISTA_B2_EXI)
307                 {
308                         iwic_bchan_xirq(sc, 1);
309                 }
310         }
311 }
312
313 #endif