-- File: AltoSlaStrings.mesa Edit: HGM  September 23, 1980  9:03 PM

DIRECTORY
  StatsDefs USING [StatsStringToIndex],
  AltoSlaDefs;

AltoSlaStrings: MONITOR IMPORTS StatsDefs, AltoSlaDefs EXPORTS AltoSlaDefs =
  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