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