src - OpenBSD base system

diff options


context:
space:
mode:

author	Miod Vallat <miod@cvs.openbsd.org>	2004-05-07 18:13:01 +0000
committer	Miod Vallat <miod@cvs.openbsd.org>	2004-05-07 18:13:01 +0000
commit	026007ed26549580bedcc9e7fd5823445cf1b3f0 (patch)
tree	a927a56580a58e82a19d1fea20c74eb5bc6e82be /sys/arch/mvme88k
parent	66f6a1631a95c5ab3f101f0505f1e23500c0884e (diff)

Replace the old ssh(4) NCR53C710 scsi driver with a pcctwo attachment for

the MI osiop(4) driver. This improves performance very slighly and should also improve reliability. Tested on 25MHz (50MHz osiop) and 33MHz (66MHz osiop) MVME187 boards.

Diffstat (limited to 'sys/arch/mvme88k')

-rw-r--r--

sys/arch/mvme88k/conf/GENERIC

-rw-r--r--

sys/arch/mvme88k/conf/M187

-rw-r--r--

sys/arch/mvme88k/conf/M197

-rw-r--r--

sys/arch/mvme88k/conf/RAMDISK

-rw-r--r--

sys/arch/mvme88k/conf/files.mvme88k

-rw-r--r--

sys/arch/mvme88k/dev/osiop_pcctwo.c

199

-rw-r--r--

sys/arch/mvme88k/dev/ssh.c

1883

-rw-r--r--

sys/arch/mvme88k/dev/ssh_script.out

175

-rw-r--r--

sys/arch/mvme88k/dev/ssh_script.ss

205

-rw-r--r--

sys/arch/mvme88k/dev/sshreg.h

332

-rw-r--r--

sys/arch/mvme88k/dev/sshvar.h

197

11 files changed, 216 insertions, 2810 deletions

diff --git a/sys/arch/mvme88k/conf/GENERIC b/sys/arch/mvme88k/conf/GENERIC
index 0ec3af450cf..f9a1a124656 100644
--- a/sys/arch/mvme88k/conf/GENERIC
+++ b/sys/arch/mvme88k/conf/GENERIC

@@ -1,4 +1,4 @@

-# $OpenBSD: GENERIC,v 1.42 2004/04/29 14:33:27 miod Exp $

+# $OpenBSD: GENERIC,v 1.43 2004/05/07 18:12:55 miod Exp $

machine mvme88k m88k

@@ -38,7 +38,7 @@ clock0 at pcctwo0 ipl 5

nvram0 at pcctwo0 offset 0xc0000

vme0 at pcctwo0 offset 0x40000

ie0 at pcctwo0 offset 0x46000 ipl 1

-ssh0 at pcctwo0 offset 0x47000 ipl 2

+osiop0 at pcctwo0 offset 0x47000 ipl 2

cl0 at pcctwo0 offset 0x45000 ipl 3

cl1 at pcctwo0 offset 0x45200 ipl 3 # M8120 only

#lptwo0 at pcctwo0 offset 0x45000 ipl 1

@@ -70,7 +70,7 @@ vs4 at vmes0 addr 0xffff7000 ipl 2

vs5 at vmes0 addr 0xffff7800 ipl 2

scsibus* at vs?

-scsibus* at ssh?

+scsibus* at osiop?

sd* at scsibus? target ? lun ?

st* at scsibus? target ? lun ?

diff --git a/sys/arch/mvme88k/conf/M187 b/sys/arch/mvme88k/conf/M187
index 037f444695a..f525dacd1ac 100644
--- a/sys/arch/mvme88k/conf/M187
+++ b/sys/arch/mvme88k/conf/M187

@@ -1,4 +1,4 @@

-# $OpenBSD: M187,v 1.30 2004/04/29 14:33:27 miod Exp $

+# $OpenBSD: M187,v 1.31 2004/05/07 18:12:55 miod Exp $

machine mvme88k m88k

@@ -29,7 +29,7 @@ clock0 at pcctwo0 ipl 5

vme0 at pcctwo0 offset 0x40000

nvram0 at pcctwo0 offset 0xc0000

ie0 at pcctwo0 offset 0x46000 ipl 1

-ssh0 at pcctwo0 offset 0x47000 ipl 2

+osiop0 at pcctwo0 offset 0x47000 ipl 2

cl0 at pcctwo0 offset 0x45000 ipl 3

cl1 at pcctwo0 offset 0x45200 ipl 3 # M8120 only

#lptwo0 at pcctwo0 offset 0x45000 ipl 1 size

@@ -58,8 +58,8 @@ vs5 at vmes0 addr 0xffff7800 ipl 2

# ------------------------------- vs0 devices --------------------------

scsibus* at vs?

-# ------------------------------ ssh0 devices --------------------------

-scsibus* at ssh?

+# ----------------------------- osiop0 devices -------------------------

+scsibus* at osiop?

# ------------------------------ scsibus0 devices ----------------------

sd* at scsibus? target ? lun ?

diff --git a/sys/arch/mvme88k/conf/M197 b/sys/arch/mvme88k/conf/M197
index ae4f9f8ee71..ad1085380ca 100644
--- a/sys/arch/mvme88k/conf/M197
+++ b/sys/arch/mvme88k/conf/M197

@@ -1,4 +1,4 @@

-# $OpenBSD: M197,v 1.24 2004/04/29 14:33:27 miod Exp $

+# $OpenBSD: M197,v 1.25 2004/05/07 18:12:55 miod Exp $

machine mvme88k m88k

@@ -30,7 +30,7 @@ clock0 at pcctwo0 ipl 5

vme0 at pcctwo0 offset 0x40000

nvram0 at pcctwo0 offset 0xc0000

ie0 at pcctwo0 offset 0x46000 ipl 1

-ssh0 at pcctwo0 offset 0x47000 ipl 2

+osiop0 at pcctwo0 offset 0x47000 ipl 2

cl0 at pcctwo0 offset 0x45000 ipl 3

#lptwo0 at pcctwo0 addr 0x45000 ipl 1 size

#memc0 at pcctwo0 addr 0x43000

@@ -58,8 +58,8 @@ vs5 at vmes0 addr 0xffff7800 ipl 2

# ------------------------------- vs0 devices --------------------------

scsibus* at vs?

-# ------------------------------ ssh0 devices --------------------------

-scsibus* at ssh?

+# ----------------------------- osiop0 devices -------------------------

+scsibus* at osiop?

# ------------------------------ scsibus? devices ----------------------

sd* at scsibus? target ? lun ?

diff --git a/sys/arch/mvme88k/conf/RAMDISK b/sys/arch/mvme88k/conf/RAMDISK
index 7fa300ed1dd..082de531dcd 100644
--- a/sys/arch/mvme88k/conf/RAMDISK
+++ b/sys/arch/mvme88k/conf/RAMDISK

@@ -1,4 +1,4 @@

-# $OpenBSD: RAMDISK,v 1.23 2004/04/29 14:33:27 miod Exp $

+# $OpenBSD: RAMDISK,v 1.24 2004/05/07 18:12:55 miod Exp $

machine mvme88k m88k

@@ -49,7 +49,7 @@ clock0 at pcctwo0 ipl 5

vme0 at pcctwo0 offset 0x40000

nvram0 at pcctwo0 offset 0xc0000

ie0 at pcctwo0 offset 0x46000 ipl 1

-ssh0 at pcctwo0 offset 0x47000 ipl 2

+osiop0 at pcctwo0 offset 0x47000 ipl 2

cl0 at pcctwo0 offset 0x45000 ipl 3

#cl1 at pcctwo0 offset 0x45200 ipl 3 # M8120 only

@@ -76,7 +76,7 @@ vs4 at vmes0 addr 0xffff7000 ipl 2

vs5 at vmes0 addr 0xffff7800 ipl 2

scsibus* at vs?

-scsibus* at ssh?

+scsibus* at osiop?

sd* at scsibus? target ? lun ?

st* at scsibus? target ? lun ?

diff --git a/sys/arch/mvme88k/conf/files.mvme88k b/sys/arch/mvme88k/conf/files.mvme88k
index 87343c135e9..5f9fcce0556 100644
--- a/sys/arch/mvme88k/conf/files.mvme88k
+++ b/sys/arch/mvme88k/conf/files.mvme88k

@@ -1,4 +1,4 @@

-# $OpenBSD: files.mvme88k,v 1.28 2004/05/07 18:10:26 miod Exp $

+# $OpenBSD: files.mvme88k,v 1.29 2004/05/07 18:12:55 miod Exp $

maxpartitions 16

@@ -54,9 +54,8 @@ major { cd = 6 }

major { rd = 7 }

major { vnd = 8 }

-device ssh: scsi

-attach ssh at pcctwo

-file arch/mvme88k/dev/ssh.c ssh

+attach osiop at pcctwo with osiop_pcctwo

+file arch/mvme88k/dev/osiop_pcctwo.c osiop_pcctwo

device vme { }

attach vme at pcctwo, syscon

diff --git a/sys/arch/mvme88k/dev/osiop_pcctwo.c b/sys/arch/mvme88k/dev/osiop_pcctwo.c
new file mode 100644
index 00000000000..c609d8e46f0
--- /dev/null
+++ b/sys/arch/mvme88k/dev/osiop_pcctwo.c

@@ -0,0 +1,199 @@

+/* $OpenBSD: osiop_pcctwo.c,v 1.1 2004/05/07 18:12:58 miod Exp $ */

+/*

+ *

+ * 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.

+ *

+ * 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.

+ */

+#include <sys/param.h>

+#include <sys/systm.h>

+#include <sys/device.h>

+#include <sys/disklabel.h>

+#include <sys/dkstat.h>

+#include <scsi/scsi_all.h>

+#include <scsi/scsiconf.h>

+#include <machine/bus.h>

+#include <machine/autoconf.h>

+#include <machine/cpu.h>

+#include <machine/bugio.h>

+#include <machine/prom.h>

+#include <dev/ic/osiopreg.h>

+#include <dev/ic/osiopvar.h>

+#include <mvme88k/dev/pcctworeg.h>

+#include <mvme88k/dev/pcctwovar.h>

+void osiop_pcctwo_attach(struct device *, struct device *, void *);

+int osiop_pcctwo_intr(void *);

+int osiop_pcctwo_match(struct device *, void *, void *);

+struct osiop_pcctwo_softc {

+ struct osiop_softc sc_osiop;

+ struct intrhand sc_ih;

+ struct evcnt sc_intrcnt;

+};

+struct cfattach osiop_pcctwo_ca = {

+ sizeof(struct osiop_pcctwo_softc),

+ osiop_pcctwo_match, osiop_pcctwo_attach

+};

+int

+osiop_pcctwo_match(struct device *parent, void *cf, void *aux)

+ struct confargs *ca = aux;

+ bus_space_handle_t ioh;

+ int rc;

+ if (bus_space_map(ca->ca_iot, ca->ca_paddr, OSIOP_NREGS, 0, &ioh) != 0)

+ return 0;

+ rc = badvaddr((vaddr_t)bus_space_vaddr(ca->ca_iot, ioh), 4);

+ bus_space_unmap(ca->ca_iot, ca->ca_paddr, OSIOP_NREGS);

+ if (rc == 0) {

+ bus_space_unmap(ca->ca_iot, ca->ca_paddr, OSIOP_NREGS);

+ return 1;

+ }

+ /*

+ * For some reason, if the SCSI hardware is not ``warmed'' by the

+ * BUG (netboot or boot from external SCSI controller), badvaddr()

+ * will always fail, although the hardware is there.

+ * Since the BUG will do the right thing, we'll defer a dummy read

+ * from the controller and retry.

+ */

+ if (brdtyp == BRD_187 || brdtyp == BRD_8120 || brdtyp == BRD_197) {

+ struct mvmeprom_dskio dio;

+ char buf[MVMEPROM_BLOCK_SIZE];

+#ifdef DEBUG

+ printf("osiop_pcctwo_match: trying to warm up controller\n");

+#endif

+ bzero(&dio, sizeof dio);

+ dio.pbuffer = buf;

+ dio.blk_cnt = 1;

+ bugdiskrd(&dio);

+ rc = badvaddr((vaddr_t)bus_space_vaddr(ca->ca_iot, ioh), 4);

+ }

+ bus_space_unmap(ca->ca_iot, ca->ca_paddr, OSIOP_NREGS);

+ return rc == 0;

+void

+osiop_pcctwo_attach(struct device *parent, struct device *self, void *aux)

+ struct pcctwosoftc *pcctwo = (struct pcctwosoftc *)parent;

+ struct osiop_softc *sc = (struct osiop_softc *)self;

+ struct osiop_pcctwo_softc *psc = (struct osiop_pcctwo_softc *)self;

+ struct confargs *ca = aux;

+ int tmp;

+ extern int cpuspeed;

+ sc->sc_bst = ca->ca_iot;

