AdobeP75V2.Mesa
Copyright Ó 1989, 1992 by Xerox Corporation. All rights reserved.
Generated by BJackson.pa at March 27, 1990 2:04:03 pm PST
using Sirocco [2.0] of February 10, 1989 6:26:26 pm PST
Philip James, March 20, 1991 9:05 am PST
Christian Jacobi, April 7, 1992 4:49 pm PDT
DIRECTORY
CrRPC,
TimeP15V2,
CHNameP2V0,
BasicTime,
BulkDataP0V1,
Rope;
AdobeP75V2:
CEDAR
DEFINITIONS ~ {
ROPE: TYPE ~ Rope.ROPE;
DatabaseSequence: TYPE ~ REF DatabaseSequenceObject;
DatabaseSequenceObject:
TYPE ~
MACHINE
DEPENDENT
RECORD [
body: PACKED SEQUENCE length: CARDINAL OF ROPE
];
CourierTimedOutType: TYPE ~ ERROR [];
CourierTimedOut: CourierTimedOutType;
ChangeFieldListType: TYPE ~ PROC [h: CrRPC.Handle, instance: StaticTarget, changes: ChangeList];
ChangeFieldList: ChangeFieldListType;
SetOfARs: TYPE ~ REF SetOfARsObject;
SetOfARsObject:
TYPE ~
MACHINE
DEPENDENT
RECORD [
body: PACKED SEQUENCE len: CARDINAL OF RunOfARs
];
VerifyVersionType: TYPE ~ PROC [h: CrRPC.Handle, instance: StaticTarget] RETURNS [ok: BOOLEAN];
VerifyVersion: VerifyVersionType;
QueryList: TYPE ~ REF QueryListBody;
QueryListBody:
TYPE ~
MACHINE
DEPENDENT
RECORD [
name: Rope.ROPE, list: SetOfARs];
body: PACKED SEQUENCE length: CARDINAL OF QueryItem
];
XNSQueryList: TYPE ~ REF XNSQueryListBody;
XNSQueryListBody:
TYPE ~
MACHINE
DEPENDENT
RECORD [
body: PACKED SEQUENCE length: CARDINAL OF QueryItem];
GetVersionType: TYPE ~ PROC [h: CrRPC.Handle, target: Target] RETURNS [version: CARD32 ¬ 0];
GetVersion: GetVersionType;
ARVersion: TYPE ~ CARD32;
TaggedItem:
TYPE ~
RECORD [
tag: ROPE ¬ NIL,
item: CARD16 ¬ 0];
PutSubmitNumberType: TYPE ~ PROC [h: CrRPC.Handle, target: Target, submitNumber: CARD32];
PutSubmitNumber: PutSubmitNumberType;
TimeField:
TYPE ~
RECORD [
name: ROPE,
tools: ToolData,
time: EmptyRecord];
ARField:
TYPE ~
RECORD [
name: ROPE,
tools: ToolData,
ar: EmptyRecord];
BoundedField:
TYPE ~
RECORD [
name: ROPE,
tools: ToolData,
bounded: CARD16];
ToolData: TYPE ~ ARRAY ToolType OF DefaultInfoHandle ¬ ALL[NIL];
FieldItemValue: TYPE ~ REF FieldItemValueRec;
FieldItemValueRec:
TYPE ~
RECORD [
body:
SELECT type: FieldType
FROM
arId => [ar: CARDINAL],
dateTime => [time: BasicTime.GMT],
numeric => [number: CARDINAL],
fixedLengthString => [string: ROPE, maxLength: CARDINAL ¬ 0],
enumerated => [enumVal: CARDINAL],
ENDCASE];
FieldItemObject: TYPE ~ REF FieldItemObjectRec;
FieldItemObjectRec:
TYPE ~
RECORD [
name: Rope.ROPE ¬ NIL,
tmp: Rope.ROPE ¬ NIL,
defaultInfo: ToolData,
body:
SELECT type: FieldType
FROM
arId => NULL,
dateTime => NULL,
numeric => NULL,
fixedLengthString => [maxLength: CARDINAL ¬ 0],
enumerated => [
field: DependsOnIndex ¬ LAST[CARD16],
possibilities: KeyedPossibilities ¬ NIL],
string => NULL,
ENDCASE
];
StartOrStop: TYPE ~ MACHINE DEPENDENT { start(0), stop(1)};
TooManyConnectionsType: TYPE ~ ERROR [];
TooManyConnections: TooManyConnectionsType;
AcceleratorInfo: TYPE = REF AcceleratorInfoRec ¬ NIL;
AcceleratorInfoRec:
TYPE =
RECORD [
body: SEQUENCE len: CARDINAL OF FieldData];
FieldData: TYPE = REF FieldDataRec ¬ NIL;
FieldDataRec:
TYPE =
RECORD [
body: SEQUENCE len: CARDINAL OF Rope.ROPE];
GetAcceleratorInfoType: TYPE ~ PROC [h: CrRPC.Handle, instance: StaticTarget, arSet: SetOfARs, fieldList: FieldList, to: CrRPC.BulkDataSink];
GetAcceleratorInfo: GetAcceleratorInfoType;
SystemAlreadyExistsType: TYPE ~ ERROR [];
SystemAlreadyExists: SystemAlreadyExistsType;
FieldItemQueryValue:
TYPE ~
RECORD [
relationalOp: Relation,
value: FieldItemValue];
ChangeItemValue: TYPE ~ REF ChangeItemValueObject;
ChangeItemValueObject:
TYPE ~
RECORD [
SELECT type: ChangeType
FROM
add, modify => [newFlItem: FieldItemObject],
remove => NULL,
ENDCASE
];
ChangeType: TYPE ~ MACHINE DEPENDENT { modify(0), add(1), remove(2)};
BoundedString:
TYPE ~
RECORD [
string: ROPE,
max: CARD16];
Problem: TYPE ~ MACHINE DEPENDENT { communicationError(0), unknownSystem(1), cantDetermineLocOfARs(2), illegalLogin(3), systemAlreadyExists(4), fileNotFound(5), serverUnreachable(6), serverDown(7), noAdobeServiceAtServer(8), courierTimedOut(9), parameterInconsistency(10), obsoleteVersion(11), systemNotRegistered(12), sysDescChanging(13), others(14), tooManyConnections(15), spare1(16), spare2(17), xxx(31)};
IllegalLoginType: TYPE ~ ERROR [];
IllegalLogin: IllegalLoginType;
EnumeratedField:
TYPE ~
RECORD [
name: ROPE,
tools: ToolData,
field: CARD16,
possibilities: KeyedPossibilities];
DefaultInfoHandle: TYPE ~ REF DefaultInfoObject ¬ NIL;
DefaultInfoObject:
TYPE ~
RECORD [
default: ROPE ¬ NIL,
tmp: ROPE ¬ NIL,
systemMust: BOOLEAN ¬ FALSE,
place: Coordinate,
width: CARD16 ¬ 0];
UpdateAcceleratorsType: TYPE ~ PROC [h: CrRPC.Handle, target: Target, arSet: SetOfARs];
UpdateAccelerators: UpdateAcceleratorsType;
NumericField:
TYPE ~
RECORD [
name: ROPE,
tools: ToolData,
numeric: EmptyRecord];
XxxType: TYPE ~ ERROR [];
Xxx: XxxType;
PutSystemDefaultUserFileType: TYPE ~ PROC [h: CrRPC.Handle, target: Target, from: CrRPC.BulkDataSource];
PutSystemDefaultUserFile: PutSystemDefaultUserFileType;
ToolType: TYPE ~ MACHINE DEPENDENT { edit(0), submit(1), report(2), query(3), sort(4), queryList(5)};
AboutToStoreType: TYPE ~ PROC [h: CrRPC.Handle, instance: StaticTarget, arNumber: CARD32];
AboutToStore: AboutToStoreType;
Coordinate:
TYPE ~
RECORD [
ord: INT16 ¬ 0,
co: INT16 ¬ 0];
DependsOnIndex: TYPE ~ CARD16;
Relation: TYPE ~ MACHINE DEPENDENT { equal(0), notEqual(1), lessThan(2), lessThanOrEqual(3), greaterThan(4), greaterThanOrEqual(5), in(6), notIn(7)};
ErrorType: TYPE ~ ERROR [why: Problem];
Error: ErrorType;
Description:
TYPE ~
RECORD [
name: ROPE,
host: ROPE,
directory: ROPE,
refCount: CARD16,
version: CARD32,
fieldList: FieldList];
SubmitFailedType: TYPE ~ PROC [h: CrRPC.Handle, target: Target, arNumber: CARD32, version: CARD32];
SubmitFailed: SubmitFailedType;
FieldList: TYPE ~ REF FieldListArray;
FieldListArray:
TYPE ~
MACHINE
DEPENDENT
RECORD [
flSeq: PACKED SEQUENCE length: CARDINAL OF FieldItemObject
];
ChangeList: TYPE ~ REF Changes;
Changes:
TYPE ~
MACHINE
DEPENDENT
RECORD [
seq: PACKED SEQUENCE length: CARDINAL OF ChangeItem
];
ServerDownType: TYPE ~ ERROR [];
ServerDown: ServerDownType;
PutSystemDescriptionType: TYPE ~ PROC [h: CrRPC.Handle, target: Target, description: Description];
PutSystemDescription: PutSystemDescriptionType;
ServerUnreachableType: TYPE ~ ERROR [];
ServerUnreachable: ServerUnreachableType;
ParameterInconsistencyType: TYPE ~ ERROR [];
ParameterInconsistency: ParameterInconsistencyType;
EmptyRecord: TYPE ~ RECORD [null: CARDINAL ¬ 0];
SystemNotRegisteredType: TYPE ~ ERROR [];
SystemNotRegistered: SystemNotRegisteredType;
ReadLastARNumberType: TYPE ~ PROC [h: CrRPC.Handle, target: Target] RETURNS [lastAR: CARD32 ¬ 0];
ReadLastARNumber: ReadLastARNumberType;
StaticTarget:
TYPE ~
RECORD [
target: Target,
version: CARD32];
nullTime: CARD32 ~ 2114294400;
GetResidentSystemsType: TYPE ~ PROC [h: CrRPC.Handle] RETURNS [systems: DatabaseSequence ¬ NIL];
GetResidentSystems: GetResidentSystemsType;
GetSystemDefaultUserFileType: TYPE ~ PROC [h: CrRPC.Handle, target: Target, to: CrRPC.BulkDataSink];
GetSystemDefaultUserFile: GetSystemDefaultUserFileType;
GetStartOrStopTimeType: TYPE ~ PROC [h: CrRPC.Handle, target: Target, which: StartOrStop] RETURNS [startOrStopTime: CARD32 ¬ 0];
GetStartOrStopTime: GetStartOrStopTimeType;
CompletedUpdateType: TYPE ~ PROC [h: CrRPC.Handle, target: Target, arNumber: CARD32];
CompletedUpdate: CompletedUpdateType;
GetNextSubmitNumberType: TYPE ~ PROC [h: CrRPC.Handle, target: Target] RETURNS [submitNumber: CARD32 ¬ 0];
GetNextSubmitNumber: GetNextSubmitNumberType;
FileNotFoundType: TYPE ~ ERROR [];
FileNotFound: FileNotFoundType;
NoAdobeServiceAtServerType: TYPE ~ ERROR [];
NoAdobeServiceAtServer: NoAdobeServiceAtServerType;
StringField:
TYPE ~
RECORD [
name: ROPE,
tools: ToolData,
string: EmptyRecord];
KeyedPossibilities: TYPE ~ REF KeyedPossibilitiesSeq;
KeyedPossibilitiesSeq:
TYPE ~
MACHINE
DEPENDENT
RECORD [
seq: PACKED SEQUENCE length: CARDINAL OF Possibilities
];
RunOfARs:
TYPE ~
RECORD [
startValue: CARD32,
runLength: CARD32];
ChangeLocationOfARsType: TYPE ~ PROC [h: CrRPC.Handle, target: Target, newLocation: LocationTarget];
ChangeLocationOfARs: ChangeLocationOfARsType;
LocationTarget:
TYPE ~
RECORD [
host: ROPE,
directory: ROPE];
GetLocationOfARsType: TYPE ~ PROC [h: CrRPC.Handle, target: Target] RETURNS [referenceToARs: NSName ¬ NIL];
GetLocationOfARs: GetLocationOfARsType;
CommunicationErrorType: TYPE ~ ERROR [];
CommunicationError: CommunicationErrorType;
EnumeratedSequence: TYPE ~ REF EnumeratedSequenceType;
EnumeratedSequenceType:
TYPE ~
MACHINE
DEPENDENT
RECORD [
seq: PACKED SEQUENCE length: CARDINAL OF TaggedItem
];
QueryItem:
TYPE ~
RECORD [
name: ROPE,
value: FieldItemQueryValue];
Spare2Type: TYPE ~ ERROR [];
Spare2: Spare2Type;
MakeAcceleratorFileForFieldType: TYPE ~ PROC [h: CrRPC.Handle, target: Target, fieldName: ROPE, fieldList: FieldList];
MakeAcceleratorFileForField: MakeAcceleratorFileForFieldType;
ChangeItem:
TYPE ~
RECORD [
oldFieldName: ROPE,
newItem: ChangeItemValue];
Spare1Type: TYPE ~ ERROR [];
Spare1: Spare1Type;
ServerName: TYPE ~ CHNameP2V0.ThreePartName;
GetSystemDescriptionType: TYPE ~ PROC [h: CrRPC.Handle, target: Target] RETURNS [description: Description];
GetSystemDescription: GetSystemDescriptionType;
Possibilities:
TYPE ~
RECORD [
keyedDependency: CARD16 ¬ 0,
enumRecs: EnumeratedSequence];
Target:
TYPE ~
RECORD [
system: ROPE];
SysDescChangingType: TYPE ~ ERROR [];
SysDescChanging: SysDescChangingType;
SubmitNumber: TYPE ~ CARD32;
LookupARsType: TYPE ~ PROC [h: CrRPC.Handle, instance: StaticTarget, query: QueryItem, boundSet: SetOfARs] RETURNS [arSet: SetOfARs ¬ NIL];
LookupARs: LookupARsType;
UnknownSystemType: TYPE ~ ERROR [];
UnknownSystem: UnknownSystemType;
ObsoleteVersionType: TYPE ~ ERROR [];
ObsoleteVersion: ObsoleteVersionType;
FieldType: TYPE ~ MACHINE DEPENDENT { arId(0), dateTime(1), numeric(2), fixedLengthString(3), enumerated(4), string(5)};
UpdateAcceleratorFieldType: TYPE ~ PROC [h: CrRPC.Handle, instance: StaticTarget, arNumber: CARD32, field: FieldItemValue, fieldName: ROPE];
UpdateAcceleratorField: UpdateAcceleratorFieldType;
CantDetermineLocOfARsType: TYPE ~ ERROR [];
CantDetermineLocOfARs: CantDetermineLocOfARsType;
OthersType: TYPE ~ ERROR [];
Others: OthersType;
NSName: TYPE ~ REF NSNameObject;
NSNameObject:
TYPE ~
MACHINE
DEPENDENT
RECORD [
local, domain, org: Rope.ROPE ¬ NIL
];
Reference: TYPE ~ REF ReferenceObject;
ReferenceObject:
TYPE ~
MACHINE
DEPENDENT
RECORD [
body: PACKED SEQUENCE length: CARDINAL OF CARD16
];
PutStartOrStopTimeType: TYPE ~ PROC [h: CrRPC.Handle, target: Target, which: StartOrStop, startOrStopTime: CARD32];
PutStartOrStopTime: PutStartOrStopTimeType;
}...