![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to CHEntries0.cr CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSD / contrib / xns / courierlib|
Return to CHEntries0.cr CVS log | Up to [CSRG BSD Unix] / 43BSD / contrib / xns / courierlib |
1.1 root 1: -- $Header: CHEntries0.cr,v 2.1 85/11/21 07:32:53 jqj Exp $
2:
3: -- although no official Courier program corresponds to this file, the file
4: -- contains useful data for Courier programs. In particular, it contains
5: -- data garnered from CHpids.mesa and CHentries.mesa, as well as from the
6: -- document "Clearinghouse Entry Formats".
7:
8: -- $Log: CHEntries0.cr,v $
9: -- Revision 2.1 85/11/21 07:32:53 jqj
10: -- fixed comment leaders
11: --
12: -- Revision 2.0 85/11/21 07:24:30 jqj
13: -- 4.3BSD standard release
14: --
15: -- Revision 1.2 85/11/20 13:08:55 jqj
16: -- 4.3beta version
17:
18:
19: CHEntries: PROGRAM 0 VERSION 0 =
20: BEGIN
21: DEPENDS UPON Clearinghouse (2) VERSION 2,
22: Time (15) VERSION 2;
23:
24: -- OBJECTS DEFINED IN CH ENTRY FORMATS --
25:
26: members: Clearinghouse.Property = 3; -- Group property => no Item --
27: addressList: Clearinghouse.Property = 4; -- Item is AddressListValue --
28: mailboxes: Clearinghouse.Property = 31; -- Item is MailboxesValue --
29: authenticationLevel: Clearinghouse.Property = 8;
30: -- Item is AuthenticationLevelValue --
31: fileService: Clearinghouse.Property = 10000; -- Item is Description --
32: printService: Clearinghouse.Property = 10001; -- Item is Description --
33: user: Clearinghouse.Property = 10003; -- Item is Description --
34: mailService: Clearinghouse.Property = 10004; -- Item is Description --
35: clearinghouseService: Clearinghouse.Property = 10021;
36: -- Item is Description --
37: userGroup: Clearinghouse.Property = 10022; -- Group property => no Item --
38: userData: Clearinghouse.Property = 20000; -- Item is UserDataValue --
39:
40: -- Item type for lots of things --
41: Description: TYPE = STRING;
42: -- Item type for addressList --
43: AddressListValue: TYPE = Clearinghouse.NetworkAddressList;
44: -- Item type for mailboxes. This is private to Mailing implementation --
45: MailboxesValue: TYPE = RECORD [
46: time: Time.Time,
47: mailService: ARRAY 4 OF Clearinghouse.Name ];
48: -- Item type for authenticationLevel --
49: AuthenticationLevelValue: TYPE = RECORD [
50: simpleSupported, strongSupported: BOOLEAN ];
51: -- Item type for userData --
52: UserDataValue: TYPE = RECORD [
53: lastNameIndex: CARDINAL,
54: fileService: Clearinghouse.Name ];
55:
56: -- OBJECTS DEFINED IN CHPIDS.MESA --
57:
58: -- generic properties --
59:
60: authKeys: Clearinghouse.Property = 6;
61: -- the list of all services. Presumably, Star uses this property to --
62: -- determine who on the net exports a services Exec.
63: services: Clearinghouse.Property = 51;
64:
65: -- primary properties: all have associated Item == Description --
66:
67: internetworkRoutingService: Clearinghouse.Property = 10002;
68: workstation: Clearinghouse.Property = 10005;
69: externalCommunicationsService: Clearinghouse.Property = 10006;
70: rs232CPort: Clearinghouse.Property = 10007;
71: interactiveTerminalService: Clearinghouse.Property = 10008;
72: gatewayService: Clearinghouse.Property = 10009;
73: ibm3270Host: Clearinghouse.Property = 10010;
74: mailGateway: Clearinghouse.Property = 10011;
75: siemens9750Host: Clearinghouse.Property = 10012;
76: adobeService: Clearinghouse.Property = 10013;
77: librarianService: Clearinghouse.Property = 10014;
78: ttxGateway: Clearinghouse.Property = 10015;
79: authenticationService: Clearinghouse.Property = 10016;
80: remoteBatchService: Clearinghouse.Property = 10017;
81: network: Clearinghouse.Property = 10018;
82: networkServers: Clearinghouse.Property = 10019;
83: communicationsInterfaceUnit: Clearinghouse.Property = 10020;
84: fetchService: Clearinghouse.Property = 10023;
85:
86: -- secondary properties --
87:
88: rs232CData: Clearinghouse.Property = 20001;
89: -- Item is RS232CData --
90: ibm3270HostData: Clearinghouse.Property = 20002;
91: -- Item is IBM3270HostData --
92: siemens9750HostData: Clearinghouse.Property = 20003;
93: -- Item is Siemens9750HostData --
94: canMailTo: Clearinghouse.Property = 20005; -- use with user groups
95: mailGatewayRouteData: Clearinghouse.Property = 20006;
96: foreignMailSystemName: Clearinghouse.Property = 20007;
97:
98: -- secondary properties for compatibility with old stuff --
99: userPassword: Clearinghouse.Property = 20101;
100: rs232CBack: Clearinghouse.Property = 20102; -- Item is RS232CBack --
101: ibm3270HostBack: Clearinghouse.Property = 20103;
102: -- Item is Clearinghouse.Name --
103:
104: -- associated properties --
105:
106: associatedWorkstation: Clearinghouse.Property = 30005;
107:
108: -- Item types --
109:
110: -- faked dependency on RS232CEnvironment --
111: Duplexity: TYPE = CARDINAL; -- for now
112: CharLength: TYPE = CARDINAL; -- for now
113: FlowControl: TYPE = CARDINAL; -- for now
114: LineSpeed: TYPE = CARDINAL; -- for now
115: Parity: TYPE = CARDINAL; -- for now
116: StopBits: TYPE = CARDINAL; -- for now
117:
118: PortClientType: TYPE = {unassigned(0), outOfService(1), its(2), irs(3),
119: gws(4), ibm3270Host(5), ttyEmulation(6), rbs(7), fax(9),
120: mailGateway(10), phototypesetter(11) };
121: PortDialerType: TYPE = {dialerNone(0), vadic(1), hayes(2), ventel(3), rs366(4)};
122: PortSyncType: TYPE = {asynchronous(0), synchronous(1), bitSynchronous(2),
123: byteSynchronous(3), syncAny(4)};
124: PortEchoingLocation: TYPE = {echoLocal(0), echoRemote(1)};
125: -- the Item type for rs232CData --
126: RS232CData: TYPE = RECORD [
127: cIUPort: BOOLEAN,
128: owningClientType: PortClientType,
129: preemptionAllowed: BOOLEAN,
130: lineNumber: CARDINAL, -- logical line number
131: dialerNumber: CARDINAL, -- logical dialer number; must
132: -- be unique within domain
133: duplexity: Duplexity,
134: dialingHardware: PortDialerType,
135: charLength: CharLength,
136: echoing: PortEchoingLocation,
137: xxxxpaddingxxx: LONG CARDINAL,
138: flowControl: FlowControl,
139: lineSpeed: LineSpeed,
140: parity: Parity,
141: stopBits: StopBits,
142: portActsAsDCE: BOOLEAN,
143: accessControl: Clearinghouse.Name,
144: validLineSpeeds: SEQUENCE OF LineSpeed ];
145:
146: END. -- of CHEntries --
147:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.