DIRECTORY
CrRPC,
CHNameP2V0,
AuthenticationP14V2,
BulkDataP0V1,
Rope;

CHOpsP2V3: CEDAR DEFINITIONS ~ {

ROPE: TYPE ~ Rope.ROPE;


CreateAliasType: TYPE ~ PROC [h: CrRPC.Handle, alias: CHNameP2V0.ThreePartName, sameAs: CHNameP2V0.ThreePartName, agent: Authenticator] RETURNS [distinguishedObject: CHNameP2V0.ThreePartName];
CreateAlias: CreateAliasType;

DomainSequence: TYPE ~ REF DomainSequenceObject;
DomainSequenceObject: TYPE ~ MACHINE DEPENDENT RECORD [
body: PACKED SEQUENCE length: CARDINAL OF ROPE
];

OrganizationName: TYPE ~ ROPE;

ObjectNameSequence: TYPE ~ REF ObjectNameSequenceObject;
ObjectNameSequenceObject: TYPE ~ MACHINE DEPENDENT RECORD [
body: PACKED SEQUENCE length: CARDINAL OF CHNameP2V0.ThreePartName
];

RetrieveAddressesType: TYPE ~ PROC [h: CrRPC.Handle] RETURNS [address: NetworkAddressList];
RetrieveAddresses: RetrieveAddressesType;

Object: TYPE ~ ROPE;

DeletePropertyType: TYPE ~ PROC [h: CrRPC.Handle, name: CHNameP2V0.ThreePartName, property: CARD32, agent: Authenticator] RETURNS [distinguishedObject: CHNameP2V0.ThreePartName];
DeleteProperty: DeletePropertyType;

ListDomainsType: TYPE ~ PROC [h: CrRPC.Handle, pattern: CHNameP2V0.TwoPartName, list: CrRPC.BulkDataSink, agent: Authenticator];
ListDomains: ListDomainsType;

TwoPartName: TYPE ~ CHNameP2V0.TwoPartName;

DomainNameSequence: TYPE ~ REF DomainNameSequenceObject;
DomainNameSequenceObject: TYPE ~ MACHINE DEPENDENT RECORD [
body: PACKED SEQUENCE length: CARDINAL OF CHNameP2V0.TwoPartName
];

ThreePartName: TYPE ~ CHNameP2V0.ThreePartName;

IsMemberType: TYPE ~ PROC [h: CrRPC.Handle, memberOf: CHNameP2V0.ThreePartName, property: CARD32, secondaryProperty: CARD32, name: CHNameP2V0.ThreePartName, agent: Authenticator] RETURNS [isMember: BOOLEAN, distinguishedObject: CHNameP2V0.ThreePartName];
IsMember: IsMemberType;

UpdateErrorType: TYPE ~ ERROR [problem: UpdateProblem, found: BOOLEAN, which: WhichArgument, distinguishedObject: CHNameP2V0.ThreePartName];
UpdateError: UpdateErrorType;

ObjectName: TYPE ~ CHNameP2V0.ThreePartName;

CreateObjectType: TYPE ~ PROC [h: CrRPC.Handle, name: CHNameP2V0.ThreePartName, agent: Authenticator];
CreateObject: CreateObjectType;

StreamKind: TYPE ~ MACHINE DEPENDENT { nextSegment(0), lastSegment(1)};

StreamOfThreePartName: TYPE ~ REF StreamOfThreePartNameObject;
StreamOfThreePartNameObject: TYPE ~ RECORD [
SELECT type: StreamKind FROM
nextSegment => [nextSegment: ThreePartNameSequence],
lastSegment => [lastSegment: ThreePartNameSequence]
ENDCASE
];

ListDomainsServedType: TYPE ~ PROC [h: CrRPC.Handle, domains: CrRPC.BulkDataSink, agent: Authenticator];
ListDomainsServed: ListDomainsServedType;

RetrieveMembersType: TYPE ~ PROC [h: CrRPC.Handle, pattern: CHNameP2V0.ThreePartName, property: CARD32, membership: CrRPC.BulkDataSink, agent: Authenticator] RETURNS [distinguishedObject: CHNameP2V0.ThreePartName];
RetrieveMembers: RetrieveMembersType;

LookupObjectType: TYPE ~ PROC [h: CrRPC.Handle, name: CHNameP2V0.ThreePartName, agent: Authenticator] RETURNS [distinguishedObject: CHNameP2V0.ThreePartName];
LookupObject: LookupObjectType;

StreamOfDomainName: TYPE ~ REF StreamOfDomainNameObject;
StreamOfDomainNameObject: TYPE ~ RECORD [
SELECT type: StreamKind FROM
nextSegment => [nextSegment: DomainNameSequence],
lastSegment => [lastSegment: DomainNameSequence]
ENDCASE
];

wildcard: READONLY ROPE;

CallErrorType: TYPE ~ ERROR [problem: CallProblem];
CallError: CallErrorType;

AddItemPropertyType: TYPE ~ PROC [h: CrRPC.Handle, name: CHNameP2V0.ThreePartName, newProperty: CARD32, value: Item, agent: Authenticator] RETURNS [distinguishedObject: CHNameP2V0.ThreePartName];
AddItemProperty: AddItemPropertyType;

StreamOfOrganization: TYPE ~ REF StreamOfOrganizationObject;
StreamOfOrganizationObject: TYPE ~ RECORD [
SELECT type: StreamKind FROM
nextSegment => [nextSegment: OrganizationSequence],
lastSegment => [lastSegment: OrganizationSequence]
ENDCASE
];

AddSelfType: TYPE ~ PROC [h: CrRPC.Handle, name: CHNameP2V0.ThreePartName, property: CARD32, agent: Authenticator] RETURNS [distinguishedObject: CHNameP2V0.ThreePartName];
AddSelf: AddSelfType;

NetworkAddress: TYPE ~ PACKED ARRAY [0..6) OF CARD16;

DeleteSelfType: TYPE ~ PROC [h: CrRPC.Handle, name: CHNameP2V0.ThreePartName, property: CARD32, agent: Authenticator] RETURNS [distinguishedObject: CHNameP2V0.ThreePartName];
DeleteSelf: DeleteSelfType;

Property: TYPE ~ CARD32;

Domain: TYPE ~ ROPE;

RetrieveItemType: TYPE ~ PROC [h: CrRPC.Handle, pattern: CHNameP2V0.ThreePartName, property: CARD32, agent: Authenticator] RETURNS [distinguishedObject: CHNameP2V0.ThreePartName, value: Item];
RetrieveItem: RetrieveItemType;

ListPropertiesType: TYPE ~ PROC [h: CrRPC.Handle, pattern: CHNameP2V0.ThreePartName, agent: Authenticator] RETURNS [distinguishedObject: CHNameP2V0.ThreePartName, properties: Properties];
ListProperties: ListPropertiesType;

Authenticator: TYPE ~ RECORD [
credentials: AuthenticationP14V2.Credentials,
verifier: AuthenticationP14V2.SeqWords];

ListAliasesType: TYPE ~ PROC [h: CrRPC.Handle, pattern: CHNameP2V0.ThreePartName, list: CrRPC.BulkDataSink, agent: Authenticator];
ListAliases: ListAliasesType;

ListObjectsType: TYPE ~ PROC [h: CrRPC.Handle, pattern: CHNameP2V0.ThreePartName, property: CARD32, list: CrRPC.BulkDataSink, agent: Authenticator];
ListObjects: ListObjectsType;

PropertyProblem: TYPE ~ MACHINE DEPENDENT { missing(20), wrongType(21)};

DomainName: TYPE ~ CHNameP2V0.TwoPartName;

StreamOfObject: TYPE ~ REF StreamOfObjectObject;
StreamOfObjectObject: TYPE ~ RECORD [
SELECT type: StreamKind FROM
nextSegment => [nextSegment: ObjectSequence],
lastSegment => [lastSegment: ObjectSequence]
ENDCASE
];

PropertyErrorType: TYPE ~ ERROR [problem: PropertyProblem, distinguishedObject: CHNameP2V0.ThreePartName];
PropertyError: PropertyErrorType;

AddMemberType: TYPE ~ PROC [h: CrRPC.Handle, name: CHNameP2V0.ThreePartName, property: CARD32, newMember: CHNameP2V0.ThreePartName, agent: Authenticator] RETURNS [distinguishedObject: CHNameP2V0.ThreePartName];
AddMember: AddMemberType;

ThreePartNameSequence: TYPE ~ REF ThreePartNameSequenceObject;
ThreePartNameSequenceObject: TYPE ~ MACHINE DEPENDENT RECORD [
body: PACKED SEQUENCE length: CARDINAL OF CHNameP2V0.ThreePartName
];

Properties: TYPE ~ REF PropertiesObject;
PropertiesObject: TYPE ~ MACHINE DEPENDENT RECORD [
body: PACKED SEQUENCE length: CARDINAL OF CARD32
];

all: CARD32 ~ 0;

Item: TYPE ~ REF ItemObject;
ItemObject: TYPE ~ MACHINE DEPENDENT RECORD [
body: PACKED SEQUENCE length: CARDINAL OF CARD16
];

ArgumentErrorType: TYPE ~ ERROR [problem: ArgumentProblem, which: WhichArgument];
ArgumentError: ArgumentErrorType;

AddGroupPropertyType: TYPE ~ PROC [h: CrRPC.Handle, name: CHNameP2V0.ThreePartName, newProperty: CARD32, membership: CrRPC.BulkDataSource, agent: Authenticator] RETURNS [distinguishedObject: CHNameP2V0.ThreePartName];
AddGroupProperty: AddGroupPropertyType;

nullProperty: CARD32 ~ 4294967295;

DeleteAliasType: TYPE ~ PROC [h: CrRPC.Handle, alias: CHNameP2V0.ThreePartName, agent: Authenticator] RETURNS [distinguishedObject: CHNameP2V0.ThreePartName];
DeleteAlias: DeleteAliasType;

ObjectSequence: TYPE ~ REF ObjectSequenceObject;
ObjectSequenceObject: TYPE ~ MACHINE DEPENDENT RECORD [
body: PACKED SEQUENCE length: CARDINAL OF ROPE
];

ArgumentProblem: TYPE ~ MACHINE DEPENDENT { illegalProperty(10), illegalOrganizationName(11), illegalDomainName(12), illegalObjectName(13), noSuchOrganization(14), noSuchDomain(15), noSuchObject(16)};

UpdateProblem: TYPE ~ MACHINE DEPENDENT { noChange(30), outOfDate(31), objectOverflow(32), databaseOverflow(33)};

WrongServerType: TYPE ~ ERROR [hint: CHNameP2V0.ThreePartName];
WrongServer: WrongServerType;

WhichArgument: TYPE ~ MACHINE DEPENDENT { first(1), second(2)};

NetworkAddressList: TYPE ~ REF NetworkAddressListObject;
NetworkAddressListObject: TYPE ~ MACHINE DEPENDENT RECORD [
body: PACKED SEQUENCE length: CARDINAL OF NetworkAddress
];

Organization: TYPE ~ ROPE;

ChangeItemType: TYPE ~ PROC [h: CrRPC.Handle, name: CHNameP2V0.ThreePartName, property: CARD32, newValue: Item, agent: Authenticator] RETURNS [distinguishedObject: CHNameP2V0.ThreePartName];
ChangeItem: ChangeItemType;

OrganizationNamePattern: TYPE ~ ROPE;

StreamOfDomain: TYPE ~ REF StreamOfDomainObject;
StreamOfDomainObject: TYPE ~ RECORD [
SELECT type: StreamKind FROM
nextSegment => [nextSegment: DomainSequence],
lastSegment => [lastSegment: DomainSequence]
ENDCASE
];

DeleteMemberType: TYPE ~ PROC [h: CrRPC.Handle, name: CHNameP2V0.ThreePartName, property: CARD32, member: CHNameP2V0.ThreePartName, agent: Authenticator] RETURNS [distinguishedObject: CHNameP2V0.ThreePartName];
DeleteMember: DeleteMemberType;

ObjectNamePattern: TYPE ~ CHNameP2V0.ThreePartName;

Name: TYPE ~ CHNameP2V0.ThreePartName;

ListOrganizationsType: TYPE ~ PROC [h: CrRPC.Handle, pattern: ROPE, list: CrRPC.BulkDataSink, agent: Authenticator];
ListOrganizations: ListOrganizationsType;

AuthenticationErrorType: TYPE ~ ERROR [problem: AuthenticationP14V2.Problem];
AuthenticationError: AuthenticationErrorType;

DeleteObjectType: TYPE ~ PROC [h: CrRPC.Handle, name: CHNameP2V0.ThreePartName, agent: Authenticator];
DeleteObject: DeleteObjectType;

StreamOfObjectName: TYPE ~ REF StreamOfObjectNameObject;
StreamOfObjectNameObject: TYPE ~ RECORD [
SELECT type: StreamKind FROM
nextSegment => [nextSegment: ObjectNameSequence],
lastSegment => [lastSegment: ObjectNameSequence]
ENDCASE
];

ListAliasesOfType: TYPE ~ PROC [h: CrRPC.Handle, pattern: CHNameP2V0.ThreePartName, list: CrRPC.BulkDataSink, agent: Authenticator] RETURNS [distinguishedObject: CHNameP2V0.ThreePartName];
ListAliasesOf: ListAliasesOfType;

OrganizationSequence: TYPE ~ REF OrganizationSequenceObject;
OrganizationSequenceObject: TYPE ~ MACHINE DEPENDENT RECORD [
body: PACKED SEQUENCE length: CARDINAL OF ROPE
];

DomainNamePattern: TYPE ~ CHNameP2V0.TwoPartName;

CallProblem: TYPE ~ MACHINE DEPENDENT { accessRightsInsufficient(1), tooBusy(2), serverDown(3), useCourier(4), other(5)};

}...

