File: [local] / sys / arch / mvme68k / dev / wdsc.c (download)
Revision 1.1.1.1 (vendor branch), Tue Mar 4 16:07:42 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: wdsc.c,v 1.14 2006/11/28 23:59:45 dlg Exp $ */
/*
* Copyright (c) 1996 Steve Woodford
* Copyright (c) 1982, 1990 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.
*
* @(#)wdsc.c
*/
#include <sys/param.h>
#include <sys/systm.h>
#include <sys/kernel.h>
#include <sys/device.h>
#include <scsi/scsi_all.h>
#include <scsi/scsiconf.h>
#include <mvme68k/dev/dmavar.h>
#include <mvme68k/dev/sbicreg.h>
#include <mvme68k/dev/sbicvar.h>
#include <mvme68k/dev/wdscreg.h>
#include <machine/autoconf.h>
#include <mvme68k/dev/pccreg.h>
void wdscattach(struct device *, struct device *, void *);
int wdscmatch(struct device *, struct cfdata *, void *);
void wdsc_enintr(struct sbic_softc *);
int wdsc_dmago(struct sbic_softc *, char *, int, int);
int wdsc_dmanext(struct sbic_softc *);
void wdsc_dmastop(struct sbic_softc *);
int wdsc_dmaintr(void *);
int wdsc_scsiintr(void *);
extern void sbicinit(struct sbic_softc *);
extern int sbicintr(struct sbic_softc *);
struct scsi_adapter wdsc_scsiswitch = {
sbic_scsicmd,
sbic_minphys,
0, /* no lun support */
0, /* no lun support */
};
struct scsi_device wdsc_scsidev = {
NULL, /* use default error handler */
NULL, /* do not have a start function */
NULL, /* have no async handler */
NULL, /* Use default done routine */
};
struct cfattach wdsc_ca = {
sizeof(struct sbic_softc), (cfmatch_t)wdscmatch, wdscattach
};
struct cfdriver wdsc_cd = {
NULL, "wdsc", DV_DULL
};
/*
* Define 'scsi_nosync = 0x00' to enable sync SCSI mode.
* This is untested as yet, use at your own risk...
*/
u_long scsi_nosync = 0xff;
int shift_nosync = 0;
/*
* Match for SCSI devices on the onboard WD33C93 chip
*/
int
wdscmatch(pdp, cdp, auxp)
struct device *pdp;
struct cfdata *cdp;
void *auxp;
{
/*
* Match everything
*/
return(1);
}
/*
* Attach the wdsc driver
*/
void
wdscattach(parent, self, aux)
struct device *parent, *self;
void *aux;
{
struct sbic_softc *sc = (struct sbic_softc *)self;
struct confargs *ca = aux;
struct scsibus_attach_args saa;
int tmp;
sc->sc_enintr = wdsc_enintr;
sc->sc_dmago = wdsc_dmago;
sc->sc_dmanext = wdsc_dmanext;
sc->sc_dmastop = wdsc_dmastop;
sc->sc_dmacmd = 0;
sc->sc_link.adapter_softc = sc;
sc->sc_link.adapter_target = 7;
sc->sc_link.adapter = &wdsc_scsiswitch;
sc->sc_link.device = &wdsc_scsidev;
sc->sc_link.openings = 2;
printf(": SCSI ID %d\n", sc->sc_link.adapter_target);
sc->sc_sbicp = (sbic_regmap_p)ca->ca_vaddr;
/*
* Everything is a valid dma address.
*/
sc->sc_dmamask = 0;
/*
* The onboard WD33C93 of the '147 is usually clocked at 10MHz...
* (We use 10 times this for accuracy in later calculations)
*/
sc->sc_clkfreq = 100;
/*
* Initialize the hardware
*/
sbicinit(sc);
sc->sc_ipl = ca->ca_ipl;
sys_pcc->pcc_sbicirq = ca->ca_ipl | PCC_IRQ_INT;
sys_pcc->pcc_dmairq = ca->ca_ipl | PCC_IRQ_INT;
sys_pcc->pcc_dmacsr = 0;
/*
* Fix up the interrupts
*/
sc->sc_dmaih.ih_fn = wdsc_dmaintr;
sc->sc_dmaih.ih_arg = sc;
sc->sc_dmaih.ih_ipl = ca->ca_ipl;
pccintr_establish(PCCV_DMA, &sc->sc_dmaih, self->dv_xname);
sc->sc_sbicih.ih_fn = wdsc_scsiintr;
sc->sc_sbicih.ih_arg = sc;
sc->sc_sbicih.ih_ipl = ca->ca_ipl;
pccintr_establish(PCCV_SBIC, &sc->sc_sbicih, self->dv_xname);
sys_pcc->pcc_sbicirq = ca->ca_ipl | PCC_IRQ_IEN | PCC_IRQ_INT;
/*
* Attach all scsi units on us, watching for boot device
* (see device_register).
*/
bzero(&saa, sizeof(saa));
saa.saa_sc_link = &sc->sc_link;
tmp = bootpart;
if (ca->ca_paddr != bootaddr)
bootpart = -1;
config_found(self, &saa, scsiprint);
bootpart = tmp; /* restore old value */
}
/*
* Enable DMA interrupts
*/
void
wdsc_enintr(dev)
struct sbic_softc *dev;
{
dev->sc_flags |= SBICF_INTR;
sys_pcc->pcc_dmairq = dev->sc_ipl | PCC_IRQ_IEN | PCC_IRQ_INT;
}
/*
* Prime the hardware for a DMA transfer
*/
int
wdsc_dmago(dev, addr, count, flags)
struct sbic_softc *dev;
char *addr;
int count, flags;
{
/*
* Set up the command word based on flags
*/
if ((flags & DMAGO_READ) == 0)
dev->sc_dmacmd = DMAC_CSR_ENABLE | DMAC_CSR_WRITE;
else
dev->sc_dmacmd = DMAC_CSR_ENABLE;
dev->sc_flags |= SBICF_INTR;
dev->sc_tcnt = dev->sc_cur->dc_count << 1;
/*
* Prime the hardware.
* Note, it's probably not necessary to do this here, since dmanext
* is called just prior to the actual transfer.
*/
sys_pcc->pcc_dmacsr = 0;
sys_pcc->pcc_dmairq = dev->sc_ipl | PCC_IRQ_IEN | PCC_IRQ_INT;
sys_pcc->pcc_dmadaddr = (unsigned long)dev->sc_cur->dc_addr;
sys_pcc->pcc_dmabcnt = (unsigned long)dev->sc_tcnt | (1 << 24);
sys_pcc->pcc_dmacsr = dev->sc_dmacmd;
return dev->sc_tcnt;
}
/*
* Prime the hardware for the next DMA transfer
*/
int
wdsc_dmanext(dev)
struct sbic_softc *dev;
{
if (dev->sc_cur > dev->sc_last) {
/*
* Shouldn't happen !!
*/
printf("wdsc_dmanext at end !!!\n");
wdsc_dmastop(dev);
return 0;
}
dev->sc_tcnt = dev->sc_cur->dc_count << 1;
/*
* Load the next DMA address
*/
sys_pcc->pcc_dmacsr = 0;
sys_pcc->pcc_dmairq = dev->sc_ipl | PCC_IRQ_IEN | PCC_IRQ_INT;
sys_pcc->pcc_dmadaddr = (unsigned long)dev->sc_cur->dc_addr;
sys_pcc->pcc_dmabcnt = (unsigned long)dev->sc_tcnt | (1 << 24);
sys_pcc->pcc_dmacsr = dev->sc_dmacmd;
return dev->sc_tcnt;
}
/*
* Stop DMA, and disable interrupts
*/
void
wdsc_dmastop(dev)
struct sbic_softc *dev;
{
int s;
s = splbio();
sys_pcc->pcc_dmacsr = 0;
sys_pcc->pcc_dmairq = dev->sc_ipl | PCC_IRQ_INT;
splx(s);
}
/*
* Come here following a DMA interrupt
*/
int
wdsc_dmaintr(arg)
void *arg;
{
struct sbic_softc *dev = (struct sbic_softc *)arg;
int found = 0;
/*
* Really a DMA interrupt?
*/
if ((sys_pcc->pcc_dmairq & PCC_IRQ_INT) == 0)
return 0;
/*
* Was it a completion interrupt?
* XXXSCW Note: Support for other DMA interrupts is required, eg. buserr
*/
if (sys_pcc->pcc_dmacsr & DMAC_CSR_DONE) {
++found;
sys_pcc->pcc_dmairq = dev->sc_ipl | PCC_IRQ_IEN | PCC_IRQ_INT;
}
return found;
}
/*
* Come here for SCSI interrupts
*/
int
wdsc_scsiintr(arg)
void *arg;
{
struct sbic_softc *dev = (struct sbic_softc *)arg;
int found;
/*
* Really a SCSI interrupt?
*/
if ((sys_pcc->pcc_sbicirq & PCC_IRQ_INT) == 0)
return 0;
/*
* Go handle it
*/
found = sbicintr(dev);
/*
* Acknowledge and clear the interrupt
*/
sys_pcc->pcc_sbicirq = dev->sc_ipl | PCC_IRQ_IEN | PCC_IRQ_INT;
return found;
}