File: [local] / sys / arch / mvme68k / dev / if_le.c (download)
Revision 1.1.1.1 (vendor branch), Tue Mar 4 16:07:41 2008 UTC (16 years, 6 months ago) by nbrk
Branch: OPENBSD_4_2_BASE, MAIN
CVS Tags: jornada-partial-support-wip, HEAD Changes since 1.1: +0 -0 lines
Import of OpenBSD 4.2 release kernel tree with initial code to support
Jornada 720/728, StrongARM 1110-based handheld PC.
At this point kernel roots on NFS and boots into vfs_mountroot() and traps.
What is supported:
- glass console, Jornada framebuffer (jfb) works in 16bpp direct color mode
(needs some palette tweaks for non black/white/blue colors, i think)
- saic, SA11x0 interrupt controller (needs cleanup)
- sacom, SA11x0 UART (supported only as boot console for now)
- SA11x0 GPIO controller fully supported (but can't handle multiple interrupt
handlers on one gpio pin)
- sassp, SSP port on SA11x0 that attaches spibus
- Jornada microcontroller (jmcu) to control kbd, battery, etc throught
the SPI bus (wskbd attaches on jmcu, but not tested)
- tod functions seem work
- initial code for SA-1111 (chip companion) : this is TODO
Next important steps, i think:
- gpio and intc on sa1111
- pcmcia support for sa11x0 (and sa1111 help logic)
- REAL root on nfs when we have PCMCIA support (we may use any of supported pccard NICs)
- root on wd0! (using already supported PCMCIA-ATA)
|
/* $OpenBSD: if_le.c,v 1.31 2006/01/11 07:21:58 miod Exp $ */
/*-
* Copyright (c) 1982, 1992, 1993
* The Regents of the University of California. 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. Neither the name of the University nor the names of its contributors
* may be used to endorse or promote products derived from this software
* without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``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 REGENTS OR CONTRIBUTORS 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_le.c 8.2 (Berkeley) 10/30/93
*/
#include "bpfilter.h"
#include <sys/param.h>
#include <sys/systm.h>
#include <sys/mbuf.h>
#include <sys/syslog.h>
#include <sys/socket.h>
#include <sys/device.h>
#include <sys/malloc.h>
#include <net/if.h>
#ifdef INET
#include <netinet/in.h>
#include <netinet/if_ether.h>
#endif
#include <net/if_media.h>
#include <machine/autoconf.h>
#include <machine/cpu.h>
#include <dev/ic/am7990reg.h>
#include <dev/ic/am7990var.h>
#include <mvme68k/dev/if_lereg.h>
#include <mvme68k/dev/if_levar.h>
#include <mvme68k/dev/vme.h>
#include "pcc.h"
#if NPCC > 0
#include <mvme68k/dev/pccreg.h>
#endif
/* autoconfiguration driver */
void leattach(struct device *, struct device *, void *);
int lematch(struct device *, void *, void *);
struct cfattach le_ca = {
sizeof(struct le_softc), lematch, leattach
};
static int lebustype;
void lewrcsr(struct am7990_softc *, u_int16_t, u_int16_t);
u_int16_t lerdcsr(struct am7990_softc *, u_int16_t);
void vlewrcsr(struct am7990_softc *, u_int16_t, u_int16_t);
u_int16_t vlerdcsr(struct am7990_softc *, u_int16_t);
void nvram_cmd(struct am7990_softc *, u_char, u_short);
u_int16_t nvram_read(struct am7990_softc *, u_char);
void vleetheraddr(struct am7990_softc *);
void vleinit(struct am7990_softc *);
void vlereset(struct am7990_softc *);
int vle_intr(void *);
void vle_copytobuf_contig(struct am7990_softc *, void *, int, int);
void vle_zerobuf_contig(struct am7990_softc *, int, int);
/* send command to the nvram controller */
void
nvram_cmd(sc, cmd, addr)
struct am7990_softc *sc;
u_char cmd;
u_short addr;
{
int i;
struct vlereg1 *reg1 = (struct vlereg1 *)((struct le_softc *)sc)->sc_r1;
for (i=0;i<8;i++) {
reg1->ler1_ear=((cmd|(addr<<1))>>i);
CDELAY;
}
}
/* read nvram one bit at a time */
u_int16_t
nvram_read(sc, nvram_addr)
struct am7990_softc *sc;
u_char nvram_addr;
{
u_short val = 0, mask = 0x04000;
u_int16_t wbit;
/* these used by macros DO NOT CHANGE!*/
struct vlereg1 *reg1 = (struct vlereg1 *)((struct le_softc *)sc)->sc_r1;
((struct le_softc *)sc)->csr = 0x4f;
ENABLE_NVRAM;
nvram_cmd(sc, NVRAM_RCL, 0);
DISABLE_NVRAM;
CDELAY;
ENABLE_NVRAM;
nvram_cmd(sc, NVRAM_READ, nvram_addr);
for (wbit=0; wbit<15; wbit++) {
(reg1->ler1_ear & 0x01) ? (val = (val | mask)) : (val = (val & (~mask)));
mask = mask>>1;
CDELAY;
}
(reg1->ler1_ear & 0x01) ? (val = (val | 0x8000)) : (val = (val & 0x7FFF));
CDELAY;
DISABLE_NVRAM;
return (val);
}
void
vleetheraddr(sc)
struct am7990_softc *sc;
{
u_char * cp = sc->sc_arpcom.ac_enaddr;
u_int16_t ival[3];
u_char i;
for (i=0; i<3; i++) {
ival[i] = nvram_read(sc, i);
}
memcpy(cp, &ival[0], 6);
}
void
lewrcsr(sc, port, val)
struct am7990_softc *sc;
u_int16_t port, val;
{
register struct lereg1 *ler1 = (struct lereg1 *)((struct le_softc *)sc)->sc_r1;
ler1->ler1_rap = port;
ler1->ler1_rdp = val;
}
void
vlewrcsr(sc, port, val)
struct am7990_softc *sc;
u_int16_t port, val;
{
register struct vlereg1 *ler1 = (struct vlereg1 *)((struct le_softc *)sc)->sc_r1;
ler1->ler1_rap = port;
ler1->ler1_rdp = val;
}
u_int16_t
lerdcsr(sc, port)
struct am7990_softc *sc;
u_int16_t port;
{
register struct lereg1 *ler1 = (struct lereg1 *)((struct le_softc *)sc)->sc_r1;
u_int16_t val;
ler1->ler1_rap = port;
val = ler1->ler1_rdp;
return (val);
}
u_int16_t
vlerdcsr(sc, port)
struct am7990_softc *sc;
u_int16_t port;
{
register struct vlereg1 *ler1 = (struct vlereg1 *)((struct le_softc *)sc)->sc_r1;
u_int16_t val;
ler1->ler1_rap = port;
val = ler1->ler1_rdp;
return (val);
}
/* init MVME376, set ipl and vec */
void
vleinit(sc)
struct am7990_softc *sc;
{
register struct vlereg1 *reg1 = (struct vlereg1 *)((struct le_softc *)sc)->sc_r1;
u_char vec = ((struct le_softc *)sc)->sc_vec;
u_char ipl = ((struct le_softc *)sc)->sc_ipl;
((struct le_softc *)sc)->csr = 0x4f;
WRITE_CSR_AND( ~ipl );
SET_VEC(vec);
return;
}
/* MVME376 hardware reset */
void
vlereset(sc)
struct am7990_softc *sc;
{
register struct vlereg1 *reg1 = (struct vlereg1 *)((struct le_softc *)sc)->sc_r1;
RESET_HW;
#ifdef LEDEBUG
if (sc->sc_debug) {
printf("\nle: hardware reset\n");
}
#endif
SYSFAIL_CL;
return;
}
int
vle_intr(sc)
void *sc;
{
register struct vlereg1 *reg1 = (struct vlereg1 *)((struct le_softc *)sc)->sc_r1;
int rc;
rc = am7990_intr(sc);
ENABLE_INTR;
return (rc);
}
void
vle_copytobuf_contig(sc, from, boff, len)
struct am7990_softc *sc;
void *from;
int boff, len;
{
volatile caddr_t buf = sc->sc_mem;
/*
* Do the cache stuff
*/
dma_cachectl(buf + boff, len);
/*
* Just call bcopy() to do the work.
*/
bcopy(from, buf + boff, len);
}
void
vle_zerobuf_contig(sc, boff, len)
struct am7990_softc *sc;
int boff, len;
{
volatile caddr_t buf = sc->sc_mem;
/*
* Do the cache stuff
*/
dma_cachectl(buf + boff, len);
/*
* Just let bzero() do the work
*/
bzero(buf + boff, len);
}
int
lematch(parent, vcf, args)
struct device *parent;
void *vcf, *args;
{
struct confargs *ca = args;
/* check physical addr for bogus MVME162 addr @0xffffd200. weird XXX - smurph */
if (cputyp == CPU_162 && ca->ca_paddr == 0xffffd200)
return (0);
return (!badvaddr((vaddr_t)ca->ca_vaddr, 2));
}
/*
* Interface exists: make available by filling in network interface
* record. System will initialize the interface when it is ready
* to accept packets.
*/
void
leattach(parent, self, aux)
struct device *parent;
struct device *self;
void *aux;
{
register struct le_softc *lesc = (struct le_softc *)self;
struct am7990_softc *sc = &lesc->sc_am7990;
struct confargs *ca = aux;
int pri = ca->ca_ipl;
extern void *etherbuf;
paddr_t addr;
int card;
/* XXX the following declarations should be elsewhere */
extern void myetheraddr(u_char *);
lebustype = ca->ca_bustype;
switch (lebustype) {
case BUS_VMES:
/*
* get the first available etherbuf. MVME376 uses its own
* dual-ported RAM for etherbuf. It is set by dip switches
* on board. We support the six Motorola address locations,
* however, the board can be set up at any other address.
* XXX These physical addresses should be mapped in extio!!!
*/
switch (ca->ca_paddr) {
case 0xffff1200:
card = 0;
break;
case 0xffff1400:
card = 1;
break;
case 0xffff1600:
card = 2;
break;
case 0xffff5400:
card = 3;
break;
case 0xffff5600:
card = 4;
break;
case 0xffffa400:
card = 5;
break;
default:
printf(": unsupported address\n");
return;
}
addr = VLEMEMBASE - (card * VLEMEMSIZE);
sc->sc_mem = (void *)mapiodev(addr, VLEMEMSIZE);
if (sc->sc_mem == NULL) {
printf("\n%s: no more memory in external I/O map\n",
sc->sc_dev.dv_xname);
return;
}
sc->sc_addr = addr & 0x00ffffff;
lesc->sc_r1 = (void *)ca->ca_vaddr;
lesc->sc_ipl = ca->ca_ipl;
lesc->sc_vec = ca->ca_vec;
sc->sc_memsize = VLEMEMSIZE;
sc->sc_conf3 = LE_C3_BSWP;
sc->sc_hwreset = vlereset;
sc->sc_rdcsr = vlerdcsr;
sc->sc_wrcsr = vlewrcsr;
sc->sc_hwinit = vleinit;
sc->sc_copytodesc = vle_copytobuf_contig;
sc->sc_copyfromdesc = am7990_copyfrombuf_contig;
sc->sc_copytobuf = vle_copytobuf_contig;
sc->sc_copyfrombuf = am7990_copyfrombuf_contig;
sc->sc_zerobuf = am7990_zerobuf_contig;
/* get ether address */
vleetheraddr(sc);
break;
case BUS_PCC:
sc->sc_mem = etherbuf;
lesc->sc_r1 = (void *)ca->ca_vaddr;
sc->sc_conf3 = LE_C3_BSWP /*| LE_C3_ACON | LE_C3_BCON*/;
sc->sc_addr = kvtop((vaddr_t)sc->sc_mem);
sc->sc_memsize = LEMEMSIZE;
sc->sc_rdcsr = lerdcsr;
sc->sc_wrcsr = lewrcsr;
sc->sc_hwreset = NULL;
sc->sc_hwinit = NULL;
sc->sc_copytodesc = am7990_copytobuf_contig;
sc->sc_copyfromdesc = am7990_copyfrombuf_contig;
sc->sc_copytobuf = am7990_copytobuf_contig;
sc->sc_copyfrombuf = am7990_copyfrombuf_contig;
sc->sc_zerobuf = am7990_zerobuf_contig;
/* get ether address */
myetheraddr(sc->sc_arpcom.ac_enaddr);
break;
default:
printf(": unknown bus type\n");
return;
}
am7990_config(sc);
/* connect the interrupt */
switch (lebustype) {
case BUS_VMES:
lesc->sc_ih.ih_fn = vle_intr;
lesc->sc_ih.ih_arg = sc;
lesc->sc_ih.ih_ipl = pri;
vmeintr_establish(ca->ca_vec + 0, &lesc->sc_ih, self->dv_xname);
break;
#if NPCC > 0
case BUS_PCC:
lesc->sc_ih.ih_fn = am7990_intr;
lesc->sc_ih.ih_arg = sc;
lesc->sc_ih.ih_ipl = pri;
pccintr_establish(PCCV_LE, &lesc->sc_ih, self->dv_xname);
sys_pcc->pcc_leirq = pri | PCC_IRQ_IEN;
break;
#endif
}
}