dolibarr 20.0.2
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)) ? true : false;
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" title="'.dolPrintHTML($size.' '.$langs->trans("Bytes")).'">'.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 foreach ($filearray as $key => $file) { // filearray must be only files here
1360 if ($file['name'] != '.' && $file['name'] != '..' && !preg_match('/\.meta$/i', $file['name'])) {
1361 if (array_key_exists('rowid', $filearray[$key]) && $filearray[$key]['rowid'] > 0) {
1362 $lastrowid = $filearray[$key]['rowid'];
1363 }
1364 //var_dump($filearray[$key]);
1365
1366 // Note: for supplier invoice, $modulepart may be already 'facture_fournisseur' and $relativepath may be already '6/1/SI2210-0013/'
1367
1368 if (empty($relativepath) || empty($modulepart)) {
1369 $filepath = $file['level1name'].'/'.$file['name'];
1370 } else {
1371 $filepath = $relativepath.$file['name'];
1372 }
1373 if (empty($modulepart)) {
1374 $modulepart = basename(dirname($file['path']));
1375 }
1376 if (empty($relativepath)) {
1377 $relativepath = preg_replace('/\/(.+)/', '', $filepath) . '/';
1378 }
1379
1380 $editline = 0;
1381 $nboflines++;
1382 print '<!-- Line list_of_documents '.$key.' relativepath = '.$relativepath.' -->'."\n";
1383 // Do we have entry into database ?
1384
1385 print '<!-- In database: position='.(array_key_exists('position', $filearray[$key]) ? $filearray[$key]['position'] : 0).' -->'."\n";
1386 print '<tr class="oddeven" id="row-'.((array_key_exists('rowid', $filearray[$key]) && $filearray[$key]['rowid'] > 0) ? $filearray[$key]['rowid'] : 'AFTER'.$lastrowid.'POS'.($i + 1)).'">';
1387
1388
1389 // File name
1390 print '<td class="minwith200 tdoverflowmax500" title="'.dolPrintHTMLForAttribute($file['name']).'">';
1391
1392 // Show file name with link to download
1393 //print "XX".$file['name']; //$file['name'] must be utf8
1394 print '<a class="paddingright valignmiddle" ';
1395 if (getDolGlobalInt('MAIN_DISABLE_FORCE_SAVEAS') == 2) {
1396 print 'target="_blank" ';
1397 }
1398 print 'href="'.DOL_URL_ROOT.'/document.php?modulepart='.$modulepart;
1399 if ($forcedownload) {
1400 print '&attachment=1';
1401 }
1402 if (!empty($object->entity)) {
1403 print '&entity='.$object->entity;
1404 }
1405 print '&file='.urlencode($filepath);
1406 print '">';
1407 print img_mime($file['name'], $file['name'].' ('.dol_print_size($file['size'], 0, 0).')', 'inline-block valignmiddle paddingright');
1408 if ($showrelpart == 1) {
1409 print $relativepath;
1410 }
1411 //print dol_trunc($file['name'],$maxlength,'middle');
1412
1413 //var_dump(dirname($filepath).' - '.dirname(GETPOST('urlfile', 'alpha')));
1414
1415 if (GETPOST('action', 'aZ09') == 'editfile' && $file['name'] == basename(GETPOST('urlfile', 'alpha')) && dirname($filepath) == dirname(GETPOST('urlfile', 'alpha'))) {
1416 print '</a>';
1417 $section_dir = dirname(GETPOST('urlfile', 'alpha'));
1418 if (!preg_match('/\/$/', $section_dir)) {
1419 $section_dir .= '/';
1420 }
1421 print '<input type="hidden" name="section_dir" value="'.$section_dir.'">';
1422 print '<input type="hidden" name="renamefilefrom" value="'.dol_escape_htmltag($file['name']).'">';
1423 print '<input type="text" name="renamefileto" class="quatrevingtpercent" value="'.dol_escape_htmltag($file['name']).'">';
1424 $editline = 1;
1425 } else {
1426 $filenametoshow = preg_replace('/\.noexe$/', '', $file['name']);
1427 print dol_escape_htmltag(dol_trunc($filenametoshow, 200));
1428 print '</a>';
1429 }
1430 // Preview link
1431 if (!$editline) {
1432 print $this->showPreview($file, $modulepart, $filepath, 0, '&entity='.(empty($object->entity) ? $conf->entity : $object->entity));
1433 }
1434
1435 print "</td>\n";
1436
1437 // Size
1438 $sizetoshow = dol_print_size($file['size'], 1, 1);
1439 $sizetoshowbytes = dol_print_size($file['size'], 0, 1);
1440 print '<td class="right nowraponall">';
1441 if ($sizetoshow == $sizetoshowbytes) {
1442 print $sizetoshow;
1443 } else {
1444 print $form->textwithpicto($sizetoshow, $sizetoshowbytes, -1);
1445 }
1446 print '</td>';
1447
1448 // Date
1449 print '<td class="center nowraponall">'.dol_print_date($file['date'], "dayhour", "tzuser").'</td>';
1450
1451 // Preview
1452 if (empty($useinecm) || $useinecm == 4 || $useinecm == 5 || $useinecm == 6) {
1453 $fileinfo = pathinfo($file['name']);
1454 print '<td class="center">';
1455 if (image_format_supported($file['name']) >= 0) {
1456 if ($useinecm == 5 || $useinecm == 6) {
1457 $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.
1458 } else {
1459 $smallfile = getImageFileNameForSize($file['name'], '_small'); // For new thumbs using same ext (in lower case however) than original
1460 }
1461 if (!dol_is_file($file['path'].'/'.$smallfile)) {
1462 $smallfile = getImageFileNameForSize($file['name'], '_small', '.png'); // For backward compatibility of old thumbs that were created with filename in lower case and with .png extension
1463 }
1464 if (!dol_is_file($file['path'].'/'.$smallfile)) {
1465 $smallfile = getImageFileNameForSize($file['name'], ''); // This is in case no _small image exist
1466 }
1467 //print $file['path'].'/'.$smallfile.'<br>';
1468
1469
1470 $urlforhref = getAdvancedPreviewUrl($modulepart, $relativepath.$fileinfo['filename'].'.'.strtolower($fileinfo['extension']), 1, '&entity='.(empty($object->entity) ? $conf->entity : $object->entity));
1471 if (empty($urlforhref)) {
1472 $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']));
1473 print '<a href="'.$urlforhref.'" class="aphoto" target="_blank" rel="noopener noreferrer">';
1474 } else {
1475 print '<a href="'.$urlforhref['url'].'" class="'.$urlforhref['css'].'" target="'.$urlforhref['target'].'" mime="'.$urlforhref['mime'].'">';
1476 }
1477 print '<img class="photo maxwidth200 shadow valignmiddle"';
1478 if ($useinecm == 4 || $useinecm == 5 || $useinecm == 6) {
1479 print ' height="20"';
1480 } else {
1481 //print ' style="max-height: '.$maxheightmini.'px"';
1482 print ' style="max-height: 24px"';
1483 }
1484 print ' src="'.DOL_URL_ROOT.'/viewimage.php?modulepart='.urlencode($modulepart).'&entity='.(empty($object->entity) ? $conf->entity : $object->entity).'&file='.urlencode($relativepath.$smallfile);
1485 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.
1486 print '&cache='.urlencode((string) $filearray[$key]['date']);
1487 }
1488 print '" title="">';
1489 print '</a>';
1490 }
1491 print '</td>';
1492 }
1493
1494 // Shared or not - Hash of file
1495 print '<td class="center">';
1496 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
1497 if ($editline) {
1498 print '<label for="idshareenabled'.$key.'">'.$langs->trans("FileSharedViaALink").'</label> ';
1499 print '<input class="inline-block" type="checkbox" id="idshareenabled'.$key.'" name="shareenabled"'.($file['share'] ? ' checked="checked"' : '').' /> ';
1500 } else {
1501 if ($file['share']) {
1502 // Define $urlwithroot
1503 $urlwithouturlroot = preg_replace('/'.preg_quote(DOL_URL_ROOT, '/').'$/i', '', trim($dolibarr_main_url_root));
1504 $urlwithroot = $urlwithouturlroot.DOL_URL_ROOT; // This is to use external domain name found into config file
1505 //$urlwithroot=DOL_MAIN_URL_ROOT; // This is to use same domain name than current
1506
1507 //print '<span class="opacitymedium">'.$langs->trans("Hash").' : '.$file['share'].'</span>';
1508 $forcedownload = 0;
1509 $paramlink = '';
1510 if (!empty($file['share'])) {
1511 $paramlink .= ($paramlink ? '&' : '').'hashp='.$file['share']; // Hash for public share
1512 }
1513 if ($forcedownload) {
1514 $paramlink .= ($paramlink ? '&' : '').'attachment=1';
1515 }
1516
1517 $fulllink = $urlwithroot.'/document.php'.($paramlink ? '?'.$paramlink : '');
1518
1519 print '<a href="'.$fulllink.'" target="_blank" rel="noopener">'.img_picto($langs->trans("FileSharedViaALink"), 'globe').'</a> ';
1520 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).'">';
1521 } else {
1522 //print '<span class="opacitymedium">'.$langs->trans("FileNotShared").'</span>';
1523 }
1524 }
1525 }
1526 print '</td>';
1527
1528 // Actions buttons (1 column or 2 if !disablemove)
1529 if (!$editline) {
1530 // Delete or view link
1531 // ($param must start with &)
1532 print '<td class="valignmiddle right actionbuttons nowraponall"><!-- action on files -->';
1533 if ($useinecm == 1 || $useinecm == 5) { // ECM manual tree only
1534 // $section is inside $param
1535 $newparam = preg_replace('/&file=.*$/', '', $param); // We don't need param file=
1536 $backtopage = DOL_URL_ROOT.'/ecm/index.php?&section_dir='.urlencode($relativepath).$newparam;
1537 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>';
1538 }
1539
1540 if (empty($useinecm) || $useinecm == 2 || $useinecm == 3 || $useinecm == 6) { // 6=Media file manager
1541 $newmodulepart = $modulepart;
1542 if (in_array($modulepart, array('product', 'produit', 'service'))) {
1543 $newmodulepart = 'produit|service';
1544 }
1545 if (image_format_supported($file['name']) > 0) {
1546 if ($permtoeditline) {
1547 $moreparaminurl = '';
1548 if (!empty($object->id) && $object->id > 0) {
1549 $moreparaminurl .= '&id='.$object->id;
1550 } elseif (GETPOST('website', 'alpha')) {
1551 $moreparaminurl .= '&website='.GETPOST('website', 'alpha');
1552 }
1553 // Set the backtourl
1554 if ($modulepart == 'medias' && !GETPOST('website')) {
1555 $moreparaminurl .= '&backtourl='.urlencode(DOL_URL_ROOT.'/ecm/index_medias.php?file_manager=1&modulepart='.$modulepart.'&section_dir='.$relativepath);
1556 }
1557 // Link to convert into webp
1558 if (!preg_match('/\.webp$/i', $file['name'])) {
1559 if ($modulepart == 'medias' && !GETPOST('website')) {
1560 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>';
1561 } elseif ($modulepart == 'medias' && GETPOST('website')) {
1562 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>';
1563 }
1564 }
1565 }
1566 }
1567 if (!$disablecrop && image_format_supported($file['name']) > 0) {
1568 if ($permtoeditline) {
1569 // Link to resize
1570 $moreparaminurl = '';
1571 if (!empty($object->id) && $object->id > 0) {
1572 $moreparaminurl .= '&id='.$object->id;
1573 } elseif (GETPOST('website', 'alpha')) {
1574 $moreparaminurl .= '&website='.GETPOST('website', 'alpha');
1575 }
1576 // Set the backtourl
1577 if ($modulepart == 'medias' && !GETPOST('website')) {
1578 $moreparaminurl .= '&backtourl='.urlencode(DOL_URL_ROOT.'/ecm/index_medias.php?file_manager=1&modulepart='.$modulepart.'&section_dir='.$relativepath);
1579 }
1580 //var_dump($moreparaminurl);
1581 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>';
1582 }
1583 }
1584
1585 if ($permtoeditline) {
1586 $paramsectiondir = (in_array($modulepart, array('medias', 'ecm')) ? '&section_dir='.urlencode($relativepath) : '');
1587 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>';
1588 }
1589 }
1590 // Output link to delete file
1591 if ($permonobject) {
1592 $useajax = 1;
1593 if (!empty($conf->dol_use_jmobile)) {
1594 $useajax = 0;
1595 }
1596 if (empty($conf->use_javascript_ajax)) {
1597 $useajax = 0;
1598 }
1599 if (getDolGlobalString('MAIN_ECM_DISABLE_JS')) {
1600 $useajax = 0;
1601 }
1602 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>';
1603 }
1604 print "</td>";
1605
1606 if (empty($disablemove) && count($filearray) > 1) {
1607 if ($nboffiles > 1 && $conf->browser->layout != 'phone') {
1608 print '<td class="linecolmove tdlineupdown center">';
1609 if ($i > 0) {
1610 print '<a class="lineupdown" href="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'&action=up&rowid='.$object->id.'">'.img_up('default', 0, 'imgupforline').'</a>';
1611 }
1612 if ($i < ($nboffiles - 1)) {
1613 print '<a class="lineupdown" href="'.$_SERVER["PHP_SELF"].'?id='.$object->id.'&action=down&rowid='.$object->id.'">'.img_down('default', 0, 'imgdownforline').'</a>';
1614 }
1615 print '</td>';
1616 } else {
1617 print '<td'.(($conf->browser->layout != 'phone') ? ' class="linecolmove tdlineupdown center"' : ' class="linecolmove center"').'>';
1618 print '</td>';
1619 }
1620 }
1621 } else {
1622 print '<td class="right">';
1623 print '<input type="hidden" name="ecmfileid" value="'.(empty($filearray[$key]['rowid']) ? '' : $filearray[$key]['rowid']).'">';
1624 print '<input type="submit" class="button button-save smallpaddingimp" name="renamefilesave" value="'.dol_escape_htmltag($langs->trans("Save")).'">';
1625 print '<input type="submit" class="button button-cancel smallpaddingimp" name="cancel" value="'.dol_escape_htmltag($langs->trans("Cancel")).'">';
1626 print '</td>';
1627 if (empty($disablemove) && count($filearray) > 1) {
1628 print '<td class="right"></td>';
1629 }
1630 }
1631 print "</tr>\n";
1632
1633 $i++;
1634 }
1635 }
1636 if ($nboffiles == 0) {
1637 $colspan = '6';
1638 if (empty($disablemove) && count($filearray) > 1) {
1639 $colspan++; // 6 columns or 7
1640 }
1641 print '<tr class="oddeven"><td colspan="'.$colspan.'">';
1642 if (empty($textifempty)) {
1643 print '<span class="opacitymedium">'.$langs->trans("NoFileFound").'</span>';
1644 } else {
1645 print '<span class="opacitymedium">'.$textifempty.'</span>';
1646 }
1647 print '</td></tr>';
1648 }
1649
1650 print "</table>";
1651 print '</div>';
1652
1653 if ($nboflines > 1 && is_object($object)) {
1654 if (!empty($conf->use_javascript_ajax) && $permtoeditline) {
1655 $table_element_line = 'ecm_files';
1656 include DOL_DOCUMENT_ROOT.'/core/tpl/ajaxrow.tpl.php';
1657 }
1658 }
1659
1660 print ajax_autoselect('downloadlink');
1661
1662 if (GETPOST('action', 'aZ09') == 'editfile' && $permtoeditline) {
1663 print '</form>';
1664 }
1665
1666 return $nboffiles;
1667 }
1668 }
1669
1670
1671 // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
1690 public function list_of_autoecmfiles($upload_dir, $filearray, $modulepart, $param, $forcedownload = 0, $relativepath = '', $permissiontodelete = 1, $useinecm = 0, $textifempty = '', $maxlength = 0, $url = '', $addfilterfields = 0)
1691 {
1692 // phpcs:enable
1693 global $conf, $langs, $hookmanager, $form;
1694 global $sortfield, $sortorder;
1695 global $search_doc_ref;
1696 global $dolibarr_main_url_root;
1697
1698 dol_syslog(get_class($this).'::list_of_autoecmfiles upload_dir='.$upload_dir.' modulepart='.$modulepart);
1699
1700 // Show list of documents
1701 if (empty($useinecm) || $useinecm == 6) {
1702 print load_fiche_titre($langs->trans("AttachedFiles"));
1703 }
1704 if (empty($url)) {
1705 $url = $_SERVER["PHP_SELF"];
1706 }
1707
1708 if (!empty($addfilterfields)) {
1709 print '<form action="'.$_SERVER['PHP_SELF'].'">';
1710 print '<input type="hidden" name="token" value="'.newToken().'">';
1711 print '<input type="hidden" name="module" value="'.$modulepart.'">';
1712 }
1713
1714 print '<div class="div-table-responsive-no-min">';
1715 print '<table width="100%" class="noborder">'."\n";
1716
1717 if (!empty($addfilterfields)) {
1718 print '<tr class="liste_titre nodrag nodrop">';
1719 print '<td class="liste_titre"></td>';
1720 print '<td class="liste_titre"><input type="text" class="maxwidth100onsmartphone" name="search_doc_ref" value="'.dol_escape_htmltag($search_doc_ref).'"></td>';
1721 print '<td class="liste_titre"></td>';
1722 print '<td class="liste_titre"></td>';
1723 // Action column
1724 print '<td class="liste_titre right">';
1725 $searchpicto = $form->showFilterButtons();
1726 print $searchpicto;
1727 print '</td>';
1728 print "</tr>\n";
1729 }
1730
1731 print '<tr class="liste_titre">';
1732 $sortref = "fullname";
1733 if ($modulepart == 'invoice_supplier') {
1734 $sortref = 'level1name';
1735 }
1736 print_liste_field_titre("Ref", $url, $sortref, "", $param, '', $sortfield, $sortorder);
1737 print_liste_field_titre("Documents2", $url, "name", "", $param, '', $sortfield, $sortorder);
1738 print_liste_field_titre("Size", $url, "size", "", $param, '', $sortfield, $sortorder, 'right ');
1739 print_liste_field_titre("Date", $url, "date", "", $param, '', $sortfield, $sortorder, 'center ');
1740 print_liste_field_titre("Shared", $url, 'share', '', $param, '', $sortfield, $sortorder, 'right ');
1741 print '</tr>'."\n";
1742
1743 // To show ref or specific information according to view to show (defined by $module)
1744 $object_instance = null;
1745 if ($modulepart == 'company') {
1746 include_once DOL_DOCUMENT_ROOT.'/societe/class/societe.class.php';
1747 $object_instance = new Societe($this->db);
1748 } elseif ($modulepart == 'invoice') {
1749 include_once DOL_DOCUMENT_ROOT.'/compta/facture/class/facture.class.php';
1750 $object_instance = new Facture($this->db);
1751 } elseif ($modulepart == 'invoice_supplier') {
1752 include_once DOL_DOCUMENT_ROOT.'/fourn/class/fournisseur.facture.class.php';
1753 $object_instance = new FactureFournisseur($this->db);
1754 } elseif ($modulepart == 'propal') {
1755 include_once DOL_DOCUMENT_ROOT.'/comm/propal/class/propal.class.php';
1756 $object_instance = new Propal($this->db);
1757 } elseif ($modulepart == 'supplier_proposal') {
1758 include_once DOL_DOCUMENT_ROOT.'/supplier_proposal/class/supplier_proposal.class.php';
1759 $object_instance = new SupplierProposal($this->db);
1760 } elseif ($modulepart == 'order') {
1761 include_once DOL_DOCUMENT_ROOT.'/commande/class/commande.class.php';
1762 $object_instance = new Commande($this->db);
1763 } elseif ($modulepart == 'order_supplier') {
1764 include_once DOL_DOCUMENT_ROOT.'/fourn/class/fournisseur.commande.class.php';
1765 $object_instance = new CommandeFournisseur($this->db);
1766 } elseif ($modulepart == 'contract') {
1767 include_once DOL_DOCUMENT_ROOT.'/contrat/class/contrat.class.php';
1768 $object_instance = new Contrat($this->db);
1769 } elseif ($modulepart == 'product') {
1770 include_once DOL_DOCUMENT_ROOT.'/product/class/product.class.php';
1771 $object_instance = new Product($this->db);
1772 } elseif ($modulepart == 'tax') {
1773 include_once DOL_DOCUMENT_ROOT.'/compta/sociales/class/chargesociales.class.php';
1774 $object_instance = new ChargeSociales($this->db);
1775 } elseif ($modulepart == 'tax-vat') {
1776 include_once DOL_DOCUMENT_ROOT.'/compta/tva/class/tva.class.php';
1777 $object_instance = new Tva($this->db);
1778 } elseif ($modulepart == 'salaries') {
1779 include_once DOL_DOCUMENT_ROOT.'/salaries/class/salary.class.php';
1780 $object_instance = new Salary($this->db);
1781 } elseif ($modulepart == 'project') {
1782 include_once DOL_DOCUMENT_ROOT.'/projet/class/project.class.php';
1783 $object_instance = new Project($this->db);
1784 } elseif ($modulepart == 'project_task') {
1785 include_once DOL_DOCUMENT_ROOT.'/projet/class/task.class.php';
1786 $object_instance = new Task($this->db);
1787 } elseif ($modulepart == 'fichinter') {
1788 include_once DOL_DOCUMENT_ROOT.'/fichinter/class/fichinter.class.php';
1789 $object_instance = new Fichinter($this->db);
1790 } elseif ($modulepart == 'user') {
1791 include_once DOL_DOCUMENT_ROOT.'/user/class/user.class.php';
1792 $object_instance = new User($this->db);
1793 } elseif ($modulepart == 'expensereport') {
1794 include_once DOL_DOCUMENT_ROOT.'/expensereport/class/expensereport.class.php';
1795 $object_instance = new ExpenseReport($this->db);
1796 } elseif ($modulepart == 'holiday') {
1797 include_once DOL_DOCUMENT_ROOT.'/holiday/class/holiday.class.php';
1798 $object_instance = new Holiday($this->db);
1799 } elseif ($modulepart == 'recruitment-recruitmentcandidature') {
1800 include_once DOL_DOCUMENT_ROOT.'/recruitment/class/recruitmentcandidature.class.php';
1801 $object_instance = new RecruitmentCandidature($this->db);
1802 } elseif ($modulepart == 'banque') {
1803 include_once DOL_DOCUMENT_ROOT.'/compta/bank/class/account.class.php';
1804 $object_instance = new Account($this->db);
1805 } elseif ($modulepart == 'chequereceipt') {
1806 include_once DOL_DOCUMENT_ROOT.'/compta/paiement/cheque/class/remisecheque.class.php';
1807 $object_instance = new RemiseCheque($this->db);
1808 } elseif ($modulepart == 'mrp-mo') {
1809 include_once DOL_DOCUMENT_ROOT.'/mrp/class/mo.class.php';
1810 $object_instance = new Mo($this->db);
1811 } else {
1812 $parameters = array('modulepart' => $modulepart);
1813 $reshook = $hookmanager->executeHooks('addSectionECMAuto', $parameters);
1814 if ($reshook > 0 && is_array($hookmanager->resArray) && count($hookmanager->resArray) > 0) {
1815 if (array_key_exists('classpath', $hookmanager->resArray) && !empty($hookmanager->resArray['classpath'])) {
1816 dol_include_once($hookmanager->resArray['classpath']);
1817 if (array_key_exists('classname', $hookmanager->resArray) && !empty($hookmanager->resArray['classname'])) {
1818 if (class_exists($hookmanager->resArray['classname'])) {
1819 $tmpclassname = $hookmanager->resArray['classname'];
1820 $object_instance = new $tmpclassname($this->db);
1821 }
1822 }
1823 }
1824 }
1825 }
1826
1827 //var_dump($filearray);
1828 //var_dump($object_instance);
1829
1830 // Get list of files stored into database for same relative directory
1831 $relativepathfromroot = preg_replace('/'.preg_quote(DOL_DATA_ROOT.'/', '/').'/', '', $upload_dir);
1832 if ($relativepathfromroot) {
1833 completeFileArrayWithDatabaseInfo($filearray, $relativepathfromroot.'/%');
1834
1835 //var_dump($sortfield.' - '.$sortorder);
1836 if ($sortfield && $sortorder) { // If $sortfield is for example 'position_name', we will sort on the property 'position_name' (that is concat of position+name)
1837 $filearray = dol_sort_array($filearray, $sortfield, $sortorder, 1);
1838 }
1839 }
1840
1841 //var_dump($filearray);
1842
1843 foreach ($filearray as $key => $file) {
1844 if (!is_dir($file['name'])
1845 && $file['name'] != '.'
1846 && $file['name'] != '..'
1847 && $file['name'] != 'CVS'
1848 && !preg_match('/\.meta$/i', $file['name'])) {
1849 // Define relative path used to store the file
1850 $relativefile = preg_replace('/'.preg_quote($upload_dir.'/', '/').'/', '', $file['fullname']);
1851
1852 $id = 0;
1853 $ref = '';
1854
1855 // To show ref or specific information according to view to show (defined by $modulepart)
1856 // $modulepart can be $object->table_name (that is 'mymodule_myobject') or $object->element.'-'.$module (for compatibility purpose)
1857 $reg = array();
1858 if ($modulepart == 'company' || $modulepart == 'tax' || $modulepart == 'tax-vat' || $modulepart == 'salaries') {
1859 preg_match('/(\d+)\/[^\/]+$/', $relativefile, $reg);
1860 $id = (isset($reg[1]) ? $reg[1] : '');
1861 } elseif ($modulepart == 'invoice_supplier') {
1862 preg_match('/([^\/]+)\/[^\/]+$/', $relativefile, $reg);
1863 $ref = (isset($reg[1]) ? $reg[1] : '');
1864 if (is_numeric($ref)) {
1865 $id = $ref;
1866 $ref = '';
1867 }
1868 } elseif ($modulepart == 'user') {
1869 // $ref may be also id with old supplier invoices
1870 preg_match('/(.*)\/[^\/]+$/', $relativefile, $reg);
1871 $id = (isset($reg[1]) ? $reg[1] : '');
1872 } elseif ($modulepart == 'project_task') {
1873 // $ref of task is the sub-directory of the project
1874 $reg = explode("/", $relativefile);
1875 $ref = (isset($reg[1]) ? $reg[1] : '');
1876 } elseif (in_array($modulepart, array(
1877 'invoice',
1878 'propal',
1879 'supplier_proposal',
1880 'order',
1881 'order_supplier',
1882 'contract',
1883 'product',
1884 'project',
1885 'project_task',
1886 'fichinter',
1887 'expensereport',
1888 'recruitment-recruitmentcandidature',
1889 'mrp-mo',
1890 'banque',
1891 'chequereceipt',
1892 'holiday'))) {
1893 preg_match('/(.*)\/[^\/]+$/', $relativefile, $reg);
1894 $ref = (isset($reg[1]) ? $reg[1] : '');
1895 } else {
1896 $parameters = array('modulepart' => $modulepart, 'fileinfo' => $file);
1897 $reshook = $hookmanager->executeHooks('addSectionECMAuto', $parameters);
1898 if ($reshook > 0 && is_array($hookmanager->resArray) && count($hookmanager->resArray) > 0) {
1899 if (array_key_exists('ref', $hookmanager->resArray) && !empty($hookmanager->resArray['ref'])) {
1900 $ref = $hookmanager->resArray['ref'];
1901 }
1902 if (array_key_exists('id', $hookmanager->resArray) && !empty($hookmanager->resArray['id'])) {
1903 $id = $hookmanager->resArray['id'];
1904 }
1905 }
1906 //print 'Error: Value for modulepart = '.$modulepart.' is not yet implemented in function list_of_autoecmfiles'."\n";
1907 }
1908
1909 if (!$id && !$ref) {
1910 continue;
1911 }
1912
1913 $found = 0;
1914 if (!empty($conf->cache['modulepartobject'][$modulepart.'_'.$id.'_'.$ref])) {
1915 $found = 1;
1916 } else {
1917 //print 'Fetch '.$id." - ".$ref.' class='.get_class($object_instance).'<br>';
1918
1919 $result = 0;
1920 if (is_object($object_instance)) {
1921 $object_instance->id = 0;
1922 $object_instance->ref = '';
1923 if ($id) {
1924 $result = $object_instance->fetch($id);
1925 } else {
1926 if (!($result = $object_instance->fetch('', $ref))) {
1927 //fetchOneLike looks for objects with wildcards in its reference.
1928 //It is useful for those masks who get underscores instead of their actual symbols (because the _ had replaced all forbidden chars into filename)
1929 // TODO Example when this is needed ?
1930 // 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 ?
1931 // May be we can add hidden option to enable this.
1932 $result = $object_instance->fetchOneLike($ref);
1933 }
1934 }
1935 }
1936
1937 if ($result > 0) { // Save object loaded into a cache
1938 $found = 1;
1939 $conf->cache['modulepartobject'][$modulepart.'_'.$id.'_'.$ref] = clone $object_instance;
1940 }
1941 if ($result == 0) {
1942 $found = 1;
1943 $conf->cache['modulepartobject'][$modulepart.'_'.$id.'_'.$ref] = 'notfound';
1944 unset($filearray[$key]);
1945 }
1946 }
1947
1948 if ($found <= 0 || !is_object($conf->cache['modulepartobject'][$modulepart.'_'.$id.'_'.$ref])) {
1949 continue; // We do not show orphelins files
1950 }
1951
1952 print '<!-- Line list_of_autoecmfiles key='.$key.' -->'."\n";
1953 print '<tr class="oddeven">';
1954 print '<td>';
1955 if ($found > 0 && is_object($conf->cache['modulepartobject'][$modulepart.'_'.$id.'_'.$ref])) {
1956 $tmpobject = $conf->cache['modulepartobject'][$modulepart.'_'.$id.'_'.$ref];
1957 //if (! in_array($tmpobject->element, array('expensereport'))) {
1958 print $tmpobject->getNomUrl(1, 'document');
1959 //} else {
1960 // print $tmpobject->getNomUrl(1);
1961 //}
1962 } else {
1963 print $langs->trans("ObjectDeleted", ($id ? $id : $ref));
1964 }
1965
1966 //$modulesubdir=dol_sanitizeFileName($ref);
1967 //$modulesubdir = dirname($relativefile);
1968
1969 //$filedir=$conf->$modulepart->dir_output . '/' . dol_sanitizeFileName($obj->ref);
1970 //$filedir = $file['path'];
1971 //$urlsource=$_SERVER['PHP_SELF'].'?id='.$obj->rowid;
1972 //print $formfile->getDocumentsLink($modulepart, $filename, $filedir);
1973 print '</td>';
1974
1975 // File
1976 // Check if document source has external module part, if it the case use it for module part on document.php
1977 print '<td>';
1978 //print "XX".$file['name']; //$file['name'] must be utf8
1979 print '<a ';
1980 if (getDolGlobalInt('MAIN_DISABLE_FORCE_SAVEAS') == 2) {
1981 print 'target="_blank" ';
1982 }
1983 print 'href="'.DOL_URL_ROOT.'/document.php?modulepart='.urlencode($modulepart);
1984 if ($forcedownload) {
1985 print '&attachment=1';
1986 }
1987 print '&file='.urlencode($relativefile).'">';
1988 print img_mime($file['name'], $file['name'].' ('.dol_print_size($file['size'], 0, 0).')');
1989 print dol_escape_htmltag(dol_trunc($file['name'], $maxlength, 'middle'));
1990 print '</a>';
1991
1992 //print $this->getDocumentsLink($modulepart, $modulesubdir, $filedir, '^'.preg_quote($file['name'],'/').'$');
1993
1994 print $this->showPreview($file, $modulepart, $file['relativename']);
1995
1996 print "</td>\n";
1997
1998 // Size
1999 $sizetoshow = dol_print_size($file['size'], 1, 1);
2000 $sizetoshowbytes = dol_print_size($file['size'], 0, 1);
2001 print '<td class="right nowraponall">';
2002 if ($sizetoshow == $sizetoshowbytes) {
2003 print $sizetoshow;
2004 } else {
2005 print $form->textwithpicto($sizetoshow, $sizetoshowbytes, -1);
2006 }
2007 print '</td>';
2008
2009 // Date
2010 print '<td class="center">'.dol_print_date($file['date'], "dayhour").'</td>';
2011
2012 // Share link
2013 print '<td class="right">';
2014 if (!empty($file['share'])) {
2015 // Define $urlwithroot
2016 $urlwithouturlroot = preg_replace('/'.preg_quote(DOL_URL_ROOT, '/').'$/i', '', trim($dolibarr_main_url_root));
2017 $urlwithroot = $urlwithouturlroot.DOL_URL_ROOT; // This is to use external domain name found into config file
2018 //$urlwithroot=DOL_MAIN_URL_ROOT; // This is to use same domain name than current
2019
2020 //print '<span class="opacitymedium">'.$langs->trans("Hash").' : '.$file['share'].'</span>';
2021 $forcedownload = 0;
2022 $paramlink = '';
2023 if (!empty($file['share'])) {
2024 $paramlink .= ($paramlink ? '&' : '').'hashp='.$file['share']; // Hash for public share
2025 }
2026 if ($forcedownload) {
2027 $paramlink .= ($paramlink ? '&' : '').'attachment=1';
2028 }
2029
2030 $fulllink = $urlwithroot.'/document.php'.($paramlink ? '?'.$paramlink : '');
2031
2032 print img_picto($langs->trans("FileSharedViaALink"), 'globe').' ';
2033 print '<input type="text" class="quatrevingtpercent width100 nopadding nopadding small" id="downloadlink" name="downloadexternallink" value="'.dol_escape_htmltag($fulllink).'">';
2034 }
2035 //if (!empty($useinecm) && $useinecm != 6) print '<a data-ajax="false" href="'.DOL_URL_ROOT.'/document.php?modulepart='.$modulepart;
2036 //if ($forcedownload) print '&attachment=1';
2037 //print '&file='.urlencode($relativefile).'">';
2038 //print img_view().'</a> &nbsp; ';
2039 //if ($permissiontodelete) print '<a href="'.$url.'?id='.$object->id.'&section='.$_REQUEST["section"].'&action=delete&token='.newToken().'&urlfile='.urlencode($file['name']).'">'.img_delete().'</a>';
2040 //else print '&nbsp;';
2041 print "</td>";
2042
2043 print "</tr>\n";
2044 }
2045 }
2046
2047 if (count($filearray) == 0) {
2048 print '<tr class="oddeven"><td colspan="5">';
2049 if (empty($textifempty)) {
2050 print '<span class="opacitymedium">'.$langs->trans("NoFileFound").'</span>';
2051 } else {
2052 print '<span class="opacitymedium">'.$textifempty.'</span>';
2053 }
2054 print '</td></tr>';
2055 }
2056 print "</table>";
2057 print '</div>';
2058
2059 if (!empty($addfilterfields)) {
2060 print '</form>';
2061 }
2062 return count($filearray);
2063 // Fin de zone
2064 }
2065
2076 public function listOfLinks($object, $permissiontodelete = 1, $action = null, $selected = null, $param = '')
2077 {
2078 global $user, $conf, $langs, $user;
2079 global $sortfield, $sortorder;
2080
2081 $langs->load("link");
2082
2083 require_once DOL_DOCUMENT_ROOT.'/core/class/link.class.php';
2084 $link = new Link($this->db);
2085 $links = array();
2086 if ($sortfield == "name") {
2087 $sortfield = "label";
2088 } elseif ($sortfield == "date") {
2089 $sortfield = "datea";
2090 } else {
2091 $sortfield = '';
2092 }
2093 $res = $link->fetchAll($links, $object->element, $object->id, $sortfield, $sortorder);
2094 $param .= (isset($object->id) ? '&id='.$object->id : '');
2095
2096 print '<!-- listOfLinks -->'."\n";
2097
2098 // Show list of associated links
2099 print load_fiche_titre($langs->trans("LinkedFiles"), '', 'link', 0, '', 'table-list-of-links');
2100
2101 print '<form action="'.$_SERVER['PHP_SELF'].($param ? '?'.$param : '').'" method="POST">';
2102 print '<input type="hidden" name="token" value="'.newToken().'">';
2103
2104 print '<table class="liste noborder nobottom centpercent">';
2105 print '<tr class="liste_titre">';
2106 print_liste_field_titre(
2107 $langs->trans("Links"),
2108 $_SERVER['PHP_SELF'],
2109 "name",
2110 "",
2111 $param,
2112 '',
2113 $sortfield,
2114 $sortorder,
2115 ''
2116 );
2117 print_liste_field_titre(
2118 "",
2119 "",
2120 "",
2121 "",
2122 "",
2123 '',
2124 '',
2125 '',
2126 'right '
2127 );
2128 print_liste_field_titre(
2129 $langs->trans("Date"),
2130 $_SERVER['PHP_SELF'],
2131 "date",
2132 "",
2133 $param,
2134 '',
2135 $sortfield,
2136 $sortorder,
2137 'center '
2138 );
2139 print_liste_field_titre(
2140 '',
2141 $_SERVER['PHP_SELF'],
2142 "",
2143 "",
2144 $param,
2145 '',
2146 '',
2147 '',
2148 'center '
2149 );
2150 print_liste_field_titre('', '', '');
2151 print '</tr>';
2152 $nboflinks = count($links);
2153 if ($nboflinks > 0) {
2154 include_once DOL_DOCUMENT_ROOT.'/core/lib/images.lib.php';
2155 }
2156 foreach ($links as $link) {
2157 print '<tr class="oddeven">';
2158 //edit mode
2159 if ($action == 'update' && $selected === (int) $link->id) {
2160 print '<td>';
2161 print '<input type="hidden" name="id" value="'.$object->id.'">';
2162 print '<input type="hidden" name="linkid" value="'.$link->id.'">';
2163 print '<input type="hidden" name="action" value="confirm_updateline">';
2164 print $langs->trans('Link').': <input type="text" name="link" value="'.$link->url.'">';
2165 print '</td>';
2166 print '<td>';
2167 print $langs->trans('Label').': <input type="text" name="label" value="'.dol_escape_htmltag($link->label).'">';
2168 print '</td>';
2169 print '<td class="center">'.dol_print_date(dol_now(), "dayhour", "tzuser").'</td>';
2170 print '<td class="right"></td>';
2171 print '<td class="right">';
2172 print '<input type="submit" class="button button-save" name="save" value="'.dol_escape_htmltag($langs->trans("Save")).'">';
2173 print '<input type="submit" class="button button-cancel" name="cancel" value="'.dol_escape_htmltag($langs->trans("Cancel")).'">';
2174 print '</td>';
2175 } else {
2176 print '<td>';
2177 print img_picto('', 'globe').' ';
2178 print '<a data-ajax="false" href="'.$link->url.'" target="_blank" rel="noopener noreferrer">';
2179 print dol_escape_htmltag($link->label);
2180 print '</a>';
2181 print '</td>'."\n";
2182 print '<td class="right"></td>';
2183 print '<td class="center">'.dol_print_date($link->datea, "dayhour", "tzuser").'</td>';
2184 print '<td class="center"></td>';
2185 print '<td class="right">';
2186 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
2187 if ($permissiontodelete) {
2188 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
2189 } else {
2190 print '&nbsp;';
2191 }
2192 print '</td>';
2193 }
2194 print "</tr>\n";
2195 }
2196 if ($nboflinks == 0) {
2197 print '<tr class="oddeven"><td colspan="5">';
2198 print '<span class="opacitymedium">'.$langs->trans("NoLinkFound").'</span>';
2199 print '</td></tr>';
2200 }
2201 print "</table>";
2202
2203 print '</form>';
2204
2205 return $nboflinks;
2206 }
2207
2208
2219 public function showPreview($file, $modulepart, $relativepath, $ruleforpicto = 0, $param = '')
2220 {
2221 global $langs, $conf;
2222
2223 $out = '';
2224 if ($conf->browser->layout != 'phone' && !empty($conf->use_javascript_ajax)) {
2225 $urladvancedpreview = getAdvancedPreviewUrl($modulepart, $relativepath, 1, $param); // Return if a file is qualified for preview.
2226 if (count($urladvancedpreview)) {
2227 $out .= '<a class="pictopreview '.$urladvancedpreview['css'].'" href="'.$urladvancedpreview['url'].'"'.(empty($urladvancedpreview['mime']) ? '' : ' mime="'.$urladvancedpreview['mime'].'"').' '.(empty($urladvancedpreview['target']) ? '' : ' target="'.$urladvancedpreview['target'].'"').'>';
2228 //$out.= '<a class="pictopreview">';
2229 if (empty($ruleforpicto)) {
2230 //$out.= img_picto($langs->trans('Preview').' '.$file['name'], 'detail');
2231 $out .= '<span class="fa fa-search-plus pictofixedwidth" style="color: gray"></span>';
2232 } else {
2233 $out .= img_mime($relativepath, $langs->trans('Preview').' '.$file['name'], 'pictofixedwidth');
2234 }
2235 $out .= '</a>';
2236 } else {
2237 if ($ruleforpicto < 0) {
2238 $out .= img_picto('', 'generic', '', false, 0, 0, '', 'paddingright pictofixedwidth');
2239 }
2240 }
2241 }
2242 return $out;
2243 }
2244}
$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:51
Commande
Class to manage customers orders.
Definition commande.class.php:51
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:40
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:2219
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:1690
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:2076
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:56
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:60
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 models generation.
Definition modules_expensereport.php:35
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:69
ModelePDFContract\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_contract.php:49
ModelePDFDeliveryOrder\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_delivery.php:48
ModelePDFEvaluation\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_evaluation.php:49
ModelePDFFactures\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_facture.php:69
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:63
ModelePDFProductBatch\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_product_batch.class.php:51
ModelePDFProduct\liste_modeles
static liste_modeles($dbs, $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:54
ModelePDFPropales\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_propale.php:66
ModelePDFStock\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_stock.php:60
ModelePDFSupplierProposal\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_supplier_proposal.php:48
ModelePDFSuppliersInvoices\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation models.
Definition modules_facturefournisseur.php:46
ModelePDFSuppliersOrders\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation models.
Definition modules_commandefournisseur.php:66
ModelePDFSuppliersPayments\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation models.
Definition modules_supplier_payment.php:36
ModelePDFTask\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_task.php:45
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:55
ModelePdfExpedition\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation models.
Definition modules_expedition.php:50
ModelePdfReception\liste_modeles
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
Definition modules_reception.php:42
ModeleThirdPartyDoc\liste_modeles
static liste_modeles($dbs, $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:609
Product\TYPE_SERVICE
const TYPE_SERVICE
Service.
Definition product.class.php:613
Project
Class to manage projects.
Definition project.class.php:39
Propal
Class to manage proposals.
Definition propal.class.php:55
RecruitmentCandidature
Class for RecruitmentCandidature.
Definition recruitmentcandidature.class.php:34
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:41
Tva
Put here description of your class.
Definition tva.class.php:37
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:3676
load_fiche_titre
load_fiche_titre($title, $morehtmlright='', $picto='generic', $pictoisfullpath=0, $id='', $morecssontable='', $morehtmlcenter='')
Load a title with picto.
Definition functions.lib.php:6216
img_delete
img_delete($titlealt='default', $other='class="pictodelete"', $morecss='')
Show delete logo.
Definition functions.lib.php:5420
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:11672
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:4837
img_down
img_down($titlealt='default', $selected=0, $moreclass='')
Show down arrow logo.
Definition functions.lib.php:5587
dol_now
dol_now($mode='auto')
Return date for now.
Definition functions.lib.php:3637
img_mime
img_mime($file, $titlealt='', $morecss='')
Show MIME img of a file.
Definition functions.lib.php:5717
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:1780
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:11614
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:3248
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:10007
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:1320
newToken
newToken()
Return the value of token currently saved into session with name 'newtoken'.
Definition functions.lib.php:13156
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:6034
getImageFileNameForSize
getImageFileNameForSize($file, $extName, $extImgTarget='')
Return the filename of file to get the thumbs.
Definition functions.lib.php:11521
getAdvancedPreviewUrl
getAdvancedPreviewUrl($modulepart, $relativepath, $alldata=0, $param='')
Return URL we can use for advanced preview links.
Definition functions.lib.php:11572
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:760
setEventMessages
setEventMessages($mesg, $mesgs, $style='mesgs', $messagekey='', $noduplicate=0)
Set event messages in dol_events session object.
Definition functions.lib.php:9759
dol_buildpath
dol_buildpath($path, $type=0, $returnemptyifnotfound=0)
Return path of url or filesystem.
Definition functions.lib.php:1352
dol_sanitizeFileName
dol_sanitizeFileName($str, $newstr='_', $unaccent=1)
Clean a string to use it as a file name.
Definition functions.lib.php:1555
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:5842
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:4713
getDolGlobalString
getDolGlobalString($key, $default='')
Return 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:5792
img_edit
img_edit($titlealt='default', $float=0, $other='')
Show logo edit/modify fiche.
Definition functions.lib.php:5380
img_up
img_up($titlealt='default', $selected=0, $moreclass='')
Show top arrow logo.
Definition functions.lib.php:5606
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:7664
dol_syslog
dol_syslog($message, $level=LOG_INFO, $ident=0, $suffixinfilename='', $restricttologhandler='', $logcontext=null)
Write log message into outputs.
Definition functions.lib.php:2138
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:1949
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:1273
Generated on Thu Dec 5 2024 01:00:20 for dolibarr by Doxygen 1.11.0