DMKPRV History
References
-
-
Fixes Applied : 9
-
Last Fix ID : [HRC013DK]
Update History
CMS File Input : DMKPRV ASSEMBLE
Date : 12/14/1978 8:51:00 AM
VM Context : MAINT(394)
File Name : DMKPRV.ASSEMBLE.Z1.txt
Modified : 1/16/2021 7:31:47 AM
Created : 1/16/2021 7:31:47 AM
Update Order
R08195DK 602 CORRECT SIMULATION OF STIDP INSTRUCTION IN AP
R09802DK 606 CPUSER AND CPUMODEL LENGTH ATTRIBUTES ARE INCORRECT
R09805DK 607 ERRONEOUS ZEROING OF COUNTER DMKPRVEX
R08990DK 609 ADDRESSING EXECEPTION INSTEAD OF OPERATION EXCEPTION
R09498DK 609 DMKDSP CALLS DMKVMC TWICE CPEXBLOK DOUBLE RETURN DOUBLE FRET
R08621DK 609 PAGE AND SEG TABLE OVERLAID SSK INSTRUCTION
R12971DK 621 UV04386 RESET BITS 13-15 IN VIRTUAL CR0
R13186DK 621 UV04509 EXECUTE INSTRUCTION IS SIMULATED INCORRECTLY
HRC013DK V01 UNIVERSITY OF MAINE P.E.R. TRACE FACILITY
R08195DK
Date Monday Apr 02, 1979 03:30:00 AM
Loaded from MAINT(294)
R08195DK: ./ D 1315000 $ 00001000
R08195DK: ./ I 1325000 $ 1325100 100 00002000
R08195DK: DROP R2 @VA08195 00003000
R08195DK: TM APSTAT1,PROCIO IS THIS THE MAIN PROCESSOR @VA08195 00004000
R08195DK: BO MAINMODL YES-WE ARE ON THE MAIN PROCESSOR @VA08195 00005000
R08195DK: L R6,PREFIXB OTHER PROCESSOR ADDRESS @VA08195 00006000
R08195DK: MAINMODL EQU * @VA08195 00007000
R08195DK: USING CPUID,R2 @VA08195 00008000
R08195DK: MVC CPUMODEL,CPUMODEL-PSA(R6) MOVE IN CPU MODEL NUM.@VA08195 00009000
BEGIN APPLY >>> ./ D 1315000 $ 00001000
END APPLY >>> ./ D 1315000 $ 00001000
BEGIN APPLY >>> ./ I 1325000 $ 1325100 100 00002000
END APPLY >>> ./ I 1325000 $ 1325100 100 00002000
Update Succeeded
Update Execution Time 23 milliseconds.
R09802DK
Date Monday Nov 12, 1979 11:12:00 AM
Loaded from MAINT(294)
R09802DK: ./ * FORCE RE-ASSEMBLY FOR PTF V09802
BEGIN APPLY >>> ./ * FORCE RE-ASSEMBLY FOR PTF V09802
Comment >>> ./ * FORCE RE-ASSEMBLY FOR PTF V09802
END APPLY >>> ./ * FORCE RE-ASSEMBLY FOR PTF V09802
Update Succeeded
Update Execution Time 8 milliseconds.
R09805DK
Date Monday Dec 03, 1979 05:04:00 AM
Loaded from MAINT(294)
R09805DK: ./ D 517000 $ 00001000
BEGIN APPLY >>> ./ D 517000 $ 00001000
END APPLY >>> ./ D 517000 $ 00001000
Update Succeeded
Update Execution Time 16 milliseconds.
R08990DK
Date Saturday Feb 09, 1980 04:18:00 AM
Loaded from MAINT(294)
R08990DK: ./ I 528000 $ 528100 100 00001000
R08990DK: CLI VMINST,X'BA' IS IT COMPARE AND SWAP? @VA08990 00002000
R08990DK: BE CONTOPCK YES, CONTINUE WITH CHECK @VA08990 00003000
R08990DK: CLI VMINST,X'BB' IS IT COMPARE DOUBLE AND SWAP? @VA08990 00004000
R08990DK: BE CONTOPCK YES, CONTINUE WITH CHECK @VA08990 00005000
R08990DK: CLI VMINST,X'B2' IS IT SPKA OR IPK? @VA08990 00006000
R08990DK: BNE OPEREXCP NONE OF THE ABOVE---OP CHECK @VA08990 00007000
R08990DK: CONTOPCK EQU * @VA08990 00008000
BEGIN APPLY >>> ./ I 528000 $ 528100 100 00001000
END APPLY >>> ./ I 528000 $ 528100 100 00001000
Update Succeeded
Update Execution Time 16 milliseconds.
R09498DK
Date Saturday Feb 09, 1980 09:19:00 AM
Loaded from MAINT(294)
R09498DK: ./ D 784000 $ 00001000
R09498DK: ./ I 789000 $ 789500 00005000
R09498DK: NI VMRSTAT,X'FF'-VMEXWAIT OUT OF INSTRUCTION WAIT @VA09498 00007000
BEGIN APPLY >>> ./ D 784000 $ 00001000
END APPLY >>> ./ D 784000 $ 00001000
BEGIN APPLY >>> ./ I 789000 $ 789500 00005000
END APPLY >>> ./ I 789000 $ 789500 00005000
Update Succeeded
Update Execution Time 16 milliseconds.
R08621DK
Date Saturday Feb 09, 1980 01:21:00 AM
Loaded from MAINT(294)
R08621DK: ./ R 395000 409000 $ 395100 100 00001000
R08621DK: LA R1,0(R1) CLEAR HIGH ORDER BYTE %VA08621 00002000
R08621DK: LH R3,INTPR INTUPT CODE %VA08621 00003000
R08621DK: LH R4,INTPRL INSTRUCTIO LENGTH %VA08621 00004000
R08621DK: SR R1,R4 GET START OF INST %VA08621 00005000
R08621DK: LRA R2,0(0,R1) GET REAL ADDR OF INST %VA08621 00006000
R08621DK: LA R7,VMINST ADDR OF VMBLOK %VA08621 00007000
R08621DK: LR R5,R1 COPY ADDR %VA08621 00008000
R08621DK: N R5,F4095 GET PAGE DISPLACEMENT %VA08621 00009000
R08621DK: AR R5,R4 ADD INST LENGTH %VA08621 00010000
R08621DK: S R5,F4096 LESS ONE PAGE %VA08621 00011000
R08621DK: BP PRVSLO WHOOPS CROSSED A PAGE %VA08621 00012000
R08621DK: SR R4,R6 DECREMENT FOR EXEC %VA08621 00013000
R08621DK: EX R4,PRVMOV MOVE IN DATA %VA08621 00014000
R08621DK: B LOADCNTL DONE %VA08621 00015000
R08621DK: PRVMOV MVC 0(*-*,R7),0(R2) *EXECUTED* %VA08621 00016000
R08621DK: SPACE 1 00017000
R08621DK: PRVSLO EQU * %VA08621 00018000
R08621DK: SR R5,R4 FIND OUT HOW MUCH OF THIS %VA08621 00019000
R08621DK: LCR R5,R5 PAGE TO MOVE IN %VA08621 00020000
R08621DK: SR R5,R6 DECREMENTFOR MOVE %VA08621 00021000
R08621DK: EX R5,PRVMOV MOVE IN PART WAY %VA08621 00022000
R08621DK: AR R5,R6 BUMP LENGTH %VA08621 00023000
R08621DK: LR R8,R1 R1 TO R8 %VA08621 00024000
R08621DK: AR R1,R5 BUMP SOURCE POINTER %VA08621 00025000
R08621DK: AR R7,R5 BUMP SINK POINTER %VA08621 00026000
R08621DK: SR R5,R4 FIND OUT HOW MUCH %VA08621 00027000
R08621DK: LCR R5,R5 IS LEFT TO MOVE %VA08621 00028000
R08621DK: LRA R2,0(0,R1) IS 2ND PART IN STORAGE %VA08621 00029000
R08621DK: BZ PRVRCHK NO NEED FOR PTRAN %VA08621 00030000
R08621DK: LA R2,BRING+DEFER SET PARMS FOR PTR %VA08621 00031000
R08621DK: LCTL C0,C0,CPCREG0 GET CP CR0 %VA08621 00032000
R08621DK: BAL R14,LOCKET GET SYSTEM LOCK %VA08621 00033000
R08621DK: CALL DMKPTRAN %VA08621 00034000
R08621DK: BC 2,ADDREXCP NOT IN OUR BOX %VA08621 00035000
R08621DK: PRVRCHK SR R5,R6 DECR FOR EXEC %VA08621 00036000
R08621DK: LR R1,R8 R8 BACK TO R1 %VA08621 00037000
R08621DK: EX R5,PRVMOV MOVE IN DATA %VA08621 00038000
R08621DK: LOADCNTL EQU * %VA08621 00039000
R08621DK: LH R2,VMPRGIL GET FOR LATER TEST OF INST SIZE %VA08621 00040000
R08621DK: ./ D 412000 $ 00041000
BEGIN APPLY >>> ./ R 395000 409000 $ 395100 100 00001000
END APPLY >>> ./ R 395000 409000 $ 395100 100 00001000
BEGIN APPLY >>> ./ D 412000 $ 00041000
END APPLY >>> ./ D 412000 $ 00041000
Update Succeeded
Update Execution Time 23 milliseconds.
R12971DK
Date Wednesday Jun 03, 1981 05:07:00 AM
Loaded from MAINT(294)
R12971DK: ./ I 1086000 $ 1086100 100 DMK00010
R12971DK: LTR R5,R5 CREG0 ?? @VA12971 DMK00020
R12971DK: BNZ *+8 NO, BYPASS CREG0 RESET @VA12971 DMK00030
R12971DK: N R1,=XL4'FFF8FFFF' RESET BITS 13-15 IN BYTE 1 @VA12971 DMK00040
BEGIN APPLY >>> ./ I 1086000 $ 1086100 100 DMK00010
END APPLY >>> ./ I 1086000 $ 1086100 100 DMK00010
Update Succeeded
Update Execution Time 16 milliseconds.
R13186DK
Date Wednesday Jun 03, 1981 05:26:00 AM
Loaded from MAINT(294)
R13186DK: ./ R 702000 709000 $ 702100 100 00001000
R13186DK: NOMODIF EQU * @VA13186 00002000
R13186DK: STH R4,VMINST SET IN VMBLOK @VA13186 00003000
R13186DK: LA R3,2(0,R3) INDEX TO 2ND HALF OF VIRT INST @VA13186 00004000
R13186DK: BAL R8,ADTRANS NOW GET ITS REAL ADDRESS @VA13186 00005000
R13186DK: LH R4,0(,R2) GET THE REAL STUFF.... @VA13186 00006000
R13186DK: STH R4,VMINST+2 AND STUFF IT AWAY @VA13186 00007000
R13186DK: * BEGINNING OF LOGIC TO SUPPORT 6 BYTE 'EXECUTED' INSTRUCTIONS 00008000
R13186DK: * THAT ARE PRIV OPS 00009000
R13186DK: TM VMINST,X'C0' * IS THIS A SIX BYTE INST? @VA13186 00010000
R13186DK: BNO SKIP3RD * NO...BRANCH @VA13186 00011000
R13186DK: LA R3,2(0,R3) INDEX TO 3'RD HALFWORD OF INST. @VA13186 00012000
R13186DK: BAL R8,ADTRANS GET ITS REAL ADDRESS @VA13186 00013000
R13186DK: LH R4,0(,R2) PICK UP 3RD HALFWORD OF INST. @VA13186 00014000
R13186DK: STH R4,VMINST+4 SAVE IN VMBLOK @VA13186 00015000
R13186DK: SKIP3RD DS 0H @VA13186 00016000
R13186DK: * END OF 6 BYTE INSTRUCTION SUPPORT 00017000
R13186DK: SLR R2,R2 TELL TRACE TO FORGET IT @VA13186 00018000
R13186DK: B GETINST NOW PROCESS THE STUFF @VA13186 00019000
BEGIN APPLY >>> ./ R 702000 709000 $ 702100 100 00001000
END APPLY >>> ./ R 702000 709000 $ 702100 100 00001000
Update Succeeded
Update Execution Time 16 milliseconds.
HRC013DK
Date Tuesday Jan 01, 2013 05:53:00 PM
Loaded from MAINT(094)
HRC013DK: ./ * ************* PER001 00001000
HRC013DK: ./ * * PER001 00002000
HRC013DK: ./ * * PER001 08/07/79 ADD "P.E.R." TRACE FACILITY PER001 00003000
HRC013DK: ./ * * PER001 00004000
HRC013DK: ./ * ************* PER001 00005000
HRC013DK: ./ * PER001 00006000
HRC013DK: ./ I 462000 $ 462500 500 PER001 00007000
HRC013DK: NI VMRSTAT,255-VMEXWAIT OUT OF INSTR WAIT. PER001 00008000
HRC013DK: ./ R 464000 471000 $ 464000 PER001 00009000
HRC013DK: BNZ PRIVRET DMKDSP WILL CHECK FOR PER PENDING. PER001 00010000
HRC013DK: ./ D 494000 503000 PER001 00011000
HRC013DK: ./ R 1529000 1539000 $ 1529000 1000 PER001 00012000
HRC013DK: TM VMESTAT,VMPERCM DOES ANYONE WANT THIS? PER001 00013000
HRC013DK: BZR R9 NO PER, RETURN PER001 00014000
HRC013DK: TM VMTRCTL,VMTRPER CP PER? PER001 00015000
HRC013DK: BZ OWNPER USER PER, GO HANDLE PER001 00016000
HRC013DK: L R10,VMPERCTL OTHERWISE IT'S OURS. PER001 00017000
HRC013DK: LA R15,PERCR9-PERBLOK(,R10) LOAD START OF CR'S. PER001 00018000
HRC013DK: LA R14,PERADDR-PERBLOK(,R10) LOAD EVENT ADDR LOC. PER001 00019000
HRC013DK: B TRAPPER AND LOOK AT THE INTERRUPT. PER001 00020000
HRC013DK: OWNPER L R10,VMECEXT EXTENTION BLOCK ADDRESS. PER001 00021000
HRC013DK: LA R15,EXTCR9-ECBLOK(,R10) START OF CR'S. PER001 00022000
HRC013DK: LA R14,EXTPERAD-ECBLOK(,R10) START OF PERADDR, PEPER001 00023000
HRC013DK: ./ I 1758000 $ 1758100 100 PER001 00024000
HRC013DK: COPY PERBLOKS PER001 00025000
BEGIN APPLY >>> ./ * ************* PER001 00001000
Comment >>> ./ * ************* PER001 00001000
END APPLY >>> ./ * ************* PER001 00001000
BEGIN APPLY >>> ./ * * PER001 00002000
Comment >>> ./ * * PER001 00002000
END APPLY >>> ./ * * PER001 00002000
BEGIN APPLY >>> ./ * * PER001 08/07/79 ADD "P.E.R." TRACE FACILITY PER001 00003000
Comment >>> ./ * * PER001 08/07/79 ADD "P.E.R." TRACE FACILITY PER001 00003000
END APPLY >>> ./ * * PER001 08/07/79 ADD "P.E.R." TRACE FACILITY PER001 00003000
BEGIN APPLY >>> ./ * * PER001 00004000
Comment >>> ./ * * PER001 00004000
END APPLY >>> ./ * * PER001 00004000
BEGIN APPLY >>> ./ * ************* PER001 00005000
Comment >>> ./ * ************* PER001 00005000
END APPLY >>> ./ * ************* PER001 00005000
BEGIN APPLY >>> ./ * PER001 00006000
Comment >>> ./ * PER001 00006000
END APPLY >>> ./ * PER001 00006000
BEGIN APPLY >>> ./ I 462000 $ 462500 500 PER001 00007000
END APPLY >>> ./ I 462000 $ 462500 500 PER001 00007000
BEGIN APPLY >>> ./ R 464000 471000 $ 464000 PER001 00009000
END APPLY >>> ./ R 464000 471000 $ 464000 PER001 00009000
BEGIN APPLY >>> ./ D 494000 503000 PER001 00011000
END APPLY >>> ./ D 494000 503000 PER001 00011000
BEGIN APPLY >>> ./ R 1529000 1539000 $ 1529000 1000 PER001 00012000
END APPLY >>> ./ R 1529000 1539000 $ 1529000 1000 PER001 00012000
BEGIN APPLY >>> ./ I 1758000 $ 1758100 100 PER001 00024000
END APPLY >>> ./ I 1758000 $ 1758100 100 PER001 00024000
Update Succeeded
Update Execution Time 31 milliseconds.