dolibarr-fork/htdocs/admin/tools/purge.php

<?php
/* Copyright (C) 2006-2010 Laurent Destailleur  <eldy@users.sourceforge.net>
 *
 * 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.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program. If not, see <http://www.gnu.org/licenses/>.
 */

/**
 *		\file 		htdocs/admin/tools/purge.php
 *		\brief      Page to purge files (temporary or not)
 */

require("../../main.inc.php");
include_once(DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php');

$langs->load("admin");

$action=GETPOST('action');
$confirm=GETPOST('confirm');
$choice=GETPOST('choice');

if (! $user->admin) accessforbidden();

if ($_GET["msg"]) $message='<div class="error">'.$_GET["msg"].'</div>';

// Define filelog to discard it from purge
$filelog='';
if ($conf->syslog->enabled)
{
	$filelog=SYSLOG_FILE;
	$filelog=preg_replace('/DOL_DATA_ROOT/i',DOL_DATA_ROOT,$filelog);
}


/*
 *	Actions
 */
if ($action=='purge' && ! preg_match('/^confirm/i',$choice) && ($choice != 'allfiles' || $confirm == 'yes') )
{
	$filesarray=array();

	if ($choice=='tempfiles')
	{
		// Delete temporary files
		if ($dolibarr_main_data_root)
		{
			$filesarray=dol_dir_list($dolibarr_main_data_root,"directories",1,'\/temp$');
		}
	}

	if ($choice=='allfiles')
	{
		// Delete all files
		if ($dolibarr_main_data_root)
		{
			$filesarray=dol_dir_list($dolibarr_main_data_root,"all",0,'','install\.lock$');
		}
	}

	if ($choice=='logfile')
	{
		$filesarray[]=array('fullname'=>$filelog,'type'=>'file');
	}

	$count=0;
	if (count($filesarray))
	{

		foreach($filesarray as $key => $value)
		{
			//print "x ".$filesarray[$key]['fullname']."<br>\n";
			if ($filesarray[$key]['type'] == 'dir')
			{
				$count+=dol_delete_dir_recursive($filesarray[$key]['fullname']);
			}
			elseif ($filesarray[$key]['type'] == 'file')
			{
				// If (file that is not logfile) or (if logfile with option logfile)
				if ($filesarray[$key]['fullname'] != $filelog || $choice=='logfile')
				{
					$count+=dol_delete_file($filesarray[$key]['fullname']);
				}
			}
		}

		// Update cachenbofdoc
		if ($conf->ecm->enabled && $choice=='allfiles')
		{
			require_once(DOL_DOCUMENT_ROOT."/ecm/class/ecmdirectory.class.php");
			$ecmdirstatic = new EcmDirectory($db);
			$result = $ecmdirstatic->refreshcachenboffile(1);
		}
	}

	if ($count) $message=$langs->trans("PurgeNDirectoriesDeleted",$count);
	else $message=$langs->trans("PurgeNothingToDelete");
	$message='<div class="ok">'.$message.'</div>';
}


/*
 * View
 */

llxHeader();

$form=new Form($db);

print_fiche_titre($langs->trans("Purge"),'','setup');

print $langs->trans("PurgeAreaDesc",$dolibarr_main_data_root).'<br>';
print '<br>';


print '<form action="'.$_SERVER["PHP_SELF"].'" method="POST">';
print '<input type="hidden" name="token" value="'.$_SESSION['newtoken'].'">';

print '<input type="hidden" name="action" value="purge">';

print '<table class="border" width="100%">';

print '<tr class="border"><td style="padding: 4px">';

if ($conf->syslog->enabled)
{
	print '<input type="radio" name="choice" value="logfile"';
	print ($choice && $choice=='logfile') ? ' checked="checked"' : '';
	print '> '.$langs->trans("PurgeDeleteLogFile",$filelog).'<br><br>';
}

print '<input type="radio" name="choice" value="tempfiles"';
print (! $choice || $choice=='tempfiles' || $choice=='allfiles') ? ' checked="checked"' : '';
print '> '.$langs->trans("PurgeDeleteTemporaryFiles").'<br><br>';

print '<input type="radio" name="choice" value="confirm_allfiles"';
print ($choice && $choice=='confirm_allfiles') ? ' checked="checked"' : '';
print '> '.$langs->trans("PurgeDeleteAllFilesInDocumentsDir",$dolibarr_main_data_root).'<br>';

print '</td></tr></table>';

if ($choice != 'confirm_allfiles')
{
	print '<br>';
	print '<center><input class="button" type="submit" value="'.$langs->trans("PurgeRunNow").'"></center>';
}

print '</form>';


if ($message)
{
	print '<br>'.$message.'<br>';
	print "\n";
}

if (preg_match('/^confirm/i',$choice))
{
	print '<br>';
	$formquestion=array();
	$ret=$form->form_confirm($_SERVER["PHP_SELF"].'?choice=allfiles',$langs->trans('Purge'),$langs->trans('ConfirmPurge').' '.img_warning(),'purge',$formquestion,'no',2);
	if ($ret == 'html') print '<br>';
}


llxFooter();
?>