-- File: PupBootServerStrings.mesa,  Last Edit: HGM  November 13, 1980  5:08 AM

DIRECTORY
  StatsDefs USING [StatsStringToIndex],
  BootServerDefs USING [
    statLife, statBootNew, statBootDir, statFile, statFileSent, statFileSentSlow,
    statFileTroubles, statFileNeverStarted, statBusyDisk, statBusyBooting,
    statMicrocodeBooted, statUnknown];

PupBootServerStrings: PROGRAM IMPORTS StatsDefs, BootServerDefs =
  BEGIN

  SetupBootServerThings: PUBLIC PROCEDURE =
    BEGIN OPEN BootServerDefs, StatsDefs;
    statBootNew ← StatsStringToIndex["New Boot files retrieved"];
    statLife ← StatsDefs.StatsStringToIndex["Breath of Life packets sent"];
    statBootDir ← StatsStringToIndex["Boot directory requests"];
    statFile ← StatsStringToIndex["Boot file requests"];
    statFileSent ← StatsStringToIndex["Boot files sent"];
    statFileSentSlow ← StatsStringToIndex["Boot files sent slowly"];
    statFileTroubles ← StatsStringToIndex["Boot server troubles"];
    statFileNeverStarted ← StatsStringToIndex["Boot requests rejected by Bootee"];
    statBusyDisk ← StatsStringToIndex["Boot file requests while Disk Busy"];
    statBusyBooting ← StatsStringToIndex[
      "Boot file requests while already Booting"];
    statMicrocodeBooted ← StatsStringToIndex["Microcode Boots"];
    statUnknown ← StatsStringToIndex["Boot file requests for unknown file"];
    END;

  SetupBootServerThings[];
  END.