egroupware/setup/db_backup.php

<?php
	/**************************************************************************\
	* eGroupWare - Setup - DB backup and restore                               *
	* http://www.egroupware.org                                                *
	* Written by RalfBecker@outdoor-training.de                                *
	* --------------------------------------------                             *
	*  This program is free software; you can redistribute it and/or modify it *
	*  under the terms of the GNU General Public License as published by the   *
	*  Free Software Foundation; either version 2 of the License, or (at your  *
	*  option) any later version.                                              *
	\**************************************************************************/

 	/* $Id$ */

 	if (!is_object(@$GLOBALS['phpgw']))	// called from outside eGW ==> setup
 	{
		$GLOBALS['phpgw_info'] = array('flags' => array(
			'noheader' => True,
			'nonavbar' => True,
			'currentapp' => 'home',
			'noapi' => True
		));
		include ('./inc/functions.inc.php');
	
		@set_time_limit(0);
	
		// Check header and authentication
		if (!$GLOBALS['phpgw_setup']->auth('Config'))
		{
			Header('Location: index.php');
			exit;
		}
		// Does not return unless user is authorized
	
		$GLOBALS['phpgw_setup']->loaddb();

		$tpl_root = $GLOBALS['phpgw_setup']->html->setup_tpl_dir('setup');
		$self = 'db_backup.php';
	}
	$db_backup = CreateObject('phpgwapi.db_backup');
	$asyncservice = CreateObject('phpgwapi.asyncservice');

	// download a backup, has to be before any output !!!
	if ($_POST['download'])
	{
		list($file) = each($_POST['download']);
		$file = $db_backup->backup_dir.'/'.basename($file);	// basename to now allow to change the dir
		
		$browser = CreateObject('phpgwapi.browser');
		$browser->content_header(basename($file));
		fpassthru($f = fopen($file,'rb'));
		fclose($f);
		exit;
	}
 	$setup_tpl = CreateObject('phpgwapi.Template',$tpl_root);
	$setup_tpl->set_file(array(
		'T_head' => 'head.tpl',
		'T_footer' => 'footer.tpl',
		'T_db_backup' => 'db_backup.tpl',
	));
	$setup_tpl->set_block('T_db_backup','shedule_row','shedule_rows');
	$setup_tpl->set_block('T_db_backup','set_row','set_rows');

	$setup_tpl->set_var('stage_title',$stage_title = lang('DB backup and restore'));
	$setup_tpl->set_var('stage_desc',lang('This program lets you backup your database, shedule a backup or restore it.'));
	$setup_tpl->set_var('error_msg','');

	$bgcolor = array('#DDDDDD','#EEEEEE');

	if (is_object($GLOBALS['phpgw_setup']->html))
	{
		$GLOBALS['phpgw_setup']->html->show_header($stage_title,False,'config',$GLOBALS['phpgw_setup']->ConfigDomain . '(' . $phpgw_domain[$GLOBALS['phpgw_setup']->ConfigDomain]['db_type'] . ')');
	}
	else
	{
		$setup_tpl->set_block('T_db_backup','setup_header');
		$setup_tpl->set_var('setup_header','');
		$GLOBALS['phpgw_info']['flags']['app_header'] = $stage_title;
		$GLOBALS['phpgw']->common->phpgw_header();
		parse_navbar();
	}
	// create a backup now
	if($_POST['backup'])
	{
		if (is_resource($f = $db_backup->fopen_backup()))
		{
			echo '<p align="center">'.lang('backup started, this might take a view minutes ...')."</p>\n".str_repeat(' ',4096);
			$db_backup->backup($f);
			fclose($f);
			$setup_tpl->set_var('error_msg',lang('backup finished'));
		}
		else
		{
			$setup_tpl->set_var('error_msg',$f);
		}
	}
	$setup_tpl->set_var('backup_now_button','<input type="submit" name="backup" title="'.htmlspecialchars(lang("back's up your DB now, this might take a view minutes")).'" value="'.htmlspecialchars(lang('backup now')).'" />');
	$setup_tpl->set_var('upload','<input type="file" name="uploaded" /> &nbsp;'.
		'<input type="submit" name="upload" value="'.htmlspecialchars(lang('upload backup')).'" title="'.htmlspecialchars(lang("uploads a backup to the backup-dir, from where you can restore it")).'" />');

	if ($_POST['upload'] && is_array($_FILES['uploaded']) && !$_FILES['uploaded']['error'] && 
		is_uploaded_file($_FILES['uploaded']['tmp_name']))
	{
		move_uploaded_file($_FILES['uploaded']['tmp_name'],$db_backup->backup_dir.'/'.$_FILES['uploaded']['name']);
		
		if (function_exists('md5_file'))	// php4.2+
		{
			$md5 = ', md5='.md5_file($db_backup->backup_dir.'/'.$_FILES['uploaded']['name']);
		}
		$setup_tpl->set_var('error_msg',lang("succesfully uploaded file %1",$_FILES['uploaded']['name'].', '.
			sprintf('%3.1lf MB (%d)',$_FILES['uploaded']['size']/(1024*1024),$_FILES['uploaded']['size']).$md5));		
	}
	// delete a backup
	if ($_POST['delete'])
	{
		list($file) = each($_POST['delete']);
		$file = $db_backup->backup_dir.'/'.basename($file);	// basename to now allow to change the dir
		
		if (unlink($file)) $setup_tpl->set_var('error_msg',lang("backup '%1' deleted",$file));
	}
	// restore a backup
	if ($_POST['restore'])
	{
		list($file) = each($_POST['restore']);
		$file = $db_backup->backup_dir.'/'.basename($file);	// basename to now allow to change the dir
		
		if (is_resource($f = $db_backup->fopen_backup($file,true)))
		{
			echo '<p align="center">'.lang('restore started, this might take a view minutes ...')."</p>\n".str_repeat(' ',4096);
			$db_backup->restore($f);
			fclose($f);
			$setup_tpl->set_var('error_msg',lang("backup '%1' restored",$file));
		}
		else
		{
			$setup_tpl->set_var('error_msg',$f);
		}
	}
	// create a new shedulted backup
	if ($_POST['shedule'])
	{
		$asyncservice->set_timer($_POST['times'],'db_backup-'.implode(':',$_POST['times']),'admin.admin_db_backup.do_backup','');
	}
	// cancel a shedulted backup
	if (is_array($_POST['cancel']))
	{
		list($id) = each($_POST['cancel']);
		$asyncservice->cancel_timer($id);
	}
	// list sheduled backups
	if (($jobs = $asyncservice->read('db_backup-%')))
	{
		foreach($jobs as $job)
		{
			$setup_tpl->set_var($job['times']);
			$setup_tpl->set_var('next_run',date('Y-m-d H:i',$job['next']));
			$setup_tpl->set_var('actions','<input type="submit" name="cancel['.$job['id'].']" value="'.htmlspecialchars(lang('delete')).'" />');
			$setup_tpl->parse('shedule_rows','shedule_row',true);
		}
	}
	// input-fields to create a new sheduled backup
	foreach($times=array('year'=>'*','month'=>'*','day'=>'*','dow'=>'2-6','hour'=>3,'minute'=>0) as $name => $default)
	{
		$setup_tpl->set_var($name,'<input name="times['.$name.']" size="5" value="'.$default.'" />');
	}
	$setup_tpl->set_var('next_run','&nbsp;');
	$setup_tpl->set_var('actions','<input type="submit" name="shedule" value="'.htmlspecialchars(lang('shedule')).'" />');
	$setup_tpl->parse('shedule_rows','shedule_row',true);

	// listing the availible backup sets
	$setup_tpl->set_var('backup_dir',$db_backup->backup_dir);
	$setup_tpl->set_var('set_rows','');
	$handle = @opendir($db_backup->backup_dir);
	$files = array();
	while($handle && ($file = readdir($handle)))
	{
		if ($file != '.' && $file != '..')
		{
			$files[filectime($db_backup->backup_dir.'/'.$file)] = $file;
		}
	}
	if ($handle) closedir($handle);
	
	krsort($files);
	foreach($files as $ctime => $file)
	{
		$size = filesize($db_backup->backup_dir.'/'.$file);
		$setup_tpl->set_var(array(
			'filename'	=> $file,
			'date'		=> date('Y-m-d H:i',$ctime),
			'size'		=> sprintf('%3.1lf MB (%d)',$size/(1024*1024),$size),
			'actions'	=> '<input type="submit" name="download['.$file.']" value="'.htmlspecialchars(lang('download')).'" /> &nbsp;'.
				'<input type="submit" name="delete['.$file.']" value="'.htmlspecialchars(lang('delete')).'" onclick="return confirm(\''.
					htmlspecialchars(lang('Confirm to delete this backup?')).'\');" /> &nbsp;'.
				'<input type="submit" name="restore['.$file.']" value="'.htmlspecialchars(lang('restore')).'" onclick="return confirm(\''.
					htmlspecialchars(lang('Restoring a backup will delete/replace all content in your database. Are you sure?')).'\');" />',
		));
		$setup_tpl->parse('set_rows','set_row',true);
	}

	$setup_tpl->set_var(array(
		'lang_sheduled_backups'	=> lang('sheduled backups'),
		'lang_year'				=> lang('year'),
		'lang_month'			=> lang('month'),
		'lang_day'				=> lang('day'),
		'lang_dow'				=> lang('day of week<br>(0-6, 0=sunday)'),
		'lang_hour'				=> lang('hour (0-24)'),
		'lang_minute'			=> lang('minute'),
		'lang_next_run'			=> lang('next run'),
		'lang_actions'			=> lang('actions'),
		'lang_backup_sets'		=> lang('backup sets'),
		'lang_filename'			=> lang('filename'),
		'lang_date'				=> lang('created'),
		'lang_size'				=> lang('size'),
	));

	$setup_tpl->set_var('self',$self);
	$setup_tpl->pparse('out','T_db_backup');
	
	if (is_object($GLOBALS['phpgw_setup']->html))
	{
		$GLOBALS['phpgw_setup']->html->show_footer();
	}
?>