|
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: 5120 (0x1400)
Types: Ada Source
Notes: 03_class, FILE, R1k_Segment, e3_tag, procedure Terminals, seg_0284c3
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
procedure Terminals (Config_File_Name : String :=
"!Machine.Initialization.Local.Terminal_Configuration";
Effort_Only : Boolean := False);
pragma Loaded_Main;
--
-- Initialize terminals.
--
-- Read the Terminal_Configuration file in the Local directory and initialize
-- terminals according to it.
--
-- The Terminal_Configuration file consists of a series of lines each of
-- which defines characteristics for a port or series of ports. It has
-- the following format
--
-- File ::= Line*
-- Line ::= Port_Range '=>' Option_List
-- ::= Abbreviation '=' Option_List
-- Port_Range ::= Port_Number
-- ::= Port_Number .. Port_Number
-- Abbreviation::= identifier -- an Ada identifier
-- Port_Number ::= natural range 16..255 -- a numeric literal
-- Option_List ::= '(' Option (',' Option)* ')'
-- Option ::= 'Enable'
-- ::= 'Disable'
-- ::= ('~')* Boolean_Type
-- ::= Enumerated_Type
-- ::= Abbreviation
--
-- Boolean_Type::= 'Disconnect_On_Logoff'
-- ::= 'Logoff_on_Disconnect'
-- ::= 'Log_Failed_Logins'
-- ::= 'Disconnect_On_Failed_Login'
-- ::= 'Disconnect_On_Disconnect'
-- ::= 'Login_Disabled'
-- Enumerated_Type::= 'Terminal_Type' '=>' Terminal_Name
-- ::= 'Input_Rate' '=>' Rate_Value
-- ::= 'Output_Rate' '=>' Rate_Value
-- ::= 'Parity' '=>' Parity_Type
-- ::= 'Bits_Per_Char' '=>' Char_Bits
-- ::= 'Stop_Bits' '=>' Stop_Bits_Range
-- ::= 'Flow_Control' '=>' Protocol
-- ::= 'Xon_Xoff_Bytes' '=>' Two_Bytes
-- ::= 'Receive_Flow_Control' '=>' Protocol
-- ::= 'Receive_Xon_Xoff_Bytes' '=>' Two_Bytes
--
-- Terminal_Name::= 'VT100' | 'CIT500R' | 'RATIONAL'
-- ::= 'FACIT' | 'XRTERM'
-- Rate_Value ::= 'Disabled' | 'Ext_Rec_Clk'
-- ::= 'Baud_' Baud_Rate
-- Baud_Rate ::= 50 | 75 | 110 | 134_5 | 150 | 200 | 300 | 600
-- ::= 1200 | 1800 | 2400 | 4800 | 9600 | 19200
-- Parity_Type ::= 'None' | 'Odd' | 'Even'
-- Char_Bits ::= 'Char_5' | 'Char_6' | 'Char_7' | 'Char_8'
-- Stop_Bits_Range::= natural range 1..2
-- Protocol ::= 'None' | 'Xon_Xoff' | 'Dtr' | 'Rts'
-- Two_Bytes ::= '(' Byte ',' Byte ')'
-- Byte ::= natural range 0..255
-- ::=
--
-- Each entry in the file provides information about a range of terminals
-- or defines an abbreviation for a group of options.
-- Each entry must start on a new line, but the information can extend over
-- several lines and include single and in-line comments
-- Each of the quoted names above can be replaced with a unique prefix.
-- The prefix only needs to be unique within its category.
--
--
--
--|Prerequisite Finish_Install
--|Wait
nblk1=4
nid=0
hdr6=8
[0x00] rec0=18 rec1=00 rec2=01 rec3=00e
[0x01] rec0=12 rec1=00 rec2=02 rec3=060
[0x02] rec0=13 rec1=00 rec2=03 rec3=052
[0x03] rec0=0c rec1=00 rec2=04 rec3=001
tail 0x217223a4283c1743c114d 0x42a00088462060003