File: [local] / sys / arch / vax / vax / crx.c (download)
Revision 1.1.1.1 (vendor branch), Tue Mar 4 16:08:46 2008 UTC (16 years, 3 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: crx.c,v 1.4 2003/06/02 23:27:58 millert Exp $ */
/* $NetBSD: crx.c,v 1.4 2000/01/24 02:40:33 matt Exp $ */
/*
* Copyright (c) 1988 Regents of the University of California.
* All rights reserved.
*
* This code is derived from software contributed to Berkeley by
* Chris Torek.
*
* 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.
*
* @(#)rx50.c 7.5 (Berkeley) 12/16/90
*/
/*
* Routines to handle the console RX50.
*/
#include <sys/param.h>
#include <sys/time.h>
#include <sys/proc.h>
#include <sys/kernel.h>
#include <sys/buf.h>
#include <sys/errno.h>
#include <sys/uio.h>
#include <sys/device.h>
#include <sys/systm.h>
#include <sys/conf.h>
#include <machine/ka820.h>
#include <vax/vax/crx.h>
extern struct rx50device *rx50device_ptr;
#define rxaddr rx50device_ptr
extern struct ka820port *ka820port_ptr;
#define rx50unit(dev) minor(dev)
cdev_decl(crx);
struct rx50state {
short rs_flags; /* see below */
short rs_drive; /* current drive number */
u_int rs_blkno; /* current block number */
} rx50state;
/* flags */
#define RS_0OPEN 0x01 /* drive 0 open -- must be first */
#define RS_1OPEN 0x02 /* drive 1 open -- must be second */
#define RS_BUSY 0x04 /* operation in progress */
#define RS_WANT 0x08 /* wakeup when done */
#define RS_DONE 0x20 /* I/O operation done */
#define RS_ERROR 0x40 /* error bit set at interrupt */
#if 0
#define CRXDEBUG 1
#endif
/*
* Open a console RX50.
*/
/*ARGSUSED*/
int
crxopen(dev, flags, fmt, p)
dev_t dev;
int flags, fmt;
struct proc *p;
{
int unit;
#if CRXDEBUG
printf("crxopen(csa%d)\n", minor(dev));
#endif
if ((unit = rx50unit(dev)) >= 2)
return (ENXIO);
/* enforce exclusive access */
if (rx50state.rs_flags & (1 << unit))
return (EBUSY);
rx50state.rs_flags |= 1 << unit;
return (0);
}
/*
* Close a console RX50.
*/
/*ARGSUSED*/
int
crxclose(dev, flags, fmt, p)
dev_t dev;
int flags, fmt;
struct proc *p;
{
#if CRXDEBUG
printf("crxclose(csa%d)\n", minor(dev));
#endif
rx50state.rs_flags &= ~(1 << dev); /* atomic */
return 0;
}
/*
* Perform a read (uio->uio_rw==UIO_READ) or write (uio->uio_rw==UIO_WRITE).
*/
int crxrw(dev_t, struct uio *, int);
int
crxrw(dev, uio, flags)
dev_t dev;
register struct uio *uio;
int flags;
{
register struct rx50state *rs;
register char *cp;
register int error, i, t;
char secbuf[512];
static char driveselect[2] = { RXCMD_DRIVE0, RXCMD_DRIVE1 };
#if CRXDEBUG
printf("crxrw(csa%d): %s\n",
minor(dev), uio->uio_rw==UIO_READ?"read":"write");
printf("crxrw: ka820port = %x\n", ka820port_ptr->csr);
#endif
/* enforce whole-sector I/O */
if ((uio->uio_offset & 511) || (uio->uio_resid & 511))
return (EINVAL);
rs = &rx50state;
/* lock out others */
i = spl4();
while (rs->rs_flags & RS_BUSY) {
rs->rs_flags |= RS_WANT;
tsleep((caddr_t) &rx50state, PRIBIO, "crxrw", 0);
}
rs->rs_flags |= RS_BUSY;
rs->rs_drive = rx50unit(dev);
splx(i);
rxaddr = rx50device_ptr;
error = 0;
while (uio->uio_resid) {
rs->rs_blkno = uio->uio_offset >> 9;
if (rs->rs_blkno >= RX50MAXSEC) {
if (rs->rs_blkno > RX50MAXSEC)
error = EINVAL;
else if (uio->uio_rw == UIO_WRITE)
error = ENOSPC;
/* else ``eof'' */
break;
}
rs->rs_flags &= ~(RS_ERROR | RS_DONE);
if (uio->uio_rw == UIO_WRITE) {
/* copy the data to the RX50 silo */
error = uiomove(secbuf, 512, uio);
if (error)
break;
i = rxaddr->rxrda;
for (cp = secbuf, i = 512; --i >= 0;)
rxaddr->rxfdb = *cp++;
i = RXCMD_WRITE;
} else
i = RXCMD_READ;
rxaddr->rxcmd = i | driveselect[rs->rs_drive];
i = rs->rs_blkno - ((t = rs->rs_blkno / RX50SEC) * RX50SEC);
rxaddr->rxtrk = t == 79 ? 0 : t + 1;
#ifdef notdef
rxaddr->rxsec = "\1\3\5\7\11\1\3\5\7"[(2*t + i) % 5] + (i > 4);
#else
rxaddr->rxsec = RX50SKEW(i, t);
#endif
#if CRXDEBUG
printf("crx: going off\n");
printf("crxrw: ka820port = %x\n", ka820port_ptr->csr);
#endif
rxaddr->rxgo = 0; /* start it up */
ka820port_ptr->csr |= KA820PORT_RXIRQ;
i = spl4();
while ((rs->rs_flags & RS_DONE) == 0) {
#if CRXDEBUG
printf("crx: sleeping on I/O\n");
printf("crxopen: ka820port = %x\n", ka820port_ptr->csr);
#endif
tsleep((caddr_t) &rs->rs_blkno, PRIBIO, "crxrw", 0);
}
splx(i);
if (rs->rs_flags & RS_ERROR) {
error = EIO;
break;
}
if (uio->uio_rw == UIO_READ) {
/* copy the data out of the silo */
i = rxaddr->rxrda;
for (cp = secbuf, i = 512; --i >= 0;)
*cp++ = rxaddr->rxedb;
error = uiomove(secbuf, 512, uio);
if (error)
break;
}
}
/* let others in */
#if CRXDEBUG
printf("crx: let others in\n");
#endif
rs->rs_flags &= ~RS_BUSY;
if (rs->rs_flags & RS_WANT)
wakeup((caddr_t) rs);
return (error);
}
void
crxintr(arg)
void *arg;
{
register struct rx50state *rs = &rx50state;
/* ignore spurious interrupts */
if ((rxaddr->rxcmd & RXCMD_DONE) == 0)
return;
if ((rs->rs_flags & RS_BUSY) == 0) {
printf("stray rx50 interrupt ignored (rs_flags: 0x%x, rxcmd: 0x%x)\n",
rs->rs_flags, rxaddr->rxcmd);
return;
}
if (rxaddr->rxcmd & RXCMD_ERROR) {
printf(
"csa%d: hard error sn%d: cmd=%x trk=%x sec=%x csc=%x ict=%x ext=%x\n",
rs->rs_drive + 1, rs->rs_blkno,
rxaddr->rxcmd, rxaddr->rxtrk, rxaddr->rxsec,
rxaddr->rxcsc, rxaddr->rxict, rxaddr->rxext);
rxaddr->rxcmd = RXCMD_RESET;
rxaddr->rxgo = 0;
rs->rs_flags |= RS_ERROR;
}
rs->rs_flags |= RS_DONE;
wakeup((caddr_t) &rs->rs_blkno);
}