-- File: NameServerStrings.mesa,  Last Edit: HGM March 12, 1981  10:54 PM

DIRECTORY
  StatsDefs USING [StatCounterIndex, StatsStringToIndex],
  NameServerDefs USING [
    statName, statAddress, statWhoAmI, statXlation,
    statConst, statBusy, statHits, statMisses,
    statNone, statFile, statVers, statSend, statMsScanningFile];

NameServerStrings: PROGRAM IMPORTS StatsDefs, NameServerDefs =
  BEGIN OPEN StatsDefs, NameServerDefs;

  SetupNameServerThings: PROCEDURE =
    BEGIN
    statVers _ StatsStringToIndex["Directory Version requests"];
    statSend _ StatsStringToIndex["Directories sent"];
    statName _ StatsStringToIndex["Name Lookup requests"];
    statAddress _ StatsStringToIndex["Address Lookup requests"];
    statWhoAmI _ StatsStringToIndex["Who Am I requests"];
    statXlation _ StatsStringToIndex["48 to 8 address translation requests"];
    statConst _ StatsStringToIndex["Name Lookup constants"];
    statBusy _ StatsStringToIndex[
      "Requests while Name/Address Lookup server was Busy"];
    statHits _ StatsStringToIndex["Hits in Name Lookup cache"];
    statMisses _ StatsStringToIndex["Misses found in Name Lookup cache"];
    statNone _ StatsStringToIndex["Name Lookup cache misses"];
    statFile _ StatsStringToIndex["Name Lookup file searches"];
    statMsScanningFile _ StatsStringToIndex["MiliSeconds spent scanning Name Lookup file"];
    END;


  -- initialization

  SetupNameServerThings[];
  END.