PageRenderTime 40ms CodeModel.GetById 6ms RepoModel.GetById 0ms app.codeStats 1ms

/htdocs/core/class/html.formfile.class.php

https://bitbucket.org/speedealing/speedealing
PHP | 879 lines | 604 code | 90 blank | 185 comment | 230 complexity | 1ffa0de8975d2a9e2537fc061df0751a MD5 | raw file
Possible License(s): LGPL-3.0, LGPL-2.1, GPL-3.0, MIT 
    

  1. <?php
    2. 

  2. 

  3. /* Copyright (c) 2008-2011 Laurent Destailleur	<eldy@users.sourceforge.net>
    4. 

  4.  * Copyright (C) 2010-2012 Regis Houssin		<regis.houssin@capnetworks.com>
    5. 

  5.  * Copyright (c) 2010      Juanjo Menent		<jmenent@2byte.es>
    6. 

  6.  *
    7. 

  7.  * This program is free software; you can redistribute it and/or modify
    8. 

  8.  * it under the terms of the GNU General Public License as published by
    9. 

  9.  * the Free Software Foundation; either version 3 of the License, or
    10. 

  10.  * (at your option) any later version.
    11. 

  11.  *
    12. 

  12.  * This program is distributed in the hope that it will be useful,
    13. 

  13.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
    14. 

  14.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    15. 

  15.  * GNU General Public License for more details.
    16. 

  16.  *
    17. 

  17.  * You should have received a copy of the GNU General Public License
    18. 

  18.  * along with this program. If not, see <http://www.gnu.org/licenses/>.
    19. 

  19.  */
    20. 

  20. 

  21. /**
    22. 

  22.  * 	\file       htdocs/core/class/html.formfile.class.php
    23. 

  23.  *  \ingroup    core
    24. 

  24.  * 	\brief      File of class to offer components to list and upload files
    25. 

  25.  */
    26. 

  26. 

  27. /**
    28. 

  28.  * 	Class to offer components to list and upload files
    29. 

  29.  */
    30. 

  30. class FormFile {
    31. 

  31. 

  32. 	var $db;
    33. 

  33. 	var $error;
    34. 

  34. 	var $numoffiles;
    35. 

  35. 

  36. 	/**
    37. 

  37. 	 * 	Constructor
    38. 

  38. 	 *
    39. 

  39. 	 *  @param		DoliDB		$db      Database handler
    40. 

  40. 	 */
    41. 

  41. 	function __construct($db = '') {
    42. 

  42. 		$this->db = $db;
    43. 

  43. 		$this->numoffiles = 0;
    44. 

  44. 		return 1;
    45. 

  45. 	}
    46. 

  46. 

  47. 	/**
    48. 

  48. 	 *  Show form to upload a new file
    49. 

  49. 	 *
    50. 

  50. 	 *  @param  string	$url			Url
    51. 

  51. 	 *  @param  string	$title			Title zone (Title or '' or 'none')
    52. 

  52. 	 *  @param  int		$addcancel		1=Add 'Cancel' button
    53. 

  53. 	 * 	@param	int		$sectionid		If upload must be done inside a particular ECM section
    54. 

  54. 	 * 	@param	int		$perm			Value of permission to allow upload
    55. 

  55. 	 *  @param  int		$size           Length of input file area
    56. 

  56. 	 *  @param	Object	$object			Object to use (when attachment is done on an element)
    57. 

  57. 	 *  @param	string	$options		Options
    58. 

  58. 	 *  @param	boolean	$useajax		Use ajax if enabled
    59. 

  59. 	 * 	@return	int						<0 if KO, >0 if OK
    60. 

  60. 	 */
    61. 

  61. 	function form_attach_new_file($url, $title = '', $addcancel = 0, $sectionid = 0, $perm = 1, $size = 50, $object = '', $options = '', $useajax = true) {
    62. 

  62. 		global $conf, $langs;
    63. 

  63. 

  64. 		if (!empty($conf->global->MAIN_USE_JQUERY_FILEUPLOAD) && $useajax) {
    65. 

  65. 			return $this->_formAjaxFileUpload($object);
    66. 

  66. 		} else {
    67. 

  67. 			$maxlength = $size;
    68. 

  68. 

  69. 			print "\n\n<!-- Start form attach new file -->\n";
    70. 

  70. 

  71. 			if (empty($title))
    72. 

  72. 				$title = $langs->trans("AttachANewFile");
    73. 

  73. 			if ($title != 'none')
    74. 

  74. 				print_titre($title);
    75. 

  75. 

  76. 			print '<form name="formuserfile" action="' . $url . '" enctype="multipart/form-data" method="POST">';
    77. 

  77. 			print '<input type="hidden" id="formuserfile_section_dir" name="section_dir" value="">';
    78. 

  78. 			print '<input type="hidden" id="formuserfile_section_id"  name="section_id" value="' . $sectionid . '">';
    79. 

  79. 			print '<input type="hidden" name="token" value="' . $_SESSION['newtoken'] . '">';
    80. 

  80. 

  81. 			print '<table width="100%" class="nobordernopadding">';
    82. 

  82. 			print '<tr>';
    83. 

  83. 

  84. 			if (!empty($options))
    85. 

  85. 				print '<td>' . $options . '</td>';
    86. 

  86. 

  87. 			print '<td valign="middle" nowrap="nowrap">';
    88. 

  88. 

  89. 			$max = $conf->global->MAIN_UPLOAD_DOC;  // En Kb
    90. 

  90. 			$maxphp = @ini_get('upload_max_filesize'); // En inconnu
    91. 

  91. 			if (preg_match('/m$/i', $maxphp))
    92. 

  92. 				$maxphp = $maxphp * 1024;
    93. 

  93. 			if (preg_match('/k$/i', $maxphp))
    94. 

  94. 				$maxphp = $maxphp;
    95. 

  95. 			// Now $max and $maxphp are in Kb
    96. 

  96. 			if ($maxphp > 0)
    97. 

  97. 				$max = min($max, $maxphp);
    98. 

  98. 

  99. 			if ($max > 0) {
    100. 

  100. 				print '<input type="hidden" name="max_file_size" value="' . ($max * 1024) . '">';
    101. 

  101. 			}
    102. 

  102. 			print '<input class="flat" type="file" name="userfile" size="' . $maxlength . '"';
    103. 

  103. 			print (empty($conf->global->MAIN_UPLOAD_DOC) || empty($perm) ? ' disabled="disabled"' : '');
    104. 

  104. 			print '>';
    105. 

  105. 			print ' &nbsp; ';
    106. 

  106. 			print '<input type="submit" class="button" name="sendit" value="' . $langs->trans("Upload") . '"';
    107. 

  107. 			print (empty($conf->global->MAIN_UPLOAD_DOC) || empty($perm) ? ' disabled="disabled"' : '');
    108. 

  108. 			print '>';
    109. 

  109. 

  110. 			if ($addcancel) {
    111. 

  111. 				print ' &nbsp; ';
    112. 

  112. 				print '<input type="submit" class="button" name="cancel" value="' . $langs->trans("Cancel") . '">';
    113. 

  113. 			}
    114. 

  114. 

  115. 			if (!empty($conf->global->MAIN_UPLOAD_DOC)) {
    116. 

  116. 				if ($perm) {
    117. 

  117. 					print ' (' . $langs->trans("MaxSize") . ': ' . $max . ' ' . $langs->trans("Kb");
    118. 

  118. 					print ' ' . info_admin($langs->trans("ThisLimitIsDefinedInSetup", $max, $maxphp), 1);
    119. 

  119. 					print ')';
    120. 

  120. 				}
    121. 

  121. 			} else {
    122. 

  122. 				print ' (' . $langs->trans("UploadDisabled") . ')';
    123. 

  123. 			}
    124. 

  124. 			print "</td></tr>";
    125. 

  125. 			print "</table>";
    126. 

  126. 

  127. 			print '</form>';
    128. 

  128. 			if (empty($sectionid))
    129. 

  129. 				print '<br>';
    130. 

  130. 

  131. 			print "\n<!-- End form attach new file -->\n\n";
    132. 

  132. 

  133. 			return 1;
    134. 

  134. 		}
    135. 

  135. 	}
    136. 

  136. 

  137. 	/**
    138. 

  138. 	 *      Show the box with list of available documents for object
    139. 

  139. 	 *
    140. 

  140. 	 *      @param      string				$modulepart         propal, facture, facture_fourn, ...
    141. 

  141. 	 *      @param      string				$filename           Sub-directory to scan (Example: '0/1/10', 'FA/DD/MM/YY/9999'). Use '' if $filedir is already complete)
    142. 

  142. 	 *      @param      string				$filedir            Directory to scan
    143. 

  143. 	 *      @param      string				$urlsource          Url of origin page (for return)
    144. 

  144. 	 *      @param      int					$genallowed         Generation is allowed (1/0 or array of formats)
    145. 

  145. 	 *      @param      int					$delallowed         Remove is allowed (1/0)
    146. 

  146. 	 *      @param      string				$modelselected      Model to preselect by default
    147. 

  147. 	 *      @param      string				$allowgenifempty	Show warning if no model activated
    148. 

  148. 	 *      @param      string				$forcenomultilang	Do not show language option (even if MAIN_MULTILANGS defined)
    149. 

  149. 	 *      @param      int					$iconPDF            Show only PDF icon with link (1/0)
    150. 

  150. 	 * 		@param		int					$maxfilenamelength	Max length for filename shown
    151. 

  151. 	 * 		@param		string				$noform				Do not output html form tags
    152. 

  152. 	 * 		@param		string				$param				More param on http links
    153. 

  153. 	 * 		@param		string				$title				Title to show on top of form
    154. 

  154. 	 * 		@param		string				$buttonlabel		Label on submit button
    155. 

  155. 	 * 		@param		string				$codelang			Default language code to use on lang combo box if multilang is enabled
    156. 

  156. 	 * 		@return		int										<0 if KO, number of shown files if OK
    157. 

  157. 	 */
    158. 

  158. 	function show_documents($modulepart, $filename, $filedir, $urlsource, $genallowed, $delallowed = 0, $modelselected = '', $allowgenifempty = 1, $forcenomultilang = 0, $iconPDF = 0, $maxfilenamelength = 28, $noform = 0, $param = '', $title = '', $buttonlabel = '', $codelang = '') {
    159. 

  159. 		global $langs;
    160. 

  160. 

  161. 		$this->numoffiles = 0;
    162. 

  162. 		$titre = $langs->trans("Documents");
    163. 

  163. 		print start_box($titre, "icon-object-documents");
    164. 

  164. 		print '<a name="builddoc"></a>';
    165. 

  165. 		print $this->showdocuments($modulepart, $filename, $filedir, $urlsource, $genallowed, $delallowed, $modelselected, $allowgenifempty, $forcenomultilang, $iconPDF, $maxfilenamelength, $noform, $param, $title, $buttonlabel, $codelang);
    166. 

  166. 		print end_box();
    167. 

  167. 		return $this->numoffiles;
    168. 

  168. 	}
    169. 

  169. 

  170. 	/**
    171. 

  171. 	 *      Return a string to show the box with list of available documents for object.
    172. 

  172. 	 *      This also set the property $this->numoffiles
    173. 

  173. 	 *
    174. 

  174. 	 *      @param      string				$modulepart         propal, facture, facture_fourn, ...
    175. 

  175. 	 *      @param      string				$filename           Sub-directory to scan (Example: '0/1/10', 'FA/DD/MM/YY/9999'). Use '' if $filedir is already complete)
    176. 

  176. 	 *      @param      string				$filedir            Directory to scan
    177. 

  177. 	 *      @param      string				$urlsource          Url of origin page (for return)
    178. 

  178. 	 *      @param      int					$genallowed         Generation is allowed (1/0 or array list of templates)
    179. 

  179. 	 *      @param      int					$delallowed         Remove is allowed (1/0)
    180. 

  180. 	 *      @param      string				$modelselected      Model to preselect by default
    181. 

  181. 	 *      @param      string				$allowgenifempty	Allow generation even if list of template ($genallowed) is empty (show however a warning)
    182. 

  182. 	 *      @param      string				$forcenomultilang	Do not show language option (even if MAIN_MULTILANGS defined)
    183. 

  183. 	 *      @param      int					$iconPDF            Obsolete, see getDocumentsLink
    184. 

  184. 	 * 		@param		int					$maxfilenamelength	Max length for filename shown
    185. 

  185. 	 * 		@param		string				$noform				Do not output html form tags
    186. 

  186. 	 * 		@param		string				$param				More param on http links
    187. 

  187. 	 * 		@param		string				$title				Title to show on top of form
    188. 

  188. 	 * 		@param		string				$buttonlabel		Label on submit button
    189. 

  189. 	 * 		@param		string				$codelang			Default language code to use on lang combo box if multilang is enabled
    190. 

  190. 	 * 		@return		string              					Output string with HTML array of documents (might be empty string)
    191. 

  191. 	 */
    192. 

  192. 	function showdocuments($modulepart, $filename, $filedir, $urlsource, $genallowed, $delallowed = 0, $modelselected = '', $allowgenifempty = 1, $forcenomultilang = 0, $iconPDF = 0, $maxfilenamelength = 28, $noform = 0, $param = '', $title = '', $buttonlabel = '', $codelang = '') {
    193. 

  193. 		// filedir = conf->...dir_ouput."/".get_exdir(id)
    194. 

  194. 		include_once DOL_DOCUMENT_ROOT . '/core/lib/files.lib.php';
    195. 

  195. 

  196. 		global $langs, $bc, $conf, $hookmanager;
    197. 

  197. 

  198. 		// For backward compatibility
    199. 

  199. 		if (!empty($iconPDF)) {
    200. 

  200. 			return $this->getDocumentsLink($modulepart, $filename, $filedir);
    201. 

  201. 		}
    202. 

  202. 

  203. 		$forname = 'builddoc';
    204. 

  204. 		$out = '';
    205. 

  205. 		$var = true;
    206. 

  206. 

  207. 		//$filename = dol_sanitizeFileName($filename);    //Must be sanitized before calling show_documents
    208. 

  208. 		$headershown = 0;
    209. 

  209. 		$showempty = 0;
    210. 

  210. 		$i = 0;
    211. 

  211. 

  212. 		$titletoshow = $langs->trans("Documents");
    213. 

  213. 		if (!empty($title))
    214. 

  214. 			$titletoshow = $title;
    215. 

  215. 

  216. 		$out.= "\n" . '<!-- Start show_document -->' . "\n";
    217. 

  217. 		//print 'filedir='.$filedir;
    218. 

  218. 		// Affiche en-tete tableau
    219. 

  219. 		if ($genallowed) {
    220. 

  220. 			$modellist = array();
    221. 

  221. 

  222. 			if ($modulepart == 'company') {
    223. 

  223. 				$showempty = 1;
    224. 

  224. 				if (is_array($genallowed))
    225. 

  225. 					$modellist = $genallowed;
    226. 

  226. 				else {
    227. 

  227. 					include_once DOL_DOCUMENT_ROOT . '/core/models/modules_societe.class.php';
    228. 

  228. 					$modellist = ModeleThirdPartyDoc::liste_modeles($this->db);
    229. 

  229. 				}
    230. 

  230. 			} else if ($modulepart == 'propal') {
    231. 

  231. 				if (is_array($genallowed))
    232. 

  232. 					$modellist = $genallowed;
    233. 

  233. 				else {
    234. 

  234. 					include_once DOL_DOCUMENT_ROOT . '/propal/core/modules/propale/modules_propale.php';
    235. 

  235. 					$modellist = ModelePDFPropales::liste_modeles($this->db);
    236. 

  236. 				}
    237. 

  237. 			} else if ($modulepart == 'commande') {
    238. 

  238. 				if (is_array($genallowed))
    239. 

  239. 					$modellist = $genallowed;
    240. 

  240. 				else {
    241. 

  241. 					include_once DOL_DOCUMENT_ROOT . '/commande/core/modules/commande/modules_commande.php';
    242. 

  242. 					$modellist = ModelePDFCommandes::liste_modeles($this->db);
    243. 

  243. 				}
    244. 

  244. 			} elseif ($modulepart == 'expedition') {
    245. 

  245. 				if (is_array($genallowed))
    246. 

  246. 					$modellist = $genallowed;
    247. 

  247. 				else {
    248. 

  248. 					include_once DOL_DOCUMENT_ROOT . '/core/modules/expedition/modules_expedition.php';
    249. 

  249. 					$modellist = ModelePDFExpedition::liste_modeles($this->db);
    250. 

  250. 				}
    251. 

  251. 			} elseif ($modulepart == 'livraison') {
    252. 

  252. 				if (is_array($genallowed))
    253. 

  253. 					$modellist = $genallowed;
    254. 

  254. 				else {
    255. 

  255. 					include_once DOL_DOCUMENT_ROOT . '/core/modules/livraison/modules_livraison.php';
    256. 

  256. 					$modellist = ModelePDFDeliveryOrder::liste_modeles($this->db);
    257. 

  257. 				}
    258. 

  258. 			} else if ($modulepart == 'ficheinter') {
    259. 

  259. 				if (is_array($genallowed))
    260. 

  260. 					$modellist = $genallowed;
    261. 

  261. 				else {
    262. 

  262. 					include_once DOL_DOCUMENT_ROOT . '/core/modules/fichinter/modules_fichinter.php';
    263. 

  263. 					$modellist = ModelePDFFicheinter::liste_modeles($this->db);
    264. 

  264. 				}
    265. 

  265. 			} elseif ($modulepart == 'facture') {
    266. 

  266. 				if (is_array($genallowed))
    267. 

  267. 					$modellist = $genallowed;
    268. 

  268. 				else {
    269. 

  269. 					include_once DOL_DOCUMENT_ROOT . '/facture/core/modules/facture/modules_facture.php';
    270. 

  270. 					$modellist = ModelePDFFactures::liste_modeles($this->db);
    271. 

  271. 				}
    272. 

  272. 			} elseif ($modulepart == 'project') {
    273. 

  273. 				if (is_array($genallowed))
    274. 

  274. 					$modellist = $genallowed;
    275. 

  275. 				else {
    276. 

  276. 					include_once DOL_DOCUMENT_ROOT . '/core/modules/project/modules_project.php';
    277. 

  277. 					$modellist = ModelePDFProjects::liste_modeles($this->db);
    278. 

  278. 				}
    279. 

  279. 			} elseif ($modulepart == 'export') {
    280. 

  280. 				if (is_array($genallowed))
    281. 

  281. 					$modellist = $genallowed;
    282. 

  282. 				else {
    283. 

  283. 					include_once DOL_DOCUMENT_ROOT . '/export/core/modules/export/modules_export.php';
    284. 

  284. 					$modellist = ModeleExports::liste_modeles($this->db);
    285. 

  285. 				}
    286. 

  286. 			} else if ($modulepart == 'commande_fournisseur') {
    287. 

  287. 				if (is_array($genallowed))
    288. 

  288. 					$modellist = $genallowed;
    289. 

  289. 				else {
    290. 

  290. 					include_once DOL_DOCUMENT_ROOT . '/core/modules/supplier_order/modules_commandefournisseur.php';
    291. 

  291. 					$modellist = ModelePDFSuppliersOrders::liste_modeles($this->db);
    292. 

  292. 				}
    293. 

  293. 			} else if ($modulepart == 'facture_fournisseur') {
    294. 

  294. 				if (is_array($genallowed))
    295. 

  295. 					$modellist = $genallowed;
    296. 

  296. 				else {
    297. 

  297. 					include_once DOL_DOCUMENT_ROOT . '/core/modules/supplier_invoice/modules_facturefournisseur.php';
    298. 

  298. 					$modellist = ModelePDFSuppliersInvoices::liste_modeles($this->db);
    299. 

  299. 				}
    300. 

  300. 			} else if ($modulepart == 'remisecheque') {
    301. 

  301. 				if (is_array($genallowed))
    302. 

  302. 					$modellist = $genallowed;
    303. 

  303. 				else {
    304. 

  304. 					include_once DOL_DOCUMENT_ROOT . '/core/modules/cheque/pdf/modules_chequereceipts.php';
    305. 

  305. 					$modellist = ModeleChequeReceipts::liste_modeles($this->db);
    306. 

  306. 				}
    307. 

  307. 			} elseif ($modulepart == 'donation') {
    308. 

  308. 				if (is_array($genallowed))
    309. 

  309. 					$modellist = $genallowed;
    310. 

  310. 				else {
    311. 

  311. 					include_once DOL_DOCUMENT_ROOT . '/core/modules/dons/modules_don.php';
    312. 

  312. 					$modellist = ModeleDon::liste_modeles($this->db);
    313. 

  313. 				}
    314. 

  314. 			} else if ($modulepart == 'unpaid') {
    315. 

  315. 				$modellist = '';
    316. 

  316. 			} else {
    317. 

  317. 				// Generic feature, for external modules
    318. 

  318. 				$file = dol_buildpath('/core/modules/' . $modulepart . '/modules_' . $modulepart . '.php', 0);
    319. 

  319. 				if (file_exists($file)) {
    320. 

  320. 					$res = include_once $file;
    321. 

  321. 				}
    322. 

  322. 				$class = 'Modele' . ucfirst($modulepart);
    323. 

  323. 				if (class_exists($class)) {
    324. 

  324. 					$modellist = call_user_func($class . '::liste_modeles', $this->db);
    325. 

  325. 				} else {
    326. 

  326. 					dol_print_error($this->db, 'Bad value for modulepart');
    327. 

  327. 					return -1;
    328. 

  328. 				}
    329. 

  329. 			}
    330. 

  330. 

  331. 			$headershown = 1;
    332. 

  332. 

  333. 			$form = new Form($this->db);
    334. 

  334. 			$buttonlabeltoshow = $buttonlabel;
    335. 

  335. 			if (empty($buttonlabel))
    336. 

  336. 				$buttonlabel = $langs->trans('Generate');
    337. 

  337. 

  338. 			if (empty($noform))
    339. 

  339. 				$out.= '<form action="' . $urlsource . '#builddoc' . '" name="' . $forname . '" id="' . $forname . '_form" method="POST">';
    340. 

  340. 			$out.= '<input type="hidden" name="action" value="builddoc">';
    341. 

  341. 			$out.= '<input type="hidden" name="token" value="' . $_SESSION['newtoken'] . '">';
    342. 

  342. 

  343. 			$out.= '<div class="titre">' . $titletoshow . '</div>';
    344. 

  344. 			$out.= '<table class="liste formdoc" summary="listofdocumentstable" width="100%">';
    345. 

  345. 

  346. 			$out.= '<tr class="liste_titre">';
    347. 

  347. 

  348. 			// Model
    349. 

  349. 			if (!empty($modellist)) {
    350. 

  350. 				$out.= '<th align="center" class="formdoc liste_titre">';
    351. 

  351. 				$out.= $langs->trans('Model') . ' ';
    352. 

  352. 				if (is_array($modellist) && count($modellist) == 1) {	// If there is only one element
    353. 

  353. 					$arraykeys = array_keys($modellist);
    354. 

  354. 					$modelselected = $arraykeys[0];
    355. 

  355. 				}
    356. 

  356. 				$out.= $form->selectarray('model', $modellist, $modelselected, $showempty, 0, 0);
    357. 

  357. 				$out.= '</th>';
    358. 

  358. 			} else {
    359. 

  359. 				$out.= '<th align="left" class="formdoc liste_titre">';
    360. 

  360. 				$out.= $langs->trans("Files");
    361. 

  361. 				$out.= '</th>';
    362. 

  362. 			}
    363. 

  363. 

  364. 			// Language code (if multilang)
    365. 

  365. 			$out.= '<th align="center" class="formdoc liste_titre">';
    366. 

  366. 			if (($allowgenifempty || (is_array($modellist) && count($modellist) > 0)) && $conf->global->MAIN_MULTILANGS && !$forcenomultilang) {
    367. 

  367. 				include_once DOL_DOCUMENT_ROOT . '/core/class/html.formadmin.class.php';
    368. 

  368. 				$formadmin = new FormAdmin($this->db);
    369. 

  369. 				$defaultlang = $codelang ? $codelang : $langs->getDefaultLang();
    370. 

  370. 				$out.= $formadmin->select_language($defaultlang);
    371. 

  371. 			} else {
    372. 

  372. 				$out.= '&nbsp;';
    373. 

  373. 			}
    374. 

  374. 			$out.= '</th>';
    375. 

  375. 

  376. 			// Button
    377. 

  377. 			$out.= '<th align="center" colspan="' . ($delallowed ? '2' : '1') . '" class="formdocbutton liste_titre">';
    378. 

  378. 			$out.= '<input class="button" id="' . $forname . '_generatebutton"';
    379. 

  379. 			$out.= ' type="submit" value="' . $buttonlabel . '"';
    380. 

  380. 			if (!$allowgenifempty && !is_array($modellist) && empty($modellist))
    381. 

  381. 				$out.= ' disabled="disabled"';
    382. 

  382. 			$out.= '>';
    383. 

  383. //            $out .= '<a href="'.$urlsource.(empty($conf->global->MAIN_JUMP_TAG)?'':'#builddoc').'&action=builddoc" class="button" >' . $buttonlabel . '</a>';
    384. 

  384. 			if ($allowgenifempty && !is_array($modellist) && empty($modellist) && $modulepart != 'unpaid') {
    385. 

  385. 				$langs->load("errors");
    386. 

  386. 				$out.= ' ' . img_warning($langs->transnoentitiesnoconv("WarningNoDocumentModelActivated"));
    387. 

  387. 			}
    388. 

  388. 			$out.= '</th>';
    389. 

  389. 

  390. 			$out.= '</tr>';
    391. 

  391. 

  392. 			// Execute hooks
    393. 

  393. 			$parameters = array('socid' => (isset($GLOBALS['socid']) ? $GLOBALS['socid'] : ''), 'id' => (isset($GLOBALS['id']) ? $GLOBALS['id'] : ''), 'modulepart' => $modulepart);
    394. 

  394. 			if (is_object($hookmanager))
    395. 

  395. 				$out.= $hookmanager->executeHooks('formBuilddocOptions', $parameters, $GLOBALS['object']);
    396. 

  396. 		}
    397. 

  397. 

  398. 		// Get list of files
    399. 

  399. 		if (!empty($filedir)) {
    400. 

  400. 			$file_list = dol_dir_list($filedir, 'files', 0, '', '\.meta$', 'date', SORT_DESC);
    401. 

  401. 

  402. 			// Affiche en-tete tableau si non deja affiche
    403. 

  403. 			if (!empty($file_list) && !$headershown) {
    404. 

  404. 				$headershown = 1;
    405. 

  405. 				$out.= '<div class="titre">' . $titletoshow . '</div>';
    406. 

  406. 				$out.= '<table class="border" summary="listofdocumentstable" width="100%">';
    407. 

  407. 			}
    408. 

  408. 

  409. 			// Loop on each file found
    410. 

  410. 			if (is_array($file_list)) {
    411. 

  411. 				foreach ($file_list as $file) {
    412. 

  412. 					$var = !$var;
    413. 

  413. 

  414. 					// Define relative path for download link (depends on module)
    415. 

  415. 					$relativepath = $file["name"];		// Cas general
    416. 

  416. 					if ($filename)
    417. 

  417. 						$relativepath = $filename . "/" . $file["name"]; // Cas propal, facture...
    418. 

  418. 						
    419. 

  419. // Autre cas
    420. 

  420. 					if ($modulepart == 'donation') {
    421. 

  421. 						$relativepath = get_exdir($filename, 2) . $file["name"];
    422. 

  422. 					}
    423. 

  423. 					if ($modulepart == 'export') {
    424. 

  424. 						$relativepath = $file["name"];
    425. 

  425. 					}
    426. 

  426. 

  427. 					$out.= "<tr " . $bc[$var] . ">";
    428. 

  428. 

  429. 					// Show file name with link to download
    430. 

  430. 					$out.= '<td nowrap="nowrap">';
    431. 

  431. 					$out.= '<a href="' . DOL_URL_ROOT . '/document.php?modulepart=' . $modulepart . '&amp;file=' . urlencode($relativepath) . '"';
    432. 

  432. 					$mime = dol_mimetype($relativepath, '', 0);
    433. 

  433. 					if (preg_match('/text/', $mime))
    434. 

  434. 						$out.= ' target="_blank"';
    435. 

  435. 					$out.= '>';
    436. 

  436. 					$out.= img_mime($file["name"], $langs->trans("File") . ': ' . $file["name"]) . ' ' . dol_trunc($file["name"], $maxfilenamelength);
    437. 

  437. 					$out.= '</a>' . "\n";
    438. 

  438. 					$out.= '</td>';
    439. 

  439. 

  440. 					// Show file size
    441. 

  441. 					$size = (!empty($file['size']) ? $file['size'] : dol_filesize($filedir . "/" . $file["name"]));
    442. 

  442. 					$out.= '<td align="right" nowrap="nowrap">' . dol_print_size($size) . '</td>';
    443. 

  443. 

  444. 					// Show file date
    445. 

  445. 					$date = (!empty($file['date']) ? $file['date'] : dol_filemtime($filedir . "/" . $file["name"]));
    446. 

  446. 					$out.= '<td align="right" nowrap="nowrap">' . dol_print_date($date, 'dayhour') . '</td>';
    447. 

  447. 

  448. 					if ($delallowed) {
    449. 

  449. 						$out.= '<td align="right">';
    450. 

  450. 						$out.= '<a href="' . $urlsource . (strpos($urlsource, '?') ? '&' : '?') . 'action=remove_file&file=' . urlencode($relativepath) .'#builddoc';
    451. 

  451. 						$out.= ($param ? '&' . $param : '');
    452. 

  452. 						//$out.= '&modulepart='.$modulepart; // TODO obsolete ?
    453. 

  453. 						//$out.= '&urlsource='.urlencode($urlsource); // TODO obsolete ?
    454. 

  454. 						$out.= '">' . img_delete() . '</a></td>';
    455. 

  455. 					}
    456. 

  456. 				}
    457. 

  457. 

  458. 				$out.= '</tr>';
    459. 

  459. 

  460. 				$this->numoffiles++;
    461. 

  461. 			}
    462. 

  462. 		}
    463. 

  463. 

  464. 		if ($headershown) {
    465. 

  465. 			// Affiche pied du tableau
    466. 

  466. 			$out.= "</table>\n";
    467. 

  467. 			if ($genallowed) {
    468. 

  468. 				if (empty($noform))
    469. 

  469. 					$out.= '</form>' . "\n";
    470. 

  470. 			}
    471. 

  471. 		}
    472. 

  472. 		$out.= '<!-- End show_document -->' . "\n";
    473. 

  473. 		//return ($i?$i:$headershown);
    474. 

  474. 		return $out;
    475. 

  475. 	}
    476. 

  476. 

  477. 	/**
    478. 

  478. 	 * 	Show only Document icon with link
    479. 

  479. 	 *
    480. 

  480. 	 * 	@param	string	$modulepart		propal, facture, facture_fourn, ...
    481. 

  481. 	 * 	@param	string	$filename		Sub-directory to scan (Example: '0/1/10', 'FA/DD/MM/YY/9999'). Use '' if $filedir is already complete)
    482. 

  482. 	 * 	@param	string	$filedir		Directory to scan
    483. 

  483. 	 * 	@return	string              	Output string with HTML link of documents (might be empty string)
    484. 

  484. 	 */
    485. 

  485. 	function getDocumentsLink($modulepart, $filename, $filedir) {
    486. 

  486. 		if (!function_exists('dol_dir_list')) {
    487. 

  487. 			include DOL_DOCUMENT_ROOT . '/core/lib/files.lib.php';
    488. 

  488. 		}
    489. 

  489. 

  490. 		$out = '';
    491. 

  491. 

  492. 		$this->numoffiles = 0;
    493. 

  493. 

  494. 		$file_list = dol_dir_list($filedir, 'files', 0, $filename . '.pdf', '\.meta$|\.png$');
    495. 

  495. 

  496. 		// For ajax treatment
    497. 

  497. 		$out.= '<div id="gen_pdf_' . $filename . '" class="linkobject hideobject">' . img_picto('', 'refresh') . '</div>' . "\n";
    498. 

  498. 

  499. 		if (!empty($file_list)) {
    500. 

  500. 			// Loop on each file found
    501. 

  501. 			foreach ($file_list as $file) {
    502. 

  502. 				// Define relative path for download link (depends on module)
    503. 

  503. 				$relativepath = $file["name"];		// Cas general
    504. 

  504. 				if ($filename)
    505. 

  505. 					$relativepath = $filename . "/" . $file["name"]; // Cas propal, facture...
    506. 

  506. 					
    507. 

  507. // Autre cas
    508. 

  508. 				if ($modulepart == 'donation') {
    509. 

  509. 					$relativepath = get_exdir($filename, 2) . $file["name"];
    510. 

  510. 				}
    511. 

  511. 				if ($modulepart == 'export') {
    512. 

  512. 					$relativepath = $file["name"];
    513. 

  513. 				}
    514. 

  514. 

  515. 				// Show file name with link to download
    516. 

  516. 				$out.= '<a href="' . DOL_URL_ROOT . '/document.php?modulepart=' . $modulepart . '&amp;file=' . urlencode($relativepath) . '"';
    517. 

  517. 				$mime = dol_mimetype($relativepath, '', 0);
    518. 

  518. 				if (preg_match('/text/', $mime))
    519. 

  519. 					$out.= ' target="_blank"';
    520. 

  520. 				$out.= '>';
    521. 

  521. 				$out.= img_pdf($file["name"], 2);
    522. 

  522. 				$out.= '</a>' . "\n";
    523. 

  523. 

  524. 				$this->numoffiles++;
    525. 

  525. 			}
    526. 

  526. 		}
    527. 

  527. 

  528. 		return $out;
    529. 

  529. 	}
    530. 

  530. 

  531. 	/**
    532. 

  532. 	 *  Show list of documents in a directory
    533. 

  533. 	 *
    534. 

  534. 	 *  @param	 array	$filearray          Array of files loaded by dol_dir_list('files') function before calling this
    535. 

  535. 	 * 	@param	 Object	$object				Object on which document is linked to
    536. 

  536. 	 * 	@param	 string	$modulepart			Value for modulepart used by download or viewimage wrapper
    537. 

  537. 	 * 	@param	 string	$param				Parameters on sort links
    538. 

  538. 	 * 	@param	 int	$forcedownload		Force to open dialog box "Save As" when clicking on file
    539. 

  539. 	 * 	@param	 string	$relativepath		Relative path of docs (autodefined if not provided)
    540. 

  540. 	 * 	@param	 int	$permtodelete		Permission to delete
    541. 

  541. 	 * 	@param	 int	$useinecm			Change output for use in ecm module
    542. 

  542. 	 * 	@param	 string	$textifempty		Text to show if filearray is empty ('NoFileFound' if not defined)
    543. 

  543. 	 *  @param  int		$maxlength          Maximum length of file name shown
    544. 

  544. 	 *  @param	 string	$title				Title before list
    545. 

  545. 	 *  @param	 string $url				Full url to use for click links ('' = autodetect)
    546. 

  546. 	 * 	@return	 int						<0 if KO, nb of files shown if OK
    547. 

  547. 	 */
    548. 

  548. 	function list_of_documents($filearray, $object, $modulepart, $param = '', $forcedownload = 0, $relativepath = '', $permtodelete = 1, $useinecm = 0, $textifempty = '', $maxlength = 0, $title = '', $url = '') {
    549. 

  549. 		global $user, $conf, $langs;
    550. 

  550. 		global $bc, $hookmanager;
    551. 

  551. 		global $sortfield, $sortorder, $maxheightmini;
    552. 

  552. 

  553. 		if (!is_object($hookmanager)) {
    554. 

  554. 			if (!class_exists('HookManager')) {
    555. 

  555. 				// Initialize technical object to manage hooks of thirdparties. Note that conf->hooks_modules contains array array
    556. 

  556. 				require DOL_DOCUMENT_ROOT . '/core/class/hookmanager.class.php';
    557. 

  557. 				$hookmanager = new HookManager($this->db);
    558. 

  558. 			}
    559. 

  559. 		}
    560. 

  560. 		$hookmanager->initHooks(array('formfile'));
    561. 

  561. 

  562. 		$parameters = array(
    563. 

  563. 			'filearray' => $filearray,
    564. 

  564. 			'modulepart' => $modulepart,
    565. 

  565. 			'param' => $param,
    566. 

  566. 			'forcedownload' => $forcedownload,
    567. 

  567. 			'relativepath' => $relativepath,
    568. 

  568. 			'permtodelete' => $permtodelete,
    569. 

  569. 			'useinecm' => $useinecm,
    570. 

  570. 			'textifempty' => $textifempty,
    571. 

  571. 			'maxlength' => $maxlength,
    572. 

  572. 			'title' => $title,
    573. 

  573. 			'url' => $url
    574. 

  574. 		);
    575. 

  575. 		$reshook = $hookmanager->executeHooks('showFilesList', $parameters, $object);
    576. 

  576. 

  577. 		if (isset($reshook) && $reshook != '') { // null or '' for bypass
    578. 

  578. 			return $reshook;
    579. 

  579. 		} else {
    580. 

  580. 			$param = (isset($object->id) ? '&id=' . $object->id : '') . $param;
    581. 

  581. 

  582. 			// Show list of existing files
    583. 

  583. 			if (empty($useinecm))
    584. 

  584. 				print_titre($title ? $title : $langs->trans("AttachedFiles"));
    585. 

  585. 			if (empty($url))
    586. 

  586. 				$url = $_SERVER["PHP_SELF"];
    587. 

  587. 			print '<table width="100%" class="' . ($useinecm ? 'nobordernopadding' : 'liste') . '">';
    588. 

  588. 			print '<tr class="liste_titre">';
    589. 

  589. 			print_liste_field_titre($langs->trans("Documents2"), $url, "name", "", $param, 'align="left"', $sortfield, $sortorder);
    590. 

  590. 			print_liste_field_titre($langs->trans("Size"), $url, "size", "", $param, 'align="right"', $sortfield, $sortorder);
    591. 

  591. 			print_liste_field_titre($langs->trans("Date"), $url, "date", "", $param, 'align="center"', $sortfield, $sortorder);
    592. 

  592. 			if (empty($useinecm))
    593. 

  593. 				print_liste_field_titre('', $url, "", "", $param, 'align="center"');
    594. 

  594. 			print_liste_field_titre('', '', '');
    595. 

  595. 			print '</tr>';
    596. 

  596. 

  597. 			$nboffiles = count($filearray);
    598. 

  598. 

  599. 			if ($nboffiles > 0)
    600. 

  600. 				include_once DOL_DOCUMENT_ROOT . '/core/lib/images.lib.php';
    601. 

  601. 

  602. 			$var = true;
    603. 

  603. 			foreach ($filearray as $key => $file) {	  // filearray must be only files here
    604. 

  604. 				if ($file['name'] != '.' && $file['name'] != '..' && !preg_match('/\.meta$/i', $file['name'])) {
    605. 

  605. 					// Define relative path used to store the file
    606. 

  606. 					if (empty($relativepath))
    607. 

  607. 						$relativepath = (!empty($object->ref) ? dol_sanitizeFileName($object->ref) : '') . '/';
    608. 

  608. 

  609. 					$var = !$var;
    610. 

  610. 					print '<tr ' . $bc[$var] . '>';
    611. 

  611. 					print '<td>';
    612. 

  612. 					//print "XX".$file['name'];	//$file['name'] must be utf8
    613. 

  613. 					print '<a href="' . DOL_URL_ROOT . '/document.php?modulepart=' . $modulepart;
    614. 

  614. 					if ($forcedownload)
    615. 

  615. 						print '&attachment=1';
    616. 

  616. 					if (!empty($object->entity))
    617. 

  617. 						print '&entity=' . $object->entity;
    618. 

  618. 					print '&file=' . urlencode($relativepath . $file['name']) . '">';
    619. 

  619. 					print img_mime($file['name'], $file['name'] . ' (' . dol_print_size($file['size'], 0, 0) . ')') . ' ';
    620. 

  620. 					print dol_trunc($file['name'], $maxlength, 'middle');
    621. 

  621. 					print '</a>';
    622. 

  622. 					print "</td>\n";
    623. 

  623. 					print '<td align="right">' . dol_print_size($file['size'], 1, 1) . '</td>';
    624. 

  624. 					print '<td align="center">' . dol_print_date($file['date'], "dayhour", "tzuser") . '</td>';
    625. 

  625. 					// Preview
    626. 

  626. 					if (empty($useinecm)) {
    627. 

  627. 						print '<td align="center">';
    628. 

  628. 						$tmp = explode('.', $file['name']);
    629. 

  629. 						$minifile = $tmp[0] . '_mini.' . $tmp[1];
    630. 

  630. 						if (image_format_supported($file['name']) > 0)
    631. 

  631. 							print '<img border="0" height="' . $maxheightmini . '" src="' . DOL_URL_ROOT . '/viewimage.php?modulepart=' . $modulepart . '&file=' . urlencode($relativepath . 'thumbs/' . $minifile) . '" title="">';
    632. 

  632. 						else
    633. 

  633. 							print '&nbsp;';
    634. 

  634. 						print '</td>';
    635. 

  635. 					}
    636. 

  636. 					// Delete or view link
    637. 

  637. 					print '<td align="right">';
    638. 

  638. 					if ($useinecm)
    639. 

  639. 						print '<a href="' . DOL_URL_ROOT . '/ecm/docfile.php?urlfile=' . urlencode($file['name']) . $param . '" class="editfilelink" rel="' . urlencode($file['name']) . '">' . img_view() . '</a> &nbsp; ';
    640. 

  640. 					if ($permtodelete)
    641. 

  641. 						print '<a href="' . (($useinecm && !empty($conf->use_javascript_ajax) && empty($conf->global->MAIN_ECM_DISABLE_JS)) ? '#' : $url . '?action=delete&urlfile=' . urlencode($file['name']) . $param) . '" class="deletefilelink" rel="' . urlencode($file['name']) . '">' . img_delete() . '</a>';
    642. 

  642. 					else
    643. 

  643. 						print '&nbsp;';
    644. 

  644. 					print "</td>";
    645. 

  645. 					print "</tr>\n";
    646. 

  646. 				}
    647. 

  647. 			}
    648. 

  648. 			if ($nboffiles == 0) {
    649. 

  649. 				print '<tr ' . $bc[$var] . '><td colspan="' . (empty($useinecm) ? '5' : '4') . '">';
    650. 

  650. 				if (empty($textifempty))
    651. 

  651. 					print $langs->trans("NoFileFound");
    652. 

  652. 				else
    653. 

  653. 					print $textifempty;
    654. 

  654. 				print '</td></tr>';
    655. 

  655. 			}
    656. 

  656. 			print "</table>";
    657. 

  657. 

  658. 			return $nboffiles;
    659. 

  659. 		}
    660. 

  660. 	}
    661. 

  661. 

  662. 	/**
    663. 

  663. 	 * 	Show list of documents in a directory
    664. 

  664. 	 *
    665. 

  665. 	 *  @param	 string	$upload_dir         Directory that was scanned
    666. 

  666. 	 *  @param  array	$filearray          Array of files loaded by dol_dir_list function before calling this function
    667. 

  667. 	 *  @param  string	$modulepart         Value for modulepart used by download wrapper
    668. 

  668. 	 *  @param  string	$param              Parameters on sort links
    669. 

  669. 	 *  @param  int		$forcedownload      Force to open dialog box "Save As" when clicking on file
    670. 

  670. 	 *  @param  string	$relativepath       Relative path of docs (autodefined if not provided)
    671. 

  671. 	 *  @param  int		$permtodelete       Permission to delete
    672. 

  672. 	 *  @param  int		$useinecm           Change output for use in ecm module
    673. 

  673. 	 *  @param  int		$textifempty        Text to show if filearray is empty
    674. 

  674. 	 *  @param  int		$maxlength          Maximum length of file name shown
    675. 

  675. 	 *  @param	 string $url				Full url to use for click links ('' = autodetect)
    676. 

  676. 	 *  @return int                 		<0 if KO, nb of files shown if OK
    677. 

  677. 	 */
    678. 

  678. 	function list_of_autoecmfiles($upload_dir, $filearray, $modulepart, $param, $forcedownload = 0, $relativepath = '', $permtodelete = 1, $useinecm = 0, $textifempty = '', $maxlength = 0, $url = '') {
    679. 

  679. 		global $user, $conf, $langs;
    680. 

  680. 		global $bc;
    681. 

  681. 		global $sortfield, $sortorder;
    682. 

  682. 

  683. 		dol_syslog(get_class($this) . '::list_of_autoecmfiles upload_dir=' . $upload_dir . ' modulepart=' . $modulepart);
    684. 

  684. 

  685. 		// Show list of documents
    686. 

  686. 		if (empty($useinecm))
    687. 

  687. 			print_titre($langs->trans("AttachedFiles"));
    688. 

  688. 		if (empty($url))
    689. 

  689. 			$url = $_SERVER["PHP_SELF"];
    690. 

  690. 		print '<table width="100%" class="nobordernopadding">';
    691. 

  691. 		print '<tr class="liste_titre">';
    692. 

  692. 		$sortref = "fullname";
    693. 

  693. 		if ($modulepart == 'invoice_supplier')
    694. 

  694. 			$sortref = '';	// No sort for supplier invoices as path name is not
    695. 

  695. 		print_liste_field_titre($langs->trans("Ref"), $url, $sortref, "", $param, 'align="left"', $sortfield, $sortorder);
    696. 

  696. 		print_liste_field_titre($langs->trans("Documents2"), $url, "name", "", $param, 'align="left"', $sortfield, $sortorder);
    697. 

  697. 		print_liste_field_titre($langs->trans("Size"), $url, "size", "", $param, 'align="right"', $sortfield, $sortorder);
    698. 

  698. 		print_liste_field_titre($langs->trans("Date"), $url, "date", "", $param, 'align="center"', $sortfield, $sortorder);
    699. 

  699. 		print_liste_field_titre('', '', '');
    700. 

  700. 		print '</tr>';
    701. 

  701. 

  702. 		// To show ref or specific information according to view to show (defined by $module)
    703. 

  703. 		if ($modulepart == 'company') {
    704. 

  704. 			include_once DOL_DOCUMENT_ROOT . '/societe/class/societe.class.php';
    705. 

  705. 			$object_instance = new Societe($this->db);
    706. 

  706. 		} else if ($modulepart == 'invoice') {
    707. 

  707. 			include_once DOL_DOCUMENT_ROOT . '/compta/facture/class/facture.class.php';
    708. 

  708. 			$object_instance = new Facture($this->db);
    709. 

  709. 		} else if ($modulepart == 'invoice_supplier') {
    710. 

  710. 			include_once DOL_DOCUMENT_ROOT . '/fourn/class/fournisseur.facture.class.php';
    711. 

  711. 			$object_instance = new FactureFournisseur($this->db);
    712. 

  712. 		} else if ($modulepart == 'propal') {
    713. 

  713. 			include_once DOL_DOCUMENT_ROOT . '/comm/propal/class/propal.class.php';
    714. 

  714. 			$object_instance = new Propal($this->db);
    715. 

  715. 		} else if ($modulepart == 'order') {
    716. 

  716. 			include_once DOL_DOCUMENT_ROOT . '/commande/class/commande.class.php';
    717. 

  717. 			$object_instance = new Commande($this->db);
    718. 

  718. 		} else if ($modulepart == 'order_supplier') {
    719. 

  719. 			include_once DOL_DOCUMENT_ROOT . '/fourn/class/fournisseur.commande.class.php';
    720. 

  720. 			$object_instance = new CommandeFournisseur($this->db);
    721. 

  721. 		} else if ($modulepart == 'contract') {
    722. 

  722. 			include_once DOL_DOCUMENT_ROOT . '/contrat/class/contrat.class.php';
    723. 

  723. 			$object_instance = new Contrat($this->db);
    724. 

  724. 		} else if ($modulepart == 'product') {
    725. 

  725. 			include_once DOL_DOCUMENT_ROOT . '/product/class/product.class.php';
    726. 

  726. 			$object_instance = new Product($this->db);
    727. 

  727. 		} else if ($modulepart == 'tax') {
    728. 

  728. 			include_once DOL_DOCUMENT_ROOT . '/compta/sociales/class/chargesociales.class.php';
    729. 

  729. 			$object_instance = new ChargeSociales($this->db);
    730. 

  730. 		}
    731. 

  731. 

  732. 		$var = true;
    733. 

  733. 		foreach ($filearray as $key => $file) {
    734. 

  734. 			if (!is_dir($file['name']) && $file['name'] != '.' && $file['name'] != '..' && $file['name'] != 'CVS' && !preg_match('/\.meta$/i', $file['name'])) {
    735. 

  735. 				// Define relative path used to store the file
    736. 

  736. 				$relativefile = preg_replace('/' . preg_quote($upload_dir . '/', '/') . '/', '', $file['fullname']);
    737. 

  737. 

  738. 				//var_dump($file);
    739. 

  739. 				$id = 0;
    740. 

  740. 				$ref = '';
    741. 

  741. 				$label = '';
    742. 

  742. 

  743. 				// To show ref or specific information according to view to show (defined by $module)
    744. 

  744. 				if ($modulepart == 'company') {
    745. 

  745. 					preg_match('/(\d+)\/[^\/]+$/', $relativefile, $reg);
    746. 

  746. 					$id = (isset($reg[1]) ? $reg[1] : '');
    747. 

  747. 				}
    748. 

  748. 				if ($modulepart == 'invoice') {
    749. 

  749. 					preg_match('/(.*)\/[^\/]+$/', $relativefile, $reg);
    750. 

  750. 					$ref = (isset($reg[1]) ? $reg[1] : '');
    751. 

  751. 				}
    752. 

  752. 				if ($modulepart == 'invoice_supplier') {
    753. 

  753. 					preg_match('/(\d+)\/[^\/]+$/', $relativefile, $reg);
    754. 

  754. 					$id = (isset($reg[1]) ? $reg[1] : '');
    755. 

  755. 				}
    756. 

  756. 				if ($modulepart == 'propal') {
    757. 

  757. 					preg_match('/(.*)\/[^\/]+$/', $relativefile, $reg);
    758. 

  758. 					$ref = (isset($reg[1]) ? $reg[1] : '');
    759. 

  759. 				}
    760. 

  760. 				if ($modulepart == 'order') {
    761. 

  761. 					preg_match('/(.*)\/[^\/]+$/', $relativefile, $reg);
    762. 

  762. 					$ref = (isset($reg[1]) ? $reg[1] : '');
    763. 

  763. 				}
    764. 

  764. 				if ($modulepart == 'order_supplier') {
    765. 

  765. 					preg_match('/(.*)\/[^\/]+$/', $relativefile, $reg);
    766. 

  766. 					$ref = (isset($reg[1]) ? $reg[1] : '');
    767. 

  767. 				}
    768. 

  768. 				if ($modulepart == 'contract') {
    769. 

  769. 					preg_match('/(.*)\/[^\/]+$/', $relativefile, $reg);
    770. 

  770. 					$ref = (isset($reg[1]) ? $reg[1] : '');
    771. 

  771. 				}
    772. 

  772. 				if ($modulepart == 'product') {
    773. 

  773. 					preg_match('/(.*)\/[^\/]+$/', $relativefile, $reg);
    774. 

  774. 					$ref = (isset($reg[1]) ? $reg[1] : '');
    775. 

  775. 				}
    776. 

  776. 				if ($modulepart == 'tax') {
    777. 

  777. 					preg_match('/(\d+)\/[^\/]+$/', $relativefile, $reg);
    778. 

  778. 					$id = (isset($reg[1]) ? $reg[1] : '');
    779. 

  779. 				}
    780. 

  780. 

  781. 				if (!$id && !$ref)
    782. 

  782. 					continue;
    783. 

  783. 

  784. 				$found = 0;
    785. 

  785. 				if (!empty($this->cache_objects[$modulepart . '_' . $id . '_' . $ref])) {
    786. 

  786. 					$found = 1;
    787. 

  787. 				} else {
    788. 

  788. 					//print 'Fetch '.$idorref.'<br>';
    789. 

  789. 					$result = $object_instance->fetch($id, $ref);
    790. 

  790. 					if ($result > 0) {
    791. 

  791. 						$found = 1;
    792. 

  792. 						$this->cache_objects[$modulepart . '_' . $id . '_' . $ref] = dol_clone($object_instance);
    793. 

  793. 					}	// Save object into a cache
    794. 

  794. 					if ($result == 0) {
    795. 

  795. 						$found = 1;
    796. 

  796. 						$this->cache_objects[$modulepart . '_' . $id . '_' . $ref] = 'notfound';
    797. 

  797. 					}
    798. 

  798. 				}
    799. 

  799. 

  800. 				if (!$found > 0 || !is_object($this->cache_objects[$modulepart . '_' . $id . '_' . $ref]))
    801. 

  801. 					continue;	// We do not show orphelins files
    802. 

  802. 

  803. 				$var = !$var;
    804. 

  804. 				print '<tr ' . $bc[$var] . '>';
    805. 

  805. 				print '<td>';
    806. 

  806. 				if ($found > 0 && is_object($this->cache_objects[$modulepart . '_' . $id . '_' . $ref]))
    807. 

  807. 					print $this->cache_objects[$modulepart . '_' . $id . '_' . $ref]->getNomUrl(1, 'document');
    808. 

  808. 				else
    809. 

  809. 					print $langs->trans("ObjectDeleted", ($id ? $id : $ref));
    810. 

  810. 				print '</td>';
    811. 

  811. 				print '<td>';
    812. 

  812. 				//print "XX".$file['name']; //$file['name'] must be utf8
    813. 

  813. 				print '<a href="' . DOL_URL_ROOT . '/document.php?modulepart=' . $modulepart;
    814. 

  814. 				if ($forcedownload)
    815. 

  815. 					print '&attachment=1';
    816. 

  816. 				print '&file=' . urlencode($relativefile) . '">';
    817. 

  817. 				print img_mime($file['name'], $file['name'] . ' (' . dol_print_size($file['size'], 0, 0) . ')') . ' ';
    818. 

  818. 				print dol_trunc($file['name'], $maxlength, 'middle');
    819. 

  819. 				print '</a>';
    820. 

  820. 				print "</td>\n";
    821. 

  821. 				print '<td align="right">' . dol_print_size($file['size'], 1, 1) . '</td>';
    822. 

  822. 				print '<td align="center">' . dol_print_date($file['date'], "dayhour") . '</td>';
    823. 

  823. 				print '<td align="right">';
    824. 

  824. 				if (!empty($useinecm))
    825. 

  825. 					print '<a href="' . DOL_URL_ROOT . '/document.php?modulepart=' . $modulepart;
    826. 

  826. 				if ($forcedownload)
    827. 

  827. 					print '&attachment=1';
    828. 

  828. 				print '&file=' . urlencode($relativefile) . '">';
    829. 

  829. 				print img_view() . '</a> &nbsp; ';
    830. 

  830. 				//if ($permtodelete) print '<a href="'.$url.'?id='.$object->id.'&section='.$_REQUEST["section"].'&action=delete&urlfile='.urlencode($file['name']).'">'.img_delete().'</a>';
    831. 

  831. 				//else print '&nbsp;';
    832. 

  832. 				print "</td></tr>\n";
    833. 

  833. 			}
    834. 

  834. 		}
    835. 

  835. 		if (count($filearray) == 0) {
    836. 

  836. 			print '<tr ' . $bc[$var] . '><td colspan="4">';
    837. 

  837. 			if (empty($textifempty))
    838. 

  838. 				print $langs->trans("NoFileFound");
    839. 

  839. 			else
    840. 

  840. 				print $textifempty;
    841. 

  841. 			print '</td></tr>';
    842. 

  842. 		}
    843. 

  843. 		print "</table>";
    844. 

  844. 		// Fin de zone
    845. 

  845. 	}
    846. 

  846. 

  847. 	/**
    848. 

  848. 	 *    Show form to upload a new file with jquery fileupload.
    849. 

  849. 	 *    This form use the fileupload.php file.
    850. 

  850. 	 *
    851. 

  851. 	 *    @param	Object	$object		Object to use
    852. 

  852. 	 *    @return	void
    853. 

  853. 	 */
    854. 

  854. 	private function _formAjaxFileUpload($object) {
    855. 

  855. 		global $langs;
    856. 

  856. 

  857. 		// PHP post_max_size
    858. 

  858. 		$post_max_size = ini_get('post_max_size');
    859. 

  859. 		$mul_post_max_size = substr($post_max_size, -1);
    860. 

  860. 		$mul_post_max_size = ($mul_post_max_size == 'M' ? 1048576 : ($mul_post_max_size == 'K' ? 1024 : ($mul_post_max_size == 'G' ? 1073741824 : 1)));
    861. 

  861. 		$post_max_size = $mul_post_max_size * (int) $post_max_size;
    862. 

  862. 		// PHP upload_max_filesize
    863. 

  863. 		$upload_max_filesize = ini_get('upload_max_filesize');
    864. 

  864. 		$mul_upload_max_filesize = substr($upload_max_filesize, -1);
    865. 

  865. 		$mul_upload_max_filesize = ($mul_upload_max_filesize == 'M' ? 1048576 : ($mul_upload_max_filesize == 'K' ? 1024 : ($mul_upload_max_filesize == 'G' ? 1073741824 : 1)));
    866. 

  866. 		$upload_max_filesize = $mul_upload_max_filesize * (int) $upload_max_filesize;
    867. 

  867. 		// Max file size
    868. 

  868. 		$max_file_size = (($post_max_size < $upload_max_filesize) ? $post_max_size : $upload_max_filesize);
    869. 

  869. 

  870. 		// Include main
    871. 

  871. 		include DOL_DOCUMENT_ROOT . '/core/tpl/ajax/fileupload_main.tpl.php';
    872. 

  872. 

  873. 		// Include template
    874. 

  874. 		include DOL_DOCUMENT_ROOT . '/core/tpl/ajax/fileupload_view.tpl.php';
    875. 

  875. 	}
    876. 

  876. 

  877. }
    878. 

  878. 

  879. ?>
    880. 

  880.