Ð
CHOpsP2V3.Mesa
Copyright Ó 1989, 1991 by Xerox Corporation.  All rights reserved.
Generated by Willie-sue.pa at February 13, 1989 2:49:32 pm PST
using Sirocco [2.0] of February 10, 1989 6:26:26 pm PST
�Ê
Z•NewlineDelimiter

–
(cedarcode) style™š
œ™Jšœ	Ïeœ6™BJš
œ>™>Jš
œ7™7Icode˜—š
Ïk	˜	K˜K˜K˜K˜
K˜—K˜šÏn	œžœ
žœ˜ K˜Kšžœžœžœ
˜K˜K˜Kšœžœžœlžœ1˜À
KšŸœ˜—˜Kšœžœžœ˜0š	œžœžœ
ž	œ
žœ˜7Kš
œžœ
žœ	žœ
žœ
ž˜.K˜——˜Kšœžœžœ
˜—˜Kšœžœžœ˜8š	œžœžœ
ž	œ
žœ˜;Kš	œžœ
žœ	žœ
žœ˜BK˜——˜Kšœžœžœžœ˜[KšŸœ˜)—˜Kšœžœžœ
˜—˜Kš	œžœžœ=žœžœ1˜²
KšŸœ˜#—˜Kšœžœžœd˜€
KšŸœ˜—˜Kšœ
žœ˜+—˜Kšœžœžœ˜8š	œžœžœ
ž	œ
žœ˜;Kš	œžœ
žœ	žœ
žœ˜@K˜——˜Kšœžœ˜/—˜Kš
œžœžœAžœžœ8žœžœ1˜þ
KšŸœ˜—˜Kšœžœžœ!žœG˜Œ
KšŸœ˜—˜Kšœžœ˜,—˜KšœžœžœI˜fKšŸœ˜—˜Kšœžœžœ
ž	œ#˜G—˜Kšœžœžœ˜>šœžœžœ˜,šžœž˜K˜4K˜3Kš
ž˜—K˜——˜KšœžœžœF˜hKšŸœ˜)—˜Kš	œžœžœ@žœ8žœ1˜Ö
KšŸœ˜%—˜KšœžœžœIžœ1˜ž
KšŸœ˜—˜Kšœžœžœ˜8šœžœžœ˜)šžœž˜K˜1K˜0Kš
ž˜—K˜——˜Kšœ
žœ
žœ
˜—˜Kšœžœžœ˜3KšŸ	œ˜—˜Kš	œžœžœ@žœ%žœ1˜Ã
KšŸœ˜%—˜Kšœžœžœ˜<šœžœžœ˜+šžœž˜K˜3K˜2Kš
ž˜—K˜——˜Kš	œ
žœžœ=žœžœ1˜«
KšŸœ˜—˜Kšœžœžœ
žœžœ
žœ
˜5—˜Kš	œžœžœ=žœžœ1˜®
KšŸ
œ˜—˜Kšœ
žœžœ
˜—˜Kšœžœžœ
˜—˜Kš	œžœžœ@žœžœ>˜À
KšŸœ˜—˜KšœžœžœLžœI˜»
KšŸœ˜#—˜šœžœžœ˜K˜-K˜(——˜Kšœžœžœf˜‚
KšŸœ˜—˜Kšœžœžœ@žœ2˜”
KšŸœ˜—˜Kšœžœžœ
ž	œ˜H—˜Kšœžœ˜*—˜Kšœžœžœ˜0šœžœžœ˜%šžœž˜K˜-K˜,Kš
ž˜—K˜——˜KšœžœžœK˜jKšŸ
œ˜!—˜Kš	œžœžœ=žœ=žœ1˜Ò
KšŸ	œ˜—˜Kšœžœžœ˜>š	œžœžœ
ž	œ
žœ˜>Kš	œžœ
žœ	žœ
žœ˜BK˜——˜Kšœžœžœ˜(š	œžœžœ
ž	œ
žœ˜3Kš
œžœ
žœ	žœ
žœ
ž˜0K˜——˜Kšœžœ˜—˜Kšœžœžœ˜š	œžœžœ
ž	œ
žœ˜-Kš
œžœ
žœ	žœ
žœ
ž˜0K˜——˜Kšœžœžœ2˜QKšŸ
œ˜!—˜Kš	œžœžœ@žœ:žœ1˜Ù
KšŸœ˜'—˜Kšœžœ˜"—˜KšœžœžœJžœ1˜ž
KšŸœ˜—˜Kšœžœžœ˜0š	œžœžœ
ž	œ
žœ˜7Kš
œžœ
žœ	žœ
žœ
ž˜.K˜——˜Kšœžœžœ
ž	œŸ
˜È
—˜Kšœžœžœ
ž	œJ˜q—˜Kšœžœžœ"˜?KšŸœ˜—˜Kšœžœžœ
ž	œ˜?—˜Kšœžœžœ˜8š	œžœžœ
ž	œ
žœ˜;Kš	œžœ
žœ	žœ
žœ˜8K˜——˜Kšœžœžœ
˜—˜Kš	œžœžœ=žœ(žœ1˜¾
KšŸ
œ˜—˜Kšœžœžœ
˜%—˜Kšœžœžœ˜0šœžœžœ˜%šžœž˜K˜-K˜,Kš
ž˜—K˜——˜Kš	œžœžœ=žœ:žœ1˜Ò
KšŸœ˜—˜Kšœžœ˜3—˜Kšœžœ˜&—˜Kšœžœžœžœ2˜tKšŸœ˜)—˜Kšœžœžœ(˜MKšŸœ˜-—˜KšœžœžœI˜fKšŸœ˜—˜Kšœžœžœ˜8šœžœžœ˜)šžœž˜K˜1K˜0Kš
ž˜—K˜——˜Kšœžœžœfžœ1˜¼
KšŸ
œ˜!—˜Kšœžœžœ˜<š	œžœžœ
ž	œ
žœ˜=Kš
œžœ
žœ	žœ
žœ
ž˜.K˜——˜Kšœžœ˜1—˜Kšœ
žœžœ
ž	œT˜y—K˜K˜K˜—…—':2d