userapps/opensource/net-snmp/perl/AnyData_SNMP/configs/scli

   1 # scli equivelents
   2 alias scli_system_info {
   3     printf "Name:              %s\n" sysName.0
   4     #XXX fix:
   5     printf "Address:           localhost:161\n";
   6     printf "Contact:           %s\n" sysContact.0
   7     printf "Location:          %s\n" sysLocation.0
   8     printf "Vendor:            %s\n" sysObjectID.0
   9     #printf "Current Time:      %s\n"  hrSystemDate.0
  10     #printf "Agent Boot Time:   %s\n"  sysUpTime.0
  11     #printf "System Boot Time:  %s\n"  2002-06-03 21:33:49 -08:00
  12     printf "Users:             %s\n"  hrSystemNumUsers.0
  13     printf "Processes:         %s\n"  hrSystemProcesses.0
  14     printf "Memory:            %s\n"  select hrStorageSize, hrStorageType from hrStorageTable where hrStorageType = '.1.3.6.1.2.1.25.2.1.2'
  15     printf "Interfaces:        %s\n"  ifNumber.0
  16 }
  17
  18 alias scli_system_devices {
  19       printf "%5d: %s\n" select hrDeviceIndex, hrDeviceDescr from hrDeviceTable;
  20 }
  21
  22 alias scli_system_storage {
  23       printf "Storage Area          Size [K]   Used [K]   Free [K] Use%\n"
  24       # fix size, use%
  25       printf "%-22s %8d %8d %8d %3d (%s)\n" select hrStorageDescr, hrStorageSize, hrStorageUsed, hrStorageSize, hrStorageIndex, hrStorageType from hrStorageTable
  26 }
  27