xref: /netbsd-src/sys/arch/amiga/dev/empsc.c (revision 4472dbe5e3bd91ef2540bada7a7ca7384627ff9b)
1 /*	$NetBSD: empsc.c,v 1.19 1999/01/10 13:35:39 tron Exp $	*/
2 
3 /*
4 
5  * Copyright (c) 1995 Sean Riddle, Bo Najdrovsky
6  * Copyright (c) 1994 Michael L. Hitch
7  * Copyright (c) 1982, 1990 The Regents of the University of California.
8  * All rights reserved.
9  *
10  * Redistribution and use in source and binary forms, with or without
11  * modification, are permitted provided that the following conditions
12  * are met:
13  * 1. Redistributions of source code must retain the above copyright
14  *    notice, this list of conditions and the following disclaimer.
15  * 2. Redistributions in binary form must reproduce the above copyright
16  *    notice, this list of conditions and the following disclaimer in the
17  *    documentation and/or other materials provided with the distribution.
18  * 3. All advertising materials mentioning features or use of this software
19  *    must display the following acknowledgement:
20  *	This product includes software developed by the University of
21  *	California, Berkeley and its contributors.
22  * 4. Neither the name of the University nor the names of its contributors
23  *    may be used to endorse or promote products derived from this software
24  *    without specific prior written permission.
25  *
26  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
27  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
28  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
29  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
30  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
31  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
32  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
33  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
34  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
35  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36  * SUCH DAMAGE.
37  *
38  */
39 #include <sys/param.h>
40 #include <sys/systm.h>
41 #include <sys/kernel.h>
42 #include <sys/device.h>
43 #include <dev/scsipi/scsi_all.h>
44 #include <dev/scsipi/scsipi_all.h>
45 #include <dev/scsipi/scsiconf.h>
46 #include <amiga/amiga/custom.h>
47 #include <amiga/amiga/device.h>
48 #include <amiga/amiga/isr.h>
49 #include <amiga/dev/scireg.h>
50 #include <amiga/dev/scivar.h>
51 #include <amiga/dev/zbusvar.h>
52 
53 void empscattach __P((struct device *, struct device *, void *));
54 int empscmatch __P((struct device *, struct cfdata *, void *));
55 int empsc_intr __P((void *));
56 
57 struct scsipi_device empsc_scsidev = {
58 	NULL,		/* use default error handler */
59 	NULL,		/* do not have a start functio */
60 	NULL,		/* have no async handler */
61 	NULL,		/* Use default done routine */
62 };
63 
64 #ifdef DEBUG
65 extern int sci_debug;
66 #endif
67 
68 extern int sci_data_wait;
69 
70 struct cfattach empsc_ca = {
71 	sizeof(struct sci_softc), empscmatch, empscattach
72 };
73 
74 /*
75  * if this is an EMPLANT board
76  */
77 int
78 empscmatch(pdp, cfp, auxp)
79 	struct device *pdp;
80 	struct cfdata *cfp;
81 	void *auxp;
82 {
83 	struct zbus_args *zap;
84 
85 	zap = auxp;
86 
87 	/*
88 	 * Check manufacturer and product id.
89 	 */
90 	if (zap->manid == 2171 && ((zap->prodid == 21)||(zap->prodid==32)))
91 		return(1);
92 	else
93 		return(0);
94 }
95 
96 void
97 empscattach(pdp, dp, auxp)
98 	struct device *pdp, *dp;
99 	void *auxp;
100 {
101 	volatile u_char *rp;
102 	struct sci_softc *sc;
103 	struct zbus_args *zap;
104 
105 	printf("\n");
106 
107 	zap = auxp;
108 
109 	sc = (struct sci_softc *)dp;
110 	rp = (u_char *)zap->va + 0x5000;
111 
112 	sc->sci_data = rp;
113 	sc->sci_odata = rp;
114 	sc->sci_icmd = rp + 0x10;
115 	sc->sci_mode = rp + 0x20;
116 	sc->sci_tcmd = rp + 0x30;
117 	sc->sci_bus_csr = rp + 0x40;
118 	sc->sci_sel_enb = rp + 0x40;
119 	sc->sci_csr = rp + 0x50;
120 	sc->sci_dma_send = rp + 0x50;
121 	sc->sci_idata = rp + 0x60;
122 	sc->sci_trecv = rp + 0x60;
123 	sc->sci_iack = rp + 0x70;
124 	sc->sci_irecv = rp + 0x70;
125 	sc->sc_isr.isr_intr = empsc_intr;
126 	sc->sc_isr.isr_arg = sc;
127 	sc->sc_isr.isr_ipl = 2;
128 	add_isr(&sc->sc_isr);
129 
130 	scireset(sc);
131 
132 	sc->sc_adapter.scsipi_cmd = sci_scsicmd;
133 	sc->sc_adapter.scsipi_minphys = sci_minphys;
134 
135 	sc->sc_link.scsipi_scsi.channel = SCSI_CHANNEL_ONLY_ONE;
136 	sc->sc_link.adapter_softc = sc;
137 	sc->sc_link.scsipi_scsi.adapter_target = 7;
138 	sc->sc_link.adapter = &sc->sc_adapter;
139 	sc->sc_link.device = &empsc_scsidev;
140 	sc->sc_link.openings = 1;
141 	sc->sc_link.scsipi_scsi.max_target = 7;
142 	sc->sc_link.scsipi_scsi.max_lun = 7;
143 	sc->sc_link.type = BUS_SCSI;
144 	TAILQ_INIT(&sc->sc_xslist);
145 
146 	/*
147 	 * attach all scsi units on us
148 	 */
149 	config_found(dp, &sc->sc_link, scsiprint);
150 }
151 
152 int
153 empsc_intr(arg)
154 	void *arg;
155 {
156 	struct sci_softc *dev = arg;
157 	u_char stat;
158 
159 	if ((*dev->sci_csr & SCI_CSR_INT) == 0)
160 		return(0);
161 	stat = *dev->sci_iack;
162 	/* XXXX is: something is missing here, at least a: */
163 	return(1);
164 }
165