forked from Wavyzz/dolibarr
349 lines
12 KiB
PHP
349 lines
12 KiB
PHP
<?php
|
|
/* Copyright (C) 2008-2017 Laurent Destailleur <eldy@users.sourceforge.net>
|
|
* Copyright (C) 2008-2010 Regis Houssin <regis.houssin@capnetworks.com>
|
|
*
|
|
* 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 3 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/>.
|
|
*
|
|
* You can call this page with param module=medias to get a filemanager for medias.
|
|
*/
|
|
|
|
/**
|
|
* \file htdocs/ecm/index.php
|
|
* \ingroup ecm
|
|
* \brief Main page for ECM section area
|
|
*/
|
|
|
|
require '../main.inc.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/core/class/html.formfile.class.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/core/lib/ecm.lib.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/core/lib/treeview.lib.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/ecm/class/ecmdirectory.class.php';
|
|
|
|
// Load traductions files
|
|
$langs->loadLangs(array("ecm","companies","other","users","orders","propal","bills","contracts"));
|
|
|
|
// Security check
|
|
if ($user->societe_id) $socid=$user->societe_id;
|
|
$result = restrictedArea($user, 'ecm', 0);
|
|
|
|
// Get parameters
|
|
$socid=GETPOST('socid','int');
|
|
$action=GETPOST('action','aZ09');
|
|
$section=GETPOST('section','int')?GETPOST('section','int'):GETPOST('section_id','int');
|
|
if (! $section) $section=0;
|
|
$section_dir=GETPOST('section_dir','alpha');
|
|
|
|
$sortfield = GETPOST("sortfield",'alpha');
|
|
$sortorder = GETPOST("sortorder",'alpha');
|
|
$page = GETPOST("page",'int');
|
|
if (empty($page) || $page == -1) { $page = 0; } // If $page is not defined, or '' or -1
|
|
$offset = $conf->liste_limit * $page;
|
|
$pageprev = $page - 1;
|
|
$pagenext = $page + 1;
|
|
if (! $sortorder) $sortorder="ASC";
|
|
if (! $sortfield) $sortfield="fullname";
|
|
|
|
$ecmdir = new EcmDirectory($db);
|
|
if ($section)
|
|
{
|
|
$result=$ecmdir->fetch($section);
|
|
if (! $result > 0)
|
|
{
|
|
dol_print_error($db,$ecmdir->error);
|
|
exit;
|
|
}
|
|
}
|
|
|
|
$form=new Form($db);
|
|
$ecmdirstatic = new EcmDirectory($db);
|
|
$userstatic = new User($db);
|
|
|
|
$error=0;
|
|
|
|
|
|
/*
|
|
* Actions
|
|
*/
|
|
|
|
// Upload file (code similar but different than actions_linkedfiles.inc.php)
|
|
if (GETPOST("sendit",'none') && ! empty($conf->global->MAIN_UPLOAD_DOC))
|
|
{
|
|
// Define relativepath and upload_dir
|
|
$relativepath='';
|
|
if ($ecmdir->id) $relativepath=$ecmdir->getRelativePath();
|
|
else $relativepath=$section_dir;
|
|
$upload_dir = $conf->ecm->dir_output.'/'.$relativepath;
|
|
|
|
if (is_array($_FILES['userfile']['tmp_name'])) $userfiles=$_FILES['userfile']['tmp_name'];
|
|
else $userfiles=array($_FILES['userfile']['tmp_name']);
|
|
|
|
foreach($userfiles as $key => $userfile)
|
|
{
|
|
if (empty($_FILES['userfile']['tmp_name'][$key]))
|
|
{
|
|
$error++;
|
|
if ($_FILES['userfile']['error'][$key] == 1 || $_FILES['userfile']['error'][$key] == 2){
|
|
setEventMessages($langs->trans('ErrorFileSizeTooLarge'), null, 'errors');
|
|
}
|
|
else {
|
|
setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("File")), null, 'errors');
|
|
}
|
|
}
|
|
}
|
|
|
|
if (! $error)
|
|
{
|
|
$res = dol_add_file_process($upload_dir, 0, 1, 'userfile', '', '', '', 0);
|
|
if ($res > 0)
|
|
{
|
|
$result=$ecmdir->changeNbOfFiles('+');
|
|
}
|
|
}
|
|
}
|
|
|
|
// Add directory
|
|
if ($action == 'add' && $user->rights->ecm->setup)
|
|
{
|
|
$ecmdir->ref = 'NOTUSEDYET';
|
|
$ecmdir->label = GETPOST("label");
|
|
$ecmdir->description = GETPOST("desc");
|
|
|
|
$id = $ecmdir->create($user);
|
|
if ($id > 0)
|
|
{
|
|
header("Location: ".$_SERVER["PHP_SELF"]);
|
|
exit;
|
|
}
|
|
else
|
|
{
|
|
setEventMessages('Error '.$langs->trans($ecmdir->error), null, 'errors');
|
|
$action = "create";
|
|
}
|
|
|
|
clearstatcache();
|
|
}
|
|
|
|
// Remove file (code similar but different than actions_linkedfiles.inc.php)
|
|
if ($action == 'confirm_deletefile')
|
|
{
|
|
if (GETPOST('confirm') == 'yes')
|
|
{
|
|
// GETPOST('urlfile','alpha') is full relative URL from ecm root dir. Contains path of all sections.
|
|
//var_dump(GETPOST('urlfile'));exit;
|
|
|
|
$upload_dir = $conf->ecm->dir_output.($relativepath?'/'.$relativepath:'');
|
|
$file = $upload_dir . "/" . GETPOST('urlfile','alpha'); // Do not use urldecode here ($_GET and $_POST are already decoded by PHP).
|
|
|
|
$ret=dol_delete_file($file); // This include also the delete from file index in database.
|
|
if ($ret)
|
|
{
|
|
setEventMessages($langs->trans("FileWasRemoved", GETPOST('urlfile','alpha')), null, 'mesgs');
|
|
$result=$ecmdir->changeNbOfFiles('-');
|
|
}
|
|
else
|
|
{
|
|
setEventMessages($langs->trans("ErrorFailToDeleteFile", GETPOST('urlfile','alpha')), null, 'errors');
|
|
}
|
|
|
|
clearstatcache();
|
|
}
|
|
$action='file_manager';
|
|
}
|
|
|
|
// Remove directory
|
|
if ($action == 'confirm_deletesection' && GETPOST('confirm') == 'yes')
|
|
{
|
|
$result=$ecmdir->delete($user);
|
|
setEventMessages($langs->trans("ECMSectionWasRemoved", $ecmdir->label), null, 'mesgs');
|
|
|
|
clearstatcache();
|
|
}
|
|
|
|
// Refresh directory view
|
|
// This refresh list of dirs, not list of files (for preformance reason). List of files is refresh only if dir was not synchronized.
|
|
// To refresh content of dir with cache, just open the dir in edit mode.
|
|
if ($action == 'refreshmanual')
|
|
{
|
|
$ecmdirtmp = new EcmDirectory($db);
|
|
|
|
// This part of code is same than into file ecm/ajax/ecmdatabase.php TODO Remove duplicate
|
|
clearstatcache();
|
|
|
|
$diroutputslash=str_replace('\\','/',$conf->ecm->dir_output);
|
|
$diroutputslash.='/';
|
|
|
|
// Scan directory tree on disk
|
|
$disktree=dol_dir_list($conf->ecm->dir_output,'directories',1,'','^temp$','','',0);
|
|
|
|
// Scan directory tree in database
|
|
$sqltree=$ecmdirstatic->get_full_arbo(0);
|
|
|
|
$adirwascreated=0;
|
|
|
|
// Now we compare both trees to complete missing trees into database
|
|
//var_dump($disktree);
|
|
//var_dump($sqltree);
|
|
foreach($disktree as $dirdesc) // Loop on tree onto disk
|
|
{
|
|
$dirisindatabase=0;
|
|
foreach($sqltree as $dirsqldesc)
|
|
{
|
|
if ($conf->ecm->dir_output.'/'.$dirsqldesc['fullrelativename'] == $dirdesc['fullname'])
|
|
{
|
|
$dirisindatabase=1;
|
|
break;
|
|
}
|
|
}
|
|
|
|
if (! $dirisindatabase)
|
|
{
|
|
$txt="Directory found on disk ".$dirdesc['fullname'].", not found into database so we add it";
|
|
dol_syslog($txt);
|
|
//print $txt."<br>\n";
|
|
|
|
// We must first find the fk_parent of directory to create $dirdesc['fullname']
|
|
$fk_parent=-1;
|
|
$relativepathmissing=str_replace($diroutputslash,'',$dirdesc['fullname']);
|
|
$relativepathtosearchparent=$relativepathmissing;
|
|
//dol_syslog("Try to find parent id for directory ".$relativepathtosearchparent);
|
|
if (preg_match('/\//',$relativepathtosearchparent))
|
|
//while (preg_match('/\//',$relativepathtosearchparent))
|
|
{
|
|
$relativepathtosearchparent=preg_replace('/\/[^\/]*$/','',$relativepathtosearchparent);
|
|
$txt="Is relative parent path ".$relativepathtosearchparent." for ".$relativepathmissing." found in sql tree ?";
|
|
dol_syslog($txt);
|
|
//print $txt." -> ";
|
|
$parentdirisindatabase=0;
|
|
foreach($sqltree as $dirsqldesc)
|
|
{
|
|
if ($dirsqldesc['fullrelativename'] == $relativepathtosearchparent)
|
|
{
|
|
$parentdirisindatabase=$dirsqldesc['id'];
|
|
break;
|
|
}
|
|
}
|
|
if ($parentdirisindatabase > 0)
|
|
{
|
|
dol_syslog("Yes with id ".$parentdirisindatabase);
|
|
//print "Yes with id ".$parentdirisindatabase."<br>\n";
|
|
$fk_parent=$parentdirisindatabase;
|
|
//break; // We found parent, we can stop the while loop
|
|
}
|
|
else
|
|
{
|
|
dol_syslog("No");
|
|
//print "No<br>\n";
|
|
}
|
|
}
|
|
else
|
|
{
|
|
dol_syslog("Parent is root");
|
|
$fk_parent=0; // Parent is root
|
|
}
|
|
|
|
if ($fk_parent >= 0)
|
|
{
|
|
$ecmdirtmp->ref = 'NOTUSEDYET';
|
|
$ecmdirtmp->label = dol_basename($dirdesc['fullname']);
|
|
$ecmdirtmp->description = '';
|
|
$ecmdirtmp->fk_parent = $fk_parent;
|
|
|
|
$txt="We create directory ".$ecmdirtmp->label." with parent ".$fk_parent;
|
|
dol_syslog($txt);
|
|
//print $ecmdirtmp->cachenbofdoc."<br>\n";exit;
|
|
$id = $ecmdirtmp->create($user);
|
|
if ($id > 0)
|
|
{
|
|
$newdirsql=array('id'=>$id,
|
|
'id_mere'=>$ecmdirtmp->fk_parent,
|
|
'label'=>$ecmdirtmp->label,
|
|
'description'=>$ecmdirtmp->description,
|
|
'fullrelativename'=>$relativepathmissing);
|
|
$sqltree[]=$newdirsql; // We complete fulltree for following loops
|
|
//var_dump($sqltree);
|
|
$adirwascreated=1;
|
|
}
|
|
else
|
|
{
|
|
dol_syslog("Failed to create directory ".$ecmdirtmp->label, LOG_ERR);
|
|
}
|
|
}
|
|
else {
|
|
$txt="Parent of ".$dirdesc['fullname']." not found";
|
|
dol_syslog($txt);
|
|
//print $txt."<br>\n";
|
|
}
|
|
}
|
|
}
|
|
|
|
// Loop now on each sql tree to check if dir exists
|
|
foreach($sqltree as $dirdesc) // Loop on each sqltree to check dir is on disk
|
|
{
|
|
$dirtotest=$conf->ecm->dir_output.'/'.$dirdesc['fullrelativename'];
|
|
if (! dol_is_dir($dirtotest))
|
|
{
|
|
$ecmdirtmp->id=$dirdesc['id'];
|
|
$ecmdirtmp->delete($user,'databaseonly');
|
|
//exit;
|
|
}
|
|
}
|
|
|
|
$sql="UPDATE ".MAIN_DB_PREFIX."ecm_directories set cachenbofdoc = -1 WHERE cachenbofdoc < 0"; // If pb into cahce counting, we set to value -1 = "unknown"
|
|
dol_syslog("sql = ".$sql);
|
|
$db->query($sql);
|
|
|
|
// If a directory was added, the fulltree array is not correctly completed and sorted, so we clean
|
|
// it to be sure that fulltree array is not used without reloading it.
|
|
if ($adirwascreated) $sqltree=null;
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
* View
|
|
*/
|
|
|
|
// Define height of file area (depends on $_SESSION["dol_screenheight"])
|
|
//print $_SESSION["dol_screenheight"];
|
|
$maxheightwin=(isset($_SESSION["dol_screenheight"]) && $_SESSION["dol_screenheight"] > 466)?($_SESSION["dol_screenheight"]-136):660; // Also into index_auto.php file
|
|
|
|
$moreheadcss='';
|
|
$moreheadjs='';
|
|
|
|
//$morejs=array();
|
|
$morejs=array('includes/jquery/plugins/blockUI/jquery.blockUI.js','core/js/blockUI.js'); // Used by ecm/tpl/enabledfiletreeajax.tpl.pgp
|
|
if (empty($conf->global->MAIN_ECM_DISABLE_JS)) $morejs[]="includes/jquery/plugins/jqueryFileTree/jqueryFileTree.js";
|
|
|
|
$moreheadjs.='<script type="text/javascript">'."\n";
|
|
$moreheadjs.='var indicatorBlockUI = \''.DOL_URL_ROOT."/theme/".$conf->theme."/img/working.gif".'\';'."\n";
|
|
$moreheadjs.='</script>'."\n";
|
|
|
|
llxHeader($moreheadcss.$moreheadjs,$langs->trans("ECMArea"),'','','','',$morejs,'',0,0);
|
|
|
|
$head = ecm_prepare_dasboard_head('');
|
|
dol_fiche_head($head, 'index', $langs->trans("ECMArea").' - '.$langs->trans("ECMFileManager"), -1, '');
|
|
|
|
|
|
// Add filemanager component
|
|
$module='ecm';
|
|
include DOL_DOCUMENT_ROOT.'/core/tpl/filemanager.tpl.php';
|
|
|
|
// End of page
|
|
dol_fiche_end();
|
|
|
|
llxFooter();
|
|
|
|
$db->close();
|