ninjascsi32.c revision 1.18 1 1.18 joerg /* $NetBSD: ninjascsi32.c,v 1.18 2008/07/09 19:08:44 joerg Exp $ */
2 1.1 itohy
3 1.1 itohy /*-
4 1.14 itohy * Copyright (c) 2004, 2006, 2007 The NetBSD Foundation, Inc.
5 1.1 itohy * All rights reserved.
6 1.1 itohy *
7 1.1 itohy * This code is derived from software contributed to The NetBSD Foundation
8 1.1 itohy * by ITOH Yasufumi.
9 1.1 itohy *
10 1.1 itohy * Redistribution and use in source and binary forms, with or without
11 1.1 itohy * modification, are permitted provided that the following conditions
12 1.1 itohy * are met:
13 1.1 itohy * 1. Redistributions of source code must retain the above copyright
14 1.1 itohy * notice, this list of conditions and the following disclaimer.
15 1.1 itohy * 2. Redistributions in binary form must reproduce the above copyright
16 1.1 itohy * notice, this list of conditions and the following disclaimer in the
17 1.1 itohy * documentation and/or other materials provided with the distribution.
18 1.1 itohy *
19 1.1 itohy * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20 1.1 itohy * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21 1.1 itohy * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 1.1 itohy * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23 1.1 itohy * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24 1.1 itohy * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25 1.1 itohy * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26 1.1 itohy * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27 1.1 itohy * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28 1.1 itohy * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29 1.1 itohy * POSSIBILITY OF SUCH DAMAGE.
30 1.1 itohy */
31 1.1 itohy
32 1.1 itohy #include <sys/cdefs.h>
33 1.18 joerg __KERNEL_RCSID(0, "$NetBSD: ninjascsi32.c,v 1.18 2008/07/09 19:08:44 joerg Exp $");
34 1.1 itohy
35 1.1 itohy #include <sys/param.h>
36 1.1 itohy #include <sys/systm.h>
37 1.1 itohy #include <sys/callout.h>
38 1.1 itohy #include <sys/device.h>
39 1.1 itohy #include <sys/kernel.h>
40 1.1 itohy #include <sys/buf.h>
41 1.1 itohy #include <sys/scsiio.h>
42 1.11 ad #include <sys/proc.h>
43 1.1 itohy
44 1.12 ad #include <sys/bus.h>
45 1.12 ad #include <sys/intr.h>
46 1.1 itohy
47 1.1 itohy #include <uvm/uvm_extern.h>
48 1.1 itohy
49 1.1 itohy #include <dev/scsipi/scsi_all.h>
50 1.1 itohy #include <dev/scsipi/scsipi_all.h>
51 1.1 itohy #include <dev/scsipi/scsiconf.h>
52 1.1 itohy #include <dev/scsipi/scsi_message.h>
53 1.1 itohy
54 1.1 itohy /*
55 1.1 itohy * DualEdge transfer support
56 1.1 itohy */
57 1.1 itohy /* #define NJSC32_DUALEDGE */ /* XXX untested */
58 1.1 itohy
59 1.1 itohy /*
60 1.1 itohy * Auto param loading does not work properly (it partially works (works on
61 1.1 itohy * start, doesn't on restart) on rev 0x54, it doesn't work at all on rev 0x51),
62 1.1 itohy * and it doesn't improve the performance so much,
63 1.1 itohy * forget about it.
64 1.1 itohy */
65 1.1 itohy #undef NJSC32_AUTOPARAM
66 1.1 itohy
67 1.1 itohy #include <dev/ic/ninjascsi32reg.h>
68 1.1 itohy #include <dev/ic/ninjascsi32var.h>
69 1.1 itohy
70 1.1 itohy /* #define NJSC32_DEBUG */
71 1.1 itohy /* #define NJSC32_TRACE */
72 1.1 itohy
73 1.1 itohy #ifdef NJSC32_DEBUG
74 1.1 itohy #define DPRINTF(x) printf x
75 1.1 itohy #define DPRINTC(cmd, x) PRINTC(cmd, x)
76 1.1 itohy #else
77 1.1 itohy #define DPRINTF(x)
78 1.1 itohy #define DPRINTC(cmd, x)
79 1.1 itohy #endif
80 1.1 itohy #ifdef NJSC32_TRACE
81 1.1 itohy #define TPRINTF(x) printf x
82 1.1 itohy #define TPRINTC(cmd, x) PRINTC(cmd, x)
83 1.1 itohy #else
84 1.1 itohy #define TPRINTF(x)
85 1.1 itohy #define TPRINTC(cmd, x)
86 1.1 itohy #endif
87 1.1 itohy
88 1.1 itohy #define PRINTC(cmd, x) do { \
89 1.1 itohy scsi_print_addr((cmd)->c_xs->xs_periph); \
90 1.1 itohy printf x; \
91 1.1 itohy } while (/* CONSTCOND */ 0)
92 1.1 itohy
93 1.2 thorpej static void njsc32_scsipi_request(struct scsipi_channel *,
94 1.2 thorpej scsipi_adapter_req_t, void *);
95 1.3 christos static void njsc32_scsipi_minphys(struct buf *);
96 1.10 christos static int njsc32_scsipi_ioctl(struct scsipi_channel *, u_long, void *,
97 1.2 thorpej int, struct proc *);
98 1.2 thorpej
99 1.2 thorpej static void njsc32_init(struct njsc32_softc *, int nosleep);
100 1.2 thorpej static int njsc32_init_cmds(struct njsc32_softc *);
101 1.2 thorpej static void njsc32_target_async(struct njsc32_softc *,
102 1.2 thorpej struct njsc32_target *);
103 1.2 thorpej static void njsc32_init_targets(struct njsc32_softc *);
104 1.2 thorpej static void njsc32_add_msgout(struct njsc32_softc *, int);
105 1.2 thorpej static u_int32_t njsc32_get_auto_msgout(struct njsc32_softc *);
106 1.1 itohy #ifdef NJSC32_DUALEDGE
107 1.2 thorpej static void njsc32_msgout_wdtr(struct njsc32_softc *, int);
108 1.1 itohy #endif
109 1.2 thorpej static void njsc32_msgout_sdtr(struct njsc32_softc *, int period,
110 1.2 thorpej int offset);
111 1.2 thorpej static void njsc32_negotiate_xfer(struct njsc32_softc *,
112 1.2 thorpej struct njsc32_target *);
113 1.2 thorpej static void njsc32_arbitration_failed(struct njsc32_softc *);
114 1.2 thorpej static void njsc32_start(struct njsc32_softc *);
115 1.2 thorpej static void njsc32_run_xfer(struct njsc32_softc *, struct scsipi_xfer *);
116 1.2 thorpej static void njsc32_end_cmd(struct njsc32_softc *, struct njsc32_cmd *,
117 1.2 thorpej scsipi_xfer_result_t);
118 1.14 itohy static void njsc32_wait_reset_release(void *);
119 1.2 thorpej static void njsc32_reset_bus(struct njsc32_softc *);
120 1.2 thorpej static void njsc32_clear_cmds(struct njsc32_softc *,
121 1.2 thorpej scsipi_xfer_result_t);
122 1.2 thorpej static void njsc32_set_ptr(struct njsc32_softc *, struct njsc32_cmd *,
123 1.2 thorpej u_int32_t);
124 1.2 thorpej static void njsc32_assert_ack(struct njsc32_softc *);
125 1.2 thorpej static void njsc32_negate_ack(struct njsc32_softc *);
126 1.2 thorpej static void njsc32_wait_req_negate(struct njsc32_softc *);
127 1.2 thorpej static void njsc32_reconnect(struct njsc32_softc *, struct njsc32_cmd *);
128 1.1 itohy enum njsc32_reselstat {
129 1.1 itohy NJSC32_RESEL_ERROR, /* to be rejected */
130 1.1 itohy NJSC32_RESEL_COMPLETE, /* reselection is just complete */
131 1.1 itohy NJSC32_RESEL_THROUGH /* this message is OK (no reply) */
132 1.1 itohy };
133 1.2 thorpej static enum njsc32_reselstat njsc32_resel_identify(struct njsc32_softc *,
134 1.2 thorpej int lun, struct njsc32_cmd **);
135 1.2 thorpej static enum njsc32_reselstat njsc32_resel_tag(struct njsc32_softc *,
136 1.2 thorpej int tag, struct njsc32_cmd **);
137 1.2 thorpej static void njsc32_cmd_reload(struct njsc32_softc *, struct njsc32_cmd *,
138 1.2 thorpej int);
139 1.2 thorpej static void njsc32_update_xfer_mode(struct njsc32_softc *,
140 1.2 thorpej struct njsc32_target *);
141 1.2 thorpej static void njsc32_msgin(struct njsc32_softc *);
142 1.2 thorpej static void njsc32_msgout(struct njsc32_softc *);
143 1.2 thorpej static void njsc32_cmdtimeout(void *);
144 1.2 thorpej static void njsc32_reseltimeout(void *);
145 1.1 itohy
146 1.5 perry static inline unsigned
147 1.2 thorpej njsc32_read_1(struct njsc32_softc *sc, int no)
148 1.1 itohy {
149 1.1 itohy
150 1.1 itohy return bus_space_read_1(sc->sc_regt, sc->sc_regh, no);
151 1.1 itohy }
152 1.1 itohy
153 1.5 perry static inline unsigned
154 1.2 thorpej njsc32_read_2(struct njsc32_softc *sc, int no)
155 1.1 itohy {
156 1.1 itohy
157 1.1 itohy return bus_space_read_2(sc->sc_regt, sc->sc_regh, no);
158 1.1 itohy }
159 1.1 itohy
160 1.5 perry static inline u_int32_t
161 1.2 thorpej njsc32_read_4(struct njsc32_softc *sc, int no)
162 1.1 itohy {
163 1.1 itohy
164 1.1 itohy return bus_space_read_4(sc->sc_regt, sc->sc_regh, no);
165 1.1 itohy }
166 1.1 itohy
167 1.5 perry static inline void
168 1.2 thorpej njsc32_write_1(struct njsc32_softc *sc, int no, int val)
169 1.1 itohy {
170 1.1 itohy
171 1.1 itohy bus_space_write_1(sc->sc_regt, sc->sc_regh, no, val);
172 1.1 itohy }
173 1.1 itohy
174 1.5 perry static inline void
175 1.2 thorpej njsc32_write_2(struct njsc32_softc *sc, int no, int val)
176 1.1 itohy {
177 1.1 itohy
178 1.1 itohy bus_space_write_2(sc->sc_regt, sc->sc_regh, no, val);
179 1.1 itohy }
180 1.1 itohy
181 1.5 perry static inline void
182 1.2 thorpej njsc32_write_4(struct njsc32_softc *sc, int no, u_int32_t val)
183 1.1 itohy {
184 1.1 itohy
185 1.1 itohy bus_space_write_4(sc->sc_regt, sc->sc_regh, no, val);
186 1.1 itohy }
187 1.1 itohy
188 1.5 perry static inline unsigned
189 1.2 thorpej njsc32_ireg_read_1(struct njsc32_softc *sc, int no)
190 1.1 itohy {
191 1.1 itohy
192 1.1 itohy bus_space_write_1(sc->sc_regt, sc->sc_regh, NJSC32_REG_INDEX, no);
193 1.1 itohy return bus_space_read_1(sc->sc_regt, sc->sc_regh, NJSC32_REG_DATA_LOW);
194 1.1 itohy }
195 1.1 itohy
196 1.5 perry static inline unsigned
197 1.2 thorpej njsc32_ireg_read_2(struct njsc32_softc *sc, int no)
198 1.1 itohy {
199 1.1 itohy
200 1.1 itohy bus_space_write_1(sc->sc_regt, sc->sc_regh, NJSC32_REG_INDEX, no);
201 1.1 itohy return bus_space_read_2(sc->sc_regt, sc->sc_regh, NJSC32_REG_DATA_LOW);
202 1.1 itohy }
203 1.1 itohy
204 1.5 perry static inline u_int32_t
205 1.2 thorpej njsc32_ireg_read_4(struct njsc32_softc *sc, int no)
206 1.1 itohy {
207 1.1 itohy u_int32_t val;
208 1.1 itohy
209 1.1 itohy bus_space_write_1(sc->sc_regt, sc->sc_regh, NJSC32_REG_INDEX, no);
210 1.1 itohy val = (u_int16_t)bus_space_read_2(sc->sc_regt, sc->sc_regh,
211 1.1 itohy NJSC32_REG_DATA_LOW);
212 1.1 itohy return val | (bus_space_read_2(sc->sc_regt, sc->sc_regh,
213 1.1 itohy NJSC32_REG_DATA_HIGH) << 16);
214 1.1 itohy }
215 1.1 itohy
216 1.5 perry static inline void
217 1.2 thorpej njsc32_ireg_write_1(struct njsc32_softc *sc, int no, int val)
218 1.1 itohy {
219 1.1 itohy
220 1.1 itohy bus_space_write_1(sc->sc_regt, sc->sc_regh, NJSC32_REG_INDEX, no);
221 1.1 itohy bus_space_write_1(sc->sc_regt, sc->sc_regh, NJSC32_REG_DATA_LOW, val);
222 1.1 itohy }
223 1.1 itohy
224 1.5 perry static inline void
225 1.2 thorpej njsc32_ireg_write_2(struct njsc32_softc *sc, int no, int val)
226 1.1 itohy {
227 1.1 itohy
228 1.1 itohy bus_space_write_1(sc->sc_regt, sc->sc_regh, NJSC32_REG_INDEX, no);
229 1.1 itohy bus_space_write_2(sc->sc_regt, sc->sc_regh, NJSC32_REG_DATA_LOW, val);
230 1.1 itohy }
231 1.1 itohy
232 1.5 perry static inline void
233 1.2 thorpej njsc32_ireg_write_4(struct njsc32_softc *sc, int no, u_int32_t val)
234 1.1 itohy {
235 1.1 itohy
236 1.1 itohy bus_space_write_1(sc->sc_regt, sc->sc_regh, NJSC32_REG_INDEX, no);
237 1.1 itohy bus_space_write_2(sc->sc_regt, sc->sc_regh, NJSC32_REG_DATA_LOW, val);
238 1.1 itohy bus_space_write_2(sc->sc_regt, sc->sc_regh, NJSC32_REG_DATA_HIGH,
239 1.1 itohy val >> 16);
240 1.1 itohy }
241 1.1 itohy
242 1.1 itohy #define NS(ns) ((ns) / 4) /* nanosecond (>= 50) -> sync value */
243 1.1 itohy #ifdef __STDC__
244 1.1 itohy # define ACKW(n) NJSC32_ACK_WIDTH_ ## n ## CLK
245 1.1 itohy # define SMPL(n) (NJSC32_SREQ_SAMPLING_ ## n ## CLK | \
246 1.1 itohy NJSC32_SREQ_SAMPLING_ENABLE)
247 1.1 itohy #else
248 1.1 itohy # define ACKW(n) NJSC32_ACK_WIDTH_/**/n/**/CLK
249 1.1 itohy # define SMPL(n) (NJSC32_SREQ_SAMPLING_/**/n/**/CLK | \
250 1.1 itohy NJSC32_SREQ_SAMPLING_ENABLE)
251 1.1 itohy #endif
252 1.1 itohy
253 1.1 itohy #define NJSC32_NSYNCT_MAXSYNC 1
254 1.1 itohy #define NJSC32_NSYNCT 16
255 1.1 itohy
256 1.1 itohy /* 40MHz (25ns) */
257 1.1 itohy static const struct njsc32_sync_param njsc32_synct_40M[NJSC32_NSYNCT] = {
258 1.1 itohy { 0, 0, 0 }, /* dummy for async */
259 1.1 itohy { NS( 50), ACKW(1), 0 }, /* 20.0 : 50ns, 25ns */
260 1.1 itohy { NS( 75), ACKW(1), SMPL(1) }, /* 13.3 : 75ns, 25ns */
261 1.1 itohy { NS(100), ACKW(2), SMPL(1) }, /* 10.0 : 100ns, 50ns */
262 1.1 itohy { NS(125), ACKW(2), SMPL(2) }, /* 8.0 : 125ns, 50ns */
263 1.1 itohy { NS(150), ACKW(3), SMPL(2) }, /* 6.7 : 150ns, 75ns */
264 1.1 itohy { NS(175), ACKW(3), SMPL(2) }, /* 5.7 : 175ns, 75ns */
265 1.1 itohy { NS(200), ACKW(4), SMPL(2) }, /* 5.0 : 200ns, 100ns */
266 1.1 itohy { NS(225), ACKW(4), SMPL(4) }, /* 4.4 : 225ns, 100ns */
267 1.1 itohy { NS(250), ACKW(4), SMPL(4) }, /* 4.0 : 250ns, 100ns */
268 1.1 itohy { NS(275), ACKW(4), SMPL(4) }, /* 3.64: 275ns, 100ns */
269 1.1 itohy { NS(300), ACKW(4), SMPL(4) }, /* 3.33: 300ns, 100ns */
270 1.1 itohy { NS(325), ACKW(4), SMPL(4) }, /* 3.01: 325ns, 100ns */
271 1.1 itohy { NS(350), ACKW(4), SMPL(4) }, /* 2.86: 350ns, 100ns */
272 1.1 itohy { NS(375), ACKW(4), SMPL(4) }, /* 2.67: 375ns, 100ns */
273 1.1 itohy { NS(400), ACKW(4), SMPL(4) } /* 2.50: 400ns, 100ns */
274 1.1 itohy };
275 1.1 itohy
276 1.1 itohy #ifdef NJSC32_SUPPORT_OTHER_CLOCKS
277 1.1 itohy /* 20MHz (50ns) */
278 1.1 itohy static const struct njsc32_sync_param njsc32_synct_20M[NJSC32_NSYNCT] = {
279 1.1 itohy { 0, 0, 0 }, /* dummy for async */
280 1.1 itohy { NS(100), ACKW(1), 0 }, /* 10.0 : 100ns, 50ns */
281 1.1 itohy { NS(150), ACKW(1), SMPL(2) }, /* 6.7 : 150ns, 50ns */
282 1.1 itohy { NS(200), ACKW(2), SMPL(2) }, /* 5.0 : 200ns, 100ns */
283 1.1 itohy { NS(250), ACKW(2), SMPL(4) }, /* 4.0 : 250ns, 100ns */
284 1.1 itohy { NS(300), ACKW(3), SMPL(4) }, /* 3.3 : 300ns, 150ns */
285 1.1 itohy { NS(350), ACKW(3), SMPL(4) }, /* 2.8 : 350ns, 150ns */
286 1.1 itohy { NS(400), ACKW(4), SMPL(4) }, /* 2.5 : 400ns, 200ns */
287 1.1 itohy { NS(450), ACKW(4), SMPL(4) }, /* 2.2 : 450ns, 200ns */
288 1.1 itohy { NS(500), ACKW(4), SMPL(4) }, /* 2.0 : 500ns, 200ns */
289 1.1 itohy { NS(550), ACKW(4), SMPL(4) }, /* 1.82: 550ns, 200ns */
290 1.1 itohy { NS(600), ACKW(4), SMPL(4) }, /* 1.67: 600ns, 200ns */
291 1.1 itohy { NS(650), ACKW(4), SMPL(4) }, /* 1.54: 650ns, 200ns */
292 1.1 itohy { NS(700), ACKW(4), SMPL(4) }, /* 1.43: 700ns, 200ns */
293 1.1 itohy { NS(750), ACKW(4), SMPL(4) }, /* 1.33: 750ns, 200ns */
294 1.1 itohy { NS(800), ACKW(4), SMPL(4) } /* 1.25: 800ns, 200ns */
295 1.1 itohy };
296 1.1 itohy
297 1.1 itohy /* 33.3MHz (30ns) */
298 1.1 itohy static const struct njsc32_sync_param njsc32_synct_pci[NJSC32_NSYNCT] = {
299 1.1 itohy { 0, 0, 0 }, /* dummy for async */
300 1.1 itohy { NS( 60), ACKW(1), 0 }, /* 16.6 : 60ns, 30ns */
301 1.1 itohy { NS( 90), ACKW(1), SMPL(1) }, /* 11.1 : 90ns, 30ns */
302 1.1 itohy { NS(120), ACKW(2), SMPL(2) }, /* 8.3 : 120ns, 60ns */
303 1.1 itohy { NS(150), ACKW(2), SMPL(2) }, /* 6.7 : 150ns, 60ns */
304 1.1 itohy { NS(180), ACKW(3), SMPL(2) }, /* 5.6 : 180ns, 90ns */
305 1.1 itohy { NS(210), ACKW(3), SMPL(4) }, /* 4.8 : 210ns, 90ns */
306 1.1 itohy { NS(240), ACKW(4), SMPL(4) }, /* 4.2 : 240ns, 120ns */
307 1.1 itohy { NS(270), ACKW(4), SMPL(4) }, /* 3.7 : 270ns, 120ns */
308 1.1 itohy { NS(300), ACKW(4), SMPL(4) }, /* 3.3 : 300ns, 120ns */
309 1.1 itohy { NS(330), ACKW(4), SMPL(4) }, /* 3.0 : 330ns, 120ns */
310 1.1 itohy { NS(360), ACKW(4), SMPL(4) }, /* 2.8 : 360ns, 120ns */
311 1.1 itohy { NS(390), ACKW(4), SMPL(4) }, /* 2.6 : 390ns, 120ns */
312 1.1 itohy { NS(420), ACKW(4), SMPL(4) }, /* 2.4 : 420ns, 120ns */
313 1.1 itohy { NS(450), ACKW(4), SMPL(4) }, /* 2.2 : 450ns, 120ns */
314 1.1 itohy { NS(480), ACKW(4), SMPL(4) } /* 2.1 : 480ns, 120ns */
315 1.1 itohy };
316 1.1 itohy #endif /* NJSC32_SUPPORT_OTHER_CLOCKS */
317 1.1 itohy
318 1.1 itohy #undef NS
319 1.1 itohy #undef ACKW
320 1.1 itohy #undef SMPL
321 1.1 itohy
322 1.1 itohy /* initialize device */
323 1.1 itohy static void
324 1.2 thorpej njsc32_init(struct njsc32_softc *sc, int nosleep)
325 1.1 itohy {
326 1.1 itohy u_int16_t intstat;
327 1.14 itohy int i;
328 1.1 itohy
329 1.1 itohy /* block all interrupts */
330 1.1 itohy njsc32_write_2(sc, NJSC32_REG_IRQ, NJSC32_IRQ_MASK_ALL);
331 1.1 itohy
332 1.1 itohy /* clear transfer */
333 1.1 itohy njsc32_write_2(sc, NJSC32_REG_TRANSFER, 0);
334 1.1 itohy njsc32_write_4(sc, NJSC32_REG_BM_CNT, 0);
335 1.1 itohy
336 1.1 itohy /* make sure interrupts are cleared */
337 1.14 itohy for (i = 0; ((intstat = njsc32_read_2(sc, NJSC32_REG_IRQ))
338 1.14 itohy & NJSC32_IRQ_INTR_PENDING) && i < 5 /* just not forever */; i++) {
339 1.1 itohy DPRINTF(("%s: njsc32_init: intr pending: %#x\n",
340 1.18 joerg device_xname(sc->sc_dev), intstat));
341 1.1 itohy }
342 1.1 itohy
343 1.1 itohy /* FIFO threshold */
344 1.1 itohy njsc32_ireg_write_1(sc, NJSC32_IREG_FIFO_THRESHOLD_FULL,
345 1.1 itohy NJSC32_FIFO_FULL_BUSMASTER);
346 1.1 itohy njsc32_ireg_write_1(sc, NJSC32_IREG_FIFO_THRESHOLD_EMPTY,
347 1.1 itohy NJSC32_FIFO_EMPTY_BUSMASTER);
348 1.1 itohy
349 1.1 itohy /* clock source */
350 1.1 itohy njsc32_ireg_write_1(sc, NJSC32_IREG_CLOCK, sc->sc_clk);
351 1.1 itohy
352 1.1 itohy /* memory read multiple */
353 1.1 itohy njsc32_ireg_write_1(sc, NJSC32_IREG_BM,
354 1.1 itohy NJSC32_BM_MEMRD_CMD1 | NJSC32_BM_SGT_AUTO_PARA_MEMRD_CMD);
355 1.1 itohy
356 1.1 itohy /* clear parity error and enable parity detection */
357 1.1 itohy njsc32_write_1(sc, NJSC32_REG_PARITY_CONTROL,
358 1.1 itohy NJSC32_PARITYCTL_CHECK_ENABLE | NJSC32_PARITYCTL_CLEAR_ERROR);
359 1.1 itohy
360 1.1 itohy /* misc configuration */
361 1.1 itohy njsc32_ireg_write_2(sc, NJSC32_IREG_MISC,
362 1.1 itohy NJSC32_MISC_SCSI_DIRECTION_DETECTOR_SELECT |
363 1.1 itohy NJSC32_MISC_DELAYED_BMSTART |
364 1.1 itohy NJSC32_MISC_MASTER_TERMINATION_SELECT |
365 1.1 itohy NJSC32_MISC_BMREQ_NEGATE_TIMING_SEL |
366 1.1 itohy NJSC32_MISC_AUTOSEL_TIMING_SEL |
367 1.1 itohy NJSC32_MISC_BMSTOP_CHANGE2_NONDATA_PHASE);
368 1.1 itohy
369 1.1 itohy /*
370 1.14 itohy * Check for termination power (32Bi and some versions of 32UDE).
371 1.1 itohy */
372 1.1 itohy if (!nosleep || cold) {
373 1.1 itohy DPRINTF(("%s: njsc32_init: checking TERMPWR\n",
374 1.18 joerg device_xname(sc->sc_dev)));
375 1.1 itohy
376 1.1 itohy /* First, turn termination power off */
377 1.1 itohy njsc32_ireg_write_1(sc, NJSC32_IREG_TERM_PWR, 0);
378 1.1 itohy
379 1.1 itohy /* give 0.5s to settle */
380 1.1 itohy if (nosleep)
381 1.1 itohy delay(500000);
382 1.1 itohy else
383 1.1 itohy tsleep(sc, PWAIT, "njs_t1", hz / 2);
384 1.1 itohy }
385 1.1 itohy
386 1.1 itohy /* supply termination power if not supplied by other devices */
387 1.1 itohy if ((njsc32_ireg_read_1(sc, NJSC32_IREG_TERM_PWR) &
388 1.1 itohy NJSC32_TERMPWR_SENSE) == 0) {
389 1.1 itohy /* termination power is not present on the bus */
390 1.1 itohy if (sc->sc_flags & NJSC32_CANNOT_SUPPLY_TERMPWR) {
391 1.1 itohy /*
392 1.1 itohy * CardBus device must not supply termination power
393 1.1 itohy * to avoid excessive power consumption.
394 1.1 itohy */
395 1.1 itohy printf("%s: no termination power present\n",
396 1.18 joerg device_xname(sc->sc_dev));
397 1.1 itohy } else {
398 1.1 itohy /* supply termination power */
399 1.1 itohy njsc32_ireg_write_1(sc, NJSC32_IREG_TERM_PWR,
400 1.1 itohy NJSC32_TERMPWR_BPWR);
401 1.1 itohy
402 1.1 itohy DPRINTF(("%s: supplying termination power\n",
403 1.18 joerg device_xname(sc->sc_dev)));
404 1.1 itohy
405 1.1 itohy /* give 0.5s to settle */
406 1.1 itohy if (!nosleep)
407 1.1 itohy tsleep(sc, PWAIT, "njs_t2", hz / 2);
408 1.1 itohy }
409 1.1 itohy }
410 1.1 itohy
411 1.1 itohy /* stop timer */
412 1.1 itohy njsc32_write_2(sc, NJSC32_REG_TIMER, NJSC32_TIMER_STOP);
413 1.1 itohy njsc32_write_2(sc, NJSC32_REG_TIMER, NJSC32_TIMER_STOP);
414 1.1 itohy
415 1.1 itohy /* default transfer parameter */
416 1.1 itohy njsc32_write_1(sc, NJSC32_REG_SYNC, 0);
417 1.1 itohy njsc32_write_1(sc, NJSC32_REG_ACK_WIDTH, NJSC32_ACK_WIDTH_1CLK);
418 1.1 itohy njsc32_write_2(sc, NJSC32_REG_SEL_TIMEOUT,
419 1.1 itohy NJSC32_SEL_TIMEOUT_TIME);
420 1.1 itohy
421 1.1 itohy /* select interrupt source */
422 1.1 itohy njsc32_ireg_write_2(sc, NJSC32_IREG_IRQ_SELECT,
423 1.1 itohy NJSC32_IRQSEL_RESELECT |
424 1.1 itohy NJSC32_IRQSEL_PHASE_CHANGE |
425 1.1 itohy NJSC32_IRQSEL_SCSIRESET |
426 1.1 itohy NJSC32_IRQSEL_TIMER |
427 1.1 itohy NJSC32_IRQSEL_FIFO_THRESHOLD |
428 1.1 itohy NJSC32_IRQSEL_TARGET_ABORT |
429 1.1 itohy NJSC32_IRQSEL_MASTER_ABORT |
430 1.1 itohy /* XXX not yet
431 1.1 itohy NJSC32_IRQSEL_SERR |
432 1.1 itohy NJSC32_IRQSEL_PERR |
433 1.1 itohy NJSC32_IRQSEL_BMCNTERR |
434 1.1 itohy */
435 1.1 itohy NJSC32_IRQSEL_AUTO_SCSI_SEQ);
436 1.1 itohy
437 1.14 itohy /* interrupts will be unblocked later after bus reset */
438 1.1 itohy
439 1.1 itohy /* turn LED off */
440 1.1 itohy njsc32_ireg_write_1(sc, NJSC32_IREG_EXT_PORT_DDR,
441 1.1 itohy NJSC32_EXTPORT_LED_OFF);
442 1.1 itohy njsc32_ireg_write_1(sc, NJSC32_IREG_EXT_PORT,
443 1.1 itohy NJSC32_EXTPORT_LED_OFF);
444 1.1 itohy
445 1.1 itohy /* reset SCSI bus so the targets become known state */
446 1.1 itohy njsc32_reset_bus(sc);
447 1.1 itohy }
448 1.1 itohy
449 1.1 itohy static int
450 1.2 thorpej njsc32_init_cmds(struct njsc32_softc *sc)
451 1.1 itohy {
452 1.1 itohy struct njsc32_cmd *cmd;
453 1.1 itohy bus_addr_t dmaaddr;
454 1.1 itohy int i, error;
455 1.1 itohy
456 1.1 itohy /*
457 1.1 itohy * allocate DMA area for command
458 1.1 itohy */
459 1.1 itohy if ((error = bus_dmamem_alloc(sc->sc_dmat,
460 1.1 itohy sizeof(struct njsc32_dma_page), PAGE_SIZE, 0,
461 1.1 itohy &sc->sc_cmdpg_seg, 1, &sc->sc_cmdpg_nsegs, BUS_DMA_NOWAIT)) != 0) {
462 1.18 joerg aprint_error_dev(sc->sc_dev, "unable to allocate cmd page, error = %d\n",
463 1.16 cegger error);
464 1.1 itohy return 0;
465 1.1 itohy }
466 1.1 itohy if ((error = bus_dmamem_map(sc->sc_dmat, &sc->sc_cmdpg_seg,
467 1.1 itohy sc->sc_cmdpg_nsegs, sizeof(struct njsc32_dma_page),
468 1.10 christos (void **)&sc->sc_cmdpg,
469 1.1 itohy BUS_DMA_NOWAIT | BUS_DMA_COHERENT)) != 0) {
470 1.18 joerg aprint_error_dev(sc->sc_dev, "unable to map cmd page, error = %d\n",
471 1.16 cegger error);
472 1.1 itohy goto fail1;
473 1.1 itohy }
474 1.1 itohy if ((error = bus_dmamap_create(sc->sc_dmat,
475 1.1 itohy sizeof(struct njsc32_dma_page), 1,
476 1.1 itohy sizeof(struct njsc32_dma_page), 0, BUS_DMA_NOWAIT,
477 1.1 itohy &sc->sc_dmamap_cmdpg)) != 0) {
478 1.18 joerg aprint_error_dev(sc->sc_dev, "unable to create cmd DMA map, error = %d\n",
479 1.16 cegger error);
480 1.1 itohy goto fail2;
481 1.1 itohy }
482 1.1 itohy if ((error = bus_dmamap_load(sc->sc_dmat, sc->sc_dmamap_cmdpg,
483 1.1 itohy sc->sc_cmdpg, sizeof(struct njsc32_dma_page),
484 1.1 itohy NULL, BUS_DMA_NOWAIT)) != 0) {
485 1.18 joerg aprint_error_dev(sc->sc_dev, "unable to load cmd DMA map, error = %d\n",
486 1.16 cegger error);
487 1.1 itohy goto fail3;
488 1.1 itohy }
489 1.1 itohy
490 1.1 itohy memset(sc->sc_cmdpg, 0, sizeof(struct njsc32_dma_page));
491 1.1 itohy dmaaddr = sc->sc_dmamap_cmdpg->dm_segs[0].ds_addr;
492 1.1 itohy
493 1.1 itohy #ifdef NJSC32_AUTOPARAM
494 1.1 itohy sc->sc_ap_dma = dmaaddr + offsetof(struct njsc32_dma_page, dp_ap);
495 1.1 itohy #endif
496 1.1 itohy
497 1.1 itohy for (i = 0; i < NJSC32_NUM_CMD; i++) {
498 1.1 itohy cmd = &sc->sc_cmds[i];
499 1.1 itohy cmd->c_sc = sc;
500 1.1 itohy cmd->c_sgt = sc->sc_cmdpg->dp_sg[i];
501 1.1 itohy cmd->c_sgt_dma = dmaaddr +
502 1.1 itohy offsetof(struct njsc32_dma_page, dp_sg[i]);
503 1.1 itohy cmd->c_flags = 0;
504 1.1 itohy
505 1.1 itohy error = bus_dmamap_create(sc->sc_dmat,
506 1.1 itohy NJSC32_MAX_XFER, /* max total map size */
507 1.1 itohy NJSC32_NUM_SG, /* max number of segments */
508 1.1 itohy NJSC32_SGT_MAXSEGLEN, /* max size of a segment */
509 1.1 itohy 0, /* boundary */
510 1.1 itohy BUS_DMA_NOWAIT | BUS_DMA_ALLOCNOW, &cmd->c_dmamap_xfer);
511 1.1 itohy if (error) {
512 1.18 joerg aprint_error_dev(sc->sc_dev, "only %d cmd descs available (error = %d)\n",
513 1.16 cegger i, error);
514 1.1 itohy break;
515 1.1 itohy }
516 1.1 itohy TAILQ_INSERT_TAIL(&sc->sc_freecmd, cmd, c_q);
517 1.1 itohy }
518 1.1 itohy
519 1.1 itohy if (i > 0)
520 1.1 itohy return i;
521 1.1 itohy
522 1.6 itohy bus_dmamap_unload(sc->sc_dmat, sc->sc_dmamap_cmdpg);
523 1.1 itohy fail3: bus_dmamap_destroy(sc->sc_dmat, sc->sc_dmamap_cmdpg);
524 1.10 christos fail2: bus_dmamem_unmap(sc->sc_dmat, (void *)sc->sc_cmdpg,
525 1.1 itohy sizeof(struct njsc32_dma_page));
526 1.1 itohy fail1: bus_dmamem_free(sc->sc_dmat, &sc->sc_cmdpg_seg, sc->sc_cmdpg_nsegs);
527 1.1 itohy
528 1.1 itohy return 0;
529 1.1 itohy }
530 1.1 itohy
531 1.1 itohy static void
532 1.2 thorpej njsc32_target_async(struct njsc32_softc *sc, struct njsc32_target *target)
533 1.1 itohy {
534 1.1 itohy
535 1.1 itohy target->t_sync =
536 1.1 itohy NJSC32_SYNC_VAL(sc->sc_sync_max, NJSC32_SYNCOFFSET_ASYNC);
537 1.1 itohy target->t_ackwidth = NJSC32_ACK_WIDTH_1CLK;
538 1.1 itohy target->t_sample = 0; /* disable */
539 1.1 itohy target->t_syncoffset = NJSC32_SYNCOFFSET_ASYNC;
540 1.1 itohy target->t_syncperiod = NJSC32_SYNCPERIOD_ASYNC;
541 1.1 itohy }
542 1.1 itohy
543 1.1 itohy static void
544 1.2 thorpej njsc32_init_targets(struct njsc32_softc *sc)
545 1.1 itohy {
546 1.1 itohy int id, lun;
547 1.1 itohy struct njsc32_lu *lu;
548 1.1 itohy
549 1.1 itohy for (id = 0; id <= NJSC32_MAX_TARGET_ID; id++) {
550 1.1 itohy /* cancel negotiation status */
551 1.1 itohy sc->sc_targets[id].t_state = NJSC32_TARST_INIT;
552 1.1 itohy
553 1.1 itohy /* default to async mode */
554 1.1 itohy njsc32_target_async(sc, &sc->sc_targets[id]);
555 1.1 itohy
556 1.1 itohy #ifdef NJSC32_DUALEDGE
557 1.1 itohy sc->sc_targets[id].t_xferctl = 0;
558 1.1 itohy #endif
559 1.1 itohy
560 1.1 itohy sc->sc_targets[id].t_targetid =
561 1.1 itohy (1 << id) | (1 << NJSC32_INITIATOR_ID);
562 1.1 itohy
563 1.1 itohy /* init logical units */
564 1.1 itohy for (lun = 0; lun < NJSC32_NLU; lun++) {
565 1.1 itohy lu = &sc->sc_targets[id].t_lus[lun];
566 1.1 itohy lu->lu_cmd = NULL;
567 1.1 itohy TAILQ_INIT(&lu->lu_q);
568 1.1 itohy }
569 1.1 itohy }
570 1.1 itohy }
571 1.1 itohy
572 1.1 itohy void
573 1.2 thorpej njsc32_attach(struct njsc32_softc *sc)
574 1.1 itohy {
575 1.1 itohy const char *str;
576 1.1 itohy #if 1 /* test */
577 1.1 itohy int reg;
578 1.1 itohy njsc32_model_t detected_model;
579 1.1 itohy #endif
580 1.1 itohy
581 1.1 itohy /* init */
582 1.1 itohy TAILQ_INIT(&sc->sc_freecmd);
583 1.1 itohy TAILQ_INIT(&sc->sc_reqcmd);
584 1.15 dogcow callout_init(&sc->sc_callout, 0);
585 1.1 itohy
586 1.1 itohy #if 1 /* test */
587 1.1 itohy /*
588 1.1 itohy * try to distinguish 32Bi and 32UDE
589 1.1 itohy */
590 1.1 itohy /* try to set DualEdge bit (exists on 32UDE only) and read it back */
591 1.1 itohy njsc32_write_2(sc, NJSC32_REG_TRANSFER, NJSC32_XFR_DUALEDGE_ENABLE);
592 1.1 itohy if ((reg = njsc32_read_2(sc, NJSC32_REG_TRANSFER)) == 0xffff) {
593 1.1 itohy /* device was removed? */
594 1.18 joerg aprint_error_dev(sc->sc_dev, "attach failed\n");
595 1.1 itohy return;
596 1.1 itohy } else if (reg & NJSC32_XFR_DUALEDGE_ENABLE) {
597 1.1 itohy detected_model = NJSC32_MODEL_32UDE | NJSC32_FLAG_DUALEDGE;
598 1.1 itohy } else {
599 1.1 itohy detected_model = NJSC32_MODEL_32BI;
600 1.1 itohy }
601 1.1 itohy njsc32_write_2(sc, NJSC32_REG_TRANSFER, 0); /* restore */
602 1.1 itohy
603 1.1 itohy #if 1/*def DIAGNOSTIC*/
604 1.1 itohy /* compare what is configured with what is detected */
605 1.1 itohy if ((sc->sc_model & NJSC32_MODEL_MASK) !=
606 1.1 itohy (detected_model & NJSC32_MODEL_MASK)) {
607 1.1 itohy /*
608 1.1 itohy * Please report this error if it happens.
609 1.1 itohy */
610 1.18 joerg aprint_error_dev(sc->sc_dev, "model mismatch: %#x vs %#x\n",
611 1.16 cegger sc->sc_model, detected_model);
612 1.1 itohy return;
613 1.1 itohy }
614 1.1 itohy #endif
615 1.1 itohy #endif
616 1.1 itohy
617 1.1 itohy /* check model */
618 1.1 itohy switch (sc->sc_model & NJSC32_MODEL_MASK) {
619 1.1 itohy case NJSC32_MODEL_32BI:
620 1.1 itohy str = "Bi";
621 1.1 itohy /* 32Bi doesn't support DualEdge transfer */
622 1.1 itohy KASSERT((sc->sc_model & NJSC32_FLAG_DUALEDGE) == 0);
623 1.1 itohy break;
624 1.1 itohy case NJSC32_MODEL_32UDE:
625 1.1 itohy str = "UDE";
626 1.1 itohy break;
627 1.1 itohy default:
628 1.18 joerg aprint_error_dev(sc->sc_dev, "unknown model!\n");
629 1.1 itohy return;
630 1.1 itohy }
631 1.18 joerg aprint_normal_dev(sc->sc_dev, "NJSC-32%s", str);
632 1.1 itohy
633 1.1 itohy switch (sc->sc_clk) {
634 1.1 itohy default:
635 1.1 itohy #ifdef DIAGNOSTIC
636 1.1 itohy panic("njsc32_attach: unknown clk %d", sc->sc_clk);
637 1.1 itohy #endif
638 1.1 itohy case NJSC32_CLOCK_DIV_4:
639 1.1 itohy sc->sc_synct = njsc32_synct_40M;
640 1.1 itohy str = "40MHz";
641 1.1 itohy break;
642 1.1 itohy #ifdef NJSC32_SUPPORT_OTHER_CLOCKS
643 1.1 itohy case NJSC32_CLOCK_DIV_2:
644 1.1 itohy sc->sc_synct = njsc32_synct_20M;
645 1.1 itohy str = "20MHz";
646 1.1 itohy break;
647 1.1 itohy case NJSC32_CLOCK_PCICLK:
648 1.1 itohy sc->sc_synct = njsc32_synct_pci;
649 1.1 itohy str = "PCI";
650 1.1 itohy break;
651 1.1 itohy #endif
652 1.1 itohy }
653 1.1 itohy aprint_normal(", G/A rev %#x, clk %s%s\n",
654 1.1 itohy NJSC32_INDEX_GAREV(njsc32_read_2(sc, NJSC32_REG_INDEX)), str,
655 1.1 itohy (sc->sc_model & NJSC32_FLAG_DUALEDGE) ?
656 1.1 itohy #ifdef NJSC32_DUALEDGE
657 1.1 itohy ", DualEdge"
658 1.1 itohy #else
659 1.1 itohy ", DualEdge (no driver support)"
660 1.1 itohy #endif
661 1.1 itohy : "");
662 1.1 itohy
663 1.1 itohy /* allocate DMA resource */
664 1.1 itohy if ((sc->sc_ncmd = njsc32_init_cmds(sc)) == 0) {
665 1.18 joerg aprint_error_dev(sc->sc_dev, "no usable DMA map\n");
666 1.1 itohy return;
667 1.1 itohy }
668 1.1 itohy sc->sc_flags |= NJSC32_CMDPG_MAPPED;
669 1.1 itohy
670 1.1 itohy sc->sc_curcmd = NULL;
671 1.1 itohy sc->sc_nusedcmds = 0;
672 1.1 itohy
673 1.1 itohy sc->sc_sync_max = 1; /* XXX look up EEPROM configuration? */
674 1.1 itohy
675 1.14 itohy /* initialize hardware and target structure */
676 1.1 itohy njsc32_init(sc, cold);
677 1.1 itohy
678 1.1 itohy /* setup adapter */
679 1.18 joerg sc->sc_adapter.adapt_dev = sc->sc_dev;
680 1.1 itohy sc->sc_adapter.adapt_nchannels = 1;
681 1.1 itohy sc->sc_adapter.adapt_request = njsc32_scsipi_request;
682 1.1 itohy sc->sc_adapter.adapt_minphys = njsc32_scsipi_minphys;
683 1.1 itohy sc->sc_adapter.adapt_ioctl = njsc32_scsipi_ioctl;
684 1.1 itohy
685 1.1 itohy sc->sc_adapter.adapt_max_periph = sc->sc_adapter.adapt_openings =
686 1.1 itohy sc->sc_ncmd;
687 1.1 itohy
688 1.1 itohy /* setup channel */
689 1.1 itohy sc->sc_channel.chan_adapter = &sc->sc_adapter;
690 1.1 itohy sc->sc_channel.chan_bustype = &scsi_bustype;
691 1.1 itohy sc->sc_channel.chan_channel = 0;
692 1.1 itohy sc->sc_channel.chan_ntargets = NJSC32_NTARGET;
693 1.1 itohy sc->sc_channel.chan_nluns = NJSC32_NLU;
694 1.1 itohy sc->sc_channel.chan_id = NJSC32_INITIATOR_ID;
695 1.1 itohy
696 1.18 joerg sc->sc_scsi = config_found(sc->sc_dev, &sc->sc_channel, scsiprint);
697 1.1 itohy }
698 1.1 itohy
699 1.1 itohy int
700 1.2 thorpej njsc32_detach(struct njsc32_softc *sc, int flags)
701 1.1 itohy {
702 1.1 itohy int rv = 0;
703 1.1 itohy int i, s;
704 1.1 itohy struct njsc32_cmd *cmd;
705 1.1 itohy
706 1.14 itohy callout_stop(&sc->sc_callout);
707 1.14 itohy
708 1.1 itohy s = splbio();
709 1.1 itohy
710 1.1 itohy /* clear running/disconnected commands */
711 1.1 itohy njsc32_clear_cmds(sc, XS_DRIVER_STUFFUP);
712 1.1 itohy
713 1.1 itohy sc->sc_stat = NJSC32_STAT_DETACH;
714 1.1 itohy
715 1.1 itohy /* clear pending commands */
716 1.1 itohy while ((cmd = TAILQ_FIRST(&sc->sc_reqcmd)) != NULL) {
717 1.1 itohy TAILQ_REMOVE(&sc->sc_reqcmd, cmd, c_q);
718 1.1 itohy njsc32_end_cmd(sc, cmd, XS_RESET);
719 1.1 itohy }
720 1.1 itohy
721 1.1 itohy if (sc->sc_scsi != NULL)
722 1.1 itohy rv = config_detach(sc->sc_scsi, flags);
723 1.1 itohy
724 1.1 itohy splx(s);
725 1.1 itohy
726 1.1 itohy /* free DMA resource */
727 1.1 itohy if (sc->sc_flags & NJSC32_CMDPG_MAPPED) {
728 1.1 itohy for (i = 0; i < sc->sc_ncmd; i++) {
729 1.1 itohy cmd = &sc->sc_cmds[i];
730 1.1 itohy if (cmd->c_flags & NJSC32_CMD_DMA_MAPPED)
731 1.1 itohy bus_dmamap_unload(sc->sc_dmat,
732 1.1 itohy cmd->c_dmamap_xfer);
733 1.1 itohy bus_dmamap_destroy(sc->sc_dmat, cmd->c_dmamap_xfer);
734 1.1 itohy }
735 1.1 itohy
736 1.1 itohy bus_dmamap_unload(sc->sc_dmat, sc->sc_dmamap_cmdpg);
737 1.1 itohy bus_dmamap_destroy(sc->sc_dmat, sc->sc_dmamap_cmdpg);
738 1.10 christos bus_dmamem_unmap(sc->sc_dmat, (void *)sc->sc_cmdpg,
739 1.1 itohy sizeof(struct njsc32_dma_page));
740 1.1 itohy bus_dmamem_free(sc->sc_dmat, &sc->sc_cmdpg_seg,
741 1.1 itohy sc->sc_cmdpg_nsegs);
742 1.1 itohy }
743 1.1 itohy
744 1.1 itohy return 0;
745 1.1 itohy }
746 1.1 itohy
747 1.5 perry static inline void
748 1.2 thorpej njsc32_cmd_init(struct njsc32_cmd *cmd)
749 1.1 itohy {
750 1.1 itohy
751 1.1 itohy cmd->c_flags = 0;
752 1.1 itohy
753 1.1 itohy /* scatter/gather table */
754 1.1 itohy cmd->c_sgtdmaaddr = NJSC32_CMD_DMAADDR_SGT(cmd, 0);
755 1.1 itohy cmd->c_sgoffset = 0;
756 1.1 itohy cmd->c_sgfixcnt = 0;
757 1.1 itohy
758 1.1 itohy /* data pointer */
759 1.1 itohy cmd->c_dp_cur = cmd->c_dp_saved = cmd->c_dp_max = 0;
760 1.1 itohy }
761 1.1 itohy
762 1.5 perry static inline void
763 1.2 thorpej njsc32_init_msgout(struct njsc32_softc *sc)
764 1.1 itohy {
765 1.1 itohy
766 1.1 itohy sc->sc_msgoutlen = 0;
767 1.1 itohy sc->sc_msgoutidx = 0;
768 1.1 itohy }
769 1.1 itohy
770 1.1 itohy static void
771 1.2 thorpej njsc32_add_msgout(struct njsc32_softc *sc, int byte)
772 1.1 itohy {
773 1.1 itohy
774 1.1 itohy if (sc->sc_msgoutlen >= NJSC32_MSGOUT_LEN) {
775 1.1 itohy printf("njsc32_add_msgout: too many\n");
776 1.1 itohy return;
777 1.1 itohy }
778 1.1 itohy sc->sc_msgout[sc->sc_msgoutlen++] = byte;
779 1.1 itohy }
780 1.1 itohy
781 1.1 itohy static u_int32_t
782 1.2 thorpej njsc32_get_auto_msgout(struct njsc32_softc *sc)
783 1.1 itohy {
784 1.1 itohy u_int32_t val;
785 1.1 itohy u_int8_t *p;
786 1.1 itohy
787 1.1 itohy val = 0;
788 1.1 itohy p = sc->sc_msgout;
789 1.1 itohy switch (sc->sc_msgoutlen) {
790 1.1 itohy /* 31-24 23-16 15-8 7 ... 1 0 */
791 1.1 itohy case 3: /* MSG3 MSG2 MSG1 V --- cnt */
792 1.1 itohy val |= *p++ << NJSC32_MSGOUT_MSG1_SHIFT;
793 1.1 itohy /* FALLTHROUGH */
794 1.1 itohy
795 1.1 itohy case 2: /* MSG2 MSG1 --- V --- cnt */
796 1.1 itohy val |= *p++ << NJSC32_MSGOUT_MSG2_SHIFT;
797 1.1 itohy /* FALLTHROUGH */
798 1.1 itohy
799 1.1 itohy case 1: /* MSG1 --- --- V --- cnt */
800 1.1 itohy val |= *p++ << NJSC32_MSGOUT_MSG3_SHIFT;
801 1.1 itohy val |= NJSC32_MSGOUT_VALID | sc->sc_msgoutlen;
802 1.1 itohy break;
803 1.1 itohy
804 1.1 itohy default:
805 1.1 itohy break;
806 1.1 itohy }
807 1.1 itohy return val;
808 1.1 itohy }
809 1.1 itohy
810 1.1 itohy #ifdef NJSC32_DUALEDGE
811 1.1 itohy /* add Wide Data Transfer Request to the next Message Out */
812 1.1 itohy static void
813 1.2 thorpej njsc32_msgout_wdtr(struct njsc32_softc *sc, int width)
814 1.1 itohy {
815 1.1 itohy
816 1.1 itohy njsc32_add_msgout(sc, MSG_EXTENDED);
817 1.1 itohy njsc32_add_msgout(sc, MSG_EXT_WDTR_LEN);
818 1.1 itohy njsc32_add_msgout(sc, MSG_EXT_WDTR);
819 1.1 itohy njsc32_add_msgout(sc, width);
820 1.1 itohy }
821 1.1 itohy #endif
822 1.1 itohy
823 1.1 itohy /* add Synchronous Data Transfer Request to the next Message Out */
824 1.1 itohy static void
825 1.2 thorpej njsc32_msgout_sdtr(struct njsc32_softc *sc, int period, int offset)
826 1.1 itohy {
827 1.1 itohy
828 1.1 itohy njsc32_add_msgout(sc, MSG_EXTENDED);
829 1.1 itohy njsc32_add_msgout(sc, MSG_EXT_SDTR_LEN);
830 1.1 itohy njsc32_add_msgout(sc, MSG_EXT_SDTR);
831 1.1 itohy njsc32_add_msgout(sc, period);
832 1.1 itohy njsc32_add_msgout(sc, offset);
833 1.1 itohy }
834 1.1 itohy
835 1.1 itohy static void
836 1.2 thorpej njsc32_negotiate_xfer(struct njsc32_softc *sc, struct njsc32_target *target)
837 1.1 itohy {
838 1.1 itohy
839 1.1 itohy /* initial negotiation state */
840 1.1 itohy if (target->t_state == NJSC32_TARST_INIT) {
841 1.1 itohy #ifdef NJSC32_DUALEDGE
842 1.1 itohy if (target->t_flags & NJSC32_TARF_DE)
843 1.1 itohy target->t_state = NJSC32_TARST_DE;
844 1.1 itohy else
845 1.1 itohy #endif
846 1.1 itohy if (target->t_flags & NJSC32_TARF_SYNC)
847 1.1 itohy target->t_state = NJSC32_TARST_SDTR;
848 1.1 itohy else
849 1.1 itohy target->t_state = NJSC32_TARST_DONE;
850 1.1 itohy }
851 1.1 itohy
852 1.1 itohy switch (target->t_state) {
853 1.1 itohy default:
854 1.1 itohy case NJSC32_TARST_INIT:
855 1.1 itohy #ifdef DIAGNOSTIC
856 1.1 itohy panic("njsc32_negotiate_xfer");
857 1.1 itohy /* NOTREACHED */
858 1.1 itohy #endif
859 1.1 itohy /* FALLTHROUGH */
860 1.1 itohy case NJSC32_TARST_DONE:
861 1.1 itohy /* no more work */
862 1.1 itohy break;
863 1.1 itohy
864 1.1 itohy #ifdef NJSC32_DUALEDGE
865 1.1 itohy case NJSC32_TARST_DE:
866 1.1 itohy njsc32_msgout_wdtr(sc, 0xde /* XXX? */);
867 1.1 itohy break;
868 1.1 itohy
869 1.1 itohy case NJSC32_TARST_WDTR:
870 1.1 itohy njsc32_msgout_wdtr(sc, MSG_EXT_WDTR_BUS_8_BIT);
871 1.1 itohy break;
872 1.1 itohy #endif
873 1.1 itohy
874 1.1 itohy case NJSC32_TARST_SDTR:
875 1.1 itohy njsc32_msgout_sdtr(sc, sc->sc_synct[sc->sc_sync_max].sp_period,
876 1.1 itohy NJSC32_SYNCOFFSET_MAX);
877 1.1 itohy break;
878 1.1 itohy
879 1.1 itohy case NJSC32_TARST_ASYNC:
880 1.1 itohy njsc32_msgout_sdtr(sc, NJSC32_SYNCPERIOD_ASYNC,
881 1.1 itohy NJSC32_SYNCOFFSET_ASYNC);
882 1.1 itohy break;
883 1.1 itohy }
884 1.1 itohy }
885 1.1 itohy
886 1.1 itohy /* turn LED on */
887 1.5 perry static inline void
888 1.2 thorpej njsc32_led_on(struct njsc32_softc *sc)
889 1.1 itohy {
890 1.1 itohy
891 1.1 itohy njsc32_ireg_write_1(sc, NJSC32_IREG_EXT_PORT, NJSC32_EXTPORT_LED_ON);
892 1.1 itohy }
893 1.1 itohy
894 1.1 itohy /* turn LED off */
895 1.5 perry static inline void
896 1.2 thorpej njsc32_led_off(struct njsc32_softc *sc)
897 1.1 itohy {
898 1.1 itohy
899 1.1 itohy njsc32_ireg_write_1(sc, NJSC32_IREG_EXT_PORT, NJSC32_EXTPORT_LED_OFF);
900 1.1 itohy }
901 1.1 itohy
902 1.1 itohy static void
903 1.2 thorpej njsc32_arbitration_failed(struct njsc32_softc *sc)
904 1.1 itohy {
905 1.1 itohy struct njsc32_cmd *cmd;
906 1.1 itohy
907 1.1 itohy if ((cmd = sc->sc_curcmd) == NULL || sc->sc_stat != NJSC32_STAT_ARBIT)
908 1.1 itohy return;
909 1.1 itohy
910 1.1 itohy if ((cmd->c_xs->xs_control & XS_CTL_POLL) == 0)
911 1.1 itohy callout_stop(&cmd->c_xs->xs_callout);
912 1.1 itohy
913 1.1 itohy sc->sc_stat = NJSC32_STAT_IDLE;
914 1.1 itohy sc->sc_curcmd = NULL;
915 1.1 itohy
916 1.1 itohy /* the command is no longer active */
917 1.1 itohy if (--sc->sc_nusedcmds == 0)
918 1.1 itohy njsc32_led_off(sc);
919 1.1 itohy }
920 1.1 itohy
921 1.5 perry static inline void
922 1.2 thorpej njsc32_cmd_load(struct njsc32_softc *sc, struct njsc32_cmd *cmd)
923 1.1 itohy {
924 1.1 itohy struct njsc32_target *target;
925 1.1 itohy struct scsipi_xfer *xs;
926 1.1 itohy int i, control, lun;
927 1.1 itohy u_int32_t msgoutreg;
928 1.1 itohy #ifdef NJSC32_AUTOPARAM
929 1.1 itohy struct njsc32_autoparam *ap;
930 1.1 itohy #endif
931 1.1 itohy
932 1.1 itohy xs = cmd->c_xs;
933 1.1 itohy #ifdef NJSC32_AUTOPARAM
934 1.1 itohy ap = &sc->sc_cmdpg->dp_ap;
935 1.1 itohy #else
936 1.1 itohy /* reset CDB pointer */
937 1.1 itohy njsc32_write_2(sc, NJSC32_REG_COMMAND_CONTROL, NJSC32_CMD_CLEAR_CDB_FIFO_PTR);
938 1.1 itohy #endif
939 1.1 itohy
940 1.1 itohy /* CDB */
941 1.1 itohy TPRINTC(cmd, ("njsc32_cmd_load: CDB"));
942 1.1 itohy for (i = 0; i < xs->cmdlen; i++) {
943 1.1 itohy #ifdef NJSC32_AUTOPARAM
944 1.1 itohy ap->ap_cdb[i].cdb_data = ((u_int8_t *)xs->cmd)[i];
945 1.1 itohy #else
946 1.1 itohy njsc32_write_1(sc, NJSC32_REG_COMMAND_DATA,
947 1.1 itohy ((u_int8_t *)xs->cmd)[i]);
948 1.1 itohy #endif
949 1.1 itohy TPRINTF((" %02x", ((u_int8_t *)cmd->c_xs->cmd)[i]));
950 1.1 itohy }
951 1.1 itohy #ifdef NJSC32_AUTOPARAM /* XXX needed? */
952 1.1 itohy for ( ; i < NJSC32_AUTOPARAM_CDBLEN; i++)
953 1.1 itohy ap->ap_cdb[i].cdb_data = 0;
954 1.1 itohy #endif
955 1.1 itohy
956 1.1 itohy control = xs->xs_control;
957 1.1 itohy
958 1.1 itohy /*
959 1.1 itohy * Message Out
960 1.1 itohy */
961 1.1 itohy njsc32_init_msgout(sc);
962 1.1 itohy
963 1.1 itohy /* Identify */
964 1.1 itohy lun = xs->xs_periph->periph_lun;
965 1.1 itohy njsc32_add_msgout(sc, (control & XS_CTL_REQSENSE) ?
966 1.1 itohy MSG_IDENTIFY(lun, 0) : MSG_IDENTIFY(lun, 1));
967 1.1 itohy
968 1.1 itohy /* tagged queueing */
969 1.1 itohy if (control & XS_CTL_TAGMASK) {
970 1.1 itohy njsc32_add_msgout(sc, xs->xs_tag_type);
971 1.1 itohy njsc32_add_msgout(sc, xs->xs_tag_id);
972 1.1 itohy TPRINTF((" (tag %#x %#x)\n", xs->xs_tag_type, xs->xs_tag_id));
973 1.1 itohy }
974 1.1 itohy TPRINTF(("\n"));
975 1.1 itohy
976 1.1 itohy target = cmd->c_target;
977 1.1 itohy
978 1.1 itohy /* transfer negotiation */
979 1.1 itohy if (control & XS_CTL_REQSENSE)
980 1.1 itohy target->t_state = NJSC32_TARST_INIT;
981 1.1 itohy njsc32_negotiate_xfer(sc, target);
982 1.1 itohy
983 1.1 itohy msgoutreg = njsc32_get_auto_msgout(sc);
984 1.1 itohy
985 1.1 itohy #ifdef NJSC32_AUTOPARAM
986 1.1 itohy ap->ap_msgout = htole32(msgoutreg);
987 1.1 itohy
988 1.1 itohy ap->ap_sync = target->t_sync;
989 1.1 itohy ap->ap_ackwidth = target->t_ackwidth;
990 1.1 itohy ap->ap_targetid = target->t_targetid;
991 1.1 itohy ap->ap_sample = target->t_sample;
992 1.1 itohy
993 1.1 itohy ap->ap_cmdctl = htole16(NJSC32_CMD_CLEAR_CDB_FIFO_PTR |
994 1.1 itohy NJSC32_CMD_AUTO_COMMAND_PHASE |
995 1.1 itohy NJSC32_CMD_AUTO_SCSI_START | NJSC32_CMD_AUTO_ATN |
996 1.1 itohy NJSC32_CMD_AUTO_MSGIN_00_04 | NJSC32_CMD_AUTO_MSGIN_02);
997 1.1 itohy #ifdef NJSC32_DUALEDGE
998 1.1 itohy ap->ap_xferctl = htole16(cmd->c_xferctl | target->t_xferctl);
999 1.1 itohy #else
1000 1.1 itohy ap->ap_xferctl = htole16(cmd->c_xferctl);
1001 1.1 itohy #endif
1002 1.1 itohy ap->ap_sgtdmaaddr = htole32(cmd->c_sgtdmaaddr);
1003 1.1 itohy
1004 1.1 itohy /* sync njsc32_autoparam */
1005 1.1 itohy bus_dmamap_sync(sc->sc_dmat, sc->sc_dmamap_cmdpg,
1006 1.1 itohy offsetof(struct njsc32_dma_page, dp_ap), /* offset */
1007 1.1 itohy sizeof(struct njsc32_autoparam),
1008 1.1 itohy BUS_DMASYNC_PREWRITE);
1009 1.1 itohy
1010 1.1 itohy /* autoparam DMA address */
1011 1.1 itohy njsc32_write_4(sc, NJSC32_REG_SGT_ADR, sc->sc_ap_dma);
1012 1.1 itohy
1013 1.1 itohy /* start command (autoparam) */
1014 1.1 itohy njsc32_write_2(sc, NJSC32_REG_COMMAND_CONTROL,
1015 1.1 itohy NJSC32_CMD_CLEAR_CDB_FIFO_PTR | NJSC32_CMD_AUTO_PARAMETER);
1016 1.1 itohy
1017 1.1 itohy #else /* not NJSC32_AUTOPARAM */
1018 1.1 itohy
1019 1.1 itohy njsc32_write_4(sc, NJSC32_REG_SCSI_MSG_OUT, msgoutreg);
1020 1.1 itohy
1021 1.1 itohy /* load parameters */
1022 1.1 itohy njsc32_write_1(sc, NJSC32_REG_TARGET_ID, target->t_targetid);
1023 1.1 itohy njsc32_write_1(sc, NJSC32_REG_SYNC, target->t_sync);
1024 1.1 itohy njsc32_write_1(sc, NJSC32_REG_ACK_WIDTH, target->t_ackwidth);
1025 1.1 itohy njsc32_write_1(sc, NJSC32_REG_SREQ_SAMPLING, target->t_sample);
1026 1.1 itohy njsc32_write_4(sc, NJSC32_REG_SGT_ADR, cmd->c_sgtdmaaddr);
1027 1.1 itohy #ifdef NJSC32_DUALEDGE
1028 1.1 itohy njsc32_write_2(sc, NJSC32_REG_TRANSFER,
1029 1.1 itohy cmd->c_xferctl | target->t_xferctl);
1030 1.1 itohy #else
1031 1.1 itohy njsc32_write_2(sc, NJSC32_REG_TRANSFER, cmd->c_xferctl);
1032 1.1 itohy #endif
1033 1.1 itohy /* start AutoSCSI */
1034 1.1 itohy njsc32_write_2(sc, NJSC32_REG_COMMAND_CONTROL,
1035 1.1 itohy NJSC32_CMD_CLEAR_CDB_FIFO_PTR | NJSC32_CMD_AUTO_COMMAND_PHASE |
1036 1.1 itohy NJSC32_CMD_AUTO_SCSI_START | NJSC32_CMD_AUTO_ATN |
1037 1.1 itohy NJSC32_CMD_AUTO_MSGIN_00_04 | NJSC32_CMD_AUTO_MSGIN_02);
1038 1.1 itohy #endif /* not NJSC32_AUTOPARAM */
1039 1.1 itohy }
1040 1.1 itohy
1041 1.1 itohy /* Note: must be called at splbio() */
1042 1.1 itohy static void
1043 1.2 thorpej njsc32_start(struct njsc32_softc *sc)
1044 1.1 itohy {
1045 1.1 itohy struct njsc32_cmd *cmd;
1046 1.1 itohy
1047 1.1 itohy /* get a command to issue */
1048 1.1 itohy TAILQ_FOREACH(cmd, &sc->sc_reqcmd, c_q) {
1049 1.1 itohy if (cmd->c_lu->lu_cmd == NULL &&
1050 1.1 itohy ((cmd->c_flags & NJSC32_CMD_TAGGED) ||
1051 1.1 itohy TAILQ_EMPTY(&cmd->c_lu->lu_q)))
1052 1.1 itohy break; /* OK, the logical unit is free */
1053 1.1 itohy }
1054 1.1 itohy if (!cmd)
1055 1.1 itohy goto out; /* no work to do */
1056 1.1 itohy
1057 1.1 itohy /* request will always fail if not in bus free phase */
1058 1.1 itohy if (njsc32_read_1(sc, NJSC32_REG_SCSI_BUS_MONITOR) !=
1059 1.1 itohy NJSC32_BUSMON_BUSFREE)
1060 1.1 itohy goto busy;
1061 1.1 itohy
1062 1.1 itohy /* clear parity error and enable parity detection */
1063 1.1 itohy njsc32_write_1(sc, NJSC32_REG_PARITY_CONTROL,
1064 1.1 itohy NJSC32_PARITYCTL_CHECK_ENABLE | NJSC32_PARITYCTL_CLEAR_ERROR);
1065 1.1 itohy
1066 1.1 itohy njsc32_cmd_load(sc, cmd);
1067 1.1 itohy
1068 1.1 itohy if (sc->sc_nusedcmds++ == 0)
1069 1.1 itohy njsc32_led_on(sc);
1070 1.1 itohy
1071 1.1 itohy sc->sc_curcmd = cmd;
1072 1.1 itohy sc->sc_stat = NJSC32_STAT_ARBIT;
1073 1.1 itohy
1074 1.1 itohy if ((cmd->c_xs->xs_control & XS_CTL_POLL) == 0) {
1075 1.1 itohy callout_reset(&cmd->c_xs->xs_callout,
1076 1.1 itohy mstohz(cmd->c_xs->timeout),
1077 1.1 itohy njsc32_cmdtimeout, cmd);
1078 1.1 itohy }
1079 1.1 itohy
1080 1.1 itohy return;
1081 1.1 itohy
1082 1.1 itohy busy: /* XXX retry counter */
1083 1.18 joerg TPRINTF(("%s: njsc32_start: busy\n", device_xname(sc->sc_dev)));
1084 1.1 itohy njsc32_write_2(sc, NJSC32_REG_TIMER, NJSC32_ARBITRATION_RETRY_TIME);
1085 1.1 itohy out: njsc32_write_2(sc, NJSC32_REG_TRANSFER, 0);
1086 1.1 itohy }
1087 1.1 itohy
1088 1.1 itohy static void
1089 1.2 thorpej njsc32_run_xfer(struct njsc32_softc *sc, struct scsipi_xfer *xs)
1090 1.1 itohy {
1091 1.1 itohy struct scsipi_periph *periph;
1092 1.1 itohy int control;
1093 1.1 itohy int lun;
1094 1.1 itohy struct njsc32_cmd *cmd;
1095 1.1 itohy int s, i, error;
1096 1.1 itohy
1097 1.1 itohy periph = xs->xs_periph;
1098 1.1 itohy KASSERT((unsigned)periph->periph_target <= NJSC32_MAX_TARGET_ID);
1099 1.1 itohy
1100 1.1 itohy control = xs->xs_control;
1101 1.1 itohy lun = periph->periph_lun;
1102 1.1 itohy
1103 1.1 itohy /*
1104 1.1 itohy * get a free cmd
1105 1.1 itohy * (scsipi layer knows the number of cmds, so this shall never fail)
1106 1.1 itohy */
1107 1.1 itohy s = splbio();
1108 1.1 itohy cmd = TAILQ_FIRST(&sc->sc_freecmd);
1109 1.1 itohy KASSERT(cmd);
1110 1.1 itohy TAILQ_REMOVE(&sc->sc_freecmd, cmd, c_q);
1111 1.1 itohy splx(s);
1112 1.1 itohy
1113 1.1 itohy /*
1114 1.1 itohy * build a request
1115 1.1 itohy */
1116 1.1 itohy njsc32_cmd_init(cmd);
1117 1.1 itohy cmd->c_xs = xs;
1118 1.1 itohy cmd->c_target = &sc->sc_targets[periph->periph_target];
1119 1.1 itohy cmd->c_lu = &cmd->c_target->t_lus[lun];
1120 1.1 itohy
1121 1.1 itohy /* tagged queueing */
1122 1.1 itohy if (control & XS_CTL_TAGMASK) {
1123 1.1 itohy cmd->c_flags |= NJSC32_CMD_TAGGED;
1124 1.1 itohy if (control & XS_CTL_HEAD_TAG)
1125 1.1 itohy cmd->c_flags |= NJSC32_CMD_TAGGED_HEAD;
1126 1.1 itohy }
1127 1.1 itohy
1128 1.1 itohy /* map DMA buffer */
1129 1.1 itohy cmd->c_datacnt = xs->datalen;
1130 1.1 itohy if (xs->datalen) {
1131 1.1 itohy /* Is XS_CTL_DATA_UIO ever used anywhere? */
1132 1.1 itohy KASSERT((control & XS_CTL_DATA_UIO) == 0);
1133 1.1 itohy
1134 1.1 itohy error = bus_dmamap_load(sc->sc_dmat, cmd->c_dmamap_xfer,
1135 1.1 itohy xs->data, xs->datalen, NULL,
1136 1.1 itohy ((control & XS_CTL_NOSLEEP) ?
1137 1.1 itohy BUS_DMA_NOWAIT : BUS_DMA_WAITOK) |
1138 1.1 itohy BUS_DMA_STREAMING |
1139 1.1 itohy ((control & XS_CTL_DATA_IN) ?
1140 1.1 itohy BUS_DMA_READ : BUS_DMA_WRITE));
1141 1.1 itohy
1142 1.1 itohy switch (error) {
1143 1.1 itohy case 0:
1144 1.1 itohy break;
1145 1.1 itohy case ENOMEM:
1146 1.1 itohy case EAGAIN:
1147 1.1 itohy xs->error = XS_RESOURCE_SHORTAGE;
1148 1.1 itohy goto map_failed;
1149 1.1 itohy default:
1150 1.1 itohy xs->error = XS_DRIVER_STUFFUP;
1151 1.1 itohy map_failed:
1152 1.18 joerg aprint_error_dev(sc->sc_dev, "njsc32_run_xfer: map failed, error %d\n",
1153 1.16 cegger error);
1154 1.1 itohy /* put it back to free command list */
1155 1.1 itohy s = splbio();
1156 1.1 itohy TAILQ_INSERT_HEAD(&sc->sc_freecmd, cmd, c_q);
1157 1.1 itohy splx(s);
1158 1.1 itohy /* abort this transfer */
1159 1.1 itohy scsipi_done(xs);
1160 1.1 itohy return;
1161 1.1 itohy }
1162 1.1 itohy
1163 1.1 itohy bus_dmamap_sync(sc->sc_dmat, cmd->c_dmamap_xfer,
1164 1.1 itohy 0, cmd->c_dmamap_xfer->dm_mapsize,
1165 1.1 itohy (control & XS_CTL_DATA_IN) ?
1166 1.1 itohy BUS_DMASYNC_PREREAD : BUS_DMASYNC_PREWRITE);
1167 1.1 itohy
1168 1.1 itohy for (i = 0; i < cmd->c_dmamap_xfer->dm_nsegs; i++) {
1169 1.1 itohy cmd->c_sgt[i].sg_addr =
1170 1.1 itohy htole32(cmd->c_dmamap_xfer->dm_segs[i].ds_addr);
1171 1.1 itohy cmd->c_sgt[i].sg_len =
1172 1.1 itohy htole32(cmd->c_dmamap_xfer->dm_segs[i].ds_len);
1173 1.1 itohy }
1174 1.1 itohy /* end mark */
1175 1.1 itohy cmd->c_sgt[i - 1].sg_len |= htole32(NJSC32_SGT_ENDMARK);
1176 1.1 itohy
1177 1.1 itohy bus_dmamap_sync(sc->sc_dmat, sc->sc_dmamap_cmdpg,
1178 1.1 itohy (char *)cmd->c_sgt - (char *)sc->sc_cmdpg, /* offset */
1179 1.1 itohy NJSC32_SIZE_SGT,
1180 1.1 itohy BUS_DMASYNC_PREWRITE);
1181 1.1 itohy
1182 1.1 itohy cmd->c_flags |= NJSC32_CMD_DMA_MAPPED;
1183 1.1 itohy
1184 1.1 itohy /* enable transfer */
1185 1.1 itohy cmd->c_xferctl =
1186 1.1 itohy NJSC32_XFR_TRANSFER_GO | NJSC32_XFR_BM_START |
1187 1.1 itohy NJSC32_XFR_ALL_COUNT_CLR;
1188 1.1 itohy
1189 1.1 itohy /* XXX How can we specify the DMA direction? */
1190 1.1 itohy
1191 1.1 itohy #if 0 /* faster write mode? (doesn't work) */
1192 1.1 itohy if ((control & XS_CTL_DATA_IN) == 0)
1193 1.1 itohy cmd->c_xferctl |= NJSC32_XFR_ADVANCED_BM_WRITE;
1194 1.1 itohy #endif
1195 1.1 itohy } else {
1196 1.1 itohy /* no data transfer */
1197 1.1 itohy cmd->c_xferctl = 0;
1198 1.1 itohy }
1199 1.1 itohy
1200 1.1 itohy /* queue request */
1201 1.1 itohy s = splbio();
1202 1.1 itohy TAILQ_INSERT_TAIL(&sc->sc_reqcmd, cmd, c_q);
1203 1.1 itohy
1204 1.1 itohy /* start the controller if idle */
1205 1.1 itohy if (sc->sc_stat == NJSC32_STAT_IDLE)
1206 1.1 itohy njsc32_start(sc);
1207 1.1 itohy
1208 1.1 itohy splx(s);
1209 1.1 itohy
1210 1.1 itohy if (control & XS_CTL_POLL) {
1211 1.1 itohy /* wait for completion */
1212 1.1 itohy /* XXX should handle timeout? */
1213 1.1 itohy while ((xs->xs_status & XS_STS_DONE) == 0) {
1214 1.1 itohy delay(1000);
1215 1.1 itohy njsc32_intr(sc);
1216 1.1 itohy }
1217 1.1 itohy }
1218 1.1 itohy }
1219 1.1 itohy
1220 1.1 itohy static void
1221 1.2 thorpej njsc32_end_cmd(struct njsc32_softc *sc, struct njsc32_cmd *cmd,
1222 1.2 thorpej scsipi_xfer_result_t result)
1223 1.1 itohy {
1224 1.1 itohy struct scsipi_xfer *xs;
1225 1.1 itohy int s;
1226 1.1 itohy #ifdef DIAGNOSTIC
1227 1.1 itohy struct njsc32_cmd *c;
1228 1.1 itohy #endif
1229 1.1 itohy
1230 1.1 itohy KASSERT(cmd);
1231 1.1 itohy
1232 1.1 itohy #ifdef DIAGNOSTIC
1233 1.1 itohy s = splbio();
1234 1.1 itohy TAILQ_FOREACH(c, &sc->sc_freecmd, c_q) {
1235 1.1 itohy if (cmd == c)
1236 1.1 itohy panic("njsc32_end_cmd: already in free list");
1237 1.1 itohy }
1238 1.1 itohy splx(s);
1239 1.1 itohy #endif
1240 1.1 itohy xs = cmd->c_xs;
1241 1.1 itohy
1242 1.1 itohy if (cmd->c_flags & NJSC32_CMD_DMA_MAPPED) {
1243 1.1 itohy if (cmd->c_datacnt) {
1244 1.1 itohy bus_dmamap_sync(sc->sc_dmat, cmd->c_dmamap_xfer,
1245 1.1 itohy 0, cmd->c_dmamap_xfer->dm_mapsize,
1246 1.1 itohy (xs->xs_control & XS_CTL_DATA_IN) ?
1247 1.1 itohy BUS_DMASYNC_POSTREAD : BUS_DMASYNC_POSTWRITE);
1248 1.1 itohy
1249 1.1 itohy bus_dmamap_sync(sc->sc_dmat, sc->sc_dmamap_cmdpg,
1250 1.1 itohy (char *)cmd->c_sgt - (char *)sc->sc_cmdpg,
1251 1.1 itohy NJSC32_SIZE_SGT, BUS_DMASYNC_POSTWRITE);
1252 1.1 itohy }
1253 1.1 itohy
1254 1.1 itohy bus_dmamap_unload(sc->sc_dmat, cmd->c_dmamap_xfer);
1255 1.1 itohy cmd->c_flags &= ~NJSC32_CMD_DMA_MAPPED;
1256 1.1 itohy }
1257 1.1 itohy
1258 1.1 itohy s = splbio();
1259 1.1 itohy if ((xs->xs_control & XS_CTL_POLL) == 0)
1260 1.1 itohy callout_stop(&xs->xs_callout);
1261 1.1 itohy
1262 1.1 itohy TAILQ_INSERT_HEAD(&sc->sc_freecmd, cmd, c_q);
1263 1.1 itohy splx(s);
1264 1.1 itohy
1265 1.1 itohy xs->error = result;
1266 1.1 itohy scsipi_done(xs);
1267 1.1 itohy
1268 1.1 itohy if (--sc->sc_nusedcmds == 0)
1269 1.1 itohy njsc32_led_off(sc);
1270 1.1 itohy }
1271 1.1 itohy
1272 1.1 itohy /*
1273 1.1 itohy * request from scsipi layer
1274 1.1 itohy */
1275 1.2 thorpej static void
1276 1.2 thorpej njsc32_scsipi_request(struct scsipi_channel *chan, scsipi_adapter_req_t req,
1277 1.2 thorpej void *arg)
1278 1.1 itohy {
1279 1.1 itohy struct njsc32_softc *sc;
1280 1.1 itohy struct scsipi_xfer_mode *xm;
1281 1.1 itohy struct njsc32_target *target;
1282 1.1 itohy
1283 1.1 itohy sc = (void *)chan->chan_adapter->adapt_dev;
1284 1.1 itohy
1285 1.1 itohy switch (req) {
1286 1.1 itohy case ADAPTER_REQ_RUN_XFER:
1287 1.1 itohy njsc32_run_xfer(sc, arg);
1288 1.1 itohy break;
1289 1.1 itohy
1290 1.1 itohy case ADAPTER_REQ_GROW_RESOURCES:
1291 1.1 itohy /* not supported */
1292 1.1 itohy break;
1293 1.1 itohy
1294 1.1 itohy case ADAPTER_REQ_SET_XFER_MODE:
1295 1.1 itohy xm = arg;
1296 1.1 itohy target = &sc->sc_targets[xm->xm_target];
1297 1.1 itohy
1298 1.1 itohy target->t_flags = 0;
1299 1.1 itohy if (xm->xm_mode & PERIPH_CAP_TQING)
1300 1.1 itohy target->t_flags |= NJSC32_TARF_TAG;
1301 1.1 itohy if (xm->xm_mode & PERIPH_CAP_SYNC) {
1302 1.1 itohy target->t_flags |= NJSC32_TARF_SYNC;
1303 1.1 itohy #ifdef NJSC32_DUALEDGE
1304 1.1 itohy if (sc->sc_model & NJSC32_FLAG_DUALEDGE)
1305 1.1 itohy target->t_flags |= NJSC32_TARF_DE;
1306 1.1 itohy #endif
1307 1.1 itohy }
1308 1.1 itohy #ifdef NJSC32_DUALEDGE
1309 1.1 itohy target->t_xferctl = 0;
1310 1.1 itohy #endif
1311 1.1 itohy target->t_state = NJSC32_TARST_INIT;
1312 1.1 itohy njsc32_target_async(sc, target);
1313 1.1 itohy
1314 1.1 itohy break;
1315 1.1 itohy default:
1316 1.1 itohy break;
1317 1.1 itohy }
1318 1.1 itohy }
1319 1.1 itohy
1320 1.2 thorpej static void
1321 1.2 thorpej njsc32_scsipi_minphys(struct buf *bp)
1322 1.1 itohy {
1323 1.1 itohy
1324 1.1 itohy if (bp->b_bcount > NJSC32_MAX_XFER)
1325 1.1 itohy bp->b_bcount = NJSC32_MAX_XFER;
1326 1.1 itohy minphys(bp);
1327 1.1 itohy }
1328 1.1 itohy
1329 1.14 itohy /*
1330 1.14 itohy * On some versions of 32UDE (probably the earlier ones), the controller
1331 1.14 itohy * detects continuous bus reset when the termination power is absent.
1332 1.14 itohy * Make sure the system won't hang on such situation.
1333 1.14 itohy */
1334 1.14 itohy static void
1335 1.14 itohy njsc32_wait_reset_release(void *arg)
1336 1.14 itohy {
1337 1.14 itohy struct njsc32_softc *sc = arg;
1338 1.14 itohy struct njsc32_cmd *cmd;
1339 1.14 itohy
1340 1.14 itohy /* clear pending commands */
1341 1.14 itohy while ((cmd = TAILQ_FIRST(&sc->sc_reqcmd)) != NULL) {
1342 1.14 itohy TAILQ_REMOVE(&sc->sc_reqcmd, cmd, c_q);
1343 1.14 itohy njsc32_end_cmd(sc, cmd, XS_RESET);
1344 1.14 itohy }
1345 1.14 itohy
1346 1.14 itohy /* If Bus Reset is not released yet, schedule recheck. */
1347 1.14 itohy if (njsc32_read_2(sc, NJSC32_REG_IRQ) & NJSC32_IRQ_SCSIRESET) {
1348 1.14 itohy switch (sc->sc_stat) {
1349 1.14 itohy case NJSC32_STAT_RESET:
1350 1.14 itohy sc->sc_stat = NJSC32_STAT_RESET1;
1351 1.14 itohy break;
1352 1.14 itohy case NJSC32_STAT_RESET1:
1353 1.14 itohy /* print message if Bus Reset is detected twice */
1354 1.14 itohy sc->sc_stat = NJSC32_STAT_RESET2;
1355 1.14 itohy printf("%s: detected excessive bus reset --- missing termination power?\n",
1356 1.18 joerg device_xname(sc->sc_dev));
1357 1.14 itohy break;
1358 1.14 itohy default:
1359 1.14 itohy break;
1360 1.14 itohy }
1361 1.14 itohy callout_reset(&sc->sc_callout,
1362 1.14 itohy hz * 2 /* poll every 2s */,
1363 1.14 itohy njsc32_wait_reset_release, sc);
1364 1.14 itohy return;
1365 1.14 itohy }
1366 1.14 itohy
1367 1.14 itohy if (sc->sc_stat == NJSC32_STAT_RESET2)
1368 1.18 joerg printf("%s: bus reset is released\n", device_xname(sc->sc_dev));
1369 1.14 itohy
1370 1.14 itohy /* unblock interrupts */
1371 1.14 itohy njsc32_write_2(sc, NJSC32_REG_IRQ, 0);
1372 1.14 itohy
1373 1.14 itohy sc->sc_stat = NJSC32_STAT_IDLE;
1374 1.14 itohy }
1375 1.14 itohy
1376 1.1 itohy static void
1377 1.2 thorpej njsc32_reset_bus(struct njsc32_softc *sc)
1378 1.1 itohy {
1379 1.1 itohy int s;
1380 1.1 itohy
1381 1.18 joerg DPRINTF(("%s: njsc32_reset_bus:\n", device_xname(sc->sc_dev)));
1382 1.1 itohy
1383 1.14 itohy /* block interrupts */
1384 1.14 itohy njsc32_write_2(sc, NJSC32_REG_IRQ, NJSC32_IRQ_MASK_ALL);
1385 1.14 itohy
1386 1.14 itohy sc->sc_stat = NJSC32_STAT_RESET;
1387 1.14 itohy
1388 1.14 itohy /* hold SCSI bus reset */
1389 1.1 itohy njsc32_write_1(sc, NJSC32_REG_SCSI_BUS_CONTROL, NJSC32_SBCTL_RST);
1390 1.1 itohy delay(NJSC32_RESET_HOLD_TIME);
1391 1.1 itohy
1392 1.1 itohy /* clear transfer */
1393 1.14 itohy njsc32_clear_cmds(sc, XS_RESET);
1394 1.14 itohy
1395 1.14 itohy /* initialize target structure */
1396 1.14 itohy njsc32_init_targets(sc);
1397 1.14 itohy
1398 1.1 itohy s = splbio();
1399 1.14 itohy scsipi_async_event(&sc->sc_channel, ASYNC_EVENT_RESET, NULL);
1400 1.1 itohy splx(s);
1401 1.14 itohy
1402 1.14 itohy /* release SCSI bus reset */
1403 1.14 itohy njsc32_write_1(sc, NJSC32_REG_SCSI_BUS_CONTROL, 0);
1404 1.14 itohy
1405 1.14 itohy njsc32_wait_reset_release(sc);
1406 1.1 itohy }
1407 1.1 itohy
1408 1.1 itohy /*
1409 1.1 itohy * clear running/disconnected commands
1410 1.1 itohy */
1411 1.1 itohy static void
1412 1.2 thorpej njsc32_clear_cmds(struct njsc32_softc *sc, scsipi_xfer_result_t cmdresult)
1413 1.1 itohy {
1414 1.1 itohy struct njsc32_cmd *cmd;
1415 1.1 itohy int id, lun;
1416 1.1 itohy struct njsc32_lu *lu;
1417 1.1 itohy
1418 1.1 itohy njsc32_arbitration_failed(sc);
1419 1.1 itohy
1420 1.1 itohy /* clear current transfer */
1421 1.1 itohy if ((cmd = sc->sc_curcmd) != NULL) {
1422 1.1 itohy sc->sc_curcmd = NULL;
1423 1.1 itohy njsc32_end_cmd(sc, cmd, cmdresult);
1424 1.1 itohy }
1425 1.1 itohy
1426 1.1 itohy /* clear disconnected transfers */
1427 1.1 itohy for (id = 0; id <= NJSC32_MAX_TARGET_ID; id++) {
1428 1.1 itohy for (lun = 0; lun < NJSC32_NLU; lun++) {
1429 1.1 itohy lu = &sc->sc_targets[id].t_lus[lun];
1430 1.1 itohy
1431 1.1 itohy if ((cmd = lu->lu_cmd) != NULL) {
1432 1.1 itohy lu->lu_cmd = NULL;
1433 1.1 itohy njsc32_end_cmd(sc, cmd, cmdresult);
1434 1.1 itohy }
1435 1.1 itohy while ((cmd = TAILQ_FIRST(&lu->lu_q)) != NULL) {
1436 1.1 itohy TAILQ_REMOVE(&lu->lu_q, cmd, c_q);
1437 1.1 itohy njsc32_end_cmd(sc, cmd, cmdresult);
1438 1.1 itohy }
1439 1.1 itohy }
1440 1.1 itohy }
1441 1.1 itohy }
1442 1.1 itohy
1443 1.2 thorpej static int
1444 1.7 christos njsc32_scsipi_ioctl(struct scsipi_channel *chan, u_long cmd,
1445 1.10 christos void *addr, int flag, struct proc *p)
1446 1.1 itohy {
1447 1.1 itohy struct njsc32_softc *sc = (void *)chan->chan_adapter->adapt_dev;
1448 1.1 itohy
1449 1.1 itohy switch (cmd) {
1450 1.1 itohy case SCBUSIORESET:
1451 1.1 itohy njsc32_init(sc, 0);
1452 1.1 itohy return 0;
1453 1.1 itohy default:
1454 1.1 itohy break;
1455 1.1 itohy }
1456 1.1 itohy
1457 1.1 itohy return ENOTTY;
1458 1.1 itohy }
1459 1.1 itohy
1460 1.1 itohy /*
1461 1.1 itohy * set current data pointer
1462 1.1 itohy */
1463 1.5 perry static inline void
1464 1.2 thorpej njsc32_set_cur_ptr(struct njsc32_cmd *cmd, u_int32_t pos)
1465 1.1 itohy {
1466 1.1 itohy
1467 1.1 itohy /* new current data pointer */
1468 1.1 itohy cmd->c_dp_cur = pos;
1469 1.1 itohy
1470 1.1 itohy /* update number of bytes transferred */
1471 1.1 itohy if (pos > cmd->c_dp_max)
1472 1.1 itohy cmd->c_dp_max = pos;
1473 1.1 itohy }
1474 1.1 itohy
1475 1.1 itohy /*
1476 1.1 itohy * set data pointer for the next transfer
1477 1.1 itohy */
1478 1.1 itohy static void
1479 1.2 thorpej njsc32_set_ptr(struct njsc32_softc *sc, struct njsc32_cmd *cmd, u_int32_t pos)
1480 1.1 itohy {
1481 1.1 itohy struct njsc32_sgtable *sg;
1482 1.1 itohy unsigned sgte;
1483 1.1 itohy u_int32_t len;
1484 1.1 itohy
1485 1.1 itohy /* set current pointer */
1486 1.1 itohy njsc32_set_cur_ptr(cmd, pos);
1487 1.1 itohy
1488 1.1 itohy /* undo previous fix if any */
1489 1.1 itohy if (cmd->c_sgfixcnt != 0) {
1490 1.1 itohy sg = &cmd->c_sgt[cmd->c_sgoffset];
1491 1.1 itohy sg->sg_addr = htole32(le32toh(sg->sg_addr) - cmd->c_sgfixcnt);
1492 1.1 itohy sg->sg_len = htole32(le32toh(sg->sg_len) + cmd->c_sgfixcnt);
1493 1.1 itohy cmd->c_sgfixcnt = 0;
1494 1.1 itohy }
1495 1.1 itohy
1496 1.1 itohy if (pos >= cmd->c_datacnt) {
1497 1.1 itohy /* transfer done */
1498 1.1 itohy #if 1 /*def DIAGNOSTIC*/
1499 1.1 itohy if (pos > cmd->c_datacnt)
1500 1.18 joerg aprint_error_dev(sc->sc_dev, "pos %u too large\n",
1501 1.16 cegger pos - cmd->c_datacnt);
1502 1.1 itohy #endif
1503 1.1 itohy cmd->c_xferctl = 0; /* XXX correct? */
1504 1.1 itohy
1505 1.1 itohy return;
1506 1.1 itohy }
1507 1.1 itohy
1508 1.1 itohy for (sgte = 0, sg = cmd->c_sgt;
1509 1.1 itohy sgte < NJSC32_NUM_SG && pos > 0; sgte++, sg++) {
1510 1.1 itohy len = le32toh(sg->sg_len) & ~NJSC32_SGT_ENDMARK;
1511 1.1 itohy if (pos < len) {
1512 1.1 itohy sg->sg_addr = htole32(le32toh(sg->sg_addr) + pos);
1513 1.1 itohy sg->sg_len = htole32(le32toh(sg->sg_len) - pos);
1514 1.1 itohy cmd->c_sgfixcnt = pos;
1515 1.1 itohy break;
1516 1.1 itohy }
1517 1.1 itohy pos -= len;
1518 1.1 itohy #ifdef DIAGNOSTIC
1519 1.1 itohy if (sg->sg_len & htole32(NJSC32_SGT_ENDMARK)) {
1520 1.1 itohy panic("njsc32_set_ptr: bad pos");
1521 1.1 itohy }
1522 1.1 itohy #endif
1523 1.1 itohy }
1524 1.1 itohy #ifdef DIAGNOSTIC
1525 1.1 itohy if (sgte >= NJSC32_NUM_SG)
1526 1.1 itohy panic("njsc32_set_ptr: bad sg");
1527 1.1 itohy #endif
1528 1.1 itohy if (cmd->c_sgoffset != sgte) {
1529 1.1 itohy cmd->c_sgoffset = sgte;
1530 1.1 itohy cmd->c_sgtdmaaddr = NJSC32_CMD_DMAADDR_SGT(cmd, sgte);
1531 1.1 itohy }
1532 1.1 itohy
1533 1.1 itohy /* XXX overkill */
1534 1.1 itohy bus_dmamap_sync(sc->sc_dmat, sc->sc_dmamap_cmdpg,
1535 1.1 itohy (char *)cmd->c_sgt - (char *)sc->sc_cmdpg, /* offset */
1536 1.1 itohy NJSC32_SIZE_SGT,
1537 1.1 itohy BUS_DMASYNC_PREWRITE);
1538 1.1 itohy }
1539 1.1 itohy
1540 1.1 itohy /*
1541 1.1 itohy * save data pointer
1542 1.1 itohy */
1543 1.5 perry static inline void
1544 1.2 thorpej njsc32_save_ptr(struct njsc32_cmd *cmd)
1545 1.1 itohy {
1546 1.1 itohy
1547 1.1 itohy cmd->c_dp_saved = cmd->c_dp_cur;
1548 1.1 itohy }
1549 1.1 itohy
1550 1.1 itohy static void
1551 1.2 thorpej njsc32_assert_ack(struct njsc32_softc *sc)
1552 1.1 itohy {
1553 1.1 itohy u_int8_t reg;
1554 1.1 itohy
1555 1.1 itohy reg = njsc32_read_1(sc, NJSC32_REG_SCSI_BUS_CONTROL);
1556 1.1 itohy reg |= NJSC32_SBCTL_ACK | NJSC32_SBCTL_ACK_ENABLE;
1557 1.1 itohy #if 0 /* needed? */
1558 1.1 itohy reg |= NJSC32_SBCTL_AUTODIRECTION;
1559 1.1 itohy #endif
1560 1.1 itohy njsc32_write_1(sc, NJSC32_REG_SCSI_BUS_CONTROL, reg);
1561 1.1 itohy }
1562 1.1 itohy
1563 1.1 itohy static void
1564 1.2 thorpej njsc32_negate_ack(struct njsc32_softc *sc)
1565 1.1 itohy {
1566 1.1 itohy u_int8_t reg;
1567 1.1 itohy
1568 1.1 itohy reg = njsc32_read_1(sc, NJSC32_REG_SCSI_BUS_CONTROL);
1569 1.1 itohy #if 0 /* needed? */
1570 1.1 itohy reg |= NJSC32_SBCTL_ACK_ENABLE;
1571 1.1 itohy reg |= NJSC32_SBCTL_AUTODIRECTION;
1572 1.1 itohy #endif
1573 1.1 itohy reg &= ~NJSC32_SBCTL_ACK;
1574 1.1 itohy njsc32_write_1(sc, NJSC32_REG_SCSI_BUS_CONTROL, reg);
1575 1.1 itohy }
1576 1.1 itohy
1577 1.1 itohy static void
1578 1.2 thorpej njsc32_wait_req_negate(struct njsc32_softc *sc)
1579 1.1 itohy {
1580 1.1 itohy int cnt;
1581 1.1 itohy
1582 1.1 itohy for (cnt = 0; cnt < NJSC32_REQ_TIMEOUT; cnt++) {
1583 1.1 itohy if ((njsc32_read_1(sc, NJSC32_REG_SCSI_BUS_MONITOR) &
1584 1.1 itohy NJSC32_BUSMON_REQ) == 0)
1585 1.1 itohy return;
1586 1.1 itohy delay(1);
1587 1.1 itohy }
1588 1.18 joerg printf("%s: njsc32_wait_req_negate: timed out\n", device_xname(sc->sc_dev));
1589 1.1 itohy }
1590 1.1 itohy
1591 1.1 itohy static void
1592 1.2 thorpej njsc32_reconnect(struct njsc32_softc *sc, struct njsc32_cmd *cmd)
1593 1.1 itohy {
1594 1.1 itohy struct scsipi_xfer *xs;
1595 1.1 itohy
1596 1.1 itohy xs = cmd->c_xs;
1597 1.1 itohy if ((xs->xs_control & XS_CTL_POLL) == 0) {
1598 1.1 itohy callout_stop(&xs->xs_callout);
1599 1.1 itohy callout_reset(&xs->xs_callout,
1600 1.1 itohy mstohz(xs->timeout),
1601 1.1 itohy njsc32_cmdtimeout, cmd);
1602 1.1 itohy }
1603 1.1 itohy
1604 1.1 itohy /* Reconnection implies Restore Pointers */
1605 1.1 itohy njsc32_set_ptr(sc, cmd, cmd->c_dp_saved);
1606 1.1 itohy }
1607 1.1 itohy
1608 1.1 itohy static enum njsc32_reselstat
1609 1.2 thorpej njsc32_resel_identify(struct njsc32_softc *sc, int lun,
1610 1.2 thorpej struct njsc32_cmd **pcmd)
1611 1.1 itohy {
1612 1.1 itohy int targetid;
1613 1.1 itohy struct njsc32_lu *plu;
1614 1.1 itohy struct njsc32_cmd *cmd;
1615 1.1 itohy
1616 1.1 itohy switch (sc->sc_stat) {
1617 1.1 itohy case NJSC32_STAT_RESEL:
1618 1.1 itohy break; /* OK */
1619 1.1 itohy
1620 1.1 itohy case NJSC32_STAT_RESEL_LUN:
1621 1.1 itohy case NJSC32_STAT_RECONNECT:
1622 1.1 itohy /*
1623 1.1 itohy * accept and ignore if the LUN is the same as the current one,
1624 1.1 itohy * reject otherwise.
1625 1.1 itohy */
1626 1.1 itohy return sc->sc_resellun == lun ?
1627 1.1 itohy NJSC32_RESEL_THROUGH : NJSC32_RESEL_ERROR;
1628 1.1 itohy
1629 1.1 itohy default:
1630 1.18 joerg aprint_error_dev(sc->sc_dev, "njsc32_resel_identify: not in reselection\n");
1631 1.1 itohy return NJSC32_RESEL_ERROR;
1632 1.1 itohy }
1633 1.1 itohy
1634 1.1 itohy targetid = sc->sc_reselid;
1635 1.1 itohy TPRINTF(("%s: njsc32_resel_identify: reselection lun %d\n",
1636 1.18 joerg device_xname(sc->sc_dev), lun));
1637 1.1 itohy
1638 1.1 itohy if (targetid > NJSC32_MAX_TARGET_ID || lun >= NJSC32_NLU)
1639 1.1 itohy return NJSC32_RESEL_ERROR;
1640 1.1 itohy
1641 1.1 itohy sc->sc_resellun = lun;
1642 1.1 itohy plu = &sc->sc_targets[targetid].t_lus[lun];
1643 1.1 itohy
1644 1.1 itohy if ((cmd = plu->lu_cmd) != NULL) {
1645 1.1 itohy sc->sc_stat = NJSC32_STAT_RECONNECT;
1646 1.1 itohy plu->lu_cmd = NULL;
1647 1.1 itohy *pcmd = cmd;
1648 1.1 itohy TPRINTC(cmd, ("njsc32_resel_identify: I_T_L nexus\n"));
1649 1.1 itohy njsc32_reconnect(sc, cmd);
1650 1.1 itohy return NJSC32_RESEL_COMPLETE;
1651 1.1 itohy } else if (!TAILQ_EMPTY(&plu->lu_q)) {
1652 1.1 itohy /* wait for tag */
1653 1.1 itohy sc->sc_stat = NJSC32_STAT_RESEL_LUN;
1654 1.1 itohy return NJSC32_RESEL_THROUGH;
1655 1.1 itohy }
1656 1.1 itohy
1657 1.1 itohy /* no disconnected commands */
1658 1.1 itohy return NJSC32_RESEL_ERROR;
1659 1.1 itohy }
1660 1.1 itohy
1661 1.1 itohy static enum njsc32_reselstat
1662 1.2 thorpej njsc32_resel_tag(struct njsc32_softc *sc, int tag, struct njsc32_cmd **pcmd)
1663 1.1 itohy {
1664 1.1 itohy struct njsc32_cmd_head *head;
1665 1.1 itohy struct njsc32_cmd *cmd;
1666 1.1 itohy
1667 1.1 itohy TPRINTF(("%s: njsc32_resel_tag: reselection tag %d\n",
1668 1.18 joerg device_xname(sc->sc_dev), tag));
1669 1.1 itohy if (sc->sc_stat != NJSC32_STAT_RESEL_LUN)
1670 1.1 itohy return NJSC32_RESEL_ERROR;
1671 1.1 itohy
1672 1.1 itohy head = &sc->sc_targets[sc->sc_reselid].t_lus[sc->sc_resellun].lu_q;
1673 1.1 itohy
1674 1.1 itohy /* XXX slow? */
1675 1.1 itohy /* search for the command of the tag */
1676 1.1 itohy TAILQ_FOREACH(cmd, head, c_q) {
1677 1.1 itohy if (cmd->c_xs->xs_tag_id == tag) {
1678 1.1 itohy sc->sc_stat = NJSC32_STAT_RECONNECT;
1679 1.1 itohy TAILQ_REMOVE(head, cmd, c_q);
1680 1.1 itohy *pcmd = cmd;
1681 1.1 itohy TPRINTC(cmd, ("njsc32_resel_tag: I_T_L_Q nexus\n"));
1682 1.1 itohy njsc32_reconnect(sc, cmd);
1683 1.1 itohy return NJSC32_RESEL_COMPLETE;
1684 1.1 itohy }
1685 1.1 itohy }
1686 1.1 itohy
1687 1.1 itohy /* no disconnected commands */
1688 1.1 itohy return NJSC32_RESEL_ERROR;
1689 1.1 itohy }
1690 1.1 itohy
1691 1.1 itohy /*
1692 1.1 itohy * Reload parameters and restart AutoSCSI.
1693 1.1 itohy *
1694 1.1 itohy * XXX autoparam doesn't work as expected and we can't use it here.
1695 1.1 itohy */
1696 1.1 itohy static void
1697 1.2 thorpej njsc32_cmd_reload(struct njsc32_softc *sc, struct njsc32_cmd *cmd, int cctl)
1698 1.1 itohy {
1699 1.1 itohy struct njsc32_target *target;
1700 1.1 itohy
1701 1.1 itohy target = cmd->c_target;
1702 1.1 itohy
1703 1.1 itohy /* clear parity error and enable parity detection */
1704 1.1 itohy njsc32_write_1(sc, NJSC32_REG_PARITY_CONTROL,
1705 1.1 itohy NJSC32_PARITYCTL_CHECK_ENABLE | NJSC32_PARITYCTL_CLEAR_ERROR);
1706 1.1 itohy
1707 1.1 itohy /* load parameters */
1708 1.1 itohy njsc32_write_1(sc, NJSC32_REG_SYNC, target->t_sync);
1709 1.1 itohy njsc32_write_1(sc, NJSC32_REG_ACK_WIDTH, target->t_ackwidth);
1710 1.1 itohy njsc32_write_1(sc, NJSC32_REG_SREQ_SAMPLING, target->t_sample);
1711 1.1 itohy njsc32_write_4(sc, NJSC32_REG_SGT_ADR, cmd->c_sgtdmaaddr);
1712 1.1 itohy #ifdef NJSC32_DUALEDGE
1713 1.1 itohy njsc32_write_2(sc, NJSC32_REG_TRANSFER,
1714 1.1 itohy cmd->c_xferctl | target->t_xferctl);
1715 1.1 itohy #else
1716 1.1 itohy njsc32_write_2(sc, NJSC32_REG_TRANSFER, cmd->c_xferctl);
1717 1.1 itohy #endif
1718 1.1 itohy /* start AutoSCSI */
1719 1.1 itohy njsc32_write_2(sc, NJSC32_REG_COMMAND_CONTROL, cctl);
1720 1.1 itohy
1721 1.1 itohy sc->sc_curcmd = cmd;
1722 1.1 itohy }
1723 1.1 itohy
1724 1.1 itohy static void
1725 1.2 thorpej njsc32_update_xfer_mode(struct njsc32_softc *sc, struct njsc32_target *target)
1726 1.1 itohy {
1727 1.1 itohy struct scsipi_xfer_mode xm;
1728 1.1 itohy
1729 1.1 itohy xm.xm_target = target - sc->sc_targets; /* target ID */
1730 1.1 itohy xm.xm_mode = 0;
1731 1.1 itohy xm.xm_period = target->t_syncperiod;
1732 1.1 itohy xm.xm_offset = target->t_syncoffset;
1733 1.1 itohy if (xm.xm_offset != 0)
1734 1.1 itohy xm.xm_mode |= PERIPH_CAP_SYNC;
1735 1.1 itohy if (target->t_flags & NJSC32_TARF_TAG)
1736 1.1 itohy xm.xm_mode |= PERIPH_CAP_TQING;
1737 1.1 itohy
1738 1.1 itohy scsipi_async_event(&sc->sc_channel, ASYNC_EVENT_XFER_MODE, &xm);
1739 1.1 itohy }
1740 1.1 itohy
1741 1.1 itohy static void
1742 1.2 thorpej njsc32_msgin(struct njsc32_softc *sc)
1743 1.1 itohy {
1744 1.1 itohy u_int8_t msg0, msg;
1745 1.1 itohy int msgcnt;
1746 1.1 itohy struct njsc32_cmd *cmd;
1747 1.1 itohy enum njsc32_reselstat rstat;
1748 1.1 itohy int cctl = 0;
1749 1.1 itohy u_int32_t ptr; /* unsigned type ensures 2-complement calculation */
1750 1.1 itohy u_int32_t msgout = 0;
1751 1.9 thorpej bool reload_params = FALSE;
1752 1.1 itohy struct njsc32_target *target;
1753 1.1 itohy int idx, period, offset;
1754 1.1 itohy
1755 1.1 itohy /*
1756 1.1 itohy * we are in Message In, so the previous Message Out should have
1757 1.1 itohy * been done.
1758 1.1 itohy */
1759 1.1 itohy njsc32_init_msgout(sc);
1760 1.1 itohy
1761 1.1 itohy /* get a byte of Message In */
1762 1.1 itohy msg = njsc32_read_1(sc, NJSC32_REG_DATA_IN);
1763 1.18 joerg TPRINTF(("%s: njsc32_msgin: got %#x\n", device_xname(sc->sc_dev), msg));
1764 1.1 itohy if ((msgcnt = sc->sc_msgincnt) < NJSC32_MSGIN_LEN)
1765 1.1 itohy sc->sc_msginbuf[sc->sc_msgincnt] = msg;
1766 1.1 itohy
1767 1.1 itohy njsc32_assert_ack(sc);
1768 1.1 itohy
1769 1.1 itohy msg0 = sc->sc_msginbuf[0];
1770 1.1 itohy cmd = sc->sc_curcmd;
1771 1.1 itohy
1772 1.1 itohy /* check for parity error */
1773 1.1 itohy if (njsc32_read_1(sc, NJSC32_REG_PARITY_STATUS) &
1774 1.1 itohy NJSC32_PARITYSTATUS_ERROR_LSB) {
1775 1.1 itohy
1776 1.18 joerg aprint_error_dev(sc->sc_dev, "msgin: parity error\n");
1777 1.1 itohy
1778 1.1 itohy /* clear parity error */
1779 1.1 itohy njsc32_write_1(sc, NJSC32_REG_PARITY_CONTROL,
1780 1.1 itohy NJSC32_PARITYCTL_CHECK_ENABLE |
1781 1.1 itohy NJSC32_PARITYCTL_CLEAR_ERROR);
1782 1.1 itohy
1783 1.1 itohy /* respond as Message Parity Error */
1784 1.1 itohy njsc32_add_msgout(sc, MSG_PARITY_ERROR);
1785 1.1 itohy
1786 1.1 itohy /* clear Message In */
1787 1.1 itohy sc->sc_msgincnt = 0;
1788 1.1 itohy goto reply;
1789 1.1 itohy }
1790 1.1 itohy
1791 1.1 itohy #define WAITNEXTMSG do { sc->sc_msgincnt++; goto restart; } while (0)
1792 1.1 itohy #define MSGCOMPLETE do { sc->sc_msgincnt = 0; goto restart; } while (0)
1793 1.1 itohy if (MSG_ISIDENTIFY(msg0)) {
1794 1.1 itohy /*
1795 1.1 itohy * Got Identify message from target.
1796 1.1 itohy */
1797 1.1 itohy if ((msg0 & ~MSG_IDENTIFY_LUNMASK) != MSG_IDENTIFYFLAG ||
1798 1.1 itohy (rstat = njsc32_resel_identify(sc, msg0 &
1799 1.1 itohy MSG_IDENTIFY_LUNMASK, &cmd)) == NJSC32_RESEL_ERROR) {
1800 1.1 itohy /*
1801 1.1 itohy * invalid Identify -> Reject
1802 1.1 itohy */
1803 1.1 itohy goto reject;
1804 1.1 itohy }
1805 1.1 itohy if (rstat == NJSC32_RESEL_COMPLETE)
1806 1.1 itohy reload_params = TRUE;
1807 1.1 itohy MSGCOMPLETE;
1808 1.1 itohy }
1809 1.1 itohy
1810 1.1 itohy if (msg0 == MSG_SIMPLE_Q_TAG) {
1811 1.1 itohy if (msgcnt == 0)
1812 1.1 itohy WAITNEXTMSG;
1813 1.1 itohy
1814 1.1 itohy /* got whole message */
1815 1.1 itohy sc->sc_msgincnt = 0;
1816 1.1 itohy
1817 1.1 itohy if ((rstat = njsc32_resel_tag(sc, sc->sc_msginbuf[1], &cmd))
1818 1.1 itohy == NJSC32_RESEL_ERROR) {
1819 1.1 itohy /*
1820 1.1 itohy * invalid Simple Queue Tag -> Abort Tag
1821 1.1 itohy */
1822 1.18 joerg printf("%s: msgin: invalid tag\n", device_xname(sc->sc_dev));
1823 1.1 itohy njsc32_add_msgout(sc, MSG_ABORT_TAG);
1824 1.1 itohy goto reply;
1825 1.1 itohy }
1826 1.1 itohy if (rstat == NJSC32_RESEL_COMPLETE)
1827 1.1 itohy reload_params = TRUE;
1828 1.1 itohy MSGCOMPLETE;
1829 1.1 itohy }
1830 1.1 itohy
1831 1.1 itohy /* I_T_L or I_T_L_Q nexus should be established now */
1832 1.1 itohy if (cmd == NULL) {
1833 1.1 itohy printf("%s: msgin %#x without nexus -- sending abort\n",
1834 1.18 joerg device_xname(sc->sc_dev), msg0);
1835 1.1 itohy njsc32_add_msgout(sc, MSG_ABORT);
1836 1.1 itohy goto reply;
1837 1.1 itohy }
1838 1.1 itohy
1839 1.1 itohy /*
1840 1.1 itohy * extended message
1841 1.1 itohy * 0x01 <length (0 stands for 256)> <length bytes>
1842 1.1 itohy * (<code> [<parameter> ...])
1843 1.1 itohy */
1844 1.1 itohy #define EXTLENOFF 1
1845 1.1 itohy #define EXTCODEOFF 2
1846 1.1 itohy if (msg0 == MSG_EXTENDED) {
1847 1.1 itohy if (msgcnt < EXTLENOFF ||
1848 1.1 itohy msgcnt < EXTLENOFF + 1 +
1849 1.1 itohy (u_int8_t)(sc->sc_msginbuf[EXTLENOFF] - 1))
1850 1.1 itohy WAITNEXTMSG;
1851 1.1 itohy
1852 1.1 itohy /* got whole message */
1853 1.1 itohy sc->sc_msgincnt = 0;
1854 1.1 itohy
1855 1.1 itohy switch (sc->sc_msginbuf[EXTCODEOFF]) {
1856 1.1 itohy case 0: /* Modify Data Pointer */
1857 1.1 itohy if (msgcnt != 5 + EXTCODEOFF - 1)
1858 1.1 itohy break;
1859 1.1 itohy /*
1860 1.1 itohy * parameter is 32bit big-endian signed (2-complement)
1861 1.1 itohy * value
1862 1.1 itohy */
1863 1.1 itohy ptr = (sc->sc_msginbuf[EXTCODEOFF + 1] << 24) |
1864 1.1 itohy (sc->sc_msginbuf[EXTCODEOFF + 2] << 16) |
1865 1.1 itohy (sc->sc_msginbuf[EXTCODEOFF + 3] << 8) |
1866 1.1 itohy sc->sc_msginbuf[EXTCODEOFF + 4];
1867 1.1 itohy
1868 1.1 itohy /* new pointer */
1869 1.1 itohy ptr += cmd->c_dp_cur; /* ignore overflow */
1870 1.1 itohy
1871 1.1 itohy /* reject if ptr is not in data buffer */
1872 1.1 itohy if (ptr > cmd->c_datacnt)
1873 1.1 itohy break;
1874 1.1 itohy
1875 1.1 itohy njsc32_set_ptr(sc, cmd, ptr);
1876 1.1 itohy goto restart;
1877 1.1 itohy
1878 1.1 itohy case MSG_EXT_SDTR: /* Synchronous Data Transfer Request */
1879 1.1 itohy DPRINTC(cmd, ("SDTR %#x %#x\n",
1880 1.1 itohy sc->sc_msginbuf[EXTCODEOFF + 1],
1881 1.1 itohy sc->sc_msginbuf[EXTCODEOFF + 2]));
1882 1.1 itohy if (msgcnt != MSG_EXT_SDTR_LEN + EXTCODEOFF-1)
1883 1.1 itohy break; /* reject */
1884 1.1 itohy
1885 1.1 itohy target = cmd->c_target;
1886 1.1 itohy
1887 1.1 itohy /* lookup sync period parameters */
1888 1.1 itohy period = sc->sc_msginbuf[EXTCODEOFF + 1];
1889 1.1 itohy for (idx = sc->sc_sync_max; idx < NJSC32_NSYNCT; idx++)
1890 1.1 itohy if (sc->sc_synct[idx].sp_period >= period) {
1891 1.1 itohy period = sc->sc_synct[idx].sp_period;
1892 1.1 itohy break;
1893 1.1 itohy }
1894 1.1 itohy if (idx >= NJSC32_NSYNCT) {
1895 1.1 itohy /*
1896 1.1 itohy * We can't meet the timing condition that
1897 1.1 itohy * the target requests -- use async.
1898 1.1 itohy */
1899 1.1 itohy njsc32_target_async(sc, target);
1900 1.1 itohy njsc32_update_xfer_mode(sc, target);
1901 1.1 itohy if (target->t_state == NJSC32_TARST_SDTR) {
1902 1.1 itohy /*
1903 1.1 itohy * We started SDTR exchange -- start
1904 1.1 itohy * negotiation again and request async.
1905 1.1 itohy */
1906 1.1 itohy target->t_state = NJSC32_TARST_ASYNC;
1907 1.1 itohy njsc32_negotiate_xfer(sc, target);
1908 1.1 itohy goto reply;
1909 1.1 itohy } else {
1910 1.1 itohy /*
1911 1.1 itohy * The target started SDTR exchange
1912 1.1 itohy * -- just reject and fallback
1913 1.1 itohy * to async.
1914 1.1 itohy */
1915 1.1 itohy goto reject;
1916 1.1 itohy }
1917 1.1 itohy }
1918 1.1 itohy
1919 1.1 itohy /* check sync offset */
1920 1.1 itohy offset = sc->sc_msginbuf[EXTCODEOFF + 2];
1921 1.1 itohy if (offset > NJSC32_SYNCOFFSET_MAX) {
1922 1.1 itohy if (target->t_state == NJSC32_TARST_SDTR) {
1923 1.16 cegger aprint_error_dev(cmd->c_xs->xs_periph->periph_dev, "wrong sync offset: %d\n", offset);
1924 1.1 itohy /* XXX what to do? */
1925 1.1 itohy }
1926 1.1 itohy offset = NJSC32_SYNCOFFSET_MAX;
1927 1.1 itohy }
1928 1.1 itohy
1929 1.1 itohy target->t_ackwidth = sc->sc_synct[idx].sp_ackw;
1930 1.1 itohy target->t_sample = sc->sc_synct[idx].sp_sample;
1931 1.1 itohy target->t_syncperiod = period;
1932 1.1 itohy target->t_syncoffset = offset;
1933 1.1 itohy target->t_sync = NJSC32_SYNC_VAL(idx, offset);
1934 1.1 itohy njsc32_update_xfer_mode(sc, target);
1935 1.1 itohy
1936 1.1 itohy if (target->t_state == NJSC32_TARST_SDTR) {
1937 1.1 itohy target->t_state = NJSC32_TARST_DONE;
1938 1.1 itohy } else {
1939 1.1 itohy njsc32_msgout_sdtr(sc, period, offset);
1940 1.1 itohy goto reply;
1941 1.1 itohy }
1942 1.1 itohy goto restart;
1943 1.1 itohy
1944 1.1 itohy case MSG_EXT_WDTR: /* Wide Data Transfer Request */
1945 1.1 itohy DPRINTC(cmd,
1946 1.1 itohy ("WDTR %#x\n", sc->sc_msginbuf[EXTCODEOFF + 1]));
1947 1.1 itohy #ifdef NJSC32_DUALEDGE
1948 1.1 itohy if (msgcnt != MSG_EXT_WDTR_LEN + EXTCODEOFF-1)
1949 1.1 itohy break; /* reject */
1950 1.1 itohy
1951 1.1 itohy /*
1952 1.1 itohy * T->I of this message is not used for
1953 1.1 itohy * DualEdge negotiation, so the device
1954 1.1 itohy * must not be a DualEdge device.
1955 1.1 itohy *
1956 1.1 itohy * XXX correct?
1957 1.1 itohy */
1958 1.1 itohy target = cmd->c_target;
1959 1.1 itohy target->t_xferctl = 0;
1960 1.1 itohy
1961 1.1 itohy switch (target->t_state) {
1962 1.1 itohy case NJSC32_TARST_DE:
1963 1.1 itohy if (sc->sc_msginbuf[EXTCODEOFF + 1] !=
1964 1.1 itohy MSG_EXT_WDTR_BUS_8_BIT) {
1965 1.1 itohy /*
1966 1.1 itohy * Oops, we got unexpected WDTR.
1967 1.1 itohy * Negotiate for 8bit.
1968 1.1 itohy */
1969 1.1 itohy target->t_state = NJSC32_TARST_WDTR;
1970 1.1 itohy } else {
1971 1.1 itohy target->t_state = NJSC32_TARST_SDTR;
1972 1.1 itohy }
1973 1.1 itohy njsc32_negotiate_xfer(sc, target);
1974 1.1 itohy goto reply;
1975 1.1 itohy
1976 1.1 itohy case NJSC32_TARST_WDTR:
1977 1.1 itohy if (sc->sc_msginbuf[EXTCODEOFF + 1] !=
1978 1.1 itohy MSG_EXT_WDTR_BUS_8_BIT) {
1979 1.16 cegger aprint_error_dev(cmd->c_xs->xs_periph->periph_dev, "unexpected transfer width: %#x\n",
1980 1.1 itohy sc->sc_msginbuf[EXTCODEOFF + 1]);
1981 1.1 itohy /* XXX what to do? */
1982 1.1 itohy }
1983 1.1 itohy target->t_state = NJSC32_TARST_SDTR;
1984 1.1 itohy njsc32_negotiate_xfer(sc, target);
1985 1.1 itohy goto reply;
1986 1.1 itohy
1987 1.1 itohy default:
1988 1.1 itohy /* the target started WDTR exchange */
1989 1.1 itohy DPRINTC(cmd, ("WDTR from target\n"));
1990 1.1 itohy
1991 1.1 itohy target->t_state = NJSC32_TARST_SDTR;
1992 1.1 itohy njsc32_target_async(sc, target);
1993 1.1 itohy
1994 1.1 itohy break; /* reject the WDTR (8bit transfer) */
1995 1.1 itohy }
1996 1.1 itohy #endif /* NJSC32_DUALEDGE */
1997 1.1 itohy break; /* reject */
1998 1.1 itohy }
1999 1.1 itohy DPRINTC(cmd, ("njsc32_msgin: reject ext msg %#x msgincnt %d\n",
2000 1.1 itohy sc->sc_msginbuf[EXTCODEOFF], msgcnt));
2001 1.1 itohy goto reject;
2002 1.1 itohy }
2003 1.1 itohy
2004 1.1 itohy /* 2byte messages */
2005 1.1 itohy if (MSG_IS2BYTE(msg0)) {
2006 1.1 itohy if (msgcnt == 0)
2007 1.1 itohy WAITNEXTMSG;
2008 1.1 itohy
2009 1.1 itohy /* got whole message */
2010 1.1 itohy sc->sc_msgincnt = 0;
2011 1.1 itohy }
2012 1.1 itohy
2013 1.1 itohy switch (msg0) {
2014 1.1 itohy case MSG_CMDCOMPLETE: /* 0x00 */
2015 1.1 itohy case MSG_SAVEDATAPOINTER: /* 0x02 */
2016 1.1 itohy case MSG_DISCONNECT: /* 0x04 */
2017 1.1 itohy /* handled by AutoSCSI */
2018 1.1 itohy PRINTC(cmd, ("msgin: unexpected msg: %#x\n", msg0));
2019 1.1 itohy break;
2020 1.1 itohy
2021 1.1 itohy case MSG_RESTOREPOINTERS: /* 0x03 */
2022 1.1 itohy /* restore data pointer to what was saved */
2023 1.1 itohy DPRINTC(cmd, ("njsc32_msgin: Restore Pointers\n"));
2024 1.1 itohy njsc32_set_ptr(sc, cmd, cmd->c_dp_saved);
2025 1.1 itohy reload_params = TRUE;
2026 1.1 itohy MSGCOMPLETE;
2027 1.1 itohy /* NOTREACHED */
2028 1.1 itohy break;
2029 1.1 itohy
2030 1.1 itohy #if 0 /* handled above */
2031 1.1 itohy case MSG_EXTENDED: /* 0x01 */
2032 1.1 itohy #endif
2033 1.1 itohy case MSG_MESSAGE_REJECT: /* 0x07 */
2034 1.1 itohy target = cmd->c_target;
2035 1.1 itohy DPRINTC(cmd, ("Reject tarst %d\n", target->t_state));
2036 1.1 itohy switch (target->t_state) {
2037 1.1 itohy #ifdef NJSC32_DUALEDGE
2038 1.1 itohy case NJSC32_TARST_WDTR:
2039 1.1 itohy case NJSC32_TARST_DE:
2040 1.1 itohy target->t_xferctl = 0;
2041 1.1 itohy target->t_state = NJSC32_TARST_SDTR;
2042 1.1 itohy njsc32_negotiate_xfer(sc, target);
2043 1.1 itohy goto reply;
2044 1.1 itohy #endif
2045 1.1 itohy case NJSC32_TARST_SDTR:
2046 1.1 itohy case NJSC32_TARST_ASYNC:
2047 1.1 itohy njsc32_target_async(sc, target);
2048 1.1 itohy target->t_state = NJSC32_TARST_DONE;
2049 1.1 itohy njsc32_update_xfer_mode(sc, target);
2050 1.1 itohy break;
2051 1.1 itohy default:
2052 1.1 itohy break;
2053 1.1 itohy }
2054 1.1 itohy goto restart;
2055 1.1 itohy
2056 1.1 itohy case MSG_NOOP: /* 0x08 */
2057 1.1 itohy #ifdef NJSC32_DUALEDGE
2058 1.1 itohy target = cmd->c_target;
2059 1.1 itohy if (target->t_state == NJSC32_TARST_DE) {
2060 1.16 cegger aprint_normal_dev(&cmd->c_xs->xs_periph->periph_dev,
2061 1.16 cegger "%s: DualEdge transfer\n");
2062 1.1 itohy target->t_xferctl = NJSC32_XFR_DUALEDGE_ENABLE;
2063 1.1 itohy /* go to next negotiation */
2064 1.1 itohy target->t_state = NJSC32_TARST_SDTR;
2065 1.1 itohy njsc32_negotiate_xfer(sc, target);
2066 1.1 itohy goto reply;
2067 1.1 itohy }
2068 1.1 itohy #endif
2069 1.1 itohy goto restart;
2070 1.1 itohy
2071 1.1 itohy case MSG_INITIATOR_DET_ERR: /* 0x05 I->T only */
2072 1.1 itohy case MSG_ABORT: /* 0x06 I->T only */
2073 1.1 itohy case MSG_PARITY_ERROR: /* 0x09 I->T only */
2074 1.1 itohy case MSG_LINK_CMD_COMPLETE: /* 0x0a */
2075 1.1 itohy case MSG_LINK_CMD_COMPLETEF: /* 0x0b */
2076 1.1 itohy case MSG_BUS_DEV_RESET: /* 0x0c I->T only */
2077 1.1 itohy case MSG_ABORT_TAG: /* 0x0d I->T only */
2078 1.1 itohy case MSG_CLEAR_QUEUE: /* 0x0e I->T only */
2079 1.1 itohy
2080 1.1 itohy #if 0 /* handled above */
2081 1.1 itohy case MSG_SIMPLE_Q_TAG: /* 0x20 */
2082 1.1 itohy #endif
2083 1.1 itohy case MSG_HEAD_OF_Q_TAG: /* 0x21 I->T only */
2084 1.1 itohy case MSG_ORDERED_Q_TAG: /* 0x22 I->T only */
2085 1.1 itohy case MSG_IGN_WIDE_RESIDUE: /* 0x23 */
2086 1.1 itohy
2087 1.1 itohy default:
2088 1.1 itohy #ifdef NJSC32_DEBUG
2089 1.1 itohy PRINTC(cmd, ("msgin: unsupported msg: %#x", msg0));
2090 1.1 itohy if (MSG_IS2BYTE(msg0))
2091 1.1 itohy printf(" %#x", msg);
2092 1.1 itohy printf("\n");
2093 1.1 itohy #endif
2094 1.1 itohy break;
2095 1.1 itohy }
2096 1.1 itohy
2097 1.1 itohy reject:
2098 1.1 itohy njsc32_add_msgout(sc, MSG_MESSAGE_REJECT);
2099 1.1 itohy
2100 1.1 itohy reply:
2101 1.1 itohy msgout = njsc32_get_auto_msgout(sc);
2102 1.1 itohy
2103 1.1 itohy restart:
2104 1.1 itohy cctl = NJSC32_CMD_CLEAR_CDB_FIFO_PTR |
2105 1.1 itohy NJSC32_CMD_AUTO_COMMAND_PHASE |
2106 1.1 itohy NJSC32_CMD_AUTO_SCSI_RESTART;
2107 1.1 itohy
2108 1.1 itohy /*
2109 1.1 itohy * Be careful the second and latter bytes of Message In
2110 1.1 itohy * shall not be absorbed by AutoSCSI.
2111 1.1 itohy */
2112 1.1 itohy if (sc->sc_msgincnt == 0)
2113 1.1 itohy cctl |= NJSC32_CMD_AUTO_MSGIN_00_04 | NJSC32_CMD_AUTO_MSGIN_02;
2114 1.1 itohy
2115 1.1 itohy if (sc->sc_msgoutlen != 0)
2116 1.1 itohy cctl |= NJSC32_CMD_AUTO_ATN;
2117 1.1 itohy
2118 1.1 itohy njsc32_write_4(sc, NJSC32_REG_SCSI_MSG_OUT, msgout);
2119 1.1 itohy
2120 1.1 itohy /* (re)start AutoSCSI (may assert ATN) */
2121 1.1 itohy if (reload_params) {
2122 1.1 itohy njsc32_cmd_reload(sc, cmd, cctl);
2123 1.1 itohy } else {
2124 1.1 itohy njsc32_write_2(sc, NJSC32_REG_COMMAND_CONTROL, cctl);
2125 1.1 itohy }
2126 1.1 itohy
2127 1.1 itohy /* +ATN -> -REQ: need 90ns delay? */
2128 1.1 itohy
2129 1.1 itohy njsc32_wait_req_negate(sc); /* wait for REQ negation */
2130 1.1 itohy
2131 1.1 itohy njsc32_negate_ack(sc);
2132 1.1 itohy
2133 1.1 itohy return;
2134 1.1 itohy }
2135 1.1 itohy
2136 1.1 itohy static void
2137 1.2 thorpej njsc32_msgout(struct njsc32_softc *sc)
2138 1.1 itohy {
2139 1.1 itohy int cctl;
2140 1.1 itohy u_int8_t bus;
2141 1.1 itohy unsigned n;
2142 1.1 itohy
2143 1.1 itohy if (sc->sc_msgoutlen == 0) {
2144 1.1 itohy /* target entered to Message Out on unexpected timing */
2145 1.1 itohy njsc32_add_msgout(sc, MSG_NOOP);
2146 1.1 itohy }
2147 1.1 itohy
2148 1.1 itohy cctl = NJSC32_CMD_CLEAR_CDB_FIFO_PTR |
2149 1.1 itohy NJSC32_CMD_AUTO_COMMAND_PHASE | NJSC32_CMD_AUTO_SCSI_RESTART |
2150 1.1 itohy NJSC32_CMD_AUTO_MSGIN_00_04 | NJSC32_CMD_AUTO_MSGIN_02;
2151 1.1 itohy
2152 1.1 itohy /* make sure target is in Message Out phase */
2153 1.1 itohy bus = njsc32_read_1(sc, NJSC32_REG_SCSI_BUS_MONITOR);
2154 1.1 itohy if ((bus & NJSC32_BUSMON_PHASE_MASK) != NJSC32_PHASE_MESSAGE_OUT) {
2155 1.1 itohy /*
2156 1.1 itohy * Message Out is aborted by target.
2157 1.1 itohy */
2158 1.1 itohy printf("%s: njsc32_msgout: phase change %#x\n",
2159 1.18 joerg device_xname(sc->sc_dev), bus);
2160 1.1 itohy
2161 1.1 itohy /* XXX what to do? */
2162 1.1 itohy
2163 1.1 itohy /* restart AutoSCSI (negate ATN) */
2164 1.1 itohy njsc32_write_2(sc, NJSC32_REG_COMMAND_CONTROL, cctl);
2165 1.1 itohy
2166 1.1 itohy sc->sc_msgoutidx = 0;
2167 1.1 itohy return;
2168 1.1 itohy }
2169 1.1 itohy
2170 1.1 itohy n = sc->sc_msgoutidx;
2171 1.1 itohy if (n == sc->sc_msgoutlen - 1) {
2172 1.1 itohy /*
2173 1.1 itohy * negate ATN before sending ACK
2174 1.1 itohy */
2175 1.1 itohy njsc32_write_2(sc, NJSC32_REG_COMMAND_CONTROL, 0);
2176 1.1 itohy
2177 1.1 itohy sc->sc_msgoutidx = 0; /* target may retry Message Out */
2178 1.1 itohy } else {
2179 1.1 itohy cctl |= NJSC32_CMD_AUTO_ATN;
2180 1.1 itohy sc->sc_msgoutidx++;
2181 1.1 itohy }
2182 1.1 itohy
2183 1.1 itohy /* Send Message Out */
2184 1.1 itohy njsc32_write_1(sc, NJSC32_REG_SCSI_OUT_LATCH, sc->sc_msgout[n]);
2185 1.1 itohy
2186 1.1 itohy /* DBn -> +ACK: need 55ns delay? */
2187 1.1 itohy
2188 1.1 itohy njsc32_assert_ack(sc);
2189 1.1 itohy njsc32_wait_req_negate(sc); /* wait for REQ negation */
2190 1.1 itohy
2191 1.1 itohy /* restart AutoSCSI */
2192 1.1 itohy njsc32_write_2(sc, NJSC32_REG_COMMAND_CONTROL, cctl);
2193 1.1 itohy
2194 1.1 itohy njsc32_negate_ack(sc);
2195 1.1 itohy
2196 1.1 itohy /*
2197 1.1 itohy * do not reset sc->sc_msgoutlen so the target
2198 1.1 itohy * can retry Message Out phase
2199 1.1 itohy */
2200 1.1 itohy }
2201 1.1 itohy
2202 1.1 itohy static void
2203 1.2 thorpej njsc32_cmdtimeout(void *arg)
2204 1.1 itohy {
2205 1.1 itohy struct njsc32_cmd *cmd = arg;
2206 1.1 itohy struct njsc32_softc *sc;
2207 1.1 itohy int s;
2208 1.1 itohy
2209 1.1 itohy PRINTC(cmd, ("command timeout\n"));
2210 1.1 itohy
2211 1.1 itohy sc = cmd->c_sc;
2212 1.1 itohy
2213 1.1 itohy s = splbio();
2214 1.1 itohy
2215 1.1 itohy if (sc->sc_stat == NJSC32_STAT_ARBIT)
2216 1.1 itohy njsc32_arbitration_failed(sc);
2217 1.1 itohy else {
2218 1.1 itohy sc->sc_curcmd = NULL;
2219 1.1 itohy sc->sc_stat = NJSC32_STAT_IDLE;
2220 1.1 itohy njsc32_end_cmd(sc, cmd, XS_TIMEOUT);
2221 1.1 itohy }
2222 1.1 itohy
2223 1.1 itohy /* XXX? */
2224 1.1 itohy njsc32_init(sc, 1); /* bus reset */
2225 1.1 itohy
2226 1.1 itohy splx(s);
2227 1.1 itohy }
2228 1.1 itohy
2229 1.1 itohy static void
2230 1.2 thorpej njsc32_reseltimeout(void *arg)
2231 1.1 itohy {
2232 1.1 itohy struct njsc32_cmd *cmd = arg;
2233 1.1 itohy struct njsc32_softc *sc;
2234 1.1 itohy int s;
2235 1.1 itohy
2236 1.1 itohy PRINTC(cmd, ("reselection timeout\n"));
2237 1.1 itohy
2238 1.1 itohy sc = cmd->c_sc;
2239 1.1 itohy
2240 1.1 itohy s = splbio();
2241 1.1 itohy
2242 1.1 itohy /* remove from disconnected list */
2243 1.1 itohy if (cmd->c_flags & NJSC32_CMD_TAGGED) {
2244 1.1 itohy /* I_T_L_Q */
2245 1.1 itohy KASSERT(cmd->c_lu->lu_cmd == NULL);
2246 1.1 itohy TAILQ_REMOVE(&cmd->c_lu->lu_q, cmd, c_q);
2247 1.1 itohy } else {
2248 1.1 itohy /* I_T_L */
2249 1.1 itohy KASSERT(cmd->c_lu->lu_cmd == cmd);
2250 1.1 itohy cmd->c_lu->lu_cmd = NULL;
2251 1.1 itohy }
2252 1.1 itohy
2253 1.1 itohy njsc32_end_cmd(sc, cmd, XS_TIMEOUT);
2254 1.1 itohy
2255 1.1 itohy /* XXX? */
2256 1.1 itohy njsc32_init(sc, 1); /* bus reset */
2257 1.1 itohy
2258 1.1 itohy splx(s);
2259 1.1 itohy }
2260 1.1 itohy
2261 1.5 perry static inline void
2262 1.2 thorpej njsc32_end_auto(struct njsc32_softc *sc, struct njsc32_cmd *cmd, int auto_phase)
2263 1.1 itohy {
2264 1.1 itohy struct scsipi_xfer *xs;
2265 1.1 itohy
2266 1.1 itohy if (auto_phase & NJSC32_XPHASE_MSGIN_02) {
2267 1.1 itohy /* Message In: 0x02 Save Data Pointer */
2268 1.1 itohy
2269 1.1 itohy /*
2270 1.1 itohy * Adjust saved data pointer
2271 1.1 itohy * if the command is not completed yet.
2272 1.1 itohy */
2273 1.1 itohy if ((auto_phase & NJSC32_XPHASE_MSGIN_00) == 0 &&
2274 1.1 itohy (auto_phase &
2275 1.1 itohy (NJSC32_XPHASE_DATA_IN | NJSC32_XPHASE_DATA_OUT)) != 0) {
2276 1.1 itohy njsc32_save_ptr(cmd);
2277 1.1 itohy }
2278 1.1 itohy TPRINTF(("BM %u, SGT %u, SACK %u, SAVED_ACK %u\n",
2279 1.1 itohy njsc32_read_4(sc, NJSC32_REG_BM_CNT),
2280 1.1 itohy njsc32_read_4(sc, NJSC32_REG_SGT_ADR),
2281 1.1 itohy njsc32_read_4(sc, NJSC32_REG_SACK_CNT),
2282 1.1 itohy njsc32_read_4(sc, NJSC32_REG_SAVED_ACK_CNT)));
2283 1.1 itohy }
2284 1.1 itohy
2285 1.1 itohy xs = cmd->c_xs;
2286 1.1 itohy
2287 1.1 itohy if (auto_phase & NJSC32_XPHASE_MSGIN_00) {
2288 1.1 itohy /* Command Complete */
2289 1.1 itohy TPRINTC(cmd, ("njsc32_intr: Command Complete\n"));
2290 1.1 itohy switch (xs->status) {
2291 1.1 itohy case SCSI_CHECK: case SCSI_QUEUE_FULL: case SCSI_BUSY:
2292 1.1 itohy /*
2293 1.1 itohy * scsipi layer will automatically handle the error
2294 1.1 itohy */
2295 1.1 itohy njsc32_end_cmd(sc, cmd, XS_BUSY);
2296 1.1 itohy break;
2297 1.1 itohy default:
2298 1.1 itohy xs->resid -= cmd->c_dp_max;
2299 1.1 itohy njsc32_end_cmd(sc, cmd, XS_NOERROR);
2300 1.1 itohy break;
2301 1.1 itohy }
2302 1.1 itohy } else if (auto_phase & NJSC32_XPHASE_MSGIN_04) {
2303 1.1 itohy /* Disconnect */
2304 1.1 itohy TPRINTC(cmd, ("njsc32_intr: Disconnect\n"));
2305 1.1 itohy
2306 1.1 itohy /* for ill-designed devices */
2307 1.1 itohy if ((xs->xs_periph->periph_quirks & PQUIRK_AUTOSAVE) != 0)
2308 1.1 itohy njsc32_save_ptr(cmd);
2309 1.1 itohy
2310 1.1 itohy /*
2311 1.1 itohy * move current cmd to disconnected list
2312 1.1 itohy */
2313 1.1 itohy if (cmd->c_flags & NJSC32_CMD_TAGGED) {
2314 1.1 itohy /* I_T_L_Q */
2315 1.1 itohy if (cmd->c_flags & NJSC32_CMD_TAGGED_HEAD)
2316 1.1 itohy TAILQ_INSERT_HEAD(&cmd->c_lu->lu_q, cmd, c_q);
2317 1.1 itohy else
2318 1.1 itohy TAILQ_INSERT_TAIL(&cmd->c_lu->lu_q, cmd, c_q);
2319 1.1 itohy } else {
2320 1.1 itohy /* I_T_L */
2321 1.1 itohy cmd->c_lu->lu_cmd = cmd;
2322 1.1 itohy }
2323 1.1 itohy
2324 1.1 itohy /*
2325 1.1 itohy * schedule timeout -- avoid being
2326 1.1 itohy * disconnected forever
2327 1.1 itohy */
2328 1.1 itohy if ((xs->xs_control & XS_CTL_POLL) == 0) {
2329 1.1 itohy callout_stop(&xs->xs_callout);
2330 1.1 itohy callout_reset(&xs->xs_callout, mstohz(xs->timeout),
2331 1.1 itohy njsc32_reseltimeout, cmd);
2332 1.1 itohy }
2333 1.1 itohy
2334 1.1 itohy } else {
2335 1.1 itohy /*
2336 1.1 itohy * target has come to Bus Free phase
2337 1.1 itohy * probably to notify an error
2338 1.1 itohy */
2339 1.1 itohy PRINTC(cmd, ("njsc32_intr: unexpected bus free\n"));
2340 1.1 itohy /* try Request Sense */
2341 1.1 itohy xs->status = SCSI_CHECK;
2342 1.1 itohy njsc32_end_cmd(sc, cmd, XS_BUSY);
2343 1.1 itohy }
2344 1.1 itohy }
2345 1.1 itohy
2346 1.1 itohy int
2347 1.2 thorpej njsc32_intr(void *arg)
2348 1.1 itohy {
2349 1.1 itohy struct njsc32_softc *sc = arg;
2350 1.1 itohy u_int16_t intr;
2351 1.1 itohy u_int8_t arbstat, bus_phase;
2352 1.1 itohy int auto_phase;
2353 1.1 itohy int idbit;
2354 1.1 itohy struct njsc32_cmd *cmd;
2355 1.1 itohy
2356 1.1 itohy intr = njsc32_read_2(sc, NJSC32_REG_IRQ);
2357 1.1 itohy if ((intr & NJSC32_IRQ_INTR_PENDING) == 0)
2358 1.1 itohy return 0; /* not mine */
2359 1.1 itohy
2360 1.18 joerg TPRINTF(("%s: njsc32_intr: %#x\n", device_xname(sc->sc_dev), intr));
2361 1.1 itohy
2362 1.1 itohy #if 0 /* I don't think this is required */
2363 1.1 itohy /* mask interrupts */
2364 1.1 itohy njsc32_write_2(sc, NJSC32_REG_IRQ, NJSC32_IRQ_MASK_ALL);
2365 1.1 itohy #endif
2366 1.1 itohy
2367 1.1 itohy /* we got an interrupt, so stop the timer */
2368 1.1 itohy njsc32_write_2(sc, NJSC32_REG_TIMER, NJSC32_TIMER_STOP);
2369 1.1 itohy
2370 1.1 itohy if (intr & NJSC32_IRQ_SCSIRESET) {
2371 1.18 joerg printf("%s: detected bus reset\n", device_xname(sc->sc_dev));
2372 1.14 itohy /* make sure all devices on the bus are certainly reset */
2373 1.14 itohy njsc32_reset_bus(sc);
2374 1.1 itohy goto out;
2375 1.1 itohy }
2376 1.1 itohy
2377 1.1 itohy if (sc->sc_stat == NJSC32_STAT_ARBIT) {
2378 1.1 itohy cmd = sc->sc_curcmd;
2379 1.1 itohy KASSERT(cmd);
2380 1.1 itohy arbstat = njsc32_read_1(sc, NJSC32_REG_ARBITRATION_STAT);
2381 1.1 itohy if (arbstat & (NJSC32_ARBSTAT_WIN | NJSC32_ARBSTAT_FAIL)) {
2382 1.1 itohy /*
2383 1.1 itohy * arbitration done
2384 1.1 itohy */
2385 1.1 itohy /* clear arbitration status */
2386 1.1 itohy njsc32_write_1(sc, NJSC32_REG_SET_ARBITRATION,
2387 1.1 itohy NJSC32_SETARB_CLEAR);
2388 1.1 itohy
2389 1.1 itohy if (arbstat & NJSC32_ARBSTAT_WIN) {
2390 1.1 itohy TPRINTC(cmd,
2391 1.1 itohy ("njsc32_intr: arbitration won\n"));
2392 1.1 itohy
2393 1.1 itohy TAILQ_REMOVE(&sc->sc_reqcmd, cmd, c_q);
2394 1.1 itohy
2395 1.1 itohy sc->sc_stat = NJSC32_STAT_CONNECT;
2396 1.1 itohy } else {
2397 1.1 itohy TPRINTC(cmd,
2398 1.1 itohy ("njsc32_intr: arbitration failed\n"));
2399 1.1 itohy
2400 1.1 itohy njsc32_arbitration_failed(sc);
2401 1.1 itohy
2402 1.1 itohy /* XXX delay */
2403 1.1 itohy /* XXX retry counter */
2404 1.1 itohy }
2405 1.1 itohy }
2406 1.1 itohy }
2407 1.1 itohy
2408 1.1 itohy if (intr & NJSC32_IRQ_TIMER) {
2409 1.1 itohy TPRINTF(("%s: njsc32_intr: timer interrupt\n",
2410 1.18 joerg device_xname(sc->sc_dev)));
2411 1.1 itohy }
2412 1.1 itohy
2413 1.1 itohy if (intr & NJSC32_IRQ_RESELECT) {
2414 1.1 itohy /* Reselection from a target */
2415 1.1 itohy njsc32_arbitration_failed(sc); /* just in case */
2416 1.1 itohy if ((cmd = sc->sc_curcmd) != NULL) {
2417 1.1 itohy /* ? */
2418 1.18 joerg aprint_error_dev(sc->sc_dev, "unexpected reselection\n");
2419 1.1 itohy sc->sc_curcmd = NULL;
2420 1.1 itohy sc->sc_stat = NJSC32_STAT_IDLE;
2421 1.1 itohy njsc32_end_cmd(sc, cmd, XS_DRIVER_STUFFUP);
2422 1.1 itohy }
2423 1.1 itohy
2424 1.1 itohy idbit = njsc32_read_1(sc, NJSC32_REG_RESELECT_ID);
2425 1.1 itohy if ((idbit & (1 << NJSC32_INITIATOR_ID)) == 0 ||
2426 1.13 itohy (sc->sc_reselid =
2427 1.13 itohy ffs(idbit & ~(1 << NJSC32_INITIATOR_ID)) - 1) < 0) {
2428 1.18 joerg aprint_error_dev(sc->sc_dev, "invalid reselection (id: %#x)\n",
2429 1.16 cegger idbit);
2430 1.1 itohy sc->sc_stat = NJSC32_STAT_IDLE; /* XXX ? */
2431 1.1 itohy } else {
2432 1.1 itohy sc->sc_stat = NJSC32_STAT_RESEL;
2433 1.1 itohy TPRINTF(("%s: njsc32_intr: reselection from %d\n",
2434 1.18 joerg device_xname(sc->sc_dev), sc->sc_reselid));
2435 1.1 itohy }
2436 1.1 itohy }
2437 1.1 itohy
2438 1.1 itohy if (intr & NJSC32_IRQ_PHASE_CHANGE) {
2439 1.1 itohy #if 1 /* XXX probably not needed */
2440 1.1 itohy if (sc->sc_stat == NJSC32_STAT_ARBIT)
2441 1.1 itohy PRINTC(sc->sc_curcmd,
2442 1.1 itohy ("njsc32_intr: cancel arbitration phase\n"));
2443 1.1 itohy njsc32_arbitration_failed(sc);
2444 1.1 itohy #endif
2445 1.1 itohy /* current bus phase */
2446 1.1 itohy bus_phase = njsc32_read_1(sc, NJSC32_REG_SCSI_BUS_MONITOR) &
2447 1.1 itohy NJSC32_BUSMON_PHASE_MASK;
2448 1.1 itohy
2449 1.1 itohy switch (bus_phase) {
2450 1.1 itohy case NJSC32_PHASE_MESSAGE_IN:
2451 1.1 itohy njsc32_msgin(sc);
2452 1.1 itohy break;
2453 1.1 itohy
2454 1.1 itohy /*
2455 1.1 itohy * target may suddenly become Status / Bus Free phase
2456 1.1 itohy * to notify an error condition
2457 1.1 itohy */
2458 1.1 itohy case NJSC32_PHASE_STATUS:
2459 1.1 itohy printf("%s: unexpected bus phase: Status\n",
2460 1.18 joerg device_xname(sc->sc_dev));
2461 1.1 itohy if ((cmd = sc->sc_curcmd) != NULL) {
2462 1.1 itohy cmd->c_xs->status =
2463 1.1 itohy njsc32_read_1(sc, NJSC32_REG_SCSI_CSB_IN);
2464 1.1 itohy TPRINTC(cmd, ("njsc32_intr: Status %d\n",
2465 1.1 itohy cmd->c_xs->status));
2466 1.1 itohy }
2467 1.1 itohy break;
2468 1.1 itohy case NJSC32_PHASE_BUSFREE:
2469 1.18 joerg aprint_error_dev(sc->sc_dev, "unexpected bus phase: Bus Free\n");
2470 1.1 itohy if ((cmd = sc->sc_curcmd) != NULL) {
2471 1.1 itohy sc->sc_curcmd = NULL;
2472 1.1 itohy sc->sc_stat = NJSC32_STAT_IDLE;
2473 1.1 itohy if (cmd->c_xs->status != SCSI_QUEUE_FULL &&
2474 1.1 itohy cmd->c_xs->status != SCSI_BUSY)
2475 1.1 itohy cmd->c_xs->status = SCSI_CHECK;/* XXX */
2476 1.1 itohy njsc32_end_cmd(sc, cmd, XS_BUSY);
2477 1.1 itohy }
2478 1.1 itohy goto out;
2479 1.1 itohy default:
2480 1.1 itohy #ifdef NJSC32_DEBUG
2481 1.1 itohy printf("%s: unexpected bus phase: ",
2482 1.18 joerg device_xname(sc->sc_dev));
2483 1.1 itohy switch (bus_phase) {
2484 1.1 itohy case NJSC32_PHASE_COMMAND:
2485 1.1 itohy printf("Command\n"); break;
2486 1.1 itohy case NJSC32_PHASE_MESSAGE_OUT:
2487 1.1 itohy printf("Message Out\n");break;
2488 1.1 itohy case NJSC32_PHASE_DATA_IN:
2489 1.1 itohy printf("Data In\n"); break;
2490 1.1 itohy case NJSC32_PHASE_DATA_OUT:
2491 1.1 itohy printf("Data Out\n"); break;
2492 1.1 itohy case NJSC32_PHASE_RESELECT:
2493 1.1 itohy printf("Reselect\n");break;
2494 1.1 itohy default: printf("%#x\n", bus_phase); break;
2495 1.1 itohy }
2496 1.1 itohy #else
2497 1.18 joerg aprint_error_dev(sc->sc_dev, "unexpected bus phase: %#x",
2498 1.16 cegger bus_phase);
2499 1.1 itohy #endif
2500 1.1 itohy break;
2501 1.1 itohy }
2502 1.1 itohy }
2503 1.1 itohy
2504 1.1 itohy if (intr & NJSC32_IRQ_AUTOSCSI) {
2505 1.1 itohy /*
2506 1.1 itohy * AutoSCSI interrupt
2507 1.1 itohy */
2508 1.1 itohy auto_phase = njsc32_read_2(sc, NJSC32_REG_EXECUTE_PHASE);
2509 1.1 itohy TPRINTF(("%s: njsc32_intr: AutoSCSI: %#x\n",
2510 1.18 joerg device_xname(sc->sc_dev), auto_phase));
2511 1.1 itohy njsc32_write_2(sc, NJSC32_REG_EXECUTE_PHASE, 0);
2512 1.1 itohy
2513 1.1 itohy if (auto_phase & NJSC32_XPHASE_SEL_TIMEOUT) {
2514 1.1 itohy cmd = sc->sc_curcmd;
2515 1.1 itohy if (cmd == NULL) {
2516 1.18 joerg aprint_error_dev(sc->sc_dev, "sel no cmd\n");
2517 1.1 itohy goto out;
2518 1.1 itohy }
2519 1.1 itohy DPRINTC(cmd, ("njsc32_intr: selection timeout\n"));
2520 1.1 itohy
2521 1.1 itohy sc->sc_curcmd = NULL;
2522 1.1 itohy sc->sc_stat = NJSC32_STAT_IDLE;
2523 1.1 itohy njsc32_end_cmd(sc, cmd, XS_SELTIMEOUT);
2524 1.1 itohy
2525 1.1 itohy goto out;
2526 1.1 itohy }
2527 1.1 itohy
2528 1.1 itohy #ifdef NJSC32_TRACE
2529 1.1 itohy if (auto_phase & NJSC32_XPHASE_COMMAND) {
2530 1.1 itohy /* Command phase has been automatically processed */
2531 1.1 itohy TPRINTF(("%s: njsc32_intr: Command\n",
2532 1.18 joerg device_xname(sc->sc_dev)));
2533 1.1 itohy }
2534 1.1 itohy #endif
2535 1.1 itohy #ifdef NJSC32_DEBUG
2536 1.1 itohy if (auto_phase & NJSC32_XPHASE_ILLEGAL) {
2537 1.1 itohy printf("%s: njsc32_intr: Illegal phase\n",
2538 1.18 joerg device_xname(sc->sc_dev));
2539 1.1 itohy }
2540 1.1 itohy #endif
2541 1.1 itohy
2542 1.1 itohy if (auto_phase & NJSC32_XPHASE_PAUSED_MSG_IN) {
2543 1.1 itohy TPRINTF(("%s: njsc32_intr: Process Message In\n",
2544 1.18 joerg device_xname(sc->sc_dev)));
2545 1.1 itohy njsc32_msgin(sc);
2546 1.1 itohy }
2547 1.1 itohy
2548 1.1 itohy if (auto_phase & NJSC32_XPHASE_PAUSED_MSG_OUT) {
2549 1.1 itohy TPRINTF(("%s: njsc32_intr: Process Message Out\n",
2550 1.18 joerg device_xname(sc->sc_dev)));
2551 1.1 itohy njsc32_msgout(sc);
2552 1.1 itohy }
2553 1.1 itohy
2554 1.1 itohy cmd = sc->sc_curcmd;
2555 1.1 itohy if (cmd == NULL) {
2556 1.1 itohy TPRINTF(("%s: njsc32_intr: no cmd\n",
2557 1.18 joerg device_xname(sc->sc_dev)));
2558 1.1 itohy goto out;
2559 1.1 itohy }
2560 1.1 itohy
2561 1.1 itohy if (auto_phase &
2562 1.1 itohy (NJSC32_XPHASE_DATA_IN | NJSC32_XPHASE_DATA_OUT)) {
2563 1.6 itohy u_int32_t sackcnt, cntoffset;
2564 1.6 itohy
2565 1.1 itohy #ifdef NJSC32_TRACE
2566 1.1 itohy if (auto_phase & NJSC32_XPHASE_DATA_IN)
2567 1.1 itohy PRINTC(cmd, ("njsc32_intr: data in done\n"));
2568 1.1 itohy if (auto_phase & NJSC32_XPHASE_DATA_OUT)
2569 1.1 itohy PRINTC(cmd, ("njsc32_intr: data out done\n"));
2570 1.1 itohy printf("BM %u, SGT %u, SACK %u, SAVED_ACK %u\n",
2571 1.1 itohy njsc32_read_4(sc, NJSC32_REG_BM_CNT),
2572 1.1 itohy njsc32_read_4(sc, NJSC32_REG_SGT_ADR),
2573 1.1 itohy njsc32_read_4(sc, NJSC32_REG_SACK_CNT),
2574 1.1 itohy njsc32_read_4(sc, NJSC32_REG_SAVED_ACK_CNT));
2575 1.1 itohy #endif
2576 1.1 itohy
2577 1.1 itohy /*
2578 1.1 itohy * detected parity error on data transfer?
2579 1.1 itohy */
2580 1.1 itohy if (njsc32_read_1(sc, NJSC32_REG_PARITY_STATUS) &
2581 1.1 itohy (NJSC32_PARITYSTATUS_ERROR_LSB|
2582 1.1 itohy NJSC32_PARITYSTATUS_ERROR_MSB)) {
2583 1.1 itohy
2584 1.1 itohy PRINTC(cmd, ("datain: parity error\n"));
2585 1.1 itohy
2586 1.1 itohy /* clear parity error */
2587 1.1 itohy njsc32_write_1(sc, NJSC32_REG_PARITY_CONTROL,
2588 1.1 itohy NJSC32_PARITYCTL_CHECK_ENABLE |
2589 1.1 itohy NJSC32_PARITYCTL_CLEAR_ERROR);
2590 1.1 itohy
2591 1.1 itohy if (auto_phase & NJSC32_XPHASE_BUS_FREE) {
2592 1.1 itohy /*
2593 1.1 itohy * XXX command has already finished
2594 1.1 itohy * -- what can we do?
2595 1.1 itohy *
2596 1.1 itohy * It is not clear current command
2597 1.1 itohy * caused the error -- reset everything.
2598 1.1 itohy */
2599 1.1 itohy njsc32_init(sc, 1); /* XXX */
2600 1.1 itohy } else {
2601 1.1 itohy /* XXX does this case occur? */
2602 1.1 itohy #if 1
2603 1.18 joerg aprint_error_dev(sc->sc_dev, "datain: parity error\n");
2604 1.1 itohy #endif
2605 1.1 itohy /*
2606 1.1 itohy * Make attention condition and try
2607 1.1 itohy * to send Initiator Detected Error
2608 1.1 itohy * message.
2609 1.1 itohy */
2610 1.1 itohy njsc32_init_msgout(sc);
2611 1.1 itohy njsc32_add_msgout(sc,
2612 1.1 itohy MSG_INITIATOR_DET_ERR);
2613 1.1 itohy njsc32_write_4(sc,
2614 1.1 itohy NJSC32_REG_SCSI_MSG_OUT,
2615 1.1 itohy njsc32_get_auto_msgout(sc));
2616 1.1 itohy /* restart autoscsi with ATN */
2617 1.1 itohy njsc32_write_2(sc,
2618 1.1 itohy NJSC32_REG_COMMAND_CONTROL,
2619 1.1 itohy NJSC32_CMD_CLEAR_CDB_FIFO_PTR |
2620 1.1 itohy NJSC32_CMD_AUTO_COMMAND_PHASE |
2621 1.1 itohy NJSC32_CMD_AUTO_SCSI_RESTART |
2622 1.1 itohy NJSC32_CMD_AUTO_MSGIN_00_04 |
2623 1.1 itohy NJSC32_CMD_AUTO_MSGIN_02 |
2624 1.1 itohy NJSC32_CMD_AUTO_ATN);
2625 1.1 itohy }
2626 1.1 itohy goto out;
2627 1.1 itohy }
2628 1.1 itohy
2629 1.1 itohy /*
2630 1.1 itohy * data has been transferred, and current pointer
2631 1.1 itohy * is changed
2632 1.1 itohy */
2633 1.6 itohy sackcnt = njsc32_read_4(sc, NJSC32_REG_SACK_CNT);
2634 1.6 itohy
2635 1.6 itohy /*
2636 1.6 itohy * The controller returns extra ACK count
2637 1.6 itohy * if the DMA buffer is not 4byte aligned.
2638 1.6 itohy */
2639 1.6 itohy cntoffset = le32toh(cmd->c_sgt[0].sg_addr) & 3;
2640 1.6 itohy #ifdef NJSC32_DEBUG
2641 1.6 itohy if (cntoffset != 0) {
2642 1.6 itohy printf("sackcnt %u, cntoffset %u\n",
2643 1.6 itohy sackcnt, cntoffset);
2644 1.6 itohy }
2645 1.6 itohy #endif
2646 1.6 itohy /* advance SCSI pointer */
2647 1.6 itohy njsc32_set_cur_ptr(cmd,
2648 1.6 itohy cmd->c_dp_cur + sackcnt - cntoffset);
2649 1.1 itohy }
2650 1.1 itohy
2651 1.1 itohy if (auto_phase & NJSC32_XPHASE_MSGOUT) {
2652 1.1 itohy /* Message Out phase has been automatically processed */
2653 1.1 itohy TPRINTC(cmd, ("njsc32_intr: Message Out\n"));
2654 1.1 itohy if ((auto_phase & NJSC32_XPHASE_PAUSED_MSG_IN) == 0 &&
2655 1.1 itohy sc->sc_msgoutlen <= NJSC32_MSGOUT_MAX_AUTO) {
2656 1.1 itohy njsc32_init_msgout(sc);
2657 1.1 itohy }
2658 1.1 itohy }
2659 1.1 itohy
2660 1.1 itohy if (auto_phase & NJSC32_XPHASE_STATUS) {
2661 1.1 itohy /* Status phase has been automatically processed */
2662 1.1 itohy cmd->c_xs->status =
2663 1.1 itohy njsc32_read_1(sc, NJSC32_REG_SCSI_CSB_IN);
2664 1.1 itohy TPRINTC(cmd, ("njsc32_intr: Status %#x\n",
2665 1.1 itohy cmd->c_xs->status));
2666 1.1 itohy }
2667 1.1 itohy
2668 1.1 itohy if (auto_phase & NJSC32_XPHASE_BUS_FREE) {
2669 1.1 itohy /* AutoSCSI is finished */
2670 1.1 itohy
2671 1.1 itohy TPRINTC(cmd, ("njsc32_intr: Bus Free\n"));
2672 1.1 itohy
2673 1.1 itohy sc->sc_stat = NJSC32_STAT_IDLE;
2674 1.1 itohy sc->sc_curcmd = NULL;
2675 1.1 itohy
2676 1.1 itohy njsc32_end_auto(sc, cmd, auto_phase);
2677 1.1 itohy }
2678 1.1 itohy goto out;
2679 1.1 itohy }
2680 1.1 itohy
2681 1.1 itohy if (intr & NJSC32_IRQ_FIFO_THRESHOLD) {
2682 1.1 itohy /* XXX We use DMA, and this shouldn't happen */
2683 1.18 joerg printf("%s: njsc32_intr: FIFO\n", device_xname(sc->sc_dev));
2684 1.1 itohy njsc32_init(sc, 1);
2685 1.1 itohy goto out;
2686 1.1 itohy }
2687 1.1 itohy if (intr & NJSC32_IRQ_PCI) {
2688 1.1 itohy /* XXX? */
2689 1.18 joerg printf("%s: njsc32_intr: PCI\n", device_xname(sc->sc_dev));
2690 1.1 itohy }
2691 1.1 itohy if (intr & NJSC32_IRQ_BMCNTERR) {
2692 1.1 itohy /* XXX? */
2693 1.18 joerg printf("%s: njsc32_intr: BM\n", device_xname(sc->sc_dev));
2694 1.1 itohy }
2695 1.1 itohy
2696 1.1 itohy out:
2697 1.1 itohy /* go next command if controller is idle */
2698 1.1 itohy if (sc->sc_stat == NJSC32_STAT_IDLE)
2699 1.1 itohy njsc32_start(sc);
2700 1.1 itohy
2701 1.1 itohy #if 0
2702 1.1 itohy /* enable interrupts */
2703 1.1 itohy njsc32_write_2(sc, NJSC32_REG_IRQ, 0);
2704 1.1 itohy #endif
2705 1.1 itohy
2706 1.1 itohy return 1; /* processed */
2707 1.1 itohy }
2708