<> <> DIRECTORY AlpineEnvironment USING [UniversalFile], AlpineLog USING [RecordID], AlpTransaction USING [Handle], BackupLog USING [nullRecordID, RecordID], BasicTime USING [GMT], BTree USING [Relation], Rope USING [ROPE]; BackupBTree: CEDAR DEFINITIONS ~ BEGIN Reason: TYPE = {transactionFailure, lockFailure, damagedBTree}; < client should re-open the BackupBTree and start processing from the positions returned by GetPositionInfo>> < client programming error: no other transactions should be manipulating the file containing the BackupBTree.>> < BTree package detected an error in the state of the btree. If you're lucky, aborting the transaction will fix it. If not, well ...>> <<>> Error: ERROR[why: Reason]; OpenForNormalOperation: PROC [trans: AlpTransaction.Handle, btreeFile: AlpineEnvironment.UniversalFile, initialize: BOOL _ FALSE]; <> <<>> Commit: PROC []; <> <<>> OpenForRecovery: PROC []; <> <<>> SetFileInfo: PROC [universalFile: AlpineEnvironment.UniversalFile, baseRecord, lastIncrementRecord: BackupLog.RecordID _ BackupLog.nullRecordID, name: Rope.ROPE]; <> <> < update both to nullRecord.>> < update only lastIncrementRecord>> < update only baseRecord>> < update both.>> <> GetFileInfo: PROC [universalFile: AlpineEnvironment.UniversalFile, relation: BTree.Relation _ equal] RETURNS [found: BOOLEAN, baseRecord, lastIncrementRecord, prevBaseRecord: BackupLog.RecordID , name: Rope.ROPE]; <> <<>> DeleteFileInfo: PROC [universalFile: AlpineEnvironment.UniversalFile] RETURNS [found: BOOLEAN]; <> SetPositionInfo: PROC [logRecord: AlpineLog.RecordID, backupRecord: BackupLog.RecordID]; <> GetPositionInfo: PROC [] RETURNS [logRecord: AlpineLog.RecordID, backupRecord: BackupLog.RecordID]; <> <<>> SetFullyConsistent: PROC [backupRecord: BackupLog.RecordID, time: BasicTime.GMT]; GetFullyConsistent: PROC RETURNS [backupRecord: BackupLog.RecordID, time: BasicTime.GMT]; END.