DataMuseum.dk

top - download

    Length: 1996 (0x7cc)
    Types: TextFile
    Names: »V«

└─⟦5f3412b64⟧ Bits:30000745 8mm tape, Rational 1000, ENVIRONMENT 12_6_5 TOOLS 
    └─ ⟦91c658230⟧ »DATA« 
        └─⟦458657fb6⟧ 
            └─⟦a5bbbb819⟧ 
                └─⟦this⟧ 
└─⟦d10a02448⟧ Bits:30000409 8mm tape, Rational 1000, ENVIRONMENT, D_12_7_3
    └─ ⟦fc9b38f02⟧ »DATA« 
        └─⟦9b46a407a⟧ 
            └─⟦eec0a994f⟧ 
                └─⟦this⟧ 

TextFile

-- This procedure should be run only by Rational personnel or under their
-- direction!

-- Performs an analysis of the disk structure(s)
--
-- If there is an inconsistency in the internal disk structure(s) Backup will
-- typically fail with an !Lrm.Assertion error and then log a message such as:
--
--      Backup Inconsistent_Space space = <258,Module,156694>
--
-- This procedure gathers information about the disk in the same fashion as
-- Backup.  Whenever something inconsistent is detected, a diagnostic message
-- is displayed.  Unlike Backup which would then immediately terminate, this
-- procedure will attempt to continue and should report all inconsistencies.
--
-- This procedure will take a significant amount of time; for large disks, it
-- will take 30 or more minutes for each disk.  The basic algorithm it uses is:
--
--      For each disk volume
--          Check all VPs
--          For Each Segment
--              Check each disk block associated with this segment
--              (Note: since a disk block can be shared among segments, disk
--                     blocks can be "visited" more than once.)
--          End loop
--      End loop
--
--
-- NOTES
--    1. This procedure must be scheduled to avoid overlap with the Disk client
--       and/or Backup.  By default, if disk collection starts during this
--       procedure, this procedure will be killed.  This default behavior can
--       be changed by executing !Tools.Disk_Daemon.Set_Backup_Killing(false)
--
--    2. The Diagnostic messages display all information in DECIMAL
--
-- It should be noted that a likely outcome when a corrupted system
-- is discovered by this procedure is a system crash.

procedure Analyze_Disks_For_Backup (Report_Space_Address : Boolean := False;
                                    To_Console           : Boolean := False;
                                    To_System_Error_Log  : Boolean := False;
                                    Start_Volume         : Natural := 1);