<> <> <> <> DIRECTORY AlpineEnvironment USING [allOwnerProperties, LockFailure, NeededAccess, OperationFailure, OwnerName, OwnerPropertySet, OwnerPropertyValuePair, PageCount, UniversalFile, UnknownType, VolumeGroupID], AlpTransaction USING [Handle, Object]; AlpDebug: CEDAR DEFINITIONS = BEGIN allOwnerProperties: OwnerPropertySet = AlpineEnvironment.allOwnerProperties; OwnerName: TYPE = AlpineEnvironment.OwnerName; OwnerPropertySet: TYPE = AlpineEnvironment.OwnerPropertySet; OwnerPropertyValuePair: TYPE = AlpineEnvironment.OwnerPropertyValuePair; PageCount: TYPE = AlpineEnvironment.PageCount; UniversalFile: TYPE = AlpineEnvironment.UniversalFile; VolumeGroupID: TYPE = AlpineEnvironment.VolumeGroupID; AccessFailed: READONLY ERROR [missingAccess: AlpineEnvironment.NeededAccess]; LockFailed: READONLY ERROR [why: AlpineEnvironment.LockFailure]; OperationFailed: READONLY ERROR [why: AlpineEnvironment.OperationFailure]; StaticallyInvalid: READONLY ERROR; Unknown: READONLY ERROR [what: AlpineEnvironment.UnknownType]; PossiblyDamaged: READONLY SIGNAL; Handle: TYPE = AlpTransaction.Handle; Object: TYPE = AlpTransaction.Object; <> ReadOwnerFileHeader: PROCEDURE[handle: Handle, volumeGroupID: VolumeGroupID] RETURNS[version: NAT, recordedVolGroupID: VolumeGroupID, totalQuota, quotaLeft: PageCount, numberOfOwners, numberOfOwnerSlotsInUse, maxNumberOfOwnersAllowed: NAT]; ReadNextOwnerRecord: PROCEDURE[handle: Handle, volumeGroupID: VolumeGroupID, contRecNum: INT _ 0, desiredProperties: OwnerPropertySet _ allOwnerProperties] RETURNS[entryEmpty, entryValid: BOOLEAN, owner: OwnerName, properties: LIST OF OwnerPropertyValuePair, nextContRecNum: INT]; ChangeSpaceForOwner: PROCEDURE [handle: Handle, volumeGroupID: VolumeGroupID, ownerName: OwnerName, nPages: PageCount]; ReadDBFileID: PROCEDURE[handle: Handle, volumeGroupID: VolumeGroupID] RETURNS[dBID: UniversalFile]; ReportAccessCacheStats: PROCEDURE[handle: Handle] RETURNS [nCacheEntries: NAT, statsCacheHit, statsGrapevineAuthorized, statsGrapevineNotAuthorized, statsRegServersDown, statsIndivGrapeNotAuthorized: INT]; ReportAccessVolatileStats: PROCEDURE[handle: Handle] RETURNS [nRegs, nInits, nUnRegs, nReorganizes, nEnumAlls, nAllocReqsWin, nAllocReqsLose, nDeallocReqs, nRemoveOwner, nEnumFindWin, nEnumFindLose, nSetEnums, nActions, nPhaseOnes, nPhaseTwos, nAborts: INT]; CrashSystem: PROCEDURE [handle: Handle]; END. <<>> <> <<>> <>