dolibarr 21.0.0-alpha
html.formfile.class.php
Go to the documentation of this file.
1<?php
2/* Copyright (C) 2008-2013 Laurent Destailleur <eldy@users.sourceforge.net>
3 * Copyright (C) 2010-2014 Regis Houssin <regis.houssin@inodbox.com>
4 * Copyright (C) 2010-2016 Juanjo Menent <jmenent@2byte.es>
5 * Copyright (C) 2013 Charles-Fr BENKE <charles.fr@benke.fr>
6 * Copyright (C) 2013 Cédric Salvador <csalvador@gpcsolutions.fr>
7 * Copyright (C) 2014 Marcos García <marcosgdf@gmail.com>
8 * Copyright (C) 2015 Bahfir Abbes <bafbes@gmail.com>
9 * Copyright (C) 2016-2017 Ferran Marcet <fmarcet@2byte.es>
10 * Copyright (C) 2019-2023 Frédéric France <frederic.france@netlogic.fr>
11 * Copyright (C) 2024 MDW <mdeweerd@users.noreply.github.com>
12 *
13 * This program is free software; you can redistribute it and/or modify
14 * it under the terms of the GNU General Public License as published by
15 * the Free Software Foundation; either version 3 of the License, or
16 * (at your option) any later version.
17 *
18 * This program is distributed in the hope that it will be useful,
19 * but WITHOUT ANY WARRANTY; without even the implied warranty of
20 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
21 * GNU General Public License for more details.
22 *
23 * You should have received a copy of the GNU General Public License
24 * along with this program. If not, see <https://www.gnu.org/licenses/>.
25 */
26
37class FormFile
38{
39 private $db;
40
44 public $error;
45
46 public $numoffiles;
47 public $infofiles; // Used to return information by function getDocumentsLink
48
49
55 public function __construct($db)
56 {
57 $this->db = $db;
58 $this->numoffiles = 0;
59 }
60
61
62 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
87 public function form_attach_new_file($url, $title = '', $addcancel = 0, $sectionid = 0, $perm = 1, $size = 50, $object = null, $options = '', $useajax = 1, $savingdocmask = '', $linkfiles = 1, $htmlname = 'formuserfile', $accept = '', $sectiondir = '', $usewithoutform = 0, $capture = 0, $disablemulti = 0, $nooutput = 0)
88 {
89 // phpcs:enable
90 global $conf, $langs, $hookmanager;
91 $hookmanager->initHooks(array('formfile'));
92
93 // Deprecation warning
94 if ($useajax == 2) {
95 dol_syslog(__METHOD__.": using 2 for useajax is deprecated and should be not used", LOG_WARNING);
96 }
97
98 if (!empty($conf->browser->layout) && $conf->browser->layout != 'classic') {
99 $useajax = 0;
100 }
101
102 if ((getDolGlobalString('MAIN_USE_JQUERY_FILEUPLOAD') && $useajax) || ($useajax == 2)) {
103 // TODO: Check this works with 2 forms on same page
104 // TODO: Check this works with GED module, otherwise, force useajax to 0
105 // TODO: This does not support option savingdocmask
106 // TODO: This break feature to upload links too
107 // TODO: Thisdoes not work when param nooutput=1
108 //return $this->_formAjaxFileUpload($object);
109 return 'Feature too bugged so removed';
110 } else {
111 //If there is no permission and the option to hide unauthorized actions is enabled, then nothing is printed
112 if (!$perm && getDolGlobalString('MAIN_BUTTON_HIDE_UNAUTHORIZED')) {
113 if ($nooutput) {
114 return '';
115 } else {
116 return 1;
117 }
118 }
119
120 $out = "\n\n".'<!-- Start form attach new file --><div class="formattachnewfile">'."\n";
121
122 if (empty($title)) {
123 $title = $langs->trans("AttachANewFile");
124 }
125 if ($title != 'none') {
126 $out .= load_fiche_titre($title, null, null);
127 }
128
129 if (empty($usewithoutform)) { // Try to avoid this and set instead the form by the caller.
130 // Add a param as GET parameter to detect when POST were cleaned by PHP because a file larger than post_max_size
131 $url .= (strpos($url, '?') === false ? '?' : '&').'uploadform=1';
132
133 $out .= '<form name="'.$htmlname.'" id="'.$htmlname.'" action="'.$url.'" enctype="multipart/form-data" method="POST">'."\n";
134 }
135 if (empty($usewithoutform) || $usewithoutform == 2) {
136 $out .= '<input type="hidden" name="token" value="'.newToken().'">'."\n";
137 $out .= '<input type="hidden" id="'.$htmlname.'_section_dir" name="section_dir" value="'.$sectiondir.'">'."\n";
138 $out .= '<input type="hidden" id="'.$htmlname.'_section_id" name="section_id" value="'.$sectionid.'">'."\n";
139 $out .= '<input type="hidden" name="sortfield" value="'.GETPOST('sortfield', 'aZ09comma').'">'."\n";
140 $out .= '<input type="hidden" name="sortorder" value="'.GETPOST('sortorder', 'aZ09comma').'">'."\n";
141 $out .= '<input type="hidden" name="page_y" value="">'."\n";
142 }
143
144 $out .= '<table class="nobordernopadding centpercent">';
145 $out .= '<tr>';
146
147 if (!empty($options)) {
148 $out .= '<td>'.$options.'</td>';
149 }
150
151 $out .= '<td class="valignmiddle nowrap">';
152
153 $maxfilesizearray = getMaxFileSizeArray();
154 $max = $maxfilesizearray['max'];
155 $maxmin = $maxfilesizearray['maxmin'];
156 $maxphptoshow = $maxfilesizearray['maxphptoshow'];
157 $maxphptoshowparam = $maxfilesizearray['maxphptoshowparam'];
158 if ($maxmin > 0) {
159 $out .= '<input type="hidden" name="MAX_FILE_SIZE" value="'.($maxmin * 1024).'">'; // MAX_FILE_SIZE must precede the field type=file
160 }
161 $out .= '<input class="flat minwidth400 maxwidth200onsmartphone" type="file"';
162 $out .= ((getDolGlobalString('MAIN_DISABLE_MULTIPLE_FILEUPLOAD') || $disablemulti) ? ' name="userfile"' : ' name="userfile[]" multiple');
163 $out .= (!getDolGlobalString('MAIN_UPLOAD_DOC') || empty($perm) ? ' disabled' : '');
164 $out .= (!empty($accept) ? ' accept="'.$accept.'"' : ' accept=""');
165 $out .= (!empty($capture) ? ' capture="capture"' : '');
166 $out .= '>';
167 $out .= ' ';
168 if ($sectionid) { // Show overwrite if exists for ECM module only
169 $langs->load('link');
170 $out .= '<span class="nowraponsmartphone"><input style="margin-right: 2px;" type="checkbox" id="overwritefile" name="overwritefile" value="1"><label for="overwritefile">'.$langs->trans("OverwriteIfExists").'</label></span>';
171 }
172 $out .= '<input type="submit" class="button small reposition" name="sendit" value="'.$langs->trans("Upload").'"';
173 $out .= (!getDolGlobalString('MAIN_UPLOAD_DOC') || empty($perm) ? ' disabled' : '');
174 $out .= '>';
175
176 if ($addcancel) {
177 $out .= ' &nbsp; ';
178 $out .= '<input type="submit" class="button small button-cancel" name="cancel" value="'.$langs->trans("Cancel").'">';
179 }
180
181 if (getDolGlobalString('MAIN_UPLOAD_DOC')) {
182 if ($perm) {
183 $menudolibarrsetupmax = $langs->transnoentitiesnoconv("Home").' - '.$langs->transnoentitiesnoconv("Setup").' - '.$langs->transnoentitiesnoconv("Security");
184 $langs->load('other');
185 $out .= ' ';
186 $out .= info_admin($langs->trans("ThisLimitIsDefinedInSetupAt", $menudolibarrsetupmax, $max, $maxphptoshowparam, $maxphptoshow), 1);
187 }
188 } else {
189 $out .= ' ('.$langs->trans("UploadDisabled").')';
190 }
191 $out .= "</td></tr>";
192
193 if ($savingdocmask) {
194 //add a global variable for disable the auto renaming on upload
195 $rename = (!getDolGlobalString('MAIN_DOC_UPLOAD_NOT_RENAME_BY_DEFAULT') ? 'checked' : '');
196
197 $out .= '<tr>';
198 if (!empty($options)) {
199 $out .= '<td>'.$options.'</td>';
200 }
201 $out .= '<td valign="middle" class="nowrap">';
202 $out .= '<input type="checkbox" '.$rename.' class="savingdocmask" name="savingdocmask" id="savingdocmask" value="'.dol_escape_js($savingdocmask).'"> ';
203 $out .= '<label class="opacitymedium small" for="savingdocmask">';
204 $out .= $langs->trans("SaveUploadedFileWithMask", preg_replace('/__file__/', $langs->transnoentitiesnoconv("OriginFileName"), $savingdocmask), $langs->transnoentitiesnoconv("OriginFileName"));
205 $out .= '</label>';
206 $out .= '</td>';
207 $out .= '</tr>';
208 }
209
210 $out .= "</table>";
211
212 if (empty($usewithoutform)) {
213 $out .= '</form>';
214 if (empty($sectionid)) {
215 $out .= '<br>';
216 }
217 }
218
219 $out .= "\n</div><!-- End form attach new file -->\n";
220
221 if ($linkfiles) {
222 $out .= "\n".'<!-- Start form link new url --><div class="formlinknewurl">'."\n";
223 $langs->load('link');
224 $title = $langs->trans("LinkANewFile");
225 $out .= load_fiche_titre($title, null, null);
226
227 if (empty($usewithoutform)) {
228 $out .= '<form name="'.$htmlname.'_link" id="'.$htmlname.'_link" action="'.$url.'" method="POST">'."\n";
229 $out .= '<input type="hidden" name="token" value="'.newToken().'">'."\n";
230 $out .= '<input type="hidden" id="'.$htmlname.'_link_section_dir" name="link_section_dir" value="">'."\n";
231 $out .= '<input type="hidden" id="'.$htmlname.'_link_section_id" name="link_section_id" value="'.$sectionid.'">'."\n";
232 $out .= '<input type="hidden" name="page_y" value="">'."\n";
233 }
234
235 $out .= '<div class="valignmiddle">';
236 $out .= '<div class="inline-block" style="padding-right: 10px;">';
237 if (getDolGlobalString('OPTIMIZEFORTEXTBROWSER')) {
238 $out .= '<label for="link">'.$langs->trans("URLToLink").':</label> ';
239 }
240 $out .= '<input type="text" name="link" class="flat minwidth400imp" id="link" placeholder="'.dol_escape_htmltag($langs->trans("URLToLink")).'">';
241 $out .= '</div>';
242 $out .= '<div class="inline-block" style="padding-right: 10px;">';
243 if (getDolGlobalString('OPTIMIZEFORTEXTBROWSER')) {
244 $out .= '<label for="label">'.$langs->trans("Label").':</label> ';
245 }
246 $out .= '<input type="text" class="flat" name="label" id="label" placeholder="'.dol_escape_htmltag($langs->trans("Label")).'">';
247 $out .= '<input type="hidden" name="objecttype" value="'.$object->element.'">';
248 $out .= '<input type="hidden" name="objectid" value="'.$object->id.'">';
249 $out .= '</div>';
250 $out .= '<div class="inline-block" style="padding-right: 10px;">';
251 $out .= '<input type="submit" class="button small reposition" name="linkit" value="'.$langs->trans("ToLink").'"';
252 $out .= (!getDolGlobalString('MAIN_UPLOAD_DOC') || empty($perm) ? ' disabled' : '');
253 $out .= '>';
254 $out .= '</div>';
255 $out .= '</div>';
256 if (empty($usewithoutform)) {
257 $out .= '<div class="clearboth"></div>';
258 $out .= '</form><br>';
259 }
260
261 $out .= "\n</div><!-- End form link new url -->\n";
262 }
263
264 $parameters = array('socid' => (isset($GLOBALS['socid']) ? $GLOBALS['socid'] : ''), 'id' => (isset($GLOBALS['id']) ? $GLOBALS['id'] : ''), 'url' => $url, 'perm' => $perm, 'options' => $options);
265 $res = $hookmanager->executeHooks('formattachOptions', $parameters, $object);
266 if (empty($res)) {
267 $out = '<div class="'.($usewithoutform ? 'inline-block valignmiddle' : 'attacharea attacharea'.$htmlname).'">'.$out.'</div>';
268 }
269 $out .= $hookmanager->resPrint;
270
271 if ($nooutput) {
272 return $out;
273 } else {
274 print $out;
275 return 1;
276 }
277 }
278 }
279
280 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
303 public function show_documents($modulepart, $modulesubdir, $filedir, $urlsource, $genallowed, $delallowed = 0, $modelselected = '', $allowgenifempty = 1, $forcenomultilang = 0, $iconPDF = 0, $notused = 0, $noform = 0, $param = '', $title = '', $buttonlabel = '', $codelang = '')
304 {
305 // phpcs:enable
306 $this->numoffiles = 0;
307 print $this->showdocuments($modulepart, $modulesubdir, $filedir, $urlsource, $genallowed, $delallowed, $modelselected, $allowgenifempty, $forcenomultilang, $iconPDF, $notused, $noform, $param, $title, $buttonlabel, $codelang);
308 return $this->numoffiles;
309 }
310
338 public function showdocuments($modulepart, $modulesubdir, $filedir, $urlsource, $genallowed, $delallowed = 0, $modelselected = '', $allowgenifempty = 1, $forcenomultilang = 0, $iconPDF = 0, $notused = 0, $noform = 0, $param = '', $title = '', $buttonlabel = '', $codelang = '', $morepicto = '', $object = null, $hideifempty = 0, $removeaction = 'remove_file', $tooltipontemplatecombo = '')
339 {
340 global $dolibarr_main_url_root;
341
342 // Deprecation warning
343 if (!empty($iconPDF)) {
344 dol_syslog(__METHOD__.": passing iconPDF parameter is deprecated", LOG_WARNING);
345 }
346
347 global $langs, $conf, $user, $hookmanager;
348 global $form;
349
350 $reshook = 0;
351 if (is_object($hookmanager)) {
352 $parameters = array(
353 'modulepart' => &$modulepart,
354 'modulesubdir' => &$modulesubdir,
355 'filedir' => &$filedir,
356 'urlsource' => &$urlsource,
357 'genallowed' => &$genallowed,
358 'delallowed' => &$delallowed,
359 'modelselected' => &$modelselected,
360 'allowgenifempty' => &$allowgenifempty,
361 'forcenomultilang' => &$forcenomultilang,
362 'noform' => &$noform,
363 'param' => &$param,
364 'title' => &$title,
365 'buttonlabel' => &$buttonlabel,
366 'codelang' => &$codelang,
367 'morepicto' => &$morepicto,
368 'hideifempty' => &$hideifempty,
369 'removeaction' => &$removeaction
370 );
371 $reshook = $hookmanager->executeHooks('showDocuments', $parameters, $object); // Note that parameters may have been updated by hook
372 // May report error
373 if ($reshook < 0) {
374 setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
375 }
376 }
377 // Remode default action if $reskook > 0
378 if ($reshook > 0) {
379 return $hookmanager->resPrint;
380 }
381
382 if (!is_object($form)) {
383 $form = new Form($this->db);
384 }
385
386 include_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
387
388 // For backward compatibility
389 if (!empty($iconPDF)) {
390 return $this->getDocumentsLink($modulepart, $modulesubdir, $filedir);
391 }
392
393 // Add entity in $param if not already exists
394 if (!preg_match('/entity\=[0-9]+/', $param)) {
395 $param .= ($param ? '&' : '').'entity='.(empty($object->entity) ? $conf->entity : $object->entity);
396 }
397
398 $printer = 0;
399 // The direct print feature is implemented only for such elements
400 if (in_array($modulepart, array('contract', 'facture', 'supplier_proposal', 'propal', 'proposal', 'order', 'commande', 'expedition', 'commande_fournisseur', 'expensereport', 'delivery', 'ticket'))) {
401 $printer = ($user->hasRight('printing', 'read') && !empty($conf->printing->enabled));
402 }
403
404 $hookmanager->initHooks(array('formfile'));
405
406 // Get list of files
407 $file_list = null;
408 if (!empty($filedir)) {
409 $file_list = dol_dir_list($filedir, 'files', 0, '', '(\.meta|_preview.*.*\.png)$', 'date', SORT_DESC);
410 }
411 if ($hideifempty && empty($file_list)) {
412 return '';
413 }
414
415 $out = '';
416 $forname = 'builddoc';
417 $headershown = 0;
418 $showempty = 0;
419 $i = 0;
420
421 $out .= "\n".'<!-- Start show_document -->'."\n";
422 //print 'filedir='.$filedir;
423
424 if (preg_match('/massfilesarea_/', $modulepart)) {
425 $out .= '<div id="show_files"><br></div>'."\n";
426 $title = $langs->trans("MassFilesArea").' <a href="" id="togglemassfilesarea" ref="shown">('.$langs->trans("Hide").')</a>';
427 $title .= '<script nonce="'.getNonce().'">
428 jQuery(document).ready(function() {
429 jQuery(\'#togglemassfilesarea\').click(function() {
430 if (jQuery(\'#togglemassfilesarea\').attr(\'ref\') == "shown")
431 {
432 jQuery(\'#'.$modulepart.'_table\').hide();
433 jQuery(\'#togglemassfilesarea\').attr("ref", "hidden");
434 jQuery(\'#togglemassfilesarea\').text("('.dol_escape_js($langs->trans("Show")).')");
435 }
436 else
437 {
438 jQuery(\'#'.$modulepart.'_table\').show();
439 jQuery(\'#togglemassfilesarea\').attr("ref","shown");
440 jQuery(\'#togglemassfilesarea\').text("('.dol_escape_js($langs->trans("Hide")).')");
441 }
442 return false;
443 });
444 });
445 </script>';
446 }
447
448 $titletoshow = $langs->trans("Documents");
449 if (!empty($title)) {
450 $titletoshow = ($title == 'none' ? '' : $title);
451 }
452
453 $submodulepart = $modulepart;
454
455 // modulepart = 'nameofmodule' or 'nameofmodule:NameOfObject'
456 $tmp = explode(':', $modulepart);
457 if (!empty($tmp[1])) {
458 $modulepart = $tmp[0];
459 $submodulepart = $tmp[1];
460 }
461
462 $addcolumforpicto = ($delallowed || $printer || $morepicto);
463 $colspan = (4 + ($addcolumforpicto ? 1 : 0));
464 $colspanmore = 0;
465
466 // Show table
467 if ($genallowed) {
468 $modellist = array();
469
470 if ($modulepart == 'company') {
471 $showempty = 1; // can have no template active
472 if (is_array($genallowed)) {
473 $modellist = $genallowed;
474 } else {
475 include_once DOL_DOCUMENT_ROOT.'/core/modules/societe/modules_societe.class.php';
476 $modellist = ModeleThirdPartyDoc::liste_modeles($this->db);
477 }
478 } elseif ($modulepart == 'propal') {
479 if (is_array($genallowed)) {
480 $modellist = $genallowed;
481 } else {
482 include_once DOL_DOCUMENT_ROOT.'/core/modules/propale/modules_propale.php';
483 $modellist = ModelePDFPropales::liste_modeles($this->db);
484 }
485 } elseif ($modulepart == 'supplier_proposal') {
486 if (is_array($genallowed)) {
487 $modellist = $genallowed;
488 } else {
489 include_once DOL_DOCUMENT_ROOT.'/core/modules/supplier_proposal/modules_supplier_proposal.php';
490 $modellist = ModelePDFSupplierProposal::liste_modeles($this->db);
491 }
492 } elseif ($modulepart == 'commande') {
493 if (is_array($genallowed)) {
494 $modellist = $genallowed;
495 } else {
496 include_once DOL_DOCUMENT_ROOT.'/core/modules/commande/modules_commande.php';
497 $modellist = ModelePDFCommandes::liste_modeles($this->db);
498 }
499 } elseif ($modulepart == 'expedition') {
500 if (is_array($genallowed)) {
501 $modellist = $genallowed;
502 } else {
503 include_once DOL_DOCUMENT_ROOT.'/core/modules/expedition/modules_expedition.php';
504 $modellist = ModelePdfExpedition::liste_modeles($this->db);
505 }
506 } elseif ($modulepart == 'reception') {
507 if (is_array($genallowed)) {
508 $modellist = $genallowed;
509 } else {
510 include_once DOL_DOCUMENT_ROOT.'/core/modules/reception/modules_reception.php';
511 $modellist = ModelePdfReception::liste_modeles($this->db);
512 }
513 } elseif ($modulepart == 'delivery') {
514 if (is_array($genallowed)) {
515 $modellist = $genallowed;
516 } else {
517 include_once DOL_DOCUMENT_ROOT.'/core/modules/delivery/modules_delivery.php';
518 $modellist = ModelePDFDeliveryOrder::liste_modeles($this->db);
519 }
520 } elseif ($modulepart == 'ficheinter') {
521 if (is_array($genallowed)) {
522 $modellist = $genallowed;
523 } else {
524 include_once DOL_DOCUMENT_ROOT.'/core/modules/fichinter/modules_fichinter.php';
525 $modellist = ModelePDFFicheinter::liste_modeles($this->db);
526 }
527 } elseif ($modulepart == 'facture') {
528 if (is_array($genallowed)) {
529 $modellist = $genallowed;
530 } else {
531 include_once DOL_DOCUMENT_ROOT.'/core/modules/facture/modules_facture.php';
532 $modellist = ModelePDFFactures::liste_modeles($this->db);
533 }
534 } elseif ($modulepart == 'contract') {
535 $showempty = 1; // can have no template active
536 if (is_array($genallowed)) {
537 $modellist = $genallowed;
538 } else {
539 include_once DOL_DOCUMENT_ROOT.'/core/modules/contract/modules_contract.php';
540 $modellist = ModelePDFContract::liste_modeles($this->db);
541 }
542 } elseif ($modulepart == 'project') {
543 if (is_array($genallowed)) {
544 $modellist = $genallowed;
545 } else {
546 include_once DOL_DOCUMENT_ROOT.'/core/modules/project/modules_project.php';
547 $modellist = ModelePDFProjects::liste_modeles($this->db);
548 }
549 } elseif ($modulepart == 'project_task') {
550 if (is_array($genallowed)) {
551 $modellist = $genallowed;
552 } else {
553 include_once DOL_DOCUMENT_ROOT.'/core/modules/project/task/modules_task.php';
554 $modellist = ModelePDFTask::liste_modeles($this->db);
555 }
556 } elseif ($modulepart == 'product') {
557 if (is_array($genallowed)) {
558 $modellist = $genallowed;
559 } else {
560 include_once DOL_DOCUMENT_ROOT.'/core/modules/product/modules_product.class.php';
561 $modellist = ModelePDFProduct::liste_modeles($this->db);
562 }
563 } elseif ($modulepart == 'product_batch') {
564 if (is_array($genallowed)) {
565 $modellist = $genallowed;
566 } else {
567 include_once DOL_DOCUMENT_ROOT.'/core/modules/product_batch/modules_product_batch.class.php';
568 $modellist = ModelePDFProductBatch::liste_modeles($this->db);
569 }
570 } elseif ($modulepart == 'stock') {
571 if (is_array($genallowed)) {
572 $modellist = $genallowed;
573 } else {
574 include_once DOL_DOCUMENT_ROOT.'/core/modules/stock/modules_stock.php';
575 $modellist = ModelePDFStock::liste_modeles($this->db);
576 }
577 } elseif ($modulepart == 'hrm') {
578 if (is_array($genallowed)) {
579 $modellist = $genallowed;
580 } else {
581 include_once DOL_DOCUMENT_ROOT.'/core/modules/hrm/modules_evaluation.php';
582 $modellist = ModelePDFEvaluation::liste_modeles($this->db);
583 }
584 } elseif ($modulepart == 'movement') {
585 if (is_array($genallowed)) {
586 $modellist = $genallowed;
587 } else {
588 include_once DOL_DOCUMENT_ROOT.'/core/modules/stock/modules_movement.php';
589 $modellist = ModelePDFMovement::liste_modeles($this->db);
590 }
591 } elseif ($modulepart == 'export') {
592 if (is_array($genallowed)) {
593 $modellist = $genallowed;
594 } else {
595 include_once DOL_DOCUMENT_ROOT.'/core/modules/export/modules_export.php';
596 //$modellist = ModeleExports::liste_modeles($this->db); // liste_modeles() does not exists. We are using listOfAvailableExportFormat() method instead that return a different array format.
597 $modellist = array();
598 }
599 } elseif ($modulepart == 'commande_fournisseur' || $modulepart == 'supplier_order') {
600 if (is_array($genallowed)) {
601 $modellist = $genallowed;
602 } else {
603 include_once DOL_DOCUMENT_ROOT.'/core/modules/supplier_order/modules_commandefournisseur.php';
604 $modellist = ModelePDFSuppliersOrders::liste_modeles($this->db);
605 }
606 } elseif ($modulepart == 'facture_fournisseur' || $modulepart == 'supplier_invoice') {
607 $showempty = 1; // can have no template active
608 if (is_array($genallowed)) {
609 $modellist = $genallowed;
610 } else {
611 include_once DOL_DOCUMENT_ROOT.'/core/modules/supplier_invoice/modules_facturefournisseur.php';
612 $modellist = ModelePDFSuppliersInvoices::liste_modeles($this->db);
613 }
614 } elseif ($modulepart == 'supplier_payment') {
615 if (is_array($genallowed)) {
616 $modellist = $genallowed;
617 } else {
618 include_once DOL_DOCUMENT_ROOT.'/core/modules/supplier_payment/modules_supplier_payment.php';
619 $modellist = ModelePDFSuppliersPayments::liste_modeles($this->db);
620 }
621 } elseif ($modulepart == 'remisecheque') {
622 if (is_array($genallowed)) {
623 $modellist = $genallowed;
624 } else {
625 include_once DOL_DOCUMENT_ROOT.'/core/modules/cheque/modules_chequereceipts.php';
626 $modellist = ModeleChequeReceipts::liste_modeles($this->db);
627 }
628 } elseif ($modulepart == 'donation') {
629 if (is_array($genallowed)) {
630 $modellist = $genallowed;
631 } else {
632 include_once DOL_DOCUMENT_ROOT.'/core/modules/dons/modules_don.php';
633 $modellist = ModeleDon::liste_modeles($this->db);
634 }
635 } elseif ($modulepart == 'member') {
636 if (is_array($genallowed)) {
637 $modellist = $genallowed;
638 } else {
639 include_once DOL_DOCUMENT_ROOT.'/core/modules/member/modules_cards.php';
640 $modellist = ModelePDFCards::liste_modeles($this->db);
641 }
642 } elseif ($modulepart == 'agenda' || $modulepart == 'actions') {
643 if (is_array($genallowed)) {
644 $modellist = $genallowed;
645 } else {
646 include_once DOL_DOCUMENT_ROOT.'/core/modules/action/modules_action.php';
647 $modellist = ModeleAction::liste_modeles($this->db);
648 }
649 } elseif ($modulepart == 'expensereport') {
650 if (is_array($genallowed)) {
651 $modellist = $genallowed;
652 } else {
653 include_once DOL_DOCUMENT_ROOT.'/core/modules/expensereport/modules_expensereport.php';
654 $modellist = ModeleExpenseReport::liste_modeles($this->db);
655 }
656 } elseif ($modulepart == 'unpaid') {
657 $modellist = '';
658 } elseif ($modulepart == 'user') {
659 if (is_array($genallowed)) {
660 $modellist = $genallowed;
661 } else {
662 include_once DOL_DOCUMENT_ROOT.'/core/modules/user/modules_user.class.php';
663 $modellist = ModelePDFUser::liste_modeles($this->db);
664 }
665 } elseif ($modulepart == 'usergroup') {
666 if (is_array($genallowed)) {
667 $modellist = $genallowed;
668 } else {
669 include_once DOL_DOCUMENT_ROOT.'/core/modules/usergroup/modules_usergroup.class.php';
670 $modellist = ModelePDFUserGroup::liste_modeles($this->db);
671 }
672 } else {
673 // For normalized standard modules
674 $file = dol_buildpath('/core/modules/'.$modulepart.'/modules_'.strtolower($submodulepart).'.php', 0);
675 if (file_exists($file)) {
676 $res = include_once $file;
677 } else {
678 // For normalized external modules.
679 $file = dol_buildpath('/'.$modulepart.'/core/modules/'.$modulepart.'/modules_'.strtolower($submodulepart).'.php', 0);
680 $res = include_once $file;
681 }
682
683 $class = 'ModelePDF'.ucfirst($submodulepart);
684
685 if (class_exists($class)) {
686 $modellist = call_user_func($class.'::liste_modeles', $this->db);
687 } else {
688 dol_print_error($this->db, "Bad value for modulepart '".$modulepart."' in showdocuments (class ".$class." for Doc generation not found)");
689 return -1;
690 }
691 }
692
693 // Set headershown to avoid to have table opened a second time later
694 $headershown = 1;
695
696 if (empty($buttonlabel)) {
697 $buttonlabel = $langs->trans('Generate');
698 }
699
700 if ($conf->browser->layout == 'phone') {
701 $urlsource .= '#'.$forname.'_form'; // So we switch to form after a generation
702 }
703 if (empty($noform)) {
704 $out .= '<form action="'.$urlsource.'" id="'.$forname.'_form" method="post">';
705 }
706 $out .= '<input type="hidden" name="action" value="builddoc">';
707 $out .= '<input type="hidden" name="page_y" value="">';
708 $out .= '<input type="hidden" name="token" value="'.newToken().'">';
709
710 $out .= load_fiche_titre($titletoshow, '', '');
711 $out .= '<div class="div-table-responsive-no-min">';
712 $out .= '<table class="liste formdoc noborder centpercent">';
713
714 $out .= '<tr class="liste_titre">';
715 $addcolumforpicto = ($delallowed || $printer || $morepicto);
716 $colspan = (4 + ($addcolumforpicto ? 1 : 0));
717 $colspanmore = 0;
718
719 $out .= '<th colspan="'.$colspan.'" class="formdoc liste_titre maxwidthonsmartphone center">';
720
721 // Model
722 if (!empty($modellist)) {
723 asort($modellist);
724 $out .= '<span class="hideonsmartphone">'.$langs->trans('Model').' </span>';
725 if (is_array($modellist) && count($modellist) == 1) { // If there is only one element
726 $arraykeys = array_keys($modellist);
727 $modelselected = $arraykeys[0];
728 }
729 $morecss = 'minwidth75 maxwidth200';
730 if ($conf->browser->layout == 'phone') {
731 $morecss = 'maxwidth100';
732 }
733 $out .= $form->selectarray('model', $modellist, $modelselected, $showempty, 0, 0, '', 0, 0, 0, '', $morecss, 1, '', 0, 0);
734 // script for select the separator
735 /* TODO This must appear on export feature only
736 $out .= '<label class="forhide" for="delimiter">Delimiter:</label>';
737 $out .= '<input type="radio" class="testinput forhide" name="delimiter" value="," id="comma" checked><label class="forhide" for="comma">,</label>';
738 $out .= '<input type="radio" class="testinput forhide" name="delimiter" value=";" id="semicolon"><label class="forhide" for="semicolon">;</label>';
739
740 $out .= '<script>
741 jQuery(document).ready(function() {
742 $(".selectformat").on("change", function() {
743 var separator;
744 var selected = $(this).val();
745 if (selected == "excel2007" || selected == "tsv") {
746 $("input.testinput").prop("disabled", true);
747 $(".forhide").hide();
748 } else {
749 $("input.testinput").prop("disabled", false);
750 $(".forhide").show();
751 }
752
753 if ($("#semicolon").is(":checked")) {
754 separator = ";";
755 } else {
756 separator = ",";
757 }
758 });
759 if ("' . $conf->global->EXPORT_CSV_SEPARATOR_TO_USE . '" == ";") {
760 $("#semicolon").prop("checked", true);
761 } else {
762 $("#comma").prop("checked", true);
763 }
764 });
765 </script>';
766 */
767 if ($conf->use_javascript_ajax) {
768 $out .= ajax_combobox('model');
769 }
770 $out .= $form->textwithpicto('', $tooltipontemplatecombo, 1, 'help', 'marginrightonly', 0, 3, '', 0);
771 } else {
772 $out .= '<div class="float">'.$langs->trans("Files").'</div>';
773 }
774
775 // Language code (if multilang)
776 if (($allowgenifempty || (is_array($modellist) && count($modellist) > 0)) && getDolGlobalInt('MAIN_MULTILANGS') && !$forcenomultilang && (!empty($modellist) || $showempty)) {
777 include_once DOL_DOCUMENT_ROOT.'/core/class/html.formadmin.class.php';
778 $formadmin = new FormAdmin($this->db);
779 $defaultlang = ($codelang && $codelang != 'auto') ? $codelang : $langs->getDefaultLang();
780 $morecss = 'maxwidth150';
781 if ($conf->browser->layout == 'phone') {
782 $morecss = 'maxwidth100';
783 }
784 $out .= $formadmin->select_language($defaultlang, 'lang_id', 0, null, 0, 0, 0, $morecss);
785 } else {
786 $out .= '&nbsp;';
787 }
788
789 // Button
790 $genbutton = '<input class="button buttongen reposition nomargintop nomarginbottom" id="'.$forname.'_generatebutton" name="'.$forname.'_generatebutton"';
791 $genbutton .= ' type="submit" value="'.$buttonlabel.'"';
792 if (!$allowgenifempty && !is_array($modellist) && empty($modellist)) {
793 $genbutton .= ' disabled';
794 }
795 $genbutton .= '>';
796 if ($allowgenifempty && !is_array($modellist) && empty($modellist) && empty($conf->dol_no_mouse_hover) && $modulepart != 'unpaid') {
797 $langs->load("errors");
798 $genbutton .= ' '.img_warning($langs->transnoentitiesnoconv("WarningNoDocumentModelActivated"));
799 }
800 if (!$allowgenifempty && !is_array($modellist) && empty($modellist) && empty($conf->dol_no_mouse_hover) && $modulepart != 'unpaid') {
801 $genbutton = '';
802 }
803 if (empty($modellist) && !$showempty && $modulepart != 'unpaid') {
804 $genbutton = '';
805 }
806 $out .= $genbutton;
807 $out .= '</th>';
808
809 if (!empty($hookmanager->hooks['formfile'])) {
810 foreach ($hookmanager->hooks['formfile'] as $module) {
811 if (method_exists($module, 'formBuilddocLineOptions')) {
812 $colspanmore++;
813 $out .= '<th></th>';
814 }
815 }
816 }
817 $out .= '</tr>';
818
819 // Execute hooks
820 $parameters = array('colspan' => ($colspan + $colspanmore), 'socid' => (isset($GLOBALS['socid']) ? $GLOBALS['socid'] : ''), 'id' => (isset($GLOBALS['id']) ? $GLOBALS['id'] : ''), 'modulepart' => $modulepart);
821 if (is_object($hookmanager)) {
822 $reshook = $hookmanager->executeHooks('formBuilddocOptions', $parameters, $GLOBALS['object']);
823 $out .= $hookmanager->resPrint;
824 }
825 }
826
827 // Get list of files
828 if (!empty($filedir)) {
829 $link_list = array();
830 if (is_object($object)) {
831 require_once DOL_DOCUMENT_ROOT.'/core/class/link.class.php';
832 $link = new Link($this->db);
833 $sortfield = $sortorder = null;
834 $res = $link->fetchAll($link_list, $object->element, $object->id, $sortfield, $sortorder);
835 }
836
837 $out .= '<!-- html.formfile::showdocuments -->'."\n";
838
839 // Show title of array if not already shown
840 if ((!empty($file_list) || !empty($link_list) || preg_match('/^massfilesarea/', $modulepart))
841 && !$headershown) {
842 $headershown = 1;
843 $out .= '<div class="titre">'.$titletoshow.'</div>'."\n";
844 $out .= '<div class="div-table-responsive-no-min">';
845 $out .= '<table class="noborder centpercent" id="'.$modulepart.'_table">'."\n";
846 }
847
848 // Loop on each file found
849 if (is_array($file_list)) {
850 // Defined relative dir to DOL_DATA_ROOT
851 $relativedir = '';
852 if ($filedir) {
853 $relativedir = preg_replace('/^'.preg_quote(DOL_DATA_ROOT, '/').'/', '', $filedir);
854 $relativedir = preg_replace('/^[\\/]/', '', $relativedir);
855 }
856
857 // Get list of files stored into database for same relative directory
858 if ($relativedir) {
859 completeFileArrayWithDatabaseInfo($file_list, $relativedir);
860
861 //var_dump($sortfield.' - '.$sortorder);
862 if (!empty($sortfield) && !empty($sortorder)) { // If $sortfield is for example 'position_name', we will sort on the property 'position_name' (that is concat of position+name)
863 $file_list = dol_sort_array($file_list, $sortfield, $sortorder);
864 }
865 }
866
867 foreach ($file_list as $file) {
868 // Define relative path for download link (depends on module)
869 $relativepath = $file["name"]; // Cas general
870 if ($modulesubdir) {
871 $relativepath = $modulesubdir."/".$file["name"]; // Cas propal, facture...
872 }
873 if ($modulepart == 'export') {
874 $relativepath = $file["name"]; // Other case
875 }
876
877 $out .= '<tr class="oddeven">';
878
879 $documenturl = DOL_URL_ROOT.'/document.php';
880 if (isset($conf->global->DOL_URL_ROOT_DOCUMENT_PHP)) {
881 $documenturl = getDolGlobalString('DOL_URL_ROOT_DOCUMENT_PHP'); // To use another wrapper
882 }
883
884 // Show file name with link to download
885 $imgpreview = $this->showPreview($file, $modulepart, $relativepath, 0, $param);
886
887 $out .= '<td class="minwidth200 tdoverflowmax300">';
888 if ($imgpreview) {
889 $out .= '<span class="spanoverflow widthcentpercentminusx valignmiddle">';
890 } else {
891 $out .= '<span class="spanoverflow">';
892 }
893 $out .= '<a class="documentdownload paddingright" ';
894 if (getDolGlobalInt('MAIN_DISABLE_FORCE_SAVEAS') == 2) {
895 $out .= 'target="_blank" ';
896 }
897 $out .= 'href="'.$documenturl.'?modulepart='.$modulepart.'&file='.urlencode($relativepath).($param ? '&'.$param : '').'"';
898
899 $mime = dol_mimetype($relativepath, '', 0);
900 if (preg_match('/text/', $mime)) {
901 $out .= ' target="_blank" rel="noopener noreferrer"';
902 }
903 $out .= ' title="'.dol_escape_htmltag($file["name"]).'"';
904 $out .= '>';
905 $out .= img_mime($file["name"], $langs->trans("File").': '.$file["name"]);
906 $out .= dol_trunc($file["name"], 150);
907 $out .= '</a>';
908 $out .= '</span>'."\n";
909 $out .= $imgpreview;
910 $out .= '</td>';
911
912 // Show file size
913 $size = (!empty($file['size']) ? $file['size'] : dol_filesize($filedir."/".$file["name"]));
914 $out .= '<td class="nowraponall right">'.dol_print_size($size, 1, 1).'</td>';
915
916 // Show file date
917 $date = (!empty($file['date']) ? $file['date'] : dol_filemtime($filedir."/".$file["name"]));
918 $out .= '<td class="nowrap right">'.dol_print_date($date, 'dayhour', 'tzuser').'</td>';
919
920 // Show share link
921 $out .= '<td class="nowraponall">';
922 if (!empty($file['share'])) {
923 // Define $urlwithroot
924 $urlwithouturlroot = preg_replace('/'.preg_quote(DOL_URL_ROOT, '/').'$/i', '', trim($dolibarr_main_url_root));
925 $urlwithroot = $urlwithouturlroot.DOL_URL_ROOT; // This is to use external domain name found into config file
926 //$urlwithroot=DOL_MAIN_URL_ROOT; // This is to use same domain name than current
927
928 //print '<span class="opacitymedium">'.$langs->trans("Hash").' : '.$file['share'].'</span>';
929 $forcedownload = 0;
930 $paramlink = '';
931 if (!empty($file['share'])) {
932 $paramlink .= ($paramlink ? '&' : '').'hashp='.$file['share']; // Hash for public share
933 }
934 if ($forcedownload) {
935 $paramlink .= ($paramlink ? '&' : '').'attachment=1';
936 }
937
938 $fulllink = $urlwithroot.'/document.php'.($paramlink ? '?'.$paramlink : '');
939
940 $out .= '<a href="'.$fulllink.'" target="_blank" rel="noopener">'.img_picto($langs->trans("FileSharedViaALink"), 'globe').'</a> ';
941 $out .= '<input type="text" class="quatrevingtpercentminusx width75 nopadding small" id="downloadlink'.$file['rowid'].'" name="downloadexternallink" title="'.dol_escape_htmltag($langs->trans("FileSharedViaALink")).'" value="'.dol_escape_htmltag($fulllink).'">';
942 $out .= ajax_autoselect('downloadlink'.$file['rowid']);
943 } else {
944 //print '<span class="opacitymedium">'.$langs->trans("FileNotShared").'</span>';
945 }
946 $out .= '</td>';
947
948 // Show picto delete, print...
949 if ($delallowed || $printer || $morepicto) {
950 $out .= '<td class="right nowraponall">';
951 if ($delallowed) {
952 $tmpurlsource = preg_replace('/#[a-zA-Z0-9_]*$/', '', $urlsource);
953 $out .= '<a class="reposition" href="'.$tmpurlsource.((strpos($tmpurlsource, '?') === false) ? '?' : '&').'action='.urlencode($removeaction).'&token='.newToken().'&file='.urlencode($relativepath);
954 $out .= ($param ? '&'.$param : '');
955 //$out.= '&modulepart='.$modulepart; // TODO obsolete ?
956 //$out.= '&urlsource='.urlencode($urlsource); // TODO obsolete ?
957 $out .= '">'.img_picto($langs->trans("Delete"), 'delete').'</a>';
958 }
959 if ($printer) {
960 $out .= '<a class="marginleftonly reposition" href="'.$urlsource.(strpos($urlsource, '?') ? '&' : '?').'action=print_file&token='.newToken().'&printer='.urlencode($modulepart).'&file='.urlencode($relativepath);
961 $out .= ($param ? '&'.$param : '');
962 $out .= '">'.img_picto($langs->trans("PrintFile", $relativepath), 'printer.png').'</a>';
963 }
964 if ($morepicto) {
965 $morepicto = preg_replace('/__FILENAMEURLENCODED__/', urlencode($relativepath), $morepicto);
966 $out .= $morepicto;
967 }
968 $out .= '</td>';
969 }
970
971 if (is_object($hookmanager)) {
972 $addcolumforpicto = ($delallowed || $printer || $morepicto);
973 $colspan = (4 + ($addcolumforpicto ? 1 : 0));
974 $colspanmore = 0;
975 $parameters = array('colspan' => ($colspan + $colspanmore), 'socid' => (isset($GLOBALS['socid']) ? $GLOBALS['socid'] : ''), 'id' => (isset($GLOBALS['id']) ? $GLOBALS['id'] : ''), 'modulepart' => $modulepart, 'relativepath' => $relativepath);
976 $res = $hookmanager->executeHooks('formBuilddocLineOptions', $parameters, $file);
977 if (empty($res)) {
978 $out .= $hookmanager->resPrint; // Complete line
979 $out .= '</tr>';
980 } else {
981 $out = $hookmanager->resPrint; // Replace all $out
982 }
983 }
984 }
985
986 $this->numoffiles++;
987 }
988 // Loop on each link found
989 if (is_array($link_list)) {
990 $colspan = 2;
991
992 foreach ($link_list as $file) {
993 $out .= '<tr class="oddeven">';
994 $out .= '<td colspan="'.$colspan.'" class="maxwidhtonsmartphone">';
995 $out .= '<a data-ajax="false" href="'.$file->url.'" target="_blank" rel="noopener noreferrer">';
996 $out .= $file->label;
997 $out .= '</a>';
998 $out .= '</td>';
999 $out .= '<td class="right">';
1000 $out .= dol_print_date($file->datea, 'dayhour');
1001 $out .= '</td>';
1002 // for share link of files
1003 $out .= '<td></td>';
1004 if ($delallowed || $printer || $morepicto) {
1005 $out .= '<td></td>';
1006 }
1007 $out .= '</tr>'."\n";
1008 }
1009 $this->numoffiles++;
1010 }
1011
1012 if (count($file_list) == 0 && count($link_list) == 0 && $headershown) {
1013 $out .= '<tr><td colspan="'.(3 + ($addcolumforpicto ? 1 : 0)).'"><span class="opacitymedium">'.$langs->trans("None").'</span></td></tr>'."\n";
1014 }
1015 }
1016
1017 if ($headershown) {
1018 // Affiche pied du tableau
1019 $out .= "</table>\n";
1020 $out .= "</div>\n";
1021 if ($genallowed) {
1022 if (empty($noform)) {
1023 $out .= '</form>'."\n";
1024 }
1025 }
1026 }
1027 $out .= '<!-- End show_document -->'."\n";
1028
1029 $out .= '<script>
1030 jQuery(document).ready(function() {
1031 var selectedValue = $(".selectformat").val();
1032
1033 if (selectedValue === "excel2007" || selectedValue === "tsv") {
1034 $(".forhide").prop("disabled", true).hide();
1035 } else {
1036 $(".forhide").prop("disabled", false).show();
1037 }
1038 });
1039 </script>';
1040 //return ($i?$i:$headershown);
1041 return $out;
1042 }
1043
1057 public function getDocumentsLink($modulepart, $modulesubdir, $filedir, $filter = '', $morecss = 'valignmiddle', $allfiles = 0)
1058 {
1059 global $conf, $langs;
1060
1061 include_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
1062
1063 $out = '';
1064 $this->infofiles = array('nboffiles' => 0, 'extensions' => array(), 'files' => array());
1065
1066 $entity = 1; // Without multicompany
1067
1068 // Get object entity
1069 if (isModEnabled('multicompany')) {
1070 $regs = array();
1071 preg_match('/\/([0-9]+)\/[^\/]+\/'.preg_quote($modulesubdir, '/').'$/', $filedir, $regs);
1072 $entity = ((!empty($regs[1]) && $regs[1] > 1) ? $regs[1] : 1); // If entity id not found in $filedir this is entity 1 by default
1073 }
1074
1075 // Get list of files starting with name of ref (Note: files with '^ref\.extension' are generated files, files with '^ref-...' are uploaded files)
1076 if ($allfiles || getDolGlobalString('MAIN_SHOW_ALL_FILES_ON_DOCUMENT_TOOLTIP')) {
1077 $filterforfilesearch = '^'.preg_quote(basename($modulesubdir), '/');
1078 } else {
1079 $filterforfilesearch = '^'.preg_quote(basename($modulesubdir), '/').'\.';
1080 }
1081 $file_list = dol_dir_list($filedir, 'files', 0, $filterforfilesearch, '\.meta$|\.png$'); // We also discard .meta and .png preview
1082
1083 //var_dump($file_list);
1084 // For ajax treatment
1085 $out .= '<!-- html.formfile::getDocumentsLink -->'."\n";
1086 if (!empty($file_list)) {
1087 $out = '<dl class="dropdown inline-block">
1088 <dt><a data-ajax="false" href="#" onClick="return false;">'.img_picto('', 'listlight', '', 0, 0, 0, '', $morecss).'</a></dt>
1089 <dd><div class="multichoicedoc" style="position:absolute;left:100px;" ><ul class="ulselectedfields">';
1090 $tmpout = '';
1091
1092 // Loop on each file found
1093 $found = 0;
1094 $i = 0;
1095 foreach ($file_list as $file) {
1096 $i++;
1097 if ($filter && !preg_match('/'.$filter.'/i', $file["name"])) {
1098 continue; // Discard this. It does not match provided filter.
1099 }
1100
1101 $found++;
1102 // Define relative path for download link (depends on module)
1103 $relativepath = $file["name"]; // Cas general
1104 if ($modulesubdir) {
1105 $relativepath = $modulesubdir."/".$file["name"]; // Cas propal, facture...
1106 }
1107 // Autre cas
1108 if ($modulepart == 'donation') {
1109 $relativepath = get_exdir($modulesubdir, 2, 0, 0, null, 'donation').$file["name"];
1110 }
1111 if ($modulepart == 'export') {
1112 $relativepath = $file["name"];
1113 }
1114
1115 $this->infofiles['nboffiles']++;
1116 $this->infofiles['files'][] = $file['fullname'];
1117 $ext = pathinfo($file["name"], PATHINFO_EXTENSION);
1118 if (empty($this->infofiles[$ext])) {
1119 $this->infofiles['extensions'][$ext] = 1;
1120 } else {
1121 $this->infofiles['extensions'][$ext]++;
1122 }
1123
1124 // Preview
1125 if (!empty($conf->use_javascript_ajax) && ($conf->browser->layout != 'phone')) {
1126 $tmparray = getAdvancedPreviewUrl($modulepart, $relativepath, 1, '&entity='.$entity);
1127 if ($tmparray && $tmparray['url']) {
1128 $tmpout .= '<li><a href="'.$tmparray['url'].'"'.($tmparray['css'] ? ' class="'.$tmparray['css'].'"' : '').($tmparray['mime'] ? ' mime="'.$tmparray['mime'].'"' : '').($tmparray['target'] ? ' target="'.$tmparray['target'].'"' : '').'>';
1129 //$tmpout.= img_picto('','detail');
1130 $tmpout .= '<i class="fa fa-search-plus paddingright" style="color: gray"></i>';
1131 $tmpout .= $langs->trans("Preview").' '.$ext.'</a></li>';
1132 }
1133 }
1134
1135 // Download
1136 $tmpout .= '<li class="nowrap"><a class="pictopreview nowrap" ';
1137 if (getDolGlobalInt('MAIN_DISABLE_FORCE_SAVEAS') == 2) {
1138 $tmpout .= 'target="_blank" ';
1139 }
1140 $tmpout .= 'href="'.DOL_URL_ROOT.'/document.php?modulepart='.$modulepart.'&amp;entity='.$entity.'&amp;file='.urlencode($relativepath).'"';
1141 $mime = dol_mimetype($relativepath, '', 0);
1142 if (preg_match('/text/', $mime)) {
1143 $tmpout .= ' target="_blank" rel="noopener noreferrer"';
1144 }
1145 $tmpout .= '>';
1146 $tmpout .= img_mime($relativepath, $file["name"]);
1147 $tmpout .= $langs->trans("Download").' '.$ext;
1148 $tmpout .= '</a></li>'."\n";
1149 }
1150 $out .= $tmpout;
1151 $out .= '</ul></div></dd>
1152 </dl>';
1153
1154 if (!$found) {
1155 $out = '';
1156 }
1157 } else {
1158 // TODO Add link to regenerate doc ?
1159 //$out.= '<div id="gen_pdf_'.$modulesubdir.'" class="linkobject hideobject">'.img_picto('', 'refresh').'</div>'."\n";
1160 }
1161
1162 return $out;
1163 }
1164
1165
1166 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
1199 public function list_of_documents($filearray, $object, $modulepart, $param = '', $forcedownload = 0, $relativepath = '', $permonobject = 1, $useinecm = 0, $textifempty = '', $maxlength = 0, $title = '', $url = '', $showrelpart = 0, $permtoeditline = -1, $upload_dir = '', $sortfield = '', $sortorder = 'ASC', $disablemove = 1, $addfilterfields = 0, $disablecrop = -1, $moreattrondiv = '')
1200 {
1201 // phpcs:enable
1202 global $user, $conf, $langs, $hookmanager, $form;
1203 global $sortfield, $sortorder, $maxheightmini;
1204 global $dolibarr_main_url_root;
1205
1206 if ($disablecrop == -1) {
1207 $disablecrop = 1;
1208 // Values here must be supported by the photos_resize.php page.
1209 if (in_array($modulepart, array('bank', 'bom', 'expensereport', 'facture', 'facture_fournisseur', 'holiday', 'medias', 'member', 'mrp', 'project', 'product', 'produit', 'propal', 'service', 'societe', 'tax', 'tax-vat', 'ticket', 'user'))) {
1210 $disablecrop = 0;
1211 }
1212 }
1213
1214 // Define relative path used to store the file
1215 if (empty($relativepath)) {
1216 $relativepath = (!empty($object->ref) ? dol_sanitizeFileName($object->ref) : '').'/';
1217 if (!empty($object->element) && $object->element == 'invoice_supplier') {
1218 $relativepath = get_exdir($object->id, 2, 0, 0, $object, 'invoice_supplier').$relativepath; // TODO Call using a defined value for $relativepath
1219 }
1220 if (!empty($object->element) && $object->element == 'project_task') {
1221 $relativepath = 'Call_not_supported_._Call_function_using_a_defined_relative_path_.';
1222 }
1223 }
1224 // For backward compatibility, we detect file stored into an old path
1225 if (getDolGlobalInt('PRODUCT_USE_OLD_PATH_FOR_PHOTO') && isset($filearray[0]) && $filearray[0]['level1name'] == 'photos') {
1226 $relativepath = preg_replace('/^.*\/produit\//', '', $filearray[0]['path']).'/';
1227 }
1228
1229 // Defined relative dir to DOL_DATA_ROOT
1230 $relativedir = '';
1231 if ($upload_dir) {
1232 $relativedir = preg_replace('/^'.preg_quote(DOL_DATA_ROOT, '/').'/', '', $upload_dir);
1233 $relativedir = preg_replace('/^[\\/]/', '', $relativedir);
1234 }
1235 // For example here $upload_dir = '/pathtodocuments/commande/SO2001-123/'
1236 // For example here $upload_dir = '/pathtodocuments/tax/vat/1'
1237 // For example here $upload_dir = '/home/ldestailleur/git/dolibarr_dev/documents/fournisseur/facture/6/1/SI2210-0013' and relativedir='fournisseur/facture/6/1/SI2210-0013'
1238
1239 $hookmanager->initHooks(array('formfile'));
1240 $parameters = array(
1241 'filearray' => $filearray,
1242 'modulepart' => $modulepart,
1243 'param' => $param,
1244 'forcedownload' => $forcedownload,
1245 'relativepath' => $relativepath, // relative filename to module dir
1246 'relativedir' => $relativedir, // relative dirname to DOL_DATA_ROOT
1247 'permtodelete' => $permonobject,
1248 'useinecm' => $useinecm,
1249 'textifempty' => $textifempty,
1250 'maxlength' => $maxlength,
1251 'title' => $title,
1252 'url' => $url
1253 );
1254 $reshook = $hookmanager->executeHooks('showFilesList', $parameters, $object);
1255
1256 if (!empty($reshook)) { // null or '' for bypass
1257 return $reshook;
1258 } else {
1259 if (!is_object($form)) {
1260 include_once DOL_DOCUMENT_ROOT.'/core/class/html.form.class.php'; // The component may be included into ajax page that does not include the Form class
1261 $form = new Form($this->db);
1262 }
1263
1264 if (!preg_match('/&id=/', $param) && isset($object->id)) {
1265 $param .= '&id='.$object->id;
1266 }
1267 $relativepathwihtoutslashend = preg_replace('/\/$/', '', $relativepath);
1268 if ($relativepathwihtoutslashend) {
1269 $param .= '&file='.urlencode($relativepathwihtoutslashend);
1270 }
1271
1272 if ($permtoeditline < 0) { // Old behaviour for backward compatibility. New feature should call method with value 0 or 1
1273 $permtoeditline = 0;
1274 if (in_array($modulepart, array('product', 'produit', 'service'))) {
1275 if ($user->hasRight('produit', 'creer') && $object->type == Product::TYPE_PRODUCT) {
1276 $permtoeditline = 1;
1277 }
1278 if ($user->hasRight('service', 'creer') && $object->type == Product::TYPE_SERVICE) {
1279 $permtoeditline = 1;
1280 }
1281 }
1282 }
1283 if (!getDolGlobalString('MAIN_UPLOAD_DOC')) {
1284 $permtoeditline = 0;
1285 $permonobject = 0;
1286 }
1287
1288 // Show list of existing files
1289 if ((empty($useinecm) || $useinecm == 3 || $useinecm == 6) && $title != 'none') {
1290 print load_fiche_titre($title ? $title : $langs->trans("AttachedFiles"), '', 'file-upload', 0, '', 'table-list-of-attached-files');
1291 }
1292 if (empty($url)) {
1293 $url = $_SERVER["PHP_SELF"];
1294 }
1295
1296 print '<!-- html.formfile::list_of_documents -->'."\n";
1297 if (GETPOST('action', 'aZ09') == 'editfile' && $permtoeditline) {
1298 print '<form action="'.$_SERVER["PHP_SELF"].'?'.$param.'" method="POST">';
1299 print '<input type="hidden" name="token" value="'.newToken().'">';
1300 print '<input type="hidden" name="action" value="renamefile">';
1301 print '<input type="hidden" name="id" value="'.(is_object($object) ? $object->id : '').'">';
1302 print '<input type="hidden" name="modulepart" value="'.$modulepart.'">';
1303 }
1304
1305 print '<div class="div-table-responsive-no-min"'.($moreattrondiv ? ' '.$moreattrondiv : '').'>';
1306 print '<table id="tablelines" class="centpercent liste noborder nobottom">'."\n";
1307
1308 if (!empty($addfilterfields)) {
1309 print '<tr class="liste_titre nodrag nodrop">';
1310 print '<td><input type="search_doc_ref" value="'.dol_escape_htmltag(GETPOST('search_doc_ref', 'alpha')).'"></td>';
1311 print '<td></td>';
1312 print '<td></td>';
1313 if (empty($useinecm) || $useinecm == 4 || $useinecm == 5 || $useinecm == 6) {
1314 print '<td></td>';
1315 }
1316 print '<td></td>';
1317 print '<td></td>';
1318 if (empty($disablemove) && count($filearray) > 1) {
1319 print '<td></td>';
1320 }
1321 print "</tr>\n";
1322 }
1323
1324 // Get list of files stored into database for same relative directory
1325 if ($relativedir) {
1326 completeFileArrayWithDatabaseInfo($filearray, $relativedir);
1327
1328 //var_dump($sortfield.' - '.$sortorder);
1329 if ($sortfield && $sortorder) { // If $sortfield is for example 'position_name', we will sort on the property 'position_name' (that is concat of position+name)
1330 $filearray = dol_sort_array($filearray, $sortfield, $sortorder);
1331 }
1332 }
1333
1334 print '<tr class="liste_titre nodrag nodrop">';
1335 //print $url.' sortfield='.$sortfield.' sortorder='.$sortorder;
1336 print_liste_field_titre('Documents2', $url, "name", "", $param, '', $sortfield, $sortorder, 'left ');
1337 print_liste_field_titre('Size', $url, "size", "", $param, '', $sortfield, $sortorder, 'right ');
1338 print_liste_field_titre('Date', $url, "date", "", $param, '', $sortfield, $sortorder, 'center ');
1339 if (empty($useinecm) || $useinecm == 4 || $useinecm == 5 || $useinecm == 6) {
1340 print_liste_field_titre('', $url, "", "", $param, '', $sortfield, $sortorder, 'center '); // Preview
1341 }
1342 // Shared or not - Hash of file
1343 print_liste_field_titre('');
1344 // Action button
1345 print_liste_field_titre('');
1346 if (empty($disablemove) && count($filearray) > 1) {
1347 print_liste_field_titre('');
1348 }
1349 print "</tr>\n";
1350
1351 $nboffiles = count($filearray);
1352 if ($nboffiles > 0) {
1353 include_once DOL_DOCUMENT_ROOT.'/core/lib/images.lib.php';
1354 }
1355
1356 $i = 0;
1357 $nboflines = 0;
1358 $lastrowid = 0;
1359 $parametersByDefault = array(
1360 'modulepart'=> $modulepart,
1361 'relativepath'=> $relativepath,
1362 'permtoedit' => $permtoeditline,
1363 'permonobject' => $permonobject,
1364 );
1365 foreach ($filearray as $key => $file) { // filearray must be only files here
1366 if ($file['name'] != '.' && $file['name'] != '..' && !preg_match('/\.meta$/i', $file['name'])) {
1367 if (array_key_exists('rowid', $filearray[$key]) && $filearray[$key]['rowid'] > 0) {
1368 $lastrowid = $filearray[$key]['rowid'];
1369 }
1370 //var_dump($filearray[$key]);
1371
1372 // get specific parameters from file attributes if set or get default ones
1373 $modulepart = ($file['modulepart'] ?? $parametersByDefault['modulepart']);
1374 $relativepath = ($file['relativepath'] ?? $parametersByDefault['relativepath']);
1375 $permtoeditline = ($file['permtoedit'] ?? $parametersByDefault['permtoedit']);
1376 $permonobject = ($file['permonobject'] ?? $parametersByDefault['permonobject']);
1377
1378 // Note: for supplier invoice, $modulepart may be already 'facture_fournisseur' and $relativepath may be already '6/1/SI2210-0013/'
1379 if (empty($relativepath) || empty($modulepart)) {
1380 $filepath = $file['level1name'].'/'.$file['name'];
1381 } else {
1382 $filepath = $relativepath.$file['name'];
1383 }
1384 if (empty($modulepart)) {
1385 $modulepart = basename(dirname($file['path']));
1386 }
1387 if (empty($relativepath)) {
1388 $relativepath = preg_replace('/\/(.+)/', '', $filepath) . '/';
1389 }
1390
1391 $editline = 0;
1392 $nboflines++;
1393 print '<!-- Line list_of_documents '.$key.' relativepath = '.$relativepath.' -->'."\n";
1394 // Do we have entry into database ?
1395
1396 print '<!-- In database: position='.(array_key_exists('position', $filearray[$key]) ? $filearray[$key]['position'] : 0).' -->'."\n";
1397 print '<tr class="oddeven" id="row-'.((array_key_exists('rowid', $filearray[$key]) && $filearray[$key]['rowid'] > 0) ? $filearray[$key]['rowid'] : 'AFTER'.$lastrowid.'POS'.($i + 1)).'">';
1398
1399
1400 // File name
1401 print '<td class="minwith200 tdoverflowmax500" title="'.dolPrintHTMLForAttribute($file['name']).'">';
1402
1403 // Show file name with link to download
1404 //print "XX".$file['name']; //$file['name'] must be utf8
1405 print '<a class="paddingright valignmiddle" ';
1406 if (getDolGlobalInt('MAIN_DISABLE_FORCE_SAVEAS') == 2) {
1407 print 'target="_blank" ';
1408 }
1409 print 'href="'.DOL_URL_ROOT.'/document.php?modulepart='.$modulepart;
1410 if ($forcedownload) {
1411 print '&attachment=1';
1412 }
1413 if (!empty($object->entity)) {
1414 print '&entity='.$object->entity;
1415 }
1416 print '&file='.urlencode($filepath);
1417 print '">';
1418 print img_mime($file['name'], $file['name'].' ('.dol_print_size($file['size'], 0, 0).')', 'inline-block valignmiddle paddingright');
1419 if ($showrelpart == 1) {
1420 print $relativepath;
1421 }
1422 //print dol_trunc($file['name'],$maxlength,'middle');
1423
1424 //var_dump(dirname($filepath).' - '.dirname(GETPOST('urlfile', 'alpha')));
1425
1426 if (GETPOST('action', 'aZ09') == 'editfile' && $file['name'] == basename(GETPOST('urlfile', 'alpha')) && dirname($filepath) == dirname(GETPOST('urlfile', 'alpha'))) {
1427 print '</a>';
1428 $section_dir = dirname(GETPOST('urlfile', 'alpha'));
1429 if (!preg_match('/\/$/', $section_dir)) {
1430 $section_dir .= '/';
1431 }
1432 print '<input type="hidden" name="section_dir" value="'.$section_dir.'">';
1433 print '<input type="hidden" name="renamefilefrom" value="'.dol_escape_htmltag($file['name']).'">';
1434 print '<input type="text" name="renamefileto" class="quatrevingtpercent" value="'.dol_escape_htmltag($file['name']).'">';
1435 $editline = 1;
1436 } else {
1437 $filenametoshow = preg_replace('/\.noexe$/', '', $file['name']);
1438 print dol_escape_htmltag(dol_trunc($filenametoshow, 200));
1439 print '</a>';
1440 }
1441 // Preview link
1442 if (!$editline) {
1443 print $this->showPreview($file, $modulepart, $filepath, 0, '&entity='.(empty($object->entity) ? $conf->entity : $object->entity));
1444 }
1445
1446 print "</td>\n";
1447
1448 // Size
1449 $sizetoshow = dol_print_size($file['size'], 1, 1);
1450 $sizetoshowbytes = dol_print_size($file['size'], 0, 1);
1451 print '<td class="right nowraponall">';
1452 if ($sizetoshow == $sizetoshowbytes) {
1453 print $sizetoshow;
1454 } else {
1455 print $form->textwithpicto($sizetoshow, $sizetoshowbytes, -1);
1456 }
1457 print '</td>';
1458
1459 // Date
1460 print '<td class="center nowraponall">'.dol_print_date($file['date'], "dayhour", "tzuser").'</td>';
1461
1462 // Preview
1463 if (empty($useinecm) || $useinecm == 4 || $useinecm == 5 || $useinecm == 6) {
1464 $fileinfo = pathinfo($file['name']);
1465 print '<td class="center">';
1466 if (image_format_supported($file['name']) >= 0) {
1467 if ($useinecm == 5 || $useinecm == 6) {
1468 $smallfile = getImageFileNameForSize($file['name'], ''); // There is no thumb for ECM module and Media filemanager, so we use true image. TODO Change this for better performance.
1469 } else {
1470 $smallfile = getImageFileNameForSize($file['name'], '_small'); // For new thumbs using same ext (in lower case however) than original
1471 }
1472 if (!dol_is_file($file['path'].'/'.$smallfile)) {
1473 $smallfile = getImageFileNameForSize($file['name'], '_small', '.png'); // For backward compatibility of old thumbs that were created with filename in lower case and with .png extension
1474 }
1475 if (!dol_is_file($file['path'].'/'.$smallfile)) {
1476 $smallfile = getImageFileNameForSize($file['name'], ''); // This is in case no _small image exist
1477 }
1478 //print $file['path'].'/'.$smallfile.'<br>';
1479
1480
1481 $urlforhref = getAdvancedPreviewUrl($modulepart, $relativepath.$fileinfo['filename'].'.'.strtolower($fileinfo['extension']), 1, '&entity='.(empty($object->entity) ? $conf->entity : $object->entity));
1482 if (empty($urlforhref)) {
1483 $urlforhref = DOL_URL_ROOT.'/viewimage.php?modulepart='.urlencode($modulepart).'&entity='.(empty($object->entity) ? $conf->entity : $object->entity).'&file='.urlencode($relativepath.$fileinfo['filename'].'.'.strtolower($fileinfo['extension']));
1484 print '<a href="'.$urlforhref.'" class="aphoto" target="_blank" rel="noopener noreferrer">';
1485 } else {
1486 print '<a href="'.$urlforhref['url'].'" class="'.$urlforhref['css'].'" target="'.$urlforhref['target'].'" mime="'.$urlforhref['mime'].'">';
1487 }
1488 print '<img class="photo maxwidth200 shadow valignmiddle"';
1489 if ($useinecm == 4 || $useinecm == 5 || $useinecm == 6) {
1490 print ' height="20"';
1491 } else {
1492 //print ' style="max-height: '.$maxheightmini.'px"';
1493 print ' style="max-height: 24px"';
1494 }
1495 print ' src="'.DOL_URL_ROOT.'/viewimage.php?modulepart='.urlencode($modulepart).'&entity='.(empty($object->entity) ? $conf->entity : $object->entity).'&file='.urlencode($relativepath.$smallfile);
1496 if (!empty($filearray[$key]['date'])) { // We know the date of file, we can use it as cache key so URL will be in browser cache as long as file date is not modified.
1497 print '&cache='.urlencode((string) $filearray[$key]['date']);
1498 }
1499 print '" title="">';
1500 print '</a>';
1501 }
1502 print '</td>';
1503 }
1504
1505 // Shared or not - Hash of file
1506 print '<td class="center">';
1507 if ($relativedir && $filearray[$key]['rowid'] > 0) { // only if we are in a mode where a scan of dir were done and we have id of file in ECM table
1508 if ($editline) {
1509 print '<label for="idshareenabled'.$key.'">'.$langs->trans("FileSharedViaALink").'</label> ';
1510 print '<input class="inline-block" type="checkbox" id="idshareenabled'.$key.'" name="shareenabled"'.($file['share'] ? ' checked="checked"' : '').' /> ';
1511 } else {
1512 if ($file['share']) {
1513 // Define $urlwithroot
1514 $urlwithouturlroot = preg_replace('/'.preg_quote(DOL_URL_ROOT, '/').'$/i', '', trim($dolibarr_main_url_root));
1515 $urlwithroot = $urlwithouturlroot.DOL_URL_ROOT; // This is to use external domain name found into config file
1516 //$urlwithroot=DOL_MAIN_URL_ROOT; // This is to use same domain name than current
1517
1518 //print '<span class="opacitymedium">'.$langs->trans("Hash").' : '.$file['share'].'</span>';
1519 $forcedownload = 0;
1520 $paramlink = '';
1521 if (!empty($file['share'])) {
1522 $paramlink .= ($paramlink ? '&' : '').'hashp='.$file['share']; // Hash for public share
1523 }
1524 if ($forcedownload) {
1525 $paramlink .= ($paramlink ? '&' : '').'attachment=1';
1526 }
1527
1528 $fulllink = $urlwithroot.'/document.php'.($paramlink ? '?'.$paramlink : '');
1529
1530 print '<a href="'.$fulllink.'" target="_blank" rel="noopener">'.img_picto($langs->trans("FileSharedViaALink"), 'globe').'</a> ';
1531 print '<input type="text" class="quatrevingtpercent minwidth200imp nopadding small" id="downloadlink'.$filearray[$key]['rowid'].'" name="downloadexternallink" title="'.dol_escape_htmltag($langs->trans("FileSharedViaALink")).'" value="'.dol_escape_htmltag($fulllink).'">';
1532 } else {
1533 //print '<span class="opacitymedium">'.$langs->trans("FileNotShared").'</span>';
1534 }
1535 }
1536 }
1537 print '</td>';
1538
1539 // Actions buttons (1 column or 2 if !disablemove)
1540 if (!$editline) {
1541 // Delete or view link
1542 // ($param must start with &)
1543 print '<td class="valignmiddle right actionbuttons nowraponall"><!-- action on files -->';
1544 if ($useinecm == 1 || $useinecm == 5) { // ECM manual tree only
1545 // $section is inside $param
1546 $newparam = preg_replace('/&file=.*$/', '', $param); // We don't need param file=
1547 $backtopage = DOL_URL_ROOT.'/ecm/index.php?&section_dir='.urlencode($relativepath).$newparam;
1548 print '<a class="editfielda editfilelink" href="'.DOL_URL_ROOT.'/ecm/file_card.php?urlfile='.urlencode($file['name']).$param.'&backtopage='.urlencode($backtopage).'" rel="'.urlencode($file['name']).'">'.img_edit('default', 0, 'class="paddingrightonly"').'</a>';
1549 }
1550
1551 if (empty($useinecm) || $useinecm == 2 || $useinecm == 3 || $useinecm == 6) { // 6=Media file manager
1552 $newmodulepart = $modulepart;
1553 if (in_array($modulepart, array('product', 'produit', 'service'))) {
1554 $newmodulepart = 'produit|service';
1555 }
1556 if (image_format_supported($file['name']) > 0) {
1557 if ($permtoeditline) {
1558 $moreparaminurl = '';
1559 if (!empty($object->id) && $object->id > 0) {
1560 $moreparaminurl .= '&id='.$object->id;
1561 } elseif (GETPOST('website', 'alpha')) {
1562 $moreparaminurl .= '&website='.GETPOST('website', 'alpha');
1563 }
1564 // Set the backtourl
1565 if ($modulepart == 'medias' && !GETPOST('website')) {
1566 $moreparaminurl .= '&backtourl='.urlencode(DOL_URL_ROOT.'/ecm/index_medias.php?file_manager=1&modulepart='.$modulepart.'&section_dir='.$relativepath);
1567 }
1568 // Link to convert into webp
1569 if (!preg_match('/\.webp$/i', $file['name'])) {
1570 if ($modulepart == 'medias' && !GETPOST('website')) {
1571 print '<a href="'.DOL_URL_ROOT.'/ecm/index_medias.php?action=confirmconvertimgwebp&token='.newToken().'&section_dir='.urlencode($relativepath).'&filetoregenerate='.urlencode($fileinfo['basename']).'&module='.$modulepart.$param.$moreparaminurl.'" title="'.dol_escape_htmltag($langs->trans("GenerateChosenImgWebp")).'">'.img_picto('', 'images', 'class="flip marginrightonly"').'</a>';
1572 } elseif ($modulepart == 'medias' && GETPOST('website')) {
1573 print '<a href="'.DOL_URL_ROOT.'/website/index.php?action=confirmconvertimgwebp&token='.newToken().'&section_dir='.urlencode($relativepath).'&filetoregenerate='.urlencode($fileinfo['basename']).'&module='.$modulepart.$param.$moreparaminurl.'" title="'.dol_escape_htmltag($langs->trans("GenerateChosenImgWebp")).'">'.img_picto('', 'images', 'class="flip marginrightonly"').'</a>';
1574 }
1575 }
1576 }
1577 }
1578 if (!$disablecrop && image_format_supported($file['name']) > 0) {
1579 if ($permtoeditline) {
1580 // Link to resize
1581 $moreparaminurl = '';
1582 if (!empty($object->id) && $object->id > 0) {
1583 $moreparaminurl .= '&id='.$object->id;
1584 } elseif (GETPOST('website', 'alpha')) {
1585 $moreparaminurl .= '&website='.GETPOST('website', 'alpha');
1586 }
1587 // Set the backtourl
1588 if ($modulepart == 'medias' && !GETPOST('website')) {
1589 $moreparaminurl .= '&backtourl='.urlencode(DOL_URL_ROOT.'/ecm/index_medias.php?file_manager=1&modulepart='.$modulepart.'&section_dir='.$relativepath);
1590 }
1591 //var_dump($moreparaminurl);
1592 print '<a class="editfielda" href="'.DOL_URL_ROOT.'/core/photos_resize.php?modulepart='.urlencode($newmodulepart).$moreparaminurl.'&file='.urlencode($relativepath.$fileinfo['filename'].'.'.strtolower($fileinfo['extension'])).'" title="'.dol_escape_htmltag($langs->trans("ResizeOrCrop")).'">'.img_picto($langs->trans("ResizeOrCrop"), 'resize', 'class="paddingrightonly"').'</a>';
1593 }
1594 }
1595
1596 if ($permtoeditline) {
1597 $paramsectiondir = (in_array($modulepart, array('medias', 'ecm')) ? '&section_dir='.urlencode($relativepath) : '');
1598 print '<a class="editfielda reposition editfilelink" href="'.(($useinecm == 1 || $useinecm == 5) ? '#' : ($url.'?action=editfile&token='.newToken().'&urlfile='.urlencode($filepath).$paramsectiondir.$param)).'" rel="'.$filepath.'">'.img_edit('default', 0, 'class="paddingrightonly"').'</a>';
1599 }
1600 }
1601 // Output link to delete file
1602 if ($permonobject) {
1603 $useajax = 1;
1604 if (!empty($conf->dol_use_jmobile)) {
1605 $useajax = 0;
1606 }
1607 if (empty($conf->use_javascript_ajax)) {
1608 $useajax = 0;
1609 }
1610 if (getDolGlobalString('MAIN_ECM_DISABLE_JS')) {
1611 $useajax = 0;
1612 }
1613 print '<a href="'.((($useinecm && $useinecm != 3 && $useinecm != 6) && $useajax) ? '#' : ($url.'?action=deletefile&token='.newToken().'&urlfile='.urlencode($filepath).$param)).'" class="reposition deletefilelink" rel="'.$filepath.'">'.img_delete().'</a>';
1614 }
1615 print "</td>";
1616
1617 if (empty($disablemove) && count($filearray) > 1) {
1618 if ($nboffiles > 1 && $conf->browser->layout != 'phone') {
1619 print '<td class="linecolmove tdlineupdown center">';
1620 if ($i > 0) {
1621 print '<a class="lineupdown" href="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'&action=up&rowid='.$object->id.'">'.img_up('default', 0, 'imgupforline').'</a>';
1622 }
1623 if ($i < ($nboffiles - 1)) {
1624 print '<a class="lineupdown" href="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'&action=down&rowid='.$object->id.'">'.img_down('default', 0, 'imgdownforline').'</a>';
1625 }
1626 print '</td>';
1627 } else {
1628 print '<td'.(($conf->browser->layout != 'phone') ? ' class="linecolmove tdlineupdown center"' : ' class="linecolmove center"').'>';
1629 print '</td>';
1630 }
1631 }
1632 } else {
1633 print '<td class="right">';
1634 print '<input type="hidden" name="ecmfileid" value="'.(empty($filearray[$key]['rowid']) ? '' : $filearray[$key]['rowid']).'">';
1635 print '<input type="submit" class="button button-save smallpaddingimp" name="renamefilesave" value="'.dol_escape_htmltag($langs->trans("Save")).'">';
1636 print '<input type="submit" class="button button-cancel smallpaddingimp" name="cancel" value="'.dol_escape_htmltag($langs->trans("Cancel")).'">';
1637 print '</td>';
1638 if (empty($disablemove) && count($filearray) > 1) {
1639 print '<td class="right"></td>';
1640 }
1641 }
1642 print "</tr>\n";
1643
1644 $i++;
1645 }
1646 }
1647 if ($nboffiles == 0) {
1648 $colspan = '6';
1649 if (empty($disablemove) && count($filearray) > 1) {
1650 $colspan++; // 6 columns or 7
1651 }
1652 print '<tr class="oddeven"><td colspan="'.$colspan.'">';
1653 if (empty($textifempty)) {
1654 print '<span class="opacitymedium">'.$langs->trans("NoFileFound").'</span>';
1655 } else {
1656 print '<span class="opacitymedium">'.$textifempty.'</span>';
1657 }
1658 print '</td></tr>';
1659 }
1660
1661 print "</table>";
1662 print '</div>';
1663
1664 if ($nboflines > 1 && is_object($object)) {
1665 if (!empty($conf->use_javascript_ajax) && $permtoeditline) {
1666 $table_element_line = 'ecm_files';
1667 include DOL_DOCUMENT_ROOT.'/core/tpl/ajaxrow.tpl.php';
1668 }
1669 }
1670
1671 print ajax_autoselect('downloadlink');
1672
1673 if (GETPOST('action', 'aZ09') == 'editfile' && $permtoeditline) {
1674 print '</form>';
1675 }
1676
1677 return $nboffiles;
1678 }
1679 }
1680
1681
1682 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
1701 public function list_of_autoecmfiles($upload_dir, $filearray, $modulepart, $param, $forcedownload = 0, $relativepath = '', $permissiontodelete = 1, $useinecm = 0, $textifempty = '', $maxlength = 0, $url = '', $addfilterfields = 0)
1702 {
1703 // phpcs:enable
1704 global $conf, $langs, $hookmanager, $form;
1705 global $sortfield, $sortorder;
1706 global $search_doc_ref;
1707 global $dolibarr_main_url_root;
1708
1709 dol_syslog(get_class($this).'::list_of_autoecmfiles upload_dir='.$upload_dir.' modulepart='.$modulepart);
1710
1711 // Show list of documents
1712 if (empty($useinecm) || $useinecm == 6) {
1713 print load_fiche_titre($langs->trans("AttachedFiles"));
1714 }
1715 if (empty($url)) {
1716 $url = $_SERVER["PHP_SELF"];
1717 }
1718
1719 if (!empty($addfilterfields)) {
1720 print '<form action="'.$_SERVER['PHP_SELF'].'">';
1721 print '<input type="hidden" name="token" value="'.newToken().'">';
1722 print '<input type="hidden" name="module" value="'.$modulepart.'">';
1723 }
1724
1725 print '<div class="div-table-responsive-no-min">';
1726 print '<table width="100%" class="noborder">'."\n";
1727
1728 if (!empty($addfilterfields)) {
1729 print '<tr class="liste_titre nodrag nodrop">';
1730 print '<td class="liste_titre"></td>';
1731 print '<td class="liste_titre"><input type="text" class="maxwidth100onsmartphone" name="search_doc_ref" value="'.dol_escape_htmltag($search_doc_ref).'"></td>';
1732 print '<td class="liste_titre"></td>';
1733 print '<td class="liste_titre"></td>';
1734 // Action column
1735 print '<td class="liste_titre right">';
1736 $searchpicto = $form->showFilterButtons();
1737 print $searchpicto;
1738 print '</td>';
1739 print "</tr>\n";
1740 }
1741
1742 print '<tr class="liste_titre">';
1743 $sortref = "fullname";
1744 if ($modulepart == 'invoice_supplier') {
1745 $sortref = 'level1name';
1746 }
1747 print_liste_field_titre("Ref", $url, $sortref, "", $param, '', $sortfield, $sortorder);
1748 print_liste_field_titre("Documents2", $url, "name", "", $param, '', $sortfield, $sortorder);
1749 print_liste_field_titre("Size", $url, "size", "", $param, '', $sortfield, $sortorder, 'right ');
1750 print_liste_field_titre("Date", $url, "date", "", $param, '', $sortfield, $sortorder, 'center ');
1751 print_liste_field_titre("Shared", $url, 'share', '', $param, '', $sortfield, $sortorder, 'right ');
1752 print '</tr>'."\n";
1753
1754 // To show ref or specific information according to view to show (defined by $module)
1755 $object_instance = null;
1756 if ($modulepart == 'company') {
1757 include_once DOL_DOCUMENT_ROOT.'/societe/class/societe.class.php';
1758 $object_instance = new Societe($this->db);
1759 } elseif ($modulepart == 'invoice') {
1760 include_once DOL_DOCUMENT_ROOT.'/compta/facture/class/facture.class.php';
1761 $object_instance = new Facture($this->db);
1762 } elseif ($modulepart == 'invoice_supplier') {
1763 include_once DOL_DOCUMENT_ROOT.'/fourn/class/fournisseur.facture.class.php';
1764 $object_instance = new FactureFournisseur($this->db);
1765 } elseif ($modulepart == 'propal') {
1766 include_once DOL_DOCUMENT_ROOT.'/comm/propal/class/propal.class.php';
1767 $object_instance = new Propal($this->db);
1768 } elseif ($modulepart == 'supplier_proposal') {
1769 include_once DOL_DOCUMENT_ROOT.'/supplier_proposal/class/supplier_proposal.class.php';
1770 $object_instance = new SupplierProposal($this->db);
1771 } elseif ($modulepart == 'order') {
1772 include_once DOL_DOCUMENT_ROOT.'/commande/class/commande.class.php';
1773 $object_instance = new Commande($this->db);
1774 } elseif ($modulepart == 'order_supplier') {
1775 include_once DOL_DOCUMENT_ROOT.'/fourn/class/fournisseur.commande.class.php';
1776 $object_instance = new CommandeFournisseur($this->db);
1777 } elseif ($modulepart == 'contract') {
1778 include_once DOL_DOCUMENT_ROOT.'/contrat/class/contrat.class.php';
1779 $object_instance = new Contrat($this->db);
1780 } elseif ($modulepart == 'product') {
1781 include_once DOL_DOCUMENT_ROOT.'/product/class/product.class.php';
1782 $object_instance = new Product($this->db);
1783 } elseif ($modulepart == 'tax') {
1784 include_once DOL_DOCUMENT_ROOT.'/compta/sociales/class/chargesociales.class.php';
1785 $object_instance = new ChargeSociales($this->db);
1786 } elseif ($modulepart == 'tax-vat') {
1787 include_once DOL_DOCUMENT_ROOT.'/compta/tva/class/tva.class.php';
1788 $object_instance = new Tva($this->db);
1789 } elseif ($modulepart == 'salaries') {
1790 include_once DOL_DOCUMENT_ROOT.'/salaries/class/salary.class.php';
1791 $object_instance = new Salary($this->db);
1792 } elseif ($modulepart == 'project') {
1793 include_once DOL_DOCUMENT_ROOT.'/projet/class/project.class.php';
1794 $object_instance = new Project($this->db);
1795 } elseif ($modulepart == 'project_task') {
1796 include_once DOL_DOCUMENT_ROOT.'/projet/class/task.class.php';
1797 $object_instance = new Task($this->db);
1798 } elseif ($modulepart == 'fichinter') {
1799 include_once DOL_DOCUMENT_ROOT.'/fichinter/class/fichinter.class.php';
1800 $object_instance = new Fichinter($this->db);
1801 } elseif ($modulepart == 'user') {
1802 include_once DOL_DOCUMENT_ROOT.'/user/class/user.class.php';
1803 $object_instance = new User($this->db);
1804 } elseif ($modulepart == 'expensereport') {
1805 include_once DOL_DOCUMENT_ROOT.'/expensereport/class/expensereport.class.php';
1806 $object_instance = new ExpenseReport($this->db);
1807 } elseif ($modulepart == 'holiday') {
1808 include_once DOL_DOCUMENT_ROOT.'/holiday/class/holiday.class.php';
1809 $object_instance = new Holiday($this->db);
1810 } elseif ($modulepart == 'recruitment-recruitmentcandidature') {
1811 include_once DOL_DOCUMENT_ROOT.'/recruitment/class/recruitmentcandidature.class.php';
1812 $object_instance = new RecruitmentCandidature($this->db);
1813 } elseif ($modulepart == 'banque') {
1814 include_once DOL_DOCUMENT_ROOT.'/compta/bank/class/account.class.php';
1815 $object_instance = new Account($this->db);
1816 } elseif ($modulepart == 'chequereceipt') {
1817 include_once DOL_DOCUMENT_ROOT.'/compta/paiement/cheque/class/remisecheque.class.php';
1818 $object_instance = new RemiseCheque($this->db);
1819 } elseif ($modulepart == 'mrp-mo') {
1820 include_once DOL_DOCUMENT_ROOT.'/mrp/class/mo.class.php';
1821 $object_instance = new Mo($this->db);
1822 } else {
1823 $parameters = array('modulepart' => $modulepart);
1824 $reshook = $hookmanager->executeHooks('addSectionECMAuto', $parameters);
1825 if ($reshook > 0 && is_array($hookmanager->resArray) && count($hookmanager->resArray) > 0) {
1826 if (array_key_exists('classpath', $hookmanager->resArray) && !empty($hookmanager->resArray['classpath'])) {
1827 dol_include_once($hookmanager->resArray['classpath']);
1828 if (array_key_exists('classname', $hookmanager->resArray) && !empty($hookmanager->resArray['classname'])) {
1829 if (class_exists($hookmanager->resArray['classname'])) {
1830 $tmpclassname = $hookmanager->resArray['classname'];
1831 $object_instance = new $tmpclassname($this->db);
1832 }
1833 }
1834 }
1835 }
1836 }
1837
1838 //var_dump($filearray);
1839 //var_dump($object_instance);
1840
1841 // Get list of files stored into database for same relative directory
1842 $relativepathfromroot = preg_replace('/'.preg_quote(DOL_DATA_ROOT.'/', '/').'/', '', $upload_dir);
1843 if ($relativepathfromroot) {
1844 completeFileArrayWithDatabaseInfo($filearray, $relativepathfromroot.'/%');
1845
1846 //var_dump($sortfield.' - '.$sortorder);
1847 if ($sortfield && $sortorder) { // If $sortfield is for example 'position_name', we will sort on the property 'position_name' (that is concat of position+name)
1848 $filearray = dol_sort_array($filearray, $sortfield, $sortorder, 1);
1849 }
1850 }
1851
1852 //var_dump($filearray);
1853
1854 foreach ($filearray as $key => $file) {
1855 if (!is_dir($file['name'])
1856 && $file['name'] != '.'
1857 && $file['name'] != '..'
1858 && $file['name'] != 'CVS'
1859 && !preg_match('/\.meta$/i', $file['name'])) {
1860 // Define relative path used to store the file
1861 $relativefile = preg_replace('/'.preg_quote($upload_dir.'/', '/').'/', '', $file['fullname']);
1862
1863 $id = 0;
1864 $ref = '';
1865
1866 // To show ref or specific information according to view to show (defined by $modulepart)
1867 // $modulepart can be $object->table_name (that is 'mymodule_myobject') or $object->element.'-'.$module (for compatibility purpose)
1868 $reg = array();
1869 if ($modulepart == 'company' || $modulepart == 'tax' || $modulepart == 'tax-vat' || $modulepart == 'salaries') {
1870 preg_match('/(\d+)\/[^\/]+$/', $relativefile, $reg);
1871 $id = (isset($reg[1]) ? $reg[1] : '');
1872 } elseif ($modulepart == 'invoice_supplier') {
1873 preg_match('/([^\/]+)\/[^\/]+$/', $relativefile, $reg);
1874 $ref = (isset($reg[1]) ? $reg[1] : '');
1875 if (is_numeric($ref)) {
1876 $id = $ref;
1877 $ref = '';
1878 }
1879 } elseif ($modulepart == 'user') {
1880 // $ref may be also id with old supplier invoices
1881 preg_match('/(.*)\/[^\/]+$/', $relativefile, $reg);
1882 $id = (isset($reg[1]) ? $reg[1] : '');
1883 } elseif ($modulepart == 'project_task') {
1884 // $ref of task is the sub-directory of the project
1885 $reg = explode("/", $relativefile);
1886 $ref = (isset($reg[1]) ? $reg[1] : '');
1887 } elseif (in_array($modulepart, array(
1888 'invoice',
1889 'propal',
1890 'supplier_proposal',
1891 'order',
1892 'order_supplier',
1893 'contract',
1894 'product',
1895 'project',
1896 'project_task',
1897 'fichinter',
1898 'expensereport',
1899 'recruitment-recruitmentcandidature',
1900 'mrp-mo',
1901 'banque',
1902 'chequereceipt',
1903 'holiday'))) {
1904 preg_match('/(.*)\/[^\/]+$/', $relativefile, $reg);
1905 $ref = (isset($reg[1]) ? $reg[1] : '');
1906 } else {
1907 $parameters = array('modulepart' => $modulepart, 'fileinfo' => $file);
1908 $reshook = $hookmanager->executeHooks('addSectionECMAuto', $parameters);
1909 if ($reshook > 0 && is_array($hookmanager->resArray) && count($hookmanager->resArray) > 0) {
1910 if (array_key_exists('ref', $hookmanager->resArray) && !empty($hookmanager->resArray['ref'])) {
1911 $ref = $hookmanager->resArray['ref'];
1912 }
1913 if (array_key_exists('id', $hookmanager->resArray) && !empty($hookmanager->resArray['id'])) {
1914 $id = $hookmanager->resArray['id'];
1915 }
1916 }
1917 //print 'Error: Value for modulepart = '.$modulepart.' is not yet implemented in function list_of_autoecmfiles'."\n";
1918 }
1919
1920 if (!$id && !$ref) {
1921 continue;
1922 }
1923
1924 $found = 0;
1925 if (!empty($conf->cache['modulepartobject'][$modulepart.'_'.$id.'_'.$ref])) {
1926 $found = 1;
1927 } else {
1928 //print 'Fetch '.$id." - ".$ref.' class='.get_class($object_instance).'<br>';
1929
1930 $result = 0;
1931 if (is_object($object_instance)) {
1932 $object_instance->id = 0;
1933 $object_instance->ref = '';
1934 if ($id) {
1935 $result = $object_instance->fetch($id);
1936 } else {
1937 if (!($result = $object_instance->fetch(0, $ref))) {
1938 //fetchOneLike looks for objects with wildcards in its reference.
1939 //It is useful for those masks who get underscores instead of their actual symbols (because the _ had replaced all forbidden chars into filename)
1940 // TODO Example when this is needed ?
1941 // This may find when ref is 'A_B' and date was stored as 'A~B' into database, but in which case do we have this ?
1942 // May be we can add hidden option to enable this.
1943 $result = $object_instance->fetchOneLike($ref);
1944 }
1945 }
1946 }
1947
1948 if ($result > 0) { // Save object loaded into a cache
1949 $found = 1;
1950 $conf->cache['modulepartobject'][$modulepart.'_'.$id.'_'.$ref] = clone $object_instance;
1951 }
1952 if ($result == 0) {
1953 $found = 1;
1954 $conf->cache['modulepartobject'][$modulepart.'_'.$id.'_'.$ref] = 'notfound';
1955 unset($filearray[$key]);
1956 }
1957 }
1958
1959 if ($found <= 0 || !is_object($conf->cache['modulepartobject'][$modulepart.'_'.$id.'_'.$ref])) {
1960 continue; // We do not show orphelins files
1961 }
1962
1963 print '<!-- Line list_of_autoecmfiles key='.$key.' -->'."\n";
1964 print '<tr class="oddeven">';
1965 print '<td>';
1966 if ($found > 0 && is_object($conf->cache['modulepartobject'][$modulepart.'_'.$id.'_'.$ref])) {
1967 $tmpobject = $conf->cache['modulepartobject'][$modulepart.'_'.$id.'_'.$ref];
1968 //if (! in_array($tmpobject->element, array('expensereport'))) {
1969 print $tmpobject->getNomUrl(1, 'document');
1970 //} else {
1971 // print $tmpobject->getNomUrl(1);
1972 //}
1973 } else {
1974 print $langs->trans("ObjectDeleted", ($id ? $id : $ref));
1975 }
1976
1977 //$modulesubdir=dol_sanitizeFileName($ref);
1978 //$modulesubdir = dirname($relativefile);
1979
1980 //$filedir=$conf->$modulepart->dir_output . '/' . dol_sanitizeFileName($obj->ref);
1981 //$filedir = $file['path'];
1982 //$urlsource=$_SERVER['PHP_SELF'].'?id='.$obj->rowid;
1983 //print $formfile->getDocumentsLink($modulepart, $filename, $filedir);
1984 print '</td>';
1985
1986 // File
1987 // Check if document source has external module part, if it the case use it for module part on document.php
1988 print '<td>';
1989 //print "XX".$file['name']; //$file['name'] must be utf8
1990 print '<a ';
1991 if (getDolGlobalInt('MAIN_DISABLE_FORCE_SAVEAS') == 2) {
1992 print 'target="_blank" ';
1993 }
1994 print 'href="'.DOL_URL_ROOT.'/document.php?modulepart='.urlencode($modulepart);
1995 if ($forcedownload) {
1996 print '&attachment=1';
1997 }
1998 print '&file='.urlencode($relativefile).'">';
1999 print img_mime($file['name'], $file['name'].' ('.dol_print_size($file['size'], 0, 0).')');
2000 print dol_escape_htmltag(dol_trunc($file['name'], $maxlength, 'middle'));
2001 print '</a>';
2002
2003 //print $this->getDocumentsLink($modulepart, $modulesubdir, $filedir, '^'.preg_quote($file['name'],'/').'$');
2004
2005 print $this->showPreview($file, $modulepart, $file['relativename']);
2006
2007 print "</td>\n";
2008
2009 // Size
2010 $sizetoshow = dol_print_size($file['size'], 1, 1);
2011 $sizetoshowbytes = dol_print_size($file['size'], 0, 1);
2012 print '<td class="right nowraponall">';
2013 if ($sizetoshow == $sizetoshowbytes) {
2014 print $sizetoshow;
2015 } else {
2016 print $form->textwithpicto($sizetoshow, $sizetoshowbytes, -1);
2017 }
2018 print '</td>';
2019
2020 // Date
2021 print '<td class="center">'.dol_print_date($file['date'], "dayhour").'</td>';
2022
2023 // Share link
2024 print '<td class="right">';
2025 if (!empty($file['share'])) {
2026 // Define $urlwithroot
2027 $urlwithouturlroot = preg_replace('/'.preg_quote(DOL_URL_ROOT, '/').'$/i', '', trim($dolibarr_main_url_root));
2028 $urlwithroot = $urlwithouturlroot.DOL_URL_ROOT; // This is to use external domain name found into config file
2029 //$urlwithroot=DOL_MAIN_URL_ROOT; // This is to use same domain name than current
2030
2031 //print '<span class="opacitymedium">'.$langs->trans("Hash").' : '.$file['share'].'</span>';
2032 $forcedownload = 0;
2033 $paramlink = '';
2034 if (!empty($file['share'])) {
2035 $paramlink .= ($paramlink ? '&' : '').'hashp='.$file['share']; // Hash for public share
2036 }
2037 if ($forcedownload) {
2038 $paramlink .= ($paramlink ? '&' : '').'attachment=1';
2039 }
2040
2041 $fulllink = $urlwithroot.'/document.php'.($paramlink ? '?'.$paramlink : '');
2042
2043 print img_picto($langs->trans("FileSharedViaALink"), 'globe').' ';
2044 print '<input type="text" class="quatrevingtpercent width100 nopadding nopadding small" id="downloadlink" name="downloadexternallink" value="'.dol_escape_htmltag($fulllink).'">';
2045 }
2046 //if (!empty($useinecm) && $useinecm != 6) print '<a data-ajax="false" href="'.DOL_URL_ROOT.'/document.php?modulepart='.$modulepart;
2047 //if ($forcedownload) print '&attachment=1';
2048 //print '&file='.urlencode($relativefile).'">';
2049 //print img_view().'</a> &nbsp; ';
2050 //if ($permissiontodelete) print '<a href="'.$url.'?id='.$object->id.'&section='.$_REQUEST["section"].'&action=delete&token='.newToken().'&urlfile='.urlencode($file['name']).'">'.img_delete().'</a>';
2051 //else print '&nbsp;';
2052 print "</td>";
2053
2054 print "</tr>\n";
2055 }
2056 }
2057
2058 if (count($filearray) == 0) {
2059 print '<tr class="oddeven"><td colspan="5">';
2060 if (empty($textifempty)) {
2061 print '<span class="opacitymedium">'.$langs->trans("NoFileFound").'</span>';
2062 } else {
2063 print '<span class="opacitymedium">'.$textifempty.'</span>';
2064 }
2065 print '</td></tr>';
2066 }
2067 print "</table>";
2068 print '</div>';
2069
2070 if (!empty($addfilterfields)) {
2071 print '</form>';
2072 }
2073 return count($filearray);
2074 // Fin de zone
2075 }
2076
2087 public function listOfLinks($object, $permissiontodelete = 1, $action = null, $selected = null, $param = '')
2088 {
2089 global $user, $conf, $langs, $user;
2090 global $sortfield, $sortorder;
2091
2092 $langs->load("link");
2093
2094 require_once DOL_DOCUMENT_ROOT.'/core/class/link.class.php';
2095 $link = new Link($this->db);
2096 $links = array();
2097 if ($sortfield == "name") {
2098 $sortfield = "label";
2099 } elseif ($sortfield == "date") {
2100 $sortfield = "datea";
2101 } else {
2102 $sortfield = '';
2103 }
2104 $res = $link->fetchAll($links, $object->element, $object->id, $sortfield, $sortorder);
2105 $param .= (isset($object->id) ? '&id='.$object->id : '');
2106
2107 print '<!-- listOfLinks -->'."\n";
2108
2109 // Show list of associated links
2110 print load_fiche_titre($langs->trans("LinkedFiles"), '', 'link', 0, '', 'table-list-of-links');
2111
2112 print '<form action="'.$_SERVER['PHP_SELF'].($param ? '?'.$param : '').'" method="POST">';
2113 print '<input type="hidden" name="token" value="'.newToken().'">';
2114
2115 print '<table class="liste noborder nobottom centpercent">';
2116 print '<tr class="liste_titre">';
2117 print_liste_field_titre(
2118 $langs->trans("Links"),
2119 $_SERVER['PHP_SELF'],
2120 "name",
2121 "",
2122 $param,
2123 '',
2124 $sortfield,
2125 $sortorder,
2126 ''
2127 );
2128 print_liste_field_titre(
2129 "",
2130 "",
2131 "",
2132 "",
2133 "",
2134 '',
2135 '',
2136 '',
2137 'right '
2138 );
2139 print_liste_field_titre(
2140 $langs->trans("Date"),
2141 $_SERVER['PHP_SELF'],
2142 "date",
2143 "",
2144 $param,
2145 '',
2146 $sortfield,
2147 $sortorder,
2148 'center '
2149 );
2150 print_liste_field_titre(
2151 '',
2152 $_SERVER['PHP_SELF'],
2153 "",
2154 "",
2155 $param,
2156 '',
2157 '',
2158 '',
2159 'center '
2160 );
2161 print_liste_field_titre('', '', '');
2162 print '</tr>';
2163 $nboflinks = count($links);
2164 if ($nboflinks > 0) {
2165 include_once DOL_DOCUMENT_ROOT.'/core/lib/images.lib.php';
2166 }
2167
2168 foreach ($links as $link) {
2169 print '<tr class="oddeven">';
2170 //edit mode
2171 if ($action == 'update' && $selected === $link->id) {
2172 print '<td>';
2173 print '<input type="hidden" name="id" value="'.$object->id.'">';
2174 print '<input type="hidden" name="linkid" value="'.$link->id.'">';
2175 print '<input type="hidden" name="action" value="confirm_updateline">';
2176 print $langs->trans('Link').': <input type="text" name="link" value="'.$link->url.'">';
2177 print '</td>';
2178 print '<td>';
2179 print $langs->trans('Label').': <input type="text" name="label" value="'.dol_escape_htmltag($link->label).'">';
2180 print '</td>';
2181 print '<td class="center">'.dol_print_date(dol_now(), "dayhour", "tzuser").'</td>';
2182 print '<td class="right"></td>';
2183 print '<td class="right">';
2184 print '<input type="submit" class="button button-save" name="save" value="'.dol_escape_htmltag($langs->trans("Save")).'">';
2185 print '<input type="submit" class="button button-cancel" name="cancel" value="'.dol_escape_htmltag($langs->trans("Cancel")).'">';
2186 print '</td>';
2187 } else {
2188 print '<td>';
2189 print img_picto('', 'globe').' ';
2190 print '<a data-ajax="false" href="'.$link->url.'" target="_blank" rel="noopener noreferrer">';
2191 print dol_escape_htmltag($link->label);
2192 print '</a>';
2193 print '</td>'."\n";
2194 print '<td class="right"></td>';
2195 print '<td class="center">'.dol_print_date($link->datea, "dayhour", "tzuser").'</td>';
2196 print '<td class="center"></td>';
2197 print '<td class="right">';
2198 print '<a href="'.$_SERVER['PHP_SELF'].'?action=update&linkid='.$link->id.$param.'&token='.newToken().'" class="editfilelink editfielda reposition" >'.img_edit().'</a>'; // id= is included into $param
2199 if ($permissiontodelete) {
2200 print ' &nbsp; <a class="deletefilelink reposition" href="'.$_SERVER['PHP_SELF'].'?action=deletelink&token='.newToken().'&linkid='.((int) $link->id).$param.'">'.img_delete().'</a>'; // id= is included into $param
2201 } else {
2202 print '&nbsp;';
2203 }
2204 print '</td>';
2205 }
2206 print "</tr>\n";
2207 }
2208 if ($nboflinks == 0) {
2209 print '<tr class="oddeven"><td colspan="5">';
2210 print '<span class="opacitymedium">'.$langs->trans("NoLinkFound").'</span>';
2211 print '</td></tr>';
2212 }
2213 print "</table>";
2214
2215 print '</form>';
2216
2217 return $nboflinks;
2218 }
2219
2220
2231 public function showPreview($file, $modulepart, $relativepath, $ruleforpicto = 0, $param = '')
2232 {
2233 global $langs, $conf;
2234
2235 $out = '';
2236 if ($conf->browser->layout != 'phone' && !empty($conf->use_javascript_ajax)) {
2237 $urladvancedpreview = getAdvancedPreviewUrl($modulepart, $relativepath, 1, $param); // Return if a file is qualified for preview.
2238 if (count($urladvancedpreview)) {
2239 $out .= '<a class="pictopreview '.$urladvancedpreview['css'].'" href="'.$urladvancedpreview['url'].'"'.(empty($urladvancedpreview['mime']) ? '' : ' mime="'.$urladvancedpreview['mime'].'"').' '.(empty($urladvancedpreview['target']) ? '' : ' target="'.$urladvancedpreview['target'].'"').'>';
2240 //$out.= '<a class="pictopreview">';
2241 if (empty($ruleforpicto)) {
2242 //$out.= img_picto($langs->trans('Preview').' '.$file['name'], 'detail');
2243 $out .= '<span class="fa fa-search-plus pictofixedwidth" style="color: gray"></span>';
2244 } else {
2245 $out .= img_mime($relativepath, $langs->trans('Preview').' '.$file['name'], 'pictofixedwidth');
2246 }
2247 $out .= '</a>';
2248 } else {
2249 if ($ruleforpicto < 0) {
2250 $out .= img_picto('', 'generic', '', false, 0, 0, '', 'paddingright pictofixedwidth');
2251 }
2252 }
2253 }
2254 return $out;
2255 }
2256}
$id
$id
Definition account.php:39
$object
if( $user->socid > 0) if(! $user->hasRight('accounting', 'chartofaccount')) $object
Definition card.php:58
ajax_combobox
ajax_combobox($htmlname, $events=array(), $minLengthToAutocomplete=0, $forcefocus=0, $widthTypeOfAutocomplete='resolve', $idforemptyvalue='-1', $morecss='')
Convert a html select field into an ajax combobox.
Definition ajax.lib.php:456
Account
Class to manage bank accounts.
Definition account.class.php:42
ChargeSociales
Class for managing the social charges.
Definition chargesociales.class.php:36
CommandeFournisseur
Class to manage predefined suppliers products.
Definition fournisseur.commande.class.php:52
Commande
Class to manage customers orders.
Definition commande.class.php:50
Contrat
Class to manage contracts.
Definition contrat.class.php:46
ExpenseReport
Class to manage Trips and Expenses.
Definition expensereport.class.php:40
FactureFournisseur
Class to manage suppliers invoices.
Definition fournisseur.facture.class.php:54
Facture
Class to manage invoices.
Definition facture.class.php:64
Fichinter
Class to manage interventions.
Definition fichinter.class.php:39
FormAdmin
Class to generate html code for admin pages.
Definition html.formadmin.class.php:32
FormFile
Class to offer components to list and upload files.
Definition html.formfile.class.php:38
FormFile\list_of_documents
list_of_documents($filearray, $object, $modulepart, $param='', $forcedownload=0, $relativepath='', $permonobject=1, $useinecm=0, $textifempty='', $maxlength=0, $title='', $url='', $showrelpart=0, $permtoeditline=-1, $upload_dir='', $sortfield='', $sortorder='ASC', $disablemove=1, $addfilterfields=0, $disablecrop=-1, $moreattrondiv='')
Show list of documents in $filearray (may be they are all in same directory but may not) This also sy...
Definition html.formfile.class.php:1199
FormFile\showPreview
showPreview($file, $modulepart, $relativepath, $ruleforpicto=0, $param='')
Show detail icon with link for preview.
Definition html.formfile.class.php:2231
FormFile\list_of_autoecmfiles
list_of_autoecmfiles($upload_dir, $filearray, $modulepart, $param, $forcedownload=0, $relativepath='', $permissiontodelete=1, $useinecm=0, $textifempty='', $maxlength=0, $url='', $addfilterfields=0)
Show list of documents in a directory of ECM module.
Definition html.formfile.class.php:1701
FormFile\showdocuments
showdocuments($modulepart, $modulesubdir, $filedir, $urlsource, $genallowed, $delallowed=0, $modelselected='', $allowgenifempty=1, $forcenomultilang=0, $iconPDF=0, $notused=0, $noform=0, $param='', $title='', $buttonlabel='', $codelang='', $morepicto='', $object=null, $hideifempty=0, $removeaction='remove_file', $tooltipontemplatecombo='')
Return a string to show the box with list of available documents for object.
Definition html.formfile.class.php:338
FormFile\form_attach_new_file
form_attach_new_file($url, $title='', $addcancel=0, $sectionid=0, $perm=1, $size=50, $object=null, $options='', $useajax=1, $savingdocmask='', $linkfiles=1, $htmlname='formuserfile', $accept='', $sectiondir='', $usewithoutform=0, $capture=0, $disablemulti=0, $nooutput=0)
Show form to upload a new file.
Definition html.formfile.class.php:87
FormFile\listOfLinks
listOfLinks($object, $permissiontodelete=1, $action=null, $selected=null, $param='')
Show array with linked files.
Definition html.formfile.class.php:2087
FormFile\show_documents
show_documents($modulepart, $modulesubdir, $filedir, $urlsource, $genallowed, $delallowed=0, $modelselected='', $allowgenifempty=1, $forcenomultilang=0, $iconPDF=0, $notused=0, $noform=0, $param='', $title='', $buttonlabel='', $codelang='')
Show the box with list of available documents for object.
Definition html.formfile.class.php:303
FormFile\getDocumentsLink
getDocumentsLink($modulepart, $modulesubdir, $filedir, $filter='', $morecss='valignmiddle', $allfiles=0)
Show a Document icon with link(s) You may want to call this into a div like this: print '.
Definition html.formfile.class.php:1057
FormFile\__construct
__construct($db)
Constructor.
Definition html.formfile.class.php:55
Form
Class to manage generation of HTML components Only common components must be here.
Definition html.form.class.php:57
Holiday
Class of the module paid holiday.
Definition holiday.class.php:36
Mo
Class for Mo.
Definition mo.class.php:36
ModeleAction\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_action.php:44
ModeleChequeReceipts\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_chequereceipts.php:94
ModeleDon\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_don.php:46
ModeleExpenseReport\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_expensereport.php:36
ModelePDFCards\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_cards.php:52
ModelePDFCommandes\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_commande.php:70
ModelePDFContract\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_contract.php:50
ModelePDFDeliveryOrder\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_delivery.php:49
ModelePDFEvaluation\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_evaluation.php:50
ModelePDFFactures\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_facture.php:70
ModelePDFFicheinter\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_fichinter.php:47
ModelePDFMovement\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_movement.php:64
ModelePDFProductBatch\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_product_batch.class.php:52
ModelePDFProduct\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_product.class.php:48
ModelePDFProjects\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_project.php:55
ModelePDFPropales\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_propale.php:67
ModelePDFStock\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_stock.php:61
ModelePDFSupplierProposal\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_supplier_proposal.php:49
ModelePDFSuppliersInvoices\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_facturefournisseur.php:47
ModelePDFSuppliersOrders\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_commandefournisseur.php:67
ModelePDFSuppliersPayments\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_supplier_payment.php:37
ModelePDFTask\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_task.php:46
ModelePDFUserGroup\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_usergroup.class.php:44
ModelePDFUser\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_user.class.php:56
ModelePdfExpedition\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_expedition.php:51
ModelePdfReception\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_reception.php:43
ModeleThirdPartyDoc\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_societe.class.php:46
Product
Class to manage products or services.
Definition product.class.php:50
Product\TYPE_PRODUCT
const TYPE_PRODUCT
Regular product.
Definition product.class.php:828
Product\TYPE_SERVICE
const TYPE_SERVICE
Service.
Definition product.class.php:832
Project
Class to manage projects.
Definition project.class.php:40
Propal
Class to manage proposals.
Definition propal.class.php:55
RecruitmentCandidature
Class for RecruitmentCandidature.
Definition recruitmentcandidature.class.php:35
RemiseCheque
Class to manage cheque delivery receipts.
Definition remisecheque.class.php:37
Salary
Class to manage salary payments.
Definition salary.class.php:36
Societe
Class to manage third parties objects (customers, suppliers, prospects...)
Definition societe.class.php:55
SupplierProposal
Class to manage price ask supplier.
Definition supplier_proposal.class.php:52
Task
Class to manage tasks.
Definition task.class.php:42
Tva
Class to manage VAT - Value-added tax (also known in French as TVA - Taxe sur la valeur ajoutée)
Definition tva.class.php:38
User
Class to manage Dolibarr users.
Definition user.class.php:50
dol_filemtime
dol_filemtime($pathoffile)
Return time of a file.
Definition files.lib.php:647
dol_filesize
dol_filesize($pathoffile)
Return size of a file.
Definition files.lib.php:635
dol_is_file
dol_is_file($pathoffile)
Return if path is a file.
Definition files.lib.php:519
dol_dir_list
dol_dir_list($utf8_path, $types="all", $recursive=0, $filter="", $excludefilter=null, $sortcriteria="name", $sortorder=SORT_ASC, $mode=0, $nohook=0, $relativename="", $donotfollowsymlinks=0, $nbsecondsold=0)
Scan a directory and return a list of files/directories.
Definition files.lib.php:63
completeFileArrayWithDatabaseInfo
completeFileArrayWithDatabaseInfo(&$filearray, $relativedir)
Complete $filearray with data from database.
Definition files.lib.php:341
dol_print_size
dol_print_size($size, $shortvalue=0, $shortunit=0)
Return string with formatted size.
Definition functions.lib.php:3728
load_fiche_titre
load_fiche_titre($title, $morehtmlright='', $picto='generic', $pictoisfullpath=0, $id='', $morecssontable='', $morehtmlcenter='')
Load a title with picto.
Definition functions.lib.php:6305
img_delete
img_delete($titlealt='default', $other='class="pictodelete"', $morecss='')
Show delete logo.
Definition functions.lib.php:5512
dol_mimetype
dol_mimetype($file, $default='application/octet-stream', $mode=0)
Return MIME type of a file from its name with extension.
Definition functions.lib.php:11706
img_picto
img_picto($titlealt, $picto, $moreatt='', $pictoisfullpath=0, $srconly=0, $notitle=0, $alt='', $morecss='', $marginleftonlyshort=2)
Show picto whatever it's its name (generic function)
Definition functions.lib.php:4921
img_down
img_down($titlealt='default', $selected=0, $moreclass='')
Show down arrow logo.
Definition functions.lib.php:5679
dol_now
dol_now($mode='auto')
Return date for now.
Definition functions.lib.php:3689
img_mime
img_mime($file, $titlealt='', $morecss='')
Show MIME img of a file.
Definition functions.lib.php:5809
getDolGlobalInt
getDolGlobalInt($key, $default=0)
Return a Dolibarr global constant int value.
Definition functions.lib.php:230
dol_escape_js
dol_escape_js($stringtoescape, $mode=0, $noescapebackslashn=0)
Returns text escaped for inclusion into javascript code.
Definition functions.lib.php:1833
ajax_autoselect
ajax_autoselect($htmlname, $addlink='', $textonlink='Link')
Make content of an input box selected when we click into input field.
Definition functions.lib.php:11648
dol_print_date
dol_print_date($time, $format='', $tzoutput='auto', $outputlangs=null, $encodetooutput=false)
Output date in a string format according to outputlangs (or langs if not defined).
Definition functions.lib.php:3300
dol_sort_array
dol_sort_array(&$array, $index, $order='asc', $natsort=0, $case_sensitive=0, $keepindex=0)
Advanced sort array by the value of a given key, which produces ascending (default) or descending out...
Definition functions.lib.php:10098
dol_include_once
if(!function_exists( 'dol_getprefix')) dol_include_once($relpath, $classname='')
Make an include_once using default root and alternate root if it fails.
Definition functions.lib.php:1362
newToken
newToken()
Return the value of token currently saved into session with name 'newtoken'.
Definition functions.lib.php:13140
print_liste_field_titre
print_liste_field_titre($name, $file="", $field="", $begin="", $moreparam="", $moreattrib="", $sortfield="", $sortorder="", $prefix="", $tooltip="", $forcenowrapcolumntitle=0)
Show title line of an array.
Definition functions.lib.php:6123
getImageFileNameForSize
getImageFileNameForSize($file, $extName, $extImgTarget='')
Return the filename of file to get the thumbs.
Definition functions.lib.php:11555
getAdvancedPreviewUrl
getAdvancedPreviewUrl($modulepart, $relativepath, $alldata=0, $param='')
Return URL we can use for advanced preview links.
Definition functions.lib.php:11606
GETPOST
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
Definition functions.lib.php:768
setEventMessages
setEventMessages($mesg, $mesgs, $style='mesgs', $messagekey='', $noduplicate=0)
Set event messages in dol_events session object.
Definition functions.lib.php:9850
dol_buildpath
dol_buildpath($path, $type=0, $returnemptyifnotfound=0)
Return path of url or filesystem.
Definition functions.lib.php:1391
dol_sanitizeFileName
dol_sanitizeFileName($str, $newstr='_', $unaccent=1)
Clean a string to use it as a file name.
Definition functions.lib.php:1596
dol_print_error
dol_print_error($db=null, $error='', $errors=null)
Displays error message system with all the information to facilitate the diagnosis and the escalation...
Definition functions.lib.php:5934
dol_trunc
dol_trunc($string, $size=40, $trunc='right', $stringencoding='UTF-8', $nodot=0, $display=0)
Truncate a string to a particular length adding '…' if string larger than length.
Definition functions.lib.php:4797
getDolGlobalString
getDolGlobalString($key, $default='')
Return a Dolibarr global constant string value.
Definition functions.lib.php:215
info_admin
info_admin($text, $infoonimgalt=0, $nodiv=0, $admin='1', $morecss='hideonsmartphone', $textfordropdown='', $picto='')
Show information in HTML for admin users or standard users.
Definition functions.lib.php:5884
img_edit
img_edit($titlealt='default', $float=0, $other='')
Show logo edit/modify fiche.
Definition functions.lib.php:5472
img_up
img_up($titlealt='default', $selected=0, $moreclass='')
Show top arrow logo.
Definition functions.lib.php:5698
get_exdir
get_exdir($num, $level, $alpha, $withoutslash, $object, $modulepart='')
Return a path to have a the directory according to object where files are stored.
Definition functions.lib.php:7747
dol_syslog
dol_syslog($message, $level=LOG_INFO, $ident=0, $suffixinfilename='', $restricttologhandler='', $logcontext=null)
Write log message into outputs.
Definition functions.lib.php:2193
dol_escape_htmltag
dol_escape_htmltag($stringtoescape, $keepb=0, $keepn=0, $noescapetags='', $escapeonlyhtmltags=0, $cleanalsojavascript=0)
Returns text escaped for inclusion in HTML alt or title or value tags, or into values of HTML input f...
Definition functions.lib.php:2004
image_format_supported
image_format_supported($file, $acceptsvg=0)
Return if a filename is file name of a supported image format.
Definition images.lib.php:85
getMaxFileSizeArray
getMaxFileSizeArray()
Return the max allowed for file upload.
Definition security.lib.php:1270
Generated on Sun Sep 1 2024 01:00:26 for dolibarr by Doxygen 1.11.0