1 
 2 /*             "net_user_as_comm_dcls.incl.pl1" -- include file to declare the  */
 3 /*        communication structures used between the user process and the        */
 4 /*        Answering Service for Network type pseudo-teletypewriters.            */
 5 
 6 /*        Originally created by D. M. Wells 1974, January 3.                    */
 7 /*        Last modified by D. M. Wells, Oct. 1976, to add terminal type and     */
 8 /*             option state info.                                               */
 9 
10      declare
11           user_as_comm_version_2 fixed binary (17) initial (2)
12                internal static options (constant);
13 
14      declare
15           1 user_AS_modes_comm_template based,              /* communication about modes (write socket info)  */
16              2 mode_switches unaligned,                     /* whether certain modes are enabled              */
17                 3 can bit (1),                              /* whether the input should be canonicalized      */
18                 3 erkl bit (1),                             /* whether erase-kill processing should be done   */
19                 3 esc bit (1),                              /* whether escape processing should be done       */
20                 3 half bit (1),                             /* whether terminal is like a TTY33               */
21                 3 edited bit (1),                           /* if non-graphic chars are deleted on output     */
22                 3 hndlquit bit (1),                         /* whether we should handle quits                 */
23                 3 tabs bit (1),                             /* whether we assume remote terminal has tabs     */
24                 3 rawi bit (1),                             /* whether we are in raw input mode               */
25                 3 tabecho bit (1),                          /* whether or not we echo spaces for tabs         */
26 
27              2 padding_space bit (7) unaligned,
28              2 version_number bit (4) unaligned,            /* enough to tell us which version of AS          */
29              2 terminal_type bit (4) unaligned,             /* Type of Terminal as specified to AS            */
30              2 protocol_info unaligned,                     /* information about usage of telnet connection   */
31                 3 protocol_17759 bit (1),                   /* FTP protocol without SOCK responses            */
32                 3 protocol_15372 bit (1),                   /* TELNET protocol with IAC processing            */
33              2 line_length bit (10) unaligned;              /* the virtual line length of terminal            */
34 
35      declare
36           1 user_AS_options_comm_template based,            /* communication about state of TELNET options    */
37              2 receive_option unaligned,
38                 3 in_effect (0 : 8) bit (1),
39                 3 in_negotiation (0 : 8) bit (1),
40              2 transmit_option unaligned,
41                 3 in_effect (0 : 8) bit (1),
42                 3 in_negotiation (0 : 8) bit (1);
43 
44 /*        end of include file "net_user_as_comm_dcls.incl.pl1"                  */
45