-- Copyright (C) 1984  by Xerox Corporation. All rights reserved. 
-- PupBootServerStrings.mesa, HGM, 25-Sep-84 20:14:24

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

PupBootServerStrings: PROGRAM IMPORTS Stats, BootServerDefs =
  BEGIN

  SetupBootServerThings: PUBLIC PROCEDURE =
    BEGIN OPEN BootServerDefs, Stats;
    statBootNew ← StatsStringToIndex["New Boot files retrieved"];
    statLife ← StatsStringToIndex["Breath of Life packets sent"];
    statBootDir ← StatsStringToIndex["Boot directory requests"];
    statFile ← StatsStringToIndex["Boot file requests"];
    statSun ← StatsStringToIndex["SUN 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.