beautypg.com

Apple AppleShare 3.0 File Server Controls User Manual

Page 76

background image

TYPE

ServerEventRecordPtr = ^ServerEventRecord;

ServerEventRecord =

RECORD

theEventNumber: LongInt;

{the server event that's occuring; see the }

{ SEeventFlag definitions above}

theServerTime: LongInt;

{ the server time (in Macintosh DateTime form)}

theResult: Integer;

{the result of the operation }

{ if theEventNumber = bCSEHAFPInSendResponse: }

{ the AFP Error code to be returned }

{ if theEventNumber = bCSEHServerControlCall: }

{ the result of the server control call }

{ if theEventNumber = bCSEHShare, }

{ bCSEHUnShare, or bCSEHSetDirAccess: }

{ the result of the HFS call }

{ if theEventNumber = bCSEHServerNameChange: }

{ the result of a PRegisterName call, }

{ SECantRegNameErr, or SEDupNameErr }

{ if theEventNumber = bCSEHVolumeUnmount: }

{ noErr or fBsyErr (if volume is being used }

{ by a remote user) }

{ all other values of theEventNumber return noErr}

theBufSize: Integer;

{the number of bytes used in theBuffer}

theBuffer: PACKED ARRAY[1..BufferMax] OF Byte;

{ if theEventNumber = bCSEHAFPInDoRequest or }