From 37d20c83b0e906906ddec8cd00a2d97e0e5edc34 Mon Sep 17 00:00:00 2001
From: Tomas Plesnik <plesnik@ics.muni.cz>
Date: Wed, 1 Feb 2012 12:24:49 +0100
Subject: [PATCH] zmena verzovani
---
src/warden-server/bin/getClients.pl | 2 ++
src/warden-server/bin/getStatus.pl | 2 +-
src/warden-server/bin/registerReceiver.pl | 2 ++
src/warden-server/bin/registerSender.pl | 2 ++
src/warden-server/bin/unregisterClient.pl | 2 ++
src/warden-server/bin/warden-alive | 32 +++++++++++++++++++++++
src/warden-server/bin/wardend | 2 ++
src/warden-server/lib/WardenConf.pm | 2 +-
src/warden-server/lib/WardenReg.pm | 2 +-
src/warden-server/lib/WardenStatus.pm | 2 +-
src/warden-server/sh/create_table.sh | 1 +
11 files changed, 47 insertions(+), 4 deletions(-)
diff --git a/src/warden-server/bin/getClients.pl b/src/warden-server/bin/getClients.pl
index b1640a1..c490b09 100755
--- a/src/warden-server/bin/getClients.pl
+++ b/src/warden-server/bin/getClients.pl
@@ -35,6 +35,8 @@ use strict;
use Getopt::Std;
use File::Basename;
+our $VERSION = "1.0";
+
my $warden_path = '/opt/warden-server';
require $warden_path . '/lib/WardenStatus.pm';
my $filename = basename($0);
diff --git a/src/warden-server/bin/getStatus.pl b/src/warden-server/bin/getStatus.pl
index 60fe461..c2976c3 100755
--- a/src/warden-server/bin/getStatus.pl
+++ b/src/warden-server/bin/getStatus.pl
@@ -35,7 +35,7 @@ use strict;
use Getopt::Std;
use File::Basename;
-our $VERSION = "1.0.0";
+our $VERSION = "1.0";
my $warden_path = '/opt/warden-server';
require $warden_path . '/lib/WardenStatus.pm';
diff --git a/src/warden-server/bin/registerReceiver.pl b/src/warden-server/bin/registerReceiver.pl
index dff795b..3a9af82 100755
--- a/src/warden-server/bin/registerReceiver.pl
+++ b/src/warden-server/bin/registerReceiver.pl
@@ -36,6 +36,8 @@ use Getopt::Std;
use Switch;
use File::Basename;
+our $VERSION = "1.0";
+
my $warden_path = '/opt/warden-server';
require $warden_path . '/lib/WardenReg.pm';
my $filename = basename($0);
diff --git a/src/warden-server/bin/registerSender.pl b/src/warden-server/bin/registerSender.pl
index 2f3c9c6..225f88b 100755
--- a/src/warden-server/bin/registerSender.pl
+++ b/src/warden-server/bin/registerSender.pl
@@ -36,6 +36,8 @@ use Getopt::Std;
use Switch;
use File::Basename;
+our $VERSION = "1.0";
+
my $warden_path = '/opt/warden-server';
require $warden_path . '/lib/WardenReg.pm';
my $filename = basename($0);
diff --git a/src/warden-server/bin/unregisterClient.pl b/src/warden-server/bin/unregisterClient.pl
index 2549712..711932d 100755
--- a/src/warden-server/bin/unregisterClient.pl
+++ b/src/warden-server/bin/unregisterClient.pl
@@ -36,6 +36,8 @@ use Getopt::Std;
use Switch;
use File::Basename;
+our $VERSION = "1.0";
+
my $warden_path = '/opt/warden-server';
require $warden_path . '/lib/WardenReg.pm';
my $filename = basename($0);
diff --git a/src/warden-server/bin/warden-alive b/src/warden-server/bin/warden-alive
index 140f96a..f7d8998 100755
--- a/src/warden-server/bin/warden-alive
+++ b/src/warden-server/bin/warden-alive
@@ -1,4 +1,36 @@
#!/usr/bin/perl
+#
+# warden-alive
+#
+# Copyright (C) 2011 Cesnet z.s.p.o
+# Author(s): Jan Mach <jan.mach@cesnet.cz>
+#
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions
+# are met:
+# 1. Redistributions of source code must retain the above copyright
+# notice, this list of conditions and the following disclaimer.
+# 2. Redistributions in binary form must reproduce the above copyright
+# notice, this list of conditions and the following disclaimer in
+# the documentation and/or other materials provided with the
+# distribution.
+# 3. Neither the name of the Cesnet z.s.p.o nor the names of its
+# contributors may be used to endorse or promote products derived from
+# this software without specific prior written permission.
+#
+# This software is provided ``as is'', and any express or implied
+# warranties, including, but not limited to, the implied warranties of
+# merchantability and fitness for a particular purpose are disclaimed.
+# In no event shall the Cesnet z.s.p.o or contributors be liable for
+# any direct, indirect, incidental, special, exemplary, or consequential
+# damages (including, but not limited to, procurement of substitute
+# goods or services; loss of use, data, or profits; or business
+# interruption) however caused and on any theory of liability, whether
+# in contract, strict liability, or tort (including negligence or
+# otherwise) arising in any way out of the use of this software, even
+# if advised of the possibility of such damage.
+
+our $VERSION = "1.0";
my $rv = `ps aux | grep "/usr/bin/perl -w /opt/warden-server/bin/warden-server.pl" | grep -v grep | grep -v process-alive | wc -l`;
if ($rv) {
diff --git a/src/warden-server/bin/wardend b/src/warden-server/bin/wardend
index 5653184..92625b5 100755
--- a/src/warden-server/bin/wardend
+++ b/src/warden-server/bin/wardend
@@ -42,6 +42,8 @@
# among CSIRT teams
### END INIT INFO
+VERSION="1.0"
+
DAEMON="/opt/warden-server/bin/warden-server.pl"
PID_FILE="/var/run/warden-server.pl.pid"
LOCK_FILE="/var/lock/warden-server"
diff --git a/src/warden-server/lib/WardenConf.pm b/src/warden-server/lib/WardenConf.pm
index bdb64ca..5f8156c 100755
--- a/src/warden-server/lib/WardenConf.pm
+++ b/src/warden-server/lib/WardenConf.pm
@@ -36,7 +36,7 @@ package WardenConf;
use strict;
-our $VERSION = 100;
+our $VERSION = "1.0";
#-------------------------------------------------------------------------------
# loadConf - load variables from configuration file
diff --git a/src/warden-server/lib/WardenReg.pm b/src/warden-server/lib/WardenReg.pm
index 9a9478f..6ef131d 100755
--- a/src/warden-server/lib/WardenReg.pm
+++ b/src/warden-server/lib/WardenReg.pm
@@ -38,7 +38,7 @@ use SOAP::Lite;
use IO::Socket::SSL qw(debug1);
use SOAP::Transport::TCP;
-our $VERSION = 100;
+our $VERSION = "1.0";
#-------------------------------------------------------------------------------
diff --git a/src/warden-server/lib/WardenStatus.pm b/src/warden-server/lib/WardenStatus.pm
index 6c2f534..abbf837 100755
--- a/src/warden-server/lib/WardenStatus.pm
+++ b/src/warden-server/lib/WardenStatus.pm
@@ -38,7 +38,7 @@ use SOAP::Lite;
use IO::Socket::SSL qw(debug1);
use SOAP::Transport::TCP
-our $VERSION = "1.0.0";
+our $VERSION = "1.0";
#-------------------------------------------------------------------------------
# errMsg - print error message and die
diff --git a/src/warden-server/sh/create_table.sh b/src/warden-server/sh/create_table.sh
index 00ff544..136ca3d 100755
--- a/src/warden-server/sh/create_table.sh
+++ b/src/warden-server/sh/create_table.sh
@@ -31,6 +31,7 @@
# otherwise) arising in any way out of the use of this software, even
# if advised of the possibility of such damage.
+VERSION="1.0"
sqlite=`which sqlite3`
db_file="/opt/warden-server/var/warden.db"
--
GitLab