-- File: AltoSlaStrings.mesa Edit: HGM June 10, 1979 8:46 PM

-- Copyright Xerox Corporation 1979, 1980

DIRECTORY
StatsDefs: FROM "StatsDefs" USING [StatsStringToIndex],
AltoSlaDefs: FROM "AltoSlaDefs";

AltoSlaStrings: MONITOR
IMPORTS StatsDefs, AltoSlaDefs
EXPORTS AltoSl
aDefs =
BEGIN
OPEN StatsDefs, AltoSlaDefs;

SetupSlaThings: PUBLIC PROCEDURE =
BEGIN

statSlaPacketsSent ← StatsStringToIndex["SLA Packets Sent"];
statSlaWordsSent ← StatsStringToIndex["SLA Words Sent"];

statSlaPacketsRecv ← StatsStringToIndex["SLA Packets Received"];
statSlaWordsRecv ← StatsStringToIndex["SLA Words Received"];

statSlaRoutingPacketsSent ← StatsStringToIndex["SLA Routing Packets Sent"];
statSlaRoutingPacketsReceived ← StatsStringToIndex["SLA Routing Packets Received"];

statSlaEmptyFreeQueue ← StatsStringToIndex["SLA Packets recycled - freeQueue empty"];
statSlaROR ← StatsStringToIndex["SLA Reciever Overrun"];
statSlaCRCError ← StatsStringToIndex["SLA CRC Errors"];
statSlaSyncError ← StatsStringToIndex["SLA Sync Errors"];
statSlaControlError ← StatsStringToIndex["SLA Control Errors"];

statSlaNoRoute ← StatsStringToIndex["SLA Packets discarded - no route to host"];
statSlaQueueFull ← StatsStringToIndex["SLA Packets discarded - output queue full"];
statSlaConnectionLimit ← StatsStringToIndex["SLA Packets discarded - connection limit"];

statSlaPacketsStuck ← StatsStringToIndex["SLA Packets stuck"];
statSlaLineTimeout ← StatsStringToIndex["SLA Lines timed out"];
statSlaLineDied ← StatsStringToIndex["SLA Lines Died"];
statSlaFCT ← StatsStringToIndex["SLA Transmitter Overrun"];

END;

END. -- AltoSlaStrings