#
# Routines to be editted by the developer to provide validation for parameters
# and provison of the control data for table(s)
#
#$cdb=$main::cdb;
#$adb=$main::adb;
#$ndb=$main::ndb;
#$hdb=$main::hdb;
#$ddb=$main::ddb;

use esmith::util;
use esmith::HostsDB;
use esmith::AccountsDB;
use esmith::NetworksDB;
use esmith::HostsDB;
use esmith::DomainsDB;


#The most common ones
our $cdb = esmith::ConfigDB->open()   || die("Couldn't open config db");
our $adb = esmith::AccountsDB->open() || die("Couldn't open Accounts db");
our $ndb = esmith::NetworksDB->open() || die("Couldn't open Network db");
our $hdb = esmith::HostsDB->open() 	  || die("Couldn't open Hosts db");
our $ddb = esmith::DomainsDB->open()  || die("Couldn't open Domains db");

# Validation routines - parameters for each panel

	sub validate_PARAMS {
		$ret = 'ok';
		return $ret;
	}

	sub validate_TABLE {
		$ret = 'ok';
		return $ret;
	}

	
# Get control data for tables(s)

sub get_ibays {
	my @res;
	my @ibays = $adb->ibays();
	foreach my $i (@ibays){
		my %hash = ('Name'=> $i->prop('Name'),
					'Description' => $i->prop('Description'),
					'Flag' => 1,
					'PARAMS' => 'Modify'
					);
		push(@res,\%hash);
	}
	return \@res
}

1;