dolibarr 20.0.0
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
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">'.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
1344 // Action button
1346 if (empty($disablemove) && count($filearray) > 1) {
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">';
2107 $langs->trans("Links"),
2108 $_SERVER['PHP_SELF'],
2109 "name",
2110 "",
2111 $param,
2112 '',
2113 $sortfield,
2114 $sortorder,
2115 ''
2116 );
2118 "",
2119 "",
2120 "",
2121 "",
2122 "",
2123 '',
2124 '',
2125 '',
2126 'right '
2127 );
2129 $langs->trans("Date"),
2130 $_SERVER['PHP_SELF'],
2131 "date",
2132 "",
2133 $param,
2134 '',
2135 $sortfield,
2136 $sortorder,
2137 'center '
2138 );
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
2157 foreach ($links as $link) {
2158 print '<tr class="oddeven">';
2159 //edit mode
2160 if ($action == 'update' && $selected === $link->id) {
2161 print '<td>';
2162 print '<input type="hidden" name="id" value="'.$object->id.'">';
2163 print '<input type="hidden" name="linkid" value="'.$link->id.'">';
2164 print '<input type="hidden" name="action" value="confirm_updateline">';
2165 print $langs->trans('Link').': <input type="text" name="link" value="'.$link->url.'">';
2166 print '</td>';
2167 print '<td>';
2168 print $langs->trans('Label').': <input type="text" name="label" value="'.dol_escape_htmltag($link->label).'">';
2169 print '</td>';
2170 print '<td class="center">'.dol_print_date(dol_now(), "dayhour", "tzuser").'</td>';
2171 print '<td class="right"></td>';
2172 print '<td class="right">';
2173 print '<input type="submit" class="button button-save" name="save" value="'.dol_escape_htmltag($langs->trans("Save")).'">';
2174 print '<input type="submit" class="button button-cancel" name="cancel" value="'.dol_escape_htmltag($langs->trans("Cancel")).'">';
2175 print '</td>';
2176 } else {
2177 print '<td>';
2178 print img_picto('', 'globe').' ';
2179 print '<a data-ajax="false" href="'.$link->url.'" target="_blank" rel="noopener noreferrer">';
2180 print dol_escape_htmltag($link->label);
2181 print '</a>';
2182 print '</td>'."\n";
2183 print '<td class="right"></td>';
2184 print '<td class="center">'.dol_print_date($link->datea, "dayhour", "tzuser").'</td>';
2185 print '<td class="center"></td>';
2186 print '<td class="right">';
2187 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
2188 if ($permissiontodelete) {
2189 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
2190 } else {
2191 print '&nbsp;';
2192 }
2193 print '</td>';
2194 }
2195 print "</tr>\n";
2196 }
2197 if ($nboflinks == 0) {
2198 print '<tr class="oddeven"><td colspan="5">';
2199 print '<span class="opacitymedium">'.$langs->trans("NoLinkFound").'</span>';
2200 print '</td></tr>';
2201 }
2202 print "</table>";
2203
2204 print '</form>';
2205
2206 return $nboflinks;
2207 }
2208
2209
2220 public function showPreview($file, $modulepart, $relativepath, $ruleforpicto = 0, $param = '')
2221 {
2222 global $langs, $conf;
2223
2224 $out = '';
2225 if ($conf->browser->layout != 'phone' && !empty($conf->use_javascript_ajax)) {
2226 $urladvancedpreview = getAdvancedPreviewUrl($modulepart, $relativepath, 1, $param); // Return if a file is qualified for preview.
2227 if (count($urladvancedpreview)) {
2228 $out .= '<a class="pictopreview '.$urladvancedpreview['css'].'" href="'.$urladvancedpreview['url'].'"'.(empty($urladvancedpreview['mime']) ? '' : ' mime="'.$urladvancedpreview['mime'].'"').' '.(empty($urladvancedpreview['target']) ? '' : ' target="'.$urladvancedpreview['target'].'"').'>';
2229 //$out.= '<a class="pictopreview">';
2230 if (empty($ruleforpicto)) {
2231 //$out.= img_picto($langs->trans('Preview').' '.$file['name'], 'detail');
2232 $out .= '<span class="fa fa-search-plus pictofixedwidth" style="color: gray"></span>';
2233 } else {
2234 $out .= img_mime($relativepath, $langs->trans('Preview').' '.$file['name'], 'pictofixedwidth');
2235 }
2236 $out .= '</a>';
2237 } else {
2238 if ($ruleforpicto < 0) {
2239 $out .= img_picto('', 'generic', '', false, 0, 0, '', 'paddingright pictofixedwidth');
2240 }
2241 }
2242 }
2243 return $out;
2244 }
2245}
if( $user->socid > 0) if(! $user->hasRight('accounting', 'chartofaccount')) $object
Definition card.php:58
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
Class to manage bank accounts.
Class for managing the social charges.
Class to manage predefined suppliers products.
Class to manage customers orders.
Class to manage contracts.
Class to manage Trips and Expenses.
Class to manage suppliers invoices.
Class to manage invoices.
Class to manage interventions.
Class to generate html code for admin pages.
Class to offer components to list and upload files.
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...
showPreview($file, $modulepart, $relativepath, $ruleforpicto=0, $param='')
Show detail icon with link for preview.
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.
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.
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.
listOfLinks($object, $permissiontodelete=1, $action=null, $selected=null, $param='')
Show array with linked files.
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.
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 '.
__construct($db)
Constructor.
Class to manage generation of HTML components Only common components must be here.
Class of the module paid holiday.
Class for Mo.
Definition mo.class.php:36
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
static liste_modeles($db, $maxfilenamelength=0)
Return list of active models generation.
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
static liste_modeles($dbs, $maxfilenamelength=0)
Return list of active generation modules.
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation models.
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation models.
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation models.
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation models.
static liste_modeles($db, $maxfilenamelength=0)
Return list of active generation modules.
static liste_modeles($dbs, $maxfilenamelength=0)
Return list of active generation modules.
Class to manage products or services.
const TYPE_PRODUCT
Regular product.
const TYPE_SERVICE
Service.
Class to manage projects.
Class to manage proposals.
Class for RecruitmentCandidature.
Class to manage cheque delivery receipts.
Class to manage salary payments.
Class to manage third parties objects (customers, suppliers, prospects...)
Class to manage price ask supplier.
Class to manage tasks.
Put here description of your class.
Definition tva.class.php:37
Class to manage Dolibarr users.
dol_filemtime($pathoffile)
Return time of a file.
dol_filesize($pathoffile)
Return size of a file.
dol_is_file($pathoffile)
Return if path is a file.
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(&$filearray, $relativedir)
Complete $filearray with data from database.
dol_print_size($size, $shortvalue=0, $shortunit=0)
Return string with formatted size.
load_fiche_titre($title, $morehtmlright='', $picto='generic', $pictoisfullpath=0, $id='', $morecssontable='', $morehtmlcenter='')
Load a title with picto.
img_delete($titlealt='default', $other='class="pictodelete"', $morecss='')
Show delete logo.
dol_mimetype($file, $default='application/octet-stream', $mode=0)
Return MIME type of a file from its name with extension.
img_picto($titlealt, $picto, $moreatt='', $pictoisfullpath=0, $srconly=0, $notitle=0, $alt='', $morecss='', $marginleftonlyshort=2)
Show picto whatever it's its name (generic function)
img_down($titlealt='default', $selected=0, $moreclass='')
Show down arrow logo.
dol_now($mode='auto')
Return date for now.
img_mime($file, $titlealt='', $morecss='')
Show MIME img of a file.
getDolGlobalInt($key, $default=0)
Return a Dolibarr global constant int value.
dol_escape_js($stringtoescape, $mode=0, $noescapebackslashn=0)
Returns text escaped for inclusion into javascript code.
ajax_autoselect($htmlname, $addlink='', $textonlink='Link')
Make content of an input box selected when we click into input field.
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).
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...
if(!function_exists( 'dol_getprefix')) dol_include_once($relpath, $classname='')
Make an include_once using default root and alternate root if it fails.
newToken()
Return the value of token currently saved into session with name 'newtoken'.
print_liste_field_titre($name, $file="", $field="", $begin="", $moreparam="", $moreattrib="", $sortfield="", $sortorder="", $prefix="", $tooltip="", $forcenowrapcolumntitle=0)
Show title line of an array.
getImageFileNameForSize($file, $extName, $extImgTarget='')
Return the filename of file to get the thumbs.
getAdvancedPreviewUrl($modulepart, $relativepath, $alldata=0, $param='')
Return URL we can use for advanced preview links.
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
setEventMessages($mesg, $mesgs, $style='mesgs', $messagekey='', $noduplicate=0)
Set event messages in dol_events session object.
dol_buildpath($path, $type=0, $returnemptyifnotfound=0)
Return path of url or filesystem.
dol_sanitizeFileName($str, $newstr='_', $unaccent=1)
Clean a string to use it as a file name.
dol_print_error($db=null, $error='', $errors=null)
Displays error message system with all the information to facilitate the diagnosis and the escalation...
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.
getDolGlobalString($key, $default='')
Return dolibarr global constant string value.
info_admin($text, $infoonimgalt=0, $nodiv=0, $admin='1', $morecss='hideonsmartphone', $textfordropdown='', $picto='')
Show information in HTML for admin users or standard users.
img_edit($titlealt='default', $float=0, $other='')
Show logo edit/modify fiche.
img_up($titlealt='default', $selected=0, $moreclass='')
Show top arrow logo.
get_exdir($num, $level, $alpha, $withoutslash, $object, $modulepart='')
Return a path to have a the directory according to object where files are stored.
dol_syslog($message, $level=LOG_INFO, $ident=0, $suffixinfilename='', $restricttologhandler='', $logcontext=null)
Write log message into outputs.
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...
image_format_supported($file, $acceptsvg=0)
Return if a filename is file name of a supported image format.
getMaxFileSizeArray()
Return the max allowed for file upload.