+ sc->sc_dmat = ca->ca_dmat;

+ if (bus_space_map(sc->sc_bst, ca->ca_paddr, OSIOP_NREGS, 0,

+ &sc->sc_reg) != 0) {

+ printf(": couldn't map I/O ports\n");

+ return;

+ }

+ switch (brdtyp) {

+#ifdef MVME197

+ case BRD_197:

+ sc->sc_clock_freq = cpuspeed;

+ break;

+#endif

+#ifdef MVME187

+ case BRD_187:

+ case BRD_8120:

+ sc->sc_clock_freq = cpuspeed * 2;

+ break;

+#endif

+ default:

+ sc->sc_clock_freq = 50; /* wild guess */

+ break;

+ }

+ sc->sc_dcntl = OSIOP_DCNTL_EA;

+ sc->sc_ctest7 = OSIOP_CTEST7_TT1; /* no snooping */

+ sc->sc_dmode = OSIOP_DMODE_BL4; /* burst length = 4 */

+ sc->sc_flags = 0;

+ sc->sc_id = 7; /* XXX should read from CNFG block in nvram */

+ tmp = bootpart;

+ if (ca->ca_paddr != bootaddr)

+ bootpart = -1; /* never match */

+ osiop_attach(sc);

+ bootpart = tmp;

+ psc->sc_ih.ih_fn = osiop_pcctwo_intr;

+ psc->sc_ih.ih_arg = sc;

+ psc->sc_ih.ih_wantframe = 0;

+ psc->sc_ih.ih_ipl = ca->ca_ipl;

+ /* enable device interrupts */

+ pcctwointr_establish(PCC2V_SCSI, &psc->sc_ih);

+ bus_space_write_1(pcctwo->sc_iot, pcctwo->sc_ioh,

+ PCCTWO_SCSIICR, PCC2_IRQ_IEN | (ca->ca_ipl & PCC2_IRQ_IPL));

+ evcnt_attach(self, "intr", &psc->sc_intrcnt);

+int

+osiop_pcctwo_intr(void *arg)

+ struct osiop_softc *sc = arg;

+ u_int8_t istat;

+ if (sc->sc_flags & OSIOP_INTSOFF)

+ return 0;

+ istat = osiop_read_1(sc, OSIOP_ISTAT);

+ if ((istat & (OSIOP_ISTAT_SIP | OSIOP_ISTAT_DIP)) == 0)

+ return 0;

+ /*

+ * 53c710 manual recommends reading dstat and sstat0 at least

+ * 12 clk cycles apart if reading as bytes (which is what

+ * pcc2 permits). Stick in a 1us delay between accessing dstat and

+ * sstat0 below.

+ *

+ * save interrupt status, DMA status, and SCSI status 0

+ * (may need to deal with stacked interrupts?)

+ */

+ sc->sc_istat = istat;

+ sc->sc_sstat0 = osiop_read_1(sc, OSIOP_SSTAT0);

+ DELAY(25);

+ sc->sc_dstat = osiop_read_1(sc, OSIOP_DSTAT);

+ osiop_intr(sc);

+ return 1;

diff --git a/sys/arch/mvme88k/dev/ssh.c b/sys/arch/mvme88k/dev/ssh.c
deleted file mode 100644
index af797585519..00000000000
--- a/sys/arch/mvme88k/dev/ssh.c
+++ /dev/null

@@ -1,1883 +0,0 @@

-/* $OpenBSD: ssh.c,v 1.27 2004/04/24 19:51:48 miod Exp $ */

-/*

- *

- * This code is derived from software contributed to Berkeley by

- * Van Jacobson of Lawrence Berkeley Laboratory.

- *

- * 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.

- *

- * @(#)ssh.c 7.5 (Berkeley) 5/4/91

- */

-/*

- * 53C710 scsi adaptor driver

- */

-#include <sys/param.h>

-#include <sys/systm.h>

-#include <sys/device.h>

-#include <sys/disklabel.h>

-#include <sys/dkstat.h>

-#include <sys/buf.h>

-#include <sys/malloc.h>

-#include <uvm/uvm_extern.h>

-#include <machine/bus.h>

-#include <machine/autoconf.h>

-#include <machine/cmmu.h>

-#include <machine/pmap.h>

-#include <machine/bugio.h>

-#include <machine/prom.h>

-#include <scsi/scsi_all.h>

-#include <scsi/scsiconf.h>

-#include <mvme88k/dev/sshreg.h>

-#include <mvme88k/dev/sshvar.h>

-#include <mvme88k/dev/pcctworeg.h>

-#include <mvme88k/dev/pcctwovar.h>

-int sshmatch(struct device *, void *, void *);

-void sshattach(struct device *, struct device *, void *);

-int ssh_scsicmd(struct scsi_xfer *);

-struct scsi_adapter ssh_scsiswitch = {

- ssh_scsicmd,

- minphys,

- 0, /* no lun support */

-};

-struct scsi_device ssh_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 ssh_ca = {

- sizeof(struct ssh_softc), sshmatch, sshattach,

-};

-struct cfdriver ssh_cd = {

- NULL, "ssh", DV_DULL,

-};

-void scsi_period_to_ssh(struct ssh_softc *, int);

-void sshabort(struct ssh_softc *, ssh_regmap_p, char *);

-int ssh_checkintr(struct ssh_softc *, u_char, u_char, u_char, int *);

-int ssh_dmaintr(void *);

-void ssh_dump_acb(struct ssh_acb *);

-void ssherror(struct ssh_softc *, ssh_regmap_p, u_char);

-void sshinitialize(struct ssh_softc *);

-int sshintr(struct ssh_softc *);

-int ssh_poll(struct ssh_softc *, struct ssh_acb *);

-void sshreset(struct ssh_softc *);

-void ssh_sched(struct ssh_softc *);

-void ssh_scsidone(struct ssh_acb *, int);

-void ssh_select(struct ssh_softc *);

-void sshsetdelay(int);

-void sshstart(struct ssh_softc *);

-void ssh_start(struct ssh_softc *, int, int, u_char *, int, u_char *, int);

-/* 53C710 script */

-const

-#include <mvme88k/dev/ssh_script.out>

-u_long scsi_nosync = 0;

-int shift_nosync;

-/* default to not inhibit sync negotiation on any drive */

-u_char ssh_inhibit_sync[8] = { 0, 0, 0, 0, 0, 0, 0 }; /* initialize, so patchable */

-u_char ssh_allow_disc[8] = {3, 3, 3, 3, 3, 3, 3, 3};

-int ssh_no_dma = 0;

-int ssh_reset_delay = 250; /* delay after reset, in milleseconds */

-/*

- * SCSI delays

- * In u-seconds, primarily for state changes on the SPC.

- */

-#define SCSI_CMD_WAIT 500000 /* wait per step of 'immediate' cmds */

-#define SCSI_DATA_WAIT 500000 /* wait per data in/out step */

-#define SCSI_INIT_WAIT 500000 /* wait per step (both) during init */

-int ssh_cmd_wait = SCSI_CMD_WAIT;

-int ssh_data_wait = SCSI_DATA_WAIT;

-int ssh_init_wait = SCSI_INIT_WAIT;

-#ifdef DEBUG_SYNC

-/*

- * sync period transfer lookup - only valid for 66MHz clock

- */

-static struct {

- unsigned char p; /* period from sync request message */

- unsigned char r; /* ssh_period << 4 | sbcl */

-} sync_tab[] = {

- { 60/4, 0<<4 | 1},

- { 76/4, 1<<4 | 1},

- { 92/4, 2<<4 | 1},

- { 92/4, 0<<4 | 2},

- {108/4, 3<<4 | 1},

- {116/4, 1<<4 | 2},

- {120/4, 4<<4 | 1},

- {120/4, 0<<4 | 3},

- {136/4, 5<<4 | 1},

- {140/4, 2<<4 | 2},

- {152/4, 6<<4 | 1},

- {152/4, 1<<4 | 3},

- {164/4, 3<<4 | 2},

- {168/4, 7<<4 | 1},

- {180/4, 2<<4 | 3},

- {184/4, 4<<4 | 2},

- {208/4, 5<<4 | 2},

- {212/4, 3<<4 | 3},

- {232/4, 6<<4 | 2},

- {240/4, 4<<4 | 3},

- {256/4, 7<<4 | 2},

- {272/4, 5<<4 | 3},

- {300/4, 6<<4 | 3},

- {332/4, 7<<4 | 3}

-};

-#endif

-#ifdef DEBUG

-/*

- * 0x01 - full debug

- * 0x02 - DMA chaining

- * 0x04 - sshintr

- * 0x08 - phase mismatch

- * 0x10 - <not used>

- * 0x20 - panic on unhandled exceptions

- * 0x100 - disconnect/reselect

- */

-int ssh_debug = 0;

-int sshsync_debug = 0;

-int sshdma_hits = 0;

-int sshdma_misses = 0;

-int sshchain_ints = 0;

-int sshstarts = 0;

-int sshints = 0;

-int sshphmm = 0;

-#define SSH_TRACE_SIZE 128

-#define SSH_TRACE(a,b,c,d) \

- ssh_trbuf[ssh_trix] = (a); \

- ssh_trbuf[ssh_trix+1] = (b); \

- ssh_trbuf[ssh_trix+2] = (c); \

- ssh_trbuf[ssh_trix+3] = (d); \

- ssh_trix = (ssh_trix + 4) & (SSH_TRACE_SIZE - 1);

-u_char ssh_trbuf[SSH_TRACE_SIZE];

-int ssh_trix;

-void ssh_dump(struct ssh_softc *);

-void ssh_dump_trace(void);

-#else

-#define SSH_TRACE(a,b,c,d)

-#endif

-int

-sshmatch(pdp, vcf, args)

- struct device *pdp;

- void *vcf, *args;

- struct confargs *ca = args;

- if (badvaddr(ca->ca_paddr, 4) == 0)

- return (1);

- /*

- * For some reason, if the SCSI hardware is not ``warmed'' by the

- * BUG (netboot or boot from external SCSI controller), badvaddr()

- * will always fail, although the hardware is there.

- * Since the BUG will do the right thing, we'll defer a dummy read

- * from the controller and retry.

- */

- if (brdtyp == BRD_187 || brdtyp == BRD_8120 || brdtyp == BRD_197) {

- struct mvmeprom_dskio dio;

- char buf[MVMEPROM_BLOCK_SIZE];

-#ifdef DEBUG

- printf("sshmatch: trying to warm up controller\n");

-#endif

- bzero(&dio, sizeof dio);

- dio.pbuffer = buf;

- dio.blk_cnt = 1;

- bugdiskrd(&dio);

- if (badvaddr(ca->ca_paddr, 4) == 0)

- return (1);

- }

- return (0);

-void

-sshattach(parent, self, auxp)

- struct device *parent, *self;

- void *auxp;

- struct ssh_softc *sc = (struct ssh_softc *)self;

- struct confargs *ca = auxp;

- ssh_regmap_p rp;

- int tmp;

- extern int cpuspeed;

- sc->sc_sshp = rp = (void *)ca->ca_paddr;

- /*

- * ssh uses sc_clock_freq to define the dcntl & ctest7 reg values

- * (was 0x0221, but i added SSH_CTEST7_SC0 for snooping control)

- * XXX does the clock frequency change for the 33MHz processors?

- */

- sc->sc_clock_freq = cpuspeed * 2;

- sc->sc_dcntl = SSH_DCNTL_EA;

-/*X*/ if (sc->sc_clock_freq <= 25)

-/*X*/ sc->sc_dcntl |= (2 << 6);

-/*X*/ else if (sc->sc_clock_freq <= 37)

-/*X*/ sc->sc_dcntl |= (1 << 6);

-/*X*/ else if (sc->sc_clock_freq <= 50)

-/*X*/ sc->sc_dcntl |= (0 << 6);

-/*X*/ else

-/*X*/ sc->sc_dcntl |= (3 << 6);

- sc->sc_ctest0 = SSH_CTEST0_BTD | SSH_CTEST0_EAN;

- /*

- * MVME187 doesn't implement snooping...

- */

- sc->sc_ctest7 = SSH_CTEST7_TT1;

- sc->sc_link.adapter_softc = sc;

- sc->sc_link.adapter_target = 7; /* XXXX should ask ROM */

- sc->sc_link.adapter = &ssh_scsiswitch;

- sc->sc_link.device = &ssh_scsidev;

- sc->sc_link.openings = 1;

- sc->sc_ih.ih_fn = ssh_dmaintr;

- sc->sc_ih.ih_arg = sc;

- sc->sc_ih.ih_wantframe = 0;

- sc->sc_ih.ih_ipl = ca->ca_ipl;

- sshinitialize(sc); /* XXX move later? */

- pcctwointr_establish(PCC2V_SCSI, &sc->sc_ih);

