Merge from vendor branch CVS:
[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.3 2003/08/07 21:17:28 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 <net/if.h>
48
49
50 #include <machine/bus.h>
51 #include <machine/resource.h>
52 #include <sys/bus.h>
53 #include <sys/rman.h>
54
55 #include <bus/pci/pcireg.h>
56 #include <bus/pci/pcivar.h>
57
58 #include <net/i4b/include/machine/i4b_ioctl.h>
59 #include <net/i4b/include/machine/i4b_trace.h>
60
61 #include "../../include/i4b_global.h"
62 #include "../../include/i4b_l3l4.h"
63 #include "../i4b_l1.h"
64
65 #include "i4b_iwic.h"
66 #include "i4b_w6692.h"
67
68 extern struct i4b_l1mux_func iwic_l1mux_func;
69
70 /* Winbond PCI Configuration Space */
71
72 #define BASEREG0_MAPOFF 0x00
73 #define BASEREG1_MAPOFF 0x04
74
75 #define BADDR0 (PCIR_MAPS + BASEREG0_MAPOFF)
76 #define BADDR1 (PCIR_MAPS + BASEREG1_MAPOFF)
77
78
79 static void iwic_pci_intr(struct iwic_softc *sc);
80 static int iwic_pci_probe(device_t dev);
81 static int iwic_pci_attach(device_t dev);
82
83 static device_method_t iwic_pci_methods[] =
84 {
85         DEVMETHOD(device_probe,         iwic_pci_probe),
86         DEVMETHOD(device_attach,        iwic_pci_attach),
87         { 0, 0 }
88 };
89
90 static driver_t iwic_pci_driver =
91 {
92         "iwic",
93         iwic_pci_methods,
94         0
95 };
96
97 static devclass_t iwic_pci_devclass;
98
99 DRIVER_MODULE(iwic, pci, iwic_pci_driver, iwic_pci_devclass, 0, 0);
100
101 #define IWIC_MAXUNIT 4
102
103 struct iwic_softc iwic_sc[IWIC_MAXUNIT];
104
105 /*---------------------------------------------------------------------------*
106  * PCI ID list for ASUSCOM card got from Asuscom in March 2000:
107  *
108  * Vendor ID: 0675 Device ID: 1702
109  * Vendor ID: 0675 Device ID: 1703
110  * Vendor ID: 0675 Device ID: 1707
111  * Vendor ID: 10CF Device ID: 105E
112  * Vendor ID: 1043 Device ID: 0675 SubVendor: 144F SubDevice ID: 2000
113  * Vendor ID: 1043 Device ID: 0675 SubVendor: 144F SubDevice ID: 1702
114  * Vendor ID: 1043 Device ID: 0675 SubVendor: 144F SubDevice ID: 1707
115  * Vendor ID: 1043 Device ID: 0675 SubVendor: 1043 SubDevice ID: 1702
116  * Vendor ID: 1043 Device ID: 0675 SubVendor: 1043 SubDevice ID: 1707
117  * Vendor ID: 1050 Device ID: 6692 SubVendor: 0675 SubDevice ID: 1702
118  *---------------------------------------------------------------------------*/
119
120 static struct winids {
121         u_int32_t type;
122         int sv; 
123         int sd; 
124         const char *desc;
125 } win_ids[] = {
126  { 0x66921050, -1, -1,          "Generic Winbond W6692 ISDN PCI (0x66921050)"      },
127  { 0x66921050, 0x144F, 0x1707,  "Planet PCI ISDN Adapter (Model IA128P-STDV)"      },
128  { 0x17020675, -1, -1,          "ASUSCOM P-IN100-ST-D (Winbond W6692, 0x17020675)" },
129  { 0x17030675, -1, -1,          "ASUSCOM P-IN100-ST-D (Winbond W6692, 0x17030675)" },
130  { 0x17070675, -1, -1,          "ASUSCOM P-IN100-ST-D (Winbond W6692, 0x17070675)" },
131  { 0x105e10cf, -1, -1,          "ASUSCOM P-IN100-ST-D (Winbond W6692, 0x105e10cf)" },
132  { 0x06751043, 0x144F, 0x2000,  "ASUSCOM P-IN100-ST-D (Winbond W6692, 0x06751043)" },
133  { 0x06751043, 0x144F, 0x1702,  "ASUSCOM P-IN100-ST-D (Winbond W6692, 0x06751043)" },
134  { 0x06751043, 0x144F, 0x1707,  "ASUSCOM P-IN100-ST-D (Winbond W6692, 0x06751043)" },
135  { 0x06751043, 0x1443, 0x1702,  "ASUSCOM P-IN100-ST-D (Winbond W6692, 0x06751043)" },
136  { 0x06751043, 0x1443, 0x1707,  "ASUSCOM P-IN100-ST-D (Winbond W6692, 0x06751043)" },
137  { 0x06751043, 0x144F, 0x2000,  "ASUSCOM P-IN100-ST-D (Winbond W6692, 0x06751043)" },
138  { 0x06751043, 0x144F, 0x2000,  "ASUSCOM P-IN100-ST-D (Winbond W6692, 0x06751043)" },
139  { 0x06751043, 0x144F, 0x2000,  "ASUSCOM P-IN100-ST-D (Winbond W6692, 0x06751043)" },
140  { 0x00000000, 0, 0, NULL }
141 };
142
143 /*---------------------------------------------------------------------------*
144  *      iwic PCI probe
145  *---------------------------------------------------------------------------*/
146 static int
147 iwic_pci_probe(device_t dev)
148 {
149         u_int32_t type = pci_get_devid(dev);
150         u_int32_t sv = pci_get_subvendor(dev);
151         u_int32_t sd = pci_get_subdevice(dev);
152         
153         struct winids *wip = win_ids;
154
155         while(wip->type)
156         {
157                 if(wip->type == type)
158                 {
159                         if(((wip->sv == -1) && (wip->sd == -1)) ||
160                            ((wip->sv == sv) && (wip->sd == sd)))
161                                 break;
162                 }
163                 ++wip;
164         }
165
166         if(wip->desc)
167         {
168                 if(bootverbose)
169                 {
170                         printf("iwic_pci_probe: vendor = 0x%x, device = 0x%x\n", pci_get_vendor(dev), pci_get_device(dev));
171                         printf("iwic_pci_probe: subvendor = 0x%x, subdevice = 0x%x\n", sv, sd);
172                 }
173                 device_set_desc(dev, wip->desc);
174                 return(0);
175         }
176         else
177         {
178                 return(ENXIO);
179         }
180 }
181
182 /*---------------------------------------------------------------------------*
183  *      PCI attach
184  *---------------------------------------------------------------------------*/
185 static int
186 iwic_pci_attach(device_t dev)
187 {
188         unsigned short iobase;
189         struct iwic_softc *sc;
190         void *ih = 0;
191         int unit = device_get_unit(dev);
192         struct iwic_bchan *bchan;
193         
194         /* check max unit range */
195         
196         if(unit >= IWIC_MAXUNIT)
197         {
198                 printf("iwic%d: Error, unit %d >= IWIC_MAXUNIT!\n", unit, unit);
199                 return(ENXIO);  
200         }       
201
202         sc = iwic_find_sc(unit);        /* get softc */ 
203         
204         sc->sc_unit = unit;
205
206         /* use the i/o mapped base address */
207         
208         sc->sc_resources.io_rid[0] = BADDR1;
209         
210         if(!(sc->sc_resources.io_base[0] =
211                         bus_alloc_resource(dev, SYS_RES_IOPORT,
212                                                 &sc->sc_resources.io_rid[0],
213                                                 0UL, ~0UL, 1, RF_ACTIVE)))
214         {
215                 printf("iwic%d: Couldn't alloc io port!\n", unit);
216                 return(ENXIO);                                       
217         }
218
219         iobase = rman_get_start(sc->sc_resources.io_base[0]);
220
221         if(!(sc->sc_resources.irq =
222                         bus_alloc_resource(dev, SYS_RES_IRQ,
223                                            &sc->sc_resources.irq_rid,
224                                            0UL, ~0UL, 1, RF_SHAREABLE|RF_ACTIVE)))
225         {
226                 printf("iwic%d: Couldn't alloc irq!\n",unit);
227                 return(ENXIO);                                       
228         }
229         
230         /* setup card type */
231         
232         sc->sc_cardtyp = CARD_TYPEP_WINB6692;
233         sc->sc_iobase = (u_int32_t) iobase;
234         sc->sc_trace = TRACE_OFF;
235         sc->sc_I430state = ST_F3N;      /* Deactivated */
236         sc->enabled = FALSE;
237         
238         if(bus_setup_intr(dev, sc->sc_resources.irq, INTR_TYPE_NET,
239                                 (void(*)(void*))iwic_pci_intr,
240                                 sc, &ih))
241         {
242                 printf("iwic%d: Couldn't set up irq!\n", unit);
243                 return(ENXIO);
244         }
245
246         /* disable interrupts */
247         IWIC_WRITE(sc, IMASK, 0xff);
248
249         iwic_dchan_init(sc);
250
251         bchan = &sc->sc_bchan[IWIC_BCH_A];
252         bchan->unit = unit;
253         bchan->offset = B1_CHAN_OFFSET;
254         bchan->channel = IWIC_BCH_A;
255         bchan->state = ST_IDLE;
256                 
257         iwic_bchannel_setup(unit, IWIC_BCH_A, BPROT_NONE, 0);
258
259         bchan = &sc->sc_bchan[IWIC_BCH_B];
260         bchan->unit = unit;
261         bchan->offset = B2_CHAN_OFFSET;
262         bchan->channel = IWIC_BCH_B;
263         bchan->state = ST_IDLE;
264         
265         iwic_bchannel_setup(unit, IWIC_BCH_B, BPROT_NONE, 0);
266
267         iwic_init_linktab(sc);
268         
269         if(bootverbose)
270         {
271                 int ver = IWIC_READ(sc, D_RBCH);
272                 printf("iwic%d: W6692 chip version = %d\n", unit, D_RBCH_VN(ver));
273         }
274
275         i4b_l1_mph_status_ind(L0IWICUNIT(sc->sc_unit), STI_ATTACH, sc->sc_cardtyp, &iwic_l1mux_func);
276
277         IWIC_READ(sc, ISTA);
278
279         /* Enable interrupts */
280         IWIC_WRITE(sc, IMASK, IMASK_XINT0 | IMASK_XINT1);
281
282         return(0);
283 }
284
285 /*---------------------------------------------------------------------------*
286  *      IRQ handler
287  *---------------------------------------------------------------------------*/
288 static void
289 iwic_pci_intr(struct iwic_softc *sc)
290 {
291         while (1)
292         {
293                 int irq_stat = IWIC_READ(sc, ISTA);
294
295                 if (irq_stat == 0)
296                         break;
297
298                 if (irq_stat & (ISTA_D_RME | ISTA_D_RMR | ISTA_D_XFR))
299                 {
300                         iwic_dchan_xfer_irq(sc, irq_stat);
301                 }
302                 if (irq_stat & ISTA_D_EXI)
303                 {
304                         iwic_dchan_xirq(sc);
305                 }
306                 if (irq_stat & ISTA_B1_EXI)
307                 {
308                         iwic_bchan_xirq(sc, 0);
309                 }
310                 if (irq_stat & ISTA_B2_EXI)
311                 {
312                         iwic_bchan_xirq(sc, 1);
313                 }
314         }
315 }
316
317 #endif