?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Committer: Michael Beasley <mike@snafu.setup>
[mikesnafu-overlay.git] / drivers / scsi / sym53c8xx_2 / sym_fw1.h
blob7b08d6caaa99b35c58afb1b071385287acf67c6f
1 /*
2 * Device driver for the SYMBIOS/LSILOGIC 53C8XX and 53C1010 family
3 * of PCI-SCSI IO processors.
4 *
5 * Copyright (C) 1999-2001 Gerard Roudier <groudier@free.fr>
6 *
7 * This driver is derived from the Linux sym53c8xx driver.
8 * Copyright (C) 1998-2000 Gerard Roudier
9 *
10 * The sym53c8xx driver is derived from the ncr53c8xx driver that had been
11 * a port of the FreeBSD ncr driver to Linux-1.2.13.
12 *
13 * The original ncr driver has been written for 386bsd and FreeBSD by
14 * Wolfgang Stanglmeier <wolf@cologne.de>
15 * Stefan Esser <se@mi.Uni-Koeln.de>
16 * Copyright (C) 1994 Wolfgang Stanglmeier
17 *
18 * Other major contributions:
19 *
20 * NVRAM detection and reading.
21 * Copyright (C) 1997 Richard Waltham <dormouse@farsrobt.demon.co.uk>
22 *
23 *-----------------------------------------------------------------------------
24 *
25 * This program is free software; you can redistribute it and/or modify
26 * it under the terms of the GNU General Public License as published by
27 * the Free Software Foundation; either version 2 of the License, or
28 * (at your option) any later version.
29 *
30 * This program is distributed in the hope that it will be useful,
31 * but WITHOUT ANY WARRANTY; without even the implied warranty of
32 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
33 * GNU General Public License for more details.
34 *
35 * You should have received a copy of the GNU General Public License
36 * along with this program; if not, write to the Free Software
37 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
38 */
39
40 /*
41 * Scripts for SYMBIOS-Processor
42 *
43 * We have to know the offsets of all labels before we reach
44 * them (for forward jumps). Therefore we declare a struct
45 * here. If you make changes inside the script,
46 *
47 * DONT FORGET TO CHANGE THE LENGTHS HERE!
48 */
49
50 /*
51 * Script fragments which are loaded into the on-chip RAM
52 * of 825A, 875, 876, 895, 895A, 896 and 1010 chips.
53 * Must not exceed 4K bytes.
54 */
55 struct SYM_FWA_SCR {
56 u32 start [ 11];
57 u32 getjob_begin [ 4];
58 u32 _sms_a10 [ 5];
59 u32 getjob_end [ 4];
60 u32 _sms_a20 [ 4];
61 #ifdef SYM_CONF_TARGET_ROLE_SUPPORT
62 u32 select [ 8];
63 #else
64 u32 select [ 6];
65 #endif
66 u32 _sms_a30 [ 5];
67 u32 wf_sel_done [ 2];
68 u32 send_ident [ 2];
69 #ifdef SYM_CONF_IARB_SUPPORT
70 u32 select2 [ 8];
71 #else
72 u32 select2 [ 2];
73 #endif
74 u32 command [ 2];
75 u32 dispatch [ 28];
76 u32 sel_no_cmd [ 10];
77 u32 init [ 6];
78 u32 clrack [ 4];
79 u32 datai_done [ 11];
80 u32 datai_done_wsr [ 20];
81 u32 datao_done [ 11];
82 u32 datao_done_wss [ 6];
83 u32 datai_phase [ 5];
84 u32 datao_phase [ 5];
85 u32 msg_in [ 2];
86 u32 msg_in2 [ 10];
87 #ifdef SYM_CONF_IARB_SUPPORT
88 u32 status [ 14];
89 #else
90 u32 status [ 10];
91 #endif
92 u32 complete [ 6];
93 u32 complete2 [ 8];
94 u32 _sms_a40 [ 12];
95 u32 done [ 5];
96 u32 _sms_a50 [ 5];
97 u32 _sms_a60 [ 2];
98 u32 done_end [ 4];
99 u32 complete_error [ 5];
100 u32 save_dp [ 11];
101 u32 restore_dp [ 7];
102 u32 disconnect [ 11];
103 u32 disconnect2 [ 5];
104 u32 _sms_a65 [ 3];
105 #ifdef SYM_CONF_IARB_SUPPORT
106 u32 idle [ 4];
107 #else
108 u32 idle [ 2];
109 #endif
110 #ifdef SYM_CONF_IARB_SUPPORT
111 u32 ungetjob [ 7];
112 #else
113 u32 ungetjob [ 5];
114 #endif
115 #ifdef SYM_CONF_TARGET_ROLE_SUPPORT
116 u32 reselect [ 4];
117 #else
118 u32 reselect [ 2];
119 #endif
120 u32 reselected [ 19];
121 u32 _sms_a70 [ 6];
122 u32 _sms_a80 [ 4];
123 u32 reselected1 [ 25];
124 u32 _sms_a90 [ 4];
125 u32 resel_lun0 [ 7];
126 u32 _sms_a100 [ 4];
127 u32 resel_tag [ 8];
128 #if SYM_CONF_MAX_TASK*4 > 512
129 u32 _sms_a110 [ 23];
130 #elif SYM_CONF_MAX_TASK*4 > 256
131 u32 _sms_a110 [ 17];
132 #else
133 u32 _sms_a110 [ 13];
134 #endif
135 u32 _sms_a120 [ 2];
136 u32 resel_go [ 4];
137 u32 _sms_a130 [ 7];
138 u32 resel_dsa [ 2];
139 u32 resel_dsa1 [ 4];
140 u32 _sms_a140 [ 7];
141 u32 resel_no_tag [ 4];
142 u32 _sms_a145 [ 7];
143 u32 data_in [SYM_CONF_MAX_SG * 2];
144 u32 data_in2 [ 4];
145 u32 data_out [SYM_CONF_MAX_SG * 2];
146 u32 data_out2 [ 4];
147 u32 pm0_data [ 12];
148 u32 pm0_data_out [ 6];
149 u32 pm0_data_end [ 7];
150 u32 pm_data_end [ 4];
151 u32 _sms_a150 [ 4];
152 u32 pm1_data [ 12];
153 u32 pm1_data_out [ 6];
154 u32 pm1_data_end [ 9];
155 };
156
157 /*
158 * Script fragments which stay in main memory for all chips
159 * except for chips that support 8K on-chip RAM.
160 */
161 struct SYM_FWB_SCR {
162 u32 no_data [ 2];
163 #ifdef SYM_CONF_TARGET_ROLE_SUPPORT
164 u32 sel_for_abort [ 18];
165 #else
166 u32 sel_for_abort [ 16];
167 #endif
168 u32 sel_for_abort_1 [ 2];
169 u32 msg_in_etc [ 12];
170 u32 msg_received [ 5];
171 u32 msg_weird_seen [ 5];
172 u32 msg_extended [ 17];
173 u32 _sms_b10 [ 4];
174 u32 msg_bad [ 6];
175 u32 msg_weird [ 4];
176 u32 msg_weird1 [ 8];
177 u32 wdtr_resp [ 6];
178 u32 send_wdtr [ 4];
179 u32 sdtr_resp [ 6];
180 u32 send_sdtr [ 4];
181 u32 ppr_resp [ 6];
182 u32 send_ppr [ 4];
183 u32 nego_bad_phase [ 4];
184 u32 msg_out [ 4];
185 u32 msg_out_done [ 4];
186 u32 data_ovrun [ 3];
187 u32 data_ovrun1 [ 22];
188 u32 data_ovrun2 [ 8];
189 u32 abort_resel [ 16];
190 u32 resend_ident [ 4];
191 u32 ident_break [ 4];
192 u32 ident_break_atn [ 4];
193 u32 sdata_in [ 6];
194 u32 resel_bad_lun [ 4];
195 u32 bad_i_t_l [ 4];
196 u32 bad_i_t_l_q [ 4];
197 u32 bad_status [ 7];
198 u32 wsr_ma_helper [ 4];
199
200 /* Data area */
201 u32 zero [ 1];
202 u32 scratch [ 1];
203 u32 scratch1 [ 1];
204 u32 prev_done [ 1];
205 u32 done_pos [ 1];
206 u32 nextjob [ 1];
207 u32 startpos [ 1];
208 u32 targtbl [ 1];
209 };
210
211 /*
212 * Script fragments used at initialisations.
213 * Only runs out of main memory.
214 */
215 struct SYM_FWZ_SCR {
216 u32 snooptest [ 9];
217 u32 snoopend [ 2];
218 };
219
220 static struct SYM_FWA_SCR SYM_FWA_SCR = {
221 /*--------------------------< START >----------------------------*/ {
222 /*
223 * Switch the LED on.
224 * Will be patched with a NO_OP if LED
225 * not needed or not desired.
226 */
227 SCR_REG_REG (gpreg, SCR_AND, 0xfe),
228 0,
229 /*
230 * Clear SIGP.
231 */
232 SCR_FROM_REG (ctest2),
233 0,
234 /*
235 * Stop here if the C code wants to perform
236 * some error recovery procedure manually.
237 * (Indicate this by setting SEM in ISTAT)
238 */
239 SCR_FROM_REG (istat),
240 0,
241 /*
242 * Report to the C code the next position in
243 * the start queue the SCRIPTS will schedule.
244 * The C code must not change SCRATCHA.
245 */
246 SCR_COPY (4),
247 PADDR_B (startpos),
248 RADDR_1 (scratcha),
249 SCR_INT ^ IFTRUE (MASK (SEM, SEM)),
250 SIR_SCRIPT_STOPPED,
251 /*
252 * Start the next job.
253 *
254 * @DSA = start point for this job.
255 * SCRATCHA = address of this job in the start queue.
256 *
257 * We will restore startpos with SCRATCHA if we fails the
258 * arbitration or if it is the idle job.
259 *
260 * The below GETJOB_BEGIN to GETJOB_END section of SCRIPTS
261 * is a critical path. If it is partially executed, it then
262 * may happen that the job address is not yet in the DSA
263 * and the next queue position points to the next JOB.
264 */
265 }/*-------------------------< GETJOB_BEGIN >---------------------*/,{
266 /*
267 * Copy to a fixed location both the next STARTPOS
268 * and the current JOB address, using self modifying
269 * SCRIPTS.
270 */
271 SCR_COPY (4),
272 RADDR_1 (scratcha),
273 PADDR_A (_sms_a10),
274 SCR_COPY (8),
275 }/*-------------------------< _SMS_A10 >-------------------------*/,{
276 0,
277 PADDR_B (nextjob),
278 /*
279 * Move the start address to TEMP using self-
280 * modifying SCRIPTS and jump indirectly to
281 * that address.
282 */
283 SCR_COPY (4),
284 PADDR_B (nextjob),
285 RADDR_1 (dsa),
286 }/*-------------------------< GETJOB_END >-----------------------*/,{
287 SCR_COPY (4),
288 RADDR_1 (dsa),
289 PADDR_A (_sms_a20),
290 SCR_COPY (4),
291 }/*-------------------------< _SMS_A20 >-------------------------*/,{
292 0,
293 RADDR_1 (temp),
294 SCR_RETURN,
295 0,
296 }/*-------------------------< SELECT >---------------------------*/,{
297 /*
298 * DSA contains the address of a scheduled
299 * data structure.
300 *
301 * SCRATCHA contains the address of the start queue
302 * entry which points to the next job.
303 *
304 * Set Initiator mode.
305 *
306 * (Target mode is left as an exercise for the reader)
307 */
308 #ifdef SYM_CONF_TARGET_ROLE_SUPPORT
309 SCR_CLR (SCR_TRG),
310 0,
311 #endif
312 /*
313 * And try to select this target.
314 */
315 SCR_SEL_TBL_ATN ^ offsetof (struct sym_dsb, select),
316 PADDR_A (ungetjob),
317 /*
318 * Now there are 4 possibilities:
319 *
320 * (1) The chip loses arbitration.
321 * This is ok, because it will try again,
322 * when the bus becomes idle.
323 * (But beware of the timeout function!)
324 *
325 * (2) The chip is reselected.
326 * Then the script processor takes the jump
327 * to the RESELECT label.
328 *
329 * (3) The chip wins arbitration.
330 * Then it will execute SCRIPTS instruction until
331 * the next instruction that checks SCSI phase.
332 * Then will stop and wait for selection to be
333 * complete or selection time-out to occur.
334 *
335 * After having won arbitration, the SCRIPTS
336 * processor is able to execute instructions while
337 * the SCSI core is performing SCSI selection.
338 */
339
340 /*
341 * Copy the CCB header to a fixed location
342 * in the HCB using self-modifying SCRIPTS.
343 */
344 SCR_COPY (4),
345 RADDR_1 (dsa),
346 PADDR_A (_sms_a30),
347 SCR_COPY (sizeof(struct sym_ccbh)),
348 }/*-------------------------< _SMS_A30 >-------------------------*/,{
349 0,
350 HADDR_1 (ccb_head),
351 /*
352 * Initialize the status register
353 */
354 SCR_COPY (4),
355 HADDR_1 (ccb_head.status),
356 RADDR_1 (scr0),
357 }/*-------------------------< WF_SEL_DONE >----------------------*/,{
358 SCR_INT ^ IFFALSE (WHEN (SCR_MSG_OUT)),
359 SIR_SEL_ATN_NO_MSG_OUT,
360 }/*-------------------------< SEND_IDENT >-----------------------*/,{
361 /*
362 * Selection complete.
363 * Send the IDENTIFY and possibly the TAG message
364 * and negotiation message if present.
365 */
366 SCR_MOVE_TBL ^ SCR_MSG_OUT,
367 offsetof (struct sym_dsb, smsg),
368 }/*-------------------------< SELECT2 >--------------------------*/,{
369 #ifdef SYM_CONF_IARB_SUPPORT
370 /*
371 * Set IMMEDIATE ARBITRATION if we have been given
372 * a hint to do so. (Some job to do after this one).
373 */
374 SCR_FROM_REG (HF_REG),
375 0,
376 SCR_JUMPR ^ IFFALSE (MASK (HF_HINT_IARB, HF_HINT_IARB)),
377 8,
378 SCR_REG_REG (scntl1, SCR_OR, IARB),
379 0,
380 #endif
381 /*
382 * Anticipate the COMMAND phase.
383 * This is the PHASE we expect at this point.
384 */
385 SCR_JUMP ^ IFFALSE (WHEN (SCR_COMMAND)),
386 PADDR_A (sel_no_cmd),
387 }/*-------------------------< COMMAND >--------------------------*/,{
388 /*
389 * ... and send the command
390 */
391 SCR_MOVE_TBL ^ SCR_COMMAND,
392 offsetof (struct sym_dsb, cmd),
393 }/*-------------------------< DISPATCH >-------------------------*/,{
394 /*
395 * MSG_IN is the only phase that shall be
396 * entered at least once for each (re)selection.
397 * So we test it first.
398 */
399 SCR_JUMP ^ IFTRUE (WHEN (SCR_MSG_IN)),
400 PADDR_A (msg_in),
401 SCR_JUMP ^ IFTRUE (IF (SCR_DATA_OUT)),
402 PADDR_A (datao_phase),
403 SCR_JUMP ^ IFTRUE (IF (SCR_DATA_IN)),
404 PADDR_A (datai_phase),
405 SCR_JUMP ^ IFTRUE (IF (SCR_STATUS)),
406 PADDR_A (status),
407 SCR_JUMP ^ IFTRUE (IF (SCR_COMMAND)),
408 PADDR_A (command),
409 SCR_JUMP ^ IFTRUE (IF (SCR_MSG_OUT)),
410 PADDR_B (msg_out),
411 /*
412 * Discard as many illegal phases as
413 * required and tell the C code about.
414 */
415 SCR_JUMPR ^ IFFALSE (WHEN (SCR_ILG_OUT)),
416 16,
417 SCR_MOVE_ABS (1) ^ SCR_ILG_OUT,
418 HADDR_1 (scratch),
419 SCR_JUMPR ^ IFTRUE (WHEN (SCR_ILG_OUT)),
420 -16,
421 SCR_JUMPR ^ IFFALSE (WHEN (SCR_ILG_IN)),
422 16,
423 SCR_MOVE_ABS (1) ^ SCR_ILG_IN,
424 HADDR_1 (scratch),
425 SCR_JUMPR ^ IFTRUE (WHEN (SCR_ILG_IN)),
426 -16,
427 SCR_INT,
428 SIR_BAD_PHASE,
429 SCR_JUMP,
430 PADDR_A (dispatch),
431 }/*-------------------------< SEL_NO_CMD >-----------------------*/,{
432 /*
433 * The target does not switch to command
434 * phase after IDENTIFY has been sent.
435 *
436 * If it stays in MSG OUT phase send it
437 * the IDENTIFY again.
438 */
439 SCR_JUMP ^ IFTRUE (WHEN (SCR_MSG_OUT)),
440 PADDR_B (resend_ident),
441 /*
442 * If target does not switch to MSG IN phase
443 * and we sent a negotiation, assert the
444 * failure immediately.
445 */
446 SCR_JUMP ^ IFTRUE (WHEN (SCR_MSG_IN)),
447 PADDR_A (dispatch),
448 SCR_FROM_REG (HS_REG),
449 0,
450 SCR_INT ^ IFTRUE (DATA (HS_NEGOTIATE)),
451 SIR_NEGO_FAILED,
452 /*
453 * Jump to dispatcher.
454 */
455 SCR_JUMP,
456 PADDR_A (dispatch),
457 }/*-------------------------< INIT >-----------------------------*/,{
458 /*
459 * Wait for the SCSI RESET signal to be
460 * inactive before restarting operations,
461 * since the chip may hang on SEL_ATN
462 * if SCSI RESET is active.
463 */
464 SCR_FROM_REG (sstat0),
465 0,
466 SCR_JUMPR ^ IFTRUE (MASK (IRST, IRST)),
467 -16,
468 SCR_JUMP,
469 PADDR_A (start),
470 }/*-------------------------< CLRACK >---------------------------*/,{
471 /*
472 * Terminate possible pending message phase.
473 */
474 SCR_CLR (SCR_ACK),
475 0,
476 SCR_JUMP,
477 PADDR_A (dispatch),
478 }/*-------------------------< DATAI_DONE >-----------------------*/,{
479 /*
480 * Save current pointer to LASTP.
481 */
482 SCR_COPY (4),
483 RADDR_1 (temp),
484 HADDR_1 (ccb_head.lastp),
485 /*
486 * If the SWIDE is not full, jump to dispatcher.
487 * We anticipate a STATUS phase.
488 */
489 SCR_FROM_REG (scntl2),
490 0,
491 SCR_JUMP ^ IFTRUE (MASK (WSR, WSR)),
492 PADDR_A (datai_done_wsr),
493 SCR_JUMP ^ IFTRUE (WHEN (SCR_STATUS)),
494 PADDR_A (status),
495 SCR_JUMP,
496 PADDR_A (dispatch),
497 }/*-------------------------< DATAI_DONE_WSR >-------------------*/,{
498 /*
499 * The SWIDE is full.
500 * Clear this condition.
501 */
502 SCR_REG_REG (scntl2, SCR_OR, WSR),
503 0,
504 /*
505 * We are expecting an IGNORE RESIDUE message
506 * from the device, otherwise we are in data
507 * overrun condition. Check against MSG_IN phase.
508 */
509 SCR_INT ^ IFFALSE (WHEN (SCR_MSG_IN)),
510 SIR_SWIDE_OVERRUN,
511 SCR_JUMP ^ IFFALSE (WHEN (SCR_MSG_IN)),
512 PADDR_A (dispatch),
513 /*
514 * We are in MSG_IN phase,
515 * Read the first byte of the message.
516 * If it is not an IGNORE RESIDUE message,
517 * signal overrun and jump to message
518 * processing.
519 */
520 SCR_MOVE_ABS (1) ^ SCR_MSG_IN,
521 HADDR_1 (msgin[0]),
522 SCR_INT ^ IFFALSE (DATA (M_IGN_RESIDUE)),
523 SIR_SWIDE_OVERRUN,
524 SCR_JUMP ^ IFFALSE (DATA (M_IGN_RESIDUE)),
525 PADDR_A (msg_in2),
526 /*
527 * We got the message we expected.
528 * Read the 2nd byte, and jump to dispatcher.
529 */
530 SCR_CLR (SCR_ACK),
531 0,
532 SCR_MOVE_ABS (1) ^ SCR_MSG_IN,
533 HADDR_1 (msgin[1]),
534 SCR_CLR (SCR_ACK),
535 0,
536 SCR_JUMP,
537 PADDR_A (dispatch),
538 }/*-------------------------< DATAO_DONE >-----------------------*/,{
539 /*
540 * Save current pointer to LASTP.
541 */
542 SCR_COPY (4),
543 RADDR_1 (temp),
544 HADDR_1 (ccb_head.lastp),
545 /*
546 * If the SODL is not full jump to dispatcher.
547 * We anticipate a STATUS phase.
548 */
549 SCR_FROM_REG (scntl2),
550 0,
551 SCR_JUMP ^ IFTRUE (MASK (WSS, WSS)),
552 PADDR_A (datao_done_wss),
553 SCR_JUMP ^ IFTRUE (WHEN (SCR_STATUS)),
554 PADDR_A (status),
555 SCR_JUMP,
556 PADDR_A (dispatch),
557 }/*-------------------------< DATAO_DONE_WSS >-------------------*/,{
558 /*
559 * The SODL is full, clear this condition.
560 */
561 SCR_REG_REG (scntl2, SCR_OR, WSS),
562 0,
563 /*
564 * And signal a DATA UNDERRUN condition
565 * to the C code.
566 */
567 SCR_INT,
568 SIR_SODL_UNDERRUN,
569 SCR_JUMP,
570 PADDR_A (dispatch),
571 }/*-------------------------< DATAI_PHASE >----------------------*/,{
572 /*
573 * Jump to current pointer.
574 */
575 SCR_COPY (4),
576 HADDR_1 (ccb_head.lastp),
577 RADDR_1 (temp),
578 SCR_RETURN,
579 0,
580 }/*-------------------------< DATAO_PHASE >----------------------*/,{
581 /*
582 * Jump to current pointer.
583 */
584 SCR_COPY (4),
585 HADDR_1 (ccb_head.lastp),
586 RADDR_1 (temp),
587 SCR_RETURN,
588 0,
589 }/*-------------------------< MSG_IN >---------------------------*/,{
590 /*
591 * Get the first byte of the message.
592 *
593 * The script processor doesn't negate the
594 * ACK signal after this transfer.
595 */
596 SCR_MOVE_ABS (1) ^ SCR_MSG_IN,
597 HADDR_1 (msgin[0]),
598 }/*-------------------------< MSG_IN2 >--------------------------*/,{
599 /*
600 * Check first against 1 byte messages
601 * that we handle from SCRIPTS.
602 */
603 SCR_JUMP ^ IFTRUE (DATA (M_COMPLETE)),
604 PADDR_A (complete),
605 SCR_JUMP ^ IFTRUE (DATA (M_DISCONNECT)),
606 PADDR_A (disconnect),
607 SCR_JUMP ^ IFTRUE (DATA (M_SAVE_DP)),
608 PADDR_A (save_dp),
609 SCR_JUMP ^ IFTRUE (DATA (M_RESTORE_DP)),
610 PADDR_A (restore_dp),
611 /*
612 * We handle all other messages from the
613 * C code, so no need to waste on-chip RAM
614 * for those ones.
615 */
616 SCR_JUMP,
617 PADDR_B (msg_in_etc),
618 }/*-------------------------< STATUS >---------------------------*/,{
619 /*
620 * get the status
621 */
622 SCR_MOVE_ABS (1) ^ SCR_STATUS,
623 HADDR_1 (scratch),
624 #ifdef SYM_CONF_IARB_SUPPORT
625 /*
626 * If STATUS is not GOOD, clear IMMEDIATE ARBITRATION,
627 * since we may have to tamper the start queue from
628 * the C code.
629 */
630 SCR_JUMPR ^ IFTRUE (DATA (S_GOOD)),
631 8,
632 SCR_REG_REG (scntl1, SCR_AND, ~IARB),
633 0,
634 #endif
635 /*
636 * save status to scsi_status.
637 * mark as complete.
638 */
639 SCR_TO_REG (SS_REG),
640 0,
641 SCR_LOAD_REG (HS_REG, HS_COMPLETE),
642 0,
643 /*
644 * Anticipate the MESSAGE PHASE for
645 * the TASK COMPLETE message.
646 */
647 SCR_JUMP ^ IFTRUE (WHEN (SCR_MSG_IN)),
648 PADDR_A (msg_in),
649 SCR_JUMP,
650 PADDR_A (dispatch),
651 }/*-------------------------< COMPLETE >-------------------------*/,{
652 /*
653 * Complete message.
654 *
655 * When we terminate the cycle by clearing ACK,
656 * the target may disconnect immediately.
657 *
658 * We don't want to be told of an "unexpected disconnect",
659 * so we disable this feature.
660 */
661 SCR_REG_REG (scntl2, SCR_AND, 0x7f),
662 0,
663 /*
664 * Terminate cycle ...
665 */
666 SCR_CLR (SCR_ACK|SCR_ATN),
667 0,
668 /*
669 * ... and wait for the disconnect.
670 */
671 SCR_WAIT_DISC,
672 0,
673 }/*-------------------------< COMPLETE2 >------------------------*/,{
674 /*
675 * Save host status.
676 */
677 SCR_COPY (4),
678 RADDR_1 (scr0),
679 HADDR_1 (ccb_head.status),
680 /*
681 * Move back the CCB header using self-modifying
682 * SCRIPTS.
683 */
684 SCR_COPY (4),
685 RADDR_1 (dsa),
686 PADDR_A (_sms_a40),
687 SCR_COPY (sizeof(struct sym_ccbh)),
688 HADDR_1 (ccb_head),
689 }/*-------------------------< _SMS_A40 >-------------------------*/,{
690 0,
691 /*
692 * Some bridges may reorder DMA writes to memory.
693 * We donnot want the CPU to deal with completions
694 * without all the posted write having been flushed
695 * to memory. This DUMMY READ should flush posted
696 * buffers prior to the CPU having to deal with
697 * completions.
698 */
699 SCR_COPY (4), /* DUMMY READ */
700 HADDR_1 (ccb_head.status),
701 RADDR_1 (scr0),
702 /*
703 * If command resulted in not GOOD status,
704 * call the C code if needed.
705 */
706 SCR_FROM_REG (SS_REG),
707 0,
708 SCR_CALL ^ IFFALSE (DATA (S_GOOD)),
709 PADDR_B (bad_status),
710 /*
711 * If we performed an auto-sense, call
712 * the C code to synchronyze task aborts
713 * with UNIT ATTENTION conditions.
714 */
715 SCR_FROM_REG (HF_REG),
716 0,
717 SCR_JUMP ^ IFFALSE (MASK (0 ,(HF_SENSE|HF_EXT_ERR))),
718 PADDR_A (complete_error),
719 }/*-------------------------< DONE >-----------------------------*/,{
720 /*
721 * Copy the DSA to the DONE QUEUE and
722 * signal completion to the host.
723 * If we are interrupted between DONE
724 * and DONE_END, we must reset, otherwise
725 * the completed CCB may be lost.
726 */
727 SCR_COPY (4),
728 PADDR_B (done_pos),
729 PADDR_A (_sms_a50),
730 SCR_COPY (4),
731 RADDR_1 (dsa),
732 }/*-------------------------< _SMS_A50 >-------------------------*/,{
733 0,
734 SCR_COPY (4),
735 PADDR_B (done_pos),
736 PADDR_A (_sms_a60),
737 /*
738 * The instruction below reads the DONE QUEUE next
739 * free position from memory.
740 * In addition it ensures that all PCI posted writes
741 * are flushed and so the DSA value of the done
742 * CCB is visible by the CPU before INTFLY is raised.
743 */
744 SCR_COPY (8),
745 }/*-------------------------< _SMS_A60 >-------------------------*/,{
746 0,
747 PADDR_B (prev_done),
748 }/*-------------------------< DONE_END >-------------------------*/,{
749 SCR_INT_FLY,
750 0,
751 SCR_JUMP,
752 PADDR_A (start),
753 }/*-------------------------< COMPLETE_ERROR >-------------------*/,{
754 SCR_COPY (4),
755 PADDR_B (startpos),
756 RADDR_1 (scratcha),
757 SCR_INT,
758 SIR_COMPLETE_ERROR,
759 }/*-------------------------< SAVE_DP >--------------------------*/,{
760 /*
761 * Clear ACK immediately.
762 * No need to delay it.
763 */
764 SCR_CLR (SCR_ACK),
765 0,
766 /*
767 * Keep track we received a SAVE DP, so
768 * we will switch to the other PM context
769 * on the next PM since the DP may point
770 * to the current PM context.
771 */
772 SCR_REG_REG (HF_REG, SCR_OR, HF_DP_SAVED),
773 0,
774 /*
775 * SAVE_DP message:
776 * Copy LASTP to SAVEP.
777 */
778 SCR_COPY (4),
779 HADDR_1 (ccb_head.lastp),
780 HADDR_1 (ccb_head.savep),
781 /*
782 * Anticipate the MESSAGE PHASE for
783 * the DISCONNECT message.
784 */
785 SCR_JUMP ^ IFTRUE (WHEN (SCR_MSG_IN)),
786 PADDR_A (msg_in),
787 SCR_JUMP,
788 PADDR_A (dispatch),
789 }/*-------------------------< RESTORE_DP >-----------------------*/,{
790 /*
791 * Clear ACK immediately.
792 * No need to delay it.
793 */
794 SCR_CLR (SCR_ACK),
795 0,
796 /*
797 * Copy SAVEP to LASTP.
798 */
799 SCR_COPY (4),
800 HADDR_1 (ccb_head.savep),
801 HADDR_1 (ccb_head.lastp),
802 SCR_JUMP,
803 PADDR_A (dispatch),
804 }/*-------------------------< DISCONNECT >-----------------------*/,{
805 /*
806 * DISCONNECTing ...
807 *
808 * disable the "unexpected disconnect" feature,
809 * and remove the ACK signal.
810 */
811 SCR_REG_REG (scntl2, SCR_AND, 0x7f),
812 0,
813 SCR_CLR (SCR_ACK|SCR_ATN),
814 0,
815 /*
816 * Wait for the disconnect.
817 */
818 SCR_WAIT_DISC,
819 0,
820 /*
821 * Status is: DISCONNECTED.
822 */
823 SCR_LOAD_REG (HS_REG, HS_DISCONNECT),
824 0,
825 /*
826 * Save host status.
827 */
828 SCR_COPY (4),
829 RADDR_1 (scr0),
830 HADDR_1 (ccb_head.status),
831 }/*-------------------------< DISCONNECT2 >----------------------*/,{
832 /*
833 * Move back the CCB header using self-modifying
834 * SCRIPTS.
835 */
836 SCR_COPY (4),
837 RADDR_1 (dsa),
838 PADDR_A (_sms_a65),
839 SCR_COPY (sizeof(struct sym_ccbh)),
840 HADDR_1 (ccb_head),
841 }/*-------------------------< _SMS_A65 >-------------------------*/,{
842 0,
843 SCR_JUMP,
844 PADDR_A (start),
845 }/*-------------------------< IDLE >-----------------------------*/,{
846 /*
847 * Nothing to do?
848 * Switch the LED off and wait for reselect.
849 * Will be patched with a NO_OP if LED
850 * not needed or not desired.
851 */
852 SCR_REG_REG (gpreg, SCR_OR, 0x01),
853 0,
854 #ifdef SYM_CONF_IARB_SUPPORT
855 SCR_JUMPR,
856 8,
857 #endif
858 }/*-------------------------< UNGETJOB >-------------------------*/,{
859 #ifdef SYM_CONF_IARB_SUPPORT
860 /*
861 * Set IMMEDIATE ARBITRATION, for the next time.
862 * This will give us better chance to win arbitration
863 * for the job we just wanted to do.
864 */
865 SCR_REG_REG (scntl1, SCR_OR, IARB),
866 0,
867 #endif
868 /*
869 * We are not able to restart the SCRIPTS if we are
870 * interrupted and these instruction haven't been
871 * all executed. BTW, this is very unlikely to
872 * happen, but we check that from the C code.
873 */
874 SCR_LOAD_REG (dsa, 0xff),
875 0,
876 SCR_COPY (4),
877 RADDR_1 (scratcha),
878 PADDR_B (startpos),
879 }/*-------------------------< RESELECT >-------------------------*/,{
880 #ifdef SYM_CONF_TARGET_ROLE_SUPPORT
881 /*
882 * Make sure we are in initiator mode.
883 */
884 SCR_CLR (SCR_TRG),
885 0,
886 #endif
887 /*
888 * Sleep waiting for a reselection.
889 */
890 SCR_WAIT_RESEL,
891 PADDR_A(start),
892 }/*-------------------------< RESELECTED >-----------------------*/,{
893 /*
894 * Switch the LED on.
895 * Will be patched with a NO_OP if LED
896 * not needed or not desired.
897 */
898 SCR_REG_REG (gpreg, SCR_AND, 0xfe),
899 0,
900 /*
901 * load the target id into the sdid
902 */
903 SCR_REG_SFBR (ssid, SCR_AND, 0x8F),
904 0,
905 SCR_TO_REG (sdid),
906 0,
907 /*
908 * Load the target control block address
909 */
910 SCR_COPY (4),
911 PADDR_B (targtbl),
912 RADDR_1 (dsa),
913 SCR_SFBR_REG (dsa, SCR_SHL, 0),
914 0,
915 SCR_REG_REG (dsa, SCR_SHL, 0),
916 0,
917 SCR_REG_REG (dsa, SCR_AND, 0x3c),
918 0,
919 SCR_COPY (4),
920 RADDR_1 (dsa),
921 PADDR_A (_sms_a70),
922 SCR_COPY (4),
923 }/*-------------------------< _SMS_A70 >-------------------------*/,{
924 0,
925 RADDR_1 (dsa),
926 /*
927 * Copy the TCB header to a fixed place in
928 * the HCB.
929 */
930 SCR_COPY (4),
931 RADDR_1 (dsa),
932 PADDR_A (_sms_a80),
933 SCR_COPY (sizeof(struct sym_tcbh)),
934 }/*-------------------------< _SMS_A80 >-------------------------*/,{
935 0,
936 HADDR_1 (tcb_head),
937 /*
938 * We expect MESSAGE IN phase.
939 * If not, get help from the C code.
940 */
941 SCR_INT ^ IFFALSE (WHEN (SCR_MSG_IN)),
942 SIR_RESEL_NO_MSG_IN,
943 }/*-------------------------< RESELECTED1 >----------------------*/,{
944 /*
945 * Load the synchronous transfer registers.
946 */
947 SCR_COPY (1),
948 HADDR_1 (tcb_head.wval),
949 RADDR_1 (scntl3),
950 SCR_COPY (1),
951 HADDR_1 (tcb_head.sval),
952 RADDR_1 (sxfer),
953 /*
954 * Get the IDENTIFY message.
955 */
956 SCR_MOVE_ABS (1) ^ SCR_MSG_IN,
957 HADDR_1 (msgin),
958 /*
959 * If IDENTIFY LUN #0, use a faster path
960 * to find the LCB structure.
961 */
962 SCR_JUMP ^ IFTRUE (MASK (0x80, 0xbf)),
963 PADDR_A (resel_lun0),
964 /*
965 * If message isn't an IDENTIFY,
966 * tell the C code about.
967 */
968 SCR_INT ^ IFFALSE (MASK (0x80, 0x80)),
969 SIR_RESEL_NO_IDENTIFY,
970 /*
971 * It is an IDENTIFY message,
972 * Load the LUN control block address.
973 */
974 SCR_COPY (4),
975 HADDR_1 (tcb_head.luntbl_sa),
976 RADDR_1 (dsa),
977 SCR_SFBR_REG (dsa, SCR_SHL, 0),
978 0,
979 SCR_REG_REG (dsa, SCR_SHL, 0),
980 0,
981 SCR_REG_REG (dsa, SCR_AND, 0xfc),
982 0,
983 SCR_COPY (4),
984 RADDR_1 (dsa),
985 PADDR_A (_sms_a90),
986 SCR_COPY (4),
987 }/*-------------------------< _SMS_A90 >-------------------------*/,{
988 0,
989 RADDR_1 (dsa),
990 SCR_JUMPR,
991 12,
992 }/*-------------------------< RESEL_LUN0 >-----------------------*/,{
993 /*
994 * LUN 0 special case (but usual one :))
995 */
996 SCR_COPY (4),
997 HADDR_1 (tcb_head.lun0_sa),
998 RADDR_1 (dsa),
999 /*
1000 * Jump indirectly to the reselect action for this LUN.
1001 * (lcb.head.resel_sa assumed at offset zero of lcb).
1002 */
1003 SCR_COPY (4),
1004 RADDR_1 (dsa),
1005 PADDR_A (_sms_a100),
1006 SCR_COPY (4),
1007 }/*-------------------------< _SMS_A100 >------------------------*/,{
1008 0,
1009 RADDR_1 (temp),
1010 SCR_RETURN,
1011 0,
1012 /* In normal situations, we jump to RESEL_TAG or RESEL_NO_TAG */
1013 }/*-------------------------< RESEL_TAG >------------------------*/,{
1014 /*
1015 * ACK the IDENTIFY previously received.
1016 */
1017 SCR_CLR (SCR_ACK),
1018 0,
1019 /*
1020 * It shall be a tagged command.
1021 * Read SIMPLE+TAG.
1022 * The C code will deal with errors.
1023 * Aggressive optimization, isn't it? :)
1024 */
1025 SCR_MOVE_ABS (2) ^ SCR_MSG_IN,
1026 HADDR_1 (msgin),
1027 /*
1028 * Copy the LCB header to a fixed place in
1029 * the HCB using self-modifying SCRIPTS.
1030 */
1031 SCR_COPY (4),
1032 RADDR_1 (dsa),
1033 PADDR_A (_sms_a110),
1034 SCR_COPY (sizeof(struct sym_lcbh)),
1035 }/*-------------------------< _SMS_A110 >------------------------*/,{
1036 0,
1037 HADDR_1 (lcb_head),
1038 /*
1039 * Load the pointer to the tagged task
1040 * table for this LUN.
1041 */
1042 SCR_COPY (4),
1043 HADDR_1 (lcb_head.itlq_tbl_sa),
1044 RADDR_1 (dsa),
1045 /*
1046 * The SIDL still contains the TAG value.
1047 * Aggressive optimization, isn't it? :):)
1048 */
1049 SCR_REG_SFBR (sidl, SCR_SHL, 0),
1050 0,
1051 #if SYM_CONF_MAX_TASK*4 > 512
1052 SCR_JUMPR ^ IFFALSE (CARRYSET),
1053 8,
1054 SCR_REG_REG (dsa1, SCR_OR, 2),
1055 0,
1056 SCR_REG_REG (sfbr, SCR_SHL, 0),
1057 0,
1058 SCR_JUMPR ^ IFFALSE (CARRYSET),
1059 8,
1060 SCR_REG_REG (dsa1, SCR_OR, 1),
1061 0,
1062 #elif SYM_CONF_MAX_TASK*4 > 256
1063 SCR_JUMPR ^ IFFALSE (CARRYSET),
1064 8,
1065 SCR_REG_REG (dsa1, SCR_OR, 1),
1066 0,
1067 #endif
1068 /*
1069 * Retrieve the DSA of this task.
1070 * JUMP indirectly to the restart point of the CCB.
1071 */
1072 SCR_SFBR_REG (dsa, SCR_AND, 0xfc),
1073 0,
1074 SCR_COPY (4),
1075 RADDR_1 (dsa),
1076 PADDR_A (_sms_a120),
1077 SCR_COPY (4),
1078 }/*-------------------------< _SMS_A120 >------------------------*/,{
1079 0,
1080 RADDR_1 (dsa),
1081 }/*-------------------------< RESEL_GO >-------------------------*/,{
1082 SCR_COPY (4),
1083 RADDR_1 (dsa),
1084 PADDR_A (_sms_a130),
1085 /*
1086 * Move 'ccb.phys.head.go' action to
1087 * scratch/scratch1. So scratch1 will
1088 * contain the 'restart' field of the
1089 * 'go' structure.
1090 */
1091 SCR_COPY (8),
1092 }/*-------------------------< _SMS_A130 >------------------------*/,{
1093 0,
1094 PADDR_B (scratch),
1095 SCR_COPY (4),
1096 PADDR_B (scratch1), /* phys.head.go.restart */
1097 RADDR_1 (temp),
1098 SCR_RETURN,
1099 0,
1100 /* In normal situations we branch to RESEL_DSA */
1101 }/*-------------------------< RESEL_DSA >------------------------*/,{
1102 /*
1103 * ACK the IDENTIFY or TAG previously received.
1104 */
1105 SCR_CLR (SCR_ACK),
1106 0,
1107 }/*-------------------------< RESEL_DSA1 >-----------------------*/,{
1108 /*
1109 * Copy the CCB header to a fixed location
1110 * in the HCB using self-modifying SCRIPTS.
1111 */
1112 SCR_COPY (4),
1113 RADDR_1 (dsa),
1114 PADDR_A (_sms_a140),
1115 SCR_COPY (sizeof(struct sym_ccbh)),
1116 }/*-------------------------< _SMS_A140 >------------------------*/,{
1117 0,
1118 HADDR_1 (ccb_head),
1119 /*
1120 * Initialize the status register
1121 */
1122 SCR_COPY (4),
1123 HADDR_1 (ccb_head.status),
1124 RADDR_1 (scr0),
1125 /*
1126 * Jump to dispatcher.
1127 */
1128 SCR_JUMP,
1129 PADDR_A (dispatch),
1130 }/*-------------------------< RESEL_NO_TAG >---------------------*/,{
1131 /*
1132 * Copy the LCB header to a fixed place in
1133 * the HCB using self-modifying SCRIPTS.
1134 */
1135 SCR_COPY (4),
1136 RADDR_1 (dsa),
1137 PADDR_A (_sms_a145),
1138 SCR_COPY (sizeof(struct sym_lcbh)),
1139 }/*-------------------------< _SMS_A145 >------------------------*/,{
1140 0,
1141 HADDR_1 (lcb_head),
1142 /*
1143 * Load the DSA with the unique ITL task.
1144 */
1145 SCR_COPY (4),
1146 HADDR_1 (lcb_head.itl_task_sa),
1147 RADDR_1 (dsa),
1148 SCR_JUMP,
1149 PADDR_A (resel_go),
1150 }/*-------------------------< DATA_IN >--------------------------*/,{
1151 /*
1152 * Because the size depends on the
1153 * #define SYM_CONF_MAX_SG parameter,
1154 * it is filled in at runtime.
1155 *
1156 * ##===========< i=0; i<SYM_CONF_MAX_SG >=========
1157 * || SCR_CHMOV_TBL ^ SCR_DATA_IN,
1158 * || offsetof (struct sym_dsb, data[ i]),
1159 * ##==========================================
1160 */
1161 0
1162 }/*-------------------------< DATA_IN2 >-------------------------*/,{
1163 SCR_CALL,
1164 PADDR_A (datai_done),
1165 SCR_JUMP,
1166 PADDR_B (data_ovrun),
1167 }/*-------------------------< DATA_OUT >-------------------------*/,{
1168 /*
1169 * Because the size depends on the
1170 * #define SYM_CONF_MAX_SG parameter,
1171 * it is filled in at runtime.
1172 *
1173 * ##===========< i=0; i<SYM_CONF_MAX_SG >=========
1174 * || SCR_CHMOV_TBL ^ SCR_DATA_OUT,
1175 * || offsetof (struct sym_dsb, data[ i]),
1176 * ##==========================================
1177 */
1178 0
1179 }/*-------------------------< DATA_OUT2 >------------------------*/,{
1180 SCR_CALL,
1181 PADDR_A (datao_done),
1182 SCR_JUMP,
1183 PADDR_B (data_ovrun),
1184 }/*-------------------------< PM0_DATA >-------------------------*/,{
1185 /*
1186 * Read our host flags to SFBR, so we will be able
1187 * to check against the data direction we expect.
1188 */
1189 SCR_FROM_REG (HF_REG),
1190 0,
1191 /*
1192 * Check against actual DATA PHASE.
1193 */
1194 SCR_JUMP ^ IFFALSE (WHEN (SCR_DATA_IN)),
1195 PADDR_A (pm0_data_out),
1196 /*
1197 * Actual phase is DATA IN.
1198 * Check against expected direction.
1199 */
1200 SCR_JUMP ^ IFFALSE (MASK (HF_DATA_IN, HF_DATA_IN)),
1201 PADDR_B (data_ovrun),
1202 /*
1203 * Keep track we are moving data from the
1204 * PM0 DATA mini-script.
1205 */
1206 SCR_REG_REG (HF_REG, SCR_OR, HF_IN_PM0),
1207 0,
1208 /*
1209 * Move the data to memory.
1210 */
1211 SCR_CHMOV_TBL ^ SCR_DATA_IN,
1212 offsetof (struct sym_ccb, phys.pm0.sg),
1213 SCR_JUMP,
1214 PADDR_A (pm0_data_end),
1215 }/*-------------------------< PM0_DATA_OUT >---------------------*/,{
1216 /*
1217 * Actual phase is DATA OUT.
1218 * Check against expected direction.
1219 */
1220 SCR_JUMP ^ IFTRUE (MASK (HF_DATA_IN, HF_DATA_IN)),
1221 PADDR_B (data_ovrun),
1222 /*
1223 * Keep track we are moving data from the
1224 * PM0 DATA mini-script.
1225 */
1226 SCR_REG_REG (HF_REG, SCR_OR, HF_IN_PM0),
1227 0,
1228 /*
1229 * Move the data from memory.
1230 */
1231 SCR_CHMOV_TBL ^ SCR_DATA_OUT,
1232 offsetof (struct sym_ccb, phys.pm0.sg),
1233 }/*-------------------------< PM0_DATA_END >---------------------*/,{
1234 /*
1235 * Clear the flag that told we were moving
1236 * data from the PM0 DATA mini-script.
1237 */
1238 SCR_REG_REG (HF_REG, SCR_AND, (~HF_IN_PM0)),
1239 0,
1240 /*
1241 * Return to the previous DATA script which
1242 * is guaranteed by design (if no bug) to be
1243 * the main DATA script for this transfer.
1244 */
1245 SCR_COPY (4),
1246 RADDR_1 (dsa),
1247 RADDR_1 (scratcha),
1248 SCR_REG_REG (scratcha, SCR_ADD, offsetof (struct sym_ccb,phys.pm0.ret)),
1249 0,
1250 }/*-------------------------< PM_DATA_END >----------------------*/,{
1251 SCR_COPY (4),
1252 RADDR_1 (scratcha),
1253 PADDR_A (_sms_a150),
1254 SCR_COPY (4),
1255 }/*-------------------------< _SMS_A150 >------------------------*/,{
1256 0,
1257 RADDR_1 (temp),
1258 SCR_RETURN,
1259 0,
1260 }/*-------------------------< PM1_DATA >-------------------------*/,{
1261 /*
1262 * Read our host flags to SFBR, so we will be able
1263 * to check against the data direction we expect.
1264 */
1265 SCR_FROM_REG (HF_REG),
1266 0,
1267 /*
1268 * Check against actual DATA PHASE.
1269 */
1270 SCR_JUMP ^ IFFALSE (WHEN (SCR_DATA_IN)),
1271 PADDR_A (pm1_data_out),
1272 /*
1273 * Actual phase is DATA IN.
1274 * Check against expected direction.
1275 */
1276 SCR_JUMP ^ IFFALSE (MASK (HF_DATA_IN, HF_DATA_IN)),
1277 PADDR_B (data_ovrun),
1278 /*
1279 * Keep track we are moving data from the
1280 * PM1 DATA mini-script.
1281 */
1282 SCR_REG_REG (HF_REG, SCR_OR, HF_IN_PM1),
1283 0,
1284 /*
1285 * Move the data to memory.
1286 */
1287 SCR_CHMOV_TBL ^ SCR_DATA_IN,
1288 offsetof (struct sym_ccb, phys.pm1.sg),
1289 SCR_JUMP,
1290 PADDR_A (pm1_data_end),
1291 }/*-------------------------< PM1_DATA_OUT >---------------------*/,{
1292 /*
1293 * Actual phase is DATA OUT.
1294 * Check against expected direction.
1295 */
1296 SCR_JUMP ^ IFTRUE (MASK (HF_DATA_IN, HF_DATA_IN)),
1297 PADDR_B (data_ovrun),
1298 /*
1299 * Keep track we are moving data from the
1300 * PM1 DATA mini-script.
1301 */
1302 SCR_REG_REG (HF_REG, SCR_OR, HF_IN_PM1),
1303 0,
1304 /*
1305 * Move the data from memory.
1306 */
1307 SCR_CHMOV_TBL ^ SCR_DATA_OUT,
1308 offsetof (struct sym_ccb, phys.pm1.sg),
1309 }/*-------------------------< PM1_DATA_END >---------------------*/,{
1310 /*
1311 * Clear the flag that told we were moving
1312 * data from the PM1 DATA mini-script.
1313 */
1314 SCR_REG_REG (HF_REG, SCR_AND, (~HF_IN_PM1)),
1315 0,
1316 /*
1317 * Return to the previous DATA script which
1318 * is guaranteed by design (if no bug) to be
1319 * the main DATA script for this transfer.
1320 */
1321 SCR_COPY (4),
1322 RADDR_1 (dsa),
1323 RADDR_1 (scratcha),
1324 SCR_REG_REG (scratcha, SCR_ADD, offsetof (struct sym_ccb,phys.pm1.ret)),
1325 0,
1326 SCR_JUMP,
1327 PADDR_A (pm_data_end),
1328 }/*--------------------------<>----------------------------------*/
1329 };
1330
1331 static struct SYM_FWB_SCR SYM_FWB_SCR = {
1332 /*-------------------------< NO_DATA >--------------------------*/ {
1333 SCR_JUMP,
1334 PADDR_B (data_ovrun),
1335 }/*-------------------------< SEL_FOR_ABORT >--------------------*/,{
1336 /*
1337 * We are jumped here by the C code, if we have
1338 * some target to reset or some disconnected
1339 * job to abort. Since error recovery is a serious
1340 * busyness, we will really reset the SCSI BUS, if
1341 * case of a SCSI interrupt occurring in this path.
1342 */
1343
1344 #ifdef SYM_CONF_TARGET_ROLE_SUPPORT
1345 /*
1346 * Set initiator mode.
1347 */
1348 SCR_CLR (SCR_TRG),
1349 0,
1350 #endif
1351 /*
1352 * And try to select this target.
1353 */
1354 SCR_SEL_TBL_ATN ^ offsetof (struct sym_hcb, abrt_sel),
1355 PADDR_A (reselect),
1356 /*
1357 * Wait for the selection to complete or
1358 * the selection to time out.
1359 */
1360 SCR_JUMPR ^ IFFALSE (WHEN (SCR_MSG_OUT)),
1361 -8,
1362 /*
1363 * Call the C code.
1364 */
1365 SCR_INT,
1366 SIR_TARGET_SELECTED,
1367 /*
1368 * The C code should let us continue here.
1369 * Send the 'kiss of death' message.
1370 * We expect an immediate disconnect once
1371 * the target has eaten the message.
1372 */
1373 SCR_REG_REG (scntl2, SCR_AND, 0x7f),
1374 0,
1375 SCR_MOVE_TBL ^ SCR_MSG_OUT,
1376 offsetof (struct sym_hcb, abrt_tbl),
1377 SCR_CLR (SCR_ACK|SCR_ATN),
1378 0,
1379 SCR_WAIT_DISC,
1380 0,
1381 /*
1382 * Tell the C code that we are done.
1383 */
1384 SCR_INT,
1385 SIR_ABORT_SENT,
1386 }/*-------------------------< SEL_FOR_ABORT_1 >------------------*/,{
1387 /*
1388 * Jump at scheduler.
1389 */
1390 SCR_JUMP,
1391 PADDR_A (start),
1392 }/*-------------------------< MSG_IN_ETC >-----------------------*/,{
1393 /*
1394 * If it is an EXTENDED (variable size message)
1395 * Handle it.
1396 */
1397 SCR_JUMP ^ IFTRUE (DATA (M_EXTENDED)),
1398 PADDR_B (msg_extended),
1399 /*
1400 * Let the C code handle any other
1401 * 1 byte message.
1402 */
1403 SCR_JUMP ^ IFTRUE (MASK (0x00, 0xf0)),
1404 PADDR_B (msg_received),
1405 SCR_JUMP ^ IFTRUE (MASK (0x10, 0xf0)),
1406 PADDR_B (msg_received),
1407 /*
1408 * We donnot handle 2 bytes messages from SCRIPTS.
1409 * So, let the C code deal with these ones too.
1410 */
1411 SCR_JUMP ^ IFFALSE (MASK (0x20, 0xf0)),
1412 PADDR_B (msg_weird_seen),
1413 SCR_CLR (SCR_ACK),
1414 0,
1415 SCR_MOVE_ABS (1) ^ SCR_MSG_IN,
1416 HADDR_1 (msgin[1]),
1417 }/*-------------------------< MSG_RECEIVED >---------------------*/,{
1418 SCR_COPY (4), /* DUMMY READ */
1419 HADDR_1 (scratch),
1420 RADDR_1 (scratcha),
1421 SCR_INT,
1422 SIR_MSG_RECEIVED,
1423 }/*-------------------------< MSG_WEIRD_SEEN >-------------------*/,{
1424 SCR_COPY (4), /* DUMMY READ */
1425 HADDR_1 (scratch),
1426 RADDR_1 (scratcha),
1427 SCR_INT,
1428 SIR_MSG_WEIRD,
1429 }/*-------------------------< MSG_EXTENDED >---------------------*/,{
1430 /*
1431 * Clear ACK and get the next byte
1432 * assumed to be the message length.
1433 */
1434 SCR_CLR (SCR_ACK),
1435 0,
1436 SCR_MOVE_ABS (1) ^ SCR_MSG_IN,
1437 HADDR_1 (msgin[1]),
1438 /*
1439 * Try to catch some unlikely situations as 0 length
1440 * or too large the length.
1441 */
1442 SCR_JUMP ^ IFTRUE (DATA (0)),
1443 PADDR_B (msg_weird_seen),
1444 SCR_TO_REG (scratcha),
1445 0,
1446 SCR_REG_REG (sfbr, SCR_ADD, (256-8)),
1447 0,
1448 SCR_JUMP ^ IFTRUE (CARRYSET),
1449 PADDR_B (msg_weird_seen),
1450 /*
1451 * We donnot handle extended messages from SCRIPTS.
1452 * Read the amount of data correponding to the
1453 * message length and call the C code.
1454 */
1455 SCR_COPY (1),
1456 RADDR_1 (scratcha),
1457 PADDR_B (_sms_b10),
1458 SCR_CLR (SCR_ACK),
1459 0,
1460 }/*-------------------------< _SMS_B10 >-------------------------*/,{
1461 SCR_MOVE_ABS (0) ^ SCR_MSG_IN,
1462 HADDR_1 (msgin[2]),
1463 SCR_JUMP,
1464 PADDR_B (msg_received),
1465 }/*-------------------------< MSG_BAD >--------------------------*/,{
1466 /*
1467 * unimplemented message - reject it.
1468 */
1469 SCR_INT,
1470 SIR_REJECT_TO_SEND,
1471 SCR_SET (SCR_ATN),
1472 0,
1473 SCR_JUMP,
1474 PADDR_A (clrack),
1475 }/*-------------------------< MSG_WEIRD >------------------------*/,{
1476 /*
1477 * weird message received
1478 * ignore all MSG IN phases and reject it.
1479 */
1480 SCR_INT,
1481 SIR_REJECT_TO_SEND,
1482 SCR_SET (SCR_ATN),
1483 0,
1484 }/*-------------------------< MSG_WEIRD1 >-----------------------*/,{
1485 SCR_CLR (SCR_ACK),
1486 0,
1487 SCR_JUMP ^ IFFALSE (WHEN (SCR_MSG_IN)),
1488 PADDR_A (dispatch),
1489 SCR_MOVE_ABS (1) ^ SCR_MSG_IN,
1490 HADDR_1 (scratch),
1491 SCR_JUMP,
1492 PADDR_B (msg_weird1),
1493 }/*-------------------------< WDTR_RESP >------------------------*/,{
1494 /*
1495 * let the target fetch our answer.
1496 */
1497 SCR_SET (SCR_ATN),
1498 0,
1499 SCR_CLR (SCR_ACK),
1500 0,
1501 SCR_JUMP ^ IFFALSE (WHEN (SCR_MSG_OUT)),
1502 PADDR_B (nego_bad_phase),
1503 }/*-------------------------< SEND_WDTR >------------------------*/,{
1504 /*
1505 * Send the M_X_WIDE_REQ
1506 */
1507 SCR_MOVE_ABS (4) ^ SCR_MSG_OUT,
1508 HADDR_1 (msgout),
1509 SCR_JUMP,
1510 PADDR_B (msg_out_done),
1511 }/*-------------------------< SDTR_RESP >------------------------*/,{
1512 /*
1513 * let the target fetch our answer.
1514 */
1515 SCR_SET (SCR_ATN),
1516 0,
1517 SCR_CLR (SCR_ACK),
1518 0,
1519 SCR_JUMP ^ IFFALSE (WHEN (SCR_MSG_OUT)),
1520 PADDR_B (nego_bad_phase),
1521 }/*-------------------------< SEND_SDTR >------------------------*/,{
1522 /*
1523 * Send the M_X_SYNC_REQ
1524 */
1525 SCR_MOVE_ABS (5) ^ SCR_MSG_OUT,
1526 HADDR_1 (msgout),
1527 SCR_JUMP,
1528 PADDR_B (msg_out_done),
1529 }/*-------------------------< PPR_RESP >-------------------------*/,{
1530 /*
1531 * let the target fetch our answer.
1532 */
1533 SCR_SET (SCR_ATN),
1534 0,
1535 SCR_CLR (SCR_ACK),
1536 0,
1537 SCR_JUMP ^ IFFALSE (WHEN (SCR_MSG_OUT)),
1538 PADDR_B (nego_bad_phase),
1539 }/*-------------------------< SEND_PPR >-------------------------*/,{
1540 /*
1541 * Send the M_X_PPR_REQ
1542 */
1543 SCR_MOVE_ABS (8) ^ SCR_MSG_OUT,
1544 HADDR_1 (msgout),
1545 SCR_JUMP,
1546 PADDR_B (msg_out_done),
1547 }/*-------------------------< NEGO_BAD_PHASE >-------------------*/,{
1548 SCR_INT,
1549 SIR_NEGO_PROTO,
1550 SCR_JUMP,
1551 PADDR_A (dispatch),
1552 }/*-------------------------< MSG_OUT >--------------------------*/,{
1553 /*
1554 * The target requests a message.
1555 * We donnot send messages that may
1556 * require the device to go to bus free.
1557 */
1558 SCR_MOVE_ABS (1) ^ SCR_MSG_OUT,
1559 HADDR_1 (msgout),
1560 /*
1561 * ... wait for the next phase
1562 * if it's a message out, send it again, ...
1563 */
1564 SCR_JUMP ^ IFTRUE (WHEN (SCR_MSG_OUT)),
1565 PADDR_B (msg_out),
1566 }/*-------------------------< MSG_OUT_DONE >---------------------*/,{
1567 /*
1568 * Let the C code be aware of the
1569 * sent message and clear the message.
1570 */
1571 SCR_INT,
1572 SIR_MSG_OUT_DONE,
1573 /*
1574 * ... and process the next phase
1575 */
1576 SCR_JUMP,
1577 PADDR_A (dispatch),
1578 }/*-------------------------< DATA_OVRUN >-----------------------*/,{
1579 /*
1580 * Zero scratcha that will count the
1581 * extras bytes.
1582 */
1583 SCR_COPY (4),
1584 PADDR_B (zero),
1585 RADDR_1 (scratcha),
1586 }/*-------------------------< DATA_OVRUN1 >----------------------*/,{
1587 /*
1588 * The target may want to transfer too much data.
1589 *
1590 * If phase is DATA OUT write 1 byte and count it.
1591 */
1592 SCR_JUMPR ^ IFFALSE (WHEN (SCR_DATA_OUT)),
1593 16,
1594 SCR_CHMOV_ABS (1) ^ SCR_DATA_OUT,
1595 HADDR_1 (scratch),
1596 SCR_JUMP,
1597 PADDR_B (data_ovrun2),
1598 /*
1599 * If WSR is set, clear this condition, and
1600 * count this byte.
1601 */
1602 SCR_FROM_REG (scntl2),
1603 0,
1604 SCR_JUMPR ^ IFFALSE (MASK (WSR, WSR)),
1605 16,
1606 SCR_REG_REG (scntl2, SCR_OR, WSR),
1607 0,
1608 SCR_JUMP,
1609 PADDR_B (data_ovrun2),
1610 /*
1611 * Finally check against DATA IN phase.
1612 * Signal data overrun to the C code
1613 * and jump to dispatcher if not so.
1614 * Read 1 byte otherwise and count it.
1615 */
1616 SCR_JUMPR ^ IFTRUE (WHEN (SCR_DATA_IN)),
1617 16,
1618 SCR_INT,
1619 SIR_DATA_OVERRUN,
1620 SCR_JUMP,
1621 PADDR_A (dispatch),
1622 SCR_CHMOV_ABS (1) ^ SCR_DATA_IN,
1623 HADDR_1 (scratch),
1624 }/*-------------------------< DATA_OVRUN2 >----------------------*/,{
1625 /*
1626 * Count this byte.
1627 * This will allow to return a negative
1628 * residual to user.
1629 */
1630 SCR_REG_REG (scratcha, SCR_ADD, 0x01),
1631 0,
1632 SCR_REG_REG (scratcha1, SCR_ADDC, 0),
1633 0,
1634 SCR_REG_REG (scratcha2, SCR_ADDC, 0),
1635 0,
1636 /*
1637 * .. and repeat as required.
1638 */
1639 SCR_JUMP,
1640 PADDR_B (data_ovrun1),
1641 }/*-------------------------< ABORT_RESEL >----------------------*/,{
1642 SCR_SET (SCR_ATN),
1643 0,
1644 SCR_CLR (SCR_ACK),
1645 0,
1646 /*
1647 * send the abort/abortag/reset message
1648 * we expect an immediate disconnect
1649 */
1650 SCR_REG_REG (scntl2, SCR_AND, 0x7f),
1651 0,
1652 SCR_MOVE_ABS (1) ^ SCR_MSG_OUT,
1653 HADDR_1 (msgout),
1654 SCR_CLR (SCR_ACK|SCR_ATN),
1655 0,
1656 SCR_WAIT_DISC,
1657 0,
1658 SCR_INT,
1659 SIR_RESEL_ABORTED,
1660 SCR_JUMP,
1661 PADDR_A (start),
1662 }/*-------------------------< RESEND_IDENT >---------------------*/,{
1663 /*
1664 * The target stays in MSG OUT phase after having acked
1665 * Identify [+ Tag [+ Extended message ]]. Targets shall
1666 * behave this way on parity error.
1667 * We must send it again all the messages.
1668 */
1669 SCR_SET (SCR_ATN), /* Shall be asserted 2 deskew delays before the */
1670 0, /* 1rst ACK = 90 ns. Hope the chip isn't too fast */
1671 SCR_JUMP,
1672 PADDR_A (send_ident),
1673 }/*-------------------------< IDENT_BREAK >----------------------*/,{
1674 SCR_CLR (SCR_ATN),
1675 0,
1676 SCR_JUMP,
1677 PADDR_A (select2),
1678 }/*-------------------------< IDENT_BREAK_ATN >------------------*/,{
1679 SCR_SET (SCR_ATN),
1680 0,
1681 SCR_JUMP,
1682 PADDR_A (select2),
1683 }/*-------------------------< SDATA_IN >-------------------------*/,{
1684 SCR_CHMOV_TBL ^ SCR_DATA_IN,
1685 offsetof (struct sym_dsb, sense),
1686 SCR_CALL,
1687 PADDR_A (datai_done),
1688 SCR_JUMP,
1689 PADDR_B (data_ovrun),
1690 }/*-------------------------< RESEL_BAD_LUN >--------------------*/,{
1691 /*
1692 * Message is an IDENTIFY, but lun is unknown.
1693 * Signal problem to C code for logging the event.
1694 * Send a M_ABORT to clear all pending tasks.
1695 */
1696 SCR_INT,
1697 SIR_RESEL_BAD_LUN,
1698 SCR_JUMP,
1699 PADDR_B (abort_resel),
1700 }/*-------------------------< BAD_I_T_L >------------------------*/,{
1701 /*
1702 * We donnot have a task for that I_T_L.
1703 * Signal problem to C code for logging the event.
1704 * Send a M_ABORT message.
1705 */
1706 SCR_INT,
1707 SIR_RESEL_BAD_I_T_L,
1708 SCR_JUMP,
1709 PADDR_B (abort_resel),
1710 }/*-------------------------< BAD_I_T_L_Q >----------------------*/,{
1711 /*
1712 * We donnot have a task that matches the tag.
1713 * Signal problem to C code for logging the event.
1714 * Send a M_ABORTTAG message.
1715 */
1716 SCR_INT,
1717 SIR_RESEL_BAD_I_T_L_Q,
1718 SCR_JUMP,
1719 PADDR_B (abort_resel),
1720 }/*-------------------------< BAD_STATUS >-----------------------*/,{
1721 /*
1722 * Anything different from INTERMEDIATE
1723 * CONDITION MET should be a bad SCSI status,
1724 * given that GOOD status has already been tested.
1725 * Call the C code.
1726 */
1727 SCR_COPY (4),
1728 PADDR_B (startpos),
1729 RADDR_1 (scratcha),
1730 SCR_INT ^ IFFALSE (DATA (S_COND_MET)),
1731 SIR_BAD_SCSI_STATUS,
1732 SCR_RETURN,
1733 0,
1734 }/*-------------------------< WSR_MA_HELPER >--------------------*/,{
1735 /*
1736 * Helper for the C code when WSR bit is set.
1737 * Perform the move of the residual byte.
1738 */
1739 SCR_CHMOV_TBL ^ SCR_DATA_IN,
1740 offsetof (struct sym_ccb, phys.wresid),
1741 SCR_JUMP,
1742 PADDR_A (dispatch),
1743
1744 }/*-------------------------< ZERO >-----------------------------*/,{
1745 SCR_DATA_ZERO,
1746 }/*-------------------------< SCRATCH >--------------------------*/,{
1747 SCR_DATA_ZERO, /* MUST BE BEFORE SCRATCH1 */
1748 }/*-------------------------< SCRATCH1 >-------------------------*/,{
1749 SCR_DATA_ZERO,
1750 }/*-------------------------< PREV_DONE >------------------------*/,{
1751 SCR_DATA_ZERO, /* MUST BE BEFORE DONE_POS ! */
1752 }/*-------------------------< DONE_POS >-------------------------*/,{
1753 SCR_DATA_ZERO,
1754 }/*-------------------------< NEXTJOB >--------------------------*/,{
1755 SCR_DATA_ZERO, /* MUST BE BEFORE STARTPOS ! */
1756 }/*-------------------------< STARTPOS >-------------------------*/,{
1757 SCR_DATA_ZERO,
1758 }/*-------------------------< TARGTBL >--------------------------*/,{
1759 SCR_DATA_ZERO,
1760 }/*--------------------------<>----------------------------------*/
1761 };
1762
1763 static struct SYM_FWZ_SCR SYM_FWZ_SCR = {
1764 /*-------------------------< SNOOPTEST >------------------------*/{
1765 /*
1766 * Read the variable.
1767 */
1768 SCR_COPY (4),
1769 HADDR_1 (scratch),
1770 RADDR_1 (scratcha),
1771 /*
1772 * Write the variable.
1773 */
1774 SCR_COPY (4),
1775 RADDR_1 (temp),
1776 HADDR_1 (scratch),
1777 /*
1778 * Read back the variable.
1779 */
1780 SCR_COPY (4),
1781 HADDR_1 (scratch),
1782 RADDR_1 (temp),
1783 }/*-------------------------< SNOOPEND >-------------------------*/,{
1784 /*
1785 * And stop.
1786 */
1787 SCR_INT,
1788 99,
1789 }/*--------------------------<>----------------------------------*/
1790 };
mah project overlay