index.php

Go to the documentation of this file.

<?php
/* Copyright (C) 2008-2017 Laurent Destailleur  <eldy@users.sourceforge.net>
 * Copyright (C) 2008-2010 Regis Houssin        <regis.houssin@inodbox.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 <https://www.gnu.org/licenses/>.
 *
 * You can call this page with param module=medias to get a filemanager for medias.
 */

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 translation files required by the page
$langs->loadLangs(array("ecm", "companies", "other", "users", "orders", "propal", "bills", "contracts"));

// Security check
if ($user->socid) $socid = $user->socid;
$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');

$limit = GETPOST('limit', 'int') ? GETPOST('limit', 'int') : $conf->liste_limit;
$sortfield = GETPOST("sortfield", 'alpha');
$sortorder = GETPOST("sortorder", 'alpha');
$page = GETPOSTISSET('pageplusone') ? (GETPOST('pageplusone') - 1) : GETPOST("page", 'int');
if (empty($page) || $page == -1) { $page = 0; }     // If $page is not defined, or '' or -1
$offset = $limit * $page;
$pageprev = $page - 1;
$pagenext = $page + 1;
if (!$sortorder) $sortorder = "ASC";
if (!$sortfield) $sortfield = "fullname";

$ecmdir = new EcmDirectory($db);
if ($section > 0)
{
  $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
 */

// TODO Replace sendit and confirm_deletefile with
//$backtopage=$_SERVER["PHP_SELF"].'?file_manager=1&website='.$websitekey.'&pageid='.$pageid; // used after a confirm_deletefile into actions_linkedfiles.inc.php
//include DOL_DOCUMENT_ROOT.'/core/actions_linkedfiles.inc.php';

// Upload file (code similar but different than actions_linkedfiles.inc.php)
if (GETPOST("sendit", 'alphanohtml') && !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)
  {
    $generatethumbs = 0;
    $res = dol_add_file_process($upload_dir, 0, 1, 'userfile', '', null, '', $generatethumbs);
    if ($res > 0)
    {
      $result = $ecmdir->changeNbOfFiles('+');
    }
  }
}

// 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.

    $upload_dir = $conf->ecm->dir_output.($relativepath ? '/'.$relativepath : '');
    $file = $upload_dir."/".GETPOST('urlfile', 'alpha');
    $ret = dol_delete_file($file); // This include also the delete from file index in database.
    if ($ret)
    {
      $urlfiletoshow = GETPOST('urlfile', 'alpha');
      $urlfiletoshow = preg_replace('/\.noexe$/', '', $urlfiletoshow);
      setEventMessages($langs->trans("FileWasRemoved", $urlfiletoshow), null, 'mesgs');
      $result = $ecmdir->changeNbOfFiles('-');
    } else {
      setEventMessages($langs->trans("ErrorFailToDeleteFile", GETPOST('urlfile', 'alpha')), null, 'errors');
    }

    clearstatcache();
  }
  $action = 'file_manager';
}

// 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 directory
if ($action == 'confirm_deletesection' && GETPOST('confirm', 'alpha') == '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('');
print dol_get_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
print dol_get_fiche_end();

llxFooter();

$db->close();