
DIRECTORY
CHOpsP2V3 USING [all, Item, nullProperty, Properties, Property],
Rope USING [ROPE],
XNS USING [Address, unknownAddress],
XNSAuth USING [Identity],
XNSCHName USING [Name];

XNSCH: CEDAR DEFINITIONS
~ {
OPEN CHOps: CHOpsP2V3;

ROPE: TYPE ~ Rope.ROPE;

Name: TYPE ~ XNSCHName.Name;	-- valid name (or alias) of object
Pattern: TYPE ~ Name;		-- may contain wildcards
Element: TYPE ~ Name;		-- element of a group, needn't name an object

PropertyID: TYPE ~ CHOps.Property;
notUsable: PropertyID ~ CHOps.nullProperty;
unspecified: PropertyID ~ CHOps.all;
Properties: TYPE ~ CHOps.Properties;
Item: TYPE ~ CHOps.Item;

Conversation: TYPE ~ REF ConversationObject;
ConversationObject: TYPE;

NameStreamProc: TYPE ~ PROC [Element];
ElementStreamProc: TYPE ~ PROC [Element];
EnumeratorProc: TYPE ~ PROC [ElementStreamProc];
alias: CARD32 ~ 1;
aliases: CARD32 ~ 2;

InitiateConversation: PROC [identity: XNSAuth.Identity ¬ NIL, server: XNS.Address ¬ XNS.unknownAddress] RETURNS [Conversation];

TerminateConversation: PROC [c: Conversation];

Add: PROC [c: Conversation, name: Name];
Delete: PROC [c: Conversation, name: Name];
Lookup: PROC [c: Conversation, pattern: Pattern]
RETURNS [distingName: Name];

AddAlias: PROC [c: Conversation, name, alias: Name]
RETURNS [distingName: Name];
DeleteAlias: PROC [c: Conversation, alias: Name]
RETURNS [distingName: Name];
ListAliases: PROC [c: Conversation, pattern: Pattern, eachAlias: NameStreamProc]
RETURNS [distingName: Name];
GetProperties: PROC [c: Conversation, pattern: Pattern]
RETURNS [distingName: Name, properties: Properties];
DeleteProperty: PROC [c: Conversation, name: Name, pID: PropertyID]
RETURNS [distingName: Name];

AddItemProperty: PROC [c: Conversation, name: Name, pID: PropertyID, item: Item]
RETURNS [distingName: Name];
ChangeItemProperty: PROC [c: Conversation, name: Name, pID: PropertyID, item: Item]
RETURNS [distingName: Name];
LookupItemProperty: PROC [c: Conversation, pattern: Pattern, pID: PropertyID]
RETURNS [distingName: Name, item: Item];
LookupAddress: PROC [c: Conversation, pattern: Pattern]
RETURNS [distingName: Name, address: XNS.Address];
LookupRopeProperty: PROC [c: Conversation, pattern: Pattern, pID: PropertyID]
RETURNS [distingName: Name, ropeProperty: ROPE];
LookupNameProperty: PROC [c: Conversation, pattern: Pattern, pID: PropertyID]
RETURNS [distingName: Name, nameProperty: Name];

AddGroupProperty: PROC [c: Conversation, name: Name, pID: PropertyID,
enumerator: EnumeratorProc ¬ NIL]
RETURNS [distingName: Name];
AddMember: PROC [c: Conversation, name: Name, pID: PropertyID, member: Element]
RETURNS [distingName: Name];
AddSelf: PROC [c: Conversation, name: Name, pID: PropertyID]
RETURNS [distingName: Name];
DeleteMember: PROC [c: Conversation, name: Name, pID: PropertyID, member: Element]
RETURNS [distingName: Name];
DeleteSelf: PROC [c: Conversation, name: Name, pID: PropertyID]
RETURNS [distingName: Name];
ListMembers: PROC [c: Conversation, pattern: Pattern, pID: PropertyID, eachMember: ElementStreamProc] RETURNS [distingName: Name];
IsMember: PROC [c: Conversation, pattern: Pattern, pID: PropertyID, member: Element]
RETURNS [distingName: Name, isMember: BOOL];
IsMemberClosure: PROC [c: Conversation, pattern: Pattern, pID: PropertyID, member: Element, pID2: PropertyID ¬ unspecified]
RETURNS [distingName: Name, isMember: BOOL];
Enumerate: PROC [c: Conversation, pattern: Pattern, pID: PropertyID,
eachObject: NameStreamProc];
EnumerateAliases: PROC [c: Conversation, pattern: Pattern, eachName: NameStreamProc];
EnumerateOrganizations: PROC [c: Conversation, pattern: Pattern,
eachOrganization: ElementStreamProc];
EnumerateDomains: PROC [c: Conversation, pattern: Pattern,
eachDomain: ElementStreamProc];
LookupAddressFromRope: PROC [rope: ROPE]
RETURNS [distingName: Name, address: XNS.Address];
LookupAddressFromRopeClosure: PROC [rope: Rope.ROPE]
RETURNS [distingName: XNSCHName.Name, address: XNS.Address, didClosure: BOOL];
GetServerAddresses: PROC [c: Conversation] RETURNS [addresses: LIST OF XNS.Address];

EnumerateDomainsServed: PROC [c: Conversation, eachDomain: ElementStreamProc];
AddressesFromItem: PROC [item: Item] RETURNS [addresses: LIST OF XNS.Address];
ItemFromAddresses: PROC [addresses: LIST OF XNS.Address] RETURNS [item: Item];

RopeFromItem: PROC [item: Item] RETURNS [rope: ROPE];
ItemFromRope: PROC [rope: ROPE] RETURNS [item: Item];

ElementFromItem: PROC [item: Item] RETURNS [element: Element];
ItemFromElement: PROC [element: Element] RETURNS [item: Item];

BestAddressInList: PUBLIC PROC [list: LIST OF XNS.Address]
RETURNS [bestAddress: XNS.Address];
WrongServerError: VAR ERROR [hint: Name];
 
Error: ERROR [code: ErrorCode, which: Which];

ErrorCode: TYPE ~ {
notAllowed,
allDown,
wasUpNowDown,
protocolError,
cantConnectToServer,	-- (*)
communicationFailure,	-- (*)
serverTooBusy,	-- (*)
serviceNotExported,	-- (*)
illegalPropertyID,
illegalOrganizationName,
illegalDomainName,
illegalObjectName,
noSuchOrganization,
noSuchDomain,
noSuchObject,
propertyIDNotFound,
wrongPropertyType,
noChange,
outOfDate,
overflowOfName,
overflowOfDataBase,
credentialsInvalid,
credentialsTooWeak,
inappropriateConversation,
unknown
};

Which: TYPE ~ { first, second };
}.
  
