add preliminary Torrus config for Ractivity PDU devices, RT#14601

1 files changed, 125 insertions, 0 deletions

diff --git a/torrus/perllib/Torrus/DevDiscover/Ractivity.pm b/torrus/perllib/Torrus/DevDiscover/Ractivity.pm
new file mode 100644
index 0000000..7c704f2
--- /dev/null
+++ b/torrus/perllib/Torrus/DevDiscover/Ractivity.pm
@@ -0,0 +1,125 @@
+#  Copyright (C) 2012 Freeside Internet Services, Inc.
+#
+#  This program is free software; you can redistribute it and/or modify
+#  it under the terms of the GNU General Public License as published by
+#  the Free Software Foundation; either version 2 of the License, or
+#  (at your option) any later version.
+#
+#  This program is distributed in the hope that it will be useful,
+#  but WITHOUT ANY WARRANTY; without even the implied warranty of
+#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#  GNU General Public License for more details.
+#
+#  You should have received a copy of the GNU General Public License
+#  along with this program; if not, write to the Free Software
+#  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307, USA.
+
+# Ractivity Power Distribution Unit
+
+package Torrus::DevDiscover::Ractivity;
+
+use strict;
+use Torrus::Log;
+
+$Torrus::DevDiscover::registry{'Ractivity'} = {
+    'sequence'     => 500,
+    'checkdevtype' => \&checkdevtype,
+    'discover'     => \&discover,
+    'buildConfig'  => \&buildConfig
+};
+
+our %oiddef =
+(
+    #'racktivity'           => '1.3.6.1.4.1.34097',
+    'product'              => '1.3.6.1.4.1.34097.1',
+    'name'                 => '1.3.6.1.4.1.34097.1.1',
+    'version'              => '1.3.6.1.4.1.34097.1.2',
+    'date'                 => '1.3.6.1.4.1.34097.1.3',
+    'general'              => '1.3.6.1.4.1.34097.2',
+    'Voltage'              => '1.3.6.1.4.1.34097.2.1',
+    'MaxTotCurentTime'     => '1.3.6.1.4.1.34097.2.10',
+    'TotKwh'               => '1.3.6.1.4.1.34097.2.11',
+    'Intrusion'            => '1.3.6.1.4.1.34097.2.12',
+    'Airflow'              => '1.3.6.1.4.1.34097.2.13',
+    'Beep'                 => '1.3.6.1.4.1.34097.2.14',
+    'ControllerName'       => '1.3.6.1.4.1.34097.2.15',
+    'RackPosition'         => '1.3.6.1.4.1.34097.2.16',
+    'Frequency'            => '1.3.6.1.4.1.34097.2.2',
+    'TotCurrent'           => '1.3.6.1.4.1.34097.2.3',
+    'TotPower'             => '1.3.6.1.4.1.34097.2.4',
+    'TemperatureInside'    => '1.3.6.1.4.1.34097.2.5',
+    'HumidityInside'       => '1.3.6.1.4.1.34097.2.6',
+    'MaxTotCurrentWarning' => '1.3.6.1.4.1.34097.2.7',
+    'MaxTotCurentOff'      => '1.3.6.1.4.1.34097.2.8',
+    'MaxTotCurrent'        => '1.3.6.1.4.1.34097.2.9',
+    'port'                 => '1.3.6.1.4.1.34097.3',
+    'portTable'            => '1.3.6.1.4.1.34097.3.1',
+    'portEntry'            => '1.3.6.1.4.1.34097.3.1.1',
+    'PortNr'               => '1.3.6.1.4.1.34097.3.1.1.1',
+    'MaxCurrent'           => '1.3.6.1.4.1.34097.3.1.1.10',
+    'MaxCurrentTime'       => '1.3.6.1.4.1.34097.3.1.1.11',
+    'MaxCurrentWarning'    => '1.3.6.1.4.1.34097.3.1.1.12',
+    'MaxCurrentOff'        => '1.3.6.1.4.1.34097.3.1.1.13',
+    'Priority'             => '1.3.6.1.4.1.34097.3.1.1.14',
+    'DelayOn'              => '1.3.6.1.4.1.34097.3.1.1.15',
+    'PortName'             => '1.3.6.1.4.1.34097.3.1.1.2',
+    'Current'              => '1.3.6.1.4.1.34097.3.1.1.3',
+    'RealPower'            => '1.3.6.1.4.1.34097.3.1.1.4',
+    'ApparentPower'        => '1.3.6.1.4.1.34097.3.1.1.5',
+    'PowerFactor'          => '1.3.6.1.4.1.34097.3.1.1.6',
+    'State'                => '1.3.6.1.4.1.34097.3.1.1.7',
+    'kWh'                  => '1.3.6.1.4.1.34097.3.1.1.8', #the important one
+    'kWhTime'              => '1.3.6.1.4.1.34097.3.1.1.9',
+    'temp'                 => '1.3.6.1.4.1.34097.4',
+    'tempTable'            => '1.3.6.1.4.1.34097.4.1',
+    'tempEntry'            => '1.3.6.1.4.1.34097.4.1.1',
+    'TempNr'               => '1.3.6.1.4.1.34097.4.1.1.1',
+    'Temperature'          => '1.3.6.1.4.1.34097.4.1.1.2',
+    'MaxTemp'              => '1.3.6.1.4.1.34097.4.1.1.3',
+    'MaxTempTime'          => '1.3.6.1.4.1.34097.4.1.1.4',
+    'TempWarning'          => '1.3.6.1.4.1.34097.4.1.1.5',
+);
+
+sub checkdevtype
+{
+    shift->checkSnmpOID('product');
+}
+
+sub discover
+{
+    my $dd = shift;
+    my $devdetails = shift;
+
+    my $data = $devdetails->data();
+
+    my $info = $dd->retrieveSnmpOIDs( 'product',
+                                      'name',
+                                      'version',
+                                      'date',
+                                    );
+
+
+    $data->{'param'}{'comment'} = join(' ', map $info->{$_},
+                                            qw( product name version )
+                                       );
+
+    $data->{'param'}{'legend'} = "Product: ". $info->{'product'}. ";\n".
+                                 "Name:    ". $info->{'name'}. ";\n".
+                                 "Version: ". $info->{'version'}. ";\n".
+                                 "Date:    ". $info->{'date'}. ";";
+
+    return 1;
+}
+
+sub buildConfig
+{
+    my $devdetails = shift;
+    my $cb = shift;
+    my $devNode = shift;
+
+    $cb->addTemplateApplication( $devNode, 'Ractivity::PDU');
+
+}
+
+1;
+