1 /* BEGIN INCLUDE FILE...ls_process_info.incl.pl1 */
 2 
 3 /****^  HISTORY COMMENTS:
 4   1) change(85-04-01,Coren), approve(87-07-14,MCR7679), audit(87-03-18,GDixon),
 5      install(87-08-04,MR12.1-1056):
 6      Initial coding.
 7   2) change(87-04-23,GDixon), approve(87-07-14,MCR7679),
 8      audit(87-07-14,Parisek), install(87-08-04,MR12.1-1056):
 9       A) Add line_type to ls_process_info structure.
10       B) Make process_group_id unaligned.
11                                                    END HISTORY COMMENTS */
12 
13 /* This include file describes the information returned by validate_user_ to
14    login_server_connection_, and maintained for the life of the process or the
15    connection (whichever is shorter). */
16 
17 dcl ls_process_info_ptr pointer;
18 
19 dcl 1 ls_process_info aligned based (ls_process_info_ptr),
20     2 version char (8),                                     /* "lspiNNNN" */
21     2 process_group_id char (32) unal,                      /* Person.Project.tag */
22     2 start_event_channel fixed bin (71),                   /* event channel for sending initial wakeup to user process */
23     2 authorization bit (72),                               /* process's AIM authorization */
24     2 initializer_handle bit (72),                          /* "handle" used in request messages with the Initializer about this connection */
25     2 server_handle bit (72),                               /* "handle" for reading responses from the Initializer */
26     2 process_id bit (36),
27     2 initial_ring fixed bin,                               /* initial ring of process */
28     2 usage_type fixed bin,                                 /* login, dial, etc.; see active_connection_info.incl.pl1 */
29     2 flags,
30       3 fatal_error bit (1) unaligned,                      /* "1"b when process has taken a fatal error */
31       3 terminal_info_set bit (1) unaligned,                /* terminal_type and terminal_id are valid */
32       3 pad bit (34) unaligned,
33     2 terminal_type char (32),                              /* terminal type established during login dialogue */
34     2 terminal_id char (4),                                 /* similarly for terminal ID */
35     2 line_type fixed bin;                                  /* similarly for line type. */
36 
37 dcl LS_PROCESS_INFO_V1 char (8) internal static options (constant) initial ("lspi0001");
38 
39 
40 /* The following structure describes the option flags passed to validate_user_ */
41 
42 dcl  ls_validate_options_ptr pointer;
43 
44 dcl 1 ls_validate_options aligned based (ls_validate_options_ptr),
45     2 version char (8),                                     /* "lsvoNNNN" */
46     2 flags,
47       3 brief bit (1) unaligned,                            /* "1"b => don't print greeting message */
48       3 not_first bit (1) unaligned,                        /* "1"b => this is not first dialogue for this connection */
49       3 mbz bit (34) unaligned;
50 
51 dcl LS_VALIDATE_OPTIONS_V1 char (8) internal static options (constant) initial ("lsvo0001");
52 
53 /* END INCLUDE FILE...ls_process_info.incl.pl1 */