-- Copyright (C) 1983 by Xerox Corporation. All rights reserved. -- NameServerStrings.mesa, HGM, 23-Sep-83 3:52:40 DIRECTORY Stats USING [StatCounterIndex, StatsStringToIndex], NameServerDefs USING [ statName, statAddress, statXlation, statConst, statBusy, statHits, statMisses, statNone, statFile, statVers, statSend, statMsScanningFile]; NameServerStrings: PROGRAM IMPORTS Stats, NameServerDefs = BEGIN OPEN Stats, NameServerDefs; SetupNameServerThings: PROCEDURE = BEGIN statVers ← StatsStringToIndex["Directory Version requests"]; statSend ← StatsStringToIndex["Directories sent"]; statName ← StatsStringToIndex["Name Lookup requests"]; statAddress ← StatsStringToIndex["Address Lookup 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.