diff options
author | Miod Vallat <miod@cvs.openbsd.org> | 2013-10-16 16:59:36 +0000 |
---|---|---|
committer | Miod Vallat <miod@cvs.openbsd.org> | 2013-10-16 16:59:36 +0000 |
commit | 8873a92acc493d4c0c7c4854fe70050f69ea3e21 (patch) | |
tree | 914ccdca4adf38291e80e4ba6c31323e2ea9be69 | |
parent | ec38e0639be1265c57a291d4c21a6583975459ff (diff) |
Support for oaic in the boot blocks. Cope with older prom putting a \r at
the end of the commandline. Clean up a few stale comments. Crank boot blocks
version to 0.3.
-rw-r--r-- | sys/arch/aviion/stand/boot/Makefile | 4 | ||||
-rw-r--r-- | sys/arch/aviion/stand/boot/boot.c | 17 | ||||
-rw-r--r-- | sys/arch/aviion/stand/boot/crt.c | 6 | ||||
-rw-r--r-- | sys/arch/aviion/stand/boot/devopen.c | 3 | ||||
-rw-r--r-- | sys/arch/aviion/stand/boot/oaic.c | 1229 | ||||
-rw-r--r-- | sys/arch/aviion/stand/boot/oaic.h | 21 | ||||
-rw-r--r-- | sys/arch/aviion/stand/boot/oosiop.c | 5 | ||||
-rw-r--r-- | sys/arch/aviion/stand/boot/scsi.c | 78 | ||||
-rw-r--r-- | sys/arch/aviion/stand/boot/scsi.h | 6 | ||||
-rw-r--r-- | sys/arch/aviion/stand/boot/sd.c | 35 | ||||
-rw-r--r-- | sys/arch/aviion/stand/boot/version.c | 4 | ||||
-rw-r--r-- | sys/arch/aviion/stand/libprom/Makefile | 4 | ||||
-rw-r--r-- | sys/arch/aviion/stand/libprom/cpuid.c | 32 | ||||
-rw-r--r-- | sys/arch/aviion/stand/libprom/prom.h | 44 | ||||
-rw-r--r-- | sys/arch/aviion/stand/libsa/libsa.h | 4 | ||||
-rw-r--r-- | sys/arch/aviion/stand/libsa/parse_args.c | 6 |
16 files changed, 1438 insertions, 60 deletions
diff --git a/sys/arch/aviion/stand/boot/Makefile b/sys/arch/aviion/stand/boot/Makefile index 4df1329eb4f..735e41d1c5d 100644 --- a/sys/arch/aviion/stand/boot/Makefile +++ b/sys/arch/aviion/stand/boot/Makefile @@ -1,4 +1,4 @@ -# $OpenBSD: Makefile,v 1.2 2013/10/10 21:22:06 miod Exp $ +# $OpenBSD: Makefile,v 1.3 2013/10/16 16:59:33 miod Exp $ SIZE?= size @@ -16,7 +16,7 @@ CLEANFILES+=boot boot.ELF .include "${S}/arch/aviion/stand/libz/Makefile.inc" # Keep crt.c first in the object list for ld's sake. -SRCS= crt.c boot.c conf.c devopen.c oosiop.c scsi.c sd.c version.c +SRCS= crt.c boot.c conf.c devopen.c oaic.c oosiop.c scsi.c sd.c version.c OBJS= ${SRCS:S/.c/.o/g} LIBS= ${LIBSA} ${LIBPROM} ${LIBZ} LDFLAGS+= -N -Ttext ${STAGE2_RELOC} -e start diff --git a/sys/arch/aviion/stand/boot/boot.c b/sys/arch/aviion/stand/boot/boot.c index b21f32d8d28..aa343bde606 100644 --- a/sys/arch/aviion/stand/boot/boot.c +++ b/sys/arch/aviion/stand/boot/boot.c @@ -1,4 +1,4 @@ -/* $OpenBSD: boot.c,v 1.3 2013/10/10 21:22:06 miod Exp $ */ +/* $OpenBSD: boot.c,v 1.4 2013/10/16 16:59:34 miod Exp $ */ /*- * Copyright (c) 1995 Theo de Raadt @@ -69,8 +69,8 @@ struct boot_info bi; void boot(const char *args, uint bootdev, uint bootunit, uint bootlun) { - char *file; - int ask = 0; + char *p, *file; + int ask; int ret; printf("\n>> OpenBSD/" MACHINE " boot %s\n", version); @@ -79,9 +79,18 @@ boot(const char *args, uint bootdev, uint bootunit, uint bootlun) bi.bootunit = bootunit; bi.bootlun = bootlun; bi.bootpart = 0; + + /* + * Older PROM version put a \r at the end of a manually entered + * boot string. + */ + if ((p = strchr(args, '\r')) != NULL) + *p = '\0'; + ret = parse_args(args, &file, 1); + ask = boothowto & RB_ASKNAME; for (;;) { - if (ask) { + if (ask != 0) { printf("boot: "); gets(line); if (line[0] == '\0') diff --git a/sys/arch/aviion/stand/boot/crt.c b/sys/arch/aviion/stand/boot/crt.c index 9d9efe8b495..f68e5e6630a 100644 --- a/sys/arch/aviion/stand/boot/crt.c +++ b/sys/arch/aviion/stand/boot/crt.c @@ -1,11 +1,11 @@ -/* $OpenBSD: crt.c,v 1.2 2013/10/10 21:22:06 miod Exp $ */ +/* $OpenBSD: crt.c,v 1.3 2013/10/16 16:59:34 miod Exp $ */ #include <sys/types.h> #include <machine/prom.h> #include "stand.h" -extern void boot(const char *, int, int, int); +extern void boot(char *, int, int, int); /* * This is the boot code entry point. @@ -14,7 +14,7 @@ extern void boot(const char *, int, int, int); * 128KB). */ void -start(const char *args, int dev, int unit, int lun) +start(char *args, int dev, int unit, int lun) { extern int edata, end; diff --git a/sys/arch/aviion/stand/boot/devopen.c b/sys/arch/aviion/stand/boot/devopen.c index a14a0cb4b5a..585c85915d5 100644 --- a/sys/arch/aviion/stand/boot/devopen.c +++ b/sys/arch/aviion/stand/boot/devopen.c @@ -1,4 +1,4 @@ -/* $OpenBSD: devopen.c,v 1.3 2013/10/10 21:22:06 miod Exp $ */ +/* $OpenBSD: devopen.c,v 1.4 2013/10/16 16:59:34 miod Exp $ */ /* * Copyright (c) 2013 Miodrag Vallat. @@ -111,7 +111,6 @@ devopen(struct open_file *f, const char *fname, char **file) /* no controller, keep defaults */ } - /* XXX parse partition: */ p = strchr(fname, ':'); if (p != NULL) { part = strtol(fname, NULL, 0); diff --git a/sys/arch/aviion/stand/boot/oaic.c b/sys/arch/aviion/stand/boot/oaic.c new file mode 100644 index 00000000000..d3e50f42a14 --- /dev/null +++ b/sys/arch/aviion/stand/boot/oaic.c @@ -0,0 +1,1229 @@ +/* $OpenBSD: oaic.c,v 1.1 2013/10/16 16:59:34 miod Exp $ */ + +/* + * Copyright (c) 2010, 2013 Miodrag Vallat. + * + * Permission to use, copy, modify, and distribute this software for any + * purpose with or without fee is hereby granted, provided that the above + * copyright notice and this permission notice appear in all copies. + * + * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES + * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF + * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR + * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES + * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN + * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF + * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. + */ + +/* + * Derived from sys/dev/ic/aic6360.c under the following licence terms: + */ +/* OpenBSD: aic6360.c,v 1.26 2011/04/03 12:42:36 krw Exp */ +/* $NetBSD: aic6360.c,v 1.52 1996/12/10 21:27:51 thorpej Exp $ */ +/* + * Copyright (c) 1994, 1995, 1996 Charles Hannum. 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. All advertising materials mentioning features or use of this software + * must display the following acknowledgement: + * This product includes software developed by Charles M. Hannum. + * 4. The name of the author may not be used to endorse or promote products + * derived from this software without specific prior written permission. + * + * Copyright (c) 1994 Jarle Greipsland + * 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. + */ + +/* + * Acknowledgements: Many of the algorithms used in this driver are + * inspired by the work of Julian Elischer (julian@tfs.com) and + * Charles Hannum (mycroft@duality.gnu.ai.mit.edu). Thanks a million! + */ + +/* TODO list: + * 1) Get the DMA stuff working. + * 2) Get the synch stuff working (requires DMA first). + */ + +#include <sys/param.h> +#include <stand.h> +#include "libsa.h" + +#include "scsi.h" + +#include <dev/ic/aic6250reg.h> + +/* + * ACB. Holds additional information for each SCSI command Comments: We + * need a separate scsi command block because we may need to overwrite it + * with a request sense command. Basicly, we refrain from fiddling with + * the scsi_xfer struct (except do the expected updating of return values). + * We'll generally update: xs->{flags,resid,error,sense,status} and + * occasionally xs->retries. + */ +struct aic6250_acb { + struct scsi_generic *scsi_cmd; + int scsi_cmd_length; + void *data_addr; /* Saved data pointer */ + int data_length; /* Residue */ + + uint8_t target_stat; /* SCSI status byte */ + + int xsflags; + int error; +}; + +struct aic6250_softc { + uint32_t sc_baseaddr; + + int sc_tgtid; + int sc_tgtlun; + + struct aic6250_acb *sc_nexus; /* current command */ + struct aic6250_acb sc_acb; + + /* Data about the current nexus (updated for every cmd switch) */ + u_char *sc_dp; /* Current data pointer */ + size_t sc_dleft; /* Data bytes left to transfer */ + u_char *sc_cp; /* Current command pointer */ + size_t sc_cleft; /* Command bytes left to transfer */ + + /* Adapter state */ + uint8_t sc_phase; /* Current bus phase */ + uint8_t sc_prevphase; /* Previous bus phase */ + uint8_t sc_state; /* State applicable to the adapter */ +#define AIC_INIT 0 +#define AIC_IDLE 1 +#define AIC_SELECTING 2 /* SCSI command is arbiting */ +#define AIC_RESELECTED 3 /* Has been reselected */ +#define AIC_CONNECTED 4 /* Actively using the SCSI bus */ +#define AIC_DISCONNECT 5 /* MSG_DISCONNECT received */ +#define AIC_CMDCOMPLETE 6 /* MSG_CMDCOMPLETE received */ +#define AIC_CLEANING 7 + uint8_t sc_flags; +#define AIC_DROP_MSGIN 0x01 /* Discard all msgs (parity err detected) */ +#define AIC_ABORTING 0x02 /* Bailing out */ + uint8_t sc_selid; /* Reselection ID */ + + uint8_t sc_imr0; + uint8_t sc_imr1; + uint8_t sc_cr0; + uint8_t sc_cr1; + uint sc_selto; /* Selection timeout (when polling) */ + + /* Message stuff */ + uint8_t sc_msgpriq; /* Messages we want to send */ + uint8_t sc_msgoutq; /* Messages sent during last MESSAGE OUT */ + uint8_t sc_lastmsg; /* Message last transmitted */ + uint8_t sc_currmsg; /* Message currently ready to transmit */ +#define SEND_DEV_RESET 0x01 +#define SEND_PARITY_ERROR 0x02 +#define SEND_INIT_DET_ERR 0x04 +#define SEND_REJECT 0x08 +#define SEND_IDENTIFY 0x10 +#define SEND_ABORT 0x20 +#define AIC_MAX_MSG_LEN 8 + uint8_t sc_omess[AIC_MAX_MSG_LEN]; + uint8_t *sc_omp; /* Outgoing message pointer */ + uint8_t sc_imess[AIC_MAX_MSG_LEN]; + uint8_t *sc_imp; /* Incoming message pointer */ + + /* Hardware stuff */ + int sc_initiator; /* Our scsi id */ + int sc_freq; /* Clock frequency in MHz */ +}; + +int aic6250_intr(void *); + +void aic6250_init(struct aic6250_softc *); +void aic6250_done(struct aic6250_softc *, struct aic6250_acb *); +void aic6250_sched_msgout(struct aic6250_softc *, uint8_t); +void aic6250_select(struct aic6250_softc *, struct aic6250_acb *); +void aic6250_seltimeout(void *); +void aic6250_sched(struct aic6250_softc *); +void aic6250_scsi_reset(struct aic6250_softc *); +void aic6250_reset(struct aic6250_softc *); +void aic6250_acb_free(void *, void *); +void *aic6250_acb_alloc(void *); +int aic6250_reselect(struct aic6250_softc *, int); +void aic6250_msgin(struct aic6250_softc *); +void aic6250_msgout(struct aic6250_softc *); +void aic6250_ack(struct aic6250_softc *); +int aic6250_dataout_pio(struct aic6250_softc *, uint8_t *, int, int); +int aic6250_datain_pio(struct aic6250_softc *, uint8_t *, int, int); + +#define oaic_read(sc, addr) \ + (*(volatile uint32_t *)((sc)->sc_baseaddr + ((addr) << 2)) & 0xff) +#define oaic_write(sc, addr, val) \ + *(volatile uint32_t *)((sc)->sc_baseaddr + ((addr) << 2)) = (val) + +/* + * Attach the AIC6250, fill out some high and low level data structures + */ +void * +oaic_attach(uint32_t addr, int id, int lun) +{ + struct aic6250_softc *sc; + + sc = (struct aic6250_softc *)alloc(sizeof *sc); + if (sc == NULL) + return NULL; + + memset(sc, 0, sizeof *sc); + sc->sc_baseaddr = addr; + /* XXX */ + sc->sc_freq = 10; + sc->sc_initiator = 7; + sc->sc_cr0 = AIC_CR0_EN_PORT_A; + sc->sc_cr1 = AIC_CR1_ENABLE_16BIT_MEM_BUS; + /* XXX */ + + sc->sc_state = AIC_INIT; + + if (sc->sc_freq >= 20) + sc->sc_cr1 |= AIC_CR1_CLK_FREQ_MODE; + + aic6250_init(sc); /* init chip and driver */ + + sc->sc_tgtid = id; + sc->sc_tgtlun = lun; + + return sc; +} + +void +oaic_detach(void *cookie) +{ + free(cookie, sizeof(struct aic6250_softc)); +} + +/* + * Initialize AIC6250 chip itself. + */ +void +aic6250_reset(struct aic6250_softc *sc) +{ + /* reset chip */ + oaic_write(sc, AIC_CONTROL_REG1, AIC_CR1_CHIP_SW_RESET); + delay(200); + oaic_write(sc, AIC_CONTROL_REG1, 0); + + oaic_write(sc, AIC_CONTROL_REG1, sc->sc_cr1); + oaic_write(sc, AIC_CONTROL_REG0, sc->sc_cr0 | sc->sc_initiator); + /* asynchronous operation */ + oaic_write(sc, AIC_OFFSET_CNTRL, 0); + + sc->sc_imr0 = sc->sc_imr1 = 0; + oaic_write(sc, AIC_INT_MSK_REG0, sc->sc_imr0); + oaic_write(sc, AIC_INT_MSK_REG1, sc->sc_imr1); + + oaic_write(sc, AIC_DMA_BYTE_COUNT_L, 0); + oaic_write(sc, AIC_DMA_BYTE_COUNT_M, 0); + oaic_write(sc, AIC_DMA_BYTE_COUNT_H, 0); + oaic_write(sc, AIC_DMA_CNTRL, 0); + oaic_write(sc, AIC_PORT_A, 0); + oaic_write(sc, AIC_PORT_B, 0); +} + +/* Pull the SCSI RST line for 500 us */ +void +aic6250_scsi_reset(struct aic6250_softc *sc) +{ + /* reset SCSI bus */ + oaic_write(sc, AIC_CONTROL_REG1, + sc->sc_cr1 | AIC_CR1_SCSI_RST_OUT); + delay(500); + oaic_write(sc, AIC_CONTROL_REG1, sc->sc_cr1); + delay(50); +} + +/* + * Initialize aic SCSI driver. + */ +void +aic6250_init(struct aic6250_softc *sc) +{ + struct aic6250_acb *acb; + + aic6250_reset(sc); + aic6250_scsi_reset(sc); + aic6250_reset(sc); + + if (sc->sc_state == AIC_INIT) { + /* First time through; initialize. */ + sc->sc_nexus = NULL; + } else { + /* Cancel any active commands. */ + sc->sc_state = AIC_CLEANING; + if ((acb = sc->sc_nexus) != NULL) { + acb->error = XS_DRIVER_STUFFUP; + aic6250_done(sc, acb); + } + } + + sc->sc_prevphase = PH_INVALID; + sc->sc_state = AIC_IDLE; + sc->sc_imr0 = AIC_IMR_EN_ERROR_INT; + sc->sc_imr1 = AIC_IMR1_EN_SCSI_RST_INT; + oaic_write(sc, AIC_INT_MSK_REG0, sc->sc_imr0); + oaic_write(sc, AIC_INT_MSK_REG1, sc->sc_imr1); +} + +/* + * DRIVER FUNCTIONS CALLABLE FROM HIGHER LEVEL DRIVERS + */ + +/* + * Expected sequence: + * 1) Command inserted into ready list + * 2) Command selected for execution + * 3) Command won arbitration and has selected target device + * 4) Send message out (identify message, eventually also sync.negotiations) + * 5) Send command + * 5a) Receive disconnect message, disconnect. + * 5b) Reselected by target + * 5c) Receive identify message from target. + * 6) Send or receive data + * 7) Receive status + * 8) Receive message (command complete etc.) + * 9) If status == SCSI_CHECK construct a synthetic request sense SCSI cmd. + * Repeat 2-8 (no disconnects please...) + */ + +/* + * Start a SCSI-command + * This function is called by the higher level SCSI-driver to queue/run + * SCSI-commands. + */ +int +oaic_scsicmd(void *cookie, void *cmdbuf, size_t cmdlen, void *databuf, + size_t datalen, size_t *resid) +{ + struct aic6250_softc *sc = cookie; + struct aic6250_acb *acb = &sc->sc_acb; + + if (resid != NULL) + *resid = 0; + + acb->xsflags = datalen != 0 ? SCSI_DATA_IN : 0; /* XXX */ + acb->scsi_cmd = cmdbuf; + acb->scsi_cmd_length = cmdlen; + acb->data_addr = databuf; + acb->data_length = datalen; + acb->target_stat = 0; + + aic6250_sched(sc); + + for (;;) { + uint8_t sr0, sr1, sr0mask, sr1mask; + + /* + * If we had interrupts enabled, would we + * have got an interrupt? + */ + sr0mask = 0; + sr1mask = 0; + + if (sc->sc_imr0 & AIC_IMR_EN_ERROR_INT) + sr1mask |= AIC_SR1_ERROR; + if (sc->sc_imr0 & AIC_IMR_EN_CMD_DONE_INT) + sr1mask |= AIC_SR1_CMD_DONE; + if (sc->sc_imr0 & AIC_IMR_EN_SEL_OUT_INT) + sr1mask |= AIC_SR1_SEL_OUT; + if (sc->sc_imr0 & AIC_IMR_EN_RESEL_INT) + sr1mask |= AIC_SR1_RESELECTED; + if (sc->sc_imr0 & AIC_IMR_EN_SELECT_INT) + sr1mask |= AIC_SR1_SELECTED; + + if (sc->sc_imr1 & AIC_IMR1_EN_SCSI_RST_INT) + sr0mask |= AIC_SR0_SCSI_RST_OCCURED; +#if 0 /* these bits are never set */ + if (sc->sc_imr1 & AIC_IMR1_EN_MEM_PARITY_ERR_INT) + sr0mask |= AIC_SR0_MEMORY_PARITY_ERR; + if (sc->sc_imr1 & AIC_IMR1_EN_PHASE_MISMATCH_INT) + sr0mask |= AIC_SR0_PHASE_MISMATCH_ERR; +#endif + if (sc->sc_imr1 & AIC_IMR1_EN_BUS_FREE_DETECT_INT) + sr0mask |= AIC_SR0_BUS_FREE_DETECT; + if (sc->sc_imr1 & AIC_IMR1_EN_SCSI_PARITY_ERR_INT) + sr0mask |= AIC_SR0_SCSI_PARITY_ERR; + if (sc->sc_imr1 & AIC_IMR1_EN_PHASE_CHANGE_INT) + sr0mask |= AIC_SR0_SCSI_PHASE_CHG_ATTN; + + sr0 = oaic_read(sc, AIC_STATUS_REG0); + sr1 = oaic_read(sc, AIC_STATUS_REG1); + + if ((sr0 & sr0mask) != 0 || (sr1 & sr1mask) != 0) { + aic6250_intr(sc); + } + if ((acb->xsflags & ITSDONE) != 0) + break; + delay(1000); + + /* process the selection timeout timer as well if necessary */ + if (sc->sc_selto != 0) { + sc->sc_selto--; + if (sc->sc_selto == 0) { + aic6250_seltimeout(sc); + } + } + } + + if (resid != NULL && acb->error == 0) + *resid = datalen; + + return acb->error; +} + +/* + * LOW LEVEL SCSI UTILITIES + */ + +void +aic6250_ack(struct aic6250_softc *sc) +{ + oaic_write(sc, AIC_SCSI_SIGNAL_REG, + oaic_read(sc, AIC_SCSI_SIGNAL_REG) | AIC_SS_ACK_OUT); + while ((oaic_read(sc, AIC_SCSI_SIGNAL_REG) & AIC_SS_REQ_IN) != 0) + continue; + oaic_write(sc, AIC_SCSI_SIGNAL_REG, + oaic_read(sc, AIC_SCSI_SIGNAL_REG) & ~AIC_SS_ACK_OUT); +} + +void +aic6250_sched_msgout(struct aic6250_softc *sc, uint8_t m) +{ + if (sc->sc_msgpriq == 0) + oaic_write(sc, AIC_SCSI_SIGNAL_REG, + sc->sc_phase | AIC_SS_ATN_OUT); + sc->sc_msgpriq |= m; +} + +/* + * Start a selection. This is used by aic6250_sched() to select an idle target, + * and by aic6250_done() to immediately reselect a target to get sense + * information. + */ +void +aic6250_select(struct aic6250_softc *sc, struct aic6250_acb *acb) +{ + oaic_write(sc, AIC_SCSI_ID_DATA, + (1 << sc->sc_initiator) | (1 << sc->sc_tgtid)); + + /* Always enable reselections. */ + sc->sc_imr1 |= AIC_IMR1_EN_SCSI_RST_INT; + sc->sc_imr1 &= + ~(AIC_IMR1_EN_SCSI_REQ_ON_INT | AIC_IMR1_EN_SCSI_PARITY_ERR_INT | + AIC_IMR1_EN_BUS_FREE_DETECT_INT | AIC_IMR1_EN_PHASE_CHANGE_INT); + oaic_write(sc, AIC_INT_MSK_REG1, sc->sc_imr1); + sc->sc_imr0 = AIC_IMR_ARB_SEL_START | AIC_IMR_EN_ERROR_INT | + AIC_IMR_EN_CMD_DONE_INT | AIC_IMR_EN_SEL_OUT_INT | + AIC_IMR_EN_RESEL_INT | AIC_IMR_EN_SELECT_INT; + oaic_write(sc, AIC_INT_MSK_REG0, sc->sc_imr0); + + sc->sc_state = AIC_SELECTING; +} + +int +aic6250_reselect(struct aic6250_softc *sc, int message) +{ + uint8_t selid; + struct aic6250_acb *acb; + + /* + * The SCSI chip made a snapshot of the data bus while the reselection + * was being negotiated. This enables us to determine which target did + * the reselect. + */ + selid = sc->sc_selid & ~(1 << sc->sc_initiator); + if (selid & (selid - 1)) { + printf("insc: reselect with invalid selid %02x\n", selid); + goto reset; + } + + acb = sc->sc_nexus; + if (acb == NULL) { + printf("insc: unexpected reselect\n"); + goto abort; + } + + /* Make this nexus active again. */ + sc->sc_state = AIC_CONNECTED; + + /* Do an implicit RESTORE POINTERS. */ + sc->sc_dp = acb->data_addr; + sc->sc_dleft = acb->data_length; + sc->sc_cp = (uint8_t *)acb->scsi_cmd; + sc->sc_cleft = acb->scsi_cmd_length; + + return (0); + +reset: + aic6250_sched_msgout(sc, SEND_DEV_RESET); + return (1); + +abort: + aic6250_sched_msgout(sc, SEND_ABORT); + return (1); +} + +/* + * Schedule a SCSI operation. This has now been pulled out of the interrupt + * handler so that we may call it from aic6250_scsi_cmd and aic6250_done. + * This may save us an unnecessary interrupt just to get things going. + * Should only be called when state == AIC_IDLE and at bio pl. + */ +void +aic6250_sched(struct aic6250_softc *sc) +{ + struct aic6250_acb *acb; + + acb = &sc->sc_acb; + sc->sc_nexus = acb; + aic6250_select(sc, acb); +} + +/* + * POST PROCESSING OF SCSI_CMD (usually current) + */ +void +aic6250_done(struct aic6250_softc *sc, struct aic6250_acb *acb) +{ + switch (acb->target_stat) { + case SCSI_OK: + acb->error = XS_NOERROR; + break; + case SCSI_BUSY: + acb->error = XS_BUSY; + break; + case SCSI_CHECK: + acb->error = XS_DRIVER_STUFFUP; + break; + default: + acb->error = XS_RESET; + break; + } + + acb->xsflags |= ITSDONE; + sc->sc_nexus = NULL; + sc->sc_state = AIC_IDLE; + + /* Nothing to start; just enable reselections. */ + sc->sc_imr1 |= AIC_IMR1_EN_SCSI_RST_INT; + sc->sc_imr1 &= + ~(AIC_IMR1_EN_SCSI_REQ_ON_INT | AIC_IMR1_EN_SCSI_PARITY_ERR_INT | + AIC_IMR1_EN_BUS_FREE_DETECT_INT | AIC_IMR1_EN_PHASE_CHANGE_INT); + oaic_write(sc, AIC_INT_MSK_REG1, sc->sc_imr1); + sc->sc_imr0 = AIC_IMR_EN_ERROR_INT | + AIC_IMR_EN_RESEL_INT | AIC_IMR_EN_SELECT_INT; + oaic_write(sc, AIC_INT_MSK_REG0, sc->sc_imr0); +} + +/* + * INTERRUPT/PROTOCOL ENGINE + */ + +/* + * Precondition: + * The SCSI bus is already in the MSGI phase and there is a message byte + * on the bus, along with an asserted REQ signal. + */ +void +aic6250_msgin(struct aic6250_softc *sc) +{ + uint8_t sr0, scsisig; + int n; + uint8_t msgbyte; + + if (sc->sc_prevphase == PH_MSGIN) { + /* This is a continuation of the previous message. */ + n = sc->sc_imp - sc->sc_imess; + goto nextbyte; + } + + /* This is a new MESSAGE IN phase. Clean up our state. */ + sc->sc_flags &= ~AIC_DROP_MSGIN; + +nextmsg: + n = 0; + sc->sc_imp = &sc->sc_imess[n]; + +nextbyte: + /* + * Read a whole message, but don't ack the last byte. If we reject the + * message, we have to assert ATN during the message transfer phase + * itself. + */ + for (;;) { + for (;;) { + scsisig = oaic_read(sc, AIC_SCSI_SIGNAL_REG); + if ((scsisig & PH_MASK) != PH_MSGIN) { + /* + * Target left MESSAGE IN, probably because it + * a) noticed our ATN signal, or + * b) ran out of messages. + */ + goto out; + } + if ((scsisig & AIC_SS_REQ_IN) != 0) + break; + } + + /* If parity error, just dump everything on the floor. */ + sr0 = oaic_read(sc, AIC_STATUS_REG0); + if ((sr0 & AIC_SR0_SCSI_PARITY_ERR) != 0) { + sc->sc_flags |= AIC_DROP_MSGIN; + aic6250_sched_msgout(sc, SEND_PARITY_ERROR); + } + + /* Gather incoming message bytes if needed. */ + msgbyte = oaic_read(sc, AIC_SCSI_ID_DATA); + if ((sc->sc_flags & AIC_DROP_MSGIN) == 0) { + if (n >= AIC_MAX_MSG_LEN) { + sc->sc_flags |= AIC_DROP_MSGIN; + aic6250_sched_msgout(sc, SEND_REJECT); + } else { + *sc->sc_imp++ = msgbyte; + n++; + + /* + * This testing is suboptimal, but most + * messages will be of the one byte variety, so + * it should not affect performance + * significantly. + */ + if (n == 1 && IS1BYTEMSG(sc->sc_imess[0])) + break; + if (n == 2 && IS2BYTEMSG(sc->sc_imess[0])) + break; + if (n >= 3 && ISEXTMSG(sc->sc_imess[0]) && + n == sc->sc_imess[1] + 2) + break; + } + } + + /* + * If we reach this spot we're either: + * a) in the middle of a multi-byte message, or + * b) dropping bytes. + */ + aic6250_ack(sc); + } + + /* We now have a complete message. Parse it. */ + switch (sc->sc_state) { + struct aic6250_acb *acb; + + case AIC_CONNECTED: + acb = sc->sc_nexus; + + switch (sc->sc_imess[0]) { + case MSG_CMDCOMPLETE: + sc->sc_state = AIC_CMDCOMPLETE; + break; + + case MSG_PARITY_ERROR: + /* Resend the last message. */ + aic6250_sched_msgout(sc, sc->sc_lastmsg); + break; + + case MSG_MESSAGE_REJECT: + switch (sc->sc_lastmsg) { + case SEND_INIT_DET_ERR: + aic6250_sched_msgout(sc, SEND_ABORT); + break; + } + break; + + case MSG_NOOP: + break; + + case MSG_DISCONNECT: + sc->sc_state = AIC_DISCONNECT; + break; + + case MSG_SAVEDATAPOINTER: + acb->data_addr = sc->sc_dp; + acb->data_length = sc->sc_dleft; + break; + + case MSG_RESTOREPOINTERS: + sc->sc_dp = acb->data_addr; + sc->sc_dleft = acb->data_length; + sc->sc_cp = (uint8_t *)acb->scsi_cmd; + sc->sc_cleft = acb->scsi_cmd_length; + break; + + default: + aic6250_sched_msgout(sc, SEND_REJECT); + break; + } + break; + + case AIC_RESELECTED: + if (!MSG_ISIDENTIFY(sc->sc_imess[0])) { + printf("insc: reselect without IDENTIFY\n"); + goto reset; + } + + (void) aic6250_reselect(sc, sc->sc_imess[0]); + break; + + default: + printf("insc: unexpected MESSAGE IN\n"); + reset: + aic6250_sched_msgout(sc, SEND_DEV_RESET); + break; + +#ifdef notdef + abort: + aic6250_sched_msgout(sc, SEND_ABORT); + break; +#endif + } + + aic6250_ack(sc); + + /* Go get the next message, if any. */ + goto nextmsg; + +out: + /* + * We need to explicitely un-busy. + */ + oaic_write(sc, AIC_SCSI_SIGNAL_REG, + oaic_read(sc, AIC_SCSI_SIGNAL_REG) & + ~(AIC_SS_SEL_OUT | AIC_SS_BSY_OUT | AIC_SS_ACK_OUT)); +} + +/* + * Send the highest priority, scheduled message. + */ +void +aic6250_msgout(struct aic6250_softc *sc) +{ + uint8_t scsisig; + int n; + + if (sc->sc_prevphase == PH_MSGOUT) { + if (sc->sc_omp == sc->sc_omess) { + /* + * This is a retransmission. + * + * We get here if the target stayed in MESSAGE OUT + * phase. Section 5.1.9.2 of the SCSI 2 spec indicates + * that all of the previously transmitted messages must + * be sent again, in the same order. Therefore, we + * requeue all the previously transmitted messages, and + * start again from the top. Our simple priority + * scheme keeps the messages in the right order. + */ + sc->sc_msgpriq |= sc->sc_msgoutq; + /* + * Set ATN. If we're just sending a trivial 1-byte + * message, we'll clear ATN later on anyway. + */ + oaic_write(sc, AIC_SCSI_SIGNAL_REG, + PH_MSGOUT | AIC_SS_ATN_OUT); + } else { + /* This is a continuation of the previous message. */ + n = sc->sc_omp - sc->sc_omess; + goto nextbyte; + } + } + + /* No messages transmitted so far. */ + sc->sc_msgoutq = 0; + sc->sc_lastmsg = 0; + +nextmsg: + /* Pick up highest priority message. */ + sc->sc_currmsg = sc->sc_msgpriq & -sc->sc_msgpriq; + sc->sc_msgpriq &= ~sc->sc_currmsg; + sc->sc_msgoutq |= sc->sc_currmsg; + + /* Build the outgoing message data. */ + switch (sc->sc_currmsg) { + case SEND_IDENTIFY: + sc->sc_omess[0] = + MSG_IDENTIFY(sc->sc_tgtlun, 1); + n = 1; + break; + + case SEND_DEV_RESET: + sc->sc_flags |= AIC_ABORTING; + sc->sc_omess[0] = MSG_BUS_DEV_RESET; + n = 1; + break; + + case SEND_REJECT: + sc->sc_omess[0] = MSG_MESSAGE_REJECT; + n = 1; + break; + + case SEND_PARITY_ERROR: + sc->sc_omess[0] = MSG_PARITY_ERROR; + n = 1; + break; + + case SEND_INIT_DET_ERR: + sc->sc_omess[0] = MSG_INITIATOR_DET_ERR; + n = 1; + break; + + case SEND_ABORT: + sc->sc_flags |= AIC_ABORTING; + sc->sc_omess[0] = MSG_ABORT; + n = 1; + break; + + default: + printf("insc: unexpected MESSAGE OUT\n"); + sc->sc_omess[0] = MSG_NOOP; + n = 1; + break; + } + sc->sc_omp = &sc->sc_omess[n]; + +nextbyte: + /* Send message bytes. */ + for (;;) { + for (;;) { + scsisig = oaic_read(sc, AIC_SCSI_SIGNAL_REG); + if ((scsisig & PH_MASK) != PH_MSGOUT) { + /* + * Target left MESSAGE OUT, possibly to reject + * our message. + * + * If this is the last message being sent, then + * we deassert ATN, since either the target is + * going to ignore this message, or it's going + * to ask for a retransmission via MESSAGE + * PARITY ERROR (in which case we reassert ATN + * anyway). + */ + if (sc->sc_msgpriq == 0) + oaic_write(sc, AIC_SCSI_SIGNAL_REG, + scsisig & ~AIC_SS_ATN_OUT); + return; + } + if ((scsisig & AIC_SS_REQ_IN) != 0) + break; + } + + /* Clear ATN before last byte if this is the last message. */ + if (n == 1 && sc->sc_msgpriq == 0) + oaic_write(sc, AIC_SCSI_SIGNAL_REG, + scsisig & ~AIC_SS_ATN_OUT); + /* Send message byte. */ + oaic_write(sc, AIC_SCSI_ID_DATA, *--sc->sc_omp); + --n; + /* Keep track of the last message we've sent any bytes of. */ + sc->sc_lastmsg = sc->sc_currmsg; + + aic6250_ack(sc); + + if (n == 0) + break; + } + + /* We get here only if the entire message has been transmitted. */ + if (sc->sc_msgpriq != 0) { + /* There are more outgoing messages. */ + goto nextmsg; + } + + /* + * The last message has been transmitted. We need to remember the last + * message transmitted (in case the target switches to MESSAGE IN phase + * and sends a MESSAGE REJECT), and the list of messages transmitted + * this time around (in case the target stays in MESSAGE OUT phase to + * request a retransmit). + */ +} + +/* aic6250_dataout_pio: perform a data transfer in CPU-controlled PIO mode. + * Precondition: The SCSI bus should be in the DOUT or CMDOUT phase, with REQ + * asserted and ACK deasserted (i.e. waiting for a data byte). + */ +int +aic6250_dataout_pio(struct aic6250_softc *sc, uint8_t *p, int n, int phase) +{ + uint8_t scsisig; + int out = 0; + + sc->sc_imr1 &= ~AIC_IMR1_EN_SCSI_REQ_ON_INT; + oaic_write(sc, AIC_INT_MSK_REG1, sc->sc_imr1); + + /* I have tried to make the main loop as tight as possible. This + * means that some of the code following the loop is a bit more + * complex than otherwise. + */ + while (out != n) { + for (;;) { + scsisig = oaic_read(sc, AIC_SCSI_SIGNAL_REG); + if ((scsisig & AIC_SS_REQ_IN) != 0) + break; + } + if ((scsisig & PH_MASK) != phase) + break; + + oaic_write(sc, AIC_SCSI_ID_DATA, *p++); + out++; + + aic6250_ack(sc); + } + + sc->sc_imr1 |= AIC_IMR1_EN_SCSI_REQ_ON_INT; + oaic_write(sc, AIC_INT_MSK_REG1, sc->sc_imr1); + + return out; +} + +/* aic6250_datain_pio: perform data transfers using the FIFO datapath in the + * aic6250. + * Precondition: The SCSI bus should be in the DIN or STAT phase, with REQ + * asserted and ACK deasserted (i.e. at least one byte is ready). + * For now, uses a pretty dumb algorithm, hangs around until all data has been + * transferred. This, is OK for fast targets, but not so smart for slow + * targets which don't disconnect or for huge transfers. + */ +int +aic6250_datain_pio(struct aic6250_softc *sc, uint8_t *p, int n, int phase) +{ + uint8_t scsisig; + int in = 0; + + sc->sc_imr1 &= ~AIC_IMR1_EN_SCSI_REQ_ON_INT; + oaic_write(sc, AIC_INT_MSK_REG1, sc->sc_imr1); + + /* We leave this loop if one or more of the following is true: + * a) phase != PH_DATAIN && FIFOs are empty + * b) SCSIRSTI is set (a reset has occurred) or busfree is detected. + */ + while (in != n) { + for (;;) { + scsisig = oaic_read(sc, AIC_SCSI_SIGNAL_REG); + if ((scsisig & AIC_SS_REQ_IN) != 0) + break; + } + if ((scsisig & PH_MASK) != phase) + break; + + *p++ = oaic_read(sc, AIC_SCSI_ID_DATA); + in++; + + aic6250_ack(sc); + } + + sc->sc_imr1 |= AIC_IMR1_EN_SCSI_REQ_ON_INT; + oaic_write(sc, AIC_INT_MSK_REG1, sc->sc_imr1); + + return in; +} + +/* + * This is the workhorse routine of the driver. + * Deficiencies (for now): + * 1) always uses programmed I/O + */ +int +aic6250_intr(void *arg) +{ + struct aic6250_softc *sc = arg; + uint8_t sr1, sr0; + struct aic6250_acb *acb; + int n, first = 1; + + /* Read SR1 before writing to IMR0 (which will reset some SR1 bits). */ + sr1 = oaic_read(sc, AIC_STATUS_REG1); + oaic_write(sc, AIC_INT_MSK_REG0, 0); + +loop: + sr0 = oaic_read(sc, AIC_STATUS_REG0); + /* + * First check for abnormal conditions, such as reset. + */ + if ((sr0 & AIC_SR0_SCSI_RST_OCCURED) != 0) { + printf("insc: SCSI bus reset\n"); + while ((oaic_read(sc, AIC_STATUS_REG1) & + AIC_SR1_SCSI_RST_IN) != 0) + delay(5); + goto reset; + } + + /* + * Check for less serious errors. + */ + if ((sr0 & AIC_SR0_SCSI_PARITY_ERR) != 0) { + printf("insc: SCSI bus parity error\n"); + if (sc->sc_prevphase == PH_MSGIN) { + sc->sc_flags |= AIC_DROP_MSGIN; + aic6250_sched_msgout(sc, SEND_PARITY_ERROR); + } else + aic6250_sched_msgout(sc, SEND_INIT_DET_ERR); + } + + + /* + * If we're not already busy doing something test for the following + * conditions: + * 1) We have been reselected by something + * 2) We have selected something successfully + * 3) Our selection process has timed out + * 4) This is really a bus free interrupt just to get a new command + * going? + * 5) Spurious interrupt? + */ + switch (sc->sc_state) { + case AIC_IDLE: + case AIC_SELECTING: + if (first) + first = 0; + else + sr1 = oaic_read(sc, AIC_STATUS_REG1); + + if (sc->sc_state == AIC_SELECTING && + (sr1 & AIC_SR1_SEL_OUT) != 0) { + /* start selection timeout */ + acb = sc->sc_nexus; + sc->sc_selto = 250; /* msec */ + sc->sc_imr0 &= ~AIC_IMR_EN_SEL_OUT_INT; + goto out; + } + + if ((sr1 & AIC_SR1_RESELECTED) != 0) { + /* kill selection timeout timer */ + sc->sc_imr0 &= + ~(AIC_IMR_EN_SEL_OUT_INT | AIC_IMR_EN_CMD_DONE_INT); + sc->sc_selto = 0; + + /* Save reselection ID. */ + sc->sc_selid = oaic_read(sc, AIC_SOURCE_DEST_ID); + + sc->sc_state = AIC_RESELECTED; + } else if ((sr1 & (AIC_SR1_SELECTED | AIC_SR1_CMD_DONE)) != 0) { + /* kill selection timeout timer */ + sc->sc_imr0 &= + ~(AIC_IMR_EN_SEL_OUT_INT | AIC_IMR_EN_CMD_DONE_INT); + sc->sc_selto = 0; + + /* We have selected a target. Things to do: + * a) Determine what message(s) to send. + * b) Verify that we're still selecting the target. + * c) Mark device as busy. + */ + if (sc->sc_state != AIC_SELECTING) { + printf("insc: selection out while idle\n"); + goto reset; + } + acb = sc->sc_nexus; + + sc->sc_msgpriq = SEND_IDENTIFY; + + /* Do an implicit RESTORE POINTERS. */ + sc->sc_dp = acb->data_addr; + sc->sc_dleft = acb->data_length; + sc->sc_cp = (uint8_t *)acb->scsi_cmd; + sc->sc_cleft = acb->scsi_cmd_length; + + sc->sc_state = AIC_CONNECTED; + } else { + if (sc->sc_state != AIC_IDLE) { + printf("insc: BUS FREE while not idle\n"); + goto out; + } + + goto sched; + } + + /* + * Turn off selection stuff, and prepare to catch bus free + * interrupts, parity errors, and phase changes. + */ + sc->sc_imr1 |= + AIC_IMR1_EN_SCSI_REQ_ON_INT | AIC_IMR1_EN_SCSI_RST_INT | + AIC_IMR1_EN_BUS_FREE_DETECT_INT | + AIC_IMR1_EN_SCSI_PARITY_ERR_INT | + AIC_IMR1_EN_PHASE_CHANGE_INT; + oaic_write(sc, AIC_INT_MSK_REG1, sc->sc_imr1); + + sc->sc_flags = 0; + sc->sc_prevphase = PH_INVALID; + goto dophase; + } + + if ((sr0 & AIC_SR0_BUS_FREE_DETECT) != 0) { + /* We've gone to BUS FREE phase. */ + switch (sc->sc_state) { + case AIC_RESELECTED: + goto sched; + + case AIC_CONNECTED: + acb = sc->sc_nexus; + + if ((sc->sc_flags & AIC_ABORTING) == 0) { + /* + * Section 5.1.1 of the SCSI 2 spec suggests + * issuing a REQUEST SENSE following an + * unexpected disconnect. Some devices go into + * a contingent allegiance condition when + * disconnecting, and this is necessary to + * clean up their state. + */ + printf("insc: unexpected disconnect\n"); + goto out; + } + + acb->error = XS_DRIVER_STUFFUP; + goto finish; + + case AIC_DISCONNECT: + acb = sc->sc_nexus; +#if 1 /* XXX */ + acb->data_addr = sc->sc_dp; + acb->data_length = sc->sc_dleft; +#endif + sc->sc_nexus = NULL; + goto sched; + + case AIC_CMDCOMPLETE: + acb = sc->sc_nexus; + goto finish; + } + } + +dophase: + if ((sr0 & AIC_SR0_SCSI_REQ_ON) == 0) { + /* Wait for AIC_SR0_SCSI_REQ_ON. */ + goto out; + } + + sc->sc_phase = oaic_read(sc, AIC_SCSI_SIGNAL_REG) & PH_MASK; + oaic_write(sc, AIC_SCSI_SIGNAL_REG, sc->sc_phase); + + switch (sc->sc_phase) { + case PH_MSGOUT: + if (sc->sc_state != AIC_CONNECTED && + sc->sc_state != AIC_RESELECTED) + break; + aic6250_msgout(sc); + sc->sc_prevphase = PH_MSGOUT; + goto loop; + + case PH_MSGIN: + if (sc->sc_state != AIC_CONNECTED && + sc->sc_state != AIC_RESELECTED) + break; + aic6250_msgin(sc); + sc->sc_prevphase = PH_MSGIN; + goto loop; + + case PH_CMD: + if (sc->sc_state != AIC_CONNECTED) + break; + n = aic6250_dataout_pio(sc, sc->sc_cp, sc->sc_cleft, PH_CMD); + sc->sc_cp += n; + sc->sc_cleft -= n; + sc->sc_prevphase = PH_CMD; + goto loop; + + case PH_DATAOUT: + if (sc->sc_state != AIC_CONNECTED) + break; + n = aic6250_dataout_pio(sc, sc->sc_dp, sc->sc_dleft, PH_DATAOUT); + sc->sc_dp += n; + sc->sc_dleft -= n; + sc->sc_prevphase = PH_DATAOUT; + goto loop; + + case PH_DATAIN: + if (sc->sc_state != AIC_CONNECTED) + break; + n = aic6250_datain_pio(sc, sc->sc_dp, sc->sc_dleft, PH_DATAIN); + sc->sc_dp += n; + sc->sc_dleft -= n; + sc->sc_prevphase = PH_DATAIN; + goto loop; + + case PH_STAT: + if (sc->sc_state != AIC_CONNECTED) + break; + acb = sc->sc_nexus; + aic6250_datain_pio(sc, &acb->target_stat, 1, PH_STAT); + sc->sc_prevphase = PH_STAT; + goto loop; + } + + printf("insc: unexpected bus phase\n"); +reset: + aic6250_init(sc); + return 1; + +finish: + aic6250_done(sc, acb); + goto out; + +sched: + sc->sc_state = AIC_IDLE; + +out: + sc->sc_imr0 |= AIC_IMR_EN_ERROR_INT; + oaic_write(sc, AIC_INT_MSK_REG0, sc->sc_imr0); + return 1; +} + +void +aic6250_seltimeout(void *arg) +{ + struct aic6250_softc *sc = arg; + struct aic6250_acb *acb; + + if (sc->sc_state != AIC_SELECTING) { + printf("insc: selection timeout while idle\n"); + aic6250_init(sc); + return; + } + + acb = sc->sc_nexus; + + oaic_write(sc, AIC_SCSI_ID_DATA, 0); + delay(200); + + acb->error = XS_SELTIMEOUT; + aic6250_done(sc, acb); + + sc->sc_imr0 |= AIC_IMR_EN_ERROR_INT; + oaic_write(sc, AIC_INT_MSK_REG0, sc->sc_imr0); +} diff --git a/sys/arch/aviion/stand/boot/oaic.h b/sys/arch/aviion/stand/boot/oaic.h new file mode 100644 index 00000000000..03f85bc76bd --- /dev/null +++ b/sys/arch/aviion/stand/boot/oaic.h @@ -0,0 +1,21 @@ +/* $OpenBSD: oaic.h,v 1.1 2013/10/16 16:59:34 miod Exp $ */ + +/* + * Copyright (c) 2013 Miodrag Vallat. + * + * Permission to use, copy, modify, and distribute this software for any + * purpose with or without fee is hereby granted, provided that the above + * copyright notice and this permission notice appear in all copies. + * + * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES + * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF + * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR + * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES + * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN + * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF + * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. + */ + +void *oaic_attach(uint32_t, int, int); +void oaic_detach(void *); +int oaic_scsicmd(void *, void *, size_t, void *, size_t, size_t *); diff --git a/sys/arch/aviion/stand/boot/oosiop.c b/sys/arch/aviion/stand/boot/oosiop.c index f601ea7e960..415f773a7ca 100644 --- a/sys/arch/aviion/stand/boot/oosiop.c +++ b/sys/arch/aviion/stand/boot/oosiop.c @@ -1,4 +1,4 @@ -/* $OpenBSD: oosiop.c,v 1.3 2013/10/10 21:22:06 miod Exp $ */ +/* $OpenBSD: oosiop.c,v 1.4 2013/10/16 16:59:34 miod Exp $ */ /* OpenBSD: oosiop.c,v 1.20 2013/10/09 18:22:06 miod Exp */ /* OpenBSD: oosiopvar.h,v 1.5 2011/04/03 12:42:36 krw Exp */ /* $NetBSD: oosiop.c,v 1.4 2003/10/29 17:45:55 tsutsui Exp $ */ @@ -40,8 +40,6 @@ #include <dev/ic/oosiopreg.h> -#include "oosiop.h" - #define OOSIOP_NTGT 8 /* Max targets */ struct oosiop_xfer { @@ -162,7 +160,6 @@ oosiop_attach(uint32_t addr, int id, int lun) if (sc == NULL) return NULL; - /* XXX run badaddr? */ memset(sc, 0, sizeof *sc); sc->sc_baseaddr = addr; sc->sc_scr = (uint32_t *)alloc(sizeof(oosiop_script)); diff --git a/sys/arch/aviion/stand/boot/scsi.c b/sys/arch/aviion/stand/boot/scsi.c index 8adc52f8a18..72f8cd4bb52 100644 --- a/sys/arch/aviion/stand/boot/scsi.c +++ b/sys/arch/aviion/stand/boot/scsi.c @@ -1,4 +1,4 @@ -/* $OpenBSD: scsi.c,v 1.1 2013/10/10 21:22:06 miod Exp $ */ +/* $OpenBSD: scsi.c,v 1.2 2013/10/16 16:59:34 miod Exp $ */ /* * Copyright (c) 2013 Miodrag Vallat. @@ -21,9 +21,85 @@ #include <sys/param.h> #include <stand.h> +#include "libsa.h" +#include "prom.h" + #include "scsi.h" #include <scsi/scsi_disk.h> +struct scsi_private * +scsi_initialize(const char *ctrlname, int ctrl, int unit, int lun, int part) +{ + struct scsi_private *priv; + + priv = alloc(sizeof(struct scsi_private)); + if (priv == NULL) + return NULL; + + memset(priv, 0, sizeof(struct scsi_private)); + priv->part = part; + + /* provide default based upon system type */ + if (*ctrlname == '\0') { + switch (cpuid()) { + case AVIION_300_310: + case AVIION_400_4000: + case AVIION_410_4100: + case AVIION_300C_310C: + case AVIION_300CD_310CD: + case AVIION_300D_310D: + case AVIION_4300_25: + case AVIION_4300_20: + case AVIION_4300_16: + ctrlname = "insc"; + break; + case AVIION_4600_530: + ctrlname = "ncsc"; + break; + } + } + + if (strcmp(ctrlname, "insc") == 0) { + if (ctrl == 0) { + *(volatile uint32_t *)0xfff840c0 = 0x6e; + ctrl = 0xfff8a000; + } else + goto done; + + if (badaddr((void *)ctrl, 4) != 0) + goto done; + + /* initialize controller */ + priv->scsicookie = oaic_attach(ctrl, unit, lun); + priv->scsicmd = oaic_scsicmd; + priv->scsidetach = oaic_detach; + } else + if (strcmp(ctrlname, "ncsc") == 0) { + if (ctrl == 0) + ctrl = 0xfffb0000; + else if (ctrl == 1) + ctrl = 0xfffb0080; + else + goto done; + + if (badaddr((void *)ctrl, 4) != 0) + goto done; + + /* initialize controller */ + priv->scsicookie = oosiop_attach(ctrl, unit, lun); + priv->scsicmd = oosiop_scsicmd; + priv->scsidetach = oosiop_detach; + } + +done: + if (priv->scsicookie == NULL) { + free(priv, sizeof(struct scsi_private)); + priv = NULL; + } + + return priv; +} + int scsi_tur(struct scsi_private *priv) { diff --git a/sys/arch/aviion/stand/boot/scsi.h b/sys/arch/aviion/stand/boot/scsi.h index c29a47864f0..d54affbf6e4 100644 --- a/sys/arch/aviion/stand/boot/scsi.h +++ b/sys/arch/aviion/stand/boot/scsi.h @@ -1,4 +1,4 @@ -/* $OpenBSD: scsi.h,v 1.3 2013/10/10 21:22:06 miod Exp $ */ +/* $OpenBSD: scsi.h,v 1.4 2013/10/16 16:59:34 miod Exp $ */ #include <scsi/scsi_all.h> #include <scsi/scsiconf.h> @@ -88,7 +88,11 @@ struct scsi_private { int part; }; +struct scsi_private * + scsi_initialize(const char *, int, int, int, int); + int scsi_tur(struct scsi_private *); int scsi_read(struct scsi_private *, daddr32_t, size_t, void *, size_t *); +#include "oaic.h" #include "oosiop.h" diff --git a/sys/arch/aviion/stand/boot/sd.c b/sys/arch/aviion/stand/boot/sd.c index 41445de6d28..4fe51f22513 100644 --- a/sys/arch/aviion/stand/boot/sd.c +++ b/sys/arch/aviion/stand/boot/sd.c @@ -1,4 +1,4 @@ -/* $OpenBSD: sd.c,v 1.4 2013/10/10 21:22:07 miod Exp $ */ +/* $OpenBSD: sd.c,v 1.5 2013/10/16 16:59:34 miod Exp $ */ /* * Copyright (c) 2013 Miodrag Vallat. @@ -21,7 +21,6 @@ #include <sys/param.h> #include <stand.h> -#include "libsa.h" #include "scsi.h" int @@ -35,36 +34,8 @@ sdopen(struct open_file *f, const char *ctrlname, int ctrl, int unit, int lun, char *msg; size_t z; - f->f_devdata = alloc(sizeof(struct scsi_private)); - if (f->f_devdata == NULL) - return ENOMEM; - - priv = (struct scsi_private *)f->f_devdata; - memset(priv, 0, sizeof(struct scsi_private)); - priv->part = part; - - /* XXX provide default based upon system type */ - if (*ctrlname == '\0') - ctrlname = "ncsc"; - - if (strcmp(ctrlname, "ncsc") == 0) { - if (ctrl == 0) - ctrl = 0xfffb0000; - else if (ctrl == 1) - ctrl = 0xfffb0080; - else - return ENXIO; - - if (badaddr((void *)ctrl, 4) != 0) - return ENXIO; - - /* initialize controller */ - priv->scsicookie = oosiop_attach(ctrl, unit, lun); - priv->scsicmd = oosiop_scsicmd; - priv->scsidetach = oosiop_detach; - } - - if (priv->scsicookie == NULL) + f->f_devdata = priv = scsi_initialize(ctrlname, ctrl, unit, lun, part); + if (priv == NULL) return ENXIO; /* send TUR */ diff --git a/sys/arch/aviion/stand/boot/version.c b/sys/arch/aviion/stand/boot/version.c index b1568713b09..bee22835eb9 100644 --- a/sys/arch/aviion/stand/boot/version.c +++ b/sys/arch/aviion/stand/boot/version.c @@ -1,3 +1,3 @@ -/* $OpenBSD: version.c,v 1.2 2013/10/10 21:22:07 miod Exp $ */ +/* $OpenBSD: version.c,v 1.3 2013/10/16 16:59:35 miod Exp $ */ -const char version[] = "0.2"; +const char version[] = "0.3"; diff --git a/sys/arch/aviion/stand/libprom/Makefile b/sys/arch/aviion/stand/libprom/Makefile index 410407c8cce..8b59141ca6a 100644 --- a/sys/arch/aviion/stand/libprom/Makefile +++ b/sys/arch/aviion/stand/libprom/Makefile @@ -1,4 +1,4 @@ -# $OpenBSD: Makefile,v 1.2 2012/08/21 14:46:18 pascal Exp $ +# $OpenBSD: Makefile,v 1.3 2013/10/16 16:59:35 miod Exp $ LIB=prom @@ -11,7 +11,7 @@ DIR_SA=$S/lib/libsa CFLAGS+=-I${.CURDIR}/../../include -I${DIR_SA} -SRCS= getc.c getenaddr.c halt.c putc.c +SRCS= cpuid.c getc.c getenaddr.c halt.c putc.c install: diff --git a/sys/arch/aviion/stand/libprom/cpuid.c b/sys/arch/aviion/stand/libprom/cpuid.c new file mode 100644 index 00000000000..4a421c21b21 --- /dev/null +++ b/sys/arch/aviion/stand/libprom/cpuid.c @@ -0,0 +1,32 @@ +/* $OpenBSD: cpuid.c,v 1.1 2013/10/16 16:59:35 miod Exp $ */ + +/* + * Copyright (c) 2013 Miodrag Vallat. + * + * Permission to use, copy, modify, and distribute this software for any + * purpose with or without fee is hereby granted, provided that the above + * copyright notice and this permission notice appear in all copies. + * + * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES + * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF + * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR + * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES + * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN + * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF + * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. + */ + +#include <sys/types.h> + +#include "prom.h" + +uint +cpuid(void) +{ + uint ret; + + SCM_CALL(SCM_CPUID); + __asm__ __volatile__ ("or %0, %%r0, %%r2" : "=r" (ret)); + + return ret; +} diff --git a/sys/arch/aviion/stand/libprom/prom.h b/sys/arch/aviion/stand/libprom/prom.h index 8d0003963b0..68c91da6fdf 100644 --- a/sys/arch/aviion/stand/libprom/prom.h +++ b/sys/arch/aviion/stand/libprom/prom.h @@ -1,4 +1,4 @@ -/* $OpenBSD: prom.h,v 1.2 2013/09/28 21:59:38 miod Exp $ */ +/* $OpenBSD: prom.h,v 1.3 2013/10/16 16:59:35 miod Exp $ */ /* * Copyright (c) 2006, Miodrag Vallat * @@ -28,8 +28,10 @@ #define SCM_OCHAR 0x20 #define SCM_OCRLF 0x26 #define SCM_HALT 0x63 +#define SCM_CPUID 0x102 #define SCM_COMMID 0x114 +uint cpuid(void); void scm_getenaddr(u_char *); /* @@ -41,3 +43,43 @@ void scm_getenaddr(u_char *); __asm__ __volatile__ ("or %%r9,%%r0," __STRING(x) "; tb0 0,%%r0,496" \ ::: "r1", "r2", "r3", "r4", "r5", "r6", "r7", "r8", \ "r9", "r10", "r11", "r12", "r13") + +/* + * cpuid values + */ + +#define AVIION_300_310 0x7904 /* mono Maverick */ +#define AVIION_5100_6100 0x7906 /* 20MHz Topgun */ +#define AVIION_400_4000 0x7908 /* 16MHz Mav+ */ +#define AVIION_410_4100 0x790c /* 20MHz Mav+ */ +#define AVIION_300C_310C 0x7910 /* color Maverick */ +#define AVIION_5200_6200 0x7912 /* 25MHz Topgun */ +#define AVIION_5240_6240 0x7918 /* 25MHz Shotgun */ +#define AVIION_300CD_310CD 0x7920 /* dual duart color Maverick */ +#define AVIION_300D_310D 0x7924 /* dual duart mono Maverick */ +#define AVIION_4600_530 0x7930 /* Rolling Rock */ +#define AVIION_4300_25 0x7932 /* 25MHz Terra */ +#define AVIION_4300_20 0x7934 /* 20MHz Terra */ +#define AVIION_4300_16 0x7936 /* 16MHz Terra */ +#define AVIION_5255_6255 0x7942 /* 25MHz Tophat */ +#define AVIION_350 0x7944 /* KME */ +#define AVIION_6280 0x7946 /* High Noon */ +#define AVIION_8500_9500 0x794a /* Odyssey */ +#define AVIION_9500_HA 0x794c /* Oz */ +#define AVIION_500 0x794e /* Robin Hood */ +#define AVIION_5500 0x7950 /* Schooner */ +#define AVIION_450 0x7958 /* Inner Tube */ +#define AVIION_8500_9500_45_1MB 0x795a /* 45MHz Iliad (1MB L2) */ +#define AVIION_10000 0x7960 /* Sierra */ +#define AVIION_10000_QT 0x7962 /* Sierra QT */ +#define AVIION_5500PLUS 0x7964 /* Schooner+ */ +#define AVIION_450PLUS 0x7966 /* Inner Tube+ */ +#define AVIION_8500_9500_50_1MB 0x7968 /* 50MHz Iliad (1MB L2) */ +#define AVIION_8500_9500_50_2MB 0x796a /* 50MHz Iliad (2MB L2) */ + +/* did the following ever hit the market? */ +#define AVIION_UNKNOWN1 0x7926 /* mono Montezuma */ +#define AVIION_UNKNOWN2 0x7928 /* color Montezuma */ +#define AVIION_UNKNOWN3 0x7956 /* Flintstone */ +#define AVIION_UNKNOWN1_DIS 0xfff0 /* mono disabled Montezuma */ +#define AVIION_UNKNOWN2_DIS 0xfff1 /* color disabled Montezuma */ diff --git a/sys/arch/aviion/stand/libsa/libsa.h b/sys/arch/aviion/stand/libsa/libsa.h index 20ccebe10c8..a9ba67de0a9 100644 --- a/sys/arch/aviion/stand/libsa/libsa.h +++ b/sys/arch/aviion/stand/libsa/libsa.h @@ -1,4 +1,4 @@ -/* $OpenBSD: libsa.h,v 1.4 2013/10/10 21:22:07 miod Exp $ */ +/* $OpenBSD: libsa.h,v 1.5 2013/10/16 16:59:35 miod Exp $ */ /* * libsa prototypes @@ -8,8 +8,6 @@ extern int boothowto; -#define BOOT_ETHERNET_ZERO 0x0001 - struct boot_info { unsigned int bootdev; unsigned int bootunit; diff --git a/sys/arch/aviion/stand/libsa/parse_args.c b/sys/arch/aviion/stand/libsa/parse_args.c index f7f63d43684..34f3b2eb5bb 100644 --- a/sys/arch/aviion/stand/libsa/parse_args.c +++ b/sys/arch/aviion/stand/libsa/parse_args.c @@ -1,4 +1,4 @@ -/* $OpenBSD: parse_args.c,v 1.5 2013/10/10 21:22:07 miod Exp $ */ +/* $OpenBSD: parse_args.c,v 1.6 2013/10/16 16:59:35 miod Exp $ */ /*- * Copyright (c) 1995 Theo de Raadt @@ -122,8 +122,8 @@ parse_args(const char *line, char **filep, int first) if (*p++ == '-') while (*p != ' ' && *p != '\0') switch (*p++) { - case 'z': - boothowto |= BOOT_ETHERNET_ZERO; + case 'a': + boothowto |= RB_ASKNAME; break; } p = stws(p); |