Add __DragonFly__
[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.7 2004/02/13 02:44:47 joerg 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 = (struct en_pci_softc *) malloc(sizeof(*scp), M_DEVBUF, M_NOWAIT);
240   if (scp == NULL)
241     return;
242   bzero(scp, sizeof(*scp));             /* zero */
243   sc = &scp->esc;
244
245   retval = pci_map_mem(config_id, PCI_CBMA, (vm_offset_t *) &sc->en_base, &pa);
246
247   if (!retval) {
248     free((caddr_t) scp, M_DEVBUF);
249     return;
250   }
251   enpcis[unit] = scp;                   /* lock it in */
252   en_cd.cd_devs[unit] = sc;             /* fake a cfdriver structure */
253   en_cd.cd_ndevs = NEN;
254   if_initname(&(sc->enif), "en", unit);
255   snprintf(sc->sc_dev.dv_xname, sc->enif.if_xname,
256       sizeof(sc->sc_dev.dv_xname));
257   scp->en_confid = config_id;
258
259   /*
260    * figure out if we are an adaptec card or not.
261    * XXX: why do we have to re-read PC_ID_REG when en_pci_probe already
262    * had that info?
263    */
264
265   device_id = pci_conf_read(config_id, PCI_ID_REG);
266   sc->is_adaptec = (PCI_VENDOR(device_id) == PCI_VENDOR_ADP) ? 1 : 0;
267   
268   /*
269    * Add shutdown hook so that DMA is disabled prior to reboot. Not
270    * doing so could allow DMA to corrupt kernel memory during the
271    * reboot before the driver initializes.
272    */
273   EVENTHANDLER_REGISTER(shutdown_post_sync, en_pci_shutdown, scp,
274                         SHUTDOWN_PRI_DEFAULT);
275
276   if (!pci_map_int(config_id, en_intr, (void *) sc, &net_imask)) {
277     printf("%s: couldn't establish interrupt\n", sc->sc_dev.dv_xname);
278     return;
279   }
280   sc->ipl = 1; /* XXX */
281
282   /*
283    * set up pci bridge
284    */
285
286 #if !defined(MIDWAY_ENIONLY)
287   if (sc->is_adaptec) {
288     adp_get_macaddr(scp);
289     sc->en_busreset = adp_busreset;
290     adp_busreset(sc);
291   }
292 #endif
293
294 #if !defined(MIDWAY_ADPONLY)
295   if (!sc->is_adaptec) {
296     eni_get_macaddr(scp);
297     sc->en_busreset = NULL;
298     pci_conf_write(config_id, EN_TONGA, (TONGA_SWAP_DMA|TONGA_SWAP_WORD));
299   }
300 #endif
301
302   /*
303    * done PCI specific stuff
304    */
305
306   en_attach(sc);
307
308 }
309
310 static void
311 en_pci_shutdown(
312         void *sc,
313         int howto)
314 {
315     struct en_pci_softc *psc = (struct en_pci_softc *)sc;
316     
317     en_reset(&psc->esc);
318     DELAY(10);
319 }
320
321 #if !defined(MIDWAY_ENIONLY)
322
323 #if defined(__DragonFly__) || defined(sparc) || defined(__FreeBSD__)
324 #define bus_space_read_1(t, h, o) \
325                 ((void)t, (*(volatile u_int8_t *)((h) + (o))))
326 #endif
327
328 static void 
329 adp_get_macaddr(scp)
330      struct en_pci_softc *scp;
331 {
332   struct en_softc * sc = (struct en_softc *)scp;
333   int lcv;
334
335   for (lcv = 0; lcv < sizeof(sc->macaddr); lcv++)
336     sc->macaddr[lcv] = bus_space_read_1(sc->en_memt, sc->en_base,
337                                         MID_ADPMACOFF + lcv);
338 }
339
340 #endif /* MIDWAY_ENIONLY */
341
342 #if !defined(MIDWAY_ADPONLY)
343
344 /*
345  * Read station (MAC) address from serial EEPROM.
346  * derived from linux drivers/atm/eni.c by Werner Almesberger, EPFL LRC.
347  */
348 #define EN_PROM_MAGIC  0x0c
349 #define EN_PROM_DATA   0x02
350 #define EN_PROM_CLK    0x01
351 #define EN_ESI         64
352
353 static void 
354 eni_get_macaddr(scp)
355      struct en_pci_softc *scp;
356 {
357   struct en_softc * sc = (struct en_softc *)scp;
358   pcici_t id = scp->en_confid;
359   int i, j, address, status;
360   u_int32_t data, t_data;
361   u_int8_t tmp;
362   
363   t_data = pci_conf_read(id, EN_TONGA) & 0xffffff00;
364
365   data =  EN_PROM_MAGIC | EN_PROM_DATA | EN_PROM_CLK;
366   pci_conf_write(id, EN_TONGA, data);
367
368   for (i = 0; i < sizeof(sc->macaddr); i ++){
369     /* start operation */
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     data &= ~EN_PROM_DATA ;
375     pci_conf_write(id, EN_TONGA, data);
376     data &= ~EN_PROM_CLK ;
377     pci_conf_write(id, EN_TONGA, data);
378     /* send address with serial line */
379     address = ((i + EN_ESI) << 1) + 1;
380     for ( j = 7 ; j >= 0 ; j --){
381       data = (address >> j) & 1 ? data | EN_PROM_DATA :
382       data & ~EN_PROM_DATA;
383       pci_conf_write(id, EN_TONGA, data);
384       data |= EN_PROM_CLK ;
385       pci_conf_write(id, EN_TONGA, data);
386       data &= ~EN_PROM_CLK ;
387       pci_conf_write(id, EN_TONGA, data);
388     }
389     /* get ack */
390     data |= EN_PROM_DATA ;
391     pci_conf_write(id, EN_TONGA, data);
392     data |= EN_PROM_CLK ;
393     pci_conf_write(id, EN_TONGA, data);
394     data = pci_conf_read(id, EN_TONGA);
395     status = data & EN_PROM_DATA;
396     data &= ~EN_PROM_CLK ;
397     pci_conf_write(id, EN_TONGA, data);
398     data |= EN_PROM_DATA ;
399     pci_conf_write(id, EN_TONGA, data);
400
401     tmp = 0;
402
403     for ( j = 7 ; j >= 0 ; j --){
404       tmp <<= 1;
405       data |= EN_PROM_DATA ;
406       pci_conf_write(id, EN_TONGA, data);
407       data |= EN_PROM_CLK ;
408       pci_conf_write(id, EN_TONGA, data);
409       data = pci_conf_read(id, EN_TONGA);
410       if(data & EN_PROM_DATA) tmp |= 1;
411       data &= ~EN_PROM_CLK ;
412       pci_conf_write(id, EN_TONGA, data);
413       data |= EN_PROM_DATA ;
414       pci_conf_write(id, EN_TONGA, data);
415     }
416     /* get ack */
417     data |= EN_PROM_DATA ;
418     pci_conf_write(id, EN_TONGA, data);
419     data |= EN_PROM_CLK ;
420     pci_conf_write(id, EN_TONGA, data);
421     data = pci_conf_read(id, EN_TONGA);
422     status = data & EN_PROM_DATA;
423     data &= ~EN_PROM_CLK ;
424     pci_conf_write(id, EN_TONGA, data);
425     data |= EN_PROM_DATA ;
426     pci_conf_write(id, EN_TONGA, data);
427
428     sc->macaddr[i] = tmp;
429   }
430   /* stop operation */
431   data &=  ~EN_PROM_DATA;
432   pci_conf_write(id, EN_TONGA, data);
433   data |=  EN_PROM_CLK;
434   pci_conf_write(id, EN_TONGA, data);
435   data |=  EN_PROM_DATA;
436   pci_conf_write(id, EN_TONGA, data);
437   pci_conf_write(id, EN_TONGA, t_data);
438 }
439
440 #endif /* !MIDWAY_ADPONLY */