Annotation of sys/arch/mvme68k/dev/ssh_script.ss, Revision 1.1
1.1 ! nbrk 1: ; $OpenBSD: ssh_script.ss,v 1.1 2001/02/18 17:41:09 deraadt Exp $
! 2:
! 3: ;
! 4: ; Copyright (c) 1995 Michael L. Hitch
! 5: ; All rights reserved.
! 6: ;
! 7: ; Redistribution and use in source and binary forms, with or without
! 8: ; modification, are permitted provided that the following conditions
! 9: ; are met:
! 10: ; 1. Redistributions of source code must retain the above copyright
! 11: ; notice, this list of conditions and the following disclaimer.
! 12: ; 2. Redistributions in binary form must reproduce the above copyright
! 13: ; notice, this list of conditions and the following disclaimer in the
! 14: ; documentation and/or other materials provided with the distribution.
! 15: ; 3. All advertising materials mentioning features or use of this software
! 16: ; must display the following acknowledgement:
! 17: ; This product includes software developed by Michael L. Hitch.
! 18: ; 4. The name of the author may not be used to endorse or promote products
! 19: ; derived from this software without specific prior written permission
! 20: ;
! 21: ; THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
! 22: ; IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
! 23: ; OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
! 24: ; IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
! 25: ; INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
! 26: ; NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
! 27: ; DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
! 28: ; THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
! 29: ; (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
! 30: ; THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
! 31: ;
! 32:
! 33: ; NCR 53c710 script
! 34: ;
! 35: ABSOLUTE ds_Device = 0
! 36: ABSOLUTE ds_MsgOut = ds_Device + 4
! 37: ABSOLUTE ds_Cmd = ds_MsgOut + 8
! 38: ABSOLUTE ds_Status = ds_Cmd + 8
! 39: ABSOLUTE ds_Msg = ds_Status + 8
! 40: ABSOLUTE ds_MsgIn = ds_Msg + 8
! 41: ABSOLUTE ds_ExtMsg = ds_MsgIn + 8
! 42: ABSOLUTE ds_SyncMsg = ds_ExtMsg + 8
! 43: ABSOLUTE ds_Data1 = ds_SyncMsg + 8
! 44: ABSOLUTE ds_Data2 = ds_Data1 + 8
! 45: ABSOLUTE ds_Data3 = ds_Data2 + 8
! 46: ABSOLUTE ds_Data4 = ds_Data3 + 8
! 47: ABSOLUTE ds_Data5 = ds_Data4 + 8
! 48: ABSOLUTE ds_Data6 = ds_Data5 + 8
! 49: ABSOLUTE ds_Data7 = ds_Data6 + 8
! 50: ABSOLUTE ds_Data8 = ds_Data7 + 8
! 51: ABSOLUTE ds_Data9 = ds_Data8 + 8
! 52:
! 53: ABSOLUTE ok = 0xff00
! 54: ABSOLUTE err1 = 0xff01
! 55: ABSOLUTE err2 = 0xff02
! 56: ABSOLUTE err3 = 0xff03
! 57: ABSOLUTE err4 = 0xff04
! 58: ABSOLUTE err5 = 0xff05
! 59: ABSOLUTE err6 = 0xff06
! 60: ABSOLUTE err7 = 0xff07
! 61: ABSOLUTE err8 = 0xff08
! 62: ABSOLUTE err9 = 0xff09
! 63: ABSOLUTE err10 = 0xff0a
! 64:
! 65: ENTRY scripts
! 66: ENTRY switch
! 67: ENTRY wait_reselect
! 68: ENTRY dataout
! 69: ENTRY datain
! 70:
! 71: PROC scripts:
! 72:
! 73: scripts:
! 74:
! 75: SELECT ATN FROM ds_Device, REL(reselect)
! 76: ;
! 77: switch:
! 78: JUMP REL(msgin), WHEN MSG_IN
! 79: JUMP REL(msgout), IF MSG_OUT
! 80: JUMP REL(command_phase), IF CMD
! 81: JUMP REL(dataout), IF DATA_OUT
! 82: JUMP REL(datain), IF DATA_IN
! 83: JUMP REL(end), IF STATUS
! 84:
! 85: INT err5 ; Unrecognized phase
! 86:
! 87: msgin:
! 88: MOVE FROM ds_MsgIn, WHEN MSG_IN
! 89: JUMP REL(ext_msg), IF 0x01 ; extended message
! 90: JUMP REL(disc), IF 0x04 ; disconnect message
! 91: JUMP REL(msg_sdp), IF 0x02 ; save data pointers
! 92: JUMP REL(msg_rej), IF 0x07 ; message reject
! 93: JUMP REL(msg_rdp), IF 0x03 ; restore data pointers
! 94: INT err6 ; unrecognized message
! 95:
! 96: msg_rdp:
! 97: msg_rej:
! 98: CLEAR ACK
! 99: CLEAR ATN
! 100: JUMP REL(switch)
! 101:
! 102: ext_msg:
! 103: CLEAR ACK
! 104: MOVE FROM ds_ExtMsg, WHEN MSG_IN
! 105: JUMP REL(sync_msg), IF 0x03
! 106: int err7 ; extended message not SDTR
! 107:
! 108: sync_msg:
! 109: CLEAR ACK
! 110: MOVE FROM ds_SyncMsg, WHEN MSG_IN
! 111: CLEAR ACK
! 112: JUMP REL(switch)
! 113:
! 114: disc:
! 115: CLEAR ACK
! 116: WAIT DISCONNECT
! 117:
! 118: int err2 ; signal disconnect w/o save DP
! 119:
! 120: msg_sdp:
! 121: CLEAR ACK ; acknowledge message
! 122: JUMP REL(switch), WHEN NOT MSG_IN
! 123: MOVE FROM ds_ExtMsg, WHEN MSG_IN
! 124: INT err8, IF NOT 0x04 ; interrupt if not disconnect
! 125: CLEAR ACK
! 126: WAIT DISCONNECT
! 127:
! 128: INT err1 ; signal disconnect
! 129:
! 130: reselect:
! 131: wait_reselect:
! 132: WAIT RESELECT REL(select_adr)
! 133: MOVE LCRC to SFBR ; Save reselect ID
! 134: MOVE SFBR to SCRATCH0
! 135:
! 136: INT err9, WHEN NOT MSG_IN ; didn't get IDENTIFY
! 137: MOVE FROM ds_Msg, WHEN MSG_IN
! 138: INT err3 ; let host know about reconnect
! 139: CLEAR ACK ; acknowlege the message
! 140: JUMP REL(switch)
! 141:
! 142:
! 143: select_adr:
! 144: MOVE SCNTL1 & 0x10 to SFBR ; get connected status
! 145: INT err4, IF 0x00 ; tell host if not connected
! 146: MOVE CTEST2 & 0x40 to SFBR ; clear Sig_P
! 147: JUMP REL(wait_reselect) ; and try reselect again
! 148:
! 149: msgout:
! 150: MOVE FROM ds_MsgOut, WHEN MSG_OUT
! 151: JUMP REL(switch)
! 152:
! 153: command_phase:
! 154: CLEAR ATN
! 155: MOVE FROM ds_Cmd, WHEN CMD
! 156: JUMP REL(switch)
! 157:
! 158: dataout:
! 159: MOVE FROM ds_Data1, WHEN DATA_OUT
! 160: CALL REL(switch), WHEN NOT DATA_OUT
! 161: MOVE FROM ds_Data2, WHEN DATA_OUT
! 162: CALL REL(switch), WHEN NOT DATA_OUT
! 163: MOVE FROM ds_Data3, WHEN DATA_OUT
! 164: CALL REL(switch), WHEN NOT DATA_OUT
! 165: MOVE FROM ds_Data4, WHEN DATA_OUT
! 166: CALL REL(switch), WHEN NOT DATA_OUT
! 167: MOVE FROM ds_Data5, WHEN DATA_OUT
! 168: CALL REL(switch), WHEN NOT DATA_OUT
! 169: MOVE FROM ds_Data6, WHEN DATA_OUT
! 170: CALL REL(switch), WHEN NOT DATA_OUT
! 171: MOVE FROM ds_Data7, WHEN DATA_OUT
! 172: CALL REL(switch), WHEN NOT DATA_OUT
! 173: MOVE FROM ds_Data8, WHEN DATA_OUT
! 174: CALL REL(switch), WHEN NOT DATA_OUT
! 175: MOVE FROM ds_Data9, WHEN DATA_OUT
! 176: CALL REL(switch)
! 177:
! 178: datain:
! 179: MOVE FROM ds_Data1, WHEN DATA_IN
! 180: CALL REL(switch), WHEN NOT DATA_IN
! 181: MOVE FROM ds_Data2, WHEN DATA_IN
! 182: CALL REL(switch), WHEN NOT DATA_IN
! 183: MOVE FROM ds_Data3, WHEN DATA_IN
! 184: CALL REL(switch), WHEN NOT DATA_IN
! 185: MOVE FROM ds_Data4, WHEN DATA_IN
! 186: CALL REL(switch), WHEN NOT DATA_IN
! 187: MOVE FROM ds_Data5, WHEN DATA_IN
! 188: CALL REL(switch), WHEN NOT DATA_IN
! 189: MOVE FROM ds_Data6, WHEN DATA_IN
! 190: CALL REL(switch), WHEN NOT DATA_IN
! 191: MOVE FROM ds_Data7, WHEN DATA_IN
! 192: CALL REL(switch), WHEN NOT DATA_IN
! 193: MOVE FROM ds_Data8, WHEN DATA_IN
! 194: CALL REL(switch), WHEN NOT DATA_IN
! 195: MOVE FROM ds_Data9, WHEN DATA_IN
! 196: CALL REL(switch)
! 197:
! 198: end:
! 199: MOVE FROM ds_Status, WHEN STATUS
! 200: int err10, WHEN NOT MSG_IN ; status not followed by msg
! 201: MOVE FROM ds_Msg, WHEN MSG_IN
! 202: CLEAR ACK
! 203: WAIT DISCONNECT
! 204: INT ok ; signal completion
! 205: JUMP REL(wait_reselect)
CVSweb