2
0
forked from Wavyzz/dolibarr

Can purge security event table

This commit is contained in:
Laurent Destailleur
2008-12-04 19:13:40 +00:00
parent a9b2245a0e
commit 93a47a9c1e
9 changed files with 52 additions and 16 deletions

View File

@@ -18,11 +18,11 @@
*/
/**
\file htdocs/admin/menus.php
\ingroup core
\brief Page de configuration des gestionnaires de menu
\version $Id$
*/
* \file htdocs/admin/menus.php
* \ingroup core
* \brief Page de configuration des gestionnaires de menu
* \version $Id$
*/
require("./pre.inc.php");
require_once(DOL_DOCUMENT_ROOT."/lib/admin.lib.php");

View File

@@ -49,6 +49,22 @@ $pageprev = $page - 1;
$pagenext = $page + 1;
/*
* Actions
*/
// Purge audit events
if ($_POST['action'] == 'confirm_purge' && $_POST['confirm'] == 'yes' && $user->admin)
{
$sql="DELETE FROM ".MAIN_DB_PREFIX."events";
$resql = $db->query($sql);
if (! $resql)
{
$mesg='<div class="error">'.$db->lasterror().'</div>';
}
}
/*
* View
@@ -56,6 +72,8 @@ $pagenext = $page + 1;
llxHeader();
$form=new Form($db);
$userstatic=new User($db);
$usefilter=0;
@@ -80,6 +98,12 @@ if ($result)
print_barre_liste($langs->trans("ListOfSecurityEvents"), $page, "listevents.php","",$sortfield,$sortorder,'',$num);
if ($_GET["action"] == 'purge')
{
$form->form_confirm($_SERVER["PHP_SELF"], $langs->trans('PurgeAuditEvents'), $langs->trans('ConfirmPurgeAuditEvents'), 'confirm_purge');
print '<br>';
}
print '<table class="liste" width="100%">';
print '<tr class="liste_titre">';
print_liste_field_titre($langs->trans("Date"),$_SERVER["PHP_SELF"],"e.dateevent","","",'align="left"',$sortfield,$sortorder);
@@ -166,6 +190,13 @@ if ($result)
}
print "</table>";
$db->free();
if ($num && $_GET["action"] != 'purge')
{
print '<div class="tabsAction">';
print '<a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=purge">'.$langs->trans("Purge").'</a>';
print '</div>';
}
}
else
{
@@ -174,5 +205,5 @@ else
$db->close();
llxFooter('$Date$ r&eacute;vision $Revision$');
llxFooter('$Date$ - $Revision$');
?>

View File

@@ -39,8 +39,9 @@ function llxHeader($head = "", $urlp = "")
$menu->add_submenu(DOL_URL_ROOT."/admin/tools/dolibarr_export.php", $langs->trans("Backup"));
$menu->add_submenu(DOL_URL_ROOT."/admin/tools/dolibarr_import.php", $langs->trans("Restore"));
$menu->add_submenu(DOL_URL_ROOT."/admin/tools/update.php", $langs->trans("Upgrade"));
$menu->add_submenu(DOL_URL_ROOT."/admin/tools/purge.php", $langs->trans("Purge"));
$menu->add_submenu(DOL_URL_ROOT."/admin/tools/listevents.php", $langs->trans("Audit"));
if (function_exists('eaccelerator_info')) $menu->add_submenu(DOL_URL_ROOT."/admin/tools/eaccelerator.php", $langs->trans("EAccelerator"));
$menu->add_submenu(DOL_URL_ROOT."/admin/tools/listevents.php", $langs->trans("Audit"));
$menu->add_submenu(DOL_URL_ROOT."/admin/tools/purge.php", $langs->trans("Purge"));
left_menu($menu->liste);
}