#checkt ob der richtige datentyp ausgewählt worden ist
sub checkSizeType {	#falls $type nicht MB oder mb oder GB oder gb ist dan  bringe eine fehler meldung
	if ( $type ne 'MB' ) {
		if ( $type ne 'mb' ) {
			if ( $type ne 'GB' ) {
				if ( $type ne 'gb' ) {
					$np->nagios_die('size can only mb,Mb,gb,GB');
				}
			}
		}
	}
}

#erstellen einer datenbank
sub createDatabase($$$$$$) {
	my ( $host, $dbUser, $dbPassword, $dbPort, $dbHost, $databaseName ) = @_;
	my ( $db, $sql );
	if ( defined $exist ) { #wenn sqlite datnenbank exestiert führt er das nicht aus
		$dbConnection = "DBI:mysql:$databaseName;host=$dbHost;$dbPort";
		$db           =
		  DBI->connect( "$dbConnection", "$dbUser", "$dbPassword",
			{ PrintError => 0, AutoCommit => 1, } )
		  || ( $np->nagios_die('error fail login') );
		$sql = "CREATE TABLE `mozycheck`.`last_backup` (
`ID` INT NOT NULL AUTO_INCREMENT ,
`Last_date` INT NOT NULL ,
`Host` VARCHAR( 100 ) NOT NULL ,
`Timestamp` TIMESTAMP NOT NULL ,
PRIMARY KEY ( `ID` )
) ENGINE = MYISAM ;";

		my $erg = $db->prepare($sql);
		$erg->execute();
		$erg->finish();
	}
}

#verbinden mit der sqlite datei
sub checkSqlite { #überprüft ob status.dat exestirt
	unless ( -e "$dbName" ) {
		$np->nagios_die('data not exist');
	}
}

#daten-bank abfrage vom letzten backup letzten backup 
sub checkLastBackup($) {
	my ($dsn) = @_;
	my ($sth);
	$dbh = DBI->connect($dsn);
	$sth = $dbh->prepare("SELECT start_date FROM history order by start_date DESC LIMIT 1");
	$sth->execute()|| ( $np->nagios_die('error selecting last checked entry in db') );
	$startDate = $sth->fetchrow_array();

	return $startDate;
}

#überprüft ob es über den host bereits ein eintrag gibt
sub checkHost($$$$$$) {

	my ( $host, $dbUser, $dbPassword, $dbPort, $dbHost, $databaseName ) = @_;
	my ( $erg,  $db,     $sql );

	if ( defined $exist ) {
		$dbConnection = "DBI:mysql:$databaseName;host=$dbHost;$dbPort";
		$db           = DBI->connect( "$dbConnection", "$dbUser", "$dbPassword",{ PrintError => 0, AutoCommit => 1, } );
		$sql = "SELECT Host FROM `last_backup` WHERE Host = (?) ";
		$erg = $db->prepare($sql);
		$erg->execute($host)
		  || $np->nagios_die('error selecting last checked entry in db');
		$lastHost = $erg->fetchrow_array();
		
	}
	else {
		#sqlite 
		my $dbh = DBI->connect("dbi:SQLite:dbname=lastcheck.db");

		$sth = $dbh->prepare("SELECT Host FROM lastcheck WHERE Host = (?)");
		$sth->execute($host) || ( $np->nagios_die('sqlite fail') );
		$lastHost = $sth->fetchrow_array();
		
	}
return $lastHost;
}

