NetBSD/sys/dev/podulebus/if_ei.c
bjh21 205186731b Substantial overhaul of podule IDs. Unlike on PCI or USB, podule IDs are
assigned by RISCOS Ltd (and were assigned by Acorn) to be unique across all
manufacturers.  This means that associating each one with a manufacturer (and
checking the manufacturer when attaching) is bogus.  Thus, we don't do that
any more.

This should have the pleasant side-effect of getting APDL IDE interfaces
working, since they're just ICS ones with a different manufacturer ID.
2002-05-22 22:43:13 +00:00

377 lines
10 KiB
C

/* $NetBSD: if_ei.c,v 1.5 2002/05/22 22:43:14 bjh21 Exp $ */
/*-
* Copyright (c) 2000, 2001 Ben Harris
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
* 3. The name of the author may not be used to endorse or promote products
* derived from this software without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*/
/*
* if_ei.c -- driver for Acorn AKA25 Ether1 card
*/
/*
* This is not directly based on the arm32 ie driver, as that doesn't
* use the MI 82586 driver, and generally looks a mess (not to mention
* having dodgy copyright status). Let's try again.
*/
#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: if_ei.c,v 1.5 2002/05/22 22:43:14 bjh21 Exp $");
#include <sys/param.h>
#include <sys/device.h>
#include <sys/malloc.h>
#include <sys/reboot.h> /* For bootverbose */
#include <sys/socket.h>
#include <sys/syslog.h>
#include <sys/systm.h>
#include <net/if.h>
#include <net/if_ether.h>
#include <net/if_media.h>
#include <machine/bus.h>
#include <dev/ic/i82586reg.h>
#include <dev/ic/i82586var.h>
#include <dev/podulebus/podulebus.h>
#include <dev/podulebus/podules.h>
#include <dev/podulebus/if_eireg.h>
/* Callbacks from the MI 82586 driver */
static void ei_hwreset(struct ie_softc *, int);
/* static void ei_hwinit(struct ie_softc *); */
static void ei_attn(struct ie_softc *, int);
static int ei_intrhook(struct ie_softc *, int);
static void ei_copyin(struct ie_softc *, void *, int, size_t);
static void ei_copyout(struct ie_softc *, const void *, int, size_t);
static u_int16_t ei_read16(struct ie_softc *, int);
static void ei_write16(struct ie_softc *, int, u_int16_t);
static void ei_write24(struct ie_softc *, int, int);
/* autoconfiguration glue */
static int ei_match(struct device *, struct cfdata *, void *);
static void ei_attach(struct device *, struct device *, void *);
struct ei_softc {
struct ie_softc sc_ie;
bus_space_tag_t sc_ctl_t;
bus_space_handle_t sc_ctl_h;
bus_space_tag_t sc_mem_t;
bus_space_handle_t sc_mem_h;
bus_space_tag_t sc_rom_t;
bus_space_handle_t sc_rom_h;
u_int8_t sc_idrom[EI_ROMSIZE];
void *sc_ih;
struct evcnt sc_intrcnt;
};
struct cfattach ei_ca = {
sizeof(struct ei_softc), ei_match, ei_attach
};
static inline void
ei_setpage(struct ei_softc *sc, int page)
{
bus_space_write_1(sc->sc_ctl_t, sc->sc_ctl_h, EI_PAGE, page);
}
static inline void
ei_cli(struct ei_softc *sc)
{
bus_space_write_1(sc->sc_ctl_t, sc->sc_ctl_h, EI_CONTROL, EI_CTL_CLI);
}
static int
ei_match(struct device *parent, struct cfdata *cf, void *aux)
{
struct podulebus_attach_args *pa = aux;
return pa->pa_product == PODULE_ETHER1;
}
static void
ei_attach(struct device *parent, struct device *self, void *aux)
{
struct podulebus_attach_args *pa = aux;
struct ei_softc *sc = (struct ei_softc *)self;
int i;
char descr[16];
/* Set up bus spaces */
sc->sc_ctl_t = sc->sc_mem_t = pa->pa_fast_t;
bus_space_map(pa->pa_fast_t, pa->pa_fast_base, EI_MEMOFF, 0,
&sc->sc_ctl_h);
bus_space_map(pa->pa_fast_t, pa->pa_fast_base + EI_MEMOFF,
EI_PAGESIZE * 2, 0, &sc->sc_mem_h);
sc->sc_rom_t = pa->pa_sync_t;
bus_space_map(pa->pa_sync_t, pa->pa_sync_base, EI_ROMSIZE, 0,
&sc->sc_rom_h);
/* Set up callbacks */
sc->sc_ie.hwinit = NULL;
sc->sc_ie.intrhook = ei_intrhook;
sc->sc_ie.hwreset = ei_hwreset;
sc->sc_ie.chan_attn = ei_attn;
sc->sc_ie.memcopyin = ei_copyin;
sc->sc_ie.memcopyout = ei_copyout;
sc->sc_ie.ie_bus_barrier = NULL;
sc->sc_ie.ie_bus_read16 = ei_read16;
sc->sc_ie.ie_bus_write16 = ei_write16;
sc->sc_ie.ie_bus_write24 = ei_write24;
sc->sc_ie.do_xmitnopchain = 0; /* Does it listen? */
sc->sc_ie.sc_mediachange = NULL;
sc->sc_ie.sc_mediastatus = NULL;
sc->sc_ie.bt = sc->sc_mem_t; /* XXX hope it doesn't use them */
sc->sc_ie.bh = sc->sc_mem_h;
printf(":");
/* All Ether1s are 64k (I believe) */
sc->sc_ie.sc_msize = EI_MEMSIZE;
/* set up pointers to important on-card control structures */
sc->sc_ie.iscp = 0;
sc->sc_ie.scb = IE_ISCP_SZ;
sc->sc_ie.scp = sc->sc_ie.sc_msize + IE_SCP_ADDR - (1 << 24);
sc->sc_ie.buf_area = sc->sc_ie.scb + IE_SCB_SZ;
sc->sc_ie.buf_area_sz =
sc->sc_ie.sc_msize - IE_ISCP_SZ - IE_SCB_SZ - IE_SCP_SZ;
/* Wipe the whole of the card's memory */
for (i = 0; i < EI_NPAGES; i++) {
ei_setpage(sc, i);
bus_space_set_region_2(sc->sc_mem_t, sc->sc_mem_h,
0, 0,EI_PAGESIZE / 2);
}
/* set up pointers to key structures */
ei_write24(&sc->sc_ie, IE_SCP_ISCP((u_long)sc->sc_ie.scp),
(u_long) sc->sc_ie.iscp);
ei_write16(&sc->sc_ie, IE_ISCP_SCB((u_long)sc->sc_ie.iscp),
(u_long) sc->sc_ie.scb);
ei_write24(&sc->sc_ie, IE_ISCP_BASE((u_long)sc->sc_ie.iscp),
(u_long) sc->sc_ie.iscp);
/* check if chip answers */
if (i82586_proberam(&sc->sc_ie) == 0) {
printf(" memory probe failed\n");
return;
}
/* Read ROM */
bus_space_read_region_1(sc->sc_rom_t, sc->sc_rom_h, 0,
sc->sc_idrom, EI_ROMSIZE);
snprintf(descr, 15, "AKA25 iss. %d", sc->sc_idrom[EI_ROM_HWREV]);
i82586_attach(&sc->sc_ie, descr, sc->sc_idrom + EI_ROM_EADDR,
NULL, 0, 0);
evcnt_attach_dynamic(&sc->sc_intrcnt, EVCNT_TYPE_INTR, NULL,
self->dv_xname, "intr");
sc->sc_ih = podulebus_irq_establish(pa->pa_ih, IPL_NET, i82586_intr,
self, &sc->sc_intrcnt);
ei_cli(sc);
}
static void
ei_hwreset(struct ie_softc *sc_ie, int why)
{
struct ei_softc *sc = (struct ei_softc *)sc_ie;
bus_space_write_1(sc->sc_ctl_t, sc->sc_ctl_h, EI_CONTROL, EI_CTL_RST);
DELAY(1000);
bus_space_write_1(sc->sc_ctl_t, sc->sc_ctl_h, EI_CONTROL, 0);
DELAY(1000);
ei_cli(sc);
}
static int
ei_intrhook(struct ie_softc *sc_ie, int why)
{
struct ei_softc *sc = (struct ei_softc *)sc_ie;
switch (why) {
case INTR_EXIT:
case INTR_ACK:
ei_cli(sc);
break;
}
return 0;
}
static void
ei_attn(struct ie_softc *sc_ie, int why)
{
struct ei_softc *sc = (void *)sc_ie;
bus_space_write_1(sc->sc_ctl_t, sc->sc_ctl_h, EI_CONTROL, EI_CTL_CA);
}
/*
* Various access functions to allow the MI 82586 driver to get at the
* board's memory. All memory accesses must go through these, as
* nothing else knows how to manipulate the page register. Note that
* all addresses and lengths passed in are in bytes of actual data.
* The bus_space functions deal in words, though, so we have to
* convert on the way through.
*/
static void
ei_copyin(struct ie_softc *sc_ie, void *dest, int src, size_t size)
{
struct ei_softc *sc = (struct ei_softc *)sc_ie;
int cnt, s, extra_byte;
u_int16_t *wptr;
#ifdef DIAGNOSTIC
if (src % 2 != 0 || !ALIGNED_POINTER(dest, u_int16_t))
panic("%s: unaligned copyin", sc_ie->sc_dev.dv_xname);
#endif
wptr = dest;
extra_byte = size % 2;
size -= extra_byte;
while (size > 0) {
cnt = EI_PAGESIZE - src % EI_PAGESIZE;
if (cnt > size)
cnt = size;
s = splnet();
ei_setpage(sc, ei_atop(src));
/* bus ops are in words */
bus_space_read_region_2(sc->sc_mem_t, sc->sc_mem_h,
ei_atopo(src) / 2, wptr, cnt / 2);
splx(s);
src += cnt;
wptr += cnt / 2;
size -= cnt;
}
if (extra_byte) {
/* Do we need to be this careful? */
s = splnet();
ei_setpage(sc, ei_atop(src));
*(u_int8_t *)wptr =
bus_space_read_2(sc->sc_mem_t, sc->sc_mem_h,
ei_atopo(src) / 2) & 0xff;
splx(s);
}
}
static void
ei_copyout(struct ie_softc *sc_ie, const void *src, int dest, size_t size)
{
struct ei_softc *sc = (struct ei_softc *)sc_ie;
int cnt, s;
const u_int16_t *wptr;
u_int16_t *bounce = NULL;
#ifdef DIAGNOSTIC
if (dest % 2 != 0)
panic("%s: unaligned copyout", sc_ie->sc_dev.dv_xname);
#endif
if (!ALIGNED_POINTER(src, u_int16_t)) {
MALLOC(bounce, u_int16_t *, size, M_DEVBUF, M_NOWAIT);
if (bounce == NULL)
panic("%s: no memory to align copyout",
sc_ie->sc_dev.dv_xname);
memcpy(bounce, src, size);
src = bounce;
}
wptr = src;
if (size % 2 != 0)
size++; /* This is safe, since the buffer is 16bit aligned */
while (size > 0) {
cnt = EI_PAGESIZE - dest % EI_PAGESIZE;
if (cnt > size)
cnt = size;
s = splnet();
ei_setpage(sc, ei_atop(dest));
/* bus ops are in words */
bus_space_write_region_2(sc->sc_mem_t, sc->sc_mem_h,
ei_atopo(dest) / 2, wptr, cnt / 2);
splx(s);
wptr += cnt / 2;
dest += cnt;
size -= cnt;
}
if (bounce != NULL)
FREE(bounce, M_DEVBUF);
}
static u_int16_t
ei_read16(struct ie_softc *sc_ie, int addr)
{
struct ei_softc *sc = (struct ei_softc *)sc_ie;
int result, s;
#ifdef DIAGNOSTIC
if (addr % 2 != 0)
panic("%s: unaligned read16", sc_ie->sc_dev.dv_xname);
#endif
s = splnet();
ei_setpage(sc, ei_atop(addr));
result = bus_space_read_2(sc->sc_mem_t, sc->sc_mem_h,
ei_atopo(addr) / 2);
splx(s);
return result;
}
static void
ei_write16(struct ie_softc *sc_ie, int addr, u_int16_t value)
{
struct ei_softc *sc = (struct ei_softc *)sc_ie;
int s;
#ifdef DIAGNOSTIC
if (addr % 2 != 0)
panic("%s: unaligned write16", sc_ie->sc_dev.dv_xname);
#endif
s = splnet();
ei_setpage(sc, ei_atop(addr));
bus_space_write_2(sc->sc_mem_t, sc->sc_mem_h, ei_atopo(addr) / 2,
value);
splx(s);
}
static void
ei_write24(struct ie_softc *sc_ie, int addr, int value)
{
int s;
#ifdef DIAGNOSTIC
if (addr % 2 != 0)
panic("%s: unaligned write24", sc_ie->sc_dev.dv_xname);
#endif
s = splnet();
ei_write16(sc_ie, addr, value & 0xffff);
ei_write16(sc_ie, addr + 2, (value >> 16) & 0xff);
splx(s);
}