improved sanity checks for dropbox params

1 files changed, 21 insertions, 6 deletions

diff --git a/utils/rhrd-sanity-check b/utils/rhrd-sanity-check
index 9dc5c43..93d933e 100755
--- a/utils/rhrd-sanity-check
+++ b/utils/rhrd-sanity-check
@@ -262,7 +262,20 @@ sub check_groups
 }
 
 
-sub check_logs
+sub check_dropboxes
+{
+  my ($ctx) = @_;
+
+  my $errors = 0;
+  print "dropboxes:\n";
+
+  print "\n " . $errors . " errors found\n";
+
+  return $errors;
+}
+
+
+sub check_showids
 {
   my ($ctx) = @_;
 
@@ -276,12 +289,12 @@ sub check_logs
 }
 
 
-sub check_dropboxes
+sub check_logs
 {
   my ($ctx) = @_;
 
-  my $errors = 0;
-  print "dropboxes:\n";
+  my $errors = 0,
+  print "logs:\n";
   print "  ... checks not yet implemtned!!\n";
 
   print "\n " . $errors . " errors found\n";
@@ -294,9 +307,11 @@ my ($ctx, $status, $errorstring) = RHRD::rddb::init();
 if(defined $ctx) {
   check_groups($ctx);
   print "\n";
-  check_logs($ctx);
-  print "\n";
   check_dropboxes($ctx);
+  print "\n";
+  check_showids($ctx);
+  print "\n";
+  check_logs($ctx);
 
   RHRD::rddb::destroy($ctx);
 } else {