#update oder ein insert? falls datensatz exestiert wird ein update gemacht
sub entryDatabase($$$$$$$) {
	my ( $host, $dbUser, $dbPassword, $dbPort, $dbHost, $databaseName,
		$lastHost )
	  = @_;
	my ( $sql, $erg );
	if ( defined $exist ) {
		if ( $lastHost eq $host ) {
	#update 
			$sql = "UPDATE `mozycheck`.`last_backup`SET  
`Last_date` =  '$startDate',
`Host` = '$host' WHERE Host = '$host';";
		}#insert
		else {
			$sql = "INSERT INTO `mozycheck`.`last_backup` (
`ID` ,
`Last_date` ,
`Host` ,
`Timestamp`
)
VALUES (
NULL , '$startDate', '$host',
CURRENT_TIMESTAMP)";
		}
		#sqlite 
		$dbConnection = "DBI:mysql:$databaseName;host=$dbHost;$dbPort";
		$db           =
		  DBI->connect( "$dbConnection", "$dbUser", "$dbPassword",
			{ PrintError => 0, AutoCommit => 1, } );
		$erg = $db->prepare($sql);
		$erg->execute() || ( $np->nagios_die('error insert or update fail') );
	}
	else {
		my $dbh = DBI->connect("dbi:SQLite:dbname=lastcheck.db");
		#update
		if ( $lastHost eq $host ) {
			$sth = $dbh->prepare("UPDATE lastcheck SET Last_check ='$startDate',Host = '$host' WHERE Host = '$host' ");
		}#insert
		else {
			$sth =$dbh->prepare("INSERT INTO lastcheck ('Last_check','Host') VALUES ('$startDate','$host')");
		}
		$sth->execute() || ( $np->nagios_die('sqlite fail') );
	}
}

#liest denn letzten bekannten host aus 
sub lastCheck($) {
	my ($host) = @_;
	my ( $sql, $query );
	if ( defined $exist ) {
	$sql   = "SELECT Last_date FROM `last_backup` WHERE Host = (?)";
	$query = $db->prepare($sql);
	$query->execute($host)
	  || ( $np->nagios_die('error selecting last checked entry in db') );
	$lastCheck = $query->fetchrow_array();
	return $lastCheck;	
}else{
	#sqlite 
		my $dbh = DBI->connect("dbi:SQLite:dbname=lastcheck.db");

		$sth = $dbh->prepare("SELECT Last_check FROM lastcheck WHERE Host = (?)");
		$sth->execute($host) || ( $np->nagios_die('sqlite fail') );
		$lastCheck = $sth->fetchrow_array();
		return $lastCheck;
}
}
#daten-bank abfrage und bearbeitet ausgabe
sub checkBackup($$) {
	my $sth;
	$sth = $dbh->prepare("SELECT backup_id,start_date,end_date,result,files,size FROM history WHERE start_date >= (?)  order by start_date");
	( $sth->execute( $lastCheck, ) )
	  || ( $np->nagios_die('error selecting last checked entry in db') );

	while ( ( $backupID, $startDate, $endDate, $result, $files, $size ) =
		$sth->fetchrow_array() )

	{

		#size in gb umwandeln
		if ( $type eq 'gb' ) {
			$size = ( $size / $GB );
			$size = sprintf( "%.2f", $size );#rundet size auf 2 stellen auf
		}
		if ( $type eq 'GB' ) {
			$size = ( $size / $GB );
			$size = sprintf( "%.2f", $size );#rundet size auf 2 stellen auf
		}
		if ( $type eq 'MB' ) {
			$size = ( $size / $MB );
			$size = sprintf( "%.2f", $size );#rundet size auf 2 stellen auf
		}
		if ( $type eq $MB ) {
			$size = ( $size / $MB );
			$size = sprintf( "%.2f", $size );#rundet size auf 2 stellen auf
		}

		#zeit des letzten backups
		$timeStamp = time();	#ermittel aktuelle zeit in unixtime
		$dateDif   = $timeStamp - $startDate;	#ermittel differenz von dem letzten datenbank eintrag bis heute
		$dateDif   = ( $dateDif / 86400 );
		$dateDif   = sprintf( "%.0f", $dateDif );

		# Perfdata methods gibt informationen mit wie zb größe und anzahl der files
		$np->add_perfdata(	
			label => "size",
			value => $size,
			uom   => "/$type",
		);
		$np->add_perfdata(
			label => "files",
			value => $files,
			uom   => "",
		);

		$sth->finish;
		@redif = ( $dateDif, $result );
		return @redif;
	}
}