Seq # *Modification Id* Act
----------------------------+
00001 M00S00001.compsdn ---| CTEXT COMPSDN - SEARCH FOR DEVICE NUMBER.
00002 M00S00002.compsdn ---| IF -DEF,QUAL$,1
00003 M00S00003.compsdn ---| QUAL COMPSDN
Line S00001 Modification History |
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act
----------------------------+
00004 M01S00001.281l803 +++|* COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992.
00005 M00S00004.compsdn +++| SDN SPACE 4
00006 M00S00005.compsdn +++|*** SDN - SEARCH FOR DEVICE NUMBER.
00007 M00S00006.compsdn +++|* J. L. WARDELL. 72/08/30.
00008 M00S00007.compsdn +++|* P. D. HAAS. 74/10/16.
00009 M00S00008.compsdn +++| SPACE 4
00010 M00S00009.compsdn +++|*** SDN SETS EST ORDINAL FOR DEVICE NUMBER SPECIFIED.
00011 M00S00010.compsdn +++|*
00012 M00S00011.compsdn +++|* ENTRY (A) = EST ORDINAL OF FAMILY.
00013 M00S00012.compsdn +++|* (CM) = DEVICE NUMBER.
00014 M00S00013.compsdn +++|*
00015 M00S00014.compsdn +++|* EXIT (A) = MST/10 ADDRESS OF DEVICE FOUND.
00016 M00S00015.compsdn +++|* (A) = -1 IF DEVICE NOT FOUND.
00017 M00S00016.compsdn +++|* (A) = -2 IF DEVICE ACCESS DENIED BY *SETMS*.
00018 M00S00017.compsdn +++|* (T5) = EST ORDINAL OF DEVICE.
00019 M00S00018.compsdn +++|*
00020 M00S00019.compsdn +++|* USES T0 - T7, CM - CM+6.
00021 M00S00020.compsdn +++|*
00022 M00S00021.compsdn +++|* MACROS SETMS, SFA.
00023 M00S00022.compsdn +++|
00024 M00S00023.compsdn +++|
00025 M00S00024.compsdn +++|* PROCESS DEVICE NOT FOUND.
00026 M00S00025.compsdn +++|
00027 M00S00026.compsdn +++| SDN6 LCN 1 SET EXIT CONDITION
00028 M00S00027.compsdn +++|
00029 M00S00028.compsdn +++| SDN SUBR ENTRY/EXIT
00030 M00S00029.compsdn +++| SFA EST READ EST ENTRY
00031 M00S00030.compsdn +++| ADK EQDE
00032 M00S00031.compsdn +++| CRD T0
00033 M00S00032.compsdn +++| LDD T0+4 GET FAMILY NAME
00034 M00S00033.compsdn +++| SHN 3
00035 M00S00034.compsdn +++| ADN PFGL
00036 M00S00035.compsdn +++| CRM SDNA,ON
00037 M00S00036.compsdn +++| LDM SDNA+3 SET PROPER DEVICE NUMBER FOR SEARCH
00038 M00S00037.compsdn +++| SCN 77
00039 M00S00038.compsdn +++| LMD CM
00040 M00S00039.compsdn +++| STM SDNA+3
00041 M00S00040.compsdn +++| LDN ESTP GET EST POINTERS
00042 M00S00041.compsdn +++| CRD T0
00043 M00S00042.compsdn +++| LDN NOPE-1 INITIALIZE EST ORDINAL FOR SEARCH
00044 M00S00043.compsdn +++| STD T5
00045 M00S00044.compsdn +++| LDD T0+3 SET LAST MASS STORAGE ORDINAL + 1
00046 M00S00045.compsdn +++| STD T6
00047 M00S00046.compsdn +++|
00048 M00S00047.compsdn +++|* SEARCH FOR DEVICE.
00049 M00S00048.compsdn +++|
00050 M00S00049.compsdn +++| SDN1 AOD T5 ADVANCE EST ORDINAL
00051 M00S00050.compsdn +++| LMD T6
00052 M00S00051.compsdn +++| ZJN SDN6 IF END OF MASS STORAGE EST
00053 M00S00052.compsdn +++| SFA EST,T5 READ EST ENTRY
00054 M00S00053.compsdn +++| ADK EQDE
00055 M00S00054.compsdn +++| CRD T0
00056 M00S00055.compsdn +++| LDD T0 CHECK DEVICE STATUS
00057 M00S00056.compsdn +++| SHN -6
00058 M00S00057.compsdn +++| LPN 41
00059 M00S00058.compsdn +++| LMN 40
00060 M00S00059.compsdn +++| NJN SDN1 IF NOT AVAILABLE OR NON MS DEVICE
00061 M00S00060.compsdn +++|
00062 M00S00061.compsdn +++|* DETERMINE IF DEVICE IS ACTIVE, AVAILABLE PF DEVICE.
00063 M00S00062.compsdn +++|
00064 M00S00063.compsdn +++| LDD T0+4 READ *STLL* WORD OF MST
00065 M00S00064.compsdn +++| SHN 3
00066 M00S00065.compsdn +++| ADN STLL
00067 M00S00066.compsdn +++| CRD CM
00068 M00S00067.compsdn +++| SBN STLL-MDGL
00069 M00S00068.compsdn +++| CRD CM+1
00070 M00S00069.compsdn +++| SBN MDGL-PFGL GET PF DESCRIPTOR WORD
00071 M00S00070.compsdn +++| CRD CM+2
00072 M00S00071.compsdn +++| LDD CM
00073 M00S00072.compsdn +++| LPC MLFPR+MLIAL+MLIHD+MLIFD+MLIPF+MLUNL+MLDUL
00074 M00S00073.compsdn +++| SDN2 NJN SDN1 IF UNAVAILABLE OR INITIALIZE PENDING
00075 M00S00074.compsdn +++| LDD CM+1
00076 M00S00075.compsdn +++| SHN 21-12
00077 M00S00076.compsdn +++| MJN SDN1 IF AUXILIARY DEVICE
00078 M00S00077.compsdn +++|
00079 M00S00078.compsdn +++|* COMPARE FAMILY NAME AND DEVICE NUMBER WITH THAT REQUESTED.
00080 M00S00079.compsdn +++|
00081 M00S00080.compsdn +++| LDN CM+2
00082 M00S00081.compsdn +++| STD T7
00083 M00S00082.compsdn +++| SDN3 LDM SDNA-CM-2,T7
00084 M00S00083.compsdn +++| LMI T7
00085 M00S00084.compsdn +++| NJN SDN2 IF NAMES DONT MATCH
00086 M00S00085.compsdn +++| AOD T7 ADVANCE POINTER
00087 M00S00086.compsdn +++| LMN CM+6
00088 M00S00087.compsdn +++| NJN SDN3 LOOP FOR FOUR BYTES
00089 M00S00088.compsdn +++|
00090 M00S00089.compsdn +++|* DETERMINE IF DEVICE CAN BE ACCESSED.
00091 M00S00090.compsdn +++|
00092 M00S00091.compsdn +++| SETMS STATUS
Line S00001 Modification History |
M01 (Added by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
00093 M01S00001.ns2776 +++| LDM MSD
00094 M01S00002.ns2776 +++| SHN 21-6
00095 M00S00092.compsdn +++| MJN SDN5 IF DEVICE NOT TO BE ACCESSED
00096 M00S00093.compsdn +++| LDD T0+4
00097 M00S00094.compsdn +++| SDN4 LJM SDNX RETURN
00098 M00S00095.compsdn +++|
00099 M00S00096.compsdn +++| SDN5 LCN 2
00100 M00S00097.compsdn +++| UJN SDN4 RETURN
00101 M00S00098.compsdn +++|
00102 M00S00099.compsdn +++|
00103 M00S00100.compsdn +++| SDNA BSSZ 5 FAMILY NAME
00104 M00S00101.compsdn +++| SPACE 4
00105 M00S00102.compsdn +++| QUAL$ IF -DEF,QUAL$
00106 M00S00103.compsdn +++| QUAL *
00107 M00S00104.compsdn +++| SDN EQU /COMPSDN/SDN
00108 M00S00105.compsdn +++| QUAL$ ENDIF
00109 M00S00106.compsdn +++| ENDX