beautypg.com

Apple AppleShare 3.0 File Server Controls User Manual

Page 19

background image

{ handle any unexpected errors }

END;

UNTIL err <> noErr;

END;

SCGetUserMountInfo

The following function calls SCGetUserMountInfo to get information about the

status of a particular volume or shared folder, such as the number of open

files on the volume, the number of files that are open with write access,

whether the volume is mounted, and whether the volume is mounted with owner

privileges (that is, whether the user is a superuser).

Note This call is not supported by Macintosh File Sharing.

FUNCTION MySCGetUserMountInfo (VRefNum: Integer;

VAR FilesOpen: Integer;

VAR WriteableFiles: Integer;

UNRecID: LongInt;

VAR Mounted: Boolean;

VAR MountedAsOwner: Boolean):

OSErr;

VAR

scPB: SCParamBlockRec;

BEGIN

scPB.volMountedPB.scCode := SCGetUserMountInfo;

scPB.volMountedPB.scVRefNum := VRefNum;

scPB.volMountedPB.scUNRecID := UNRecID;

MySCGetUserMountInfo := SyncServerDispatch(@scPB);

FilesOpen := scPB.volMountedPB.scFilesOpen;

WriteableFiles := scPB.volMountedPB.scWriteableFiles;

Mounted := scPB.volMountedPB.scMounted;

MountedAsOwner := scPB.volMountedPB.scMountedAsOwner;

END;

The following procedure gets the user-mount information for all of the

volumes and shared folders that a user has mounted. Before using this