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 - 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. -- --