onlineSign.php

Go to the documentation of this file.

<?php
/* Copyright (C) 2024   MDW             <mdeweerd@users.noreply.github.com>
 * Copyright (C) 2024-2026  Frédéric France             <frederic.france@free.fr>
 * Copyright (C) 2024   William Mead        <william.mead@manchenumerique.fr>
 *
 * 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/>.
 */
 
if (!defined('NOTOKENRENEWAL')) {
  define('NOTOKENRENEWAL', '1'); // Disables token renewal
}
if (!defined('NOREQUIREHTML')) {
  define('NOREQUIREHTML', '1');
}
if (!defined('NOREQUIREAJAX')) {
  define('NOREQUIREAJAX', '1');
}
// Needed to create other objects with workflow
/*if (!defined('NOREQUIRESOC')) {
  define('NOREQUIRESOC', '1');
}*/
// Do not check anti CSRF attack test
if (!defined('NOREQUIREMENU')) {
  define('NOREQUIREMENU', '1');
}
// If there is no need to load and show top and left menu
if (!defined("NOLOGIN")) {
  define("NOLOGIN", '1');
}
if (!defined('NOIPCHECK')) {
  define('NOIPCHECK', '1'); // Do not check IP defined into conf $dolibarr_main_restrict_ip
}
if (!defined('NOBROWSERNOTIF')) {
  define('NOBROWSERNOTIF', '1');
}
$entity = (!empty($_GET['entity']) ? (int) $_GET['entity'] : (!empty($_POST['entity']) ? (int) $_POST['entity'] : 1));  // Keep $_GET and $_POST here. GETPOST not yet defined.
if (is_numeric($entity)) {
  define("DOLENTITY", $entity);
}
include '../../main.inc.php';
require_once DOL_DOCUMENT_ROOT . '/core/lib/files.lib.php';
$action = GETPOST('action', 'aZ09');
 
$signature = GETPOST('signaturebase64');
// Match the filter the producer uses in newonlinesign.php:97 ('alpha').
// Refs such as PR2601-0003 contain a dash, which aZ09 strips. After stripping
// the dash, dol_verifyHash fails because the security key was built from the
// full reference, so onlineSign answered 403 even on valid submissions (#31464).
$ref = GETPOST('ref', 'alpha');
$mode = GETPOST('mode', 'aZ09');    // 'proposal', ...
$SECUREKEY = GETPOST("securekey"); // Secure key
$online_sign_name = GETPOST("onlinesignname");
 
$error = 0;
$response = "";
 
$type = $mode;
 
global $dolibarr_main_instance_unique_id;
$defaultsalt = substr(dol_hash('dolibarr'.$dolibarr_main_instance_unique_id, 'sha256'), 0, 32);   // Fallback if no specific salt was set
 
// Security check
$securekeyseed = '';
if ($type == 'proposal') {
  $securekeyseed = getDolGlobalString('PROPOSAL_ONLINE_SIGNATURE_SECURITY_TOKEN', $defaultsalt);
} elseif ($type == 'contract') {
  $securekeyseed = getDolGlobalString('CONTRACT_ONLINE_SIGNATURE_SECURITY_TOKEN', $defaultsalt);
} elseif ($type == 'fichinter') {
  $securekeyseed = getDolGlobalString('FICHINTER_ONLINE_SIGNATURE_SECURITY_TOKEN', $defaultsalt);
} else {
  $securekeyseed = getDolGlobalString(strtoupper($type).'_ONLINE_SIGNATURE_SECURITY_TOKEN', $defaultsalt);
}
 
if (empty($SECUREKEY) || !dol_verifyHash($securekeyseed . $type . $ref . (!isModEnabled('multicompany') ? '' : $entity), $SECUREKEY, '0')) {
  // Link may have expired because of a change into the keys used to forge the signature.
  httponly_accessforbidden('Bad value for securitykey. Value provided ' . dol_escape_htmltag($SECUREKEY) . ' does not match expected value for ref=' . dol_escape_htmltag($ref), 403);
}
 
// Initialize a technical object to manage hooks of page. Note that conf->hooks_modules contains an array of hook context
$hookmanager->initHooks(array('ajaxonlinesign'));
 
 
/*
 * Actions
 */
 
// None
 
 
/*
 * View
 */
 
top_httphead();
 
