viewimage.controller.class.php

Go to the documentation of this file.

<?php
/*
 * Copyright (C) 2024       Frédéric France             <frederic.france@free.fr>
 * Copyright (C) 2024   MDW             <mdeweerd@users.noreply.github.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/>.
 */
 
require_once DOL_DOCUMENT_ROOT . '/core/lib/files.lib.php';
 
 
class ViewImageController extends Controller
{
  public $action;
 
  public $entity;
 
  public $filename;
 
  public $fullpath_original_file;
 
  public $fullpath_original_file_osencoded;
 
  public $modulepart;
 
  public $original_file;
 
  public $type;
 
 
  public function init()
  {
    global $conf, $hookmanager, $dolibarr_nocache, $user;
 
    define('MAIN_SECURITY_FORCECSP', "default-src 'none'");
 
    if (!defined('NOREQUIRESOC')) {
      define('NOREQUIRESOC', '1');
    }
    if (!defined('NOREQUIRETRAN')) {
      define('NOREQUIRETRAN', '1');
    }
    if (!defined('NOCSRFCHECK')) {
      define('NOCSRFCHECK', '1');
    }
    if (!defined('NOTOKENRENEWAL')) {
      define('NOTOKENRENEWAL', '1');
    }
    if (!defined('NOREQUIREMENU')) {
      define('NOREQUIREMENU', '1');
    }
    if (!defined('NOREQUIREHTML')) {
      define('NOREQUIREHTML', '1');
    }
    if (!defined('NOREQUIREAJAX')) {
      define('NOREQUIREAJAX', '1');
    }
 
    // For MultiCompany module.
    // Do not use GETPOST here, function is not defined and define must be done before including main.inc.php
    // Because 2 entities can have the same ref.
    $entity = (!empty($_GET['entity']) ? (int) $_GET['entity'] : (!empty($_POST['entity']) ? (int) $_POST['entity'] : 1));
    define("DOLENTITY", $entity);
 
    $context = Context::getInstance();
 
    $action = GETPOST('action', 'aZ09');
    $original_file = GETPOST('file', 'alphanohtml');
    $hashp = GETPOST('hashp', 'aZ09', 1);
    $extname = GETPOST('extname', 'alpha', 1);
    $modulepart = GETPOST('modulepart', 'alpha', 1);
    $urlsource = GETPOST('urlsource', 'alpha');
    $entity = (GETPOSTINT('entity') ? GETPOSTINT('entity') : $conf->entity);
 
    // Security check
    if (empty($modulepart) && empty($hashp)) {
      httponly_accessforbidden('Bad link. Bad value for parameter modulepart', 400);
    }
    if (empty($original_file) && empty($hashp) && $modulepart != 'barcode') {
      httponly_accessforbidden('Bad link. Missing identification to find file (param file or hashp)', 400);
    }
    if ($modulepart == 'fckeditor') {
      $modulepart = 'medias'; // For backward compatibility
    }
 
    $cachestring = GETPOST("cache", 'aZ09');    // May be 1, or an int, or a hash
    if ($cachestring) {
      // Important: The following code is to avoid a page request by the browser and PHP CPU at each Dolibarr page access.
      // We are here when param cache=xxx to force a cache policy:
      //  xxx=1 means cache of 3600s
      //  xxx=abcdef or 123456789 means a cache of 1 week (the key will be modified to get break cache use)
      if (empty($dolibarr_nocache)) {
        $delaycache = ((is_numeric($cachestring) && (int) $cachestring > 1 && (int) $cachestring < 999999) ? $cachestring : '3600');
        header('Cache-Control: max-age=' . $delaycache . ', public, must-revalidate');
        header('Pragma: cache'); // This is to avoid to have Pragma: no-cache set by proxy or web server
        header('Expires: ' . gmdate('D, d M Y H:i:s', time() + (int) $delaycache) . ' GMT');    // This is to avoid to have Expires set by proxy or web server
      } else {
        // If any cache on files were disable by config file (for test purpose)
        header('Cache-Control: no-cache');
      }
      //print $dolibarr_nocache; exit;
    }
 
    // Define mime type
    $type = 'application/octet-stream';
    if (GETPOST('type', 'alpha')) {
      $type = GETPOST('type', 'alpha');
    } else {
      $type = dol_mimetype($original_file);
    }
 
    // Security: This wrapper is for images. We do not allow type/html
    if (preg_match('/html/i', $type)) {
      httponly_accessforbidden('Error: Using the image wrapper to output a file with a mime type HTML is not possible.');
    }
    // Security: This wrapper is for images. We do not allow files ending with .noexe
    if (preg_match('/\.noexe$/i', $original_file)) {
      httponly_accessforbidden('Error: Using the image wrapper to output a file ending with .noexe is not allowed.');
    }
 
    // Security: Delete string ../ or ..\ into $original_file
    $original_file = preg_replace('/\.\.+/', '..', $original_file);    // Replace '... or more' with '..'
    $original_file = str_replace('../', '/', $original_file);
    $original_file = str_replace('..\\', '/', $original_file);
 
    // Find the subdirectory name as the reference
    $refname = basename(dirname($original_file) . "/");
    if ($refname == 'thumbs') {
      // If we get the thumbs directory, we must go one step higher. For example original_file='10/thumbs/myfile_small.jpg' -> refname='10'
      $refname = basename(dirname(dirname($original_file)) . "/");
    }
 
    // Check that file is allowed for view with viewimage.php
    if (!empty($original_file) && !dolIsAllowedForPreview($original_file)) {
      httponly_accessforbidden('This file extension is not qualified for preview', 403);
    }
 
    // Security check
    if (empty($modulepart)) {
      httponly_accessforbidden('Bad value for parameter modulepart', 400);
    }
 
    // When logged in a different entity, medias cannot be accessed because $conf->$module->multidir_output
    // is not set on the requested entity, but they are public documents, so reset entity
    if ($modulepart === 'medias' && $entity != $conf->entity) {
      $conf->entity = $entity;
      $conf->setValues($this->db);
    }
 
    $sqlprotectagainstexternals = '';
    $fullpath_original_file = '';
    $accessallowed = 0;
 
    // Hooks
    $hookmanager->initHooks(array('viewimage'));
    $parameters = array('modulepart' => $modulepart, 'original_file' => &$original_file,
      'sqlprotectagainstexternals' => &$sqlprotectagainstexternals, 'fullpath_original_file' => &$fullpath_original_file,
      'entity' => $entity, 'accessallowed' => &$accessallowed);
    $object = new stdClass();
    $reshook = $hookmanager->executeHooks('accessViewImage', $parameters, $object, $action); // Note that $action and $object may have been
    if ($reshook < 0) {
      $errors = $hookmanager->error . (is_array($hookmanager->errors) ? (!empty($hookmanager->error) ? ', ' : '') . implode(', ', $hookmanager->errors) : '');
      dol_syslog("document.php - Errors when executing the hook 'accessViewImage' : " . $errors);
      print "ErrorViewImageHooks: " . $errors;
      exit;
    } elseif (empty($reshook)) {
      $check_access = dol_check_secure_access_document($modulepart, $original_file, $entity, $user, $refname);
      $accessallowed = $check_access['accessallowed'];
      $sqlprotectagainstexternals = $check_access['sqlprotectagainstexternals'];
      $fullpath_original_file = $check_access['original_file']; // $fullpath_original_file is now a full path name
    }
 
    if (!empty($hashp)) {
      $accessallowed = 1; // When using hashp, link is public so we force $accessallowed
      $sqlprotectagainstexternals = '';
    } else {
      // Basic protection (against external users only)
      if ($user->socid > 0) {
        if ($sqlprotectagainstexternals) {
          $resql = $this->db->query($sqlprotectagainstexternals);
          if ($resql) {
            $num = $this->db->num_rows($resql);
            $i = 0;
            while ($i < $num) {
              $obj = $this->db->fetch_object($resql);
              if ($user->socid != $obj->fk_soc) {
                $accessallowed = 0;
                break;
              }
              $i++;
            }
          }
        }
      }
    }
 
    // Security:
    // Limit access if permissions are wrong
    if (!$accessallowed) {
      accessforbidden();
    }
 
    // Security:
    // On interdit les remontees de repertoire ainsi que les pipe dans les noms de fichiers.
    if (preg_match('/\.\./', $fullpath_original_file) || preg_match('/[<>|]/', $fullpath_original_file)) {
      dol_syslog("Refused to deliver file " . $fullpath_original_file);
      print "ErrorFileNameInvalid: " . dol_escape_htmltag($original_file);
      exit;
    }
 
    // Find the subdirectory name as the reference
    $refname = basename(dirname($original_file) . "/");
 
    $filename = basename($fullpath_original_file);
    $filename = preg_replace('/\.noexe$/i', '', $filename);
 
    // Output file on browser
    dol_syslog("document controller download $fullpath_original_file filename=$filename content-type=$type");
    $fullpath_original_file_osencoded = dol_osencode($fullpath_original_file); // New file name encoded in OS encoding charset
 
    // This test if file exists should be useless. We keep it to find bug more easily
    if (!file_exists($fullpath_original_file_osencoded)) {
      dol_syslog("ErrorFileDoesNotExists: " . $fullpath_original_file);
      print "ErrorFileDoesNotExists: " . $original_file;
      exit;
    }
 
    $fileSize = dol_filesize($fullpath_original_file);
    $fileSizeMax = getDolGlobalInt('MAIN_SECURITY_MAXFILESIZE_DOWNLOADED');
    if ($fileSizeMax && $fileSize > $fileSizeMax) {
      dol_syslog('ErrorFileSizeTooLarge: ' . $fileSize);
      print 'ErrorFileSizeTooLarge: ' . $fileSize . ' (max ' . $fileSizeMax . ' Kb)';
      exit;
    }
 
    // Hooks
    $hookmanager->initHooks(array('document'));
    $parameters = array('modulepart' => $modulepart, 'original_file' => $original_file,
      'entity' => $entity, 'refname' => $refname, 'fullpath_original_file' => $fullpath_original_file,
      'filename' => $filename, 'fullpath_original_file_osencoded' => $fullpath_original_file_osencoded);
    $object = new stdClass();
    $reshook = $hookmanager->executeHooks('viewImage', $parameters, $object, $action); // Note that $action and $object may have been
    if ($reshook < 0) {
      $errors = $hookmanager->error . (is_array($hookmanager->errors) ? (!empty($hookmanager->error) ? ', ' : '') . implode(', ', $hookmanager->errors) : '');
      dol_syslog("document.php - Errors when executing the hook 'viewImage' : " . $errors);
      print "ErrorViewImageHooks: " . $errors;
      exit;
    }
 
    $this->action = $action;
    $this->entity = $entity;
    $this->filename = $filename;
    $this->fullpath_original_file = $fullpath_original_file;
    $this->fullpath_original_file_osencoded = $fullpath_original_file_osencoded;
    $this->modulepart = $modulepart;
    $this->original_file = $original_file;
    $this->type = $type;
  }
 
