IN:FNDNMX.MAC/AU:72./-BF=LB1:[13,10]FNDNM.MAC -1,1,/;DSM01/ $BEGIN FNDNM,7204, ; ; Modified by Daniel S. McCoy May 80 ; to support dual-porting. ; -35,48,/;DSM01/ ; The protection is checked and the function is passed to the master system -53,95,/;DSM01/ CALL .DRPAC ; SEE IF DIRECTORY IS PREACCESSED BCC 50$ ; BRANCH IF ITS JMP @.DRAC1 ; GO ACCESS IT 50$: MOV .FCBAD,R1 ; Set up for protection check MOV #FP.RDV+<400*FP.RDV>,R0 ; Access check for read only MOV F.FOWN(R1),R2 ; more protection check stuff MOV F.FPRO(R1),R3 ; ... MOV .IOPKT,R5 ; ... CALL .PRCK3 ; Check protection CALL .RQIO ; Look up is done by master sys MOV #.DRFNB,R5 ; Reset context CALL .DREX ; PERFORM COMMON EXIT CODE /