1 /* ---------------- BEGIN include file protocol_infos.incl.pl1 ------------- */
 2 
 3 
 4 
 5 /****^  HISTORY COMMENTS:
 6   1) change(89-03-20,Parisek), approve(89-06-06,MCR8110),
 7      audit(89-10-09,Farley), install(89-10-25,MR12.3-1100):
 8      Add support of protocol mpx.
 9   2) change(89-11-03,Parisek), approve(89-11-03,PBF8110),
10      audit(89-11-03,Farley), install(89-11-08,MR12.3-1107):
11      Move the "transmit_info.pad1" field to the proper location,
12      (after the "size" field).
13                                                    END HISTORY COMMENTS */
14 
15 
16 /*              Written in June 1985 by C. Claveleira - CICB */
17 
18 /* Latest version :                                          */
19 /*                                                           */
20 /* 14 feb 1986 : C. Claveleira                               */
21 /* 20 mar 1986 : C. Claveleira - version 1.0 of protocol_mpx */
22 /* 31 may 1986 : C. Claveleira - version 1.3 of protocol_mpx */
23 
24 /* infos exchanged between x25_mpx, protocol_mpx and
25            Transport Layer */
26 
27      dcl     pinfop                 ptr;
28 
29      dcl     1 DIALUP_info          aligned,
30                2 info_relp          bit (18) unaligned,
31                2 pad                bit (54) unaligned;
32 
33      dcl     1 NCON_REQ_info        aligned based (pinfop),
34                2 mbz                fixed bin (35),
35                2 from_address       char (15) varying,
36                2 to_address         char (15) varying,
37                2 facilities         char (16) varying,
38                2 data               char (48) varying;
39 
40      dcl     1 NCON_IND_info        aligned,
41                2 dial_info          bit (72),
42                2 his_address        char (15) varying,
43                2 our_address        char (15) varying,
44                2 data               char (48) varying,
45                2 facilities         char (16) varying;
46 
47      dcl     1 NDIS_IND_REASON      aligned based,
48                2 cause              fixed bin (8) unaligned,
49                2 diag               fixed bin (8) unaligned;
50 
51      dcl     1 disconnect_info      unal,
52                2 cause              bit (9),
53                2 diag               bit (9);
54 
55      dcl     1 network_infos        aligned based (pinfop),
56                2 network_address    char (15) varying,
57                2 max_packet_size    fixed bin;
58 
59      dcl     transmit_info_entries  fixed bin;
60 
61      dcl     1 transmit_info        aligned based (pinfop),
62                2 n_entries          fixed bin,
63                2 pad                bit (36),
64                2 entry              (transmit_info_entries refer (transmit_info.n_entries)),
65                  3 data_ptr         ptr,
66                  3 size             fixed bin (21) unsigned,
67                  3 pad1             bit (36);
68 
69 
70 /* messages passed to the Transport Layer at the time of wakeups : */
71 
72      dcl     protocol_event_message fixed bin (71);
73 
74      dcl     1 protocol_msg         based (addr (protocol_event_message)),
75                2 ev_devx            fixed bin (17) unaligned, /* device index */
76                2 ev_type            fixed bin (17) unaligned, /* reason for wakeup (see below) */
77                2 ev_user_index      fixed bin (17) unaligned,
78                2 infos              bit (18) unaligned;
79 
80      dcl     NCONIND                fixed bin internal static options (constant) init (1); /* type of wakeup */
81      dcl     NCONCONF               fixed bin internal static options (constant) init (2);
82      dcl     NDTIND                 fixed bin internal static options (constant) init (3);
83      dcl     NDTRDYIND              fixed bin internal static options (constant) init (4);
84      dcl     NRESETIND              fixed bin internal static options (constant) init (5);
85      dcl     NDISIND                fixed bin internal static options (constant) init (6);
86      dcl     ABORT                  fixed bin internal static options (constant) init (7);
87 
88      dcl     wakeup_names           (7) char (9) internal static options (constant)
89                                     init ("NCONIND",
90                                     "NCONCONF",
91                                     "NDTIND",
92                                     "NDTRYIND",
93                                     "NRESETIND",
94                                     "NDISIND",
95                                     "ABORT");
96 
97 /*  ---------      END INCLUDE FILE ... protocol_infos.incl.pl1      ------- */
98