  public function checkAccess()
  {
    $this->accessRight = true;
 
    return parent::checkAccess();
  }
 
  public function action()
  {
    $context = Context::getInstance();
    if (!$context->controllerInstance->checkAccess()) {
      return -1;
    }
 
    //$context = Context::getInstance();
    //$context->title = $langs->trans('WebPortalDocumentTitle');
    //$context->desc = $langs->trans('WebPortalDocumentDesc');
    //$context->doNotDisplayHeaderBar=1;// hide default header
 
    $this->init();
 
    return 1;
  }
 
  public function display()
  {
    global $conf;
 
    $context = Context::getInstance();
    if (!$context->controllerInstance->checkAccess()) {
      $this->display404();
      return;
    }
 
    // initialize
    $modulepart = $this->modulepart;
    $fullpath_original_file = $this->fullpath_original_file;
    $fullpath_original_file_osencoded = $this->fullpath_original_file_osencoded;
    $type = $this->type;
 
    if ($modulepart == 'barcode') {
      $generator = GETPOST("generator", "aZ09");
      $encoding = GETPOST("encoding", "aZ09");
      $readable = GETPOST("readable", 'aZ09') ? GETPOST("readable", "aZ09") : "Y";
      if (in_array($encoding, array('EAN8', 'EAN13'))) {
        $code = GETPOST("code", 'alphanohtml');
      } else {
        $code = GETPOST("code", 'restricthtml'); // This can be rich content (qrcode, datamatrix, ...)
      }
 
      // If $code is virtualcard_xxx_999.vcf, it is a file to read to get code
      $reg = array();
      if (preg_match('/^virtualcard_([^_]+)_(\d+)\.vcf$/', $code, $reg)) {
        $vcffile = '';
        $id = 0;
        $login = '';
        if ($reg[1] == 'user' && (int) $reg[2] > 0) {
          $vcffile = $conf->user->dir_temp . '/' . $code;
          $id = (int) $reg[2];
          $tmpuser = new User($this->db);
          $tmpuser->fetch($id);
          $login = $tmpuser->login;
        } elseif ($reg[1] == 'contact' && (int) $reg[2] > 0) {
          $vcffile = $conf->contact->dir_temp . '/' . $code;
          $id = (int) $reg[2];
        }
 
        $code = '';
        if ($vcffile && $id) {
          // Case of use of viewimage to get the barcode for user pubic profile,
          // we must check the securekey that protet against forging url
          if ($reg[1] == 'user' && (int) $reg[2] > 0) {
            $encodedsecurekey = dol_hash($conf->file->instance_unique_id . 'uservirtualcard' . $id . '-' . $login, 'md5');
            if ($encodedsecurekey != GETPOST('securekey')) {
              $code = 'badvalueforsecurekey';
            }
          }
          if (empty($code)) {
            $code = file_get_contents($vcffile);
          }
        }
      }
 
 
      if (empty($generator) || empty($encoding)) {
        print 'Error: Parameter "generator" or "encoding" not defined';
        exit;
      }
 
      $dirbarcode = array_merge(array("/core/modules/barcode/doc/"), $conf->modules_parts['barcode']);
 
      $result = 0;
 
      foreach ($dirbarcode as $reldir) {
        $dir = dol_buildpath($reldir, 0);
        $newdir = dol_osencode($dir);
 
        // Check if directory exists (we do not use dol_is_dir to avoid loading files.lib.php)
        if (!is_dir($newdir)) {
          continue;
        }
 
        $result = @include_once $newdir . $generator . '.modules.php';
        if ($result) {
          break;
        }
      }
 
      // Load barcode class
      $classname = "mod" . ucfirst($generator);
 
      $module = new $classname($this->db);
      '@phan-var-force ModeleBarCode $module';
      if ($module->encodingIsSupported($encoding)) {
        $result = $module->buildBarCode($code, $encoding, $readable);
      }
    } else {
      // Open and return file
      clearstatcache();
 
      $filename = basename($fullpath_original_file);
 
      // Output files on browser
      dol_syslog("viewimage.php return file $fullpath_original_file filename=$filename content-type=$type");
 
      if (!dol_is_file($fullpath_original_file) && !GETPOSTINT("noalt", 1)) {
        // This test is to replace error images with a nice "notfound image" when image is not available (for example when thumbs not yet generated).
        $fullpath_original_file = Context::getRootConfigUrl() . 'img/nophoto.png';
        /*$error='Error: File '.$_GET["file"].' does not exists or filesystems permissions are not allowed';
        print $error;
        exit;*/
      }
 
      // Permissions are ok and file found, so we return it
      if ($type) {
        top_httphead($type);
        header('Content-Disposition: inline; filename="' . basename($fullpath_original_file) . '"');
      } else {
        top_httphead('image/png');
        header('Content-Disposition: inline; filename="' . basename($fullpath_original_file) . '"');
      }
 
      $fullpath_original_file_osencoded = dol_osencode($fullpath_original_file);
 
      readfile($fullpath_original_file_osencoded);
    }
  }
}