From 9b29fbbaa6b2910a5dad920051b63bd054a77b85 Mon Sep 17 00:00:00 2001
From: Michal Kostenec <kostenec@civ.zcu.cz>
Date: Mon, 28 May 2012 14:02:46 +0200
Subject: [PATCH] Pri registraci klientu vyzadovan CIDR tvar IP adresy

---
 src/warden-server/bin/registerReceiver.pl | 4 ++++
 src/warden-server/bin/registerSender.pl   | 4 ++++
 2 files changed, 8 insertions(+)

diff --git a/src/warden-server/bin/registerReceiver.pl b/src/warden-server/bin/registerReceiver.pl
index a5f74d4..b9df7a4 100755
--- a/src/warden-server/bin/registerReceiver.pl
+++ b/src/warden-server/bin/registerReceiver.pl
@@ -86,6 +86,10 @@ if ($help) {
   help;
 }
 
+if ($ip_net_client !~ /^(([0-9]|[1-9][0-9]|1[0-9]{2}|2[0-4][0-9]|25[0-5])\.){3}([0-9]|[1-9][0-9]|1[0-9]{2}|2[0-4][0-9]|25[0-5])(\/(\d|[1-2]\d|3[0-2]))$/) {
+    die errMsg("Enter correct IP in CIDR format!");
+}
+
 # superuser controle
 my $UID = $<;
 if ($UID != 0) {die errMsg("You must be root for running this script!")}
diff --git a/src/warden-server/bin/registerSender.pl b/src/warden-server/bin/registerSender.pl
index f2435a9..da34a2d 100755
--- a/src/warden-server/bin/registerSender.pl
+++ b/src/warden-server/bin/registerSender.pl
@@ -81,6 +81,10 @@ if ($help) {
   help;
 }
 
+if ($ip_net_client !~ /^(([0-9]|[1-9][0-9]|1[0-9]{2}|2[0-4][0-9]|25[0-5])\.){3}([0-9]|[1-9][0-9]|1[0-9]{2}|2[0-4][0-9]|25[0-5])(\/(\d|[1-2]\d|3[0-2]))$/) {
+    die errMsg("Enter correct IP in CIDR format!");
+}
+
 # superuser controle
 my $UID = $<;
 if ($UID != 0) {die errMsg("You must be root for running this script!")}
-- 
GitLab