ComputeServerStatistics.mesa
Copyright © 1985 by Xerox Corporation. All rights reserved.
Bob Hagmann April 24, 1986 1:09:44 pm PST
This interface consists solely of procedures and variables that provide statistics on the historical state and behavior of the Compute Server "server". This is an 'on server' interface, not an RPC interface.
DIRECTORY
BasicTime,
Rope;
ComputeServerStatistics: CEDAR DEFINITIONS
= BEGIN
Server Statistics Since Last Enable
TimeUpThisIncarnation: INT;
The time in seconds elasped since the last time the server was turned on. Zero when is the server is off.
RequestesThisIncarnation: INT;
The total number of requests since this machine started being a server.
TimeBusyThisIncarnation: INT;
Sum of time that any request was active.
Server Statistics Totals
TotalTimeUp: INT;
TotalRequestes: INT;
TotalTimeBusy: INT;
Event Notification
ServerEventType: TYPE = {startService, doneService, serverEnabled, serverDisabled};
ServerEvent: TYPE = RECORD [
type: ServerEventType, -- type of event
the next five fields only have meaning for startService and doneService
command: Rope.ROPE, -- command name started
startTime: BasicTime.GMT, -- command start time
endTime: BasicTime.GMT, -- command end time (meaningful for done events only)
remoteMachineName: Rope.ROPE, -- name of user's machine
remoteUser: Rope.ROPE, -- name of user
chain: REF ServerEvent -- used internally to chain events together
];
NextServerEvent: PROC [REF READONLY ServerEvent ← NIL]
RETURNS [REF READONLY ServerEvent];
Server events are the start or finish of a request. NextServerEvent returns the next event that occurs after the event passed as an argument. An argument of NIL returns the next event that occurs after the call. NextServerEvent will WAIT if another event has not occurred yet.
END.
Bob Hagmann April 24, 1986 1:09:44 pm PST
changes to: ServerEvent