ComputeControllerInternal.mesa
The internal controller interface for the Summoner. This interface resides on the controller, is internal to the Summoner, and is not an RPC interface.
Last Edited by: Bob Hagmann, May 9, 1986 8:03:44 am PDT
Hal Murray, March 22, 1986 9:16:32 pm PST
Copyright © 1984 by Xerox Corporation. All rights reserved.
DIRECTORY
BasicTime,
Commander,
ComputeServerClient,
ComputeServerCallbacksRpcControl,
ComputeServerControllerRpcControl,
ComputeServer,
ComputeServerServer,
InterpreterToolPrivate,
IO,
PrincOps,
Rope,
RPC,
RuntimeError,
SymTab;
ComputeControllerInternal: CEDAR DEFINITIONS =
BEGIN
ROPE: TYPE = Rope.ROPE;
STREAM: TYPE = IO.STREAM;
ServerStatusRecord: TYPE = RECORD [
serverMachineName: RPC.ShortROPE,
serverMachinePupAddress: RPC.ShortROPE,
newPackage: BOOL ← FALSE,
newQueueing: BOOL ← TRUE,
FOM: REAL ← 0.0,
timeOfStatus: BasicTime.GMT,
machineType: PrincOps.MachineType,
mainMemory: CARDINAL,
numberCPUs: CARDINAL,
diskPartionSize: INT,
freePagesOnDisk: INT,
freeboard: INT,
freeGFI: CARDINAL,
freeMDS: CARDINAL,
freeVM: CARDINAL,
oldestLRUFileDate: BasicTime.GMT,
CPULoad: REAL,
nonBackgroundCPULoad: REAL,
reclamationRate: REAL,
freeProcesses: CARDINAL,
userName: RPC.ShortROPE,
currentRequests: LIST OF ComputeServer.Request,
numberOfCurrentRequests: INT ← 0,
aveBackgroundLoad: REAL ← 0
];
ServerStatus: TYPE = REF ServerStatusRecord;
ServerStatusList: LIST OF ServerStatus;
IAmTheController: BOOL;
ControllerMovingAway: BOOL;
TimeIBecameTheController: BasicTime.GMT;
GrabController: BOOL;
END.