|  
XNSCH.mesa
Copyright س 1991 by Xerox Corporation.  All rights reserved.
Demers, January 19, 1987 2:37:02 pm PST
Willie-s, December 10, 1991 1:09 pm PST
Copied Types
The following three types are equivalent; the difference lies in what we consider to be legitimate values ...
Types
A callback proc for handling a sequence of names.
A callback proc for handling a sequence of group elements.
A callback that supplies a sequence of group elements by repeatedly calling the ElementStreamProc.

Constants that should be in CHEntries0.cr / CHEntriesP0V0

Authentication
A conversation contains credentials that identify the user to the Clearinghouse service.  See also XNSAuth.
Initiate a conversation with the Clearinghouse service using the given identity.
A NIL identity is okay for simple lookups.
If server is not specified, the conversation is with the generic Clearinghouse service, and the package takes care of server location and WrongServer error processing.  If a server is specified, calls using this conversation will go to that address, and WrongServer errors will be passed back to the client.
There should never be more than one outstanding call on any conversation.
No ERRORs.
Terminate the conversation.  Dropping it on the floor is safe, but expensive.
Operations on Objects
! Error
! Error
! Error
! Error
! Error
! Error
Operations on Properties
! Error
! Error
! Error
! Error
! Error
! Error
! Error
! Error
! Error
! Error
! Error
! Error
! Error
! Error
! Error
! Error
Enumeration Operations
! Error
! Error
! Error
The domain and object fields of the Elements passed to eachOrganization are indeterminate and should be ignored.
! Error
The object fields of the Elements passed to eachDomain are indeterminate and should be ignored.
Common Lookups (generic conversations only)
No ERRORs  returns [[NIL,NIL,NIL], unknownAddress] on failure.

