|
|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 Tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T V
Length: 3415 (0xd57)
Types: TextFile
Names: »V«
└─⟦8ee07855d⟧ Bits:30000545 8mm tape, Rational 1000, DTIA 2_1_6
└─⟦0c25cb74a⟧ »DATA«
└─⟦this⟧
└─⟦bdeee703f⟧ Bits:30000538 8mm tape, Rational 1000, RWI 10_1_1
└─⟦545705153⟧ »DATA«
└─⟦this⟧
└─⟦d0624311f⟧ Bits:30000529 8mm tape, Rational 1000, DTIA 2_1_7
└─⟦f494b5154⟧ »DATA«
└─⟦this⟧
procedure Do_Step (Step : String := "";
Step_File : String := "Command_Data.Steps");
pragma Loaded_Main;
--
-- This procedure is used by Rational in performing installation
-- of Rational products.
--
-- A file contains a list of valid step names and values. See package
-- Parameter_Parser for legal format of the form
-- <STEP NAME> => <COMMANDS>
-- The Step parameter lists a set of Steps to be executed. For example,
-- if the following steps are defined in the step file:
-- HELLO => ( Io.Put_Line ("Hello"); )
-- FACTORIAL => (
-- declare
-- N : Natural := 1;
-- begin
-- for I in 1 .. 4 loop
-- N := N * I;
-- end loop;
-- Io.Echo (N);
-- end;
-- )
-- GOODBY => ( Io.Put_Line ("Goodby"); )
-- you execute Do_Install (Step => "Hello"), the string "Hello" would
-- be output to your I/O window.
--
-- To execute this procedure, the user must be a member of group privileged.
-- During execution of steps, privileged mode is enabled.
--
-- Errors (***, ++*, %%%) signify problems with a step which must be
-- resolved before continuing on to the next step. Warnings (!!!)
-- should be resolved, yet it is permissible to continue on to the
-- next step at your own risk.
--
-- Predefined "steps"
-- LOAD_TAPE
-- Performs an Archive.Restore for a tape mounted on the
-- system tape drive. Options to Archive are "REPLACE, PROMOTE"
-- TRACE (boolean value) can be used to display the step
-- which is executed. Default = FALSE.
-- EXECUTE (Boolean value) can be used to enable/disable execution.
-- Typically used in conjunction with TRACE to only display
-- the command that will be executed without actually executing.
-- PROMPT Formats a step in a command window for manual execution.
-- Of the form PROMPT => <Step Name>. Any steps after this one
-- will not be executed, and the procedure terminates at this point
-- allowing the user to make modifications to the command window
-- and then execute it. For example:
-- Do_Install ("PROMPT => Hello");
-- would result in a command window being created and the
-- contents, ready for execution, looking something like:
--
-- declare
-- begin
-- Operator.Enable_Privileges;
-- Io.Put_Line ("Hello");
-- end;
--
-- SEMANTICIZE (boolean value)
-- Does a semantic check on the step, reporting the results in
-- the log output. Used for verifying master step file.
-- Default = FALSE. For example, "Semanticize Hello".
--
-- PAUSE (boolean value)
-- When executing multiple steps, will pause after execution
-- of each step and prompt the user for continuation. If
-- anything other than 'Y' or 'y' (or "" string indicating the
-- default) is entered, then no more steps are executed and
-- Do_Step halts at that point. The default for PAUSE is
-- TRUE; to always pause between steps and ask for
-- confirmation to continue with the next step.
--
-- Step execution is done by calling Program.Run on the image of the step.
--
--