if_le.c revision 1.29 1 1.29 christos /* $NetBSD: if_le.c,v 1.29 1996/04/22 02:30:45 christos Exp $ */
2 1.20 cgd
3 1.24 mycroft /*-
4 1.24 mycroft * Copyright (c) 1995 Charles M. Hannum. All rights reserved.
5 1.24 mycroft * Copyright (c) 1992, 1993
6 1.24 mycroft * The Regents of the University of California. All rights reserved.
7 1.24 mycroft *
8 1.24 mycroft * This code is derived from software contributed to Berkeley by
9 1.24 mycroft * Ralph Campbell and Rick Macklem.
10 1.1 cgd *
11 1.1 cgd * Redistribution and use in source and binary forms, with or without
12 1.1 cgd * modification, are permitted provided that the following conditions
13 1.1 cgd * are met:
14 1.1 cgd * 1. Redistributions of source code must retain the above copyright
15 1.1 cgd * notice, this list of conditions and the following disclaimer.
16 1.1 cgd * 2. Redistributions in binary form must reproduce the above copyright
17 1.1 cgd * notice, this list of conditions and the following disclaimer in the
18 1.1 cgd * documentation and/or other materials provided with the distribution.
19 1.1 cgd * 3. All advertising materials mentioning features or use of this software
20 1.1 cgd * must display the following acknowledgement:
21 1.1 cgd * This product includes software developed by the University of
22 1.1 cgd * California, Berkeley and its contributors.
23 1.1 cgd * 4. Neither the name of the University nor the names of its contributors
24 1.1 cgd * may be used to endorse or promote products derived from this software
25 1.1 cgd * without specific prior written permission.
26 1.1 cgd *
27 1.1 cgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
28 1.1 cgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
29 1.1 cgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
30 1.1 cgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
31 1.1 cgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
32 1.1 cgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
33 1.1 cgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
34 1.1 cgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
35 1.1 cgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
36 1.1 cgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
37 1.1 cgd * SUCH DAMAGE.
38 1.1 cgd *
39 1.24 mycroft * @(#)if_le.c 8.2 (Berkeley) 11/16/93
40 1.1 cgd */
41 1.1 cgd
42 1.1 cgd #include "bpfilter.h"
43 1.1 cgd
44 1.5 mycroft #include <sys/param.h>
45 1.5 mycroft #include <sys/systm.h>
46 1.5 mycroft #include <sys/mbuf.h>
47 1.24 mycroft #include <sys/syslog.h>
48 1.5 mycroft #include <sys/socket.h>
49 1.24 mycroft #include <sys/device.h>
50 1.5 mycroft
51 1.5 mycroft #include <net/if.h>
52 1.1 cgd
53 1.1 cgd #ifdef INET
54 1.5 mycroft #include <netinet/in.h>
55 1.5 mycroft #include <netinet/if_ether.h>
56 1.1 cgd #endif
57 1.1 cgd
58 1.5 mycroft #include <machine/cpu.h>
59 1.18 mycroft #include <machine/mtpr.h>
60 1.24 mycroft
61 1.5 mycroft #include <hp300/hp300/isr.h>
62 1.25 thorpej
63 1.18 mycroft #ifdef USELEDS
64 1.18 mycroft #include <hp300/hp300/led.h>
65 1.18 mycroft #endif
66 1.1 cgd
67 1.5 mycroft #include <hp300/dev/device.h>
68 1.5 mycroft #include <hp300/dev/if_lereg.h>
69 1.24 mycroft #include <hp300/dev/if_levar.h>
70 1.24 mycroft #include <dev/ic/am7990reg.h>
71 1.24 mycroft #define LE_NEED_BUF_CONTIG
72 1.24 mycroft #include <dev/ic/am7990var.h>
73 1.1 cgd
74 1.24 mycroft #include "le.h"
75 1.24 mycroft struct le_softc le_softc[NLE];
76 1.13 mycroft
77 1.24 mycroft #define LE_SOFTC(unit) &le_softc[unit]
78 1.24 mycroft #define LE_DELAY(x) DELAY(x)
79 1.24 mycroft
80 1.24 mycroft int lematch __P((struct hp_device *));
81 1.24 mycroft void leattach __P((struct hp_device *));
82 1.26 thorpej int leintr __P((void *));
83 1.27 thorpej static int hp300_leintr __P((void *)); /* machine-dependent wrapper */
84 1.13 mycroft
85 1.24 mycroft struct driver ledriver = {
86 1.24 mycroft lematch, leattach, "le",
87 1.24 mycroft };
88 1.13 mycroft
89 1.1 cgd /* offsets for: ID, REGS, MEM, NVRAM */
90 1.1 cgd int lestd[] = { 0, 0x4000, 0x8000, 0xC008 };
91 1.29 christos
92 1.29 christos integrate void
93 1.29 christos lehwinit(sc)
94 1.29 christos struct le_softc *sc;
95 1.29 christos {
96 1.29 christos }
97 1.1 cgd
98 1.24 mycroft integrate void
99 1.13 mycroft lewrcsr(sc, port, val)
100 1.13 mycroft struct le_softc *sc;
101 1.24 mycroft u_int16_t port, val;
102 1.13 mycroft {
103 1.13 mycroft register struct lereg0 *ler0 = sc->sc_r0;
104 1.13 mycroft register struct lereg1 *ler1 = sc->sc_r1;
105 1.13 mycroft
106 1.13 mycroft do {
107 1.13 mycroft ler1->ler1_rap = port;
108 1.13 mycroft } while ((ler0->ler0_status & LE_ACK) == 0);
109 1.13 mycroft do {
110 1.13 mycroft ler1->ler1_rdp = val;
111 1.13 mycroft } while ((ler0->ler0_status & LE_ACK) == 0);
112 1.13 mycroft }
113 1.13 mycroft
114 1.24 mycroft integrate u_int16_t
115 1.13 mycroft lerdcsr(sc, port)
116 1.13 mycroft struct le_softc *sc;
117 1.24 mycroft u_int16_t port;
118 1.13 mycroft {
119 1.13 mycroft register struct lereg0 *ler0 = sc->sc_r0;
120 1.13 mycroft register struct lereg1 *ler1 = sc->sc_r1;
121 1.24 mycroft u_int16_t val;
122 1.13 mycroft
123 1.13 mycroft do {
124 1.13 mycroft ler1->ler1_rap = port;
125 1.13 mycroft } while ((ler0->ler0_status & LE_ACK) == 0);
126 1.13 mycroft do {
127 1.13 mycroft val = ler1->ler1_rdp;
128 1.13 mycroft } while ((ler0->ler0_status & LE_ACK) == 0);
129 1.13 mycroft return (val);
130 1.13 mycroft }
131 1.13 mycroft
132 1.23 thorpej int
133 1.23 thorpej lematch(hd)
134 1.23 thorpej struct hp_device *hd;
135 1.23 thorpej {
136 1.23 thorpej register struct lereg0 *ler0;
137 1.24 mycroft struct le_softc *sc = LE_SOFTC(hd->hp_unit);
138 1.23 thorpej
139 1.23 thorpej ler0 = (struct lereg0 *)(lestd[0] + (int)hd->hp_addr);
140 1.23 thorpej if (ler0->ler0_id != LEID)
141 1.23 thorpej return (0);
142 1.23 thorpej
143 1.23 thorpej hd->hp_ipl = LE_IPL(ler0->ler0_status);
144 1.23 thorpej sc->sc_hd = hd;
145 1.23 thorpej
146 1.23 thorpej return (1);
147 1.23 thorpej }
148 1.23 thorpej
149 1.1 cgd /*
150 1.1 cgd * Interface exists: make available by filling in network interface
151 1.1 cgd * record. System will initialize the interface when it is ready
152 1.1 cgd * to accept packets.
153 1.1 cgd */
154 1.23 thorpej void
155 1.1 cgd leattach(hd)
156 1.1 cgd struct hp_device *hd;
157 1.1 cgd {
158 1.1 cgd register struct lereg0 *ler0;
159 1.24 mycroft struct le_softc *sc = LE_SOFTC(hd->hp_unit);
160 1.1 cgd char *cp;
161 1.1 cgd int i;
162 1.1 cgd
163 1.5 mycroft ler0 = sc->sc_r0 = (struct lereg0 *)(lestd[0] + (int)hd->hp_addr);
164 1.24 mycroft ler0->ler0_id = 0xFF;
165 1.24 mycroft DELAY(100);
166 1.24 mycroft
167 1.24 mycroft /* XXXX kluge for now */
168 1.24 mycroft sc->sc_dev.dv_unit = hd->hp_unit;
169 1.24 mycroft sprintf(sc->sc_dev.dv_xname, "%s%d", ledriver.d_name, hd->hp_unit);
170 1.24 mycroft
171 1.13 mycroft sc->sc_r1 = (struct lereg1 *)(lestd[1] + (int)hd->hp_addr);
172 1.13 mycroft sc->sc_mem = (void *)(lestd[2] + (int)hd->hp_addr);
173 1.24 mycroft sc->sc_conf3 = LE_C3_BSWP;
174 1.24 mycroft sc->sc_addr = 0;
175 1.24 mycroft sc->sc_memsize = 16384;
176 1.1 cgd
177 1.1 cgd /*
178 1.1 cgd * Read the ethernet address off the board, one nibble at a time.
179 1.1 cgd */
180 1.1 cgd cp = (char *)(lestd[3] + (int)hd->hp_addr);
181 1.13 mycroft for (i = 0; i < sizeof(sc->sc_arpcom.ac_enaddr); i++) {
182 1.13 mycroft sc->sc_arpcom.ac_enaddr[i] = (*++cp & 0xF) << 4;
183 1.1 cgd cp++;
184 1.13 mycroft sc->sc_arpcom.ac_enaddr[i] |= *++cp & 0xF;
185 1.1 cgd cp++;
186 1.1 cgd }
187 1.1 cgd
188 1.28 cgd sc->sc_copytodesc = am7990_copytobuf_contig;
189 1.28 cgd sc->sc_copyfromdesc = am7990_copyfrombuf_contig;
190 1.28 cgd sc->sc_copytobuf = am7990_copytobuf_contig;
191 1.28 cgd sc->sc_copyfrombuf = am7990_copyfrombuf_contig;
192 1.28 cgd sc->sc_zerobuf = am7990_zerobuf_contig;
193 1.25 thorpej
194 1.24 mycroft sc->sc_arpcom.ac_if.if_name = ledriver.d_name;
195 1.24 mycroft leconfig(sc);
196 1.24 mycroft
197 1.27 thorpej /* Establish the interrupt handler. */
198 1.27 thorpej isrlink(hp300_leintr, sc, hd->hp_ipl, ISRPRI_NET);
199 1.1 cgd ler0->ler0_status = LE_IE;
200 1.1 cgd }
201 1.14 mycroft
202 1.26 thorpej static int
203 1.27 thorpej hp300_leintr(arg)
204 1.27 thorpej void *arg;
205 1.26 thorpej {
206 1.27 thorpej struct le_softc *sc = arg;
207 1.26 thorpej u_int16_t isr;
208 1.26 thorpej
209 1.26 thorpej #ifdef USELEDS
210 1.26 thorpej isr = lerdcsr(sc, LE_CSR0);
211 1.26 thorpej
212 1.26 thorpej if ((isr & LE_C0_INTR) == 0)
213 1.26 thorpej return (0);
214 1.26 thorpej
215 1.26 thorpej if (isr & LE_C0_RINT)
216 1.26 thorpej if (inledcontrol == 0)
217 1.26 thorpej ledcontrol(0, 0, LED_LANRCV);
218 1.26 thorpej
219 1.26 thorpej if (isr & LE_C0_TINT)
220 1.26 thorpej if (inledcontrol == 0)
221 1.26 thorpej ledcontrol(0, 0, LED_LANXMT);
222 1.26 thorpej #endif /* USELEDS */
223 1.26 thorpej
224 1.26 thorpej return (leintr(sc));
225 1.26 thorpej }
226 1.26 thorpej
227 1.24 mycroft #include <dev/ic/am7990.c>
228