Like LookupAddressFromRope, but if the initial lookup fails try getting the "associatedWorkstation" property and iterate.
No ERRORs  returns [[NIL,NIL,NIL], unknownAddress, ?] on failure.
Server-Specific Queries (not allowed with generic conversations) 
! Error
! Error
The object fields of the Elements passed to eachDomain are indeterminate and should be ignored.
Utilities
Errors
_ CHOps.WrongServer.
Raised only for a call directed to a specific CH Server.
code is defined below.
which is significant for naming problems or propertyID errors when more than one argument might be the cause of the error.
Asterisk (*) ==> error only occurs on call directed to a specific CH Server.
Operational problems
Naming problems
PropertyID errors
Update problems
Authentication problems
Specific/Generic mixup
Catch-all
 ‌ت‡  –(cedarcode) style•NewlineDelimiter
™ ڑدkœ™
Jڑœ
دeœ1™<J™'J™'Icodeک —ڑ‌	ک	Kڑœ
‌œ1ک@Kڑœ‌œ‌œکKڑ‌œ‌œک$Kڑœ‌œکKڑœ
‌œکKک —ڑذbkœ‌œ‌کKکKڑ‌œدnœکKک head™Kڑ‌œ‌œ‌œکKک ™mKڑœ‌œدc"ک?Kڑœ	‌œ
،ک/Kڑœ	‌œ
،-کD—Kک Kڑœ‌œک"Kڑœ+ک+Kڑœ$ک$Kڑœ‌œک$ڑœ‌œکKک ——™Kڑœ‌œ‌œک,Kڑœ‌œکKک ڑœ‌œ‌œک&K™1—ڑœ‌œ‌œک)K™:—ڑœ‌œ‌œک0Kڑœb™bK™ —™9Kڑœ‌œکKڑœ	‌œک—K™ —™K™kKک ڑ œ‌œ‌œ
‌œ‌œ‌œکK™PK™*Kڑœ³™³K™IK™
Kک —ڑ œ‌œک.K™M——Kک ™ڑ œ‌œک(K™—ڑ œ‌œک+K™—ڑ œ‌œ%‌œکMK™—Kک ڑ œ‌œ&‌œکPK™—ڑ œ‌œ ‌œکMK™—ڑ œ‌œ@‌œکmK™——™ڑ œ‌œ%‌œ-کlK™—ڑ œ‌œ0‌œک`K™—Kک ڑ œ‌œ<‌œکmK™—ڑ œ‌œ<‌œکpK™—ڑ œ‌œ6‌œ!کvK™—ڑ œ‌œ%‌œ+کjK™—ڑ œ‌œ6‌œ#‌œک~K™—ڑ œ‌œ6‌œ)ک~K™—Kک ڑ œ‌œM‌œ‌œک„K™—ڑ 	œ‌œA‌œکlK™—ڑ œ‌œ0‌œکYK™—ڑ œ‌œA‌œکoK™—ڑ 
œ‌œ0‌œک\K™—ڑ œ‌œU‌œک‚K™—ڑ œ‌œG‌œ‌œکپK™—ڑ œ‌œg‌œ‌œک¨K™——™ڑ 	œ‌œRکaK™—ڑ œ‌œ?کUK™—ڑ œ‌œJکfK™Kڑœp™p—ڑ œ‌œDکZK™Kڑœ_™_——™+ڑ
 œ‌œ‌œ‌œ‌œ
ک[K™?K™ —ڑ œ‌œ‌œ‌œ(‌œ‌œکƒKڑœ œ_™yK™B——™Aڑ œ‌œ‌œ‌œ‌œ‌œ
کTK™Kک —ڑ œ‌œ2کNK™Kڑœ_™_——™	Kڑ œ‌œ‌œ‌œ‌œ‌œ
کNKڑ œ‌œ‌œ‌œ‌œ
‌œکNKک Kڑ œ‌œ‌œ‌œک5Kڑ œ‌œ‌œ‌œک5Kک Kڑ œ‌œ‌œک>Kڑ œ‌œ‌œک>Kک Kڑ œ‌œ‌œ‌œ‌œ‌œ
‌œ‌œ
ک^—™ڑ œ‌œ‌œک)K™K™8Kک—ڑ œ‌œ!ک-K™K™zK™L—Kک ڑœ‌œک™KکKکKکKکKڑœ،کKڑœ،کKڑœ،کKڑœ،ک—™KکKکKکKکKکKکKک—™KکKک—™Kک	Kک
KکKک—™KکKک—™Kک—™	Kک—Kک—Kک Kڑœ‌œک —Kک—— …—    b  %e  