lainwir3d/dolibarr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Debug the integrity check feature.

Browse Source
This commit is contained in:
Laurent Destailleur 2015-06-20 14:24:22 +02:00
parent a7ce414d23
commit ba5d6318ef
1 changed files with 14 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
htdocs/admin/system/filecheck.php
View File

@ -24,6 +24,7 @@
*/ */
require '../../main.inc.php'; require '../../main.inc.php';
require_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
$langs->load("admin"); $langs->load("admin");
@ -76,7 +77,7 @@ if (file_exists($xmlfile))
$xml = simplexml_load_file($xmlfile); $xml = simplexml_load_file($xmlfile);
if ($xml) if ($xml)
{ {
$ret = getFilesUpdated($xml->dolibarr_root_dir[0]); $ret = getFilesUpdated($xml->dolibarr_root_dir[0]); // Fill array $file_list
print '<table class="noborder">'; print '<table class="noborder">';
print '<tr class="liste_titre">'; print '<tr class="liste_titre">';
print '<td>' . $langs->trans("FilesMissing") . '</td>'; print '<td>' . $langs->trans("FilesMissing") . '</td>';
@ -96,17 +97,24 @@ if (file_exists($xmlfile))
print '<table class="noborder">'; print '<table class="noborder">';
print '<tr class="liste_titre">'; print '<tr class="liste_titre">';
print '<td>' . $langs->trans("FilesUpdated") . '</td>'; print '<td>' . $langs->trans("FilesUpdated") . '</td>';
print '<td align="right">' . $langs->trans("Size") . '</td>';
print '<td align="center">' . $langs->trans("DateModification") . '</td>';
print '</tr>'."\n"; print '</tr>'."\n";
$var = true; $var = true;
foreach ($file_list['updated'] as $file) { foreach ($file_list['updated'] as $file)
{
$var = !$var; $var = !$var;
print '<tr ' . $bc[$var] . '>'; print '<tr ' . $bc[$var] . '>';
print '<td>'.$file.'</td>' . "\n"; print '<td>'.$file.'</td>' . "\n";
print '<td align="right">'.dol_print_size(dol_filesize(DOL_DOCUMENT_ROOT.'/'.$file)).'</td>' . "\n";
print '<td align="center">'.dol_print_date(dol_filemtime(DOL_DOCUMENT_ROOT.'/'.$file),'dayhour').'</td>' . "\n";
print "</tr>\n"; print "</tr>\n";
} }
print '</table>'; print '</table>';
} }
} else { }
else
{
print $langs->trans('XmlNotFound') . ': ' . $xmlfile; print $langs->trans('XmlNotFound') . ': ' . $xmlfile;
} }
@ -127,7 +135,8 @@ function getFilesUpdated(SimpleXMLElement $dir, $path = '')
global $file_list; global $file_list;
$exclude = 'install'; $exclude = 'install';
foreach ($dir->md5file as $file) { foreach ($dir->md5file as $file)
{
$filename = $path.$file['name']; $filename = $path.$file['name'];
if (preg_match('#'.$exclude.'#', $filename)) if (preg_match('#'.$exclude.'#', $filename))
@ -144,5 +153,5 @@ function getFilesUpdated(SimpleXMLElement $dir, $path = '')
foreach ($dir->dir as $subdir) foreach ($dir->dir as $subdir)
getFilesUpdated($subdir, $path.$subdir['name'].'/'); getFilesUpdated($subdir, $path.$subdir['name'].'/');
return $file_list; return $file_list;
} }