- /*

- * Disable caching for the softc. Actually, I want to disable cache

- * for acb structures, but they are part of softc, and I am disabling

- * the entire softc just in case.

- */

- pmap_cache_ctrl(pmap_kernel(), trunc_page((vaddr_t)sc),

- round_page((vaddr_t)sc + sizeof(*sc)), CACHE_INH);

- /* enable device interrupts */

- {

- struct pcctwosoftc *pcctwo = (struct pcctwosoftc *)parent;

- bus_space_write_1(pcctwo->sc_iot, pcctwo->sc_ioh,

- PCCTWO_SCSIICR, PCC2_IRQ_IEN | (ca->ca_ipl & PCC2_IRQ_IPL));

- }

- evcnt_attach(&sc->sc_dev, "intr", &sc->sc_intrcnt);

- /*

- * attach all scsi units on us, watching for boot device

- * (see dk_establish).

- */

- tmp = bootpart;

- if (ca->ca_paddr != bootaddr)

- bootpart = -1; /* invalid flag to dk_establish */

- config_found(self, &sc->sc_link, scsiprint);

- bootpart = tmp; /* restore old value */

-int

-ssh_dmaintr(arg)

- void *arg;

- struct ssh_softc *sc = arg;

- ssh_regmap_p rp;

- u_char istat;

- rp = sc->sc_sshp;

- istat = rp->ssh_istat;

- if ((istat & (SSH_ISTAT_SIP | SSH_ISTAT_DIP)) == 0)

- return (0);

- if ((rp->ssh_sien | rp->ssh_dien) == 0)

- return (0); /* no interrupts enabled */

- /*

- * 53c710 manual recommends reading dstat and sstat0 at least

- * 12 clk cycles apart if reading as bytes (which is what

- * pcc2 permits). Stick in a 1us delay between accessing dstat and

- * sstat0 below.

- *

- * save interrupt status, DMA status, and SCSI status 0

- * (may need to deal with stacked interrupts?)

- */

- sc->sc_istat = istat;

- if (istat & SSH_ISTAT_SIP) {

- sc->sc_sstat0 = rp->ssh_sstat0;

- }

- if (istat & SSH_ISTAT_DIP) {

- delay(3);

- sc->sc_dstat = rp->ssh_dstat;

- }

- sshintr(sc);

- sc->sc_intrcnt.ev_count++;

- return (1);

-/*

- * dummy routine to debug while loops

- */

-void wdummy(void);

-void

-wdummy(void)

- static int wcount;

- wcount++;

- if (wcount > 400000) {

- wcount = 0;

- }

-/*

- * used by specific ssh controller

- *

- */

-int

-ssh_scsicmd(xs)

- struct scsi_xfer *xs;

- struct ssh_acb *acb;

- struct ssh_softc *sc;

- struct scsi_link *slp;

- int flags, s;

- slp = xs->sc_link;

- sc = slp->adapter_softc;

- flags = xs->flags;

- xs->error = XS_NOERROR;

- /* XXXX ?? */

- if (flags & SCSI_DATA_UIO)

- panic("ssh: scsi data uio requested");

- /* XXXX ?? */

- if (sc->sc_nexus && flags & SCSI_POLL)

-/* panic("ssh_scsicmd: busy");*/

- printf("ssh_scsicmd: busy\n");

- s = splbio();

- acb = sc->free_list.tqh_first;

- if (acb) {

- TAILQ_REMOVE(&sc->free_list, acb, chain);

- }

- splx(s);

- if (acb == NULL) {

- xs->error = XS_DRIVER_STUFFUP;

- return(TRY_AGAIN_LATER);

- }

- acb->flags = ACB_ACTIVE;

- acb->xs = xs;

- bcopy(xs->cmd, &acb->cmd, xs->cmdlen);

- acb->clen = xs->cmdlen;

- acb->daddr = xs->data;

- acb->dleft = xs->datalen;

- /*

- * Since the 187 doesn't support cache snooping, we have

- * to flush the cache for a write and flush with inval for

- * a read, prior to starting the IO.

- * We should move this ssh_sched() XXX

- */

- if (xs->flags & SCSI_DATA_IN) { /* read */

- dma_cachectl((vaddr_t)xs->data, xs->datalen,

- DMA_CACHE_SYNC_INVAL);

- } else { /* write */

- dma_cachectl((vaddr_t)xs->data, xs->datalen,

- DMA_CACHE_SYNC);

- }

- s = splbio();

- TAILQ_INSERT_TAIL(&sc->ready_list, acb, chain);

- if (sc->sc_nexus == NULL)

- ssh_sched(sc);

- splx(s);

- if (flags & SCSI_POLL || ssh_no_dma)

- return(ssh_poll(sc, acb));

- return(SUCCESSFULLY_QUEUED);

-int

-ssh_poll(sc, acb)

- struct ssh_softc *sc;

- struct ssh_acb *acb;

- ssh_regmap_p rp = sc->sc_sshp;

- struct scsi_xfer *xs = acb->xs;

- int i;

- int status;

- u_char istat;

- u_char dstat;

- u_char sstat0;

- int s;

- int to;

- s = splbio();

- to = xs->timeout / 1000;

- if (sc->nexus_list.tqh_first)

- printf("%s: ssh_poll called with disconnected device\n",

- sc->sc_dev.dv_xname);

