Merge from vendor branch FILE:
[dragonfly.git] / sys / dev / netif / en_pci / if_en_pci.c
1 /*      $NetBSD: if_en_pci.c,v 1.1 1996/06/22 02:00:31 chuck Exp $      */
2
3 /*
4  *
5  * Copyright (c) 1996 Charles D. Cranor and Washington University.
6  * All rights reserved.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in the
15  *    documentation and/or other materials provided with the distribution.
16  * 3. All advertising materials mentioning features or use of this software
17  *    must display the following acknowledgement:
18  *      This product includes software developed by Charles D. Cranor and
19  *      Washington University.
20  * 4. The name of the author may not be used to endorse or promote products
21  *    derived from this software without specific prior written permission.
22  *
23  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
24  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
25  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
26  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
27  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
28  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
29  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
30  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
31  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
32  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
33  *
34  * $FreeBSD: src/sys/pci/if_en_pci.c,v 1.12 1999/08/21 22:10:49 msmith Exp $
35  * $DragonFly: src/sys/dev/netif/en_pci/if_en_pci.c,v 1.9 2004/04/07 05:45:27 dillon Exp $
36  */
37
38 /*
39  *
40  * i f _ e n _ p c i . c  
41  *
42  * author: Chuck Cranor <chuck@ccrc.wustl.edu>
43  * started: spring, 1996.
44  *
45  * FreeBSD PCI glue for the eni155p card.
46  * thanks to Matt Thomas for figuring out FreeBSD vs NetBSD vs etc.. diffs.
47  */
48
49 #include "use_en.h"
50
51 #include <sys/param.h>
52 #include <sys/kernel.h>
53 #include <sys/systm.h>
54 #if defined(__DragonFly__) || defined(__FreeBSD__)
55 #include <sys/eventhandler.h>
56 #endif
57 #include <sys/malloc.h>
58 #include <sys/socket.h>
59
60 #include <machine/clock.h>              /* for DELAY */
61
62 #include <net/if.h>
63
64 #include <bus/pci/pcivar.h>
65 #include <bus/pci/pcireg.h>
66
67 #include <dev/atm/en/midwayreg.h>
68 #include <dev/atm/en/midwayvar.h>
69
70
71 /*
72  * prototypes
73  */
74
75 static  void en_pci_attach (pcici_t, int);
76 static  const char *en_pci_probe (pcici_t, pcidi_t);
77 static void en_pci_shutdown (void *, int);
78
79 /*
80  * local structures
81  */
82
83 struct en_pci_softc {
84   /* bus independent stuff */
85   struct en_softc esc;          /* includes "device" structure */
86
87   /* PCI bus glue */
88   void *sc_ih;                  /* interrupt handle */
89   pci_chipset_tag_t en_pc;      /* for PCI calls */
90   pcici_t en_confid;            /* config id */
91 };
92
93 #if !defined(MIDWAY_ENIONLY)
94 static  void eni_get_macaddr (struct en_pci_softc *);
95 #endif
96 #if !defined(MIDWAY_ADPONLY)
97 static  void adp_get_macaddr (struct en_pci_softc *);
98 #endif
99
100 /*
101  * pointers to softcs (we alloc)
102  */
103
104 static struct en_pci_softc *enpcis[NEN] = {0};
105 extern struct cfdriver en_cd;
106
107 /*
108  * autoconfig structures
109  */
110
111 static u_long en_pci_count;
112
113 static struct pci_device endevice = {
114         "en",
115         en_pci_probe,
116         en_pci_attach,
117         &en_pci_count,
118         NULL,
119 };  
120
121 COMPAT_PCI_DRIVER (if_en, endevice);
122
123 /*
124  * local defines (PCI specific stuff)
125  */
126
127 /* 
128  * address of config base memory address register in PCI config space
129  * (this is card specific)
130  */
131         
132 #define PCI_CBMA        0x10
133
134 /*
135  * tonga (pci bridge).   ENI cards only!
136  */
137
138 #define EN_TONGA        0x60            /* PCI config addr of tonga reg */
139
140 #define TONGA_SWAP_DMA  0x80            /* endian swap control */
141 #define TONGA_SWAP_BYTE 0x40
142 #define TONGA_SWAP_WORD 0x20
143
144 /*
145  * adaptec pci bridge.   ADP cards only!
146  */
147
148 #define ADP_PCIREG      0x050040        /* PCI control register */
149
150 #define ADP_PCIREG_RESET        0x1     /* reset card */
151 #define ADP_PCIREG_IENABLE      0x2     /* interrupt enable */
152 #define ADP_PCIREG_SWAP_WORD    0x4     /* swap byte on slave access */
153 #define ADP_PCIREG_SWAP_DMA     0x8     /* swap byte on DMA */
154
155 #define PCI_VENDOR_EFFICIENTNETS 0x111a                 /* Efficent Networks */
156 #define PCI_PRODUCT_EFFICIENTNETS_ENI155PF 0x0000       /* ENI-155P ATM */
157 #define PCI_PRODUCT_EFFICIENTNETS_ENI155PA 0x0002       /* ENI-155P ATM */
158 #define PCI_VENDOR_ADP 0x9004                           /* adaptec */
159 #define PCI_PRODUCT_ADP_AIC5900 0x5900
160 #define PCI_PRODUCT_ADP_AIC5905 0x5905
161 #define PCI_VENDOR(x)           ((x) & 0xFFFF)
162 #define PCI_CHIPID(x)           (((x) >> 16) & 0xFFFF)
163
164 #if !defined(MIDWAY_ENIONLY)
165
166 static void adp_busreset (void *);
167
168 /*
169  * bus specific reset function [ADP only!]
170  */
171
172 static void adp_busreset(v)
173
174 void *v;
175
176 {
177   struct en_softc *sc = (struct en_softc *) v;
178   u_int32_t dummy;
179
180   bus_space_write_4(sc->en_memt, sc->en_base, ADP_PCIREG, ADP_PCIREG_RESET);
181   DELAY(1000);  /* let it reset */
182   dummy = bus_space_read_4(sc->en_memt, sc->en_base, ADP_PCIREG);
183   bus_space_write_4(sc->en_memt, sc->en_base, ADP_PCIREG, 
184                 (ADP_PCIREG_SWAP_WORD|ADP_PCIREG_SWAP_DMA|ADP_PCIREG_IENABLE));
185   dummy = bus_space_read_4(sc->en_memt, sc->en_base, ADP_PCIREG);
186   if ((dummy & (ADP_PCIREG_SWAP_WORD|ADP_PCIREG_SWAP_DMA)) !=
187                 (ADP_PCIREG_SWAP_WORD|ADP_PCIREG_SWAP_DMA))
188     printf("adp_busreset: Adaptec ATM did NOT reset!\n");
189 }
190 #endif
191
192 /***********************************************************************/
193
194 /*
195  * autoconfig stuff
196  */
197
198 static const char *en_pci_probe(config_id, device_id)
199
200 pcici_t config_id;
201 pcidi_t device_id;
202
203 {
204 #if !defined(MIDWAY_ADPONLY)
205   if (PCI_VENDOR(device_id) == PCI_VENDOR_EFFICIENTNETS && 
206       (PCI_CHIPID(device_id) == PCI_PRODUCT_EFFICIENTNETS_ENI155PF ||
207        PCI_CHIPID(device_id) == PCI_PRODUCT_EFFICIENTNETS_ENI155PA))
208     return "Efficient Networks ENI-155p";
209 #endif
210
211 #if !defined(MIDWAY_ENIONLY)
212   if (PCI_VENDOR(device_id) == PCI_VENDOR_ADP && 
213       (PCI_CHIPID(device_id) == PCI_PRODUCT_ADP_AIC5900 ||
214        PCI_CHIPID(device_id) == PCI_PRODUCT_ADP_AIC5905))
215     return "Adaptec 155 ATM";
216 #endif
217
218   return 0;
219 }
220
221 static void en_pci_attach(config_id, unit)
222
223 pcici_t config_id;
224 int unit;
225
226 {
227   struct en_softc *sc;
228   struct en_pci_softc *scp;
229   pcidi_t device_id;
230   int retval;
231   vm_offset_t pa;
232
233   if (unit >= NEN) {
234     printf("en%d: not configured; kernel is built for only %d device%s.\n",
235         unit, NEN, NEN == 1 ? "" : "s");
236     return;
237   }
238
239   scp = malloc(sizeof(*scp), M_DEVBUF, M_WAITOK | M_ZERO);
240   sc = &scp->esc;
241
242   retval = pci_map_mem(config_id, PCI_CBMA, (vm_offset_t *) &sc->en_base, &pa);
243
244   if (!retval) {
245     free((caddr_t) scp, M_DEVBUF);
246     return;
247   }
248   enpcis[unit] = scp;                   /* lock it in */
249   en_cd.cd_devs[unit] = sc;             /* fake a cfdriver structure */
250   en_cd.cd_ndevs = NEN;
251   if_initname(&(sc->enif), "en", unit);
252   snprintf(sc->sc_dev.dv_xname, sizeof(sc->sc_dev.dv_xname), sc->enif.if_xname);
253   scp->en_confid = config_id;
254
255   /*
256    * figure out if we are an adaptec card or not.
257    * XXX: why do we have to re-read PC_ID_REG when en_pci_probe already
258    * had that info?
259    */
260
261   device_id = pci_conf_read(config_id, PCI_ID_REG);
262   sc->is_adaptec = (PCI_VENDOR(device_id) == PCI_VENDOR_ADP) ? 1 : 0;
263   
264   /*
265    * Add shutdown hook so that DMA is disabled prior to reboot. Not
266    * doing so could allow DMA to corrupt kernel memory during the
267    * reboot before the driver initializes.
268    */
269   EVENTHANDLER_REGISTER(shutdown_post_sync, en_pci_shutdown, scp,
270                         SHUTDOWN_PRI_DEFAULT);
271
272   if (!pci_map_int(config_id, en_intr, (void *) sc, &net_imask)) {
273     printf("%s: couldn't establish interrupt\n", sc->sc_dev.dv_xname);
274     return;
275   }
276   sc->ipl = 1; /* XXX */
277
278   /*
279    * set up pci bridge
280    */
281
282 #if !defined(MIDWAY_ENIONLY)
283   if (sc->is_adaptec) {
284     adp_get_macaddr(scp);
285     sc->en_busreset = adp_busreset;
286     adp_busreset(sc);
287   }
288 #endif
289
290 #if !defined(MIDWAY_ADPONLY)
291   if (!sc->is_adaptec) {
292     eni_get_macaddr(scp);
293     sc->en_busreset = NULL;
294     pci_conf_write(config_id, EN_TONGA, (TONGA_SWAP_DMA|TONGA_SWAP_WORD));
295   }
296 #endif
297
298   /*
299    * done PCI specific stuff
300    */
301
302   en_attach(sc);
303
304 }
305
306 static void
307 en_pci_shutdown(
308         void *sc,
309         int howto)
310 {
311     struct en_pci_softc *psc = (struct en_pci_softc *)sc;
312     
313     en_reset(&psc->esc);
314     DELAY(10);
315 }
316
317 #if !defined(MIDWAY_ENIONLY)
318
319 #if defined(__DragonFly__) || defined(sparc) || defined(__FreeBSD__)
320 #define bus_space_read_1(t, h, o) \
321                 ((void)t, (*(volatile u_int8_t *)((h) + (o))))
322 #endif
323
324 static void 
325 adp_get_macaddr(scp)
326      struct en_pci_softc *scp;
327 {
328   struct en_softc * sc = (struct en_softc *)scp;
329   int lcv;
330
331   for (lcv = 0; lcv < sizeof(sc->macaddr); lcv++)
332     sc->macaddr[lcv] = bus_space_read_1(sc->en_memt, sc->en_base,
333                                         MID_ADPMACOFF + lcv);
334 }
335
336 #endif /* MIDWAY_ENIONLY */
337
338 #if !defined(MIDWAY_ADPONLY)
339
340 /*
341  * Read station (MAC) address from serial EEPROM.
342  * derived from linux drivers/atm/eni.c by Werner Almesberger, EPFL LRC.
343  */
344 #define EN_PROM_MAGIC  0x0c
345 #define EN_PROM_DATA   0x02
346 #define EN_PROM_CLK    0x01
347 #define EN_ESI         64
348
349 static void 
350 eni_get_macaddr(scp)
351      struct en_pci_softc *scp;
352 {
353   struct en_softc * sc = (struct en_softc *)scp;
354   pcici_t id = scp->en_confid;
355   int i, j, address, status;
356   u_int32_t data, t_data;
357   u_int8_t tmp;
358   
359   t_data = pci_conf_read(id, EN_TONGA) & 0xffffff00;
360
361   data =  EN_PROM_MAGIC | EN_PROM_DATA | EN_PROM_CLK;
362   pci_conf_write(id, EN_TONGA, data);
363
364   for (i = 0; i < sizeof(sc->macaddr); i ++){
365     /* start operation */
366     data |= EN_PROM_DATA ;
367     pci_conf_write(id, EN_TONGA, data);
368     data |= EN_PROM_CLK ;
369     pci_conf_write(id, EN_TONGA, data);
370     data &= ~EN_PROM_DATA ;
371     pci_conf_write(id, EN_TONGA, data);
372     data &= ~EN_PROM_CLK ;
373     pci_conf_write(id, EN_TONGA, data);
374     /* send address with serial line */
375     address = ((i + EN_ESI) << 1) + 1;
376     for ( j = 7 ; j >= 0 ; j --){
377       data = (address >> j) & 1 ? data | EN_PROM_DATA :
378       data & ~EN_PROM_DATA;
379       pci_conf_write(id, EN_TONGA, data);
380       data |= EN_PROM_CLK ;
381       pci_conf_write(id, EN_TONGA, data);
382       data &= ~EN_PROM_CLK ;
383       pci_conf_write(id, EN_TONGA, data);
384     }
385     /* get ack */
386     data |= EN_PROM_DATA ;
387     pci_conf_write(id, EN_TONGA, data);
388     data |= EN_PROM_CLK ;
389     pci_conf_write(id, EN_TONGA, data);
390     data = pci_conf_read(id, EN_TONGA);
391     status = data & EN_PROM_DATA;
392     data &= ~EN_PROM_CLK ;
393     pci_conf_write(id, EN_TONGA, data);
394     data |= EN_PROM_DATA ;
395     pci_conf_write(id, EN_TONGA, data);
396
397     tmp = 0;
398
399     for ( j = 7 ; j >= 0 ; j --){
400       tmp <<= 1;
401       data |= EN_PROM_DATA ;
402       pci_conf_write(id, EN_TONGA, data);
403       data |= EN_PROM_CLK ;
404       pci_conf_write(id, EN_TONGA, data);
405       data = pci_conf_read(id, EN_TONGA);
406       if(data & EN_PROM_DATA) tmp |= 1;
407       data &= ~EN_PROM_CLK ;
408       pci_conf_write(id, EN_TONGA, data);
409       data |= EN_PROM_DATA ;
410       pci_conf_write(id, EN_TONGA, data);
411     }
412     /* get ack */
413     data |= EN_PROM_DATA ;
414     pci_conf_write(id, EN_TONGA, data);
415     data |= EN_PROM_CLK ;
416     pci_conf_write(id, EN_TONGA, data);
417     data = pci_conf_read(id, EN_TONGA);
418     status = data & EN_PROM_DATA;
419     data &= ~EN_PROM_CLK ;
420     pci_conf_write(id, EN_TONGA, data);
421     data |= EN_PROM_DATA ;
422     pci_conf_write(id, EN_TONGA, data);
423
424     sc->macaddr[i] = tmp;
425   }
426   /* stop operation */
427   data &=  ~EN_PROM_DATA;
428   pci_conf_write(id, EN_TONGA, data);
429   data |=  EN_PROM_CLK;
430   pci_conf_write(id, EN_TONGA, data);
431   data |=  EN_PROM_DATA;
432   pci_conf_write(id, EN_TONGA, data);
433   pci_conf_write(id, EN_TONGA, t_data);
434 }
435
436 #endif /* !MIDWAY_ADPONLY */