|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 3072 (0xc00)
Types: Ada Source
Notes: 03_class, FILE, R1k_Segment, e3_tag, procedure Analyze_Crashdump, seg_0286b0
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
procedure Analyze_Crashdump
(Tape_Drive : Natural := 0;
Expunge : Boolean := True;
Output_File : String := "!Machine.Error_Logs.Crash_Summary";
Working_Directory : String := "!Machine.Temporary.Crash_Info";
Read_Tape : Boolean := True;
Volume : Natural := 0);
--
-- This program will analyze a crashdump tape and produce a summary that
-- should be sent to Rational for analysis. Sometimes the summary will be
-- sufficient to diagnose the problem.
--
-- When EXPUNGE is True, the program deletes crashdump files after producing
-- the summary. If Expunge is false, these files have to be manually
-- deleted. The crashdump files are written to the directory specified
-- by the WORKING_DIRECTORY parameter.
--
-- TAPE_DRIVE specifies the tape drive the crashdump tape is mounted on.
--
-- OUTPUT_FILE specifies the output file name where the summary will be
-- written. The null string will sent the output to a window.
--
-- WORKING_DIRECTORY specifies the directory where information read from the
-- tape will be stored.
--
-- READ_TAPE specifies whether that the program should read the information
-- from the tape into the WORKING_DIRECTORY before processing. If TRUE the
-- tape is read. If FALSE the program will assume the information is already
-- in the working directory.
--
-- VOLUME specifies the which volume should be used if the WORKING_DIRECTORY
-- needs to be created. A value of zero indicates to use the least full
-- volume.
--
-- The default expressions should be used for most parameters unless directed
-- otherwise by Rational. The value for TAPE_DRIVE will be determined by
-- which unit the tape is mounted on.
nblk1=2
nid=0
hdr6=4
[0x00] rec0=16 rec1=00 rec2=01 rec3=03a
[0x01] rec0=11 rec1=00 rec2=02 rec3=000
tail 0x21521085883c188bc7afe 0x42a00088462060003