if ($action == "importSignature") {
  $issignatureok = (!empty($signature) && $signature[0] == "image/png;base64");
  if ($issignatureok) {
    $signature = $signature[1];
    $data = base64_decode($signature);
 
    if ($mode == "propale" || $mode == 'proposal') {
      require_once DOL_DOCUMENT_ROOT . '/comm/propal/class/propal.class.php';
      require_once DOL_DOCUMENT_ROOT . '/core/lib/pdf.lib.php';
      $object = new Propal($db);
      $object->fetch(0, $ref);
 
      if ($object->status != $object::STATUS_VALIDATED) {
        // Protection so we can't sign a proposal that is no more with status validated.
        // The same test exists on the UPDATE request below, but it runs after the signed PDF has been generated.
        $langs->load("errors");
        print $langs->transnoentitiesnoconv("ErrorCantSignDocument"); // Must be a print that is shown by a javascript alert().
        $error++;
      }
 
      $upload_dir = !empty($conf->propal->multidir_output[$object->entity ?? $conf->entity]) ? $conf->propal->multidir_output[$object->entity ?? $conf->entity] : $conf->propal->dir_output;
      $upload_dir .= '/' . dol_sanitizeFileName($object->ref) . '/';
 
      $default_font_size = pdf_getPDFFontSize($langs);    // Must be after pdf_getInstance
      $default_font = pdf_getPDFFont($langs);    // Must be after pdf_getInstance
      $langs->loadLangs(array("main", "companies"));
 
      $date = dol_print_date(dol_now(), "%Y%m%d%H%M%S");
      $filename = "signatures/" . $date . "_signature.png";
      if (!$error && !is_dir($upload_dir . "signatures/")) {
        if (!dol_mkdir($upload_dir . "signatures/")) {
          $response = "Error mkdir. Failed to create dir " . $upload_dir . "signatures/";
          $error++;
        }
      }
 
      if (!$error) {
        $return = file_put_contents($upload_dir.$filename, $data);
        if ($return === false) {
          $error++;
          $response = 'Error file_put_content: failed to create signature file.';
        } else {
          dolChmod($upload_dir.$filename);
        }
      }
 
      if (!$error) {
        // Defined modele of doc
        $last_main_doc_file = $object->last_main_doc;
        $directdownloadlink = $object->getLastMainDocLink('proposal');    // url to download the $object->last_main_doc
 
        if (preg_match('/\.pdf/i', $last_main_doc_file)) {
          $ref_pdf = pathinfo($last_main_doc_file, PATHINFO_FILENAME); // Retrieves the name of external or internal PDF
          $ref_pdf = preg_replace('/_signed-(\d+)/', '', $ref_pdf);
 
          $newpdffilename = $upload_dir . $ref_pdf . "_signed-" . $date . ".pdf";
          $sourcefile = $upload_dir . $ref_pdf . ".pdf";
 
          if (dol_is_file($sourcefile)) {
            $parameters = array('sourcefile' => $sourcefile, 'newpdffilename' => $newpdffilename);
            $reshook = $hookmanager->executeHooks('AddSignature', $parameters, $object, $action); // Note that $action and $object may have been modified by hook
            if ($reshook < 0) {
              setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
            }
 
            if (empty($reshook)) {
              // We build the new PDF
              $formatarray = pdf_getFormat();
              $page_largeur = $formatarray['width'];
              $page_hauteur = $formatarray['height'];
              $format = array($page_largeur, $page_hauteur);
 
              $pdf = pdf_getInstance($format);
              if (class_exists('TCPDF')) {
                $pdf->setPrintHeader(false);
                $pdf->setPrintFooter(false);
              }
              $pdf->SetFont(pdf_getPDFFont($langs));
 
              if (getDolGlobalString('MAIN_DISABLE_PDF_COMPRESSION')) {
                $pdf->SetCompression(false);
              }
 
              //$pdf->Open();
              $pagecount = $pdf->setSourceFile($sourcefile);        // original PDF
 
              $param = array();
              $param['online_sign_name'] = $online_sign_name;
              $param['pathtoimage'] = $upload_dir . $filename;
 
              $propalsignonspecificpage = getDolGlobalInt("PROPAL_SIGNATURE_ON_SPECIFIC_PAGE");
 
              $s = array();    // Array with size of each page. Example array(w'=>210, 'h'=>297);
              for ($i = 1; $i < ($pagecount + 1); $i++) {
                try {
                  $tppl = $pdf->importPage($i);
                  $s = $pdf->getTemplatesize($tppl);
                  $format = array($s['w'], $s['h']);
                  $pdf->AddPage($s['h'] > $s['w'] ? 'P' : 'L', $format);
                  $pdf->useTemplate($tppl);
 
                  if ($propalsignonspecificpage < 0) {
                    $propalsignonspecificpage = $pagecount - abs($propalsignonspecificpage);
                  }
 
                  if (empty($propalsignonspecificpage)) {
                    // Now we get the metadata keywords from the $sourcefile PDF (by parsing the binary PDF file) and use it to extract
                    // the page x in PAGESIGN=x into $propalsignonspecificpage
                    $keywords = pdfExtractMetadata($sourcefile, 'Keywords');
                    $reg = array();
                    if (preg_match('/PAGESIGN=(\d+)/', $keywords, $reg)) {
                      $propalsignonspecificpage = (int) $reg[1];
                    }
                  }
 
                  if (getDolGlobalString("PROPAL_SIGNATURE_ON_ALL_PAGES") || $propalsignonspecificpage == $i) {
                    // A signature image file is 720 x 180 (ratio 1/4) but we use only the size into PDF
                    // TODO Get position of box from PDF template
 
                    if (getDolGlobalString("PROPAL_SIGNATURE_XFORIMGSTART")) {
                      $param['xforimgstart'] = getDolGlobalString("PROPAL_SIGNATURE_XFORIMGSTART");
                    } else {
                      $param['xforimgstart'] = (empty($s['w']) ? 120 : round($s['w'] / 2) + 15);
                    }
                    if (getDolGlobalString("PROPAL_SIGNATURE_YFORIMGSTART")) {
                      $param['yforimgstart'] = getDolGlobalString("PROPAL_SIGNATURE_YFORIMGSTART");
                    } else {
                      $param['yforimgstart'] = (empty($s['h']) ? 240 : $s['h'] - 60);
                    }
                    if (getDolGlobalString("PROPAL_SIGNATURE_WFORIMG")) {
                      $param['wforimg'] = getDolGlobalString("PROPAL_SIGNATURE_WFORIMG");
                    } else {
                      $param['wforimg'] = $s['w'] - 20 - $param['xforimgstart'];
                    }
 
                    dolPrintSignatureImage($pdf, $langs, $param);
                  }
                } catch (Exception $e) {
                  dol_syslog("Error when manipulating the PDF " . $sourcefile . " by onlineSign: " . $e->getMessage(), LOG_ERR);
                  $response = $e->getMessage();
                  $error++;
                }
              }
 
              if (!getDolGlobalString("PROPAL_SIGNATURE_ON_ALL_PAGES") && !$propalsignonspecificpage) {
                // We do not found specific instruction or page for the signature, so we add it now we are on the last page.
                // A signature image file is 720 x 180 (ratio 1/4) but we use only the size into PDF
                if (getDolGlobalString("PROPAL_SIGNATURE_XFORIMGSTART")) {
                  $param['xforimgstart'] = getDolGlobalString("PROPAL_SIGNATURE_XFORIMGSTART");
                } else {
                  $param['xforimgstart'] = (empty($s['w']) ? 120 : round($s['w'] / 2) + 15);
                }
                if (getDolGlobalString("PROPAL_SIGNATURE_YFORIMGSTART")) {
                  $param['yforimgstart'] = getDolGlobalString("PROPAL_SIGNATURE_YFORIMGSTART");
                } else {
                  $param['yforimgstart'] = (empty($s['h']) ? 240 : $s['h'] - 60);
                }
                if (getDolGlobalString("PROPAL_SIGNATURE_WFORIMG")) {
                  $param['wforimg'] = getDolGlobalString("PROPAL_SIGNATURE_WFORIMG");
                } else {
                  $param['wforimg'] = $s['w'] - 20 - $param['xforimgstart'];
                }
 
                dolPrintSignatureImage($pdf, $langs, $param);
              }
 
              //$pdf->Close();
              $pdf->Output($newpdffilename, "F");
 
              // Index the new file and update the last_main_doc property of object.
              $object->indexFile($newpdffilename, 1);
            }
          }
        } elseif (preg_match('/\.odt/i', $last_main_doc_file)) {
          // Adding signature on .ODT not yet supported
          // TODO
        } else {
          // Document format not supported to insert online signature.
          // We should just create an image file with the signature.
        }
      }
 
      if (!$error) {
        $db->begin();
 
        $online_sign_ip = getUserRemoteIP();
 
        $sql = "UPDATE " . MAIN_DB_PREFIX . "propal";
        $sql .= " SET fk_statut = " . ((int) $object::STATUS_SIGNED) . ", note_private = '" . $db->escape($object->note_private) . "',";
        $sql .= " date_signature = '" . $db->idate(dol_now()) . "',";
        $sql .= " online_sign_ip = '" . $db->escape($online_sign_ip) . "'";
        if ($online_sign_name) {
          $sql .= ", online_sign_name = '" . $db->escape($online_sign_name) . "'";
        }
        $sql .= " WHERE rowid = " . ((int) $object->id);
        $sql .= " AND fk_statut = ".((int) $object::STATUS_VALIDATED);    // Protection so we can't sign a document that is no more with status validated.
 
        dol_syslog(__FILE__, LOG_DEBUG);
        $resql = $db->query($sql);
        if (!$resql) {
          $error++;
          $response = "error sql";
        } else {
          $num = $db->affected_rows($resql);
          if ($num <= 0) {
            $error++;
            $langs->load("errors");
            //setEventMessages($langs->trans("ErrorCantSignDocument"), null, 'errors');
            print $langs->transnoentitiesnoconv("ErrorCantSignDocument"); // Must be a print that is shown by ajavascript alert().
          }
        }
 
        if (!$error) {
          if (method_exists($object, 'call_trigger')) {
            $object->context = array('closedfromonlinesignature' => 'closedfromonlinesignature');
 
            $result = $object->call_trigger('PROPAL_CLOSE_SIGNED', $user);
            if ($result < 0) {
              $error++;
              $response = "error in trigger " . $object->error;
            } else {
              $soc = new Societe($db);
              $soc->id = $object->socid;
              $result = $soc->setAsCustomer();
              if ($result < 0) {
                $error++;
                $response = $db->lasterror();
              } else {
                $response = "success";
              }
            }
          } else {
            $response = "success";
          }
        }
 
        if (!$error) {
          $db->commit();
          $response = "success";
          setEventMessages("PropalSigned", null, 'mesgs');
        } else {
          $db->rollback();
        }
      }
    } elseif ($mode == 'contract') {
      require_once DOL_DOCUMENT_ROOT . '/contrat/class/contrat.class.php';
      require_once DOL_DOCUMENT_ROOT . '/core/lib/pdf.lib.php';
      $object = new Contrat($db);
      $object->fetch(0, $ref);
 
      $upload_dir = !empty($conf->contract->multidir_output[$object->entity ?? $conf->entity]) ? $conf->contract->multidir_output[$object->entity ?? $conf->entity] : $conf->contrat->dir_output;
      $upload_dir .= '/' . dol_sanitizeFileName($object->ref) . '/';
 
      $date = dol_print_date(dol_now(), "%Y%m%d%H%M%S");
      $filename = "signatures/" . $date . "_signature.png";
      if (!is_dir($upload_dir . "signatures/")) {
        if (!dol_mkdir($upload_dir . "signatures/")) {
          $response = "Error mkdir. Failed to create dir " . $upload_dir . "signatures/";
          $error++;
        }
      }
 
      if (!$error) {
        $return = file_put_contents($upload_dir . $filename, $data);
        if ($return === false) {
          $error++;
          $response = 'Error file_put_content: failed to create signature file.';
        } else {
          dolChmod($upload_dir.$filename);
        }
      }
 
      if (!$error) {
        // Defined modele of doc
        $last_main_doc_file = $object->last_main_doc;
        $directdownloadlink = $object->getLastMainDocLink('contrat');    // url to download the $object->last_main_doc
 
        if (preg_match('/\.pdf/i', $last_main_doc_file)) {
          $ref_pdf = pathinfo($last_main_doc_file, PATHINFO_FILENAME); // Retrieves the name of external or internal PDF
 
          $newpdffilename = $upload_dir . $ref_pdf . "_signed-" . $date . ".pdf";
          $sourcefile = $upload_dir . $ref_pdf . ".pdf";
 
          if (dol_is_file($sourcefile)) {
            $parameters = array('sourcefile' => $sourcefile, 'newpdffilename' => $newpdffilename);
            $reshook = $hookmanager->executeHooks('AddSignature', $parameters, $object, $action); // Note that $action and $object may have been modified by hook
            if ($reshook < 0) {
              setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
            }
 
            if (empty($reshook)) {
              // We build the new PDF
              $pdf = pdf_getInstance();
              if (class_exists('TCPDF')) {
                $pdf->setPrintHeader(false);
                $pdf->setPrintFooter(false);
              }
              $pdf->SetFont(pdf_getPDFFont($langs));
 
              if (getDolGlobalString('MAIN_DISABLE_PDF_COMPRESSION')) {
                $pdf->SetCompression(false);
              }
 
              //$pdf->Open();
              $pagecount = $pdf->setSourceFile($sourcefile);        // original PDF
 
              $param = array();
              $param['online_sign_name'] = $online_sign_name;
              $param['pathtoimage'] = $upload_dir . $filename;
 
              $s = array();    // Array with size of each page. Example array(w'=>210, 'h'=>297);
              for ($i = 1; $i < ($pagecount + 1); $i++) {
                try {
                  $tppl = $pdf->importPage($i);
                  $s = $pdf->getTemplatesize($tppl);
                  $pdf->AddPage($s['h'] > $s['w'] ? 'P' : 'L');
                  $pdf->useTemplate($tppl);
 
                  if (getDolGlobalString("CONTRACT_SIGNATURE_ON_ALL_PAGES")) {
                    // A signature image file is 720 x 180 (ratio 1/4) but we use only the size into PDF
                    // TODO Get position of box from PDF template
 
                    if (getDolGlobalString("CONTRACT_SIGNATURE_XFORIMGSTART")) {
                      $param['xforimgstart'] = getDolGlobalString("CONTRACT_SIGNATURE_XFORIMGSTART");
                    } else {
                      $param['xforimgstart'] = (empty($s['w']) ? 110 : $s['w'] / 2 - 0);
                    }
                    if (getDolGlobalString("CONTRACT_SIGNATURE_YFORIMGSTART")) {
                      $param['yforimgstart'] = getDolGlobalString("CONTRACT_SIGNATURE_YFORIMGSTART");
                    } else {
                      $param['yforimgstart'] = (empty($s['h']) ? 250 : $s['h'] - 62);
                    }
                    if (getDolGlobalString("CONTRACT_SIGNATURE_WFORIMG")) {
                      $param['wforimg'] = getDolGlobalString("CONTRACT_SIGNATURE_WFORIMG");
                    } else {
                      $param['wforimg'] = $s['w'] - ($param['xforimgstart'] + 16);
                    }
 
                    dolPrintSignatureImage($pdf, $langs, $param);
                  }
                } catch (Exception $e) {
                  dol_syslog("Error when manipulating some PDF by onlineSign: " . $e->getMessage(), LOG_ERR);
                  $response = $e->getMessage();
                  $error++;
                }
              }
 
              if (!getDolGlobalString("CONTRACT_SIGNATURE_ON_ALL_PAGES")) {
                // A signature image file is 720 x 180 (ratio 1/4) but we use only the size into PDF
                // TODO Get position of box from PDF template
 
                $param['xforimgstart'] = (empty($s['w']) ? 110 : $s['w'] / 2 - 0);
                $param['yforimgstart'] = (empty($s['h']) ? 250 : $s['h'] - 62);
                $param['wforimg'] = $s['w'] - ($param['xforimgstart'] + 16);
 
                dolPrintSignatureImage($pdf, $langs, $param);
              }
 
              //$pdf->Close();
              $pdf->Output($newpdffilename, "F");
 
              // Index the new file and update the last_main_doc property of object.
              $object->indexFile($newpdffilename, 1);
            }
          }
          if (!$error) {
            $response = "success";
          }
        } elseif (preg_match('/\.odt/i', $last_main_doc_file)) {
          // Adding signature on .ODT not yet supported
          // TODO
        } else {
          // Document format not supported to insert online signature.
          // We should just create an image file with the signature.
        }
        $user = new User($db);
        $object->setSignedStatus($user, Contrat::$SIGNED_STATUSES['STATUS_SIGNED_RECEIVER_ONLINE'], 0, 'CONTRACT_MODIFY');
      }
    } elseif ($mode == 'fichinter') {
      require_once DOL_DOCUMENT_ROOT . '/fichinter/class/fichinter.class.php';
      require_once DOL_DOCUMENT_ROOT . '/core/lib/pdf.lib.php';
      $object = new Fichinter($db);
      $object->fetch(0, $ref);
 
      $upload_dir = !empty($conf->ficheinter->multidir_output[$object->entity ?? $conf->entity]) ? $conf->ficheinter->multidir_output[$object->entity ?? $conf->entity] : $conf->ficheinter->dir_output;
      $upload_dir .= '/'.dol_sanitizeFileName($object->ref).'/';
 
      $langs->loadLangs(array("main", "companies"));
 
      $default_font_size = pdf_getPDFFontSize($langs);  // Must be after pdf_getInstance
      $default_font = pdf_getPDFFont($langs); // Must be
 
      $date = dol_print_date(dol_now(), "%Y%m%d%H%M%S");
      $filename = "signatures/" . $date . "_signature.png";
      if (!is_dir($upload_dir . "signatures/")) {
        if (!dol_mkdir($upload_dir . "signatures/")) {
          $response = "Error mkdir. Failed to create dir " . $upload_dir . "signatures/";
          $error++;
        }
      }
 
      if (!$error) {
        $return = file_put_contents($upload_dir . $filename, $data);
        if ($return === false) {
          $error++;
          $response = 'Error file_put_content: failed to create signature file.';
        } else {
          dolChmod($upload_dir.$filename);
        }
      }
 
      if (!$error) {
        // Defined modele of doc
        $last_main_doc_file = $object->last_main_doc;
        $directdownloadlink = $object->getLastMainDocLink('fichinter');    // url to download the $object->last_main_doc
 
        if (preg_match('/\.pdf/i', $last_main_doc_file)) {
          $ref_pdf = pathinfo($last_main_doc_file, PATHINFO_FILENAME); // Retrieves the name of external or internal PDF
 
          $newpdffilename = $upload_dir . $ref_pdf . "_signed-" . $date . ".pdf";
          $sourcefile = $upload_dir . $ref_pdf . ".pdf";
 
          if (dol_is_file($sourcefile)) {
            $parameters = array('sourcefile' => $sourcefile, 'newpdffilename' => $newpdffilename);
            $reshook = $hookmanager->executeHooks('AddSignature', $parameters, $object, $action); // Note that $action and $object may have been modified by hook
            if ($reshook < 0) {
              setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
            }
 
            if (empty($reshook)) {
              // We build the new PDF
              $pdf = pdf_getInstance();
              if (class_exists('TCPDF')) {
                $pdf->setPrintHeader(false);
                $pdf->setPrintFooter(false);
              }
              $pdf->SetFont(pdf_getPDFFont($langs));
 
              if (getDolGlobalString('MAIN_DISABLE_PDF_COMPRESSION')) {
                $pdf->SetCompression(false);
              }
 
              //$pdf->Open();
              $pagecount = $pdf->setSourceFile($sourcefile);        // original PDF
 
              $param = array();
              $param['online_sign_name'] = $online_sign_name;
              $param['pathtoimage'] = $upload_dir . $filename;
 
              $s = array();    // Array with size of each page. Example array(w'=>210, 'h'=>297);
              for ($i = 1; $i < ($pagecount + 1); $i++) {
                try {
                  $tppl = $pdf->importPage($i);
                  $s = $pdf->getTemplatesize($tppl);
                  $pdf->AddPage($s['h'] > $s['w'] ? 'P' : 'L');
                  $pdf->useTemplate($tppl);
 
                  if (getDolGlobalString("FICHINTER_SIGNATURE_ON_ALL_PAGES")) {
                    // A signature image file is 720 x 180 (ratio 1/4) but we use only the size into PDF
                    // TODO Get position of box from PDF template
 
                    if (getDolGlobalString("FICHINTER_SIGNATURE_XFORIMGSTART")) {
                      $param['xforimgstart'] = getDolGlobalString("FICHINTER_SIGNATURE_XFORIMGSTART");
                    } else {
                      $param['xforimgstart'] = (empty($s['w']) ? 110 : round($s['w'] * 0.53));
                    }
                    if (getDolGlobalString("FICHINTER_SIGNATURE_YFORIMGSTART")) {
                      $param['yforimgstart'] = getDolGlobalString("FICHINTER_SIGNATURE_YFORIMGSTART");
                    } else {
                      $param['yforimgstart'] = (empty($s['h']) ? 250 : $s['h'] - 60);
                    }
                    if (getDolGlobalString("FICHINTER_SIGNATURE_WFORIMG")) {
                      $param['wforimg'] = getDolGlobalString("FICHINTER_SIGNATURE_WFORIMG");
                    } else {
                      $param['wforimg'] = $s['w'] - ($param['xforimgstart'] + 16);
                    }
 
                    dolPrintSignatureImage($pdf, $langs, $param);
                  }
                } catch (Exception $e) {
                  dol_syslog("Error when manipulating some PDF by onlineSign: " . $e->getMessage(), LOG_ERR);
                  $response = $e->getMessage();
                  $error++;
                }
              }
 
              if (!getDolGlobalString("FICHINTER_SIGNATURE_ON_ALL_PAGES")) {
                // A signature image file is 720 x 180 (ratio 1/4) but we use only the size into PDF
                // TODO Get position of box from PDF template
 
                $param['xforimgstart'] = (empty($s['w']) ? 110 : round($s['w'] * 0.53));
                $param['yforimgstart'] = (empty($s['h']) ? 250 : $s['h'] - 60);
                $param['wforimg'] = $s['w'] - ($param['xforimgstart'] + 16);
 
                dolPrintSignatureImage($pdf, $langs, $param);
              }
 
              //$pdf->Close();
              $pdf->Output($newpdffilename, "F");
 
              // Index the new file and update the last_main_doc property of object.
              $object->indexFile($newpdffilename, 1);
            }
          }
          if (!$error) {
            $response = "success";
          }
        } elseif (preg_match('/\.odt/i', $last_main_doc_file)) {
          // Adding signature on .ODT not yet supported
          // TODO
        } else {
          // Document format not supported to insert online signature.
          // We should just create an image file with the signature.
        }
        $user = new User($db);
        $object->setSignedStatus($user, Fichinter::$SIGNED_STATUSES['STATUS_SIGNED_RECEIVER_ONLINE'], 0, 'FICHINTER_MODIFY');
      }
    } elseif ($mode == "societe_rib") {
      $langs->load('withdrawals');
      require_once DOL_DOCUMENT_ROOT . '/societe/class/companybankaccount.class.php';
      require_once DOL_DOCUMENT_ROOT . '/core/lib/pdf.lib.php';
      $modelpath = "core/modules/bank/doc/";
      $object = new CompanyBankAccount($db);
      $object->fetch(0, $ref);
      if (!empty($object->id)) {
        $object->fetch_thirdparty();
 
        $upload_dir = $conf->societe->multidir_output[$object->thirdparty->entity] . '/' . dol_sanitizeFileName((string) $object->thirdparty->id) . '/';
 
        $default_font_size = pdf_getPDFFontSize($langs);    // Must be after pdf_getInstance
        $default_font = pdf_getPDFFont($langs);    // Must be after pdf_getInstance
        $langs->loadLangs(array("main", "companies"));
 
        $date = dol_print_date(dol_now(), "%Y%m%d%H%M%S");
        $filename = "signatures/" . $date . "_signature.png";
        if (!dol_is_dir($upload_dir . "signatures/")) {
          if (!dol_mkdir($upload_dir . "signatures/")) {
            $response = "Error mkdir. Failed to create dir " . $upload_dir . "signatures/";
            $error++;
          }
        }
        if (!dol_is_writable($upload_dir . "signatures/")) {
          $response = "Error directory " . $upload_dir . "signatures/ is not writable";
          $error++;
        }
        if (!dol_is_writable(DOL_DATA_ROOT.'/admin/temp/')) { // This is used by TCPDF as working directory
          $response = "Error directory " . DOL_DATA_ROOT."/admin/temp/ is not writable";
          $error++;
        }
 
        if (!$error) {
          $return = file_put_contents($upload_dir . $filename, $data);
          if ($return === false) {
            $error++;
            $response = 'Error file_put_content: failed to create signature file.';
          } else {
            dolChmod($upload_dir.$filename);
          }
        }
 
        if (!$error) {
          // Defined modele of doc
          $last_main_doc_file = $object->last_main_doc;
          $last_modelpdf = $object->model_pdf;
          $directdownloadlink = $object->getLastMainDocLink('company');    // url to download the $object->last_main_doc
 
          if (preg_match('/\.pdf/i', $last_main_doc_file)) {
            $sourcefile = '';
            $newpdffilename = '';
            if ($last_modelpdf == 'sepamandate') {
              $newpdffilename = $upload_dir . $langs->transnoentitiesnoconv("SepaMandateShort") . ' ' . dol_sanitizeFileName($object->ref) . "-" . dol_sanitizeFileName($object->rum) . "_signed-" . $date . ".pdf";
              $sourcefile = $upload_dir . $langs->transnoentitiesnoconv("SepaMandateShort") . ' ' . dol_sanitizeFileName($object->ref) . "-" . dol_sanitizeFileName($object->rum) . ".pdf";
            } else {
              // Fallback for setups using a non-default bank PDF model (eg. "ban"): take the last
              // generated main document as source and append "_signed-<date>" before the extension.
              // Without this the signed PDF is never built and the download link keeps pointing at
              // the unsigned original.
              $sourcefile = DOL_DATA_ROOT . '/' . $last_main_doc_file;
              $newpdffilename = preg_replace('/\.pdf$/i', '_signed-' . $date . '.pdf', $sourcefile);
            }
            if (dol_is_file($sourcefile)) {
              $parameters = array('sourcefile' => $sourcefile, 'newpdffilename' => $newpdffilename);
              $reshook = $hookmanager->executeHooks('AddSignature', $parameters, $object, $action); // Note that $action and $object may have been modified by hook
              if ($reshook < 0) {
                setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
              }
 
              if (empty($reshook)) {
                // We build the new PDF
                $pdf = pdf_getInstance();
                if (class_exists('TCPDF')) {
                  $pdf->setPrintHeader(false);
                  $pdf->setPrintFooter(false);
                }
                $pdf->SetFont(pdf_getPDFFont($langs));
 
                if (getDolGlobalString('MAIN_DISABLE_PDF_COMPRESSION')) {
                  $pdf->SetCompression(false);
                }
 
                //$pdf->Open();
                $pagecount = $pdf->setSourceFile($sourcefile);        // original PDF
 
                $s = array();    // Array with size of each page. Example array(w'=>210, 'h'=>297);
                for ($i = 1; $i < ($pagecount + 1); $i++) {
                  try {
                    $tppl = $pdf->importPage($i);
                    $s = $pdf->getTemplatesize($tppl);
                    $pdf->AddPage($s['h'] > $s['w'] ? 'P' : 'L');
                    $pdf->useTemplate($tppl);
                  } catch (Exception $e) {
                    dol_syslog("Error when manipulating the PDF " . $sourcefile . " by onlineSign: " . $e->getMessage(), LOG_ERR);
                    $response = $e->getMessage();
                    $error++;
                  }
                }
 
 
                // Get position of box from PDF template
                $file = '';
                $classname = '';
                $filefound = '';
                $dirmodels = array('/');
                if (is_array($conf->modules_parts['models'])) {
                  $dirmodels = array_merge($dirmodels, $conf->modules_parts['models']);
                }
                foreach ($dirmodels as $reldir) {
                  $file = "pdf_" . $last_modelpdf . ".modules.php";
                  // Check the template location
                  $file = dol_buildpath($reldir . $modelpath . $file, 0);
                  if (file_exists($file)) {
                    $filefound = $file;
                    $classname = 'pdf_' . $last_modelpdf;
                    break;
                  }
                }
 
                if ($filefound === '') {
                  $response = $langs->trans("Error") . ' Failed to load doc generator with modelpaths=' . $modelpath . ' - modele=' . $last_modelpdf;
                  dol_syslog($response, LOG_ERR);
                  $error++;
                }
 
                if (!$error && $classname !== '') {
                  // If PDF template class  was found
                  require_once $file;
 
                  $objPDF = new $classname($db);
 
                  $pdf->SetFont($default_font, '', $default_font_size - 1);
 
                  $xForDate = $objPDF->marge_gauche;
                  $yForDate = $objPDF->page_hauteur - $objPDF->heightforinfotot - $objPDF->heightforfreetext - $objPDF->heightforfooter + 10;
                  $pdf->SetXY($xForDate, $yForDate);
                  $pdf->MultiCell(100, 4, dol_print_date(dol_now(), "daytext", false, $langs, true), 0, 'L');
 
                  $xforimgstart = $objPDF->xPosSignArea;
                  $yforimgstart = $yForDate - 5;
                  $wforimg = $s['w'] - 20 - $xforimgstart;
 
                  $param = array();
                  $param['online_sign_name'] = $online_sign_name;
                  $param['pathtoimage'] = $upload_dir . $filename;
 
                  // A signature image file is 720 x 180 (ratio 1/4) but we use only the size into PDF
                  // TODO Get position of box from PDF template
 
                  $param['xforimgstart'] = $xforimgstart;
                  $param['yforimgstart'] = $yforimgstart;
                  $param['wforimg'] = $wforimg;
 
                  dolPrintSignatureImage($pdf, $langs, $param);
                }
                //$pdf->Close();
                $pdf->Output($newpdffilename, "F");
 
                // Index the new file and update the last_main_doc property of object.
                $object->indexFile($newpdffilename, 1);
              }
            }
          } elseif (preg_match('/\.odt/i', $last_main_doc_file)) {
            // Adding signature on .ODT not yet supported
            // TODO
          } else {
            // Document format not supported to insert online signature.
            // We should just create an image file with the signature.
          }
        }
      } else {
        $error++;
        $response = "cannot find BAN/RIB";
      }
 
      if (!$error) {
        $db->begin();
 
        $online_sign_ip = getUserRemoteIP();
 
        $sql = "UPDATE " . MAIN_DB_PREFIX . $db->sanitize($object->table_element);
        $sql .= " SET ";
        $sql .= " date_signature = '" . $db->idate(dol_now()) . "',";
        $sql .= " online_sign_ip = '" . $db->escape($online_sign_ip) . "'";
        if ($online_sign_name) {
          $sql .= ", online_sign_name = '" . $db->escape($online_sign_name) . "'";
        }
        //$sql .= ", last_main_doc = '" . $db->escape($object->element'..') . "'";
 
        $sql .= " WHERE rowid = " . ((int) $object->id);
 
        dol_syslog(__FILE__, LOG_DEBUG);
        $resql = $db->query($sql);
        if (!$resql) {
          $error++;
        } else {
          $num = $db->affected_rows($resql);
        }
 
        if (!$error) {
          $response = "success";
        } else {
          $error++;
          $response = "error sql";
        }
 
        if (!$error) {
          $db->commit();
          $response = "success";
          setEventMessages(dol_ucfirst($mode)."Signed", null, 'warnings');
        } else {
          $db->rollback();
        }
      }
    } elseif ($mode == 'expedition') {
      require_once DOL_DOCUMENT_ROOT . '/expedition/class/expedition.class.php';
      require_once DOL_DOCUMENT_ROOT . '/core/lib/pdf.lib.php';
 
      $object = new Expedition($db);
      $object->fetch(0, $ref);
 
      $upload_dir = $conf->expedition->dir_output."/sending/";
      $upload_dir .= '/'.dol_sanitizeFileName($object->ref).'/';
 
      $langs->loadLangs(array("main", "companies"));
 
      $default_font_size = pdf_getPDFFontSize($langs);  // Must be after pdf_getInstance
      $default_font = pdf_getPDFFont($langs); // Must be
 
      $date = dol_print_date(dol_now(), "%Y%m%d%H%M%S");
      $filename = "signatures/" . $date . "_signature.png";
      if (!is_dir($upload_dir . "signatures/")) {
        if (!dol_mkdir($upload_dir . "signatures/")) {
          $response = "Error mkdir. Failed to create dir " . $upload_dir . "signatures/";
          $error++;
        }
      }
 
      if (!$error) {
        $return = file_put_contents($upload_dir . $filename, $data);
        if ($return === false) {
          $error++;
          $response = 'Error file_put_content: failed to create signature file.';
        } else {
          dolChmod($upload_dir.$filename);
        }
      }
 
      if (!$error) {
        $last_main_doc_file = $object->last_main_doc;
        // Defined modele of doc
        if (empty($last_main_doc_file) || !dol_is_file(DOL_DATA_ROOT.'/'.$object->last_main_doc)) {
          // It seems document has never been generated, or was generated and then deleted.
          // So we try to regenerate it with its default template.
          $defaulttemplate = '';    // We force the use an empty string instead of $object->model_pdf to be sure to use a "main" default template and not the last one used.
          $object->generateDocument($defaulttemplate, $langs);
        }
        $last_main_doc_file = $object->last_main_doc;
        $directdownloadlink = $object->getLastMainDocLink('expedition');    // url to download the $object->last_main_doc
 
        if (preg_match('/\.pdf/i', $last_main_doc_file)) {
          $ref_pdf = pathinfo($last_main_doc_file, PATHINFO_FILENAME); // Retrieves the name of external or internal PDF
 
          $newpdffilename = $upload_dir . $ref_pdf . "_signed-" . $date . ".pdf";
          $sourcefile = $upload_dir . $ref_pdf . ".pdf";
 
          if (dol_is_file($sourcefile)) {
            $parameters = array('sourcefile' => $sourcefile, 'newpdffilename' => $newpdffilename);
            $reshook = $hookmanager->executeHooks('AddSignature', $parameters, $object, $action); // Note that $action and $object may have been modified by hook
            if ($reshook < 0) {
              setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
            }
 
            if (empty($reshook)) {
              // We build the new PDF
              $pdf = pdf_getInstance();
              if (class_exists('TCPDF')) {
                $pdf->setPrintHeader(false);
                $pdf->setPrintFooter(false);
              }
              $pdf->SetFont(pdf_getPDFFont($langs));
 
              if (getDolGlobalString('MAIN_DISABLE_PDF_COMPRESSION')) {
                $pdf->SetCompression(false);
              }
 
              //$pdf->Open();
              $pagecount = $pdf->setSourceFile($sourcefile);        // original PDF
 
              $param = array();
              $param['online_sign_name'] = $online_sign_name;
              $param['pathtoimage'] = $upload_dir . $filename;
 
              $s = array();    // Array with size of each page. Example array(w'=>210, 'h'=>297);
              for ($i = 1; $i < ($pagecount + 1); $i++) {
                try {
                  $tppl = $pdf->importPage($i);
                  $s = $pdf->getTemplatesize($tppl);
                  $pdf->AddPage($s['h'] > $s['w'] ? 'P' : 'L');
                  $pdf->useTemplate($tppl);
 
                  if (getDolGlobalString("SHIPMENT_SIGNATURE_ON_ALL_PAGES")) {
                    // A signature image file is 720 x 180 (ratio 1/4) but we use only the size into PDF
                    // TODO Get position of box from PDF template
 
                    $param['xforimgstart'] = (empty($s['w']) ? 110 : round($s['w'] * 0.53));
                    $param['yforimgstart'] = (empty($s['h']) ? 250 : $s['h'] - 60);
                    $param['wforimg'] = $s['w'] - ($param['xforimgstart'] + 16);
 
                    dolPrintSignatureImage($pdf, $langs, $param);
                  }
                } catch (Exception $e) {
                  dol_syslog("Error when manipulating some PDF by onlineSign: " . $e->getMessage(), LOG_ERR);
                  $response = $e->getMessage();
                  $error++;
                }
              }
 
              if (!getDolGlobalString("SHIPMENT_SIGNATURE_ON_ALL_PAGES")) {
                // A signature image file is 720 x 180 (ratio 1/4) but we use only the size into PDF
                // TODO Get position of box from PDF template
 
                $param['xforimgstart'] = (empty($s['w']) ? 110 : round($s['w'] * 0.53));
                $param['yforimgstart'] = (empty($s['h']) ? 250 : $s['h'] - 60);
                $param['wforimg'] = $s['w'] - ($param['xforimgstart'] + 16);
 
                dolPrintSignatureImage($pdf, $langs, $param);
              }
 
              //$pdf->Close();
              $pdf->Output($newpdffilename, "F");
 
              // Index the new file and update the last_main_doc property of object.
              $object->indexFile($newpdffilename, 1);
            }
          }
          if (!$error) {
            $response = "success";
          }
        } elseif (preg_match('/\.odt/i', $last_main_doc_file)) {
          // Adding signature on .ODT not yet supported
          // TODO
        } else {
          // Document format not supported to insert online signature.
          // We should just create an image file with the signature.
        }
      }
      $user = new User($db);
      $object->setSignedStatus($user, Expedition::$SIGNED_STATUSES['STATUS_SIGNED_RECEIVER_ONLINE'], 0, 'SHIPPING_MODIFY');
    }
  } else {
    $error++;
    $response = 'error signature_not_found';
  }
}
 
