User Tools

Site Tools


cdc:nos2.source:opl.opl871:deck:mte.003

Deck MTE Part 003

10 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
05045  M00S03219.mte     +++|          CRD    CM
05046  M00S03220.mte     +++|          LDD    MA          WRITE REQUEST
05047  M00S03221.mte     +++|          CWM    MFCA,ON
05048  M00S03222.mte     +++|          MONITOR  RPPM
05049  M00S03223.mte     +++|          LDD    CM+1
05050  M00S03224.mte     +++|          ZJP    PDM2        IF NO PP ASSIGNED
05051  M00S03225.mte     +++|          UJP    PDM1        ADVANCE TO *MFMR* STATE
05052  M00S03226.mte     +++|
05053  M00S03227.mte     +++|
05054  M00S03228.mte     +++| MFCA     VFD    18/3L1MR,18/0,6/CDV,18/0
05055  M00S03229.mte     +++|
05056  M00S03230.mte     +++|*         *1MR* CALLED TO CLEAR TRACK INTERLOCKS STATE PROCESSOR.
05057  M00S03231.mte     +++|*         NOTE - THIS STATE IS SIMPLY A WAIT FOR *1MR* TO COMPLETE.
05058  M00S03232.mte     +++|*         *1MR* ADVANCES TO THE NEXT STATE.
05059  M00S03233.mte     +++|
05060  M00S03234.mte     +++|          STATE  MFMR,PDM2
05061  M00S03235.mte     +++| TPDM     SPACE  4,10
05062  M00S03236.mte     +++|**        TPDM - TABLE OF STATE PROCESSOR ADDRESSES.
05063  M00S03237.mte     +++|*
05064  M00S03238.mte     +++|*         INDEXED BY STATE NUMBER.
05065  M00S03239.mte     +++|*         12/ PROCESSOR ADDRESS
05066  M00S03240.mte     +++|
05067  M00S03241.mte     +++|
05068  M00S03242.mte     +++| TPDM     BSS    0
05069  M00S03243.mte     +++|          DUP    MFMX,1
05070  M00S03244.mte     +++|          CON    HNG
05071  M00S03245.mte     +++| TPDM     HERE
05072  M00S03246.mte     +++|          ORG    TPDM+MFMX
05073  M00S03247.mte     +++|
05074  M00S03248.mte     +++| SCIRI    VFD    24/40000000+.CIRI
05075  M00S03249.mte     +++| CCIRI    VFD    24/70000000+.CIRI
Line S03250 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
05076  M01S03250.ns2783  ---| SSD      SPACE  4,10
Line S00267 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
05077  M01S00267.ns2783  +++| SSD      SPACE  4,15
05078  M00S03251.mte     +++|**        SSD - SEARCH FOR SHARED DEVICE.
05079  M00S03252.mte     +++|*
05080  M00S03253.mte     +++|*         ENTRY  (T7) = LAST DEVICE ORDINAL FOUND.
05081  M00S03254.mte     +++|*
05082  M00S03255.mte     +++|*         EXIT   (T7) = SHARED DEVICE ORDINAL FOUND.
05083  M00S03256.mte     +++|*                (A) = 0, IF NO DEVICE FOUND.
05084  M00S03257.mte     +++|*                (EA - EA+1) = EXTENDED MEMORY MST ADDRESS OF SHARED
05085  M00S03258.mte     +++|*                              DEVICE.
05086  M00S03259.mte     +++|*
05087  M00S03260.mte     +++|*         USES   T7, CM - CM+4, EA - EA+4.
05088  M00S03261.mte     +++|*
05089  M00S03262.mte     +++|*         MACROS SFA.
05090  M00S03263.mte     +++|
05091  M00S03264.mte     +++|
05092  M00S03265.mte     +++| SSD      SUBR               ENTRY/EXIT
05093  M00S03266.mte     +++| SSD1     SOD    T7
05094  M00S03267.mte     +++|          ZJN    SSDX        IF END OF EST
05095  M00S03268.mte     +++|          SFA    EST,T7
05096  M00S03269.mte     +++|          CRD    CM
05097  M00S03270.mte     +++|          LDD    CM
05098  M00S03271.mte     +++|          SHN    21-13
05099  M00S03272.mte     +++|          PJN    SSD1        IF NOT MASS STORAGE
05100  M00S03273.mte     +++|          SHN    13-11
05101  M00S03274.mte     +++|          PJN    SSD1        IF NOT SHARED
05102  M00S03275.mte     +++|          LDD    CM+4        READ EXTENDED MEMORY ADDRESS OF MST
05103  M00S03276.mte     +++|          SHN    3
05104  M00S03277.mte     +++|          ADK    SDGL
05105  M00S03278.mte     +++|          CRD    EA
05106  M00S03279.mte     +++|          UJN    SSDX        RETURN
05107  M00S03280.mte     +++|
05108  M00S03281.mte     +++|          ERRNG  EBUF-*      *2EA* OVERFLOW
05109  M00S03282.mte     +++|          QUAL   *
05110  M00S03283.mte     +++|          TITLE  MTE/2EB - EXTENDED MEMORY ERROR RECOVERY.
05111  M00S03284.mte     +++|          IDENT  2EB,O2EB    EXTENDED MEMORY ERROR RECOVERY.
05112  M00S03285.mte     +++|*COMMENT  MTE - EXTENDED MEMORY ERROR RECOVERY.
Line S03286 Modification History
M01 (Removed by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
05113  M01S03286.281l803 ---|          COMMENT  COPYRIGHT CONTROL DATA CORPORATION, 1985.
Line S00003 Modification History
M01 (Added by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
05114  M01S00003.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
05115  M00S03287.mte     +++| O2EB     EQU    PPFW
05116  M00S03288.mte     +++|          ORG    O2EB
05117  M00S03289.mte     +++|          SPACE  4,30
05118  M00S03290.mte     +++|***       2EB - EXTENDED MEMORY ERROR RECOVERY.
05119  M00S03291.mte     +++|*
05120  M00S03292.mte     +++|*         THERE EXIST FAILURE MODES FOR BOTH ECS AND ESM WHERE
05121  M00S03293.mte     +++|*         AN ERROR IS PRESENT IN THE DATA STORED IN MEMORY BUT
05122  M00S03294.mte     +++|*         NOTHING IS INHERENTLY WRONG WITH THE MEMORY.  THE DATA
05123  M00S03295.mte     +++|*         WORD MAY BE REWRITTEN WITH CORRECT DATA THUS ELIMINATING
05124  M00S03296.mte     +++|*         THE ERROR ON FUTURE READS.  THIS IS PRIMARILY A FAILURE
05125  M00S03297.mte     +++|*         MODE ASSOCIATED WITH ECS WHERE A BIT VALUE READ FROM
05126  M00S03298.mte     +++|*         MEMORY IS NOT DETECTED PROPERLY.  DUE TO THE DESTRUCTIVE
05127  M00S03299.mte     +++|*         READ THE BAD DATA IS SUBSEQUENTLY REWRITTEN.  FOR ESM
05128  M00S03300.mte     +++|*         CERTAIN TYPES OF DATA CORRUPTION DURING THE WRITE WILL
05129  M00S03301.mte     +++|*         CAUSE THE GENERATION OF AN INVALID SECDED CODE.  THIS
05130  M00S03302.mte     +++|*         IS ONE WAY A HARD ERROR CAN BE DETECTED DURING A READ.
05131  M00S03303.mte     +++|*         HARD READ ERRORS ON ESM ARE AN EXTREMELY RARE SITUATION.
05132  M00S03304.mte     +++|*         THE ERROR RECOVERY LOGIC IMPLEMENTED IN THE FOLLOWING
05133  M00S03305.mte     +++|*         CODE IS PROVIDED PRIMARILY FOR THE SUPPORT OF ECS AS
05134  M00S03306.mte     +++|*         A LINK DEVICE.  IT IS POSSIBLE THAT THIS LOGIC COULD
05135  M00S03307.mte     +++|*         CORRECT AN ERROR IN ESM AS WELL.
05136  M00S03308.mte     +++|*
05137  M00S03309.mte     +++|*         *2EB* IS CALLED BY *MTE* WHEN THE *COMI* FLAG BITS IS SET,
05138  M00S03310.mte     +++|*         INDICATING EXTENDED MEMORY ERRORS WERE DETECTED BY SOME
05139  M00S03311.mte     +++|*         SOME MACHINE.
05140  M00S03312.mte     +++|*
05141  M00S03313.mte     +++|*         *2EB* PERFORMS THE FOLLOWING ERROR RECOVERY FUNCTIONS.
05142  M00S03314.mte     +++|*
05143  M00S03315.mte     +++|*         1.     FAST ATTACH FILE PARITY ERROR PROCESSING.
05144  M00S03316.mte     +++|*                FOR EACH GLOBAL FAST ATTACH FILE FOUND IN THE FNT
05145  M00S03317.mte     +++|*                THE FILE NAME, LOCAL ACCESS COUNT, AND FAMILY NAME
05146  M00S03318.mte     +++|*                WORDS OF THE FAT ARE GENERATED FROM INFORMATION IN
05147  M00S03319.mte     +++|*                CM AND THEN WRITTEN TO EM.  ALL LOCAL ACCESS COUNTS
05148  M00S03320.mte     +++|*                ARE SUBSEQUENTLY READ FROM EM WHICH PROVIDES THE
05149  M00S03321.mte     +++|*                INFORMATION NEEDED TO GENERATE THE GLOBAL ACCESS
05150  M00S03322.mte     +++|*                COUNT WORD.  ONCE GENERATED, THE GLOBAL COUNT WORD
05151  M00S03323.mte     +++|*                IS WRITTEN BACK TO EM COMPLETING THE RESTORATION OF
05152  M00S03324.mte     +++|*                A FAT TABLE ENTRY.
05153  M00S03325.mte     +++|*         2.     MST/TRT PARITY ERROR PROCESSING.
05154  M00S03326.mte     +++|*                THE ERROR RECOVERY ALGORITHM FOR MST/TRT ERROR
05155  M00S03327.mte     +++|*                RECOVERY DEPENDS ON BEING ABLE TO READ THE *SDGL*
05156  M00S03328.mte     +++|*                MST WORD FOR THE DEVICE.  WHEN THE *SDGL* WORD READ
05157  M00S03329.mte     +++|*                FROM EM INDICATES THAT THIS MACHINE HAS THE
05158  M00S03330.mte     +++|*                UP-TO-DATE COPY OF THE DEVICE TABLE THESE TABLES
05159  M00S03331.mte     +++|*                ARE REWRITTEN TO EM.
05160  M00S03332.mte     +++|
05161  M00S03333.mte     +++|
05162  M00S03334.mte     +++| RPE      SUBR               ENTRY/EXIT
05163  M00S03335.mte     +++|
Line S01288 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05164  M01S01288.283l840 +++|*         ISSUE MESSAGE TO SYSTEM CONTROL POINT.
05165  M01S01289.283l840 +++|
05166  M01S01290.283l840 +++|          LDK    NCPL
05167  M01S01291.283l840 +++|          CRD    CM
05168  M01S01292.283l840 +++|          AOD    CM+1
05169  M01S01293.283l840 +++|          SHN    7
05170  M01S01294.283l840 +++|          ADN    MS2W
05171  M01S01295.283l840 +++|          CWM    RPEB,TR     *MST/TRT PARITY ERROR.*
05172  M01S01296.283l840 +++|
05173  M00S03336.mte     +++|*         PROCESS FAST ATTACH FILES.
05174  M00S03337.mte     +++|
05175  M00S03338.mte     +++|          LDN    20          SET RETRY COUNT
05176  M00S03339.mte     +++|          STD    EA+4
05177  M00S03340.mte     +++| RPE1     SOD    EA+4
05178  M00S03341.mte     +++|          ZJN    RPEX        IF UNABLE TO INTERLOCK FAT
05179  M00S03342.mte     +++|          SFLAG  FATI,RPE1   SET FAT INTERLOCK
05180  M00S03343.mte     +++|          LDM    TPPR+AFAM
05181  M00S03344.mte     +++|          LMC    AFP
05182  M00S03345.mte     +++|          ZJP    RPE8        IF *AFAM* PRESET NOT EXECUTED YET
05183  M00S03346.mte     +++|
05184  M00S03347.mte     +++|*         SEARCH FNT FOR GLOBAL FAST ATTACH FILES.
05185  M00S03348.mte     +++|
05186  M00S03349.mte     +++|          LDN    FNTP
05187  M00S03350.mte     +++|          CRD    OR
05188  M00S03351.mte     +++| RPE2     LDN    FNTE        ADVANCE FNT ADDRESS
05189  M00S03352.mte     +++|          RAD    OR+1
05190  M00S03353.mte     +++|          SHN    -14
05191  M00S03354.mte     +++|          RAD    OR          READ FST
05192  M00S03355.mte     +++|          SHN    14
05193  M00S03356.mte     +++|          ADD    OR+1
05194  M00S03357.mte     +++|          ADK    FNTG
05195  M00S03358.mte     +++|          CRD    FN
05196  M00S03359.mte     +++|          ADK    FSTG-FNTG
05197  M00S03360.mte     +++|          CRD    FS
05198  M00S03361.mte     +++|          SOD    OR+2
05199  M00S03362.mte     +++|          MJP    RPE8        IF END OF FNT
05200  M00S03363.mte     +++|          LDD    FN+4
05201  M00S03364.mte     +++|          SHN    -6
05202  M00S03365.mte     +++|          LMN    FAFT
05203  M00S03366.mte     +++|          NJN    RPE2        IF NOT FAST ATTACH FILE
05204  M00S03367.mte     +++|          LDD    FN+3
05205  M00S03368.mte     +++|          LPN    77
05206  M00S03369.mte     +++|          ZJN    RPE2        IF NOT GLOBAL FAST ATTACH
05207  M00S03370.mte     +++|          SHN    FATS        COMPUTE FAT ADDRESS
05208  M00S03371.mte     +++|          ADM    AFAA+1
05209  M00S03372.mte     +++|          STD    EA+1
05210  M00S03373.mte     +++|          SHN    -14
05211  M00S03374.mte     +++|          ADM    AFAA
05212  M00S03375.mte     +++|          LPN    77
05213  M00S03376.mte     +++|          STD    EA
05214  M00S03377.mte     +++|          LDD    FS          SAVE EQUIPMENT AND TRACK
05215  M00S03378.mte     +++|          LPC    777
05216  M00S03379.mte     +++|          STD    T7
05217  M00S03380.mte     +++|          LDD    FS+1
05218  M00S03381.mte     +++|          STD    T6
05219  M00S03382.mte     +++|          LDD    FN+3        SET FILE NAME IN FAT WORD 0
05220  M00S03383.mte     +++|          SCN    77
05221  M00S03384.mte     +++|          STD    FN+3
05222  M00S03385.mte     +++|          LDN    0
05223  M00S03386.mte     +++|          STD    FN+4
05224  M00S03387.mte     +++|          WRITEM 1,FN        WRITE FILE NAME TO FAT
05225  M00S03388.mte     +++|          LDK    MMFL        BUILD LOCAL FAT WORD
05226  M00S03389.mte     +++|          CRD    CM
05227  M00S03390.mte     +++|          LDM    MI+1        ADVANCE ADDRESS TO LOCAL FAT WORD
05228  M00S03391.mte     +++|          ADN    1
05229  M00S03392.mte     +++|          RAD    EA+1
05230  M00S03393.mte     +++|          SHN    -14
05231  M00S03394.mte     +++|          RAD    EA
05232  M00S03395.mte     +++|          LDD    CM          SET MACHINE ID IN LOCAL FAT WORD
05233  M00S03396.mte     +++|          STD    FS
05234  M00S03397.mte     +++|          LDN    0
05235  M00S03398.mte     +++|          STD    FS+1
05236  M00S03399.mte     +++|          WRITEM 1,FS        WRITE LOCAL FAT WORD
05237  M00S03400.mte     +++|          LDN    MXMF+1      ADVANCE TO FAMILY NAME WORD
05238  M00S03401.mte     +++|          SBM    MI+1
05239  M00S03402.mte     +++|          RAD    EA+1
05240  M00S03403.mte     +++|          SHN    -14
05241  M00S03404.mte     +++|          RAD    EA
05242  M00S03405.mte     +++|          SFA    EST,T7      READ FAMILY NAME FROM MST
05243  M00S03406.mte     +++|          ADK    EQDE
05244  M00S03407.mte     +++|          CRD    CM
05245  M00S03408.mte     +++|          LDD    CM+4
05246  M00S03409.mte     +++|          SHN    3
05247  M00S03410.mte     +++|          ADN    PFGL
05248  M00S03411.mte     +++|          CRD    FN
05249  M00S03412.mte     +++|          LDN    0
05250  M00S03413.mte     +++|          STD    FN+4
05251  M00S03414.mte     +++|          WRITEM 1,FN        WRITE FAMILY NAME WORD
05252  M00S03415.mte     +++|
05253  M00S03416.mte     +++|*         READ LOCAL WORDS CHECKING FOR ERRORS AND ACCUMULATING COUNTS.
05254  M00S03417.mte     +++|
05255  M00S03418.mte     +++|          LDN    ZERL        CLEAR GLOBAL COUNTS
05256  M00S03419.mte     +++|          CRD    FN
05257  M00S03420.mte     +++|          LDD    T6          SET TRACK
05258  M00S03421.mte     +++|          STD    FN+1
05259  M00S03422.mte     +++|          LDN    MXMF        SET COUNTER
05260  M00S03423.mte     +++|          STD    T7
05261  M00S03424.mte     +++| RPE3     SOD    EA+1        ADVANCE BACKWARD FROM FAMILY NAME WORD
05262  M00S03425.mte     +++|          PJN    RPE4        IF NO UNDERFLOW
05263  M00S03426.mte     +++|          AOD    EA+1
05264  M00S03427.mte     +++|          SOD    EA
05265  M00S03428.mte     +++| RPE4     SOD    T7
05266  M00S03429.mte     +++|          MJN    RPE6        IF END OF LOCAL WORDS TO READ
05267  M00S03430.mte     +++|          READEM 1,FS,RPE5   NOTE IF ERROR
05268  M00S03431.mte     +++|          LDD    FS+4
05269  M00S03432.mte     +++|          RAD    FN+4
05270  M00S03433.mte     +++|          SHN    -14
05271  M00S03434.mte     +++|          NJN    RPE6        IF INVALID BITS SET
05272  M00S03435.mte     +++|          LDD    FS+3
05273  M00S03436.mte     +++|          RAD    FN+3
05274  M00S03437.mte     +++|          SHN    -14
05275  M00S03438.mte     +++|          NJN    RPE6        IF INVALID BITS SET
05276  M00S03439.mte     +++|          LDD    FS+2
05277  M00S03440.mte     +++|          RAD    FN+2
05278  M00S03441.mte     +++|          SHN    -14
05279  M00S03442.mte     +++|          ZJN    RPE3        IF NOT INVALID BITS SET
05280  M00S03443.mte     +++| RPE5     AOM    RPEA        ADVANCE ERROR COUNT
05281  M00S03444.mte     +++|          UJN    RPE7        ADVANCE TO NEXT FILE
05282  M00S03445.mte     +++|
05283  M00S03446.mte     +++| RPE6     WRITEM 1,FN        WRITE GLOBAL WORD
05284  M00S03447.mte     +++| RPE7     LJM    RPE2        ADVANCE TO NEXT FILE
05285  M00S03448.mte     +++|
05286  M00S03449.mte     +++| RPE8     CFLAG  FATI        CLEAR FAT INTERLOCK
05287  M00S03450.mte     +++|
05288  M00S03451.mte     +++|*         PROCESS MST/TRT EXTENDED MEMORY ERRORS.
05289  M00S03452.mte     +++|
05290  M00S03453.mte     +++|          LDN    20          SET RETRY COUNT
05291  M00S03454.mte     +++|          STD    EA+4
05292  M00S03455.mte     +++| RPE9     SOD    EA+4
05293  M00S03456.mte     +++|          ZJP    RPEX        IF UNABLE TO INTERLOCK
05294  M00S03457.mte     +++|          SFLAG  TRTI,RPE9   SET TRT INTERLOCK
05295  M00S03458.mte     +++|
05296  M00S03459.mte     +++|*         SEARCH EST FOR SHARED DEVICES.
05297  M00S03460.mte     +++|
05298  M00S03461.mte     +++|          LDN    ESTP
05299  M00S03462.mte     +++|          CRD    OR
05300  M00S03463.mte     +++|          LDN    NOPE-1
05301  M00S03464.mte     +++|          STD    OR
05302  M00S03465.mte     +++|          UJN    RPE11       ENTER SEARCH LOOP
05303  M00S03466.mte     +++|
05304  M00S03467.mte     +++| RPE10    AOM    RPEA        NOTE ERROR
05305  M00S03468.mte     +++| RPE11    AOD    OR
05306  M00S03469.mte     +++|          LMD    OR+3
05307  M00S03470.mte     +++|          ZJP    RPE14       IF END OF DEVICES
05308  M00S03471.mte     +++|          SFA    EST,OR
05309  M00S03472.mte     +++|          ADK    EQDE
05310  M00S03473.mte     +++|          CRD    FN
05311  M00S03474.mte     +++|          LDD    FN
05312  M00S03475.mte     +++|          LPC    5020
05313  M00S03476.mte     +++|          LMC    5000
05314  M00S03477.mte     +++|          NJN    RPE11       IF NOT MMF SHARED
05315  M00S03478.mte     +++|          LDD    FN+4        READ *SDGL* MST WORD FROM EXTENDED MEMORY
05316  M00S03479.mte     +++|          SHN    3
05317  M00S03480.mte     +++|          ADK    SDGL
05318  M00S03481.mte     +++|          CRD    EA
05319  M00S03482.mte     +++|          LDK    SDGL
05320  M00S03483.mte     +++|          RAD    EA+1
05321  M00S03484.mte     +++|          SHN    -14
05322  M00S03485.mte     +++|          RAD    EA
05323  M00S03486.mte     +++|          READEM 1,FS,RPE10  NOTE ERROR ON EXTENDED MEMORY READ
05324  M00S03487.mte     +++|          LDD    FS+4
05325  M00S03488.mte     +++|          LPN    77
05326  M00S03489.mte     +++|          NJN    RPE11       IF DEVICE INTERLOCKED
05327  M00S03490.mte     +++|          LDD    EA+1        CHECK DATA READ
05328  M00S03491.mte     +++|          SBN    SDGL
05329  M00S03492.mte     +++|          SBD    FS+1
05330  M00S03493.mte     +++|          LMD    EA
05331  M00S03494.mte     +++|          SBD    FS
05332  M00S03495.mte     +++|          NJP    RPE10       IF ERROR IN ADDRESS
05333  M00S03496.mte     +++|          LDD    EA+4
05334  M00S03497.mte     +++|          LMD    FS+4
05335  M00S03498.mte     +++|          NJP    RPE11       IF NOT UP-TO-DATE IN THIS MACHINE
05336  M00S03499.mte     +++|          LDD    EA+3
05337  M00S03500.mte     +++|          LMD    FS+3
05338  M00S03501.mte     +++|          NJP    RPE11       IF NOT UP-TO-DATE IN THIS MACHINE
05339  M00S03502.mte     +++|          LDD    EA+2
05340  M00S03503.mte     +++|          LMD    FS+2
05341  M00S03504.mte     +++|          NJP    RPE11       IF NOT UP-TO-DATE IN THIS MACHINE
05342  M00S03505.mte     +++|
05343  M00S03506.mte     +++|*         THIS MACHINE HAS THE UP-TO-DATE COPY OF THE MST/TRT.
05344  M00S03507.mte     +++|*         WRITE THESE TABLES TO EXTENDED MEMORY TO CORRECT ANY ERRORS.
05345  M00S03508.mte     +++|
05346  M00S03509.mte     +++|          LDD    FN+4        RESET ADDRESS OF MST
05347  M00S03510.mte     +++|          SHN    3
05348  M00S03511.mte     +++|          ADK    SDGL
05349  M00S03512.mte     +++|          CRD    EA
05350  M00S03513.mte     +++|          ADK    TDGL-SDGL
05351  M00S03514.mte     +++|          CRM    MBUF,TR
05352  M00S03515.mte     +++|          WRITEM SDGL+1,MBUF WRITE MST GLOBAL WORDS
05353  M00S03516.mte     +++|          LDM    MBUF+2      SET TRT LENGTH
05354  M00S03517.mte     +++|          STD    T7
05355  M00S03518.mte     +++|          LDD    HN          SET BUFFER SIZE
05356  M00S03519.mte     +++|          STD    WC
05357  M00S03520.mte     +++|          LDD    FN+4        GET TRT ADDRESS
05358  M00S03521.mte     +++|          SHN    3
05359  M00S03522.mte     +++|          ADN    TRLL
05360  M00S03523.mte     +++|          CRD    FS
05361  M00S03524.mte     +++|          LDK    TRST*100-MSST*100  ADVANCE EM ADDRESS TO TRT
05362  M00S03525.mte     +++|          RAD    EA+1
05363  M00S03526.mte     +++|          SHN    -14
05364  M00S03527.mte     +++|          RAD    EA
05365  M00S03528.mte     +++| RPE12    LDD    T7
05366  M00S03529.mte     +++|          SBD    WC
05367  M00S03530.mte     +++|          PJN    RPE13       IF FULL BUFFER TO WRITE
05368  M00S03531.mte     +++|          RAD    WC
05369  M00S03532.mte     +++|          ZJP    RPE11       IF END OF TRT
05370  M00S03533.mte     +++|          LDN    0
05371  M00S03534.mte     +++| RPE13    STD    T7
05372  M00S03535.mte     +++|          LDD    FS+3        READ TRT BUFFER
05373  M00S03536.mte     +++|          SHN    14
05374  M00S03537.mte     +++|          ADD    FS+4
05375  M00S03538.mte     +++|          CRM    TBUF,WC
05376  M00S03539.mte     +++|          STD    FS+4        ADVANCE CM ADDRESS
05377  M00S03540.mte     +++|          SHN    -14
Line S03541 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05378  M01S03541.283l840 ---|          RAD    FS+3
Line S01297 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05379  M01S01297.283l840 +++|          STD    FS+3
05380  M00S03542.mte     +++|          WRITEM *,TBUF
05381  M00S03543.mte     +++|          LDD    WC          ADVANCE EXTENDED MEMORY ADDRESS
05382  M00S03544.mte     +++|          RAD    EA+1
05383  M00S03545.mte     +++|          SHN    -14
05384  M00S03546.mte     +++|          RAD    EA
05385  M00S03547.mte     +++|          UJP    RPE12       ADVANCE TO NEXT BUFFER
05386  M00S03548.mte     +++|
05387  M00S03549.mte     +++|*         CLEAR TRTI FLAG INTERLOCK.
05388  M00S03550.mte     +++|
05389  M00S03551.mte     +++| RPE14    CFLAG  TRTI
05390  M00S03552.mte     +++|
05391  M00S03553.mte     +++|*         CHECK FOR COMPLETION OF ERROR PROCESSING.
05392  M00S03554.mte     +++|
05393  M00S03555.mte     +++|          LDM    RPEA
05394  M00S03556.mte     +++|          NJN    RPE15       IF INCOMPLETE ERROR PROCESSING
05395  M00S03557.mte     +++|          CFLAG  COMI,NW     CLEAR ERROR PROCESSING FLAG BIT
05396  M00S03558.mte     +++| RPE15    LJM    RPEX        RETURN
05397  M00S03559.mte     +++|
05398  M00S03560.mte     +++| RPEA     CON    0           ERROR COUNTER
05399  M01S01298.283l840 +++| RPEB     DATA   C* MST/TRT PARITY ERROR.*
05400  M00S03561.mte     +++| CCOMI    VFD    24/70000000+.COMI
05401  M00S03562.mte     +++|
05402  M00S03563.mte     +++|          ERRNG  EBUF-*      *2EB* OVERFLOW
05403  M00S03564.mte     +++|          SPACE  4,10
05404  M00S03565.mte     +++|          TITLE  MTE/7EA - EXTENDED MEMORY ERROR PROCESSING.
05405  M00S03566.mte     +++|          QUAL   7EA
Line S03567 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05406  M01S03567.283l840 ---|          IDENT  7EA,O7EA
Line S01299 Modification History
M01 (Added by) 283l840
M02 (Removed by) mte1
Seq #  *Modification Id* Act 
----------------------------+
05407  M02S01299.mte1    ---|          IDENT  7EA,EPFW
Line S00001 Modification History
M01 (Added by) mte1
Seq #  *Modification Id* Act 
----------------------------+
05408  M01S00001.mte1    +++|          IDENT  7EA,L7EA
05409  M00S03568.mte     +++|*COMMENT  MTE - EXTENDED MEMORY ERROR PROCESSING.
Line S03569 Modification History
M01 (Removed by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
05410  M01S03569.281l803 ---|          COMMENT  COPYRIGHT CONTROL DATA CORPORATION, 1985.
Line S00004 Modification History
M01 (Added by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
05411  M01S00004.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
Line S03570 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05412  M01S03570.283l840 ---| O7EA     EQU    10003-31*5
05413  M01S03571.283l840 ---|          ORG    O7EA
05414  M01S03572.283l840 ---|          ERRNG  *-EPFW      ORIGIN PRECEEDS *EPFW*
Line S01300 Modification History
M01 (Added by) 283l840
M02 (Removed by) mte1
Seq #  *Modification Id* Act 
----------------------------+
05415  M02S01300.mte1    ---|          ORG    EPFW
Line S00002 Modification History
M01 (Added by) mte1
Seq #  *Modification Id* Act 
----------------------------+
05416  M01S00002.mte1    +++|          SPACE  4,10
05417  M01S00003.mte1    +++| L7EA     EQU    EPFW+3      LOAD ADDRESS FOR *7EA*
05418  M01S00004.mte1    +++|          ORG    L7EA
05419  M00S03573.mte     +++|          SPACE  4,15
05420  M00S03574.mte     +++|***       7EA - EXTENDED MEMORY ERROR PROCESSING.
05421  M00S03575.mte     +++|*
05422  M00S03576.mte     +++|*         *7EA* IS CALLED WHEN AN ERROR IS DETECTED IN COMMUNICATING
05423  M00S03577.mte     +++|*         WITH EXTENDED MEMORY.
05424  M00S03578.mte     +++|*
05425  M00S03579.mte     +++|*         *7EA* PERFORMS THE FOLLOWING RECOVERY PROCEEDURES.
05426  M00S03580.mte     +++|*         1.     REVERSE THE ORDER OF CHANNEL ASSIGNMENT PRIORITY.
05427  M00S03581.mte     +++|*         2.     RELEASE AND REQUEST THE CHANNEL TO TRY ANOTHER
05428  M00S03582.mte     +++|*                CHANNEL WHEN PRESENT.
05429  M00S03583.mte     +++|*         3.     RETRY THE ENTIRE OPERATION, INCLUDING STEPS 1 AND 2
05430  M00S03584.mte     +++|*                UP TO 8 TIMES.
05431  M00S03585.mte     +++|*         4.     THE MESSAGE *MMF LINK DEVICE ERROR.* IS DISPLAYED AT
05432  M00S03586.mte     +++|*                THE SYSTEM CONTROL POINT.
05433  M00S03587.mte     +++|
05434  M00S03588.mte     +++|
05435  M00S03589.mte     +++| PER      BSS    0           ENTRY
05436  M00S03590.mte     +++|
05437  M00S03591.mte     +++|*         SEARCH TABLE FOR OPERATION TYPE.
05438  M00S03592.mte     +++|
05439  M00S03593.mte     +++| PER1     LDN    2
05440  M00S03594.mte     +++|          RAD    T1
05441  M00S03595.mte     +++|          LDI    T1
05442  M00S03596.mte     +++|          ZJN    *           IF END OF TABLE
05443  M00S03597.mte     +++|          LMM    SFN
05444  M00S03598.mte     +++|          NJN    PER1        IF FUNCTION CALLER NOT FOUND
05445  M00S03599.mte     +++|          LDM    1,T1
05446  M00S03600.mte     +++|          STD    T2
05447  M00S03601.mte     +++|          LMC    CKS
05448  M00S03602.mte     +++|          NJN    PER3        IF NOT CALLED FROM CHECK STATUS
05449  M00S03603.mte     +++|          LDM    CKS
05450  M00S03604.mte     +++|          LMC    RDWX
05451  M00S03605.mte     +++|          ZJN    PER2        IF READ OPERATION
05452  M00S03606.mte     +++|          LDK    WTW-RDW
05453  M00S03607.mte     +++| PER2     ADC    RDW
05454  M00S03608.mte     +++|          STD    T2
05455  M00S03609.mte     +++| PER3     LDM    RECA
05456  M00S03610.mte     +++|          NJN    PER4        IF EXIT ADDRESS PREVIOUSLY SET
05457  M00S03611.mte     +++|          LDI    T2          SET EXIT ADDRESS
05458  M00S03612.mte     +++|          STM    RECA
05459  M00S03613.mte     +++|          LDC    REC         SET EXIT TO *REC*
05460  M00S03614.mte     +++|          STI    T2
05461  M00S03615.mte     +++|
05462  M00S03616.mte     +++|*         (T2) = *RDW*, *WTW*, OR *IFR*.
05463  M00S03617.mte     +++|
05464  M00S03618.mte     +++| PER4     AOD    RC          INCREMENT ERROR COUNTER
05465  M00S03619.mte     +++|
05466  M00S03620.mte     +++|*         DISPLAY ERROR MESSAGE AT SYSTEM CONTROL POINT.
05467  M00S03621.mte     +++|
05468  M00S03622.mte     +++|          LDK    NCPL
05469  M00S03623.mte     +++|          CRD    CM
05470  M00S03624.mte     +++|          AOD    CM+1
05471  M00S03625.mte     +++|          SHN    7
05472  M00S03626.mte     +++|          ADN    MS2W
05473  M00S03627.mte     +++|          CWM    PERA,TR     *MMF LINK DEVICE ERROR.*
Line S01301 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05474  M01S01301.283l840 +++|          LDD    EA          SAVE PARITY ERROR DATA
05475  M01S01302.283l840 +++|          STM    PERB+2
05476  M01S01303.283l840 +++|          LDD    EA+1
05477  M01S01304.283l840 +++|          STM    PERB+3
05478  M01S01305.283l840 +++|          LDD    WC
05479  M01S01306.283l840 +++|          STM    PERB+1
05480  M01S01307.283l840 +++|          LDM    CKSA
05481  M01S01308.283l840 +++|          STM    PERB
05482  M01S01309.283l840 +++|          LDD    ST
05483  M01S01310.283l840 +++|          STM    PERB+4
05484  M00S03628.mte     +++|
05485  M00S03629.mte     +++|*         REVERSE ORDER OF CHANNEL ASSIGNMENT PRIORITY.
05486  M00S03630.mte     +++|
05487  M00S03631.mte     +++|          LDD    T5
05488  M00S03632.mte     +++|          STD    CM+1
Line S03633 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
05489  M01S03633.252l678 ---|          LDK    RVRS
05490  M01S03634.252l678 ---|          STD    CM+2
05491  M01S03635.252l678 ---|          MONITOR  SEQM
Line S00133 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
05492  M01S00133.252l678 +++|          LDK    RVCS
05493  M01S00134.252l678 +++|          STD    CM+3
05494  M01S00135.252l678 +++|          MONITOR  SCSM
05495  M00S03636.mte     +++|
05496  M00S03637.mte     +++|*         ATTEMPT TO TRY OTHER CHANNEL BY RELEASING AND REQUESTING.
05497  M00S03638.mte     +++|
05498  M00S03639.mte     +++|          LDN    0           RELEASE CHANNEL
05499  M00S03640.mte     +++|          RJM    DSW
05500  M00S03641.mte     +++|          LDN    1           REQUEST CHANNEL
05501  M00S03642.mte     +++|          RJM    DSW
05502  M00S03643.mte     +++|          LDD    RC
05503  M00S03644.mte     +++|          SBN    10
05504  M00S03645.mte     +++|          PJN    PER6        IF UNRECOVERED ERROR
05505  M00S03646.mte     +++|          LJM    3,T2        RETRY OPERATION
05506  M00S03647.mte     +++|
05507  M00S03648.mte     +++|*         PROCESS UNRECOVERED ERROR.
05508  M00S03649.mte     +++|
05509  M00S03650.mte     +++| PER6     LCN    2           CHECK FOR ERROR PROCESSOR
05510  M00S03651.mte     +++|          STD    T1
05511  M00S03652.mte     +++|          LDM    RECA        SET EXIT ADDRESS
05512  M00S03653.mte     +++|          STD    T2
05513  M00S03654.mte     +++| PER7     LDN    2
05514  M00S03655.mte     +++|          RAD    T1
05515  M00S03656.mte     +++|          LDM    TERP,T1
05516  M00S03657.mte     +++|          ZJN    PER8        IF END OF TABLE
05517  M00S03658.mte     +++|          LMD    T2
05518  M00S03659.mte     +++|          NJN    PER7        IF ERROR PROCESSOR NOT FOUND
05519  M00S03660.mte     +++|          LDM    TERP+1,T1   GET ERROR PROCESSOR ADDRESS
05520  M00S03661.mte     +++|          STD    T2
05521  M00S03662.mte     +++| PER8     LDN    0           CLEAR ERROR INDICATION
05522  M00S03663.mte     +++|          STD    RC
05523  M00S03664.mte     +++|          STM    RECA
05524  M00S03665.mte     +++|          LDN    1           RETURN ERROR STATUS
05525  M00S03666.mte     +++|          LJM    0,T2        RETURN
05526  M00S03667.mte     +++|
05527  M00S03668.mte     +++| PERA     DATA   C*MMF LINK DEVICE ERROR.*
Line S01311 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05528  M01S01311.283l840 +++| PERB     CON    0,0,0,0,0   PARITY ERROR INFORMATION
05529  M00S03669.mte     +++| TPER     SPACE  4,10
05530  M00S03670.mte     +++|**        TPER - TABLE OF FUNCTION CALLER ADDRESSES.
05531  M00S03671.mte     +++|*
05532  M00S03672.mte     +++|*         ENTRY = TWO WORDS.
05533  M00S03673.mte     +++|*         WORD 1 = *SFN* CALLER RETURN ADDRESS.
05534  M00S03674.mte     +++|*         WORD 2 = ROUTINE CALLING *SFN*, EITHER *RDW*, *WTW* OR *CKS*.
05535  M00S03675.mte     +++|
05536  M00S03676.mte     +++|
05537  M00S03677.mte     +++| TPER     BSS    0
05538  M00S03678.mte     +++|          LIST   G
05539  M00S03679.mte     +++|          ECHO   1,A=(".SFN")
05540  M00S03680.mte     +++|          CON    A
05541  M00S03681.mte     +++|          LIST   *
05542  M00S03682.mte     +++| TERP     SPACE  4,10
05543  M00S03683.mte     +++|**        TERP - TABLE OF ERROR PROCESSOR ADDRESSES.
05544  M00S03684.mte     +++|*
05545  M00S03685.mte     +++|*         ENTRY = TWO WORDS.
05546  M00S03686.mte     +++|*         WORD 1 = *RDW/WTW* CALLER RETURN ADDRESS.
05547  M00S03687.mte     +++|*         WORD 2 = ERROR PROCESSOR ADDRESS FOR *RDW/WTW*.
05548  M00S03688.mte     +++|
05549  M00S03689.mte     +++|
05550  M00S03690.mte     +++| TERP     BSS    0
05551  M00S03691.mte     +++|          LIST   G
05552  M00S03692.mte     +++|          ECHO   1,A=(".ERP")
05553  M00S03693.mte     +++|          CON    A
05554  M00S03694.mte     +++|          LIST   *
05555  M00S03695.mte     +++|
05556  M00S03696.mte     +++|          BSS    10000-*     SPARES
05557  M00S03697.mte     +++|          CON    PER-1       (T0) = ENTRY ADDRESS - 1
05558  M00S03698.mte     +++|          CON    TPER-2      (T1) = TABLE SEARCH POINTER
05559  M00S03699.mte     +++|          CON    RECA        (T2) = POINTER TO RECOVERY ADDRESS
Line S03700 Modification History
M01 (Removed by) mte1
Seq #  *Modification Id* Act 
----------------------------+
05560  M01S03700.mte1    ---|          ERRNZ  10003-*
Line S00005 Modification History
M01 (Added by) mte1
Seq #  *Modification Id* Act 
----------------------------+
05561  M01S00005.mte1    +++|          ERRNZ  10003-*     CODE DOES NOT WRAP PP CORRECTLY
05562  M01S00006.mte1    +++|
05563  M01S00007.mte1    +++| OVLL     EQU    *-L7EA      LENGTH OF OVERLAY
05564  M01S00008.mte1    +++|          ERRNZ  OVLL/5*5-OVLL  CODE DOES NOT WRAP PP CORRECTLY
05565  M01S00009.mte1    +++|
05566  M00S03701.mte     +++|          QUAL   *
05567  M00S03702.mte     +++|          SPACE  4
05568  M00S03703.mte     +++|          END
cdc/nos2.source/opl.opl871/deck/mte.003.txt ยท Last modified: by 127.0.0.1