- for (;;) {

- /* use cmd_wait values? */

- i = 50000;

- while (((istat = rp->ssh_istat) &

- (SSH_ISTAT_SIP | SSH_ISTAT_DIP)) == 0) {

- if (--i <= 0) {

-#ifdef DEBUG

- printf ("waiting: tgt %d cmd %02x sbcl %02x dsp %x (+%x) dcmd %x ds %x timeout %d\n",

- xs->sc_link->target, acb->cmd.opcode,

- rp->ssh_sbcl, rp->ssh_dsp,

- rp->ssh_dsp - sc->sc_scriptspa,

- *((long *)&rp->ssh_dcmd), &acb->ds, acb->xs->timeout);

-#endif

- i = 50000;

- --to;

- if (to <= 0) {

- sshreset(sc);

- return(COMPLETE);

- }

- delay(10);

- }

- sstat0 = rp->ssh_sstat0;

- delay(10);

- dstat = rp->ssh_dstat;

- if (ssh_checkintr(sc, istat, dstat, sstat0, &status)) {

- if (acb != sc->sc_nexus)

- printf("%s: ssh_poll disconnected device completed\n",

- sc->sc_dev.dv_xname);

- else if ((sc->sc_flags & SSH_INTDEFER) == 0) {

- sc->sc_flags &= ~SSH_INTSOFF;

- rp->ssh_sien = sc->sc_sien;

- rp->ssh_dien = sc->sc_dien;

- }

- ssh_scsidone(sc->sc_nexus, status);

- }

- if (xs->flags & ITSDONE)

- break;

- }

- splx(s);

- return (COMPLETE);

-/*

- * start next command that's ready

- */

-void

-ssh_sched(sc)

- struct ssh_softc *sc;

- struct scsi_link *slp;

- struct ssh_acb *acb;

- int i;

-#ifdef DEBUG

- if (sc->sc_nexus) {

- printf("%s: ssh_sched- nexus %x/%d ready %x/%d\n",

- sc->sc_dev.dv_xname, sc->sc_nexus,

- sc->sc_nexus->xs->sc_link->target,

- sc->ready_list.tqh_first,

- sc->ready_list.tqh_first->xs->sc_link->target);

- return;

- }

-#endif

- for (acb = sc->ready_list.tqh_first; acb; acb = acb->chain.tqe_next) {

- slp = acb->xs->sc_link;

- i = slp->target;

- if(!(sc->sc_tinfo[i].lubusy & (1 << slp->lun))) {

- struct ssh_tinfo *ti = &sc->sc_tinfo[i];

- TAILQ_REMOVE(&sc->ready_list, acb, chain);

- sc->sc_nexus = acb;

- slp = acb->xs->sc_link;

- ti = &sc->sc_tinfo[slp->target];

- ti->lubusy |= (1 << slp->lun);

- break;

- }

- if (acb == NULL) {

-#ifdef DEBUGXXX

- printf("%s: ssh_sched didn't find ready command\n",

- sc->sc_dev.dv_xname);

-#endif

- return;

- }

- if (acb->xs->flags & SCSI_RESET)

- sshreset(sc);

-#if 0

- acb->cmd.bytes[0] |= slp->lun << 5; /* XXXX */

-#endif

- ++sc->sc_active;

- ssh_select(sc);

-void

-ssh_scsidone(acb, stat)

- struct ssh_acb *acb;

- int stat;

- struct scsi_xfer *xs;

- struct scsi_link *slp;

- struct ssh_softc *sc;

- int dosched = 0;

- if (acb == NULL || (xs = acb->xs) == NULL) {

-#ifdef DIAGNOSTIC

- printf("ssh_scsidone: NULL acb or scsi_xfer\n");

-#if defined(DEBUG) && defined(DDB)

- Debugger();

-#endif

- return;

- }

- slp = xs->sc_link;

- sc = slp->adapter_softc;

- /*

- * is this right?

- */

- xs->status = stat;

- if (xs->error == XS_NOERROR && !(acb->flags & ACB_CHKSENSE)) {

- if (stat == SCSI_CHECK) {

- struct scsi_sense *ss = (void *)&acb->cmd;

- bzero(ss, sizeof(*ss));

- ss->opcode = REQUEST_SENSE;

- ss->byte2 = slp->lun << 5;

- ss->length = sizeof(struct scsi_sense_data);

- acb->clen = sizeof(*ss);

- acb->daddr = (char *)&xs->sense;

- acb->dleft = sizeof(struct scsi_sense_data);

- acb->flags = ACB_ACTIVE | ACB_CHKSENSE;

- TAILQ_INSERT_HEAD(&sc->ready_list, acb, chain);

- --sc->sc_active;

- sc->sc_tinfo[slp->target].lubusy &=

- ~(1 << slp->lun);

- sc->sc_tinfo[slp->target].senses++;

- if (sc->sc_nexus == acb) {

- sc->sc_nexus = NULL;

- ssh_sched(sc);

- }

- SSH_TRACE('d','s',0,0)

- return;

- }

- if (xs->error == XS_NOERROR && (acb->flags & ACB_CHKSENSE)) {

- xs->error = XS_SENSE;

- } else {

- xs->resid = 0; /* XXXX */

- }

-#if whataboutthisone

- case SCSI_BUSY:

- xs->error = XS_BUSY;

- break;

-#endif

- xs->flags |= ITSDONE;

- /*

- * Remove the ACB from whatever queue it's on. We have to do a bit of

- * a hack to figure out which queue it's on. Note that it is *not*

- * necessary to cdr down the ready queue, but we must cdr down the

- * nexus queue and see if it's there, so we can mark the unit as no

- * longer busy. This code is sickening, but it works.

- */

- if (acb == sc->sc_nexus) {

- sc->sc_nexus = NULL;

- sc->sc_tinfo[slp->target].lubusy &= ~(1<<slp->lun);

- if (sc->ready_list.tqh_first)

- dosched = 1; /* start next command */

- --sc->sc_active;

- SSH_TRACE('d','a',stat,0)

- } else if (sc->ready_list.tqh_last == &acb->chain.tqe_next) {

- TAILQ_REMOVE(&sc->ready_list, acb, chain);

- SSH_TRACE('d','r',stat,0)

- } else {

- struct ssh_acb *acb2;

- for (acb2 = sc->nexus_list.tqh_first; acb2;

- acb2 = acb2->chain.tqe_next)

- if (acb2 == acb) {

- TAILQ_REMOVE(&sc->nexus_list, acb, chain);

- sc->sc_tinfo[slp->target].lubusy

- &= ~(1<<slp->lun);

- --sc->sc_active;

- break;

- }

- if (acb2)

- ;

- else if (acb->chain.tqe_next) {

- TAILQ_REMOVE(&sc->ready_list, acb, chain);

- --sc->sc_active;

- } else {

- printf("%s: can't find matching acb\n",

- sc->sc_dev.dv_xname);

-#ifdef DDB

-/* Debugger(); */

-#endif

- }

- SSH_TRACE('d','n',stat,0);

- }

- /* Put it on the free list. */

- acb->flags = ACB_FREE;

- TAILQ_INSERT_HEAD(&sc->free_list, acb, chain);

- sc->sc_tinfo[slp->target].cmds++;

- scsi_done(xs);

- if (dosched && sc->sc_nexus == NULL)

- ssh_sched(sc);

-void

-sshabort(sc, rp, where)

- struct ssh_softc *sc;

- ssh_regmap_p rp;

- char *where;

-#ifdef fix_this

- int i;

-#endif

- printf ("%s: abort %s: dstat %02x, sstat0 %02x sbcl %02x\n",

- sc->sc_dev.dv_xname,

- where, rp->ssh_dstat, rp->ssh_sstat0, rp->ssh_sbcl);

- if (sc->sc_active > 0) {

-#ifdef TODO

- SET_SBIC_cmd (rp, SBIC_CMD_ABORT);

- WAIT_CIP (rp);

- GET_SBIC_asr (rp, asr);

- if (asr & (SBIC_ASR_BSY|SBIC_ASR_LCI))

- {

- /* ok, get more drastic.. */

- SET_SBIC_cmd (rp, SBIC_CMD_RESET);

- delay(25);

- SBIC_WAIT(rp, SBIC_ASR_INT, 0);

- GET_SBIC_csr (rp, csr); /* clears interrupt also */

- return;

- }

- do

- {

- SBIC_WAIT (rp, SBIC_ASR_INT, 0);

- GET_SBIC_csr (rp, csr);

- }

- while ((csr != SBIC_CSR_DISC) && (csr != SBIC_CSR_DISC_1)

- && (csr != SBIC_CSR_CMD_INVALID));

-#endif

- /* lets just hope it worked.. */

-#ifdef fix_this

- for (i = 0; i < 2; ++i) {

- if (sc->sc_iob[i].sc_xs && &sc->sc_iob[i] !=

- sc->sc_cur) {

- printf ("sshabort: cleanup!\n");

- sc->sc_iob[i].sc_xs = NULL;

- }

-#endif /* fix_this */

-/* sc->sc_active = 0; */

- }

-void

-sshinitialize(sc)

- struct ssh_softc *sc;

- /*

- * Need to check that scripts is on a long word boundary

- * Also should verify that dev doesn't span non-contiguous

- * physical pages.

- */

- sc->sc_scriptspa = kvtop((vaddr_t)scripts);

- /*

- * malloc sc_acb to ensure that DS is on a long word boundary.

- */

- MALLOC(sc->sc_acb, struct ssh_acb *,

- sizeof(struct ssh_acb) * SSH_NACB, M_DEVBUF, M_NOWAIT);

- if (sc->sc_acb == NULL)

- panic("sshinitialize: ACB malloc failed!");

- sc->sc_tcp[1] = 1000 / sc->sc_clock_freq;

- sc->sc_tcp[2] = 1500 / sc->sc_clock_freq;

- sc->sc_tcp[3] = 2000 / sc->sc_clock_freq;

- sc->sc_minsync = sc->sc_tcp[1]; /* in 4ns units */

- if (sc->sc_minsync < 25)

- sc->sc_minsync = 25;

-#if not_used

- if (sc->sc_clock_freq <= 25)

- sc->sc_tcp[0] = sc->sc_tcp[1];

- else if (sc->sc_clock_freq <= 37)

- sc->sc_tcp[0] = sc->sc_tcp[2];

- else if (sc->sc_clock_freq <= 50)

- sc->sc_tcp[0] = sc->sc_tcp[3];

- else

- sc->sc_tcp[0] = 3000 / sc->sc_clock_freq;

-#endif

- sshreset(sc);

-void

-sshreset(sc)

- struct ssh_softc *sc;

- ssh_regmap_p rp;

- u_int i, s;

- u_char dummy;

- struct ssh_acb *acb;

- rp = sc->sc_sshp;

- if (sc->sc_flags & SSH_ALIVE)

- sshabort(sc, rp, "reset");

- s = splbio();

- /*

- * Reset the chip

- * XXX - is this really needed?

- */

- rp->ssh_istat |= SSH_ISTAT_ABRT; /* abort current script */

- rp->ssh_istat |= SSH_ISTAT_RST; /* reset chip */

- rp->ssh_istat &= ~SSH_ISTAT_RST;

- /*

- * Reset SCSI bus (do we really want this?)

- */

- rp->ssh_sien = 0;

- rp->ssh_scntl1 |= SSH_SCNTL1_RST;

- delay(25);

- rp->ssh_scntl1 &= ~SSH_SCNTL1_RST;

- /*

- * Set up various chip parameters

- */

- rp->ssh_scntl0 = SSH_ARB_FULL | SSH_SCNTL0_EPC | SSH_SCNTL0_EPG;

- rp->ssh_scntl1 = SSH_SCNTL1_ESR;

- rp->ssh_dcntl = sc->sc_dcntl;

- rp->ssh_dmode = 0x80; /* burst length = 4 */

- rp->ssh_sien = 0x00; /* don't enable interrupts yet */

- rp->ssh_dien = 0x00; /* don't enable interrupts yet */

- rp->ssh_scid = 1 << sc->sc_link.adapter_target;

- rp->ssh_dwt = 0x00;

- rp->ssh_ctest0 |= SSH_CTEST0_BTD | SSH_CTEST0_EAN;

- rp->ssh_ctest7 = sc->sc_ctest7;

- /* will need to re-negotiate sync xfers */

- bzero(&sc->sc_sync, sizeof (sc->sc_sync));

- i = rp->ssh_istat;

- if (i & SSH_ISTAT_SIP)

- dummy = rp->ssh_sstat0;

- delay(1);

- if (i & SSH_ISTAT_DIP)

- dummy = rp->ssh_dstat;

- splx (s);

- delay (ssh_reset_delay * 1000);

- printf(": version %d target %d\n", rp->ssh_ctest8 >> 4,

- sc->sc_link.adapter_target);

- if ((sc->sc_flags & SSH_ALIVE) == 0) {

- TAILQ_INIT(&sc->ready_list);

- TAILQ_INIT(&sc->nexus_list);

- TAILQ_INIT(&sc->free_list);

- sc->sc_nexus = NULL;

- acb = sc->sc_acb;

- bzero(acb, sizeof(struct ssh_acb) * SSH_NACB);

- for (i = 0; i < SSH_NACB; i++) {

- pmap_cache_ctrl(pmap_kernel(),

- trunc_page((vaddr_t)acb),

- round_page((vaddr_t)acb + sizeof(*acb)),

- CACHE_INH);

- TAILQ_INSERT_TAIL(&sc->free_list, acb, chain);

- acb++;

- }

- bzero(sc->sc_tinfo, sizeof(sc->sc_tinfo));

- } else {

- if (sc->sc_nexus != NULL) {

- sc->sc_nexus->xs->error = XS_DRIVER_STUFFUP;

- ssh_scsidone(sc->sc_nexus, sc->sc_nexus->stat[0]);

- }

- while ((acb = sc->nexus_list.tqh_first) != NULL) {

- acb->xs->error = XS_DRIVER_STUFFUP;

- ssh_scsidone(acb, acb->stat[0]);

- }

- sc->sc_flags |= SSH_ALIVE;

- sc->sc_flags &= ~(SSH_INTDEFER|SSH_INTSOFF);

- /* enable SCSI and DMA interrupts */

- /* XXX turn on SEL interrupt? nivas */

- sc->sc_sien = SSH_SIEN_M_A | SSH_SIEN_STO | /*SSH_SIEN_SEL |*/ SSH_SIEN_SGE |

- SSH_SIEN_UDC | SSH_SIEN_RST | SSH_SIEN_PAR;

- sc->sc_dien = SSH_DIEN_BF | SSH_DIEN_ABRT | SSH_DIEN_SIR |

- /*SSH_DIEN_WTD |*/ SSH_DIEN_IID;

- rp->ssh_sien = sc->sc_sien;

- rp->ssh_dien = sc->sc_dien;

-/*

- * Setup Data Storage for 53C710 and start SCRIPTS processing

- */

-void

-ssh_start (sc, target, lun, cbuf, clen, buf, len)

- struct ssh_softc *sc;

- int target;

- int lun;

- u_char *cbuf;

- int clen;

- u_char *buf;

- int len;

- ssh_regmap_p rp = sc->sc_sshp;

- int nchain;

- int count, tcount;

- char *addr, *dmaend;

- struct ssh_acb *acb = sc->sc_nexus;

-#ifdef DEBUG

- if (ssh_debug & 0x100 && rp->ssh_sbcl & SSH_BSY) {

- printf ("ACK! ssh was busy: rp %x script %x dsa %x active %d\n",

- rp, &scripts, &acb->ds, sc->sc_active);

- printf ("istat %02x sfbr %02x lcrc %02x sien %02x dien %02x\n",

- rp->ssh_istat, rp->ssh_sfbr, rp->ssh_lcrc,

- rp->ssh_sien, rp->ssh_dien);

-#ifdef DDB

- /*Debugger();*/

-#endif

- }

-#endif

- acb->msgout[0] = MSG_IDENTIFY | lun;

- if (ssh_allow_disc[target] & 2 ||

- (ssh_allow_disc[target] && len == 0))

- acb->msgout[0] = MSG_IDENTIFY_DR | lun;

- acb->status = 0;

- acb->stat[0] = -1;

- acb->msg[0] = -1;

- acb->ds.scsi_addr = (0x10000 << target) | (sc->sc_sync[target].sxfer << 8);

- acb->ds.idlen = 1;

- acb->ds.idbuf = (char *) kvtop((vaddr_t)&acb->msgout[0]);

- acb->ds.cmdlen = clen;

- acb->ds.cmdbuf = (char *) kvtop((vaddr_t)cbuf);

- acb->ds.stslen = 1;

- acb->ds.stsbuf = (char *) kvtop((vaddr_t)&acb->stat[0]);

- acb->ds.msglen = 1;

- acb->ds.msgbuf = (char *) kvtop((vaddr_t)&acb->msg[0]);

- acb->msg[1] = -1;

- acb->ds.msginlen = 1;

- acb->ds.extmsglen = 1;

- acb->ds.synmsglen = 3;

- acb->ds.msginbuf = (char *) kvtop((vaddr_t)&acb->msg[1]);

- acb->ds.extmsgbuf = (char *) kvtop((vaddr_t)&acb->msg[2]);

- acb->ds.synmsgbuf = (char *) kvtop((vaddr_t)&acb->msg[3]);

- bzero(&acb->ds.chain, sizeof (acb->ds.chain));

- if (sc->sc_sync[target].state == SYNC_START) {

- if (ssh_inhibit_sync[target]) {

- sc->sc_sync[target].state = SYNC_DONE;

- sc->sc_sync[target].sbcl = 0;

- sc->sc_sync[target].sxfer = 0;

-#ifdef DEBUG

- if (sshsync_debug)

- printf ("Forcing target %d asynchronous\n", target);

-#endif

- }

- else {

- acb->msg[2] = -1;

- acb->msgout[1] = MSG_EXT_MESSAGE;

- acb->msgout[2] = 3;

- acb->msgout[3] = MSG_SYNC_REQ;

-#ifdef MAXTOR_SYNC_KLUDGE

- acb->msgout[4] = 50 / 4; /* ask for ridiculous period */

-#else

- acb->msgout[4] = sc->sc_minsync;

-#endif

- acb->msgout[5] = SSH_MAX_OFFSET;

- acb->ds.idlen = 6;

- sc->sc_sync[target].state = SYNC_SENT;

-#ifdef DEBUG

- if (sshsync_debug)

- printf ("Sending sync request to target %d\n", target);

-#endif

- }

-/*

- * Build physical DMA addresses for scatter/gather I/O

- */

- acb->iob_buf = buf;

- acb->iob_len = len;

- acb->iob_curbuf = acb->iob_curlen = 0;

- nchain = 0;

- count = len;

- addr = buf;

- dmaend = NULL;

- while (count > 0) {

- acb->ds.chain[nchain].databuf = (char *) kvtop((vaddr_t)addr);

- if (count < (tcount = NBPG - ((int) addr & PGOFSET)))

- tcount = count;

- acb->ds.chain[nchain].datalen = tcount;

- addr += tcount;

- count -= tcount;

- if (acb->ds.chain[nchain].databuf == dmaend) {

- dmaend += acb->ds.chain[nchain].datalen;

- acb->ds.chain[nchain].datalen = 0;

- acb->ds.chain[--nchain].datalen += tcount;

-#ifdef DEBUG

- ++sshdma_hits;

-#endif

- }

- else {

- dmaend = acb->ds.chain[nchain].databuf +

- acb->ds.chain[nchain].datalen;

- acb->ds.chain[nchain].datalen = tcount;

-#ifdef DEBUG

- if (nchain) /* Don't count miss on first one */

- ++sshdma_misses;

-#endif

- }

- ++nchain;

- }

-#ifdef DEBUG

- if (nchain != 1 && len != 0 && ssh_debug & 3) {

- int i;

- printf ("DMA chaining set: %d\n", nchain);

- for (i = 0; i < nchain; ++i) {

- printf (" [%d] %8x %4x\n", i, acb->ds.chain[i].databuf,

- acb->ds.chain[i].datalen);

- }

-#endif

- dma_cachectl((vaddr_t)cbuf, clen, DMA_CACHE_SYNC);

- /*

- * Flushing the buf from data cache is very important for MVME187

- * since the board does not snoop the local bus.

- * We have to flush the cache for a write and flush with inval for

- * a read.

- */

- if (buf != NULL && len != 0) {

- if (acb->xs->flags & SCSI_DATA_IN) { /* read */

- dma_cachectl((vaddr_t)buf, len,

- DMA_CACHE_SYNC_INVAL);

- } else { /* write */

- dma_cachectl((vaddr_t)buf, len, DMA_CACHE_SYNC);

- }

-#ifdef DEBUG

- if (ssh_debug & 0x100 && rp->ssh_sbcl & SSH_BSY) {

- printf ("ACK! ssh was busy at start: rp %x script %x dsa %x active %d\n",

- rp, &scripts, &acb->ds, sc->sc_active);

-#ifdef DDB

- /*Debugger();*/

-#endif

- }

-#endif

- if (sc->nexus_list.tqh_first == NULL) {

- if (rp->ssh_istat & SSH_ISTAT_CON)

- printf("%s: ssh_select while connected?\n",

- sc->sc_dev.dv_xname);

- rp->ssh_temp = 0;

- rp->ssh_sbcl = sc->sc_sync[target].sbcl;

- rp->ssh_dsa = kvtop((vaddr_t)&acb->ds);

- rp->ssh_dsp = sc->sc_scriptspa;

- SSH_TRACE('s',1,0,0)

- } else {

- /*

- * SSH is waiting for a reselect. If it is not

- * yet connected to the BUS, signal to change state.

- * Else, leave it alone - later on, the reselect interrupt

- * will take care of this request.

- */

- if ((rp->ssh_istat & SSH_ISTAT_CON) == 0) {

- rp->ssh_istat = SSH_ISTAT_SIGP;

- SSH_TRACE('s',2,0,0);

- }

- else {

- SSH_TRACE('s',3,rp->ssh_istat,0);

- }

-#ifdef DEBUG

- ++sshstarts;

-#endif

-/*

- * Process a DMA or SCSI interrupt from the 53C710 SSH

- */

-int

-ssh_checkintr(sc, istat, dstat, sstat0, status)

- struct ssh_softc *sc;

- u_char istat;

- u_char dstat;

- u_char sstat0;

- int *status;

- ssh_regmap_p rp = sc->sc_sshp;

- struct ssh_acb *acb = sc->sc_nexus;

- int target = 0;

- int dfifo, dbc, sstat1;

-#ifdef DEBUG

- int dummy;

-#endif

- dfifo = rp->ssh_dfifo;

- dbc = rp->ssh_dbc0;

- sstat1 = rp->ssh_sstat1;

- /*

- * Flush DMA and SCSI FIFOs.

- */

- rp->ssh_ctest8 |= SSH_CTEST8_CLF;

- while ((rp->ssh_ctest1 & SSH_CTEST1_FMT) != SSH_CTEST1_FMT){

- wdummy();

- }

- ;

- rp->ssh_ctest8 &= ~SSH_CTEST8_CLF;

-#ifdef DEBUG

- ++sshints;

-#if 0

- if (ssh_debug & 0x100) {

- DCIAS(&acb->stat[0]); /* XXX */

- printf ("sshchkintr: istat %x dstat %x sstat0 %x dsps %x sbcl %x sts %x msg %x\n",

- istat, dstat, sstat0, rp->ssh_dsps, rp->ssh_sbcl, acb->stat[0], acb->msg[0]);

- printf ("sync msg in: %02x %02x %02x %02x %02x %02x\n",

- acb->msg[0], acb->msg[1], acb->msg[2],

- acb->msg[3], acb->msg[4], acb->msg[5]);

- }

-#endif

- if (rp->ssh_dsp && (rp->ssh_dsp < sc->sc_scriptspa ||

- rp->ssh_dsp >= sc->sc_scriptspa + sizeof(scripts))) {

- printf ("%s: dsp not within script dsp %x scripts %x:%x",

- sc->sc_dev.dv_xname, rp->ssh_dsp, sc->sc_scriptspa,

- sc->sc_scriptspa + sizeof(scripts));

- printf(" istat %x dstat %x sstat0 %x\n",

- istat, dstat, sstat0);

-#ifdef DDB

- Debugger();

-#endif

- }

-#endif

- SSH_TRACE('i',dstat,istat,(istat&SSH_ISTAT_DIP)?rp->ssh_dsps&0xff:sstat0);

- if (dstat & SSH_DSTAT_SIR && rp->ssh_dsps == 0xff00) {

- /* Normal completion status, or check condition */

-#ifdef DEBUG

- if (rp->ssh_dsa != kvtop((vaddr_t)&acb->ds)) {

- printf ("ssh: invalid dsa: %x %x\n", rp->ssh_dsa,

- kvtop((vaddr_t)&acb->ds));

- panic("*** ssh DSA invalid ***");

- }

-#endif

- if (acb == NULL) {

- printf("%s: Command complete with no active command?\n",

- sc->sc_dev.dv_xname);

- return (0);

- }

- target = acb->xs->sc_link->target;

- if (sc->sc_sync[target].state == SYNC_SENT) {

-#ifdef DEBUG

- if (sshsync_debug)

- printf ("sync msg in: %02x %02x %02x %02x %02x %02x\n",

- acb->msg[0], acb->msg[1], acb->msg[2],

- acb->msg[3], acb->msg[4], acb->msg[5]);

-#endif

- if (acb->msg[1] == 0xff)

- printf ("%s: target %d ignored sync request\n",

- sc->sc_dev.dv_xname, target);

- else if (acb->msg[1] == MSG_REJECT)

- printf ("%s: target %d rejected sync request\n",

- sc->sc_dev.dv_xname, target);

- sc->sc_sync[target].state = SYNC_DONE;

- sc->sc_sync[target].sxfer = 0;

- sc->sc_sync[target].sbcl = 0;

- if (acb->msg[2] == 3 &&

- acb->msg[3] == MSG_SYNC_REQ &&

- acb->msg[5] != 0) {

-#ifdef MAXTOR_KLUDGE

- /*

- * Kludge for my Maxtor XT8580S

- * It accepts whatever we request, even

- * though it won't work. So we ask for

- * a short period than we can handle. If

- * the device says it can do it, use 208ns.

- * If the device says it can do less than

- * 100ns, then we limit it to 100ns.

- */

- if (acb->msg[4] && acb->msg[4] < 100 / 4) {

-#ifdef DEBUG

- printf ("%d: target %d wanted %dns period\n",

- sc->sc_dev.dv_xname, target,

- acb->msg[4] * 4);

-#endif

- if (acb->msg[4] == 50 / 4)

- acb->msg[4] = 208 / 4;

- else

- acb->msg[4] = 100 / 4;

- }

-#endif /* MAXTOR_KLUDGE */

- printf ("%s: target %d now synchronous, period=%dns, offset=%d\n",

- sc->sc_dev.dv_xname, target,

- acb->msg[4] * 4, acb->msg[5]);

- scsi_period_to_ssh (sc, target);

- }

- *status = acb->stat[0];

-#ifdef DEBUG

- if (rp->ssh_sbcl & SSH_BSY) {

- /*printf ("ACK! ssh was busy at end: rp %x script %x dsa %x\n",

- rp, &scripts, &acb->ds);*/

-#ifdef DDB

- /*Debugger();*/

-#endif

- }

- if (acb->msg[0] != 0x00)

- printf("%s: message was not COMMAND COMPLETE: %x\n",

- sc->sc_dev.dv_xname, acb->msg[0]);

-#endif

- if (sc->nexus_list.tqh_first)

- rp->ssh_dcntl |= SSH_DCNTL_STD;

- return 1;

- }

- if (sstat0 & SSH_SSTAT0_M_A) { /* Phase mismatch */

-#ifdef DEBUG

- ++sshphmm;

- if (acb == NULL)

- printf("%s: Phase mismatch with no active command?\n",

- sc->sc_dev.dv_xname);

-#endif

- if (acb->iob_len) {

- int adjust;

- adjust = ((dfifo - (dbc & 0x7f)) & 0x7f);

- if (sstat1 & SSH_SSTAT1_ORF)

- ++adjust;

- if (sstat1 & SSH_SSTAT1_OLF)

- ++adjust;

- acb->iob_curlen = *((long *)&rp->ssh_dcmd) & 0xffffff;

- acb->iob_curlen += adjust;

- acb->iob_curbuf = *((long *)&rp->ssh_dnad) - adjust;

-#ifdef DEBUG

- if (ssh_debug & 0x100) {

- int i;

- printf ("Phase mismatch: curbuf %x curlen %x dfifo %x dbc %x sstat1 %x adjust %x sbcl %x starts %d acb %x\n",

- acb->iob_curbuf, acb->iob_curlen, dfifo,

- dbc, sstat1, adjust, rp->ssh_sbcl, sshstarts, acb);

- if (acb->ds.chain[1].datalen) {

- for (i = 0; acb->ds.chain[i].datalen; ++i)

- printf("chain[%d] addr %x len %x\n",

- i, acb->ds.chain[i].databuf,

- acb->ds.chain[i].datalen);

- }

-#endif

-#if 0

- dma_cachectl (acb, sizeof(*acb), DMA_CACHE_SYNC));

-#endif

- }

-#ifdef DEBUG

- SSH_TRACE('m',rp->ssh_sbcl,(rp->ssh_dsp>>8),rp->ssh_dsp);

- if (ssh_debug & 9)

- printf ("Phase mismatch: %x dsp +%x dcmd %x\n",

- rp->ssh_sbcl,

- rp->ssh_dsp - sc->sc_scriptspa,

- *((long *)&rp->ssh_dcmd));

-#endif

- if ((rp->ssh_sbcl & SSH_REQ) == 0) {

- printf ("Phase mismatch: REQ not asserted! %02x dsp %lx\n",

- rp->ssh_sbcl, rp->ssh_dsp);

-#ifdef DEBUG

- Debugger();

-#endif

- }

- switch (rp->ssh_sbcl & 7) {

- case 0: /* data out */

- case 1: /* data in */

- case 2: /* status */

- case 3: /* command */

- case 6: /* message in */

- case 7: /* message out */

- rp->ssh_dsp = sc->sc_scriptspa + Ent_switch;

- break;

- default:

- goto bad_phase;

- }

- return 0;

- }

- if (sstat0 & SSH_SSTAT0_STO) { /* Select timed out */

-#ifdef DEBUG

- if (acb == NULL)

- printf("%s: Select timeout with no active command?\n",

- sc->sc_dev.dv_xname);

- if (rp->ssh_sbcl & SSH_BSY) {

- printf ("ACK! ssh was busy at timeout: rp %x script %x dsa %x\n",

- rp, &scripts, &acb->ds);

- printf(" sbcl %x sdid %x istat %x dstat %x sstat0 %x\n",

- rp->ssh_sbcl, rp->ssh_sdid, istat, dstat, sstat0);

- if (!(rp->ssh_sbcl & SSH_BSY)) {

- printf ("Yikes, it's not busy now!\n");

-#if 0

- *status = -1;

- if (sc->nexus_list.tqh_first)

- rp->ssh_dsp = sc->sc_scriptspa + Ent_wait_reselect;

- return 1;

-#endif

- }

-/* rp->ssh_dcntl |= SSH_DCNTL_STD;*/

- return (0);

-#ifdef DDB

- Debugger();

-#endif

- }

-#endif

- *status = -1;

- if (acb != NULL)

- acb->xs->error = XS_SELTIMEOUT;

- if (sc->nexus_list.tqh_first)

- rp->ssh_dsp = sc->sc_scriptspa + Ent_wait_reselect;

- return 1;

- }

- if (acb)

- target = acb->xs->sc_link->target;

- else

- target = 7;

- if (sstat0 & SSH_SSTAT0_UDC) {

-#ifdef DEBUG

- if (acb == NULL)

- printf("%s: Unexpected disconnect with no active command?\n",

- sc->sc_dev.dv_xname);

- printf ("%s: target %d disconnected unexpectedly\n",

- sc->sc_dev.dv_xname, target);

-#endif

-#if 0

- sshabort (sc, rp, "sshchkintr");

-#endif

- *status = STS_BUSY;

- if (sc->nexus_list.tqh_first)

- rp->ssh_dsp = sc->sc_scriptspa + Ent_wait_reselect;

- return 1;

- }

- if (dstat & SSH_DSTAT_SIR && (rp->ssh_dsps == 0xff01 ||

- rp->ssh_dsps == 0xff02)) {

-#ifdef DEBUG

- if (ssh_debug & 0x100)

- printf ("%s: ID %02x disconnected TEMP %x (+%x) curbuf %x curlen %x buf %x len %x dfifo %x dbc %x sstat1 %x starts %d acb %x\n",

- sc->sc_dev.dv_xname, 1 << target, rp->ssh_temp,

- rp->ssh_temp ? rp->ssh_temp - sc->sc_scriptspa : 0,

- acb->iob_curbuf, acb->iob_curlen,

- acb->ds.chain[0].databuf, acb->ds.chain[0].datalen, dfifo, dbc, sstat1, sshstarts, acb);

-#endif

- if (acb == NULL) {

- printf("%s: Disconnect with no active command?\n",

- sc->sc_dev.dv_xname);

- return (0);

- }

- /*

- * XXXX need to update iob_curbuf/iob_curlen to reflect

- * current data transferred. If device disconnected in

- * the middle of a DMA block, they should already be set

- * by the phase change interrupt. If the disconnect

- * occurs on a DMA block boundary, we have to figure out

- * which DMA block it was.

- */

- if (acb->iob_len && rp->ssh_temp) {

- int n = rp->ssh_temp - sc->sc_scriptspa;

- if (acb->iob_curlen && acb->iob_curlen != acb->ds.chain[0].datalen)

- printf("%s: iob_curbuf/len already set? n %x iob %lx/%lx chain[0] %p/%lx\n",

- sc->sc_dev.dv_xname, n, acb->iob_curbuf, acb->iob_curlen,

- acb->ds.chain[0].databuf, acb->ds.chain[0].datalen);

- if (n < Ent_datain)

- n = (n - Ent_dataout) / 16;

- else

- n = (n - Ent_datain) / 16;

- if (n <= 0 || n >= DMAMAXIO)

- printf("TEMP invalid %d\n", n);

- else {

- acb->iob_curbuf = (u_long)acb->ds.chain[n].databuf;

- acb->iob_curlen = acb->ds.chain[n].datalen;

- }

-#ifdef DEBUG

- if (ssh_debug & 0x100) {

- printf("%s: TEMP offset %d", sc->sc_dev.dv_xname, n);

- printf(" curbuf %x curlen %x\n", acb->iob_curbuf,

- acb->iob_curlen);

- }

-#endif

- }

- /*

- * If data transfer was interrupted by disconnect, iob_curbuf

- * and iob_curlen should reflect the point of interruption.

- * Adjust the DMA chain so that the data transfer begins

- * at the appropriate place upon reselection.

- * XXX This should only be done on save data pointer message?

- */

- if (acb->iob_curlen) {

- int i, j;

-#ifdef DEBUG

- if (ssh_debug & 0x100)

- printf ("%s: adjusting DMA chain\n",

- sc->sc_dev.dv_xname);

- if (rp->ssh_dsps == 0xff02)

- printf ("%s: ID %02x disconnected without Save Data Pointers\n",

- sc->sc_dev.dv_xname, 1 << target);

-#endif

- for (i = 0; i < DMAMAXIO; ++i) {

- if (acb->ds.chain[i].datalen == 0)

- break;

- if (acb->iob_curbuf >= (long)acb->ds.chain[i].databuf &&

- acb->iob_curbuf < (long)(acb->ds.chain[i].databuf +

- acb->ds.chain[i].datalen))

- break;

- }

- if (i >= DMAMAXIO || acb->ds.chain[i].datalen == 0)

- printf("couldn't find saved data pointer\n");

-#ifdef DEBUG

- if (ssh_debug & 0x100)

- printf(" chain[0]: %x/%x -> %x/%x\n",

- acb->ds.chain[0].databuf,

- acb->ds.chain[0].datalen,

- acb->iob_curbuf,

- acb->iob_curlen);

-#endif

- acb->ds.chain[0].databuf = (char *)acb->iob_curbuf;

- acb->ds.chain[0].datalen = acb->iob_curlen;

- for (j = 1, ++i; i < DMAMAXIO && acb->ds.chain[i].datalen; ++i, ++j) {

-#ifdef DEBUG

- if (ssh_debug & 0x100)

- printf(" chain[%d]: %x/%x -> %x/%x\n", j,

- acb->ds.chain[j].databuf,

- acb->ds.chain[j].datalen,

- acb->ds.chain[i].databuf,

- acb->ds.chain[i].datalen);

-#endif

- acb->ds.chain[j].databuf = acb->ds.chain[i].databuf;

- acb->ds.chain[j].datalen = acb->ds.chain[i].datalen;

- }

- if (j < DMAMAXIO)

- acb->ds.chain[j].datalen = 0;

- }

- ++sc->sc_tinfo[target].dconns;

- /*

- * add nexus to waiting list

- * clear nexus

- * try to start another command for another target/lun

- */

- acb->status = sc->sc_flags & SSH_INTSOFF;

- TAILQ_INSERT_HEAD(&sc->nexus_list, acb, chain);

- sc->sc_nexus = NULL; /* no current device */

- /* start script to wait for reselect */

- if (sc->sc_nexus == NULL)

- rp->ssh_dsp = sc->sc_scriptspa + Ent_wait_reselect;

-/* XXXX start another command ? */

- if (sc->ready_list.tqh_first)

- ssh_sched(sc);

- return (0);

- }

- if (dstat & SSH_DSTAT_SIR && rp->ssh_dsps == 0xff03) {

- int reselid = rp->ssh_scratch & 0x7f;

- int reselun = rp->ssh_sfbr & 0x07;

- sc->sc_sstat1 = rp->ssh_sbcl; /* XXXX save current SBCL */

-#ifdef DEBUG

- if (ssh_debug & 0x100)

- printf ("%s: target ID %02x reselected dsps %x\n",

- sc->sc_dev.dv_xname, reselid,

- rp->ssh_dsps);

- if ((rp->ssh_sfbr & 0x80) == 0)

- printf("%s: Reselect message in was not identify: %x\n",

- sc->sc_dev.dv_xname, rp->ssh_sfbr);

-#endif

- /*

- * If we were trying to start a command when the reselect

- * occurred, need to put it at the head of the ready list,

- * mark target/lun unbusy and decrement sc_active count.

- */

- if (sc->sc_nexus) {

-#ifdef DEBUG

- if (ssh_debug & 0x100)

- printf ("%s: reselect ID %02x w/active\n",

- sc->sc_dev.dv_xname, reselid);

-#endif

- TAILQ_INSERT_HEAD(&sc->ready_list, sc->sc_nexus, chain);

- sc->sc_tinfo[sc->sc_nexus->xs->sc_link->target].lubusy

- &= ~(1 << sc->sc_nexus->xs->sc_link->lun);

- --sc->sc_active;

- }

- /*

- * locate acb of reselecting device

- * set sc->sc_nexus to acb

- */

- for (acb = sc->nexus_list.tqh_first; acb;

- acb = acb->chain.tqe_next) {

- if (reselid != (acb->ds.scsi_addr >> 16) ||

- reselun != (acb->msgout[0] & 0x07))

- continue;

- TAILQ_REMOVE(&sc->nexus_list, acb, chain);

- sc->sc_nexus = acb;

- sc->sc_flags |= acb->status;

- acb->status = 0;

- rp->ssh_dsa = kvtop((vaddr_t)&acb->ds);

- rp->ssh_sxfer = sc->sc_sync[acb->xs->sc_link->target].sxfer;

- rp->ssh_sbcl = sc->sc_sync[acb->xs->sc_link->target].sbcl;

- break;

- }

- if (acb == NULL) {

- printf("%s: target ID %02x reselect nexus_list %p\n",

- sc->sc_dev.dv_xname, reselid,

- sc->nexus_list.tqh_first);

- panic("unable to find reselecting device");

- }

- rp->ssh_temp = 0;

- rp->ssh_dcntl |= SSH_DCNTL_STD;

- return (0);

- }

- if (dstat & SSH_DSTAT_SIR && rp->ssh_dsps == 0xff04) {

-#ifdef DEBUG

- u_short ctest2 = rp->ssh_ctest2;

-#endif

- /* reselect was interrupted (by Sig_P or select) */

-#ifdef DEBUG

- if (ssh_debug & 0x100 ||

- (ctest2 & SSH_CTEST2_SIGP) == 0)

- printf ("%s: reselect interrupted (Sig_P?) scntl1 %x ctest2 %x sfbr %x istat %x/%x\n",

- sc->sc_dev.dv_xname, rp->ssh_scntl1,

- ctest2, rp->ssh_sfbr, istat, rp->ssh_istat);

-#endif

- /* XXX assumes it was not select */

- if (sc->sc_nexus == NULL) {

-#if 0

- printf("%s: reselect interrupted, sc_nexus == NULL\n",

- sc->sc_dev.dv_xname);

-#endif

-#if 0

- ssh_dump(sc);

-#ifdef DDB

- Debugger();

-#endif

- rp->ssh_dcntl |= SSH_DCNTL_STD;

- return(0);

- }

- target = sc->sc_nexus->xs->sc_link->target;

- rp->ssh_temp = 0;

- rp->ssh_dsa = kvtop((vaddr_t)&sc->sc_nexus->ds);

- rp->ssh_sxfer = sc->sc_sync[target].sxfer;

- rp->ssh_sbcl = sc->sc_sync[target].sbcl;

- rp->ssh_dsp = sc->sc_scriptspa;

- return (0);

- }

- if (dstat & SSH_DSTAT_SIR && rp->ssh_dsps == 0xff06) {

- if (acb == NULL)

- printf("%s: Bad message-in with no active command?\n",

- sc->sc_dev.dv_xname);

- /* Unrecognized message in byte */

- printf ("%s: Unrecognized message in data sfbr %x msg %x sbcl %x\n",

- sc->sc_dev.dv_xname, rp->ssh_sfbr, acb->msg[1], rp->ssh_sbcl);

- /* what should be done here? */

- /*DCIAS(kvtop((vaddr_t)&acb->msg[1]));*/

- rp->ssh_dsp = sc->sc_scriptspa + Ent_switch;

- return (0);

- }

- if (dstat & SSH_DSTAT_SIR && rp->ssh_dsps == 0xff0a) {

- /* Status phase wasn't followed by message in phase? */

- printf ("%s: Status phase not followed by message in phase? sbcl %x sbdl %x\n",

- sc->sc_dev.dv_xname, rp->ssh_sbcl, rp->ssh_sbdl);

- if (rp->ssh_sbcl == 0xa7) {

- /* It is now, just continue the script? */

- rp->ssh_dcntl |= SSH_DCNTL_STD;

- return (0);

- }

- if (sstat0 == 0 && dstat & SSH_DSTAT_SIR) {

- printf ("SSH interrupt: %lx sts %x msg %x %x sbcl %x\n",

- rp->ssh_dsps, acb->stat[0], acb->msg[0], acb->msg[1],

- rp->ssh_sbcl);

- sshreset (sc);

- *status = -1;

- return 0; /* sshreset has cleaned up */

- }

- if (sstat0 & SSH_SSTAT0_SGE)

- printf ("SSH: SCSI Gross Error\n");

- if (sstat0 & SSH_SSTAT0_PAR)

- printf ("SSH: Parity Error\n");

- if (dstat & SSH_DSTAT_IID) {

- printf ("SSH: Illegal instruction detected (dsp %lx dcmd %lx dsps %lx)\n",

- rp->ssh_dsp, *((long *)&rp->ssh_dcmd),

- rp->ssh_dsps);

- if ((*((long *)&rp->ssh_dcmd) & 0xf8000000) == 0x48000000) { /* wait disconnect */

- printf("SSH was executing wait disconnect\n");

- }

-bad_phase:

-#if XXX

- /*

- * temporary panic for unhandled conditions

- * displays various things about the 53C710 status and registers

- * then panics.

- * XXXX need to clean this up to print out the info, reset, and continue

- */

- printf ("sshchkintr: target %x ds %x\n", target, &acb->ds);

- printf ("scripts %x ds %x rp %x dsp %x dcmd %x\n", sc->sc_scriptspa,

- kvtop((vaddr_t)&acb->ds), kvtop((vaddr_t)rp), rp->ssh_dsp,

- *((long *)&rp->ssh_dcmd));

- printf ("sshchkintr: istat %x dstat %x sstat0 %x dsps %x "

- "dsa %x sbcl %x sts %x msg %x %x sfbr %x\n",

- istat, dstat, sstat0, rp->ssh_dsps, rp->ssh_dsa,

- rp->ssh_sbcl, acb->stat[0], acb->msg[0], acb->msg[1],

- rp->ssh_sfbr);

-#ifdef DEBUG

- if (ssh_debug & 0x20)

- panic("sshchkintr: **** temp ****");

-#ifdef DDB

- /* Debugger(); */

-#endif

-#endif /* XXX */

- sshreset (sc); /* hard reset */

- *status = -1;

- return 0; /* sshreset cleaned up */

-void

-ssh_select(sc)

- struct ssh_softc *sc;

- ssh_regmap_p rp;

- struct ssh_acb *acb = sc->sc_nexus;

-#ifdef DEBUG

- if (ssh_debug & 1)

- printf ("%s: select ", sc->sc_dev.dv_xname);

-#endif

- rp = sc->sc_sshp;

- if (acb->xs->flags & SCSI_POLL || ssh_no_dma) {

- sc->sc_flags |= SSH_INTSOFF;

- sc->sc_flags &= ~SSH_INTDEFER;

- if ((rp->ssh_istat & 0x08) == 0) {

- rp->ssh_sien = 0;

- rp->ssh_dien = 0;

- }

-#if 0

- } else if ((sc->sc_flags & SSH_INTDEFER) == 0) {

- sc->sc_flags &= ~SSH_INTSOFF;

- if ((rp->ssh_istat & 0x08) == 0) {

- rp->ssh_sien = sc->sc_sien;

- rp->ssh_dien = sc->sc_dien;

- }

-#endif

- }

-#ifdef DEBUG

- if (ssh_debug & 1)

- printf ("ssh_select: target %x cmd %02x ds %x\n",

- acb->xs->sc_link->target, acb->cmd.opcode,

- &sc->sc_nexus->ds);

-#endif

- ssh_start(sc, acb->xs->sc_link->target, acb->xs->sc_link->lun,

- (u_char *)&acb->cmd, acb->clen, acb->daddr, acb->dleft);

- return;

-/*

- * 53C710 interrupt handler

- */

-int

-sshintr (sc)

- struct ssh_softc *sc;

- ssh_regmap_p rp;

- u_char istat, dstat, sstat0;

- int status;

- int s = splbio();

- istat = sc->sc_istat;

- if ((istat & (SSH_ISTAT_SIP | SSH_ISTAT_DIP)) == 0) {

- /* is this possible? we won't come here if there is not int!!! XXX */

- splx(s);

- return (0);

- }

- /* Got a valid interrupt on this device */

- rp = sc->sc_sshp;

- dstat = sc->sc_dstat;

- sstat0 = sc->sc_sstat0;

- if (dstat & SSH_DSTAT_SIR)

- sc->sc_intcode = rp->ssh_dsps; /* XXX use sc_intcode instead of dsps */

- /* Clear the copies in sc */

- sc->sc_istat = 0;

- sc->sc_dstat = 0;

- sc->sc_sstat0 = 0;

-#ifdef DEBUG

- if (ssh_debug & 1)

- printf ("%s: intr istat %x dstat %x sstat0 %x\n",

- sc->sc_dev.dv_xname, istat, dstat, sstat0);

- if (!sc->sc_active) {

- printf ("%s: spurious interrupt? istat %x dstat %x sstat0 %x status %x\n",

- sc->sc_dev.dv_xname, istat, dstat, sstat0, sc->sc_nexus->stat[0]);

- }

-#endif

-#ifdef DEBUG

- if (ssh_debug & 5) {

- printf ("%s: intr istat %x dstat %x sstat0 %x dsps %x sbcl %x sts %x msg %x\n",

- sc->sc_dev.dv_xname, istat, dstat, sstat0,

- rp->ssh_dsps, rp->ssh_sbcl,

- sc->sc_nexus->stat[0], sc->sc_nexus->msg[0]);

- }

-#endif

- if (sc->sc_flags & SSH_INTDEFER) {

- sc->sc_flags &= ~(SSH_INTDEFER | SSH_INTSOFF);

- rp->ssh_sien = sc->sc_sien;

- rp->ssh_dien = sc->sc_dien;

- }

- if (ssh_checkintr (sc, istat, dstat, sstat0, &status)) {

-#if 1

- if (status == 0xff)

- printf ("sshintr: status == 0xff\n");

-#endif

- if ((sc->sc_flags & (SSH_INTSOFF | SSH_INTDEFER)) != SSH_INTSOFF) {

-#if 0

- if (rp->ssh_sbcl & SSH_BSY) {

- printf ("%s: SCSI bus busy at completion",

- sc->sc_dev.dv_xname);

- printf(" targ %d sbcl %02x sfbr %x lcrc %02x dsp +%x\n",

- sc->sc_nexus->xs->sc_link->target,

- rp->ssh_sbcl, rp->ssh_sfbr, rp->ssh_lcrc,

- rp->ssh_dsp - sc->sc_scriptspa);

- }

-#endif

- ssh_scsidone(sc->sc_nexus, sc->sc_nexus->stat[0]);

- }

- splx(s);

- return (1);

-/*

- * This is based on the Progressive Peripherals 33MHz Zeus driver and will

- * not be correct for other 53c710 boards.

- * XXX fix this - nivas

- */

-void

-scsi_period_to_ssh (sc, target)

- struct ssh_softc *sc;

- int target;

- int period, offset, sxfer, sbcl = 0;

-#ifdef DEBUG_SYNC

- int i;

-#endif

- period = sc->sc_nexus->msg[4];

- offset = sc->sc_nexus->msg[5];

-#ifdef DEBUG_SYNC

- sxfer = 0;

- if (offset <= SSH_MAX_OFFSET)

- sxfer = offset;

- for (i = 0; i < sizeof (sync_tab) / 2; ++i) {

- if (period <= sync_tab[i].p) {

- sxfer |= sync_tab[i].r & 0x70;

- sbcl = sync_tab[i].r & 0x03;

- break;

- }

- printf ("ssh sync old: ssh_sxfr %02x, ssh_sbcl %02x\n", sxfer, sbcl);

-#endif

- for (sbcl = 1; sbcl < 4; ++sbcl) {

- sxfer = (period * 4 - 1) / sc->sc_tcp[sbcl] - 3;

- if (sxfer >= 0 && sxfer <= 7)

- break;

- }

- if (sbcl > 3) {

- printf("ssh_sync: unable to compute sync params for period %dns\n",

- period * 4);

- /*

- * XXX need to pick a value we can do and renegotiate

- */

- sxfer = sbcl = 0;

- } else {

- sxfer = (sxfer << 4) | ((offset <= SSH_MAX_OFFSET) ?

- offset : SSH_MAX_OFFSET);

-#ifdef DEBUG_SYNC

- printf("ssh sync: params for period %dns: sxfer %x sbcl %x",

- period * 4, sxfer, sbcl);

- printf(" actual period %dns\n",

- sc->sc_tcp[sbcl] * ((sxfer >> 4) + 4));

-#endif

- }

- sc->sc_sync[target].sxfer = sxfer;

- sc->sc_sync[target].sbcl = sbcl;

-#ifdef DEBUG_SYNC

- printf ("ssh sync: ssh_sxfr %02x, ssh_sbcl %02x\n", sxfer, sbcl);

-#endif

-#ifdef DEBUG

-#if SSH_TRACE_SIZE

-void

-ssh_dump_trace()

- int i;

- printf("ssh trace: next index %d\n", ssh_trix);

- i = ssh_trix;

- do {

- printf("%3d: '%c' %02x %02x %02x\n", i, ssh_trbuf[i],

- ssh_trbuf[i + 1], ssh_trbuf[i + 2], ssh_trbuf[i + 3]);

- i = (i + 4) & (SSH_TRACE_SIZE - 1);

- } while (i != ssh_trix);

-#endif

-void

-ssh_dump_acb(acb)

- struct ssh_acb *acb;

- u_char *b = (u_char *) &acb->cmd;

- int i;

- printf("acb@%p ", acb);

- if (acb->xs == NULL) {

- printf("<unused>\n");

- return;

- }

- printf("(%d:%d) flags %2x clen %2d cmd ", acb->xs->sc_link->target,

- acb->xs->sc_link->lun, acb->flags, acb->clen);

- for (i = acb->clen; i; --i)

- printf(" %02x", *b++);

- printf("\n");

- printf(" xs: %08x data %8x:%04x ", acb->xs, acb->xs->data,

- acb->xs->datalen);

- printf("va %8x:%04x ", acb->iob_buf, acb->iob_len);

- printf("cur %8x:%04x\n", acb->iob_curbuf, acb->iob_curlen);

-void

-ssh_dump(sc)

- struct ssh_softc *sc;

- struct ssh_acb *acb;

- ssh_regmap_p rp = sc->sc_sshp;

- int s;

- int i;

- s = splbio();

-#if SSH_TRACE_SIZE

- ssh_dump_trace();

-#endif

- printf("%s@%p regs %p istat %x\n",

- sc->sc_dev.dv_xname, sc, rp, rp->ssh_istat);

- if (acb = sc->free_list.tqh_first) {

- printf("Free list:\n");

- while (acb) {

- ssh_dump_acb(acb);

- acb = acb->chain.tqe_next;

- }

- if (acb = sc->ready_list.tqh_first) {

- printf("Ready list:\n");

- while (acb) {

- ssh_dump_acb(acb);

- acb = acb->chain.tqe_next;

- }

- if (acb = sc->nexus_list.tqh_first) {

- printf("Nexus list:\n");

- while (acb) {

- ssh_dump_acb(acb);

- acb = acb->chain.tqe_next;

- }

- if (sc->sc_nexus) {

- printf("Nexus:\n");

- ssh_dump_acb(sc->sc_nexus);

- }

- for (i = 0; i < 8; ++i) {

- if (sc->sc_tinfo[i].cmds > 2) {

- printf("tgt %d: cmds %d disc %d senses %d lubusy %x\n",

- i, sc->sc_tinfo[i].cmds,

- sc->sc_tinfo[i].dconns,

- sc->sc_tinfo[i].senses,

- sc->sc_tinfo[i].lubusy);

- }

- splx(s);

-#endif

diff --git a/sys/arch/mvme88k/dev/ssh_script.out b/sys/arch/mvme88k/dev/ssh_script.out
deleted file mode 100644
index c6a91178fc8..00000000000
--- a/sys/arch/mvme88k/dev/ssh_script.out
+++ /dev/null

@@ -1,175 +0,0 @@

-unsigned long scripts[] = {

- 0x47000000, 0x00000118, /* 000 - 0 */

- 0x878b0000, 0x00000030, /* 008 - 8 */

- 0x868a0000, 0x00000168, /* 010 - 16 */

- 0x828a0000, 0x00000170, /* 018 - 24 */

- 0x808a0000, 0x00000180, /* 020 - 32 */

- 0x818a0000, 0x00000288, /* 028 - 40 */

- 0x838a0000, 0x00000390, /* 030 - 48 */

- 0x98080000, 0x0000ff05, /* 038 - 56 */

- 0x1f000024, 0x00000024, /* 040 - 64 */

- 0x808c0001, 0x00000040, /* 048 - 72 */

- 0x808c0004, 0x00000078, /* 050 - 80 */

- 0x808c0002, 0x00000088, /* 058 - 88 */

- 0x808c0007, 0x00000010, /* 060 - 96 */

- 0x808c0003, 0x00000008, /* 068 - 104 */

- 0x98080000, 0x0000ff06, /* 070 - 112 */

- 0x60000040, 0x00000000, /* 078 - 120 */

- 0x60000008, 0x00000000, /* 080 - 128 */

- 0x80880000, 0xffffff78, /* 088 - 136 */

- 0x60000040, 0x00000000, /* 090 - 144 */

- 0x1f00002c, 0x0000002c, /* 098 - 152 */

- 0x808c0003, 0x00000008, /* 0a0 - 160 */

- 0x98080000, 0x0000ff07, /* 0a8 - 168 */

- 0x60000040, 0x00000000, /* 0b0 - 176 */

- 0x1f000034, 0x00000034, /* 0b8 - 184 */

- 0x60000040, 0x00000000, /* 0c0 - 192 */

- 0x80880000, 0xffffff38, /* 0c8 - 200 */

- 0x60000040, 0x00000000, /* 0d0 - 208 */

- 0x48000000, 0x00000000, /* 0d8 - 216 */

- 0x98080000, 0x0000ff02, /* 0e0 - 224 */

- 0x60000040, 0x00000000, /* 0e8 - 232 */

- 0x87830000, 0xffffff10, /* 0f0 - 240 */

- 0x1f00002c, 0x0000002c, /* 0f8 - 248 */

- 0x98040004, 0x0000ff08, /* 100 - 256 */

- 0x60000040, 0x00000000, /* 108 - 264 */

- 0x48000000, 0x00000000, /* 110 - 272 */

- 0x98080000, 0x0000ff01, /* 118 - 280 */

- 0x54000000, 0x00000038, /* 120 - 288 */

- 0x72230000, 0x00000000, /* 128 - 296 */

- 0x6a340000, 0x00000000, /* 130 - 304 */

- 0x9f030000, 0x0000ff09, /* 138 - 312 */

- 0x1f00001c, 0x0000001c, /* 140 - 320 */

- 0x98080000, 0x0000ff03, /* 148 - 328 */

- 0x60000040, 0x00000000, /* 150 - 336 */

- 0x80880000, 0xfffffea8, /* 158 - 344 */

- 0x74011000, 0x00000000, /* 160 - 352 */

- 0x980c0000, 0x0000ff04, /* 168 - 360 */

- 0x74164000, 0x00000000, /* 170 - 368 */

- 0x80880000, 0xffffffa0, /* 178 - 376 */

- 0x1e000004, 0x00000004, /* 180 - 384 */

- 0x80880000, 0xfffffe78, /* 188 - 392 */

- 0x60000008, 0x00000000, /* 190 - 400 */

- 0x1a00000c, 0x0000000c, /* 198 - 408 */

- 0x80880000, 0xfffffe60, /* 1a0 - 416 */

- 0x1800003c, 0x0000003c, /* 1a8 - 424 */

- 0x88830000, 0xfffffe50, /* 1b0 - 432 */

- 0x18000044, 0x00000044, /* 1b8 - 440 */

- 0x88830000, 0xfffffe40, /* 1c0 - 448 */

- 0x1800004c, 0x0000004c, /* 1c8 - 456 */

- 0x88830000, 0xfffffe30, /* 1d0 - 464 */

- 0x18000054, 0x00000054, /* 1d8 - 472 */

- 0x88830000, 0xfffffe20, /* 1e0 - 480 */

- 0x1800005c, 0x0000005c, /* 1e8 - 488 */

- 0x88830000, 0xfffffe10, /* 1f0 - 496 */

- 0x18000064, 0x00000064, /* 1f8 - 504 */

- 0x88830000, 0xfffffe00, /* 200 - 512 */

- 0x1800006c, 0x0000006c, /* 208 - 520 */

- 0x88830000, 0xfffffdf0, /* 210 - 528 */

- 0x18000074, 0x00000074, /* 218 - 536 */

- 0x88830000, 0xfffffde0, /* 220 - 544 */

- 0x1800007c, 0x0000007c, /* 228 - 552 */

- 0x88830000, 0xfffffdd0, /* 230 - 560 */

- 0x18000084, 0x00000084, /* 238 - 568 */

- 0x88830000, 0xfffffdc0, /* 240 - 576 */

- 0x1800008c, 0x0000008c, /* 248 - 584 */

- 0x88830000, 0xfffffdb0, /* 250 - 592 */

- 0x18000094, 0x00000094, /* 258 - 600 */

- 0x88830000, 0xfffffda0, /* 260 - 608 */

- 0x1800009c, 0x0000009c, /* 268 - 616 */

- 0x88830000, 0xfffffd90, /* 270 - 624 */

- 0x180000a4, 0x000000a4, /* 278 - 632 */

- 0x88830000, 0xfffffd80, /* 280 - 640 */

- 0x180000ac, 0x000000ac, /* 288 - 648 */

- 0x88830000, 0xfffffd70, /* 290 - 656 */

- 0x180000b4, 0x000000b4, /* 298 - 664 */

- 0x88830000, 0xfffffd60, /* 2a0 - 672 */

- 0x180000bc, 0x000000bc, /* 2a8 - 680 */

- 0x88880000, 0xfffffd50, /* 2b0 - 688 */

- 0x1900003c, 0x0000003c, /* 2b8 - 696 */

- 0x89830000, 0xfffffd40, /* 2c0 - 704 */

- 0x19000044, 0x00000044, /* 2c8 - 712 */

- 0x89830000, 0xfffffd30, /* 2d0 - 720 */

- 0x1900004c, 0x0000004c, /* 2d8 - 728 */

- 0x89830000, 0xfffffd20, /* 2e0 - 736 */

- 0x19000054, 0x00000054, /* 2e8 - 744 */

- 0x89830000, 0xfffffd10, /* 2f0 - 752 */

- 0x1900005c, 0x0000005c, /* 2f8 - 760 */

- 0x89830000, 0xfffffd00, /* 300 - 768 */

- 0x19000064, 0x00000064, /* 308 - 776 */

- 0x89830000, 0xfffffcf0, /* 310 - 784 */

- 0x1900006c, 0x0000006c, /* 318 - 792 */

- 0x89830000, 0xfffffce0, /* 320 - 800 */

- 0x19000074, 0x00000074, /* 328 - 808 */

- 0x89830000, 0xfffffcd0, /* 330 - 816 */

- 0x1900007c, 0x0000007c, /* 338 - 824 */

- 0x89830000, 0xfffffcc0, /* 340 - 832 */

- 0x19000084, 0x00000084, /* 348 - 840 */

- 0x89830000, 0xfffffcb0, /* 350 - 848 */

- 0x1900008c, 0x0000008c, /* 358 - 856 */

- 0x89830000, 0xfffffca0, /* 360 - 864 */

- 0x19000094, 0x00000094, /* 368 - 872 */

- 0x89830000, 0xfffffc90, /* 370 - 880 */

- 0x1900009c, 0x0000009c, /* 378 - 888 */

- 0x89830000, 0xfffffc80, /* 380 - 896 */

- 0x190000a4, 0x000000a4, /* 388 - 904 */

- 0x89830000, 0xfffffc70, /* 390 - 912 */

- 0x190000ac, 0x000000ac, /* 398 - 920 */

- 0x89830000, 0xfffffc60, /* 3a0 - 928 */

- 0x190000b4, 0x000000b4, /* 3a8 - 936 */

- 0x89830000, 0xfffffc50, /* 3b0 - 944 */

- 0x190000bc, 0x000000bc, /* 3b8 - 952 */

- 0x88880000, 0xfffffc40, /* 3c0 - 960 */

- 0x1b000014, 0x00000014, /* 3c8 - 968 */

- 0x9f030000, 0x0000ff0a, /* 3d0 - 976 */

- 0x1f00001c, 0x0000001c, /* 3d8 - 984 */

- 0x60000040, 0x00000000, /* 3e0 - 992 */

- 0x48000000, 0x00000000, /* 3e8 - 1000 */

- 0x98080000, 0x0000ff00, /* 3f0 - 1008 */

- 0x80880000, 0xfffffd20, /* 3f8 - 1016 */

-};

-#define A_ds_Device 0x00000000

-#define A_ds_MsgOut 0x00000004

-#define A_ds_Cmd 0x0000000c

-#define A_ds_Status 0x00000014

-#define A_ds_Msg 0x0000001c

-#define A_ds_MsgIn 0x00000024

-#define A_ds_ExtMsg 0x0000002c

-#define A_ds_SyncMsg 0x00000034

-#define A_ds_Data1 0x0000003c

-#define A_ds_Data2 0x00000044

-#define A_ds_Data3 0x0000004c

-#define A_ds_Data4 0x00000054

-#define A_ds_Data5 0x0000005c

-#define A_ds_Data6 0x00000064

-#define A_ds_Data7 0x0000006c

-#define A_ds_Data8 0x00000074

-#define A_ds_Data9 0x0000007c

-#define A_ds_Data10 0x00000084

-#define A_ds_Data11 0x0000008c

-#define A_ds_Data12 0x00000094

-#define A_ds_Data13 0x0000009c

-#define A_ds_Data14 0x000000a4

-#define A_ds_Data15 0x000000ac

-#define A_ds_Data16 0x000000b4

-#define A_ds_Data17 0x000000bc

-#define A_ok 0x0000ff00

-#define A_err1 0x0000ff01

-#define A_err2 0x0000ff02

-#define A_err3 0x0000ff03

-#define A_err4 0x0000ff04

-#define A_err5 0x0000ff05

-#define A_err6 0x0000ff06

-#define A_err7 0x0000ff07

-#define A_err8 0x0000ff08

-#define A_err9 0x0000ff09

-#define A_err10 0x0000ff0a

-#define Ent_scripts 0x00000000

-#define Ent_switch 0x00000008

-#define Ent_wait_reselect 0x00000120

-#define Ent_dataout 0x000001a8

-#define Ent_datain 0x000002b8

-unsigned long INSTRUCTIONS = 0x00000080;

-unsigned long PATCHES = 0x00000000;

diff --git a/sys/arch/mvme88k/dev/ssh_script.ss b/sys/arch/mvme88k/dev/ssh_script.ss
deleted file mode 100644
index c11fd3991f4..00000000000
--- a/sys/arch/mvme88k/dev/ssh_script.ss
+++ /dev/null

@@ -1,205 +0,0 @@

-; $OpenBSD: ssh_script.ss,v 1.1 2001/03/07 01:57:56 miod Exp $

-; 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 Michael L. Hitch.

-; 4. 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.

-; NCR 53c710 script

-ABSOLUTE ds_Device = 0

-ABSOLUTE ds_MsgOut = ds_Device + 4

-ABSOLUTE ds_Cmd = ds_MsgOut + 8

-ABSOLUTE ds_Status = ds_Cmd + 8

-ABSOLUTE ds_Msg = ds_Status + 8

-ABSOLUTE ds_MsgIn = ds_Msg + 8

-ABSOLUTE ds_ExtMsg = ds_MsgIn + 8

-ABSOLUTE ds_SyncMsg = ds_ExtMsg + 8

-ABSOLUTE ds_Data1 = ds_SyncMsg + 8

-ABSOLUTE ds_Data2 = ds_Data1 + 8

-ABSOLUTE ds_Data3 = ds_Data2 + 8

-ABSOLUTE ds_Data4 = ds_Data3 + 8

-ABSOLUTE ds_Data5 = ds_Data4 + 8

-ABSOLUTE ds_Data6 = ds_Data5 + 8

-ABSOLUTE ds_Data7 = ds_Data6 + 8

-ABSOLUTE ds_Data8 = ds_Data7 + 8

-ABSOLUTE ds_Data9 = ds_Data8 + 8

-ABSOLUTE ok = 0xff00

-ABSOLUTE err1 = 0xff01

-ABSOLUTE err2 = 0xff02

-ABSOLUTE err3 = 0xff03

-ABSOLUTE err4 = 0xff04

-ABSOLUTE err5 = 0xff05

-ABSOLUTE err6 = 0xff06

-ABSOLUTE err7 = 0xff07

-ABSOLUTE err8 = 0xff08

-ABSOLUTE err9 = 0xff09

-ABSOLUTE err10 = 0xff0a

-ENTRY scripts

-ENTRY switch

-ENTRY wait_reselect

-ENTRY dataout

-ENTRY datain

-PROC scripts:

-scripts:

- SELECT ATN FROM ds_Device, REL(reselect)

-switch:

- JUMP REL(msgin), WHEN MSG_IN

- JUMP REL(msgout), IF MSG_OUT

- JUMP REL(command_phase), IF CMD

- JUMP REL(dataout), IF DATA_OUT

- JUMP REL(datain), IF DATA_IN

- JUMP REL(end), IF STATUS

- INT err5 ; Unrecognized phase

-msgin:

- MOVE FROM ds_MsgIn, WHEN MSG_IN

- JUMP REL(ext_msg), IF 0x01 ; extended message

- JUMP REL(disc), IF 0x04 ; disconnect message

- JUMP REL(msg_sdp), IF 0x02 ; save data pointers

- JUMP REL(msg_rej), IF 0x07 ; message reject

- JUMP REL(msg_rdp), IF 0x03 ; restore data pointers

- INT err6 ; unrecognized message

-msg_rdp:

-msg_rej:

- CLEAR ACK

- CLEAR ATN

- JUMP REL(switch)

-ext_msg:

- CLEAR ACK

- MOVE FROM ds_ExtMsg, WHEN MSG_IN

- JUMP REL(sync_msg), IF 0x03

- int err7 ; extended message not SDTR

-sync_msg:

- CLEAR ACK

- MOVE FROM ds_SyncMsg, WHEN MSG_IN

- CLEAR ACK

- JUMP REL(switch)

-disc:

- CLEAR ACK

- WAIT DISCONNECT

- int err2 ; signal disconnect w/o save DP

-msg_sdp:

- CLEAR ACK ; acknowledge message

- JUMP REL(switch), WHEN NOT MSG_IN

- MOVE FROM ds_ExtMsg, WHEN MSG_IN

- INT err8, IF NOT 0x04 ; interrupt if not disconnect

- CLEAR ACK

- WAIT DISCONNECT

- INT err1 ; signal disconnect

-reselect:

-wait_reselect:

- WAIT RESELECT REL(select_adr)

- MOVE LCRC to SFBR ; Save reselect ID

- MOVE SFBR to SCRATCH0

- INT err9, WHEN NOT MSG_IN ; didn't get IDENTIFY

- MOVE FROM ds_Msg, WHEN MSG_IN

- INT err3 ; let host know about reconnect

- CLEAR ACK ; acknowlege the message

- JUMP REL(switch)

-select_adr:

- MOVE SCNTL1 & 0x10 to SFBR ; get connected status

- INT err4, IF 0x00 ; tell host if not connected

- MOVE CTEST2 & 0x40 to SFBR ; clear Sig_P

- JUMP REL(wait_reselect) ; and try reselect again

-msgout:

- MOVE FROM ds_MsgOut, WHEN MSG_OUT

- JUMP REL(switch)

-command_phase:

- CLEAR ATN

- MOVE FROM ds_Cmd, WHEN CMD

- JUMP REL(switch)

-dataout:

- MOVE FROM ds_Data1, WHEN DATA_OUT