1 /* BEGIN INCLUDE FILE ... mcs_interrupt_info.incl.pl1 */
 2 
 3 /* Defines constants and structures  used by MCS interrupt handlers */
 4 
 5 /* Created 08/21/78 by Robert Coren */
 6 /* Echo negotiation types added sometime by Bernie Greenberg */
 7 /* TIMER and USER_INTERRUPT added in spring of 1982 by Olin Sibert */
 8 /* MASKED type added June 23, 1982, by Robert Coren */
 9 
10 dcl  DIALUP fixed bin int static options (constant) init (1);
11 dcl  HANGUP fixed bin int static options (constant) init (2);
12 dcl  CRASH fixed bin int static options (constant) init (3);
13 dcl  SEND_OUTPUT fixed bin int static options (constant) init (4);
14 dcl  INPUT_AVAILABLE fixed bin int static options (constant) init (5);
15 dcl  ACCEPT_INPUT fixed bin int static options (constant) init (6);
16 dcl  INPUT_REJECTED fixed bin int static options (constant) init (7);
17 dcl  QUIT fixed bin int static options (constant) init (8);
18 dcl  LINE_STATUS fixed bin int static options (constant) init (9);
19 dcl  DIAL_STATUS fixed bin int static options (constant) init (10);
20 dcl  WRU_TIMEOUT fixed bin int static options (constant) init (11);
21 dcl  SPACE_AVAILABLE fixed bin int static options (constant) init (12);
22 dcl  ACKNOWLEDGE_ECHNEGO_INIT fixed bin int static options (constant) init (13);
23 dcl  ACKNOWLEDGE_ECHNEGO_STOP fixed bin int static options (constant) init (14);
24 dcl  TIMER fixed bin int static options (constant) init (15);
25 dcl  USER_INTERRUPT fixed bin int static options (constant) init (16);
26 dcl  MASKED fixed bin int static options (constant) init (17);
27 
28 dcl  interrupt_info bit (72) aligned;
29 
30 dcl 1 dialup_info aligned,                                  /* for use with DIALUP interrupt */
31     2 line_type fixed bin (9) unal uns,
32     2 buffer_pad fixed bin (9) unal uns,                    /* free space multiplexer would like in output bufs */
33     2 baud_rate fixed bin (18) unal uns,
34     2 max_buf_size fixed bin (9) unal uns,
35     2 receive_mode_device bit (1) unal,                     /* device must be told to enter receive mode */
36     2 pad bit (26) unal;
37 
38 dcl 1 rtx_info aligned,                                     /* for use with ACCEPT_INPUT interrupt */
39     2 input_chain unaligned,
40       3 chain_head bit (18) unaligned,
41       3 chain_tail bit (18) unaligned,
42     2 input_count fixed bin (18) unal uns,
43     2 flags unaligned,
44       3 break_char bit (1),                                 /* data contains a break character */
45       3 output_in_fnp bit (1),                              /* there is output in the FNP */
46       3 output_in_ring_0 bit (1),                           /* there is output in ring 0 */
47       3 formfeed_present bit (1),                           /* input contains a formfeed character */
48       3 pad bit (14);
49 
50 dcl 1 timer_info aligned,                                   /* Info supplied with TIMER interrupt */
51     2 id bit (36) aligned,                                  /* ID which was supplied in call to mcs_timer$set */
52     2 subchan_idx fixed bin;                                /* Index of subchannel on whose behalf timer was set */
53 
54 /* END INCLUDE FILE ... mcs_interrupt_info.incl.pl1 */