xref: /netbsd-src/sys/arch/amiga/dev/ivsc.c (revision ce0bb6e8d2e560ecacbe865a848624f94498063b)
1 /*	$NetBSD: ivsc.c,v 1.10 1995/04/10 13:08:54 mycroft Exp $	*/
2 
3 /*
4  * Copyright (c) 1994 Michael L. Hitch
5  * Copyright (c) 1982, 1990 The Regents of the University of California.
6  * All rights reserved.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in the
15  *    documentation and/or other materials provided with the distribution.
16  * 3. All advertising materials mentioning features or use of this software
17  *    must display the following acknowledgement:
18  *	This product includes software developed by the University of
19  *	California, Berkeley and its contributors.
20  * 4. Neither the name of the University nor the names of its contributors
21  *    may be used to endorse or promote products derived from this software
22  *    without specific prior written permission.
23  *
24  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34  * SUCH DAMAGE.
35  *
36  *	@(#)ivsdma.c
37  */
38 #include <sys/param.h>
39 #include <sys/systm.h>
40 #include <sys/kernel.h>
41 #include <sys/device.h>
42 #include <vm/vm.h>		/* XXXX Kludge for IVS Vector - mlh */
43 #include <scsi/scsi_all.h>
44 #include <scsi/scsiconf.h>
45 #include <amiga/amiga/custom.h>
46 #include <amiga/amiga/device.h>
47 #include <amiga/amiga/isr.h>
48 #include <amiga/dev/scireg.h>
49 #include <amiga/dev/scivar.h>
50 #include <amiga/dev/zbusvar.h>
51 
52 int ivscprint __P((void *auxp, char *));
53 void ivscattach __P((struct device *, struct device *, void *));
54 int ivscmatch __P((struct device *, struct cfdata *, void *));
55 
56 int ivsc_intr __P((struct sci_softc *));
57 #ifdef notyet
58 int ivsc_dma_xfer_in __P((struct sci_softc *dev, int len,
59     register u_char *buf, int phase));
60 int ivsc_dma_xfer_out __P((struct sci_softc *dev, int len,
61     register u_char *buf, int phase));
62 #endif
63 
64 struct scsi_adapter ivsc_scsiswitch = {
65 	sci_scsicmd,
66 	sci_minphys,
67 	0,			/* no lun support */
68 	0,			/* no lun support */
69 };
70 
71 struct scsi_device ivsc_scsidev = {
72 	NULL,		/* use default error handler */
73 	NULL,		/* do not have a start functio */
74 	NULL,		/* have no async handler */
75 	NULL,		/* Use default done routine */
76 };
77 
78 #define QPRINTF
79 
80 #ifdef DEBUG
81 extern int sci_debug;
82 #endif
83 
84 extern int sci_data_wait;
85 
86 struct cfdriver ivsccd = {
87 	NULL, "ivsc", (cfmatch_t)ivscmatch, ivscattach,
88 	DV_DULL, sizeof(struct sci_softc), NULL, 0 };
89 
90 /*
91  * if this is an IVS board
92  */
93 int
94 ivscmatch(pdp, cdp, auxp)
95 	struct device *pdp;
96 	struct cfdata *cdp;
97 	void *auxp;
98 {
99 	struct zbus_args *zap;
100 
101 	zap = auxp;
102 
103 	/*
104 	 * Check manufacturer and product id.
105 	 */
106 	if (zap->manid != 2112 ||	/* If manufacturer is IVS */
107 	    (zap->prodid != 52 &&	/*   product = Trumpcard */
108 	    zap->prodid != 243))	/*   product = Vector SCSI */
109 		return(0);		/* didn't match */
110 #if 0 /* shouldn't need this any more */
111 	if (zap->prodid == 243) {
112 		/*
113 		 * XXXX Ouch! board addresss isn't Zorro II or Zorro III!
114 		 * XXXX Kludge it up until I can do it better (MLH).
115 		 *
116 		 * XXXX pa 0x00f00000 shouldn't be used for anything
117 		 */
118 		if (pmap_extract(pmap_kernel(), (vm_offset_t) ztwomap(0x00f00000))
119 		    == 0x00f00000) {
120 			physaccess(ztwomap(0x00f00000),zap->pa,
121 			    NBPG, PG_W|PG_CI);
122 			zap->va = (void *) ztwomap(0x00f00000) +
123 			    ((int)zap->pa & PGOFSET);
124 #ifdef DEBUG
125 			printf("IVS Vector: mapped to %x kva %x\n",
126 			    ztwomap(0x00f00000), zap->va);
127 #endif
128 		}
129 		else {
130 			printf("Unable to map IVS Vector SCSI\n");
131 			return (0);
132 		}
133 	}
134 #endif
135 	return(1);
136 }
137 
138 void
139 ivscattach(pdp, dp, auxp)
140 	struct device *pdp, *dp;
141 	void *auxp;
142 {
143 	volatile u_char *rp;
144 	struct sci_softc *sc;
145 	struct zbus_args *zap;
146 
147 	printf("\n");
148 
149 	zap = auxp;
150 
151 	sc = (struct sci_softc *)dp;
152 	rp = zap->va + 0x40;
153 	sc->sci_data = rp;
154 	sc->sci_odata = rp;
155 	sc->sci_icmd = rp + 2;
156 	sc->sci_mode = rp + 4;
157 	sc->sci_tcmd = rp + 6;
158 	sc->sci_bus_csr = rp + 8;
159 	sc->sci_sel_enb = rp + 8;
160 	sc->sci_csr = rp + 10;
161 	sc->sci_dma_send = rp + 10;
162 	sc->sci_idata = rp + 12;
163 	sc->sci_trecv = rp + 12;
164 	sc->sci_iack = rp + 14;
165 	sc->sci_irecv = rp + 14;
166 
167 #ifdef notyet
168 	sc->dma_xfer_in = ivsc_dma_xfer_in;
169 	sc->dma_xfer_out = ivsc_dma_xfer_out;
170 #endif
171 
172 	sc->sc_isr.isr_intr = ivsc_intr;
173 	sc->sc_isr.isr_arg = sc;
174 	sc->sc_isr.isr_ipl = 2;
175 	add_isr(&sc->sc_isr);
176 
177 	scireset(sc);
178 
179 	sc->sc_link.adapter_softc = sc;
180 	sc->sc_link.adapter_target = 7;
181 	sc->sc_link.adapter = &ivsc_scsiswitch;
182 	sc->sc_link.device = &ivsc_scsidev;
183 	sc->sc_link.openings = 1;
184 	TAILQ_INIT(&sc->sc_xslist);
185 
186 	/*
187 	 * attach all scsi units on us
188 	 */
189 	config_found(dp, &sc->sc_link, ivscprint);
190 }
191 
192 /*
193  * print diag if pnp is NULL else just extra
194  */
195 int
196 ivscprint(auxp, pnp)
197 	void *auxp;
198 	char *pnp;
199 {
200 	if (pnp == NULL)
201 		return(UNCONF);
202 	return(QUIET);
203 }
204 
205 #ifdef notyet
206 int
207 ivsc_dma_xfer_in (dev, len, buf, phase)
208 	struct sci_softc *dev;
209 	int len;
210 	register u_char *buf;
211 	int phase;
212 {
213 }
214 
215 int
216 ivsc_dma_xfer_out (dev, len, buf, phase)
217 	struct sci_softc *dev;
218 	int len;
219 	register u_char *buf;
220 	int phase;
221 {
222 }
223 #endif
224 
225 int
226 ivsc_intr(dev)
227 	struct sci_softc *dev;
228 {
229 	u_char stat;
230 
231 	if ((*dev->sci_csr & SCI_CSR_INT) == 0)
232 		return(0);
233 	stat = *dev->sci_iack;
234 }
235