if ($error) {
  http_response_code(501);
}
 
echo $response;
 
 
function dolPrintSignatureImage(TCPDF $pdf, $langs, $params)
{
  $default_font_size = pdf_getPDFFontSize($langs);  // Must be after pdf_getInstance
  $default_font = pdf_getPDFFont($langs); // Must be
  $xforimgstart = $params['xforimgstart'];
  $yforimgstart = $params['yforimgstart'];
  $wforimg = $params['wforimg'];
 
  $pdf->SetXY($xforimgstart, $yforimgstart + round($wforimg / 4) - 4);
  $pdf->SetFont($default_font, '', $default_font_size - 1);
  $pdf->SetTextColor(80, 80, 80);
  $pdf->MultiCell($wforimg, 4, $langs->transnoentities("Signature") . ': ' . dol_print_date(dol_now(), "day", false, $langs, true). ' - '.$params['online_sign_name'], 0, 'L');
  //$pdf->SetXY($xforimgstart, $yforimgstart + round($wforimg / 4));
  //$pdf->MultiCell($wforimg, 4, $langs->trans("Lastname") . ': ' . $online_sign_name, 0, 'L');
 
  $pdf->Image($params['pathtoimage'], $xforimgstart, $yforimgstart, $wforimg, round($wforimg / 4));
 
  return;
}