if_sn_obio.c revision 1.2 1 1.2 is /* $NetBSD: if_sn_obio.c,v 1.2 1997/03/16 13:41:16 is Exp $ */
2 1.1 briggs
3 1.1 briggs /*
4 1.1 briggs * Copyright (C) 1997 Allen Briggs
5 1.1 briggs * All rights reserved.
6 1.1 briggs *
7 1.1 briggs * Redistribution and use in source and binary forms, with or without
8 1.1 briggs * modification, are permitted provided that the following conditions
9 1.1 briggs * are met:
10 1.1 briggs * 1. Redistributions of source code must retain the above copyright
11 1.1 briggs * notice, this list of conditions and the following disclaimer.
12 1.1 briggs * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 briggs * notice, this list of conditions and the following disclaimer in the
14 1.1 briggs * documentation and/or other materials provided with the distribution.
15 1.1 briggs * 3. All advertising materials mentioning features or use of this software
16 1.1 briggs * must display the following acknowledgement:
17 1.1 briggs * This product includes software developed by Allen Briggs
18 1.1 briggs * 4. The name of the author may not be used to endorse or promote products
19 1.1 briggs * derived from this software without specific prior written permission.
20 1.1 briggs *
21 1.1 briggs * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
22 1.1 briggs * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
23 1.1 briggs * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
24 1.1 briggs * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
25 1.1 briggs * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
26 1.1 briggs * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
27 1.1 briggs * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
28 1.1 briggs * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
29 1.1 briggs * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
30 1.1 briggs * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31 1.1 briggs */
32 1.1 briggs
33 1.1 briggs #include <sys/param.h>
34 1.1 briggs #include <sys/device.h>
35 1.1 briggs #include <sys/errno.h>
36 1.1 briggs #include <sys/ioctl.h>
37 1.1 briggs #include <sys/socket.h>
38 1.1 briggs #include <sys/syslog.h>
39 1.1 briggs #include <sys/systm.h>
40 1.1 briggs
41 1.1 briggs #include <net/if.h>
42 1.2 is #include <net/if_ether.h>
43 1.1 briggs
44 1.2 is #if 0 /* XXX this shouldn't be necessary... else reinsert */
45 1.1 briggs #ifdef INET
46 1.1 briggs #include <netinet/in.h>
47 1.1 briggs #include <netinet/if_ether.h>
48 1.1 briggs #endif
49 1.2 is #endif
50 1.1 briggs
51 1.1 briggs #include <machine/bus.h>
52 1.1 briggs #include <machine/cpu.h>
53 1.1 briggs #include <machine/viareg.h>
54 1.1 briggs
55 1.1 briggs #include "obiovar.h"
56 1.1 briggs #include "if_snreg.h"
57 1.1 briggs #include "if_snvar.h"
58 1.1 briggs
59 1.1 briggs #define SONIC_REG_BASE 0x50F0A000
60 1.1 briggs #define SONIC_PROM_BASE 0x50F08000
61 1.1 briggs
62 1.1 briggs static int sn_obio_match __P((struct device *, struct cfdata *, void *));
63 1.1 briggs static void sn_obio_attach __P((struct device *, struct device *, void *));
64 1.1 briggs static void sn_obio_getaddr __P((struct sn_softc *));
65 1.1 briggs
66 1.1 briggs struct cfattach sn_obio_ca = {
67 1.1 briggs sizeof(struct sn_softc), sn_obio_match, sn_obio_attach
68 1.1 briggs };
69 1.1 briggs
70 1.1 briggs static int
71 1.1 briggs sn_obio_match(parent, cf, aux)
72 1.1 briggs struct device *parent;
73 1.1 briggs struct cfdata *cf;
74 1.1 briggs void *aux;
75 1.1 briggs {
76 1.1 briggs if (mac68k_machine.sonic)
77 1.1 briggs return 1;
78 1.1 briggs
79 1.1 briggs return 0;
80 1.1 briggs }
81 1.1 briggs
82 1.1 briggs /*
83 1.1 briggs * Install interface into kernel networking data structures
84 1.1 briggs */
85 1.1 briggs static void
86 1.1 briggs sn_obio_attach(parent, self, aux)
87 1.1 briggs struct device *parent, *self;
88 1.1 briggs void *aux;
89 1.1 briggs {
90 1.1 briggs struct obio_attach_args *oa = (struct obio_attach_args *) aux;
91 1.1 briggs struct sn_softc *sc = (void *)self;
92 1.2 is u_int8_t myaddr[ETHER_ADDR_LEN];
93 1.1 briggs
94 1.1 briggs sc->s_dcr = DCR_LBR | DCR_SYNC | DCR_WAIT0 |
95 1.1 briggs DCR_DMABLOCK | DCR_RFT16 | DCR_TFT16;
96 1.1 briggs
97 1.1 briggs switch (current_mac_model->class) {
98 1.1 briggs case MACH_CLASSQ:
99 1.1 briggs case MACH_CLASSQ2:
100 1.1 briggs sc->s_dcr |= DCR_DW32;
101 1.1 briggs sc->bitmode = 1;
102 1.1 briggs break;
103 1.1 briggs
104 1.1 briggs case MACH_CLASSPB:
105 1.1 briggs sc->s_dcr |= DCR_DW16;
106 1.1 briggs sc->bitmode = 0;
107 1.1 briggs return;
108 1.1 briggs
109 1.1 briggs default:
110 1.1 briggs printf("unsupported machine type\n");
111 1.1 briggs return;
112 1.1 briggs }
113 1.1 briggs
114 1.1 briggs sc->sc_regt = oa->oa_tag;
115 1.1 briggs if (bus_space_map(sc->sc_regt, SONIC_REG_BASE, SN_REGSIZE,
116 1.1 briggs 0, &sc->sc_regh)) {
117 1.1 briggs panic("failed to map space for SONIC regs.\n");
118 1.1 briggs }
119 1.1 briggs
120 1.1 briggs sc->slotno = 9;
121 1.1 briggs
122 1.2 is sn_obio_getaddr(sc, myaddr);
123 1.1 briggs
124 1.2 is snsetup(sc, myaddr);
125 1.1 briggs }
126 1.1 briggs
127 1.1 briggs static u_char bbr4[] = {0,8,4,12,2,10,6,14,1,9,5,13,3,11,7,15};
128 1.1 briggs #define bbr(v) ((bbr4[(v)&0xf] << 4) | bbr4[((v)>>4) & 0xf])
129 1.1 briggs
130 1.1 briggs static void
131 1.2 is sn_obio_getaddr(sc, lladdr)
132 1.1 briggs struct sn_softc *sc;
133 1.2 is u_int8_t *lladdr;
134 1.1 briggs {
135 1.1 briggs bus_space_handle_t bsh;
136 1.1 briggs int i, do_bbr;
137 1.1 briggs u_char b;
138 1.1 briggs
139 1.1 briggs if (bus_space_map(sc->sc_regt, SONIC_PROM_BASE, NBPG, 0, &bsh)) {
140 1.1 briggs panic("failed to map space to read SONIC address.\n");
141 1.1 briggs }
142 1.1 briggs
143 1.1 briggs /*
144 1.1 briggs * Apparently Apple goofed here. The ethernet MAC address is
145 1.1 briggs * stored in bit-byte-reversed format. It is rumored that this
146 1.1 briggs * is only true for some systems.
147 1.1 briggs */
148 1.1 briggs do_bbr = 0;
149 1.1 briggs b = bus_space_read_1(sc->sc_regt, bsh, 0);
150 1.1 briggs if (b == 0x10)
151 1.1 briggs do_bbr = 1;
152 1.2 is lladdr[0] = (do_bbr) ? bbr(b) : b;
153 1.1 briggs
154 1.1 briggs for (i = 1 ; i < ETHER_ADDR_LEN ; i++) {
155 1.1 briggs b = bus_space_read_1(sc->sc_regt, bsh, i);
156 1.2 is lladdr[i] = (do_bbr) ? bbr(b) : b;
157 1.1 briggs }
158 1.1 briggs
159 1.1 briggs bus_space_unmap(sc->sc_regt, bsh, NBPG);
160 1.1 briggs }
161