IN:ENTNMX.MAC/AU:72./-BF=LB1:[13,10]ENTNM.MAC -1,1,/;DSM01/ $BEGIN ENTNM,7206, ; Modified by Daniel S. McCoy 31 Oct, 79 ; to support dual-porting. ; -32,47,/;DSM01/ ; ; This routine just checks priveleges and sends the request ; to the master system. ; -58,128,/;DSM01/ MOV #FP.EXT+<400*FP.EXT>,R0 ; Check file access for extend MOV F.FOWN(R1),R2 ; Set up for protection check MOV F.FPRO(R1),R3 ; ... MOV .IOPKT,R5 ; GET I/O PACKET ADDRESS CALL .PRCK3 ; SEE IF USER HAS DESIRED ACCESS PRIVILEGE ; CALL .RQIO ; Send the request to the master sys ; MOV #.DRFNB,R5 ; POINT TO FILE NAME BLOCK AGAIN -138,147,/;DSM01/ CALL .DRX1 ; Return FNB stuff CALLR .CLDIR ; Clean up and exit /