44 include_once DOL_DOCUMENT_ROOT.
'/core/lib/json.lib.php';
47 if (!function_exists(
'utf8_encode')) {
54 function utf8_encode($elements)
56 return mb_convert_encoding($elements,
'UTF-8',
'ISO-8859-1');
60 if (!function_exists(
'utf8_decode')) {
67 function utf8_decode($elements)
69 return mb_convert_encoding($elements,
'ISO-8859-1',
'UTF-8');
84 return (
string) (empty($conf->global->$key) ? $default : $conf->global->$key);
97 return (
int) (empty($conf->global->$key) ? $default : $conf->global->$key);
108 return !empty($conf->$module->enabled);
124 require_once DOL_DOCUMENT_ROOT.
"/core/db/".$type.
'.class.php';
126 $class =
'DoliDB'.ucfirst($type);
127 $dolidb =
new $class($type, $host, $user, $pass, $name, $port);
148 function getEntity($element, $shared = 1, $currentobject =
null)
150 global $conf, $mc, $hookmanager, $object, $action, $db;
152 if (! is_object($hookmanager)) {
159 $element =
'contract';
161 case 'order_supplier':
162 $element =
'supplier_order';
164 case 'invoice_supplier':
165 $element =
'supplier_invoice';
169 if (is_object($mc)) {
170 $out = $mc->getEntity($element, $shared, $currentobject);
173 $addzero = array(
'user',
'usergroup',
'c_email_templates',
'email_template',
'default_values');
174 if (in_array($element, $addzero)) {
177 $out .= ((int) $conf->entity);
182 'element' => $element,
185 'currentobject' => $currentobject,
188 $reshook = $hookmanager->executeHooks(
'hookGetEntity', $parameters, $currentobject, $action);
190 if (is_numeric($reshook)) {
191 if ($reshook == 0 && !empty($hookmanager->resPrint)) {
192 $out .=
','.$hookmanager->resPrint;
193 } elseif ($reshook == 1) {
194 $out = $hookmanager->resPrint;
211 if (is_object($mc) && method_exists($mc,
'setEntity')) {
212 return $mc->setEntity($currentobject);
214 return ((is_object($currentobject) && $currentobject->id > 0 && $currentobject->entity > 0) ? $currentobject->entity : $conf->entity);
226 return preg_match(
'/(_pass|password|_pw|_key|securekey|serverkey|secret\d?|p12key|exportkey|_PW_[a-z]+|token)$/i', $keyname);
238 for ($r =
""; $n >= 0; $n = intval($n / 26) - 1)
239 $r = chr($n % 26 + 0x41) . $r;
262 include_once DOL_DOCUMENT_ROOT.
'/includes/mobiledetect/mobiledetectlib/Mobile_Detect.php';
269 $user_agent = substr($user_agent, 0, 512);
271 $detectmobile =
new Mobile_Detect(
null, $user_agent);
272 $tablet = $detectmobile->isTablet();
274 if ($detectmobile->isMobile()) {
278 if ($detectmobile->is(
'AndroidOS')) {
279 $os = $phone =
'android';
280 } elseif ($detectmobile->is(
'BlackBerryOS')) {
281 $os = $phone =
'blackberry';
282 } elseif ($detectmobile->is(
'iOS')) {
285 } elseif ($detectmobile->is(
'PalmOS')) {
286 $os = $phone =
'palm';
287 } elseif ($detectmobile->is(
'SymbianOS')) {
289 } elseif ($detectmobile->is(
'webOS')) {
291 } elseif ($detectmobile->is(
'MaemoOS')) {
293 } elseif ($detectmobile->is(
'WindowsMobileOS') || $detectmobile->is(
'WindowsPhoneOS')) {
299 if (preg_match(
'/linux/i', $user_agent)) {
301 } elseif (preg_match(
'/macintosh/i', $user_agent)) {
303 } elseif (preg_match(
'/windows/i', $user_agent)) {
309 if (preg_match(
'/firefox(\/|\s)([\d\.]*)/i', $user_agent, $reg)) {
312 } elseif (preg_match(
'/edge(\/|\s)([\d\.]*)/i', $user_agent, $reg)) {
315 } elseif (preg_match(
'/chrome(\/|\s)([\d\.]+)/i', $user_agent, $reg)) {
318 } elseif (preg_match(
'/chrome/i', $user_agent, $reg)) {
321 } elseif (preg_match(
'/iceweasel/i', $user_agent)) {
323 } elseif (preg_match(
'/epiphany/i', $user_agent)) {
325 } elseif (preg_match(
'/safari(\/|\s)([\d\.]*)/i', $user_agent, $reg)) {
328 } elseif (preg_match(
'/opera(\/|\s)([\d\.]*)/i', $user_agent, $reg)) {
332 } elseif (preg_match(
'/(MSIE\s([0-9]+\.[0-9]))|.*(Trident\/[0-9]+.[0-9];.*rv:([0-9]+\.[0-9]+))/i', $user_agent, $reg)) {
334 $version = end($reg);
335 } elseif (preg_match(
'/(Windows NT\s([0-9]+\.[0-9])).*(Trident\/[0-9]+.[0-9];.*rv:([0-9]+\.[0-9]+))/i', $user_agent, $reg)) {
338 $version = end($reg);
339 } elseif (preg_match(
'/l(i|y)n(x|ks)(\(|\/|\s)*([\d\.]+)/i', $user_agent, $reg)) {
354 'browsername' => $name,
355 'browserversion' => $version,
370 global $conf, $user, $langs, $db;
371 $disconnectdone =
false;
373 if (is_object($db) && !empty($db->connected)) {
374 $depth = $db->transaction_opened;
375 $disconnectdone = $db->close();
377 dol_syslog(
"--- End access to ".$_SERVER[
"PHP_SELF"].(($disconnectdone && $depth) ?
' (Warn: db disconnection forced, transaction depth was '.$depth.
')' :
''), (($disconnectdone && $depth) ? LOG_WARNING : LOG_INFO));
390 $relativepathstring = $_SERVER[
"PHP_SELF"];
392 if (constant(
'DOL_URL_ROOT')) {
393 $relativepathstring = preg_replace(
'/^'.preg_quote(constant(
'DOL_URL_ROOT'),
'/').
'/',
'', $relativepathstring);
395 $relativepathstring = preg_replace(
'/^\//',
'', $relativepathstring);
396 $relativepathstring = preg_replace(
'/^custom\//',
'', $relativepathstring);
402 if (!empty($_GET[
'restore_lastsearch_values'])) {
403 if (!empty($_SESSION[
'lastsearch_values_'.$relativepathstring])) {
404 $tmp = json_decode($_SESSION[
'lastsearch_values_'.$relativepathstring],
true);
405 if (is_array($tmp)) {
406 foreach ($tmp as $key => $val) {
407 if ($key == $paramname) {
415 if ($paramname ==
'contextpage' && !empty($_SESSION[
'lastsearch_contextpage_'.$relativepathstring])) {
417 } elseif ($paramname ==
'limit' && !empty($_SESSION[
'lastsearch_limit_'.$relativepathstring])) {
419 } elseif ($paramname ==
'page' && !empty($_SESSION[
'lastsearch_page_'.$relativepathstring])) {
421 } elseif ($paramname ==
'mode' && !empty($_SESSION[
'lastsearch_mode_'.$relativepathstring])) {
425 $isset = (isset($_POST[$paramname]) || isset($_GET[$paramname]));
442 if (empty($method)) {
443 $val = isset($_GET[$paramname]) ? $_GET[$paramname] : (isset($_POST[$paramname]) ? $_POST[$paramname] :
'');
444 } elseif ($method == 1) {
445 $val = isset($_GET[$paramname]) ? $_GET[$paramname] :
'';
446 } elseif ($method == 2) {
447 $val = isset($_POST[$paramname]) ? $_POST[$paramname] :
'';
448 } elseif ($method == 3) {
449 $val = isset($_POST[$paramname]) ? $_POST[$paramname] : (isset($_GET[$paramname]) ? $_GET[$paramname] :
'');
451 $val =
'BadFirstParameterForGETPOST';
454 return is_array($val);
484 function GETPOST($paramname, $check =
'alphanohtml', $method = 0, $filter =
null, $options =
null, $noreplace = 0)
486 global $mysoc, $user, $conf;
488 if (empty($paramname)) {
489 return 'BadFirstParameterForGETPOST';
492 dol_syslog(
"Deprecated use of GETPOST, called with 1st param = ".$paramname.
" and 2nd param is '', when calling page ".$_SERVER[
"PHP_SELF"], LOG_WARNING);
497 if (empty($method)) {
498 $out = isset($_GET[$paramname]) ? $_GET[$paramname] : (isset($_POST[$paramname]) ? $_POST[$paramname] :
'');
499 } elseif ($method == 1) {
500 $out = isset($_GET[$paramname]) ? $_GET[$paramname] :
'';
501 } elseif ($method == 2) {
502 $out = isset($_POST[$paramname]) ? $_POST[$paramname] :
'';
503 } elseif ($method == 3) {
504 $out = isset($_POST[$paramname]) ? $_POST[$paramname] : (isset($_GET[$paramname]) ? $_GET[$paramname] :
'');
506 return 'BadThirdParameterForGETPOST';
509 if (empty($method) || $method == 3 || $method == 4) {
510 $relativepathstring = $_SERVER[
"PHP_SELF"];
512 if (constant(
'DOL_URL_ROOT')) {
513 $relativepathstring = preg_replace(
'/^'.preg_quote(constant(
'DOL_URL_ROOT'),
'/').
'/',
'', $relativepathstring);
515 $relativepathstring = preg_replace(
'/^\//',
'', $relativepathstring);
516 $relativepathstring = preg_replace(
'/^custom\//',
'', $relativepathstring);
522 if (!empty($_GET[
'restore_lastsearch_values'])) {
523 if (!empty($_SESSION[
'lastsearch_values_'.$relativepathstring])) {
524 $tmp = json_decode($_SESSION[
'lastsearch_values_'.$relativepathstring],
true);
525 if (is_array($tmp)) {
526 foreach ($tmp as $key => $val) {
527 if ($key == $paramname) {
535 if ($paramname ==
'contextpage' && !empty($_SESSION[
'lastsearch_contextpage_'.$relativepathstring])) {
536 $out = $_SESSION[
'lastsearch_contextpage_'.$relativepathstring];
537 } elseif ($paramname ==
'limit' && !empty($_SESSION[
'lastsearch_limit_'.$relativepathstring])) {
538 $out = $_SESSION[
'lastsearch_limit_'.$relativepathstring];
539 } elseif ($paramname ==
'page' && !empty($_SESSION[
'lastsearch_page_'.$relativepathstring])) {
540 $out = $_SESSION[
'lastsearch_page_'.$relativepathstring];
541 } elseif ($paramname ==
'mode' && !empty($_SESSION[
'lastsearch_mode_'.$relativepathstring])) {
542 $out = $_SESSION[
'lastsearch_mode_'.$relativepathstring];
544 } elseif (!isset($_GET[
'sortfield'])) {
547 if (!empty($_GET[
'action']) && $_GET[
'action'] ==
'create' && !isset($_GET[$paramname]) && !isset($_POST[$paramname])) {
550 if (is_object($object) && isset($object->fields[$paramname][
'default'])) {
551 $out = $object->fields[$paramname][
'default'];
554 if (!empty($conf->global->MAIN_ENABLE_DEFAULT_VALUES)) {
555 if (!empty($_GET[
'action']) && (preg_match(
'/^create/', $_GET[
'action']) || preg_match(
'/^presend/', $_GET[
'action'])) && !isset($_GET[$paramname]) && !isset($_POST[$paramname])) {
557 if (!empty($user->default_values)) {
558 if (isset($user->default_values[$relativepathstring][
'createform'])) {
559 foreach ($user->default_values[$relativepathstring][
'createform'] as $defkey => $defval) {
561 if ($defkey !=
'_noquery_') {
562 $tmpqueryarraytohave = explode(
'&', $defkey);
565 foreach ($tmpqueryarraytohave as $tmpquerytohave) {
566 if (!in_array($tmpquerytohave, $tmpqueryarraywehave)) {
579 if (isset($user->default_values[$relativepathstring][
'createform'][$defkey][$paramname])) {
580 $out = $user->default_values[$relativepathstring][
'createform'][$defkey][$paramname];
587 } elseif (!empty($paramname) && !isset($_GET[$paramname]) && !isset($_POST[$paramname])) {
589 if (!empty($user->default_values)) {
592 if ($paramname ==
'sortfield' || $paramname ==
'sortorder') {
594 if (isset($user->default_values[$relativepathstring][
'sortorder'])) {
596 foreach ($user->default_values[$relativepathstring][
'sortorder'] as $defkey => $defval) {
598 if ($defkey !=
'_noquery_') {
599 $tmpqueryarraytohave = explode(
'&', $defkey);
602 foreach ($tmpqueryarraytohave as $tmpquerytohave) {
603 if (!in_array($tmpquerytohave, $tmpqueryarraywehave)) {
616 $forbidden_chars_to_replace = array(
" ",
"'",
"/",
"\\",
":",
"*",
"?",
"\"",
"<",
">",
"|",
"[",
"]",
";",
"=");
617 foreach ($user->default_values[$relativepathstring][
'sortorder'][$defkey] as $key => $val) {
621 if ($paramname ==
'sortfield') {
624 if ($paramname ==
'sortorder') {
632 } elseif (isset($user->default_values[$relativepathstring][
'filters'])) {
633 foreach ($user->default_values[$relativepathstring][
'filters'] as $defkey => $defval) {
634 if (!empty($_GET[
'disabledefaultvalues'])) {
638 if ($defkey !=
'_noquery_') {
639 $tmpqueryarraytohave = explode(
'&', $defkey);
642 foreach ($tmpqueryarraytohave as $tmpquerytohave) {
643 if (!in_array($tmpquerytohave, $tmpqueryarraywehave)) {
657 if (isset($_POST[
'sall']) || isset($_POST[
'search_all']) || isset($_GET[
'sall']) || isset($_GET[
'search_all'])) {
659 if (empty($conf->global->MAIN_DISABLE_DEFAULT_FILTER_FOR_QUICK_SEARCH)) {
660 $forbidden_chars_to_replace = array(
" ",
"'",
"/",
"\\",
":",
"*",
"?",
"\"",
"<",
">",
"|",
"[",
"]",
";",
"=");
661 $out =
dol_string_nospecial($user->default_values[$relativepathstring][
'filters'][$defkey][$paramname],
'', $forbidden_chars_to_replace);
664 $forbidden_chars_to_replace = array(
" ",
"'",
"/",
"\\",
":",
"*",
"?",
"\"",
"<",
">",
"|",
"[",
"]",
";",
"=");
665 $out =
dol_string_nospecial($user->default_values[$relativepathstring][
'filters'][$defkey][$paramname],
'', $forbidden_chars_to_replace);
680 if (!is_array($out) && empty($_POST[$paramname]) && empty($noreplace)) {
684 while (preg_match(
'/__([A-Z0-9]+_?[A-Z0-9]+)__/i', $out, $reg) && ($loopnb < $maxloop)) {
688 if ($reg[1] ==
'DAY') {
690 $newout = $tmp[
'mday'];
691 } elseif ($reg[1] ==
'MONTH') {
693 $newout = $tmp[
'mon'];
694 } elseif ($reg[1] ==
'YEAR') {
696 $newout = $tmp[
'year'];
697 } elseif ($reg[1] ==
'PREVIOUS_DAY') {
700 $newout = $tmp2[
'day'];
701 } elseif ($reg[1] ==
'PREVIOUS_MONTH') {
704 $newout = $tmp2[
'month'];
705 } elseif ($reg[1] ==
'PREVIOUS_YEAR') {
707 $newout = ($tmp[
'year'] - 1);
708 } elseif ($reg[1] ==
'NEXT_DAY') {
711 $newout = $tmp2[
'day'];
712 } elseif ($reg[1] ==
'NEXT_MONTH') {
715 $newout = $tmp2[
'month'];
716 } elseif ($reg[1] ==
'NEXT_YEAR') {
718 $newout = ($tmp[
'year'] + 1);
719 } elseif ($reg[1] ==
'MYCOMPANY_COUNTRY_ID' || $reg[1] ==
'MYCOUNTRY_ID' || $reg[1] ==
'MYCOUNTRYID') {
720 $newout = $mysoc->country_id;
721 } elseif ($reg[1] ==
'USER_ID' || $reg[1] ==
'USERID') {
723 } elseif ($reg[1] ==
'USER_SUPERVISOR_ID' || $reg[1] ==
'SUPERVISOR_ID' || $reg[1] ==
'SUPERVISORID') {
724 $newout = $user->fk_user;
725 } elseif ($reg[1] ==
'ENTITY_ID' || $reg[1] ==
'ENTITYID') {
726 $newout = $conf->entity;
731 $out = preg_replace(
'/__'.preg_quote($reg[1],
'/').
'__/', $newout, $out);
736 if (preg_match(
'/^array/', $check)) {
737 if (!is_array($out) || empty($out)) {
740 $tmparray = explode(
':', $check);
741 if (!empty($tmparray[1])) {
742 $tmpcheck = $tmparray[1];
744 $tmpcheck =
'alphanohtml';
746 foreach ($out as $outkey => $outval) {
747 $out[$outkey] =
sanitizeVal($outval, $tmpcheck, $filter, $options);
751 $out =
sanitizeVal($out, $check, $filter, $options);
756 if ($paramname ==
'backtopage' || $paramname ==
'backtolist' || $paramname ==
'backtourl') {
757 $out = str_replace(
'\\',
'/', $out);
758 $out = str_replace(array(
':',
';',
'@',
"\t",
' '),
'', $out);
760 $oldstringtoclean = $out;
761 $out = str_ireplace(array(
'javascript',
'vbscript',
'&colon',
'&#'),
'', $out);
762 $out = preg_replace(array(
'/^[^\?]*%/'),
'', $out);
763 $out = preg_replace(array(
'/^[a-z]*\/\s*\/+/i'),
'', $out);
764 }
while ($oldstringtoclean != $out);
769 if (empty($method) || $method == 3 || $method == 4) {
770 if (preg_match(
'/^search_/', $paramname) || in_array($paramname, array(
'sortorder',
'sortfield'))) {
777 if ($out !=
'' && isset($user)) {
778 $user->lastsearch_values_tmp[$relativepathstring][$paramname] = $out;
797 return (
int)
GETPOST($paramname,
'int', $method,
null,
null, 0);
811 function checkVal($out =
'', $check =
'alphanohtml', $filter =
null, $options =
null)
813 return sanitizeVal($out, $check, $filter, $options);
825 function sanitizeVal($out =
'', $check =
'alphanohtml', $filter =
null, $options =
null)
835 if (!is_numeric($out)) {
840 if (preg_match(
'/[^0-9,-]+/i', $out)) {
845 $out = filter_var($out, FILTER_SANITIZE_STRING);
848 $out = filter_var($out, FILTER_SANITIZE_EMAIL);
851 if (!is_array($out)) {
853 if (preg_match(
'/[^a-z]+/i', $out)) {
859 if (!is_array($out)) {
861 if (preg_match(
'/[^a-z0-9_\-\.]+/i', $out)) {
867 if (!is_array($out)) {
869 if (preg_match(
'/[^a-z0-9_\-\.,]+/i', $out)) {
879 if (!is_array($out)) {
882 $oldstringtoclean = $out;
889 $out = str_ireplace(array(
'&',
'&',
'&',
'"',
'"',
'"',
'"',
'"',
'/',
'/',
'\',
'\',
'/',
'../',
'..\\'),
'', $out);
890 }
while ($oldstringtoclean != $out);
895 if (!is_array($out)) {
898 $oldstringtoclean = $out;
904 $out = str_ireplace(array(
'&',
'&',
'&',
'"',
'"',
'"',
'"',
'"',
'/',
'/',
'\',
'\',
'/',
'../',
'..\\'),
'', $out);
905 }
while ($oldstringtoclean != $out);
909 case 'restricthtmlallowunvalid':
911 $oldstringtoclean = $out;
913 if (!empty($out) && !empty($conf->global->MAIN_RESTRICTHTML_ONLY_VALID_HTML) && $check !=
'restricthtmlallowunvalid') {
915 $dom =
new DOMDocument;
919 $out =
'<div class="tricktoremove">'.$out.
'</div>';
921 $dom->loadHTML($out, LIBXML_ERR_NONE|LIBXML_HTML_NOIMPLIED|LIBXML_HTML_NODEFDTD|LIBXML_NONET|LIBXML_NOWARNING|LIBXML_NOXMLDECL);
922 $out = trim($dom->saveHTML());
925 $out = preg_replace(
'/^<div class="tricktoremove">/',
'', $out);
926 $out = preg_replace(
'/<\/div>$/',
'', $out);
929 return 'InvalidHTMLString';
935 $out = preg_replace(
'/'/i',
''', $out);
941 $out = preg_replace_callback(
'/&#(x?[0-9][0-9a-f]+;?)/i',
function ($m) {
946 $out = preg_replace(
'/&#x?[0-9]+/i',
'', $out);
951 if (!empty($conf->global->MAIN_RESTRICTHTML_REMOVE_ALSO_BAD_ATTRIBUTES)) {
957 $out = preg_replace(
'/'/i',
"'", $out);
958 }
while ($oldstringtoclean != $out);
961 if (empty($filter)) {
962 return 'BadFourthParameterForGETPOST';
964 $out = filter_var($out, $filter, $options);
972 if (!function_exists(
'dol_getprefix')) {
982 function dol_getprefix($mode =
'')
985 if ($mode ==
'email') {
988 if (!empty($conf->global->MAIL_PREFIX_FOR_EMAIL_ID)) {
989 if ($conf->global->MAIL_PREFIX_FOR_EMAIL_ID !=
'SERVER_NAME') {
990 return $conf->global->MAIL_PREFIX_FOR_EMAIL_ID;
991 } elseif (isset($_SERVER[
"SERVER_NAME"])) {
992 return $_SERVER[
"SERVER_NAME"];
997 if (!empty($conf->file->instance_unique_id)) {
998 return sha1(
'dolibarr'.$conf->file->instance_unique_id);
1002 return sha1(DOL_DOCUMENT_ROOT.DOL_URL_ROOT);
1006 global $dolibarr_main_instance_unique_id, $dolibarr_main_cookie_cryptkey;
1007 $tmp_instance_unique_id = empty($dolibarr_main_instance_unique_id) ? (empty($dolibarr_main_cookie_cryptkey) ?
'' : $dolibarr_main_cookie_cryptkey) : $dolibarr_main_instance_unique_id;
1010 if (!empty($tmp_instance_unique_id)) {
1011 return sha1(
'dolibarr'.$tmp_instance_unique_id);
1015 if (isset($_SERVER[
"SERVER_NAME"]) && isset($_SERVER[
"DOCUMENT_ROOT"])) {
1016 return sha1($_SERVER[
"SERVER_NAME"].$_SERVER[
"DOCUMENT_ROOT"].DOL_DOCUMENT_ROOT.DOL_URL_ROOT);
1018 return sha1(DOL_DOCUMENT_ROOT.DOL_URL_ROOT);
1035 global $conf, $langs, $user, $mysoc;
1039 if (!file_exists($fullpath)) {
1040 dol_syslog(
'functions::dol_include_once Tried to load unexisting file: '.$relpath, LOG_WARNING);
1044 if (!empty($classname) && !class_exists($classname)) {
1045 return include $fullpath;
1047 return include_once $fullpath;
1066 $path = preg_replace(
'/^\//',
'', $path);
1069 $res = DOL_DOCUMENT_ROOT.
'/'.$path;
1070 if (is_array($conf->file->dol_document_root)) {
1071 foreach ($conf->file->dol_document_root as $key => $dirroot) {
1072 if ($key ==
'main') {
1075 if (file_exists($dirroot.
'/'.$path)) {
1076 $res = $dirroot.
'/'.$path;
1081 if ($returnemptyifnotfound) {
1083 if ($returnemptyifnotfound == 1 || !file_exists($res)) {
1095 $res = DOL_URL_ROOT.
'/'.$path;
1098 $res = DOL_MAIN_URL_ROOT.
'/'.$path;
1101 $res = DOL_URL_ROOT.
'/'.$path;
1104 foreach ($conf->file->dol_document_root as $key => $dirroot) {
1105 if ($key ==
'main') {
1107 global $dolibarr_main_url_root;
1110 $urlwithouturlroot = preg_replace(
'/'.preg_quote(DOL_URL_ROOT,
'/').
'$/i',
'', trim($dolibarr_main_url_root));
1111 $urlwithroot = $urlwithouturlroot.DOL_URL_ROOT;
1114 $res = (preg_match(
'/^http/i', $conf->file->dol_url_root[$key]) ?
'' : $urlwithroot).
'/'.$path;
1118 preg_match(
'/^([^\?]+(\.css\.php|\.css|\.js\.php|\.js|\.png|\.jpg|\.php)?)/i', $path, $regs);
1119 if (!empty($regs[1])) {
1121 if (file_exists($dirroot.
'/'.$regs[1])) {
1123 $res = (preg_match(
'/^http/i', $conf->file->dol_url_root[$key]) ?
'' : DOL_URL_ROOT).$conf->file->dol_url_root[$key].
'/'.$path;
1126 $res = (preg_match(
'/^http/i', $conf->file->dol_url_root[$key]) ?
'' : DOL_MAIN_URL_ROOT).$conf->file->dol_url_root[$key].
'/'.$path;
1129 global $dolibarr_main_url_root;
1132 $urlwithouturlroot = preg_replace(
'/'.preg_quote(DOL_URL_ROOT,
'/').
'$/i',
'', trim($dolibarr_main_url_root));
1133 $urlwithroot = $urlwithouturlroot.DOL_URL_ROOT;
1136 $res = (preg_match(
'/^http/i', $conf->file->dol_url_root[$key]) ?
'' : $urlwithroot).$conf->file->dol_url_root[$key].
'/'.$path;
1159 if (empty($native)) {
1161 if (isset($object->db) && isset($object->db->db) && is_object($object->db->db) && get_class($object->db->db) ==
'PgSql\Connection') {
1162 $tmpsavdb = $object->db;
1166 $myclone = unserialize(serialize($object));
1169 $object->db = $tmpsavdb;
1172 $myclone = clone $object;
1190 if (empty($conf->dol_optimize_smallscreen)) {
1193 if ($type ==
'width' && $size > 250) {
1218 $filesystem_forbidden_chars = array(
'<',
'>',
'/',
'\\',
'?',
'*',
'|',
'"',
':',
'°',
'$',
';');
1220 $tmp = preg_replace(
'/\-\-+/',
'_', $tmp);
1221 $tmp = preg_replace(
'/\s+\-([^\s])/',
' _$1', $tmp);
1222 $tmp = str_replace(
'..',
'', $tmp);
1242 $filesystem_forbidden_chars = array(
'<',
'>',
'?',
'*',
'|',
'"',
'°',
'$',
';');
1244 $tmp = preg_replace(
'/\-\-+/',
'_', $tmp);
1245 $tmp = preg_replace(
'/\s+\-([^\s])/',
' _$1', $tmp);
1246 $tmp = str_replace(
'..',
'', $tmp);
1261 $stringtoclean = preg_replace(
'/[\x00-\x1F\x7F]/u',
'', $stringtoclean);
1263 $stringtoclean = preg_replace(
'/<!--[^>]*-->/',
'', $stringtoclean);
1265 $stringtoclean = str_replace(
'\\',
'/', $stringtoclean);
1269 $stringtoclean = str_replace(array(
':',
';',
'@'),
'', $stringtoclean);
1273 $oldstringtoclean = $stringtoclean;
1276 $stringtoclean = str_ireplace(array(
'javascript',
'vbscript',
'&colon',
'&#'),
'', $stringtoclean);
1277 }
while ($oldstringtoclean != $stringtoclean);
1281 $stringtoclean = preg_replace(array(
'/^[a-z]*\/\/+/i'),
'', $stringtoclean);
1284 return $stringtoclean;
1300 if (extension_loaded(
'intl') && !empty($conf->global->MAIN_UNACCENT_USE_TRANSLITERATOR)) {
1301 $transliterator = \Transliterator::createFromRules(
':: Any-Latin; :: Latin-ASCII; :: NFD; :: [:Nonspacing Mark:] Remove; :: NFC;', \Transliterator::FORWARD);
1302 return $transliterator->transliterate($str);
1305 $string = rawurlencode($str);
1306 $replacements = array(
1307 '%C3%80' =>
'A',
'%C3%81' =>
'A',
'%C3%82' =>
'A',
'%C3%83' =>
'A',
'%C3%84' =>
'A',
'%C3%85' =>
'A',
1309 '%C3%88' =>
'E',
'%C3%89' =>
'E',
'%C3%8A' =>
'E',
'%C3%8B' =>
'E',
1310 '%C3%8C' =>
'I',
'%C3%8D' =>
'I',
'%C3%8E' =>
'I',
'%C3%8F' =>
'I',
1312 '%C3%92' =>
'O',
'%C3%93' =>
'O',
'%C3%94' =>
'O',
'%C3%95' =>
'O',
'%C3%96' =>
'O',
1314 '%C3%99' =>
'U',
'%C3%9A' =>
'U',
'%C3%9B' =>
'U',
'%C3%9C' =>
'U',
1315 '%C3%9D' =>
'Y',
'%C5%B8' =>
'y',
1316 '%C3%A0' =>
'a',
'%C3%A1' =>
'a',
'%C3%A2' =>
'a',
'%C3%A3' =>
'a',
'%C3%A4' =>
'a',
'%C3%A5' =>
'a',
1318 '%C3%A8' =>
'e',
'%C3%A9' =>
'e',
'%C3%AA' =>
'e',
'%C3%AB' =>
'e',
1319 '%C3%AC' =>
'i',
'%C3%AD' =>
'i',
'%C3%AE' =>
'i',
'%C3%AF' =>
'i',
1321 '%C3%B2' =>
'o',
'%C3%B3' =>
'o',
'%C3%B4' =>
'o',
'%C3%B5' =>
'o',
'%C3%B6' =>
'o',
1323 '%C3%B9' =>
'u',
'%C3%BA' =>
'u',
'%C3%BB' =>
'u',
'%C3%BC' =>
'u',
1324 '%C3%BD' =>
'y',
'%C3%BF' =>
'y'
1326 $string = strtr($string, $replacements);
1327 return rawurldecode($string);
1332 "\xC0\xC1\xC2\xC3\xC4\xC5\xC7
1333 \xC8\xC9\xCA\xCB\xCC\xCD\xCE\xCF\xD0\xD1
1334 \xD2\xD3\xD4\xD5\xD8\xD9\xDA\xDB\xDD
1335 \xE0\xE1\xE2\xE3\xE4\xE5\xE7\xE8\xE9\xEA\xEB
1336 \xEC\xED\xEE\xEF\xF0\xF1\xF2\xF3\xF4\xF5\xF8
1337 \xF9\xFA\xFB\xFC\xFD\xFF",
1345 $string = strtr($string, array(
"\xC4"=>
"Ae",
"\xC6"=>
"AE",
"\xD6"=>
"Oe",
"\xDC"=>
"Ue",
"\xDE"=>
"TH",
"\xDF"=>
"ss",
"\xE4"=>
"ae",
"\xE6"=>
"ae",
"\xF6"=>
"oe",
"\xFC"=>
"ue",
"\xFE"=>
"th"));
1364 $forbidden_chars_to_replace = array(
" ",
"'",
"/",
"\\",
":",
"*",
"?",
"\"",
"<",
">",
"|",
"[",
"]",
",",
";",
"=",
'°');
1365 $forbidden_chars_to_remove = array();
1368 if (is_array($badcharstoreplace)) {
1369 $forbidden_chars_to_replace = $badcharstoreplace;
1371 if (is_array($badcharstoremove)) {
1372 $forbidden_chars_to_remove = $badcharstoremove;
1375 return str_replace($forbidden_chars_to_replace, $newstr, str_replace($forbidden_chars_to_remove,
"", $str));
1394 if ($removetabcrlf) {
1395 return preg_replace(
'/[\x00-\x1F\x7F]/u',
'', $str);
1397 return preg_replace(
'/[\x00-\x08\x11-\x12\x14-\x1F\x7F]/u',
'', $str);
1412 $substitjs = array(
"'"=>
"\\'",
"\r"=>
'\\r');
1414 if (empty($noescapebackslashn)) {
1415 $substitjs[
"\n"] =
'\\n';
1416 $substitjs[
'\\'] =
'\\\\';
1419 $substitjs[
"'"] =
"\\'";
1420 $substitjs[
'"'] =
"\\'";
1421 } elseif ($mode == 1) {
1422 $substitjs[
"'"] =
"\\'";
1423 } elseif ($mode == 2) {
1424 $substitjs[
'"'] =
'\\"';
1425 } elseif ($mode == 3) {
1426 $substitjs[
"'"] =
"\\'";
1427 $substitjs[
'"'] =
"\\\"";
1429 return strtr($stringtoescape, $substitjs);
1440 return str_replace(
'"',
'\"', $stringtoescape);
1454 function dol_escape_htmltag($stringtoescape, $keepb = 0, $keepn = 0, $noescapetags =
'', $escapeonlyhtmltags = 0)
1456 if ($noescapetags ==
'common') {
1457 $noescapetags =
'html,body,a,b,em,hr,i,u,ul,li,br,div,img,font,p,span,strong,table,tr,td,th,tbody';
1461 if ($escapeonlyhtmltags) {
1462 $tmp = htmlspecialchars_decode((
string) $stringtoescape, ENT_COMPAT);
1464 $tmp = html_entity_decode((
string) $stringtoescape, ENT_COMPAT,
'UTF-8');
1467 $tmp = strtr($tmp, array(
"<b>"=>
'',
'</b>'=>
''));
1470 $tmp = strtr($tmp, array(
"\r"=>
'\\r',
"\n"=>
'\\n'));
1473 if ($escapeonlyhtmltags) {
1474 return htmlspecialchars($tmp, ENT_COMPAT,
'UTF-8');
1478 $tmparrayoftags = array();
1479 if ($noescapetags) {
1480 $tmparrayoftags = explode(
',', $noescapetags);
1482 if (count($tmparrayoftags)) {
1483 foreach ($tmparrayoftags as $tagtoreplace) {
1484 $tmp = str_ireplace(
'<'.$tagtoreplace.
'>',
'__BEGINTAGTOREPLACE'.$tagtoreplace.
'__', $tmp);
1485 $tmp = str_ireplace(
'</'.$tagtoreplace.
'>',
'__ENDTAGTOREPLACE'.$tagtoreplace.
'__', $tmp);
1486 $tmp = str_ireplace(
'<'.$tagtoreplace.
' />',
'__BEGINENDTAGTOREPLACE'.$tagtoreplace.
'__', $tmp);
1490 $result = htmlentities($tmp, ENT_COMPAT,
'UTF-8');
1492 if (count($tmparrayoftags)) {
1493 foreach ($tmparrayoftags as $tagtoreplace) {
1494 $result = str_ireplace(
'__BEGINTAGTOREPLACE'.$tagtoreplace.
'__',
'<'.$tagtoreplace.
'>', $result);
1495 $result = str_ireplace(
'__ENDTAGTOREPLACE'.$tagtoreplace.
'__',
'</'.$tagtoreplace.
'>', $result);
1496 $result = str_ireplace(
'__BEGINENDTAGTOREPLACE'.$tagtoreplace.
'__',
'<'.$tagtoreplace.
' />', $result);
1513 if (function_exists(
'mb_strtolower')) {
1514 return mb_strtolower($string, $encoding);
1516 return strtolower($string);
1529 if (function_exists(
'mb_strtoupper')) {
1530 return mb_strtoupper($string, $encoding);
1532 return strtoupper($string);
1545 if (function_exists(
'mb_substr')) {
1546 return mb_strtoupper(mb_substr($string, 0, 1, $encoding), $encoding).mb_substr($string, 1,
null, $encoding);
1548 return ucfirst($string);
1561 if (function_exists(
'mb_convert_case')) {
1562 return mb_convert_case($string, MB_CASE_TITLE, $encoding);
1564 return ucwords($string);
1589 function dol_syslog($message, $level = LOG_INFO, $ident = 0, $suffixinfilename =
'', $restricttologhandler =
'', $logcontext =
null)
1591 global $conf, $user, $debugbar;
1594 if (empty($conf->syslog->enabled)) {
1599 if (defined(
'USEEXTERNALSERVER') && !defined(
'USEDOLIBARRSERVER') && !defined(
'USEDOLIBARREDITOR')) {
1600 global $website, $websitekey;
1601 if (is_object($website) && !empty($website->ref)) {
1602 $suffixinfilename .=
'_website_'.$website->ref;
1603 } elseif (!empty($websitekey)) {
1604 $suffixinfilename .=
'_website_'.$websitekey;
1609 if (defined(
'USESUFFIXINLOG')) {
1610 $suffixinfilename .= constant(
'USESUFFIXINLOG');
1614 foreach ($conf->loghandlers as $loghandlerinstance) {
1615 $loghandlerinstance->setIdent($ident);
1619 if (!empty($message)) {
1621 $logLevels = array(LOG_EMERG=>
'EMERG', LOG_ALERT=>
'ALERT', LOG_CRIT=>
'CRITICAL', LOG_ERR=>
'ERR', LOG_WARNING=>
'WARN', LOG_NOTICE=>
'NOTICE', LOG_INFO=>
'INFO', LOG_DEBUG=>
'DEBUG');
1622 if (!array_key_exists($level, $logLevels)) {
1623 throw new Exception(
'Incorrect log level');
1625 if ($level > $conf->global->SYSLOG_LEVEL) {
1629 if (empty($conf->global->MAIN_SHOW_PASSWORD_INTO_LOG)) {
1630 $message = preg_replace(
'/password=\'[^\']*\'/',
'password=\'hidden\'', $message);
1634 if ((!empty($_REQUEST[
'logtohtml']) && !empty($conf->global->MAIN_ENABLE_LOG_TO_HTML))
1635 || (!empty($user->rights->debugbar->read) && is_object($debugbar))) {
1636 $conf->logbuffer[] =
dol_print_date(time(),
"%Y-%m-%d %H:%M:%S").
" ".$logLevels[$level].
" ".$message;
1641 if (!empty($conf->global->MAIN_ENABLE_LOG_INLINE_HTML) && !empty($_GET[
"log"])) {
1642 print
"\n\n<!-- Log start\n";
1644 print
"Log end -->\n";
1648 'message' => $message,
1649 'script' => (isset($_SERVER[
'PHP_SELF']) ? basename($_SERVER[
'PHP_SELF'],
'.php') :
false),
1651 'user' => ((is_object($user) && $user->id) ? $user->login :
false),
1656 if (!empty($remoteip)) {
1657 $data[
'ip'] = $remoteip;
1659 if (!empty($_SERVER[
'HTTP_X_FORWARDED_FOR']) && $_SERVER[
'HTTP_X_FORWARDED_FOR'] != $remoteip) {
1660 $data[
'ip'] = $_SERVER[
'HTTP_X_FORWARDED_FOR'].
' -> '.$data[
'ip'];
1661 } elseif (!empty($_SERVER[
'HTTP_CLIENT_IP']) && $_SERVER[
'HTTP_CLIENT_IP'] != $remoteip) {
1662 $data[
'ip'] = $_SERVER[
'HTTP_CLIENT_IP'].
' -> '.$data[
'ip'];
1664 } elseif (!empty($_SERVER[
'SERVER_ADDR'])) {
1666 $data[
'ip'] = $_SERVER[
'SERVER_ADDR'];
1667 } elseif (!empty($_SERVER[
'COMPUTERNAME'])) {
1669 $data[
'ip'] = $_SERVER[
'COMPUTERNAME'].(empty($_SERVER[
'USERNAME']) ?
'' :
'@'.$_SERVER[
'USERNAME']);
1670 } elseif (!empty($_SERVER[
'LOGNAME'])) {
1672 $data[
'ip'] =
'???@'.$_SERVER[
'LOGNAME'];
1676 foreach ($conf->loghandlers as $loghandlerinstance) {
1677 if ($restricttologhandler && $loghandlerinstance->code != $restricttologhandler) {
1680 $loghandlerinstance->export($data, $suffixinfilename);
1686 foreach ($conf->loghandlers as $loghandlerinstance) {
1687 $loghandlerinstance->setIdent($ident);
1708 if (strpos($url,
'?') > 0) {
1709 $url .=
'&dol_hide_topmenu=1&dol_hide_leftmenu=1&dol_openinpopup='.urlencode($name);
1711 $url .=
'?dol_hide_topmenu=1&dol_hide_leftmenu=1&dol_openinpopup='.urlencode($name);
1716 $backtopagejsfieldsid =
''; $backtopagejsfieldslabel =
'';
1717 if ($backtopagejsfields) {
1718 $tmpbacktopagejsfields = explode(
':', $backtopagejsfields);
1719 if (empty($tmpbacktopagejsfields[1])) {
1720 $backtopagejsfields = $name.
":".$backtopagejsfields;
1721 $tmp2backtopagejsfields = explode(
',', $tmpbacktopagejsfields[0]);
1723 $tmp2backtopagejsfields = explode(
',', $tmpbacktopagejsfields[1]);
1725 $backtopagejsfieldsid = empty($tmp2backtopagejsfields[0]) ?
'' : $tmp2backtopagejsfields[0];
1726 $backtopagejsfieldslabel = empty($tmp2backtopagejsfields[1]) ?
'' : $tmp2backtopagejsfields[1];
1727 $url .=
'&backtopagejsfields='.urlencode($backtopagejsfields);
1731 $out .=
'<!-- a link for button to open url into a dialog popup backtopagejsfields = '.$backtopagejsfields.
' -->'.
"\n";
1732 $out .=
'<a class="cursorpointer button_'.$name.($morecss ?
' '.$morecss :
'').
'"'.$disabled.
' title="'.
dol_escape_htmltag($label).
'">'.$buttonstring.
'</a>';
1733 $out .=
'<div id="idfordialog'.$name.
'" class="hidden">div for dialog</div>';
1734 $out .=
'<div id="varforreturndialogid'.$name.
'" class="hidden">div for returned id</div>';
1735 $out .=
'<div id="varforreturndialoglabel'.$name.
'" class="hidden">div for returned label</div>';
1736 $out .=
'<!-- Add js code to open dialog popup on dialog -->';
1737 $out .=
'<script type="text/javascript">
1738 jQuery(document).ready(function () {
1739 jQuery(".button_'.$name.
'").click(function () {
1740 console.log(\'Open popup with jQuery(...).dialog() on URL '.
dol_escape_js(DOL_URL_ROOT.$url).
'\');
1741 var $tmpdialog = $(\
'#idfordialog'.$name.
'\');
1742 $tmpdialog.html(\
'<iframe class="iframedialog" id="iframedialog'.$name.
'" style="border: 0px;" src="'.DOL_URL_ROOT.$url.
'" width="100%" height="98%"></iframe>\');
1746 height: (window.innerHeight - 150),
1749 open:
function (event, ui) {
1750 console.log(
"open popup name='.$name.', backtopagejsfields='.$backtopagejsfields.'");
1752 close:
function (event, ui) {
1753 returnedid = jQuery(
"#varforreturndialogid'.$name.'").text();
1754 returnedlabel = jQuery(
"#varforreturndialoglabel'.$name.'").text();
1755 console.log(
"popup has been closed. returnedid (js var defined into parent page)="+returnedid+
" returnedlabel="+returnedlabel);
1756 if (returnedid !=
"" && returnedid !=
"div for returned id") {
1757 jQuery(
"#'.(empty($backtopagejsfieldsid)?"none
":$backtopagejsfieldsid).'").val(returnedid);
1759 if (returnedlabel !=
"" && returnedlabel !=
"div for returned label") {
1760 jQuery(
"#'.(empty($backtopagejsfieldslabel)?"none
":$backtopagejsfieldslabel).'").val(returnedlabel);
1765 $tmpdialog.dialog(\
'open\');
1788 function dol_fiche_head($links = array(), $active =
'0', $title =
'', $notab = 0, $picto =
'', $pictoisfullpath = 0, $morehtmlright =
'', $morecss =
'', $limittoshow = 0, $moretabssuffix =
'')
1790 print
dol_get_fiche_head($links, $active, $title, $notab, $picto, $pictoisfullpath, $morehtmlright, $morecss, $limittoshow, $moretabssuffix);
1808 function dol_get_fiche_head($links = array(), $active =
'', $title =
'', $notab = 0, $picto =
'', $pictoisfullpath = 0, $morehtmlright =
'', $morecss =
'', $limittoshow = 0, $moretabssuffix =
'')
1810 global $conf, $langs, $hookmanager;
1814 if (!empty($conf->dol_optimize_smallscreen)) {
1818 $out =
"\n".
'<!-- dol_fiche_head - dol_get_fiche_head -->';
1820 if ((!empty($title) && $showtitle) || $morehtmlright || !empty($links)) {
1821 $out .=
'<div class="tabs'.($picto ?
'' :
' nopaddingleft').
'" data-role="controlgroup" data-type="horizontal">'.
"\n";
1825 if ($morehtmlright) {
1826 $out .=
'<div class="inline-block floatright tabsElem">'.$morehtmlright.
'</div>';
1830 if (!empty($title) && $showtitle && empty($conf->global->MAIN_OPTIMIZEFORTEXTBROWSER)) {
1832 $out .=
'<a class="tabTitle">';
1834 $noprefix = $pictoisfullpath;
1835 if (strpos($picto,
'fontawesome_') !==
false) {
1838 $out .=
img_picto($title, ($noprefix ?
'' :
'object_').$picto,
'', $pictoisfullpath, 0, 0,
'',
'imgTabTitle').
' ';
1840 $out .=
'<span class="tabTitleText">'.dol_escape_htmltag(
dol_trunc($title, $limittitle)).
'</span>';
1848 if (is_array($links) && !empty($links)) {
1849 $keys = array_keys($links);
1851 $maxkey = max($keys);
1857 if (empty($limittoshow)) {
1858 $limittoshow = (empty($conf->global->MAIN_MAXTABS_IN_CARD) ? 99 : $conf->global->MAIN_MAXTABS_IN_CARD);
1860 if (!empty($conf->dol_optimize_smallscreen)) {
1868 for ($i = 0; $i <= $maxkey; $i++) {
1869 if ((is_numeric($active) && $i == $active) || (!empty($links[$i][2]) && !is_numeric($active) && $active == $links[$i][2])) {
1871 if ($i >= $limittoshow) {
1877 for ($i = 0; $i <= $maxkey; $i++) {
1878 if ((is_numeric($active) && $i == $active) || (!empty($links[$i][2]) && !is_numeric($active) && $active == $links[$i][2])) {
1884 if ($i < $limittoshow || $isactive) {
1886 $out .=
'<div class="inline-block tabsElem'.($isactive ?
' tabsElemActive' :
'').((!$isactive && !empty($conf->global->MAIN_HIDE_INACTIVETAB_ON_PRINT)) ?
' hideonprint' :
'').
'"><!-- id tab = '.(empty($links[$i][2]) ?
'' :
dol_escape_htmltag($links[$i][2])).
' -->';
1888 if (isset($links[$i][2]) && $links[$i][2] ==
'image') {
1889 if (!empty($links[$i][0])) {
1890 $out .=
'<a class="tabimage'.($morecss ?
' '.$morecss :
'').
'" href="'.$links[$i][0].
'">'.$links[$i][1].
'</a>'.
"\n";
1892 $out .=
'<span class="tabspan">'.$links[$i][1].
'</span>'.
"\n";
1894 } elseif (!empty($links[$i][1])) {
1896 $out .=
'<div class="tab tab'.($isactive?
'active':
'unactive').
'" style="margin: 0 !important">';
1897 if (!empty($links[$i][0])) {
1898 $titletoshow = preg_replace(
'/<.*$/',
'', $links[$i][1]);
1899 $out .=
'<a'.(!empty($links[$i][2]) ?
' id="'.$links[$i][2].
'"' :
'').
' class="tab inline-block valignmiddle'.($morecss ?
' '.$morecss :
'').
'" href="'.$links[$i][0].
'" title="'.
dol_escape_htmltag($titletoshow).
'">';
1901 $out .= $links[$i][1];
1902 if (!empty($links[$i][0])) {
1903 $out .=
'</a>'.
"\n";
1905 $out .= empty($links[$i][4]) ?
'' : $links[$i][4];
1914 $outmore .=
'<div class="popuptabset wordwrap">';
1916 $outmore .=
'<div class="popuptab wordwrap" style="display:inherit;">';
1917 if (isset($links[$i][2]) && $links[$i][2] ==
'image') {
1918 if (!empty($links[$i][0])) {
1919 $outmore .=
'<a class="tabimage'.($morecss ?
' '.$morecss :
'').
'" href="'.$links[$i][0].
'">'.$links[$i][1].
'</a>'.
"\n";
1921 $outmore .=
'<span class="tabspan">'.$links[$i][1].
'</span>'.
"\n";
1923 } elseif (!empty($links[$i][1])) {
1924 $outmore .=
'<a'.(!empty($links[$i][2]) ?
' id="'.$links[$i][2].
'"' :
'').
' class="wordwrap inline-block'.($morecss ?
' '.$morecss :
'').
'" href="'.$links[$i][0].
'">';
1925 $outmore .= preg_replace(
'/([a-z])\/([a-z])/i',
'\\1 / \\2', $links[$i][1]);
1926 $outmore .=
'</a>'.
"\n";
1928 $outmore .=
'</div>';
1935 $outmore .=
'</div>';
1939 $left = ($langs->trans(
"DIRECTION") ==
'rtl' ?
'right' :
'left');
1940 $right = ($langs->trans(
"DIRECTION") ==
'rtl' ?
'left' :
'right');
1941 $widthofpopup = 200;
1943 $tabsname = $moretabssuffix;
1944 if (empty($tabsname)) {
1945 $tabsname = str_replace(
"@",
"", $picto);
1947 $out .=
'<div id="moretabs'.$tabsname.
'" class="inline-block tabsElem valignmiddle">';
1948 $out .=
'<div class="tab"><a href="#" class="tab moretab inline-block tabunactive"><span class="hideonsmartphone">'.$langs->trans(
"More").
'</span>... ('.$nbintab.
')</a></div>';
1949 $out .=
'<div id="moretabsList'.$tabsname.
'" style="width: '.$widthofpopup.
'px; position: absolute; '.$left.
': -999em; text-align: '.$left.
'; margin:0px; padding:2px; z-index:10;">';
1952 $out .=
'<div></div>';
1956 $out .=
"$('#moretabs".$tabsname.
"').mouseenter( function() {
1957 var x = this.offsetLeft, y = this.offsetTop;
1958 console.log('mouseenter ".$left.
" x='+x+' y='+y+' window.innerWidth='+window.innerWidth);
1959 if ((window.innerWidth - x) < ".($widthofpopup + 10).
") {
1960 $('#moretabsList".$tabsname.
"').css('".$right.
"','8px');
1962 $('#moretabsList".$tabsname.
"').css('".$left.
"','auto');
1965 $out .=
"$('#moretabs".$tabsname.
"').mouseleave( function() { console.log('mouseleave ".$left.
"'); $('#moretabsList".$tabsname.
"').css('".$left.
"','-999em');});";
1966 $out .=
"</script>";
1969 if ((!empty($title) && $showtitle) || $morehtmlright || !empty($links)) {
1973 if (!$notab || $notab == -1 || $notab == -2) {
1974 $out .=
"\n".
'<div class="tabBar'.($notab == -1 ?
'' : ($notab == -2 ?
' tabBarNoTop' :
' tabBarWithBottom')).
'">'.
"\n";
1977 $parameters = array(
'tabname' => $active,
'out' => $out);
1978 $reshook = $hookmanager->executeHooks(
'printTabsHead', $parameters);
1980 $out = $hookmanager->resPrint;
2006 if (!$notab || $notab == -1) {
2007 return "\n</div>\n";
2032 function dol_banner_tab($object, $paramid, $morehtml =
'', $shownav = 1, $fieldid =
'rowid', $fieldref =
'ref', $morehtmlref =
'', $moreparam =
'', $nodbprefix = 0, $morehtmlleft =
'', $morehtmlstatus =
'', $onlybanner = 0, $morehtmlright =
'')
2034 global $conf,
$form, $user, $langs, $hookmanager, $action;
2038 $maxvisiblephotos = 1;
2040 $entity = (empty($object->entity) ? $conf->entity : $object->entity);
2041 $showbarcode = empty($conf->barcode->enabled) ? 0 : (empty($object->barcode) ? 0 : 1);
2042 if (!empty($conf->global->MAIN_USE_ADVANCED_PERMS) && empty($user->rights->barcode->lire_advance)) {
2045 $modulepart =
'unknown';
2047 if ($object->element ==
'societe' || $object->element ==
'contact' || $object->element ==
'product' || $object->element ==
'ticket') {
2048 $modulepart = $object->element;
2049 } elseif ($object->element ==
'member') {
2050 $modulepart =
'memberphoto';
2051 } elseif ($object->element ==
'user') {
2052 $modulepart =
'userphoto';
2055 if (class_exists(
"Imagick")) {
2056 if ($object->element ==
'expensereport' || $object->element ==
'propal' || $object->element ==
'commande' || $object->element ==
'facture' || $object->element ==
'supplier_proposal') {
2057 $modulepart = $object->element;
2058 } elseif ($object->element ==
'fichinter') {
2059 $modulepart =
'ficheinter';
2060 } elseif ($object->element ==
'contrat') {
2061 $modulepart =
'contract';
2062 } elseif ($object->element ==
'order_supplier') {
2063 $modulepart =
'supplier_order';
2064 } elseif ($object->element ==
'invoice_supplier') {
2065 $modulepart =
'supplier_invoice';
2069 if ($object->element ==
'product') {
2071 $cssclass =
'photowithmargin photoref';
2072 $showimage = $object->is_photo_available($conf->product->multidir_output[$entity]);
2073 $maxvisiblephotos = (isset($conf->global->PRODUCT_MAX_VISIBLE_PHOTO) ? $conf->global->PRODUCT_MAX_VISIBLE_PHOTO : 5);
2074 if ($conf->browser->layout ==
'phone') {
2075 $maxvisiblephotos = 1;
2078 $morehtmlleft .=
'<div class="floatleft inline-block valignmiddle divphotoref">'.$object->show_photos(
'product', $conf->product->multidir_output[$entity],
'small', $maxvisiblephotos, 0, 0, 0, $width, 0).
'</div>';
2080 if (!empty($conf->global->PRODUCT_NODISPLAYIFNOPHOTO)) {
2082 $morehtmlleft .=
'<div class="floatleft inline-block valignmiddle divphotoref"></div>';
2084 $nophoto =
'/public/theme/common/nophoto.png';
2085 $morehtmlleft .=
'<div class="floatleft inline-block valignmiddle divphotoref"><img class="photo'.$modulepart.($cssclass ?
' '.$cssclass :
'').
'" alt="No photo"'.($width ?
' style="width: '.$width.
'px"' :
'').
' src="'.DOL_URL_ROOT.$nophoto.
'"></div>';
2088 } elseif ($object->element ==
'ticket') {
2090 $cssclass =
'photoref';
2091 $showimage = $object->is_photo_available($conf->ticket->multidir_output[$entity].
'/'.$object->ref);
2092 $maxvisiblephotos = (isset($conf->global->TICKET_MAX_VISIBLE_PHOTO) ? $conf->global->TICKET_MAX_VISIBLE_PHOTO : 2);
2093 if ($conf->browser->layout ==
'phone') {
2094 $maxvisiblephotos = 1;
2098 $showphoto = $object->show_photos(
'ticket', $conf->ticket->multidir_output[$entity],
'small', $maxvisiblephotos, 0, 0, 0, $width, 0);
2099 if ($object->nbphoto > 0) {
2100 $morehtmlleft .=
'<div class="floatleft inline-block valignmiddle divphotoref">'.$showphoto.
'</div>';
2106 if (!empty($conf->global->TICKET_NODISPLAYIFNOPHOTO)) {
2108 $morehtmlleft .=
'<div class="floatleft inline-block valignmiddle divphotoref"></div>';
2110 $nophoto =
img_picto(
'No photo',
'object_ticket');
2111 $morehtmlleft .=
'<!-- No photo to show -->';
2112 $morehtmlleft .=
'<div class="floatleft inline-block valignmiddle divphotoref"><div class="photoref">';
2113 $morehtmlleft .= $nophoto;
2114 $morehtmlleft .=
'</div></div>';
2119 if ($modulepart !=
'unknown') {
2122 if (in_array($modulepart, array(
'propal',
'commande',
'facture',
'ficheinter',
'contract',
'supplier_order',
'supplier_proposal',
'supplier_invoice',
'expensereport')) && class_exists(
"Imagick")) {
2124 $dir_output = (empty($conf->$modulepart->multidir_output[$entity]) ? $conf->$modulepart->dir_output : $conf->$modulepart->multidir_output[$entity]).
"/";
2125 if (in_array($modulepart, array(
'invoice_supplier',
'supplier_invoice'))) {
2126 $subdir =
get_exdir($object->id, 2, 0, 1, $object, $modulepart);
2127 $subdir .= ((!empty($subdir) && !preg_match(
'/\/$/', $subdir)) ?
'/' :
'').$objectref;
2129 $subdir =
get_exdir($object->id, 0, 0, 1, $object, $modulepart);
2131 if (empty($subdir)) {
2132 $subdir =
'errorgettingsubdirofobject';
2135 $filepath = $dir_output.$subdir.
"/";
2137 $filepdf = $filepath.$objectref.
".pdf";
2138 $relativepath = $subdir.
'/'.$objectref.
'.pdf';
2141 $fileimage = $filepdf.
'_preview.png';
2142 $relativepathimage = $relativepath.
'_preview.png';
2144 $pdfexists = file_exists($filepdf);
2149 if (!file_exists($fileimage) || (filemtime($fileimage) < filemtime($filepdf))) {
2150 if (empty($conf->global->MAIN_DISABLE_PDF_THUMBS)) {
2151 include_once DOL_DOCUMENT_ROOT.
'/core/lib/files.lib.php';
2160 if ($pdfexists && !$error) {
2161 $heightforphotref = 80;
2162 if (!empty($conf->dol_optimize_smallscreen)) {
2163 $heightforphotref = 60;
2166 if (file_exists($fileimage)) {
2167 $phototoshow =
'<div class="photoref">';
2168 $phototoshow .=
'<img height="'.$heightforphotref.
'" class="photo photowithmargin photowithborder" src="'.DOL_URL_ROOT.
'/viewimage.php?modulepart=apercu'.$modulepart.
'&file='.urlencode($relativepathimage).
'">';
2169 $phototoshow .=
'</div>';
2172 } elseif (!$phototoshow) {
2173 $phototoshow .=
$form->showphoto($modulepart, $object, 0, 0, 0,
'photowithmargin photoref',
'small', 1, 0, $maxvisiblephotos);
2177 $morehtmlleft .=
'<div class="floatleft inline-block valignmiddle divphotoref">';
2178 $morehtmlleft .= $phototoshow;
2179 $morehtmlleft .=
'</div>';
2183 if (empty($phototoshow)) {
2184 if ($object->element ==
'action') {
2186 $cssclass =
'photorefcenter';
2187 $nophoto =
img_picto(
'No photo',
'title_agenda');
2190 $cssclass =
'photorefcenter';
2191 $picto = $object->picto;
2192 $prefix =
'object_';
2193 if ($object->element ==
'project' && !$object->public) {
2196 if (strpos($picto,
'fontawesome_') !==
false) {
2199 $nophoto =
img_picto(
'No photo', $prefix.$picto);
2201 $morehtmlleft .=
'<!-- No photo to show -->';
2202 $morehtmlleft .=
'<div class="floatleft inline-block valignmiddle divphotoref"><div class="photoref">';
2203 $morehtmlleft .= $nophoto;
2204 $morehtmlleft .=
'</div></div>';
2210 $morehtmlleft .=
'<div class="floatleft inline-block valignmiddle divphotoref">'.$form->showbarcode($object, 100,
'photoref valignmiddle').
'</div>';
2213 if ($object->element ==
'societe') {
2214 if (!empty($conf->use_javascript_ajax) && $user->rights->societe->creer && !empty($conf->global->MAIN_DIRECT_STATUS_UPDATE)) {
2215 $morehtmlstatus .=
ajax_object_onoff($object,
'status',
'status',
'InActivity',
'ActivityCeased');
2217 $morehtmlstatus .= $object->getLibStatut(6);
2219 } elseif ($object->element ==
'product') {
2221 if (!empty($conf->use_javascript_ajax) && $user->rights->produit->creer && !empty($conf->global->MAIN_DIRECT_STATUS_UPDATE)) {
2222 $morehtmlstatus .=
ajax_object_onoff($object,
'status',
'tosell',
'ProductStatusOnSell',
'ProductStatusNotOnSell');
2224 $morehtmlstatus .=
'<span class="statusrefsell">'.$object->getLibStatut(6, 0).
'</span>';
2226 $morehtmlstatus .=
' ';
2228 if (!empty($conf->use_javascript_ajax) && $user->rights->produit->creer && !empty($conf->global->MAIN_DIRECT_STATUS_UPDATE)) {
2229 $morehtmlstatus .=
ajax_object_onoff($object,
'status_buy',
'tobuy',
'ProductStatusOnBuy',
'ProductStatusNotOnBuy');
2231 $morehtmlstatus .=
'<span class="statusrefbuy">'.$object->getLibStatut(6, 1).
'</span>';
2233 } elseif (in_array($object->element, array(
'facture',
'invoice',
'invoice_supplier',
'chargesociales',
'loan',
'tva',
'salary'))) {
2234 $tmptxt = $object->getLibStatut(6, $object->totalpaid);
2235 if (empty($tmptxt) || $tmptxt == $object->getLibStatut(3)) {
2236 $tmptxt = $object->getLibStatut(5, $object->totalpaid);
2238 $morehtmlstatus .= $tmptxt;
2239 } elseif ($object->element ==
'contrat' || $object->element ==
'contract') {
2240 if ($object->statut == 0) {
2241 $morehtmlstatus .= $object->getLibStatut(5);
2243 $morehtmlstatus .= $object->getLibStatut(4);
2245 } elseif ($object->element ==
'facturerec') {
2246 if ($object->frequency == 0) {
2247 $morehtmlstatus .= $object->getLibStatut(2);
2249 $morehtmlstatus .= $object->getLibStatut(5);
2251 } elseif ($object->element ==
'project_task') {
2252 $object->fk_statut = 1;
2253 if ($object->progress > 0) {
2254 $object->fk_statut = 2;
2256 if ($object->progress >= 100) {
2257 $object->fk_statut = 3;
2259 $tmptxt = $object->getLibStatut(5);
2260 $morehtmlstatus .= $tmptxt;
2262 $tmptxt = $object->getLibStatut(6);
2263 if (empty($tmptxt) || $tmptxt == $object->getLibStatut(3)) {
2264 $tmptxt = $object->getLibStatut(5);
2266 $morehtmlstatus .= $tmptxt;
2270 if (!empty($conf->accounting->enabled) && in_array($object->element, array(
'bank',
'paiementcharge',
'facture',
'invoice',
'invoice_supplier',
'expensereport',
'payment_various'))) {
2272 if (method_exists($object,
'getVentilExportCompta')) {
2273 $accounted = $object->getVentilExportCompta();
2274 $langs->load(
"accountancy");
2275 $morehtmlstatus .=
'</div><div class="statusref statusrefbis"><span class="opacitymedium">'.($accounted > 0 ? $langs->trans(
"Accounted") : $langs->trans(
"NotYetAccounted")).
'</span>';
2280 if (!empty($object->name_alias)) {
2281 $morehtmlref .=
'<div class="refidno">'.$object->name_alias.
'</div>';
2285 if (in_array($object->element, array(
'product',
'bank_account',
'project_task'))) {
2286 if (!empty($object->label)) {
2287 $morehtmlref .=
'<div class="refidno">'.$object->label.
'</div>';
2292 if (method_exists($object,
'getBannerAddress') && !in_array($object->element, array(
'product',
'bookmark',
'ecm_directories',
'ecm_files'))) {
2293 $moreaddress = $object->getBannerAddress(
'refaddress', $object);
2295 $morehtmlref .=
'<div class="refidno">';
2296 $morehtmlref .= $moreaddress;
2297 $morehtmlref .=
'</div>';
2300 if (!empty($conf->global->MAIN_SHOW_TECHNICAL_ID) && ($conf->global->MAIN_SHOW_TECHNICAL_ID ==
'1' || preg_match(
'/'.preg_quote($object->element,
'/').
'/i', $conf->global->MAIN_SHOW_TECHNICAL_ID)) && !empty($object->id)) {
2301 $morehtmlref .=
'<div style="clear: both;"></div>';
2302 $morehtmlref .=
'<div class="refidno">';
2303 $morehtmlref .= $langs->trans(
"TechnicalID").
': '.$object->id;
2304 $morehtmlref .=
'</div>';
2307 $parameters=array(
'morehtmlref'=>$morehtmlref);
2308 $reshook = $hookmanager->executeHooks(
'formDolBanner', $parameters, $object, $action);
2311 } elseif (empty($reshook)) {
2312 $morehtmlref .= $hookmanager->resPrint;
2313 } elseif ($reshook > 0) {
2314 $morehtmlref = $hookmanager->resPrint;
2318 print
'<div class="'.($onlybanner ?
'arearefnobottom ' :
'arearef ').
'heightref valignmiddle centpercent">';
2319 print
$form->showrefnav($object, $paramid, $morehtml, $shownav, $fieldid, $fieldref, $morehtmlref, $moreparam, $nodbprefix, $morehtmlleft, $morehtmlstatus, $morehtmlright);
2321 print
'<div class="underrefbanner clearboth"></div>';
2337 if ($fieldrequired) {
2338 $ret .=
'<span class="fieldrequired">';
2340 $ret .=
'<label for="'.$fieldkey.
'">';
2341 $ret .= $langs->trans($langkey);
2343 if ($fieldrequired) {
2359 $ret =
' '.$bc[$var];
2361 $ret = preg_replace(
'/class=\"/',
'class="'.$moreclass.
' ', $ret);
2379 function dol_format_address($object, $withcountry = 0, $sep =
"\n", $outputlangs =
'', $mode = 0, $extralangcode =
'')
2381 global $conf, $langs, $hookmanager;
2384 $countriesusingstate = array(
'AU',
'CA',
'US',
'IN',
'GB',
'ES',
'UK',
'TR',
'CN');
2389 $ret .= ($extralangcode ? $object->array_languages[
'address'][$extralangcode] : (empty($object->address) ?
'' : $object->address));
2392 if (isset($object->country_code) && in_array($object->country_code, array(
'AU',
'CA',
'US',
'CN')) || !empty($conf->global->MAIN_FORCE_STATE_INTO_ADDRESS)) {
2394 $town = ($extralangcode ? $object->array_languages[
'town'][$extralangcode] : (empty($object->town) ?
'' : $object->town));
2395 $ret .= (($ret && $town) ? $sep :
'').$town;
2397 if (!empty($object->state)) {
2398 $ret .= ($ret ? ($town ?
", " : $sep) :
'').$object->state;
2400 if (!empty($object->zip)) {
2401 $ret .= ($ret ? (($town || $object->state) ?
", " : $sep) :
'').$object->zip;
2403 } elseif (isset($object->country_code) && in_array($object->country_code, array(
'GB',
'UK'))) {
2405 $town = ($extralangcode ? $object->array_languages[
'town'][$extralangcode] : (empty($object->town) ?
'' : $object->town));
2406 $ret .= ($ret ? $sep :
'').$town;
2407 if (!empty($object->state)) {
2408 $ret .= ($ret ?
", " :
'').$object->state;
2410 if (!empty($object->zip)) {
2411 $ret .= ($ret ? $sep :
'').$object->zip;
2413 } elseif (isset($object->country_code) && in_array($object->country_code, array(
'ES',
'TR'))) {
2415 $ret .= ($ret ? $sep :
'').$object->zip;
2416 $town = ($extralangcode ? $object->array_languages[
'town'][$extralangcode] : (empty($object->town) ?
'' : $object->town));
2417 $ret .= ($town ? (($object->zip ?
' ' :
'').$town) :
'');
2418 if (!empty($object->state)) {
2419 $ret .=
"\n".$object->state;
2421 } elseif (isset($object->country_code) && in_array($object->country_code, array(
'JP'))) {
2424 $town = ($extralangcode ? $object->array_languages[
'town'][$extralangcode] : (empty($object->town) ?
'' : $object->town));
2425 $ret .= ($ret ? $sep :
'').($object->state ? $object->state.
', ' :
'').$town.($object->zip ?
' ' :
'').$object->zip;
2426 } elseif (isset($object->country_code) && in_array($object->country_code, array(
'IT'))) {
2428 $ret .= ($ret ? $sep :
'').$object->zip;
2429 $town = ($extralangcode ? $object->array_languages[
'town'][$extralangcode] : (empty($object->town) ?
'' : $object->town));
2430 $ret .= ($town ? (($object->zip ?
' ' :
'').$town) :
'');
2431 $ret .= (empty($object->state_code) ?
'' : (
' '.$object->state_code));
2434 $town = ($extralangcode ? $object->array_languages[
'town'][$extralangcode] : (empty($object->town) ?
'' : $object->town));
2435 $ret .= !empty($object->zip) ? (($ret ? $sep :
'').$object->zip) :
'';
2436 $ret .= ($town ? (($object->zip ?
' ' : ($ret ? $sep :
'')).$town) :
'');
2437 if (!empty($object->state) && in_array($object->country_code, $countriesusingstate)) {
2438 $ret .= ($ret ?
", " :
'').$object->state;
2441 if (!is_object($outputlangs)) {
2442 $outputlangs = $langs;
2445 $langs->load(
"dict");
2446 $ret .= (empty($object->country_code) ?
'' : ($ret ? $sep :
'').$outputlangs->convToOutputCharset($outputlangs->transnoentitiesnoconv(
"Country".$object->country_code)));
2449 $parameters = array(
'withcountry' => $withcountry,
'sep' => $sep,
'outputlangs' => $outputlangs,
'mode' => $mode,
'extralangcode' => $extralangcode);
2450 $reshook = $hookmanager->executeHooks(
'formatAddress', $parameters, $object);
2454 $ret .= $hookmanager->resPrint;
2472 if ((abs($ts) <= 0x7FFFFFFF)) {
2473 return ($is_gmt) ? @gmstrftime($fmt, $ts) : @strftime($fmt, $ts);
2475 return 'Error date into a not supported range';
2500 function dol_print_date($time, $format =
'', $tzoutput =
'auto', $outputlangs =
'', $encodetooutput =
false)
2502 global $conf, $langs;
2509 if ($tzoutput ===
'auto') {
2510 $tzoutput = (empty($conf) ?
'tzserver' : (isset($conf->tzuserinputkey) ? $conf->tzuserinputkey :
'tzserver'));
2515 $offsettz = $offsetdst = 0;
2518 if (is_string($tzoutput)) {
2519 if ($tzoutput ==
'tzserver') {
2521 $offsettzstring = @date_default_timezone_get();
2524 } elseif ($tzoutput ==
'tzuser' || $tzoutput ==
'tzuserrel') {
2526 $offsettzstring = (empty($_SESSION[
'dol_tz_string']) ?
'UTC' : $_SESSION[
'dol_tz_string']);
2528 if (class_exists(
'DateTimeZone')) {
2529 $user_date_tz =
new DateTimeZone($offsettzstring);
2530 $user_dt =
new DateTime();
2531 $user_dt->setTimezone($user_date_tz);
2532 $user_dt->setTimestamp($tzoutput ==
'tzuser' ?
dol_now() : (
int) $time);
2533 $offsettz = $user_dt->getOffset();
2535 $offsettz = (empty($_SESSION[
'dol_tz']) ? 0 : $_SESSION[
'dol_tz']) * 60 * 60;
2536 $offsetdst = (empty($_SESSION[
'dol_dst']) ? 0 : $_SESSION[
'dol_dst']) * 60 * 60;
2541 if (!is_object($outputlangs)) {
2542 $outputlangs = $langs;
2545 $format =
'daytextshort';
2550 $reduceformat = (!empty($conf->dol_optimize_smallscreen) && in_array($format, array(
'day',
'dayhour'))) ? 1 : 0;
2551 $format = preg_replace(
'/inputnoreduce/',
'', $format);
2552 $formatwithoutreduce = preg_replace(
'/reduceformat/',
'', $format);
2553 if ($formatwithoutreduce != $format) {
2554 $format = $formatwithoutreduce;
2560 if ($format ==
'day') {
2561 $format = ($outputlangs->trans(
"FormatDateShort") !=
"FormatDateShort" ? $outputlangs->trans(
"FormatDateShort") : $conf->format_date_short);
2562 } elseif ($format ==
'hour') {
2563 $format = ($outputlangs->trans(
"FormatHourShort") !=
"FormatHourShort" ? $outputlangs->trans(
"FormatHourShort") : $conf->format_hour_short);
2564 } elseif ($format ==
'hourduration') {
2565 $format = ($outputlangs->trans(
"FormatHourShortDuration") !=
"FormatHourShortDuration" ? $outputlangs->trans(
"FormatHourShortDuration") : $conf->format_hour_short_duration);
2566 } elseif ($format ==
'daytext') {
2567 $format = ($outputlangs->trans(
"FormatDateText") !=
"FormatDateText" ? $outputlangs->trans(
"FormatDateText") : $conf->format_date_text);
2568 } elseif ($format ==
'daytextshort') {
2569 $format = ($outputlangs->trans(
"FormatDateTextShort") !=
"FormatDateTextShort" ? $outputlangs->trans(
"FormatDateTextShort") : $conf->format_date_text_short);
2570 } elseif ($format ==
'dayhour') {
2571 $format = ($outputlangs->trans(
"FormatDateHourShort") !=
"FormatDateHourShort" ? $outputlangs->trans(
"FormatDateHourShort") : $conf->format_date_hour_short);
2572 } elseif ($format ==
'dayhoursec') {
2573 $format = ($outputlangs->trans(
"FormatDateHourSecShort") !=
"FormatDateHourSecShort" ? $outputlangs->trans(
"FormatDateHourSecShort") : $conf->format_date_hour_sec_short);
2574 } elseif ($format ==
'dayhourtext') {
2575 $format = ($outputlangs->trans(
"FormatDateHourText") !=
"FormatDateHourText" ? $outputlangs->trans(
"FormatDateHourText") : $conf->format_date_hour_text);
2576 } elseif ($format ==
'dayhourtextshort') {
2577 $format = ($outputlangs->trans(
"FormatDateHourTextShort") !=
"FormatDateHourTextShort" ? $outputlangs->trans(
"FormatDateHourTextShort") : $conf->format_date_hour_text_short);
2578 } elseif ($format ==
'dayhourlog') {
2580 $format =
'%Y%m%d%H%M%S';
2581 } elseif ($format ==
'dayhourlogsmall') {
2583 $format =
'%Y%m%d%H%M';
2584 } elseif ($format ==
'dayhourldap') {
2585 $format =
'%Y%m%d%H%M%SZ';
2586 } elseif ($format ==
'dayhourxcard') {
2587 $format =
'%Y%m%dT%H%M%SZ';
2588 } elseif ($format ==
'dayxcard') {
2590 } elseif ($format ==
'dayrfc') {
2591 $format =
'%Y-%m-%d';
2592 } elseif ($format ==
'dayhourrfc') {
2593 $format =
'%Y-%m-%dT%H:%M:%SZ';
2594 } elseif ($format ==
'standard') {
2595 $format =
'%Y-%m-%d %H:%M:%S';
2598 if ($reduceformat) {
2599 $format = str_replace(
'%Y',
'%y', $format);
2600 $format = str_replace(
'yyyy',
'yy', $format);
2604 if (preg_match(
'/%b/i', $format)) {
2606 $format = str_replace(
'%b',
'__b__', $format);
2607 $format = str_replace(
'%B',
'__B__', $format);
2609 if (preg_match(
'/%a/i', $format)) {
2611 $format = str_replace(
'%a',
'__a__', $format);
2612 $format = str_replace(
'%A',
'__A__', $format);
2618 if (preg_match(
'/^([0-9][0-9][0-9][0-9])([0-9][0-9])([0-9][0-9])([0-9][0-9])([0-9][0-9])([0-9][0-9])$/i', $time, $reg)) {
2619 dol_print_error(
'',
"Functions.lib::dol_print_date function called with a bad value from page ".$_SERVER[
"PHP_SELF"]);
2621 } elseif (preg_match(
'/^([0-9]+)\-([0-9]+)\-([0-9]+) ?([0-9]+)?:?([0-9]+)?:?([0-9]+)?/i', $time, $reg)) {
2623 dol_syslog(
"Functions.lib::dol_print_date function called with a bad value from page ".$_SERVER[
"PHP_SELF"], LOG_WARNING);
2626 $syear = (!empty($reg[1]) ? $reg[1] :
'');
2627 $smonth = (!empty($reg[2]) ? $reg[2] :
'');
2628 $sday = (!empty($reg[3]) ? $reg[3] :
'');
2629 $shour = (!empty($reg[4]) ? $reg[4] :
'');
2630 $smin = (!empty($reg[5]) ? $reg[5] :
'');
2631 $ssec = (!empty($reg[6]) ? $reg[6] :
'');
2633 $time =
dol_mktime($shour, $smin, $ssec, $smonth, $sday, $syear,
true);
2634 $ret = adodb_strftime($format, $time + $offsettz + $offsetdst, $to_gmt);
2637 if ($time < 100000000000) {
2638 $timetouse = $time + $offsettz + $offsetdst;
2640 $ret = adodb_strftime($format, $timetouse, $to_gmt);
2642 $ret =
'Bad value '.$time.
' for date';
2646 if (preg_match(
'/__b__/i', $format)) {
2647 $timetouse = $time + $offsettz + $offsetdst;
2650 $month = adodb_strftime(
'%m', $timetouse, $to_gmt);
2651 $month = sprintf(
"%02d", $month);
2652 if ($encodetooutput) {
2653 $monthtext = $outputlangs->transnoentities(
'Month'.$month);
2654 $monthtextshort = $outputlangs->transnoentities(
'MonthShort'.$month);
2656 $monthtext = $outputlangs->transnoentitiesnoconv(
'Month'.$month);
2657 $monthtextshort = $outputlangs->transnoentitiesnoconv(
'MonthShort'.$month);
2660 $ret = str_replace(
'__b__', $monthtextshort, $ret);
2661 $ret = str_replace(
'__B__', $monthtext, $ret);
2665 if (preg_match(
'/__a__/i', $format)) {
2667 $timetouse = $time + $offsettz + $offsetdst;
2669 $w = adodb_strftime(
'%w', $timetouse, $to_gmt);
2670 $dayweek = $outputlangs->transnoentitiesnoconv(
'Day'.$w);
2671 $ret = str_replace(
'__A__', $dayweek, $ret);
2672 $ret = str_replace(
'__a__',
dol_substr($dayweek, 0, 3), $ret);
2702 $datetimeobj =
new DateTime();
2703 $datetimeobj->setTimestamp($timestamp);
2704 if ($forcetimezone) {
2705 $datetimeobj->setTimezone(
new DateTimeZone($forcetimezone ==
'gmt' ?
'UTC' : $forcetimezone));
2708 'year'=>((
int) date_format($datetimeobj,
'Y')),
2709 'mon'=>((
int) date_format($datetimeobj,
'm')),
2710 'mday'=>((
int) date_format($datetimeobj,
'd')),
2711 'wday'=>((
int) date_format($datetimeobj,
'w')),
2712 'yday'=>((
int) date_format($datetimeobj,
'z')),
2713 'hours'=>((
int) date_format($datetimeobj,
'H')),
2714 'minutes'=>((
int) date_format($datetimeobj,
'i')),
2715 'seconds'=>((
int) date_format($datetimeobj,
's')),
2743 function dol_mktime($hour, $minute, $second, $month, $day, $year, $gm =
'auto', $check = 1)
2748 if ($gm ===
'auto') {
2749 $gm = (empty($conf) ?
'tzserver' : $conf->tzuserinputkey);
2754 if ($hour == -1 || empty($hour)) {
2757 if ($minute == -1 || empty($minute)) {
2760 if ($second == -1 || empty($second)) {
2766 if (!$month || !$day) {
2775 if ($hour < 0 || $hour > 24) {
2778 if ($minute < 0 || $minute > 60) {
2781 if ($second < 0 || $second > 60) {
2786 if (empty($gm) || ($gm ===
'server' || $gm ===
'tzserver')) {
2787 $default_timezone = @date_default_timezone_get();
2788 $localtz =
new DateTimeZone($default_timezone);
2789 } elseif ($gm ===
'user' || $gm ===
'tzuser' || $gm ===
'tzuserrel') {
2791 $default_timezone = (empty($_SESSION[
"dol_tz_string"]) ? @date_default_timezone_get() : $_SESSION[
"dol_tz_string"]);
2793 $localtz =
new DateTimeZone($default_timezone);
2795 dol_syslog(
"Warning dol_tz_string contains an invalid value ".$_SESSION[
"dol_tz_string"], LOG_WARNING);
2796 $default_timezone = @date_default_timezone_get();
2798 } elseif (strrpos($gm,
"tz,") !==
false) {
2799 $timezone = str_replace(
"tz,",
"", $gm);
2801 $localtz =
new DateTimeZone($timezone);
2803 dol_syslog(
"Warning passed timezone contains an invalid value ".$timezone, LOG_WARNING);
2807 if (empty($localtz)) {
2808 $localtz =
new DateTimeZone(
'UTC');
2812 $dt =
new DateTime(
'now', $localtz);
2813 $dt->setDate((
int) $year, (
int) $month, (
int) $day);
2814 $dt->setTime((
int) $hour, (
int) $minute, (
int) $second);
2815 $date = $dt->getTimestamp();
2835 if ($mode ===
'auto') {
2839 if ($mode ==
'gmt') {
2841 } elseif ($mode ==
'tzserver') {
2842 require_once DOL_DOCUMENT_ROOT.
'/core/lib/date.lib.php';
2844 $ret = (int) (
dol_now(
'gmt') + ($tzsecond * 3600));
2850 } elseif ($mode ==
'tzuser' || $mode ==
'tzuserrel') {
2853 $offsettz = (empty($_SESSION[
'dol_tz']) ? 0 : $_SESSION[
'dol_tz']) * 60 * 60;
2854 $offsetdst = (empty($_SESSION[
'dol_dst']) ? 0 : $_SESSION[
'dol_dst']) * 60 * 60;
2855 $ret = (int) (
dol_now(
'gmt') + ($offsettz + $offsetdst));
2872 global $conf, $langs;
2875 if (!empty($conf->dol_optimize_smallscreen)) {
2880 if (empty($shortvalue) || $size < ($level * 10)) {
2882 $textunitshort = $langs->trans(
"b");
2883 $textunitlong = $langs->trans(
"Bytes");
2885 $ret = round($size / $level, 0);
2886 $textunitshort = $langs->trans(
"Kb");
2887 $textunitlong = $langs->trans(
"KiloBytes");
2890 if (empty($shortunit)) {
2891 $ret .=
' '.$textunitlong;
2893 $ret .=
' '.$textunitshort;
2916 $link =
'<a href="';
2917 if (!preg_match(
'/^http/i', $url)) {
2923 $link .=
' target="'.$target.
'"';
2926 if (!preg_match(
'/^http/i', $url)) {
2931 return '<div class="nospan float" style="margin-right: 10px">'.($withpicto ?
img_picto($langs->trans(
"Url"),
'globe').
' ' :
'').$link.
'</div>';
2946 function dol_print_email($email, $cid = 0, $socid = 0, $addlink = 0, $max = 64, $showinvalid = 1, $withpicto = 0)
2948 global $conf, $user, $langs, $hookmanager;
2952 if (!empty($conf->global->MAIN_OPTIMIZEFORTEXTBROWSER) && $withpicto) {
2956 if (empty($email)) {
2960 if (!empty($addlink)) {
2961 $newemail =
'<a style="text-overflow: ellipsis;" href="';
2962 if (!preg_match(
'/^mailto:/i', $email)) {
2963 $newemail .=
'mailto:';
2965 $newemail .= $email;
2968 $newemail .=
'</a>';
2970 $langs->load(
"errors");
2971 $newemail .=
img_warning($langs->trans(
"ErrorBadEMail", $email));
2974 if (($cid || $socid) && !empty($conf->agenda->enabled) && $user->rights->agenda->myactions->create) {
2977 if (!empty($conf->global->AGENDA_ADDACTIONFOREMAIL)) {
2978 $link =
'<a href="'.DOL_URL_ROOT.
'/comm/action/card.php?action=create&backtopage=1&actioncode='.$type.
'&contactid='.$cid.
'&socid='.$socid.
'">'.
img_object($langs->trans(
"AddAction"),
"calendar").
'</a>';
2981 $newemail =
'<div>'.$newemail.
' '.$link.
'</div>';
2986 $langs->load(
"errors");
2987 $newemail .=
img_warning($langs->trans(
"ErrorBadEMail", $email));
2992 $rep = ($withpicto ?
img_picto($langs->trans(
"EMail").
' : '.$email, (is_numeric($withpicto) ?
'email' : $withpicto)).
' ' :
'').$newemail;
2995 $parameters = array(
'cid' => $cid,
'socid' => $socid,
'addlink' => $addlink,
'picto' => $withpicto);
2997 $reshook = $hookmanager->executeHooks(
'printEmail', $parameters, $email);
3001 $rep .= $hookmanager->resPrint;
3016 $socialnetworks = array();
3018 require_once DOL_DOCUMENT_ROOT.
'/core/lib/memory.lib.php';
3019 $cachekey =
'socialnetworks_' . $conf->entity;
3021 if (!is_null($dataretrieved)) {
3022 $socialnetworks = $dataretrieved;
3024 $sql =
"SELECT rowid, code, label, url, icon, active FROM ".MAIN_DB_PREFIX.
"c_socialnetworks";
3025 $sql .=
" WHERE entity=".$conf->entity;
3026 $resql = $db->query($sql);
3028 while ($obj = $db->fetch_object(
$resql)) {
3029 $socialnetworks[$obj->code] = array(
3030 'rowid' => $obj->rowid,
3031 'label' => $obj->label,
3033 'icon' => $obj->icon,
3034 'active' => $obj->active,
3041 return $socialnetworks;
3056 global $conf, $user, $langs;
3060 if (empty($value)) {
3064 if (!empty($type)) {
3065 $htmllink =
'<div class="divsocialnetwork inline-block valignmiddle">';
3067 $htmllink .=
'<span class="fa paddingright '.($dictsocialnetworks[$type][
'icon'] ? $dictsocialnetworks[$type][
'icon'] :
'fa-link').
'"></span>';
3068 if ($type ==
'skype') {
3070 $htmllink .=
' ';
3071 $htmllink .=
'<a href="skype:';
3073 $htmllink .=
'?call" alt="'.$langs->trans(
"Call").
' '.$value.
'" title="'.
dol_escape_htmltag($langs->trans(
"Call").
' '.$value).
'">';
3074 $htmllink .=
'<img src="'.DOL_URL_ROOT.
'/theme/common/skype_callbutton.png" border="0">';
3075 $htmllink .=
'</a><a href="skype:';
3077 $htmllink .=
'?chat" alt="'.$langs->trans(
"Chat").
' '.$value.
'" title="'.
dol_escape_htmltag($langs->trans(
"Chat").
' '.$value).
'">';
3078 $htmllink .=
'<img class="paddingleft" src="'.DOL_URL_ROOT.
'/theme/common/skype_chatbutton.png" border="0">';
3079 $htmllink .=
'</a>';
3080 if (($cid || $socid) && !empty($conf->agenda->enabled) && $user->rights->agenda->myactions->create) {
3081 $addlink =
'AC_SKYPE';
3083 if (!empty($conf->global->AGENDA_ADDACTIONFORSKYPE)) {
3084 $link =
'<a href="'.DOL_URL_ROOT.
'/comm/action/card.php?action=create&backtopage=1&actioncode='.$addlink.
'&contactid='.$cid.
'&socid='.$socid.
'">'.
img_object($langs->trans(
"AddAction"),
"calendar").
'</a>';
3086 $htmllink .= ($link ?
' '.$link :
'');
3089 if (!empty($dictsocialnetworks[$type][
'url'])) {
3090 $tmpvirginurl = preg_replace(
'/\/?{socialid}/',
'', $dictsocialnetworks[$type][
'url']);
3091 if ($tmpvirginurl) {
3092 $value = preg_replace(
'/^www\.'.preg_quote($tmpvirginurl,
'/').
'\/?/',
'', $value);
3093 $value = preg_replace(
'/^'.preg_quote($tmpvirginurl,
'/').
'\/?/',
'', $value);
3095 $tmpvirginurl3 = preg_replace(
'/^https:\/\//i',
'https://www.', $tmpvirginurl);
3096 if ($tmpvirginurl3) {
3097 $value = preg_replace(
'/^www\.'.preg_quote($tmpvirginurl3,
'/').
'\/?/',
'', $value);
3098 $value = preg_replace(
'/^'.preg_quote($tmpvirginurl3,
'/').
'\/?/',
'', $value);
3101 $tmpvirginurl2 = preg_replace(
'/^https?:\/\//i',
'', $tmpvirginurl);
3102 if ($tmpvirginurl2) {
3103 $value = preg_replace(
'/^www\.'.preg_quote($tmpvirginurl2,
'/').
'\/?/',
'', $value);
3104 $value = preg_replace(
'/^'.preg_quote($tmpvirginurl2,
'/').
'\/?/',
'', $value);
3107 $link = str_replace(
'{socialid}', $value, $dictsocialnetworks[$type][
'url']);
3108 if (preg_match(
'/^https?:\/\//i', $link)) {
3109 $htmllink .=
' <a href="'.dol_sanitizeUrl($link, 0).
'" target="_blank" rel="noopener noreferrer">'.
dol_escape_htmltag($value).
'</a>';
3111 $htmllink .=
' <a href="'.dol_sanitizeUrl($link, 1).
'" target="_blank" rel="noopener noreferrer">'.
dol_escape_htmltag($value).
'</a>';
3117 $htmllink .=
'</div>';
3119 $langs->load(
"errors");
3120 $htmllink .=
img_warning($langs->trans(
"ErrorBadSocialNetworkValue", $value));
3135 function dol_print_profids($profID, $profIDtype, $countrycode =
'', $addcpButton = 1, $separ =
' ')
3139 if (empty($profID) || empty($profIDtype)) {
3142 if (empty($countrycode)) $countrycode = $mysoc->country_code;
3143 $newProfID = $profID;
3144 $id = substr($profIDtype, -1);
3146 if (strtoupper($countrycode) ==
'FR') {
3148 if ($id == 1 &&
dol_strlen($newProfID) == 9) $newProfID = substr($newProfID, 0, 3).$separ.substr($newProfID, 3, 3).$separ.substr($newProfID, 6, 3);
3149 if ($id == 2 &&
dol_strlen($newProfID) == 14) $newProfID = substr($newProfID, 0, 3).$separ.substr($newProfID, 3, 3).$separ.substr($newProfID, 6, 3).$separ.substr($newProfID, 9, 5);
3150 if ($profIDtype ===
'VAT' &&
dol_strlen($newProfID) == 13) $newProfID = substr($newProfID, 0, 4).$separ.substr($newProfID, 4, 3).$separ.substr($newProfID, 7, 3).$separ.substr($newProfID, 10, 3);
3153 else $ret = $newProfID;
3171 function dol_print_phone($phone, $countrycode =
'', $cid = 0, $socid = 0, $addlink =
'', $separ =
" ", $withpicto =
'', $titlealt =
'', $adddivfloat = 0)
3173 global $conf, $user, $langs, $mysoc, $hookmanager;
3176 $phone = preg_replace(
"/[\s.-]/",
"", trim($phone));
3177 if (empty($phone)) {
3180 if (!empty($conf->global->MAIN_PHONE_SEPAR)) {
3181 $separ = $conf->global->MAIN_PHONE_SEPAR;
3183 if (empty($countrycode) && is_object($mysoc)) {
3184 $countrycode = $mysoc->country_code;
3188 if ($conf->dol_optimize_smallscreen) {
3193 if (strtoupper($countrycode) ==
"FR") {
3196 $newphone = substr($newphone, 0, 2).$separ.substr($newphone, 2, 2).$separ.substr($newphone, 4, 2).$separ.substr($newphone, 6, 2).$separ.substr($newphone, 8, 2);
3198 $newphone = substr($newphone, 0, 3).$separ.substr($newphone, 3, 2).$separ.substr($newphone, 5, 2);
3200 $newphone = substr($newphone, 0, 2).$separ.substr($newphone, 2, 3).$separ.substr($newphone, 5, 2).$separ.substr($newphone, 7, 2);
3202 $newphone = substr($newphone, 0, 3).$separ.substr($newphone, 3, 2).$separ.substr($newphone, 5, 2).$separ.substr($newphone, 7, 2).$separ.substr($newphone, 9, 2);
3204 $newphone = substr($newphone, 0, 3).$separ.substr($newphone, 3, 1).$separ.substr($newphone, 4, 2).$separ.substr($newphone, 6, 2).$separ.substr($newphone, 8, 2).$separ.substr($newphone, 10, 2);
3206 $newphone = substr($newphone, 0, 4).$separ.substr($newphone, 4, 2).$separ.substr($newphone, 6, 2).$separ.substr($newphone, 8, 3).$separ.substr($newphone, 11, 2);
3208 } elseif (strtoupper($countrycode) ==
"CA") {
3210 $newphone = ($separ !=
'' ?
'(' :
'').substr($newphone, 0, 3).($separ !=
'' ?
')' :
'').$separ.substr($newphone, 3, 3).($separ !=
'' ?
'-' :
'').substr($newphone, 6, 4);
3212 } elseif (strtoupper($countrycode) ==
"PT") {
3214 $newphone = substr($newphone, 0, 4).$separ.substr($newphone, 4, 3).$separ.substr($newphone, 7, 3).$separ.substr($newphone, 10, 3);
3216 } elseif (strtoupper($countrycode) ==
"SR") {
3218 $newphone = substr($newphone, 0, 4).$separ.substr($newphone, 4, 3).$separ.substr($newphone, 7, 3);
3220 $newphone = substr($newphone, 0, 4).$separ.substr($newphone, 4, 3).$separ.substr($newphone, 7, 4);
3222 } elseif (strtoupper($countrycode) ==
"DE") {
3224 $newphone = substr($newphone, 0, 3).$separ.substr($newphone, 3, 4).$separ.substr($newphone, 7, 4).$separ.substr($newphone, 11, 3);
3226 $newphone = substr($newphone, 0, 3).$separ.substr($newphone, 3, 3).$separ.substr($newphone, 6, 4).$separ.substr($newphone, 10, 3);
3228 } elseif (strtoupper($countrycode) ==
"ES") {
3230 $newphone = substr($newphone, 0, 3).$separ.substr($newphone, 3, 3).$separ.substr($newphone, 6, 3).$separ.substr($newphone, 9, 3);
3232 } elseif (strtoupper($countrycode) ==
"BF") {
3234 $newphone = substr($newphone, 0, 3).$separ.substr($newphone, 3, 1).$separ.substr($newphone, 4, 2).$separ.substr($newphone, 6, 2).$separ.substr($newphone, 8, 2).$separ.substr($newphone, 10, 2);
3236 } elseif (strtoupper($countrycode) ==
"RO") {
3238 $newphone = substr($newphone, 0, 3).$separ.substr($newphone, 3, 2).$separ.substr($newphone, 5, 3).$separ.substr($newphone, 8, 2).$separ.substr($newphone, 10, 2);
3240 } elseif (strtoupper($countrycode) ==
"TR") {
3242 $newphone = substr($newphone, 0, 3).$separ.substr($newphone, 3, 3).$separ.substr($newphone, 6, 3).$separ.substr($newphone, 9, 4);
3244 } elseif (strtoupper($countrycode) ==
"US") {
3246 $newphone = substr($newphone, 0, 2).$separ.substr($newphone, 2, 3).$separ.substr($newphone, 5, 3).$separ.substr($newphone, 8, 4);
3248 } elseif (strtoupper($countrycode) ==
"MX") {
3250 $newphone = substr($newphone, 0, 3).$separ.substr($newphone, 3, 4).$separ.substr($newphone, 7, 3).$separ.substr($newphone, 10, 2);
3252 $newphone = substr($newphone, 0, 3).$separ.substr($newphone, 3, 2).$separ.substr($newphone, 5, 2).$separ.substr($newphone, 7, 2).$separ.substr($newphone, 9, 2);
3254 $newphone = substr($newphone, 0, 3).$separ.substr($newphone, 3, 3).$separ.substr($newphone, 6, 3).$separ.substr($newphone, 9, 4);
3256 } elseif (strtoupper($countrycode) ==
"ML") {
3258 $newphone = substr($newphone, 0, 4).$separ.substr($newphone, 4, 2).$separ.substr($newphone, 6, 2).$separ.substr($newphone, 8, 2).$separ.substr($newphone, 10, 2);
3260 } elseif (strtoupper($countrycode) ==
"TH") {
3262 $newphone = substr($newphone, 0, 3).$separ.substr($newphone, 3, 3).$separ.substr($newphone, 6, 2).$separ.substr($newphone, 8, 3);
3264 $newphone = substr($newphone, 0, 3).$separ.substr($newphone, 3, 1).$separ.substr($newphone, 4, 3).$separ.substr($newphone, 7, 2).$separ.substr($newphone, 9, 3);
3266 } elseif (strtoupper($countrycode) ==
"MU") {
3269 $newphone = substr($newphone, 0, 4).$separ.substr($newphone, 4, 3).$separ.substr($newphone, 7, 2).$separ.substr($newphone, 9, 2);
3271 $newphone = substr($newphone, 0, 4).$separ.substr($newphone, 4, 4).$separ.substr($newphone, 8, 2).$separ.substr($newphone, 10, 2);
3273 } elseif (strtoupper($countrycode) ==
"ZA") {
3275 $newphone = substr($newphone, 0, 3).$separ.substr($newphone, 3, 2).$separ.substr($newphone, 5, 3).$separ.substr($newphone, 8, 2).$separ.substr($newphone, 10, 2);
3277 } elseif (strtoupper($countrycode) ==
"SY") {
3279 $newphone = substr($newphone, 0, 4).$separ.substr($newphone, 4, 2).$separ.substr($newphone, 6, 2).$separ.substr($newphone, 8, 2).$separ.substr($newphone, 10, 2);
3281 $newphone = substr($newphone, 0, 4).$separ.substr($newphone, 4, 2).$separ.substr($newphone, 6, 2).$separ.substr($newphone, 8, 2).$separ.substr($newphone, 10, 3);
3283 } elseif (strtoupper($countrycode) ==
"AE") {
3285 $newphone = substr($newphone, 0, 4).$separ.substr($newphone, 4, 3).$separ.substr($newphone, 7, 3).$separ.substr($newphone, 10, 2);
3287 $newphone = substr($newphone, 0, 4).$separ.substr($newphone, 4, 3).$separ.substr($newphone, 7, 3).$separ.substr($newphone, 10, 3);
3289 $newphone = substr($newphone, 0, 4).$separ.substr($newphone, 4, 3).$separ.substr($newphone, 7, 3).$separ.substr($newphone, 10, 4);
3291 } elseif (strtoupper($countrycode) ==
"DZ") {
3293 $newphone = substr($newphone, 0, 4).$separ.substr($newphone, 4, 3).$separ.substr($newphone, 7, 3).$separ.substr($newphone, 10, 3);
3295 } elseif (strtoupper($countrycode) ==
"BE") {
3297 $newphone = substr($newphone, 0, 3).$separ.substr($newphone, 3, 3).$separ.substr($newphone, 6, 2).$separ.substr($newphone, 8, 3);
3299 $newphone = substr($newphone, 0, 3).$separ.substr($newphone, 3, 3).$separ.substr($newphone, 6, 3).$separ.substr($newphone, 9, 3);
3301 } elseif (strtoupper($countrycode) ==
"PF") {
3303 $newphone = substr($newphone, 0, 4).$separ.substr($newphone, 4, 2).$separ.substr($newphone, 6, 2).$separ.substr($newphone, 8, 2).$separ.substr($newphone, 10, 2);
3305 } elseif (strtoupper($countrycode) ==
"CO") {
3307 $newphone = substr($newphone, 0, 3).$separ.substr($newphone, 3, 3).$separ.substr($newphone, 6, 3).$separ.substr($newphone, 9, 2).$separ.substr($newphone, 11, 2);
3309 } elseif (strtoupper($countrycode) ==
"JO") {
3311 $newphone = substr($newphone, 0, 4).$separ.substr($newphone, 4, 1).$separ.substr($newphone, 5, 3).$separ.substr($newphone, 7, 2).$separ.substr($newphone, 9, 2);
3313 } elseif (strtoupper($countrycode) ==
"JM") {
3315 $newphone = substr($newphone, 0, 5).$separ.substr($newphone, 5, 3).$separ.substr($newphone, 8, 4);
3317 } elseif (strtoupper($countrycode) ==
"MG") {
3319 $newphone = substr($newphone, 0, 4).$separ.substr($newphone, 4, 2).$separ.substr($newphone, 6, 2).$separ.substr($newphone, 8, 3).$separ.substr($newphone, 11, 2);
3321 } elseif (strtoupper($countrycode) ==
"GB") {
3323 $newphone = substr($newphone, 0, 3).$separ.substr($newphone, 3, 4).$separ.substr($newphone, 7, 3).$separ.substr($newphone, 10, 3);
3325 } elseif (strtoupper($countrycode) ==
"CH") {
3327 $newphone = substr($newphone, 0, 3).$separ.substr($newphone, 3, 2).$separ.substr($newphone, 5, 3).$separ.substr($newphone, 8, 2).$separ.substr($newphone, 10, 2);
3329 $newphone = $newphone = substr($newphone, 0, 3).$separ.substr($newphone, 3, 2).$separ.substr($newphone, 5, 3).$separ.substr($newphone, 8, 3).$separ.substr($newphone, 11, 4);
3331 } elseif (strtoupper($countrycode) ==
"TN") {
3333 $newphone = substr($newphone, 0, 4).$separ.substr($newphone, 4, 2).$separ.substr($newphone, 6, 3).$separ.substr($newphone, 9, 3);
3335 } elseif (strtoupper($countrycode) ==
"GF") {
3337 $newphone = substr($newphone, 0, 4).$separ.substr($newphone, 4, 3).$separ.substr($newphone, 7, 2).$separ.substr($newphone, 9, 2).$separ.substr($newphone, 11, 2);
3339 } elseif (strtoupper($countrycode) ==
"GP") {
3341 $newphone = substr($newphone, 0, 4).$separ.substr($newphone, 4, 3).$separ.substr($newphone, 7, 2).$separ.substr($newphone, 9, 2).$separ.substr($newphone, 11, 2);
3343 } elseif (strtoupper($countrycode) ==
"MQ") {
3345 $newphone = substr($newphone, 0, 4).$separ.substr($newphone, 4, 3).$separ.substr($newphone, 7, 2).$separ.substr($newphone, 9, 2).$separ.substr($newphone, 11, 2);
3347 } elseif (strtoupper($countrycode) ==
"IT") {
3349 $newphone = substr($newphone, 0, 3).$separ.substr($newphone, 3, 3).$separ.substr($newphone, 6, 3).$separ.substr($newphone, 9, 3);
3351 $newphone = substr($newphone, 0, 3).$separ.substr($newphone, 3, 3).$separ.substr($newphone, 6, 3).$separ.substr($newphone, 9, 2).$separ.substr($newphone, 11, 2);
3353 } elseif (strtoupper($countrycode) ==
"AU") {
3357 $newphone = substr($newphone, 0, 3).$separ.substr($newphone, 3, 1).$separ.substr($newphone, 4, 4).$separ.substr($newphone, 8, 4);
3360 if (!empty($addlink)) {
3361 if ($conf->browser->layout ==
'phone' || (!empty($conf->clicktodial->enabled) && !empty($conf->global->CLICKTODIAL_USE_TEL_LINK_ON_PHONE_NUMBERS))) {
3362 $newphoneform = $newphone;
3363 $newphone =
'<a href="tel:'.$phone.
'"';
3364 $newphone .=
'>'.$newphoneform.
'</a>';
3365 } elseif (!empty($conf->clicktodial->enabled) && $addlink ==
'AC_TEL') {
3366 if (empty($user->clicktodial_loaded)) {
3367 $user->fetch_clicktodial();
3371 $urlmask =
'ErrorClickToDialModuleNotConfigured';
3372 if (!empty($conf->global->CLICKTODIAL_URL)) {
3373 $urlmask = $conf->global->CLICKTODIAL_URL;
3375 if (!empty($user->clicktodial_url)) {
3376 $urlmask = $user->clicktodial_url;
3379 $clicktodial_poste = (!empty($user->clicktodial_poste) ?urlencode($user->clicktodial_poste) :
'');
3380 $clicktodial_login = (!empty($user->clicktodial_login) ?urlencode($user->clicktodial_login) :
'');
3381 $clicktodial_password = (!empty($user->clicktodial_password) ?urlencode($user->clicktodial_password) :
'');
3383 $url = sprintf($urlmask, urlencode($phone), $clicktodial_poste, $clicktodial_login, $clicktodial_password);
3385 $substitarray = array(
'__PHONEFROM__'=>$clicktodial_poste,
3386 '__PHONETO__'=>urlencode($phone),
3387 '__LOGIN__'=>$clicktodial_login,
3388 '__PASS__'=>$clicktodial_password);
3390 $newphonesav = $newphone;
3391 if (empty($conf->global->CLICKTODIAL_DO_NOT_USE_AJAX_CALL)) {
3393 $newphone =
'<a href="'.$url.
'" class="cssforclicktodial"';
3394 $newphone .=
'>'.$newphonesav.
'</a>';
3397 $newphone =
'<a href="'.$url.
'"';
3398 if (!empty($conf->global->CLICKTODIAL_FORCENEWTARGET)) {
3399 $newphone .=
' target="_blank" rel="noopener noreferrer"';
3401 $newphone .=
'>'.$newphonesav.
'</a>';
3406 if (
isModEnabled(
'agenda') && $user->rights->agenda->myactions->create) {
3409 if ($addlink ==
'AC_FAX') {
3412 if (!empty($conf->global->AGENDA_ADDACTIONFORPHONE)) {
3413 $link =
'<a href="'.DOL_URL_ROOT.
'/comm/action/card.php?action=create&backtopage='. urlencode($_SERVER[
'REQUEST_URI']) .
'&actioncode='.$type.($cid ?
'&contactid='.$cid :
'').($socid ?
'&socid='.$socid :
'').
'">'.
img_object($langs->trans(
"AddAction"),
"calendar").
'</a>';
3416 $newphone =
'<div>'.$newphone.
' '.$link.
'</div>';
3421 if (empty($titlealt)) {
3422 $titlealt = ($withpicto ==
'fax' ? $langs->trans(
"Fax") : $langs->trans(
"Phone"));
3427 $parameters = array(
'countrycode' => $countrycode,
'cid' => $cid,
'socid' => $socid,
'titlealt' => $titlealt,
'picto' => $withpicto);
3428 $reshook = $hookmanager->executeHooks(
'printPhone', $parameters, $phone);
3429 $rep .= $hookmanager->resPrint;
3431 if (empty($reshook)) {
3434 if ($withpicto ==
'fax') {
3435 $picto =
'phoning_fax';
3436 } elseif ($withpicto ==
'phone') {
3438 } elseif ($withpicto ==
'mobile') {
3439 $picto =
'phoning_mobile';
3445 $rep .=
'<div class="nospan float" style="margin-right: 10px">';
3447 $rep .=
'<span style="margin-right: 10px;">';
3449 $rep .= ($withpicto ?
img_picto($titlealt,
'object_'.$picto.
'.png').
' ' :
'').$newphone;
3469 global $conf, $langs;
3480 if (file_exists(DOL_DOCUMENT_ROOT.
'/theme/common/flags/'.$countrycode.
'.png')) {
3481 $ret .=
' '.img_picto($countrycode.
' '.$langs->trans(
"AccordingToGeoIPDatabase"), DOL_URL_ROOT.
'/theme/common/flags/'.$countrycode.
'.png',
'', 1);
3483 $ret .=
' ('.$countrycode.
')';
3503 if (empty($_SERVER[
'HTTP_X_FORWARDED_FOR']) || preg_match(
'/[^0-9\.\:,\[\]]/', $_SERVER[
'HTTP_X_FORWARDED_FOR'])) {
3504 if (empty($_SERVER[
'HTTP_CLIENT_IP']) || preg_match(
'/[^0-9\.\:,\[\]]/', $_SERVER[
'HTTP_CLIENT_IP'])) {
3505 if (empty($_SERVER[
"HTTP_CF_CONNECTING_IP"])) {
3506 $ip = (empty($_SERVER[
'REMOTE_ADDR']) ?
'' : $_SERVER[
'REMOTE_ADDR']);
3508 $ip = $_SERVER[
"HTTP_CF_CONNECTING_IP"];
3511 $ip = $_SERVER[
'HTTP_CLIENT_IP'];
3514 $ip = $_SERVER[
'HTTP_X_FORWARDED_FOR'];
3530 if (isset($_SERVER[
'HTTPS']) && $_SERVER[
'HTTPS'] ==
'on') {
3532 } elseif (!empty($_SERVER[
'HTTP_X_FORWARDED_PROTO']) && $_SERVER[
'HTTP_X_FORWARDED_PROTO'] ==
'https' || !empty($_SERVER[
'HTTP_X_FORWARDED_SSL']) && $_SERVER[
'HTTP_X_FORWARDED_SSL'] ==
'on') {
3550 if (!empty($conf->geoipmaxmind->enabled)) {
3554 include_once DOL_DOCUMENT_ROOT.
'/core/class/dolgeoip.class.php';
3555 $geoip =
new DolGeoIP(
'country', $datafile);
3557 $countrycode = $geoip->getCountryCodeFromIP($ip);
3560 return $countrycode;
3572 global $conf, $langs, $user;
3576 if (!empty($conf->geoipmaxmind->enabled)) {
3581 include_once DOL_DOCUMENT_ROOT.
'/core/class/dolgeoip.class.php';
3582 $geoip =
new DolGeoIP(
'country', $datafile);
3583 $countrycode = $geoip->getCountryCodeFromIP($ip);
3584 $ret = $countrycode;
3603 global $conf, $user, $langs, $hookmanager;
3609 $parameters = array(
'element' => $element,
'id' => $id);
3610 $reshook = $hookmanager->executeHooks(
'printAddress', $parameters, $address);
3611 $out .= $hookmanager->resPrint;
3613 if (empty($reshook)) {
3614 if (empty($charfornl)) {
3615 $out .= nl2br($address);
3617 $out .= preg_replace(
'/[\r\n]+/', $charfornl, $address);
3621 $showgmap = $showomap = 0;
3622 if (($element ==
'thirdparty' || $element ==
'societe') && !empty($conf->google->enabled) && !empty($conf->global->GOOGLE_ENABLE_GMAPS)) {
3625 if ($element ==
'contact' && !empty($conf->google->enabled) && !empty($conf->global->GOOGLE_ENABLE_GMAPS_CONTACTS)) {
3628 if ($element ==
'member' && !empty($conf->google->enabled) && !empty($conf->global->GOOGLE_ENABLE_GMAPS_MEMBERS)) {
3631 if (($element ==
'thirdparty' || $element ==
'societe') && !empty($conf->openstreetmap->enabled) && !empty($conf->global->OPENSTREETMAP_ENABLE_MAPS)) {
3634 if ($element ==
'contact' && !empty($conf->openstreetmap->enabled) && !empty($conf->global->OPENSTREETMAP_ENABLE_MAPS_CONTACTS)) {
3637 if ($element ==
'member' && !empty($conf->openstreetmap->enabled) && !empty($conf->global->OPENSTREETMAP_ENABLE_MAPS_MEMBERS)) {
3641 $url =
dol_buildpath(
'/google/gmaps.php?mode='.$element.
'&id='.$id, 1);
3642 $out .=
' <a href="'.$url.
'" target="_gmaps"><img id="'.$htmlid.
'" class="valigntextbottom" src="'.DOL_URL_ROOT.
'/theme/common/gmap.png"></a>';
3645 $url =
dol_buildpath(
'/openstreetmap/maps.php?mode='.$element.
'&id='.$id, 1);
3646 $out .=
' <a href="'.$url.
'" target="_gmaps"><img id="'.$htmlid.
'_openstreetmap" class="valigntextbottom" src="'.DOL_URL_ROOT.
'/theme/common/gmap.png"></a>';
3667 function isValidEmail($address, $acceptsupervisorkey = 0, $acceptuserkey = 0)
3669 if ($acceptsupervisorkey && $address ==
'__SUPERVISOREMAIL__') {
3672 if ($acceptuserkey && $address ==
'__USER_EMAIL__') {
3675 if (filter_var($address, FILTER_VALIDATE_EMAIL)) {
3692 if (function_exists(
'idn_to_ascii') && function_exists(
'checkdnsrr')) {
3693 if (!checkdnsrr(idn_to_ascii($domain),
'MX')) {
3696 if (function_exists(
'getmxrr')) {
3699 getmxrr(idn_to_ascii($domain), $mxhosts, $weight);
3700 if (count($mxhosts) > 1) {
3703 if (count($mxhosts) == 1 && !empty($mxhosts[0])) {
3735 if (function_exists(
'mb_strlen')) {
3736 return mb_strlen($string, $stringencoding);
3738 return strlen($string);
3752 function dol_substr($string, $start, $length, $stringencoding =
'', $trunconbytes = 0)
3756 if (empty($stringencoding)) {
3757 $stringencoding = $langs->charset_output;
3761 if (empty($trunconbytes)) {
3762 if (function_exists(
'mb_substr')) {
3763 $ret = mb_substr($string, $start, $length, $stringencoding);
3765 $ret = substr($string, $start, $length);
3768 if (function_exists(
'mb_strcut')) {
3769 $ret = mb_strcut($string, $start, $length, $stringencoding);
3771 $ret = substr($string, $start, $length);
3791 function dol_trunc($string, $size = 40, $trunc =
'right', $stringencoding =
'UTF-8', $nodot = 0, $display = 0)
3795 if (empty($size) || !empty($conf->global->MAIN_DISABLE_TRUNC)) {
3799 if (empty($stringencoding)) {
3800 $stringencoding =
'UTF-8';
3803 if ($conf->dol_optimize_smallscreen == 1 && $display == 1) {
3804 $size = round($size / 3);
3808 if ($trunc ==
'right') {
3810 if (
dol_strlen($newstring, $stringencoding) > ($size + ($nodot ? 0 : 1))) {
3812 return dol_substr($newstring, 0, $size, $stringencoding).($nodot ?
'' :
'…');
3817 } elseif ($trunc ==
'middle') {
3819 if (
dol_strlen($newstring, $stringencoding) > 2 &&
dol_strlen($newstring, $stringencoding) > ($size + 1)) {
3820 $size1 = round($size / 2);
3821 $size2 = round($size / 2);
3822 return dol_substr($newstring, 0, $size1, $stringencoding).
'…'.
dol_substr($newstring,
dol_strlen($newstring, $stringencoding) - $size2, $size2, $stringencoding);
3826 } elseif ($trunc ==
'left') {
3828 if (
dol_strlen($newstring, $stringencoding) > ($size + ($nodot ? 0 : 1))) {
3830 return '…'.dol_substr($newstring,
dol_strlen($newstring, $stringencoding) - $size, $size, $stringencoding);
3834 } elseif ($trunc ==
'wrap') {
3836 if (
dol_strlen($newstring, $stringencoding) > ($size + 1)) {
3842 return 'BadParam3CallingDolTrunc';
3866 function img_picto($titlealt, $picto, $moreatt =
'', $pictoisfullpath =
false, $srconly = 0, $notitle = 0, $alt =
'', $morecss =
'', $marginleftonlyshort = 2)
3868 global $conf, $langs;
3871 $url = DOL_URL_ROOT;
3872 $theme = isset($conf->theme) ? $conf->theme :
null;
3873 $path =
'theme/'.$theme;
3875 if ($pictoisfullpath) {
3877 if (!preg_match(
'/(\.png|\.gif|\.svg)$/i', $picto)) {
3880 $fullpathpicto = $picto;
3882 if (preg_match(
'/class="([^"]+)"/', $moreatt, $reg)) {
3883 $morecss .= ($morecss ?
' ' :
'').$reg[1];
3884 $moreatt = str_replace(
'class="'.$reg[1].
'"',
'', $moreatt);
3887 $pictowithouttext = preg_replace(
'/(\.png|\.gif|\.svg)$/',
'', $picto);
3888 $pictowithouttext = str_replace(
'object_',
'', $pictowithouttext);
3890 if (strpos($pictowithouttext,
'fontawesome_') !==
false || preg_match(
'/^fa-/', $pictowithouttext)) {
3892 $pictowithouttext = str_replace(
'fa-',
'', $pictowithouttext);
3893 $pictowithouttextarray = explode(
'_', $pictowithouttext);
3894 $marginleftonlyshort = 0;
3896 if (!empty($pictowithouttextarray[1])) {
3897 $fakey =
'fa-'.$pictowithouttextarray[1];
3898 $fa = empty($pictowithouttextarray[2]) ?
'fa' : $pictowithouttextarray[2];
3899 $facolor = empty($pictowithouttextarray[3]) ?
'' : $pictowithouttextarray[3];
3900 $fasize = empty($pictowithouttextarray[4]) ?
'' : $pictowithouttextarray[4];
3902 $fakey =
'fa-'.$pictowithouttext;
3912 if (preg_match(
'/class="([^"]+)"/', $moreatt, $reg)) {
3913 $morecss .= ($morecss ?
' ' :
'').$reg[1];
3914 $moreatt = str_replace(
'class="'.$reg[1].
'"',
'', $moreatt);
3916 if (preg_match(
'/style="([^"]+)"/', $moreatt, $reg)) {
3917 $morestyle = $reg[1];
3918 $moreatt = str_replace(
'style="'.$reg[1].
'"',
'', $moreatt);
3920 $moreatt = trim($moreatt);
3922 $enabledisablehtml =
'<span class="'.$fa.
' '.$fakey.($marginleftonlyshort ? ($marginleftonlyshort == 1 ?
' marginleftonlyshort' :
' marginleftonly') :
'');
3923 $enabledisablehtml .= ($morecss ?
' '.$morecss :
'').
'" style="'.($fasize ? (
'font-size: '.$fasize.
';') :
'').($facolor ? (
' color: '.$facolor.
';') :
'').($morestyle ?
' '.$morestyle :
'').
'"'.(($notitle || empty($titlealt)) ?
'' :
' title="'.
dol_escape_htmltag($titlealt).
'"').($moreatt ?
' '.$moreatt :
'').
'>';
3927 $enabledisablehtml .=
'</span>';
3929 return $enabledisablehtml;
3932 if (empty($srconly) && in_array($pictowithouttext, array(
3933 '1downarrow',
'1uparrow',
'1leftarrow',
'1rightarrow',
'1uparrow_selected',
'1downarrow_selected',
'1leftarrow_selected',
'1rightarrow_selected',
3934 'accountancy',
'accounting_account',
'account',
'accountline',
'action',
'add',
'address',
'angle-double-down',
'angle-double-up',
'asset',
3935 'bank_account',
'barcode',
'bank',
'bell',
'bill',
'billa',
'billr',
'billd',
'bookmark',
'bom',
'briefcase-medical',
'bug',
'building',
3936 'card',
'calendarlist',
'calendar',
'calendarmonth',
'calendarweek',
'calendarday',
'calendarperuser',
'calendarpertype',
3937 'cash-register',
'category',
'chart',
'check',
'clock',
'close_title',
'cog',
'collab',
'company',
'contact',
'country',
'contract',
'conversation',
'cron',
'cubes',
3938 'currency',
'multicurrency',
3939 'delete',
'dolly',
'dollyrevert',
'donation',
'download',
'dynamicprice',
3940 'edit',
'ellipsis-h',
'email',
'entity',
'envelope',
'eraser',
'establishment',
'expensereport',
'external-link-alt',
'external-link-square-alt',
3941 'filter',
'file-code',
'file-export',
'file-import',
'file-upload',
'autofill',
'folder',
'folder-open',
'folder-plus',
3942 'generate',
'globe',
'globe-americas',
'graph',
'grip',
'grip_title',
'group',
3944 'images',
'incoterm',
'info',
'intervention',
'inventory',
'intracommreport',
'knowledgemanagement',
3945 'label',
'language',
'line',
'link',
'list',
'list-alt',
'listlight',
'loan',
'lot',
'long-arrow-alt-right',
3946 'margin',
'map-marker-alt',
'member',
'meeting',
'money-bill-alt',
'movement',
'mrp',
'note',
'next',
3947 'off',
'on',
'order',
3948 'paiment',
'paragraph',
'play',
'pdf',
'phone',
'phoning',
'phoning_mobile',
'phoning_fax',
'playdisabled',
'previous',
'poll',
'pos',
'printer',
'product',
'propal',
'puce',
3949 'stock',
'resize',
'service',
'stats',
'trip',
3950 'security',
'setup',
'share-alt',
'sign-out',
'split',
'stripe',
'stripe-s',
'switch_off',
'switch_on',
'switch_on_red',
'tools',
'unlink',
'uparrow',
'user',
'user-tie',
'vcard',
'wrench',
3951 'github',
'google',
'jabber',
'skype',
'twitter',
'facebook',
'linkedin',
'instagram',
'snapchat',
'youtube',
'google-plus-g',
'whatsapp',
3952 'chevron-left',
'chevron-right',
'chevron-down',
'chevron-top',
'commercial',
'companies',
3953 'generic',
'home',
'hrm',
'members',
'products',
'invoicing',
3954 'partnership',
'payment',
'payment_vat',
'pencil-ruler',
'preview',
'project',
'projectpub',
'projecttask',
'question',
'refresh',
'region',
3955 'salary',
'shipment',
'state',
'supplier_invoice',
'supplier_invoicea',
'supplier_invoicer',
'supplier_invoiced',
3956 'technic',
'ticket',
3958 'recent',
'reception',
'recruitmentcandidature',
'recruitmentjobposition',
'resource',
'recurring',
3959 'shapes',
'square',
'stop-circle',
'supplier',
'supplier_proposal',
'supplier_order',
'supplier_invoice',
3960 'timespent',
'title_setup',
'title_accountancy',
'title_bank',
'title_hrm',
'title_agenda',
3961 'uncheck',
'user-cog',
'user-injured',
'user-md',
'vat',
'website',
'workstation',
'webhook',
'world',
'private',
3962 'conferenceorbooth',
'eventorganization',
3963 'stamp',
'signature'
3965 $fakey = $pictowithouttext;
3969 if (in_array($pictowithouttext, array(
'card',
'bell',
'clock',
'establishment',
'generic',
'minus-square',
'object_generic',
'pdf',
'plus-square',
'timespent',
'note',
'off',
'on',
'object_bookmark',
'bookmark',
'vcard'))) {
3972 if (in_array($pictowithouttext, array(
'black-tie',
'github',
'google',
'skype',
'twitter',
'facebook',
'linkedin',
'instagram',
'snapchat',
'stripe',
'stripe-s',
'youtube',
'google-plus-g',
'whatsapp'))) {
3976 $arrayconvpictotofa = array(
3977 'account'=>
'university',
'accounting_account'=>
'clipboard-list',
'accountline'=>
'receipt',
'accountancy'=>
'search-dollar',
'action'=>
'calendar-alt',
'add'=>
'plus-circle',
'address'=>
'address-book',
'asset'=>
'money-check-alt',
'autofill'=>
'fill',
3978 'bank_account'=>
'university',
3979 'bill'=>
'file-invoice-dollar',
'billa'=>
'file-excel',
'billr'=>
'file-invoice-dollar',
'billd'=>
'file-medical',
3980 'supplier_invoice'=>
'file-invoice-dollar',
'supplier_invoicea'=>
'file-excel',
'supplier_invoicer'=>
'file-invoice-dollar',
'supplier_invoiced'=>
'file-medical',
3982 'card'=>
'address-card',
'chart'=>
'chart-line',
'company'=>
'building',
'contact'=>
'address-book',
'contract'=>
'suitcase',
'collab'=>
'people-arrows',
'conversation'=>
'comments',
'country'=>
'globe-americas',
'cron'=>
'business-time',
3983 'donation'=>
'file-alt',
'dynamicprice'=>
'hand-holding-usd',
3984 'setup'=>
'cog',
'companies'=>
'building',
'products'=>
'cube',
'commercial'=>
'suitcase',
'invoicing'=>
'coins',
3985 'accounting'=>
'search-dollar',
'category'=>
'tag',
'dollyrevert'=>
'dolly',
3986 'generate'=>
'plus-square',
'hrm'=>
'user-tie',
'incoterm'=>
'truck-loading',
3987 'margin'=>
'calculator',
'members'=>
'user-friends',
'ticket'=>
'ticket-alt',
'globe'=>
'external-link-alt',
'lot'=>
'barcode',
3988 'email'=>
'at',
'establishment'=>
'building',
'edit'=>
'pencil-alt',
'entity'=>
'globe',
3989 'graph'=>
'chart-line',
'grip_title'=>
'arrows-alt',
'grip'=>
'arrows-alt',
'help'=>
'question-circle',
3990 'generic'=>
'file',
'holiday'=>
'umbrella-beach',
3991 'info'=>
'info-circle',
'inventory'=>
'boxes',
'intracommreport'=>
'globe-europe',
'knowledgemanagement'=>
'ticket-alt',
'label'=>
'layer-group',
'line'=>
'bars',
'loan'=>
'money-bill-alt',
3992 'member'=>
'user-alt',
'meeting'=>
'chalkboard-teacher',
'mrp'=>
'cubes',
'next'=>
'arrow-alt-circle-right',
3993 'trip'=>
'wallet',
'expensereport'=>
'wallet',
'group'=>
'users',
'movement'=>
'people-carry',
3994 'sign-out'=>
'sign-out-alt',
3995 'switch_off'=>
'toggle-off',
'switch_on'=>
'toggle-on',
'switch_on_red'=>
'toggle-on',
'check'=>
'check',
'bookmark'=>
'star',
3996 'bank'=>
'university',
'close_title'=>
'times',
'delete'=>
'trash',
'filter'=>
'filter',
3997 'list-alt'=>
'list-alt',
'calendarlist'=>
'bars',
'calendar'=>
'calendar-alt',
'calendarmonth'=>
'calendar-alt',
'calendarweek'=>
'calendar-week',
'calendarday'=>
'calendar-day',
'calendarperuser'=>
'table',
3998 'intervention'=>
'ambulance',
'invoice'=>
'file-invoice-dollar',
'currency'=>
'dollar-sign',
'multicurrency'=>
'dollar-sign',
'order'=>
'file-invoice',
3999 'error'=>
'exclamation-triangle',
'warning'=>
'exclamation-triangle',
4001 'playdisabled'=>
'play',
'pdf'=>
'file-pdf',
'poll'=>
'check-double',
'pos'=>
'cash-register',
'preview'=>
'binoculars',
'project'=>
'project-diagram',
'projectpub'=>
'project-diagram',
'projecttask'=>
'tasks',
'propal'=>
'file-signature',
4002 'partnership'=>
'handshake',
'payment'=>
'money-check-alt',
'payment_vat'=>
'money-check-alt',
'phoning'=>
'phone',
'phoning_mobile'=>
'mobile-alt',
'phoning_fax'=>
'fax',
'previous'=>
'arrow-alt-circle-left',
'printer'=>
'print',
'product'=>
'cube',
'puce'=>
'angle-right',
4003 'recent' =>
'question',
'reception'=>
'dolly',
'recruitmentjobposition'=>
'id-card-alt',
'recruitmentcandidature'=>
'id-badge',
4004 'resize'=>
'crop',
'supplier_order'=>
'dol-order_supplier',
'supplier_proposal'=>
'file-signature',
4005 'refresh'=>
'redo',
'region'=>
'map-marked',
'resource'=>
'laptop-house',
'recurring'=>
'history',
4006 'service'=>
'concierge-bell',
4007 'state'=>
'map-marked-alt',
'security'=>
'key',
'salary'=>
'wallet',
'shipment'=>
'dolly',
'stock'=>
'box-open',
'stats' =>
'chart-bar',
'split'=>
'code-branch',
'stripe'=>
'stripe-s',
4008 'supplier'=>
'building',
'technic'=>
'cogs',
4009 'timespent'=>
'clock',
'title_setup'=>
'tools',
'title_accountancy'=>
'money-check-alt',
'title_bank'=>
'university',
'title_hrm'=>
'umbrella-beach',
4010 'title_agenda'=>
'calendar-alt',
4011 'uncheck'=>
'times',
'uparrow'=>
'share',
'vat'=>
'money-check-alt',
'vcard'=>
'address-card',
4012 'jabber'=>
'comment-o',
4013 'website'=>
'globe-americas',
'workstation'=>
'pallet',
'webhook'=>
'bullseye',
'world'=>
'globe',
'private'=>
'user-lock',
4014 'conferenceorbooth'=>
'chalkboard-teacher',
'eventorganization'=>
'project-diagram'
4016 if ($pictowithouttext ==
'off') {
4017 $fakey =
'fa-square';
4019 } elseif ($pictowithouttext ==
'on') {
4020 $fakey =
'fa-check-square';
4022 } elseif ($pictowithouttext ==
'listlight') {
4023 $fakey =
'fa-download';
4024 $marginleftonlyshort = 1;
4025 } elseif ($pictowithouttext ==
'printer') {
4026 $fakey =
'fa-print';
4028 } elseif ($pictowithouttext ==
'note') {
4029 $fakey =
'fa-sticky-note';
4030 $marginleftonlyshort = 1;
4031 } elseif (in_array($pictowithouttext, array(
'1uparrow',
'1downarrow',
'1leftarrow',
'1rightarrow',
'1uparrow_selected',
'1downarrow_selected',
'1leftarrow_selected',
'1rightarrow_selected'))) {
4032 $convertarray = array(
'1uparrow'=>
'caret-up',
'1downarrow'=>
'caret-down',
'1leftarrow'=>
'caret-left',
'1rightarrow'=>
'caret-right',
'1uparrow_selected'=>
'caret-up',
'1downarrow_selected'=>
'caret-down',
'1leftarrow_selected'=>
'caret-left',
'1rightarrow_selected'=>
'caret-right');
4033 $fakey =
'fa-'.$convertarray[$pictowithouttext];
4034 if (preg_match(
'/selected/', $pictowithouttext)) {
4037 $marginleftonlyshort = 1;
4038 } elseif (!empty($arrayconvpictotofa[$pictowithouttext])) {
4039 $fakey =
'fa-'.$arrayconvpictotofa[$pictowithouttext];
4041 $fakey =
'fa-'.$pictowithouttext;
4044 if (in_array($pictowithouttext, array(
'dollyrevert',
'member',
'members',
'contract',
'group',
'resource',
'shipment'))) {
4045 $morecss .=
' em092';
4047 if (in_array($pictowithouttext, array(
'conferenceorbooth',
'collab',
'eventorganization',
'holiday',
'info',
'project',
'workstation'))) {
4048 $morecss .=
' em088';
4050 if (in_array($pictowithouttext, array(
'asset',
'intervention',
'payment',
'loan',
'partnership',
'stock',
'technic'))) {
4051 $morecss .=
' em080';
4055 $arrayconvpictotomarginleftonly = array(
4056 'bank',
'check',
'delete',
'generic',
'grip',
'grip_title',
'jabber',
4057 'grip_title',
'grip',
'listlight',
'note',
'on',
'off',
'playdisabled',
'printer',
'resize',
'sign-out',
'stats',
'switch_on',
'switch_on_red',
'switch_off',
4058 'uparrow',
'1uparrow',
'1downarrow',
'1leftarrow',
'1rightarrow',
'1uparrow_selected',
'1downarrow_selected',
'1leftarrow_selected',
'1rightarrow_selected'
4060 if (!isset($arrayconvpictotomarginleftonly[$pictowithouttext])) {
4061 $marginleftonlyshort = 0;
4065 $arrayconvpictotomorcess = array(
4066 'action'=>
'infobox-action',
'account'=>
'infobox-bank_account',
'accounting_account'=>
'infobox-bank_account',
'accountline'=>
'infobox-bank_account',
'accountancy'=>
'infobox-bank_account',
'asset'=>
'infobox-bank_account',
4067 'bank_account'=>
'infobox-bank_account',
4068 'bill'=>
'infobox-commande',
'billa'=>
'infobox-commande',
'billr'=>
'infobox-commande',
'billd'=>
'infobox-commande',
4069 'margin'=>
'infobox-bank_account',
'conferenceorbooth'=>
'infobox-project',
4070 'cash-register'=>
'infobox-bank_account',
'contract'=>
'infobox-contrat',
'check'=>
'font-status4',
'collab'=>
'infobox-action',
'conversation'=>
'infobox-contrat',
4071 'donation'=>
'infobox-commande',
'dolly'=>
'infobox-commande',
'dollyrevert'=>
'flip infobox-order_supplier',
4072 'ecm'=>
'infobox-action',
'eventorganization'=>
'infobox-project',
4073 'hrm'=>
'infobox-adherent',
'group'=>
'infobox-adherent',
'intervention'=>
'infobox-contrat',
4074 'incoterm'=>
'infobox-supplier_proposal',
4075 'currency'=>
'infobox-bank_account',
'multicurrency'=>
'infobox-bank_account',
4076 'members'=>
'infobox-adherent',
'member'=>
'infobox-adherent',
'money-bill-alt'=>
'infobox-bank_account',
4077 'order'=>
'infobox-commande',
4078 'user'=>
'infobox-adherent',
'users'=>
'infobox-adherent',
4079 'error'=>
'pictoerror',
'warning'=>
'pictowarning',
'switch_on'=>
'font-status4',
'switch_on_red'=>
'font-status8',
4080 'holiday'=>
'infobox-holiday',
'info'=>
'opacityhigh',
'invoice'=>
'infobox-commande',
4081 'knowledgemanagement'=>
'infobox-contrat rotate90',
'loan'=>
'infobox-bank_account',
4082 'payment'=>
'infobox-bank_account',
'payment_vat'=>
'infobox-bank_account',
'poll'=>
'infobox-adherent',
'pos'=>
'infobox-bank_account',
'project'=>
'infobox-project',
'projecttask'=>
'infobox-project',
4083 'propal'=>
'infobox-propal',
'private'=>
'infobox-project',
4084 'reception'=>
'flip',
'recruitmentjobposition'=>
'infobox-adherent',
'recruitmentcandidature'=>
'infobox-adherent',
4085 'resource'=>
'infobox-action',
4086 'salary'=>
'infobox-bank_account',
'shipment'=>
'infobox-commande',
'supplier_invoice'=>
'infobox-order_supplier',
'supplier_invoicea'=>
'infobox-order_supplier',
'supplier_invoiced'=>
'infobox-order_supplier',
4087 'supplier'=>
'infobox-order_supplier',
'supplier_order'=>
'infobox-order_supplier',
'supplier_proposal'=>
'infobox-supplier_proposal',
4088 'ticket'=>
'infobox-contrat',
'title_accountancy'=>
'infobox-bank_account',
'title_hrm'=>
'infobox-holiday',
'expensereport'=>
'infobox-expensereport',
'trip'=>
'infobox-expensereport',
'title_agenda'=>
'infobox-action',
4089 'vat'=>
'infobox-bank_account',
4091 'list-alt'=>
'imgforviewmode',
'calendar'=>
'imgforviewmode',
'calendarweek'=>
'imgforviewmode',
'calendarmonth'=>
'imgforviewmode',
'calendarday'=>
'imgforviewmode',
'calendarperuser'=>
'imgforviewmode'
4093 if (!empty($arrayconvpictotomorcess[$pictowithouttext])) {
4094 $morecss .= ($morecss ?
' ' :
'').$arrayconvpictotomorcess[$pictowithouttext];
4098 $arrayconvpictotocolor = array(
4099 'address'=>
'#6c6aa8',
'building'=>
'#6c6aa8',
'bom'=>
'#a69944',
4100 'cog'=>
'#999',
'companies'=>
'#6c6aa8',
'company'=>
'#6c6aa8',
'contact'=>
'#6c6aa8',
'cron'=>
'#555',
4101 'dynamicprice'=>
'#a69944',
4102 'edit'=>
'#444',
'note'=>
'#999',
'error'=>
'',
'help'=>
'#bbb',
'listlight'=>
'#999',
'language'=>
'#555',
4105 'map-marker-alt'=>
'#aaa',
'mrp'=>
'#a69944',
'product'=>
'#a69944',
'service'=>
'#a69944',
'inventory'=>
'#a69944',
'stock'=>
'#a69944',
'movement'=>
'#a69944',
4106 'other'=>
'#ddd',
'world'=>
'#986c6a',
4107 'partnership'=>
'#6c6aa8',
'playdisabled'=>
'#ccc',
'printer'=>
'#444',
'projectpub'=>
'#986c6a',
'reception'=>
'#a69944',
'resize'=>
'#444',
'rss'=>
'#cba',
4109 'security'=>
'#999',
'square'=>
'#888',
'stop-circle'=>
'#888',
'stats'=>
'#444',
'switch_off'=>
'#999',
'technic'=>
'#999',
'timespent'=>
'#555',
4110 'uncheck'=>
'#800',
'uparrow'=>
'#555',
'user-cog'=>
'#999',
'country'=>
'#aaa',
'globe-americas'=>
'#aaa',
'region'=>
'#aaa',
'state'=>
'#aaa',
4111 'website'=>
'#304',
'workstation'=>
'#a69944'
4113 if (isset($arrayconvpictotocolor[$pictowithouttext])) {
4114 $facolor = $arrayconvpictotocolor[$pictowithouttext];
4121 if (preg_match(
'/class="([^"]+)"/', $moreatt, $reg)) {
4122 $morecss .= ($morecss ?
' ' :
'').$reg[1];
4123 $moreatt = str_replace(
'class="'.$reg[1].
'"',
'', $moreatt);
4125 if (preg_match(
'/style="([^"]+)"/', $moreatt, $reg)) {
4126 $morestyle = $reg[1];
4127 $moreatt = str_replace(
'style="'.$reg[1].
'"',
'', $moreatt);
4129 $moreatt = trim($moreatt);
4131 $enabledisablehtml =
'<span class="'.$fa.
' '.$fakey.($marginleftonlyshort ? ($marginleftonlyshort == 1 ?
' marginleftonlyshort' :
' marginleftonly') :
'');
4132 $enabledisablehtml .= ($morecss ?
' '.$morecss :
'').
'" style="'.($fasize ? (
'font-size: '.$fasize.
';') :
'').($facolor ? (
' color: '.$facolor.
';') :
'').($morestyle ?
' '.$morestyle :
'').
'"'.(($notitle || empty($titlealt)) ?
'' :
' title="'.
dol_escape_htmltag($titlealt).
'"').($moreatt ?
' '.$moreatt :
'').
'>';
4136 $enabledisablehtml .=
'</span>';
4138 return $enabledisablehtml;
4141 if (!empty($conf->global->MAIN_OVERWRITE_THEME_PATH)) {
4142 $path = $conf->global->MAIN_OVERWRITE_THEME_PATH.
'/theme/'.$theme;
4143 } elseif (!empty($conf->global->MAIN_OVERWRITE_THEME_RES)) {
4144 $path = $conf->global->MAIN_OVERWRITE_THEME_RES.
'/theme/'.$conf->global->MAIN_OVERWRITE_THEME_RES;
4145 } elseif (!empty($conf->modules_parts[
'theme']) && array_key_exists($theme, $conf->modules_parts[
'theme'])) {
4146 $path = $theme.
'/theme/'.$theme;
4151 if (preg_match(
'/^([^@]+)@([^@]+)$/i', $picto, $regs)) {
4157 if (!preg_match(
'/(\.png|\.gif|\.svg)$/i', $picto)) {
4162 foreach ($conf->file->dol_document_root as $type => $dirroot) {
4163 if ($type ==
'main') {
4167 if (file_exists($dirroot.
'/'.$path.
'/img/'.$picto)) {
4168 $url = DOL_URL_ROOT.$conf->file->dol_url_root[$type];
4174 $fullpathpicto = $url.
'/'.$path.
'/img/'.$picto;
4178 return $fullpathpicto;
4181 return '<img src="'.$fullpathpicto.
'"'.($notitle ?
'' :
' alt="'.dol_escape_htmltag($alt).
'"').(($notitle || empty($titlealt)) ?
'' :
' title="'.
dol_escape_htmltag($titlealt).
'"').($moreatt ?
' '.$moreatt.($morecss ?
' class="'.$morecss.
'"' :
'') :
' class="inline-block'.($morecss ?
' '.$morecss :
'').
'"').
'>';
4197 function img_object($titlealt, $picto, $moreatt =
'', $pictoisfullpath =
false, $srconly = 0, $notitle = 0)
4199 if (strpos($picto,
'^') === 0) {
4200 return img_picto($titlealt, str_replace(
'^',
'', $picto), $moreatt, $pictoisfullpath, $srconly, $notitle);
4202 return img_picto($titlealt,
'object_'.$picto, $moreatt, $pictoisfullpath, $srconly, $notitle);
4217 function img_weather($titlealt, $picto, $moreatt =
'', $pictoisfullpath = 0, $morecss =
'')
4221 if (is_numeric($picto)) {
4224 return '<i class="fa fa-weather-level'.$picto.
'"></i>';
4225 } elseif (!preg_match(
'/(\.png|\.gif)$/i', $picto)) {
4229 $path = DOL_URL_ROOT.
'/theme/'.$conf->theme.
'/img/weather/'.$picto;
4231 return img_picto($titlealt, $path, $moreatt, 1, 0, 0,
'', $morecss);
4245 function img_picto_common($titlealt, $picto, $moreatt =
'', $pictoisfullpath = 0, $notitle = 0)
4249 if (!preg_match(
'/(\.png|\.gif)$/i', $picto)) {
4253 if ($pictoisfullpath) {
4256 $path = DOL_URL_ROOT.
'/theme/common/'.$picto;
4258 if (!empty($conf->global->MAIN_MODULE_CAN_OVERWRITE_COMMONICONS)) {
4259 $themepath = DOL_DOCUMENT_ROOT.
'/theme/'.$conf->theme.
'/img/'.$picto;
4261 if (file_exists($themepath)) {
4267 return img_picto($titlealt, $path, $moreatt, 1, 0, $notitle);
4286 if (empty($titlealt) || $titlealt ==
'default') {
4287 if ($numaction ==
'-1' || $numaction ==
'ST_NO') {
4289 $titlealt = $langs->transnoentitiesnoconv(
'ChangeDoNotContact');
4290 } elseif ($numaction ==
'0' || $numaction ==
'ST_NEVER') {
4292 $titlealt = $langs->transnoentitiesnoconv(
'ChangeNeverContacted');
4293 } elseif ($numaction ==
'1' || $numaction ==
'ST_TODO') {
4295 $titlealt = $langs->transnoentitiesnoconv(
'ChangeToContact');
4296 } elseif ($numaction ==
'2' || $numaction ==
'ST_PEND') {
4298 $titlealt = $langs->transnoentitiesnoconv(
'ChangeContactInProcess');
4299 } elseif ($numaction ==
'3' || $numaction ==
'ST_DONE') {
4301 $titlealt = $langs->transnoentitiesnoconv(
'ChangeContactDone');
4303 $titlealt = $langs->transnoentitiesnoconv(
'ChangeStatus '.$numaction);
4307 if (!is_numeric($numaction)) {
4311 return img_picto($titlealt, !empty($picto) ? $picto :
'stcomm'.$numaction.
'.png');
4321 function img_pdf($titlealt =
'default', $size = 3)
4325 if ($titlealt ==
'default') {
4326 $titlealt = $langs->trans(
'Show');
4329 return img_picto($titlealt,
'pdf'.$size.
'.png');
4343 if ($titlealt ==
'default') {
4344 $titlealt = $langs->trans(
'Add');
4347 return img_picto($titlealt,
'edit_add.png', $other);
4360 if ($titlealt ==
'default') {
4361 $titlealt = $langs->trans(
'Remove');
4364 return img_picto($titlealt,
'edit_remove.png', $other);
4375 function img_edit($titlealt =
'default', $float = 0, $other =
'')
4379 if ($titlealt ==
'default') {
4380 $titlealt = $langs->trans(
'Modify');
4383 return img_picto($titlealt,
'edit.png', ($float ?
'style="float: '.($langs->tab_translate[
"DIRECTION"] ==
'rtl' ?
'left' :
'right').
'"' :
"").($other ?
' '.$other :
''));
4394 function img_view($titlealt =
'default', $float = 0, $other =
'class="valignmiddle"')
4398 if ($titlealt ==
'default') {
4399 $titlealt = $langs->trans(
'View');
4402 $moreatt = ($float ?
'style="float: right" ' :
'').$other;
4404 return img_picto($titlealt,
'view.png', $moreatt);
4415 function img_delete($titlealt =
'default', $other =
'class="pictodelete"', $morecss =
'')
4419 if ($titlealt ==
'default') {
4420 $titlealt = $langs->trans(
'Delete');
4423 return img_picto($titlealt,
'delete.png', $other,
false, 0, 0,
'', $morecss);
4436 if ($titlealt ==
"default") {
4437 $titlealt = $langs->trans(
"Print");
4439 return img_picto($titlealt,
'printer.png', $other);
4449 function img_split($titlealt =
'default', $other =
'class="pictosplit"')
4453 if ($titlealt ==
'default') {
4454 $titlealt = $langs->trans(
'Split');
4457 return img_picto($titlealt,
'split.png', $other);
4467 function img_help($usehelpcursor = 1, $usealttitle = 1)
4472 if (is_string($usealttitle)) {
4475 $usealttitle = $langs->trans(
'Info');
4479 return img_picto($usealttitle,
'info.png',
'style="vertical-align: middle;'.($usehelpcursor == 1 ?
' cursor: help' : ($usehelpcursor == 2 ?
' cursor: pointer' :
'')).
'"');
4492 if ($titlealt ==
'default') {
4493 $titlealt = $langs->trans(
'Informations');
4496 return img_picto($titlealt,
'info.png',
'style="vertical-align: middle;"');
4507 function img_warning($titlealt =
'default', $moreatt =
'', $morecss =
'pictowarning')
4511 if ($titlealt ==
'default') {
4512 $titlealt = $langs->trans(
'Warning');
4516 return img_picto($titlealt,
'warning.png',
'class="'.$morecss.
'"'.($moreatt ? ($moreatt ==
'1' ?
' style="float: right"' :
' '.$moreatt) :
''));
4529 if ($titlealt ==
'default') {
4530 $titlealt = $langs->trans(
'Error');
4533 return img_picto($titlealt,
'error.png');
4543 function img_next($titlealt =
'default', $moreatt =
'')
4547 if ($titlealt ==
'default') {
4548 $titlealt = $langs->trans(
'Next');
4552 return '<span class="fa fa-chevron-right paddingright paddingleft" title="'.dol_escape_htmltag($titlealt).
'"></span>';
4566 if ($titlealt ==
'default') {
4567 $titlealt = $langs->trans(
'Previous');
4571 return '<span class="fa fa-chevron-left paddingright paddingleft" title="'.dol_escape_htmltag($titlealt).
'"></span>';
4582 function img_down($titlealt =
'default', $selected = 0, $moreclass =
'')
4586 if ($titlealt ==
'default') {
4587 $titlealt = $langs->trans(
'Down');
4590 return img_picto($titlealt, ($selected ?
'1downarrow_selected.png' :
'1downarrow.png'),
'class="imgdown'.($moreclass ?
" ".$moreclass :
"").
'"');
4601 function img_up($titlealt =
'default', $selected = 0, $moreclass =
'')
4605 if ($titlealt ==
'default') {
4606 $titlealt = $langs->trans(
'Up');
4609 return img_picto($titlealt, ($selected ?
'1uparrow_selected.png' :
'1uparrow.png'),
'class="imgup'.($moreclass ?
" ".$moreclass :
"").
'"');
4620 function img_left($titlealt =
'default', $selected = 0, $moreatt =
'')
4624 if ($titlealt ==
'default') {
4625 $titlealt = $langs->trans(
'Left');
4628 return img_picto($titlealt, ($selected ?
'1leftarrow_selected.png' :
'1leftarrow.png'), $moreatt);
4639 function img_right($titlealt =
'default', $selected = 0, $moreatt =
'')
4643 if ($titlealt ==
'default') {
4644 $titlealt = $langs->trans(
'Right');
4647 return img_picto($titlealt, ($selected ?
'1rightarrow_selected.png' :
'1rightarrow.png'), $moreatt);
4661 if ($titlealt ==
'default') {
4662 $titlealt = $langs->trans(
'Active');
4666 return img_picto($titlealt,
'tick.png');
4681 if (is_null($morecss)) {
4685 if ($brand ==
'visa' || $brand ==
'Visa') {
4687 } elseif ($brand ==
'mastercard' || $brand ==
'MasterCard') {
4688 $brand =
'cc-mastercard';
4689 } elseif ($brand ==
'amex' || $brand ==
'American Express') {
4691 } elseif ($brand ==
'discover' || $brand ==
'Discover') {
4692 $brand =
'cc-discover';
4693 } elseif ($brand ==
'jcb' || $brand ==
'JCB') {
4695 } elseif ($brand ==
'diners' || $brand ==
'Diners club') {
4696 $brand =
'cc-diners-club';
4697 } elseif (!in_array($brand, array(
'cc-visa',
'cc-mastercard',
'cc-amex',
'cc-discover',
'cc-jcb',
'cc-diners-club'))) {
4698 $brand =
'credit-card';
4701 return '<span class="fa fa-'.$brand.
' fa-fw'.($morecss ?
' '.$morecss :
'').
'"></span>';
4712 function img_mime($file, $titlealt =
'', $morecss =
'')
4714 require_once DOL_DOCUMENT_ROOT.
'/core/lib/files.lib.php';
4720 if (empty($titlealt)) {
4721 $titlealt =
'Mime type: '.$mimetype;
4725 return '<i class="fa fa-'.$mimefa.
' paddingright'.($morecss ?
' '.$morecss :
'').
'"'.($titlealt ?
' title="'.$titlealt.
'"' :
'').
'></i>';
4738 global $conf, $langs;
4740 if ($titlealt ==
'default') {
4741 $titlealt = $langs->trans(
'Search');
4744 $img =
img_picto($titlealt,
'search.png', $other,
false, 1);
4746 $input =
'<input type="image" class="liste_titre" name="button_search" src="'.$img.
'" ';
4747 $input .=
'value="'.dol_escape_htmltag($titlealt).
'" title="'.
dol_escape_htmltag($titlealt).
'" >';
4761 global $conf, $langs;
4763 if ($titlealt ==
'default') {
4764 $titlealt = $langs->trans(
'Search');
4767 $img =
img_picto($titlealt,
'searchclear.png', $other,
false, 1);
4769 $input =
'<input type="image" class="liste_titre" name="button_removefilter" src="'.$img.
'" ';
4770 $input .=
'value="'.dol_escape_htmltag($titlealt).
'" title="'.
dol_escape_htmltag($titlealt).
'" >';
4786 function info_admin($text, $infoonimgalt = 0, $nodiv = 0, $admin =
'1', $morecss =
'hideonsmartphone', $textfordropdown =
'')
4788 global $conf, $langs;
4790 if ($infoonimgalt) {
4791 $result =
img_picto($text,
'info',
'class="'.($morecss ?
' '.$morecss :
'').
'"');
4793 if (empty($conf->use_javascript_ajax)) {
4794 $textfordropdown =
'';
4797 $class = (empty($admin) ?
'undefined' : ($admin ==
'1' ?
'info' : $admin));
4798 $result = ($nodiv ?
'' :
'<div class="'.$class.($morecss ?
' '.$morecss :
'').($textfordropdown ?
' hidden' :
'').
'">').
'<span class="fa fa-info-circle" title="'.
dol_escape_htmltag($admin ? $langs->trans(
'InfoAdmin') : $langs->trans(
'Note')).
'"></span> '.$text.($nodiv ?
'' :
'</div>');
4800 if ($textfordropdown) {
4801 $tmpresult =
'<span class="'.$class.
'text opacitymedium cursorpointer">'.$langs->trans($textfordropdown).
' '.
img_picto($langs->trans($textfordropdown),
'1downarrow').
'</span>';
4802 $tmpresult .=
'<script type="text/javascript">
4803 jQuery(document).ready(function() {
4804 jQuery(".'.$class.
'text").click(function() {
4805 console.log("toggle text");
4806 jQuery(".'.$class.
'").toggle();
4811 $result = $tmpresult.$result;
4832 global $conf, $langs, $argv;
4833 global $dolibarr_main_prod;
4840 require_once DOL_DOCUMENT_ROOT.
'/core/class/translate.class.php';
4842 $langs->load(
"main");
4846 $langs->loadLangs(array(
'main',
'errors'));
4848 if ($_SERVER[
'DOCUMENT_ROOT']) {
4849 $out .= $langs->trans(
"DolibarrHasDetectedError").
".<br>\n";
4851 $out .=
"You use an experimental or develop level of features, so please do NOT report any bugs or vulnerability, except if problem is confirmed after moving option MAIN_FEATURES_LEVEL back to 0.<br>\n";
4853 $out .= $langs->trans(
"InformationToHelpDiagnose").
":<br>\n";
4855 $out .=
"<b>".$langs->trans(
"Date").
":</b> ".
dol_print_date(time(),
'dayhourlog').
"<br>\n";
4856 $out .=
"<b>".$langs->trans(
"Dolibarr").
":</b> ".DOL_VERSION.
" - https://www.dolibarr.org<br>\n";
4857 if (isset($conf->global->MAIN_FEATURES_LEVEL)) {
4858 $out .=
"<b>".$langs->trans(
"LevelOfFeature").
":</b> ".
getDolGlobalInt(
'MAIN_FEATURES_LEVEL').
"<br>\n";
4860 if (function_exists(
"phpversion")) {
4861 $out .=
"<b>".$langs->trans(
"PHP").
":</b> ".phpversion().
"<br>\n";
4863 $out .=
"<b>".$langs->trans(
"Server").
":</b> ".(isset($_SERVER[
"SERVER_SOFTWARE"]) ?
dol_htmlentities($_SERVER[
"SERVER_SOFTWARE"], ENT_COMPAT) :
'').
"<br>\n";
4864 if (function_exists(
"php_uname")) {
4865 $out .=
"<b>".$langs->trans(
"OS").
":</b> ".php_uname().
"<br>\n";
4867 $out .=
"<b>".$langs->trans(
"UserAgent").
":</b> ".(isset($_SERVER[
"HTTP_USER_AGENT"]) ?
dol_htmlentities($_SERVER[
"HTTP_USER_AGENT"], ENT_COMPAT) :
'').
"<br>\n";
4869 $out .=
"<b>".$langs->trans(
"RequestedUrl").
":</b> ".
dol_htmlentities($_SERVER[
"REQUEST_URI"], ENT_COMPAT).
"<br>\n";
4870 $out .=
"<b>".$langs->trans(
"Referer").
":</b> ".(isset($_SERVER[
"HTTP_REFERER"]) ?
dol_htmlentities($_SERVER[
"HTTP_REFERER"], ENT_COMPAT) :
'').
"<br>\n";
4871 $out .=
"<b>".$langs->trans(
"MenuManager").
":</b> ".(isset($conf->standard_menu) ?
dol_htmlentities($conf->standard_menu, ENT_COMPAT) :
'').
"<br>\n";
4873 $syslog .=
"url=".dol_escape_htmltag($_SERVER[
"REQUEST_URI"]);
4874 $syslog .=
", query_string=".dol_escape_htmltag($_SERVER[
"QUERY_STRING"]);
4877 $out .=
'> '.$langs->transnoentities(
"ErrorInternalErrorDetected").
":\n".$argv[0].
"\n";
4878 $syslog .=
"pid=".dol_getmypid();
4881 if (!empty($conf->modules)) {
4882 $out .=
"<b>".$langs->trans(
"Modules").
":</b> ".join(
', ', $conf->modules).
"<br>\n";
4885 if (is_object($db)) {
4886 if ($_SERVER[
'DOCUMENT_ROOT']) {
4887 $out .=
"<b>".$langs->trans(
"DatabaseTypeManager").
":</b> ".$db->type.
"<br>\n";
4888 $out .=
"<b>".$langs->trans(
"RequestLastAccessInError").
":</b> ".($db->lastqueryerror() ?
dol_escape_htmltag($db->lastqueryerror()) : $langs->trans(
"ErrorNoRequestInError")).
"<br>\n";
4889 $out .=
"<b>".$langs->trans(
"ReturnCodeLastAccessInError").
":</b> ".($db->lasterrno() ?
dol_escape_htmltag($db->lasterrno()) : $langs->trans(
"ErrorNoRequestInError")).
"<br>\n";
4890 $out .=
"<b>".$langs->trans(
"InformationLastAccessInError").
":</b> ".($db->lasterror() ?
dol_escape_htmltag($db->lasterror()) : $langs->trans(
"ErrorNoRequestInError")).
"<br>\n";
4895 $out .=
'> '.$langs->transnoentities(
"DatabaseTypeManager").
":\n".$db->type.
"\n";
4896 $out .=
'> '.$langs->transnoentities(
"RequestLastAccessInError").
":\n".($db->lastqueryerror() ? $db->lastqueryerror() : $langs->transnoentities(
"ErrorNoRequestInError")).
"\n";
4897 $out .=
'> '.$langs->transnoentities(
"ReturnCodeLastAccessInError").
":\n".($db->lasterrno() ? $db->lasterrno() : $langs->transnoentities(
"ErrorNoRequestInError")).
"\n";
4898 $out .=
'> '.$langs->transnoentities(
"InformationLastAccessInError").
":\n".($db->lasterror() ? $db->lasterror() : $langs->transnoentities(
"ErrorNoRequestInError")).
"\n";
4900 $syslog .=
", sql=".$db->lastquery();
4901 $syslog .=
", db_error=".$db->lasterror();
4904 if ($error || $errors) {
4905 $langs->load(
"errors");
4908 if (is_array($error) && is_array($errors)) {
4909 $errors = array_merge($error, $errors);
4910 } elseif (is_array($error)) {
4912 } elseif (is_array($errors)) {
4913 $errors = array_merge(array($error), $errors);
4915 $errors = array_merge(array($error));
4918 foreach ($errors as $msg) {
4922 if ($_SERVER[
'DOCUMENT_ROOT']) {
4926 $out .=
'> '.$langs->transnoentities(
"Message").
":\n".$msg.
"\n";
4928 $syslog .=
", msg=".$msg;
4931 if (empty($dolibarr_main_prod) && $_SERVER[
'DOCUMENT_ROOT'] && function_exists(
'xdebug_print_function_stack') && function_exists(
'xdebug_call_file')) {
4932 xdebug_print_function_stack();
4933 $out .=
'<b>XDebug informations:</b>'.
"<br>\n";
4934 $out .=
'File: '.xdebug_call_file().
"<br>\n";
4935 $out .=
'Line: '.xdebug_call_line().
"<br>\n";
4936 $out .=
'Function: '.xdebug_call_function().
"<br>\n";
4941 if (!headers_sent()) {
4942 http_response_code(500);
4945 if (empty($dolibarr_main_prod)) {
4948 if (empty($langs->defaultlang)) {
4949 $langs->setDefaultLang();
4951 $langs->loadLangs(array(
"main",
"errors"));
4953 print
'This website or feature is currently temporarly not available or failed after a technical error.<br><br>This may be due to a maintenance operation. Current status of operation ('.dol_print_date(
dol_now(),
'dayhourrfc').
') are on next line...<br><br>'.
"\n";
4954 print $langs->trans(
"DolibarrHasDetectedError").
'. ';
4955 print $langs->trans(
"YouCanSetOptionDolibarrMainProdToZero");
4956 define(
"MAIN_CORE_ERROR", 1);
4972 function dol_print_error_email($prefixcode, $errormessage =
'', $errormessages = array(), $morecss =
'error', $email =
'')
4974 global $langs, $conf;
4976 if (empty($email)) {
4977 $email = $conf->global->MAIN_INFO_SOCIETE_MAIL;
4980 $langs->load(
"errors");
4983 print
'<br><div class="center login_main_message"><div class="'.$morecss.
'">';
4984 print $langs->trans(
"ErrorContactEMail", $email, $prefixcode.dol_print_date($now,
'%Y%m%d%H%M%S'));
4985 if ($errormessage) {
4986 print
'<br><br>'.$errormessage;
4988 if (is_array($errormessages) && count($errormessages)) {
4989 foreach ($errormessages as $mesgtoshow) {
4990 print
'<br><br>'.$mesgtoshow;
4993 print
'</div></div>';
5012 function print_liste_field_titre($name, $file =
"", $field =
"", $begin =
"", $moreparam =
"", $moreattrib =
"", $sortfield =
"", $sortorder =
"", $prefix =
"", $tooltip =
"", $forcenowrapcolumntitle = 0)
5014 print
getTitleFieldOfList($name, 0, $file, $field, $begin, $moreparam, $moreattrib, $sortfield, $sortorder, $prefix, 0, $tooltip, $forcenowrapcolumntitle);
5035 function getTitleFieldOfList($name, $thead = 0, $file =
"", $field =
"", $begin =
"", $moreparam =
"", $moreattrib =
"", $sortfield =
"", $sortorder =
"", $prefix =
"", $disablesortlink = 0, $tooltip =
'', $forcenowrapcolumntitle = 0)
5037 global $conf, $langs,
$form;
5040 if ($moreattrib ==
'class="right"') {
5041 $prefix .=
'right ';
5044 $sortorder = strtoupper($sortorder);
5053 $tmpsortfield = explode(
',', $sortfield);
5054 $sortfield1 = trim($tmpsortfield[0]);
5055 $tmpfield = explode(
',', $field);
5056 $field1 = trim($tmpfield[0]);
5058 if (empty($conf->global->MAIN_DISABLE_WRAPPING_ON_COLUMN_TITLE) && empty($forcenowrapcolumntitle)) {
5059 $prefix =
'wrapcolumntitle '.$prefix;
5065 $liste_titre =
'liste_titre';
5066 if ($field1 && ($sortfield1 == $field1 || $sortfield1 == preg_replace(
"/^[^\.]+\./",
"", $field1))) {
5067 $liste_titre =
'liste_titre_sel';
5070 $tagstart =
'<'.$tag.
' class="'.$prefix.$liste_titre.
'" '.$moreattrib;
5072 $tagstart .= ($name && empty($conf->global->MAIN_DISABLE_WRAPPING_ON_COLUMN_TITLE) && empty($forcenowrapcolumntitle) && !
dol_textishtml($name)) ?
' title="'.
dol_escape_htmltag($langs->trans($name)).
'"' :
'';
5075 if (empty($thead) && $field && empty($disablesortlink)) {
5076 $options = preg_replace(
'/sortfield=([a-zA-Z0-9,\s\.]+)/i',
'', (is_scalar($moreparam) ? $moreparam :
''));
5077 $options = preg_replace(
'/sortorder=([a-zA-Z0-9,\s\.]+)/i',
'', $options);
5078 $options = preg_replace(
'/&+/i',
'&', $options);
5079 if (!preg_match(
'/^&/', $options)) {
5080 $options =
'&'.$options;
5083 $sortordertouseinlink =
'';
5084 if ($field1 != $sortfield1) {
5085 if (preg_match(
'/^DESC/i', $sortorder)) {
5086 $sortordertouseinlink .= str_repeat(
'desc,', count(explode(
',', $field)));
5088 $sortordertouseinlink .= str_repeat(
'asc,', count(explode(
',', $field)));
5091 if (preg_match(
'/^ASC/i', $sortorder)) {
5092 $sortordertouseinlink .= str_repeat(
'desc,', count(explode(
',', $field)));
5094 $sortordertouseinlink .= str_repeat(
'asc,', count(explode(
',', $field)));
5097 $sortordertouseinlink = preg_replace(
'/,$/',
'', $sortordertouseinlink);
5098 $out .=
'<a class="reposition" href="'.$file.
'?sortfield='.$field.
'&sortorder='.$sortordertouseinlink.
'&begin='.$begin.$options.
'"';
5104 $tmptooltip = explode(
':', $tooltip);
5105 $out .=
$form->textwithpicto($langs->trans($name), $langs->trans($tmptooltip[0]), 1,
'help',
'', 0, 3, (empty($tmptooltip[1]) ?
'' :
'extra_'.str_replace(
'.',
'_', $field).
'_'.$tmptooltip[1]));
5107 $out .= $langs->trans($name);
5110 if (empty($thead) && $field && empty($disablesortlink)) {
5114 if (empty($thead) && $field) {
5115 $options = preg_replace(
'/sortfield=([a-zA-Z0-9,\s\.]+)/i',
'', (is_scalar($moreparam) ? $moreparam :
''));
5116 $options = preg_replace(
'/sortorder=([a-zA-Z0-9,\s\.]+)/i',
'', $options);
5117 $options = preg_replace(
'/&+/i',
'&', $options);
5118 if (!preg_match(
'/^&/', $options)) {
5119 $options =
'&'.$options;
5122 if (!$sortorder || $field1 != $sortfield1) {
5126 if (preg_match(
'/^DESC/', $sortorder)) {
5129 $sortimg .=
'<span class="nowrap">'.img_up(
"Z-A", 0,
'paddingright').
'</span>';
5131 if (preg_match(
'/^ASC/', $sortorder)) {
5134 $sortimg .=
'<span class="nowrap">'.img_down(
"A-Z", 0,
'paddingright').
'</span>';
5139 $tagend =
'</'.$tag.
'>';
5141 $out = $tagstart.$sortimg.$out.$tagend;
5156 dol_syslog(__FUNCTION__.
" is deprecated", LOG_WARNING);
5158 print
'<div class="titre">'.$title.
'</div>';
5190 function load_fiche_titre($titre, $morehtmlright =
'', $picto =
'generic', $pictoisfullpath = 0, $id =
'', $morecssontable =
'', $morehtmlcenter =
'')
5196 if ($picto ==
'setup') {
5201 $return .=
'<table '.($id ?
'id="'.$id.
'" ' :
'').
'class="centpercent notopnoleftnoright table-fiche-title'.($morecssontable ?
' '.$morecssontable :
'').
'">';
5202 $return .=
'<tr class="titre">';
5204 $return .=
'<td class="nobordernopadding widthpictotitle valignmiddle col-picto">'.img_picto(
'', $picto,
'class="valignmiddle widthpictotitle pictotitle"', $pictoisfullpath).
'</td>';
5206 $return .=
'<td class="nobordernopadding valignmiddle col-title">';
5207 $return .=
'<div class="titre inline-block">'.$titre.
'</div>';
5210 $return .=
'<td class="nobordernopadding center valignmiddle">'.$morehtmlcenter.
'</td>';
5213 $return .=
'<td class="nobordernopadding titre_right wordbreakimp right valignmiddle">'.$morehtmlright.
'</td>';
5215 $return .=
'</tr></table>'.
"\n";
5243 function print_barre_liste($titre, $page, $file, $options =
'', $sortfield =
'', $sortorder =
'', $morehtmlcenter =
'', $num = -1, $totalnboflines =
'', $picto =
'generic', $pictoisfullpath = 0, $morehtmlright =
'', $morecss =
'', $limit = -1, $hideselectlimit = 0, $hidenavigation = 0, $pagenavastextinput = 0, $morehtmlrightbeforearrow =
'')
5245 global $conf, $langs;
5248 $savtotalnboflines = $totalnboflines;
5249 $totalnboflines = abs((
int) $totalnboflines);
5251 if ($picto ==
'setup') {
5252 $picto =
'title_setup.png';
5254 if (($conf->browser->name ==
'ie') && $picto ==
'generic') {
5255 $picto =
'title.gif';
5258 $limit = $conf->liste_limit;
5260 if ($savlimit != 0 && (($num > $limit) || ($num == -1) || ($limit == 0))) {
5268 print
"<!-- Begin title -->\n";
5269 print
'<table class="centpercent notopnoleftnoright table-fiche-title'.($morecss ?
' '.$morecss :
'').
'"><tr>';
5273 if ($picto && $titre) {
5274 print
'<td class="nobordernopadding widthpictotitle valignmiddle col-picto">'.img_picto(
'', $picto,
'class="valignmiddle pictotitle widthpictotitle"', $pictoisfullpath).
'</td>';
5276 print
'<td class="nobordernopadding valignmiddle col-title">';
5277 print
'<div class="titre inline-block">'.$titre;
5278 if (!empty($titre) && $savtotalnboflines >= 0 && (string) $savtotalnboflines !=
'') {
5279 print
'<span class="opacitymedium colorblack paddingleft">('.$totalnboflines.
')</span>';
5281 print
'</div></td>';
5284 if ($morehtmlcenter) {
5285 print
'<td class="nobordernopadding center valignmiddle">'.$morehtmlcenter.
'</td>';
5289 print
'<td class="nobordernopadding valignmiddle right">';
5290 print
'<input type="hidden" name="pageplusoneold" value="'.((int) $page + 1).
'">';
5292 $options .=
"&sortfield=".urlencode($sortfield);
5295 $options .=
"&sortorder=".urlencode($sortorder);
5299 if ($savlimit != 0 && ($page > 0 || $num > $limit)) {
5300 if ($totalnboflines) {
5302 $maxnbofpage = (empty($conf->dol_optimize_smallscreen) ? 4 : 0);
5305 $nbpages = ceil($totalnboflines / $limit);
5309 $cpt = ($page - $maxnbofpage);
5315 if (empty($pagenavastextinput)) {
5316 $pagelist .=
'<li class="pagination"><a href="'.$file.
'?page=0'.$options.
'">1</a></li>';
5318 $pagelist .=
'<li class="pagination"><span class="inactive">...</span></li>';
5319 } elseif ($cpt == 2) {
5320 $pagelist .=
'<li class="pagination"><a href="'.$file.
'?page=1'.$options.
'">2</a></li>';
5326 if ($pagenavastextinput) {
5327 if ($cpt == $page) {
5328 $pagelist .=
'<li class="pagination"><input type="text" class="width25 center pageplusone" name="pageplusone" value="'.($page + 1).
'"></li>';
5332 if ($cpt == $page) {
5333 $pagelist .=
'<li class="pagination"><span class="active">'.($page + 1).
'</span></li>';
5335 $pagelist .=
'<li class="pagination"><a href="'.$file.
'?page='.$cpt.$options.
'">'.($cpt + 1).
'</a></li>';
5339 }
while ($cpt < $nbpages && $cpt <= ($page + $maxnbofpage));
5341 if (empty($pagenavastextinput)) {
5342 if ($cpt < $nbpages) {
5343 if ($cpt < $nbpages - 2) {
5344 $pagelist .=
'<li class="pagination"><span class="inactive">...</span></li>';
5345 } elseif ($cpt == $nbpages - 2) {
5346 $pagelist .=
'<li class="pagination"><a href="'.$file.
'?page='.($nbpages - 2).$options.
'">'.($nbpages - 1).
'</a></li>';
5348 $pagelist .=
'<li class="pagination"><a href="'.$file.
'?page='.($nbpages - 1).$options.
'">'.$nbpages.
'</a></li>';
5352 $pagelist .=
'<li class="pagination paginationlastpage"><a href="'.$file.
'?page='.($nbpages - 1).$options.
'">'.$nbpages.
'</a></li>';
5355 $pagelist .=
'<li class="pagination"><span class="active">'.($page + 1).
"</li>";
5359 if ($savlimit || $morehtmlright || $morehtmlrightbeforearrow) {
5360 print_fleche_navigation($page, $file, $options, $nextpage, $pagelist, $morehtmlright, $savlimit, $totalnboflines, $hideselectlimit, $morehtmlrightbeforearrow);
5364 if ($pagenavastextinput) {
5370 print
'</tr></table>'.
"\n";
5371 print
"<!-- End title -->\n\n";
5389 function print_fleche_navigation($page, $file, $options =
'', $nextpage = 0, $betweenarrows =
'', $afterarrows =
'', $limit = -1, $totalnboflines = 0, $hideselectlimit = 0, $beforearrows =
'')
5391 global $conf, $langs;
5393 print
'<div class="pagination"><ul>';
5394 if ($beforearrows) {
5395 print
'<li class="paginationbeforearrows">';
5396 print $beforearrows;
5399 if ((
int) $limit > 0 && empty($hideselectlimit)) {
5400 $pagesizechoices =
'10:10,15:15,20:20,30:30,40:40,50:50,100:100,250:250,500:500,1000:1000';
5401 $pagesizechoices .=
',5000:5000,10000:10000,20000:20000';
5404 if (!empty($conf->global->MAIN_PAGESIZE_CHOICES)) {
5405 $pagesizechoices = $conf->global->MAIN_PAGESIZE_CHOICES;
5408 print
'<li class="pagination">';
5409 print
'<select class="flat selectlimit" name="limit" title="'.dol_escape_htmltag($langs->trans(
"MaxNbOfRecordPerPage")).
'">';
5410 $tmpchoice = explode(
',', $pagesizechoices);
5411 $tmpkey = $limit.
':'.$limit;
5412 if (!in_array($tmpkey, $tmpchoice)) {
5413 $tmpchoice[] = $tmpkey;
5415 $tmpkey = $conf->liste_limit.
':'.$conf->liste_limit;
5416 if (!in_array($tmpkey, $tmpchoice)) {
5417 $tmpchoice[] = $tmpkey;
5419 asort($tmpchoice, SORT_NUMERIC);
5420 foreach ($tmpchoice as $val) {
5422 $tmp = explode(
':', $val);
5425 if ($key !=
'' && $val !=
'') {
5426 if ((
int) $key == (
int) $limit) {
5427 $selected =
' selected="selected"';
5429 print
'<option name="'.$key.
'"'.$selected.
'>'.
dol_escape_htmltag($val).
'</option>'.
"\n";
5433 if ($conf->use_javascript_ajax) {
5434 print
'<!-- JS CODE TO ENABLE select limit to launch submit of page -->
5436 jQuery(document).ready(function () {
5437 jQuery(".selectlimit").change(function() {
5438 console.log("Change limit. Send submit");
5439 $(this).parents(\'form:first\').submit();
5448 print
'<li class="pagination paginationpage paginationpageleft"><a class="paginationprevious" href="'.$file.
'?page='.($page - 1).$options.
'"><i class="fa fa-chevron-left" title="'.
dol_escape_htmltag($langs->trans(
"Previous")).
'"></i></a></li>';
5450 if ($betweenarrows) {
5451 print
'<!--<div class="betweenarrows nowraponall inline-block">-->';
5452 print $betweenarrows;
5453 print
'<!--</div>-->';
5455 if ($nextpage > 0) {
5456 print
'<li class="pagination paginationpage paginationpageright"><a class="paginationnext" href="'.$file.
'?page='.($page + 1).$options.
'"><i class="fa fa-chevron-right" title="'.
dol_escape_htmltag($langs->trans(
"Next")).
'"></i></a></li>';
5459 print
'<li class="paginationafterarrows">';
5463 print
'</ul></div>'.
"\n";
5478 function vatrate($rate, $addpercent =
false, $info_bits = 0, $usestarfornpr = 0, $html = 0)
5482 if (preg_match(
'/%/', $rate)) {
5483 $rate = str_replace(
'%',
'', $rate);
5487 if (preg_match(
'/\((.*)\)/', $rate, $reg)) {
5488 $morelabel =
' ('.$reg[1].
')';
5489 $rate = preg_replace(
'/\s*'.preg_quote($morelabel,
'/').
'/',
'', $rate);
5490 $morelabel =
' '.($html ?
'<span class="opacitymedium">' :
'').
'('.$reg[1].
')'.($html ?
'</span>' :
'');
5492 if (preg_match(
'/\*/', $rate)) {
5493 $rate = str_replace(
'*',
'', $rate);
5498 if (!preg_match(
'/\//', $rate)) {
5499 $ret =
price($rate, 0,
'', 0, 0).($addpercent ?
'%' :
'');
5502 $ret = $rate.($addpercent ?
'%' :
'');
5504 if (($info_bits & 1) && $usestarfornpr >= 0) {
5527 function price($amount,
$form = 0, $outlangs =
'', $trunc = 1, $rounding = -1, $forcerounding = -1, $currency_code =
'')
5529 global $langs, $conf;
5532 if (empty($amount)) {
5535 $amount = (is_numeric($amount) ? $amount : 0);
5536 if ($rounding < 0) {
5537 $rounding = min($conf->global->MAIN_MAX_DECIMALS_UNIT, $conf->global->MAIN_MAX_DECIMALS_TOT);
5539 $nbdecimal = $rounding;
5541 if ($outlangs ===
'none') {
5551 if (!is_object($outlangs)) {
5555 if ($outlangs->transnoentitiesnoconv(
"SeparatorDecimal") !=
"SeparatorDecimal") {
5556 $dec = $outlangs->transnoentitiesnoconv(
"SeparatorDecimal");
5558 if ($outlangs->transnoentitiesnoconv(
"SeparatorThousand") !=
"SeparatorThousand") {
5559 $thousand = $outlangs->transnoentitiesnoconv(
"SeparatorThousand");
5561 if ($thousand ==
'None') {
5563 } elseif ($thousand ==
'Space') {
5570 $amount = str_replace(
',',
'.', $amount);
5572 $datas = explode(
'.', $amount);
5573 $decpart = isset($datas[1]) ? $datas[1] :
'';
5574 $decpart = preg_replace(
'/0+$/i',
'', $decpart);
5583 if ($trunc && $nbdecimal > $conf->global->MAIN_MAX_DECIMALS_SHOWN) {
5584 $nbdecimal = $conf->global->MAIN_MAX_DECIMALS_SHOWN;
5585 if (preg_match(
'/\.\.\./i', $conf->global->MAIN_MAX_DECIMALS_SHOWN)) {
5592 if ($forcerounding >= 0) {
5593 $nbdecimal = $forcerounding;
5597 $output = number_format($amount, $nbdecimal, $dec, $thousand);
5599 $output = preg_replace(
'/\s/',
' ', $output);
5600 $output = preg_replace(
'/\'/',
''', $output);
5603 $cursymbolbefore = $cursymbolafter =
'';
5604 if ($currency_code && is_object($outlangs)) {
5605 if ($currency_code ==
'auto') {
5606 $currency_code = $conf->currency;
5609 $listofcurrenciesbefore = array(
'AUD',
'CAD',
'CNY',
'COP',
'CLP',
'GBP',
'HKD',
'MXN',
'PEN',
'USD');
5610 $listoflanguagesbefore = array(
'nl_NL');
5611 if (in_array($currency_code, $listofcurrenciesbefore) || in_array($outlangs->defaultlang, $listoflanguagesbefore)) {
5612 $cursymbolbefore .= $outlangs->getCurrencySymbol($currency_code);
5614 $tmpcur = $outlangs->getCurrencySymbol($currency_code);
5615 $cursymbolafter .= ($tmpcur == $currency_code ?
' '.$tmpcur : $tmpcur);
5618 $output = $cursymbolbefore.$output.$end.($cursymbolafter ?
' ' :
'').$cursymbolafter;
5649 global $langs, $conf;
5656 if (is_null($langs)) {
5660 if ($langs->transnoentitiesnoconv(
"SeparatorDecimal") !=
"SeparatorDecimal") {
5661 $dec = $langs->transnoentitiesnoconv(
"SeparatorDecimal");
5663 if ($langs->transnoentitiesnoconv(
"SeparatorThousand") !=
"SeparatorThousand") {
5664 $thousand = $langs->transnoentitiesnoconv(
"SeparatorThousand");
5667 if ($thousand ==
'None') {
5669 } elseif ($thousand ==
'Space') {
5677 if (!is_numeric($amount)) {
5678 $amount = preg_replace(
'/[a-zA-Z\/\\\*\(\)<>\_]/',
'', $amount);
5681 if ($option == 2 && $thousand ==
'.' && preg_match(
'/\.(\d\d\d)$/', (
string) $amount)) {
5682 $amount = str_replace($thousand,
'', $amount);
5688 if (is_numeric($amount)) {
5690 $temps = sprintf(
"%0.10F", $amount - intval($amount));
5691 $temps = preg_replace(
'/([\.1-9])0+$/',
'\\1', $temps);
5693 $amount = number_format($amount, $nbofdec, $dec, $thousand);
5698 if ($thousand !=
',' && $thousand !=
'.') {
5699 $amount = str_replace(
',',
'.', $amount);
5702 $amount = str_replace(
' ',
'', $amount);
5703 $amount = str_replace($thousand,
'', $amount);
5704 $amount = str_replace($dec,
'.', $amount);
5706 $amount = preg_replace(
'/[^0-9\-\.]/',
'', $amount);
5712 $nbofdectoround =
'';
5713 if ($rounding ==
'MU') {
5714 $nbofdectoround = $conf->global->MAIN_MAX_DECIMALS_UNIT;
5715 } elseif ($rounding ==
'MT') {
5716 $nbofdectoround = $conf->global->MAIN_MAX_DECIMALS_TOT;
5717 } elseif ($rounding ==
'MS') {
5718 $nbofdectoround = isset($conf->global->MAIN_MAX_DECIMALS_STOCK) ? $conf->global->MAIN_MAX_DECIMALS_STOCK : 5;
5719 } elseif ($rounding ==
'CU') {
5720 $nbofdectoround = max($conf->global->MAIN_MAX_DECIMALS_UNIT, 8);
5721 } elseif ($rounding ==
'CT') {
5722 $nbofdectoround = max($conf->global->MAIN_MAX_DECIMALS_TOT, 8);
5723 } elseif (is_numeric($rounding)) {
5724 $nbofdectoround = (int) $rounding;
5729 $amount = round(is_string($amount) ? (
float) $amount : $amount, $nbofdectoround);
5731 return 'ErrorBadParameterProvidedToFunction';
5737 if (is_numeric($amount)) {
5739 $temps = sprintf(
"%0.10F", $amount - intval($amount));
5740 $temps = preg_replace(
'/([\.1-9])0+$/',
'\\1', $temps);
5742 $amount = number_format($amount, min($nbofdec, $nbofdectoround), $dec, $thousand);
5748 if ($thousand !=
',' && $thousand !=
'.') {
5749 $amount = str_replace(
',',
'.', $amount);
5752 $amount = str_replace(
' ',
'', $amount);
5753 $amount = str_replace($thousand,
'', $amount);
5754 $amount = str_replace($dec,
'.', $amount);
5756 $amount = preg_replace(
'/[^0-9\-\.]/',
'', $amount);
5774 function showDimensionInBestUnit($dimension, $unit, $type, $outputlangs, $round = -1, $forceunitoutput =
'no', $use_short_label = 0)
5776 require_once DOL_DOCUMENT_ROOT.
'/core/lib/product.lib.php';
5778 if (($forceunitoutput ==
'no' && $dimension < 1 / 10000 && $unit < 90) || (is_numeric($forceunitoutput) && $forceunitoutput == -6)) {
5779 $dimension = $dimension * 1000000;
5781 } elseif (($forceunitoutput ==
'no' && $dimension < 1 / 10 && $unit < 90) || (is_numeric($forceunitoutput) && $forceunitoutput == -3)) {
5782 $dimension = $dimension * 1000;
5784 } elseif (($forceunitoutput ==
'no' && $dimension > 100000000 && $unit < 90) || (is_numeric($forceunitoutput) && $forceunitoutput == 6)) {
5785 $dimension = $dimension / 1000000;
5787 } elseif (($forceunitoutput ==
'no' && $dimension > 100000 && $unit < 90) || (is_numeric($forceunitoutput) && $forceunitoutput == 3)) {
5788 $dimension = $dimension / 1000;
5804 $ret =
price($dimension, 0, $outputlangs, 0, 0, $round);
5805 $ret .=
' '.measuringUnitString(0, $type, $unit, $use_short_label, $outputlangs);
5823 function get_localtax($vatrate, $local, $thirdparty_buyer =
"", $thirdparty_seller =
"", $vatnpr = 0)
5825 global $db, $conf, $mysoc;
5827 if (empty($thirdparty_seller) || !is_object($thirdparty_seller)) {
5828 $thirdparty_seller = $mysoc;
5831 dol_syslog(
"get_localtax tva=".$vatrate.
" local=".$local.
" thirdparty_buyer id=".(is_object($thirdparty_buyer) ? $thirdparty_buyer->id :
'').
"/country_code=".(is_object($thirdparty_buyer) ? $thirdparty_buyer->country_code :
'').
" thirdparty_seller id=".$thirdparty_seller->id.
"/country_code=".$thirdparty_seller->country_code.
" thirdparty_seller localtax1_assuj=".$thirdparty_seller->localtax1_assuj.
" thirdparty_seller localtax2_assuj=".$thirdparty_seller->localtax2_assuj);
5833 $vatratecleaned = $vatrate;
5835 if (preg_match(
'/^(.*)\s*\((.*)\)$/', $vatrate, $reg)) {
5836 $vatratecleaned = trim($reg[1]);
5837 $vatratecode = $reg[2];
5846 if ($mysoc->country_code ==
'ES') {
5848 if (!$mysoc->localtax1_assuj || (
string) $vatratecleaned ==
"0") {
5851 if ($thirdparty_seller->id == $mysoc->id) {
5852 if (!$thirdparty_buyer->localtax1_assuj) {
5856 if (!$thirdparty_seller->localtax1_assuj) {
5864 if (!$mysoc->localtax2_assuj) {
5867 if ($thirdparty_seller->id == $mysoc->id) {
5868 if (!$thirdparty_buyer->localtax2_assuj) {
5872 if (!$thirdparty_seller->localtax2_assuj) {
5878 if ($local == 1 && !$thirdparty_seller->localtax1_assuj) {
5881 if ($local == 2 && !$thirdparty_seller->localtax2_assuj) {
5887 if (in_array($mysoc->country_code, array(
'ES'))) {
5888 $conf->global->MAIN_GET_LOCALTAXES_VALUES_FROM_THIRDPARTY = 1;
5892 if (!empty($conf->global->MAIN_GET_LOCALTAXES_VALUES_FROM_THIRDPARTY)) {
5894 if ($thirdparty_seller != $mysoc) {
5896 return $thirdparty_seller->localtax1_value;
5900 return $conf->global->MAIN_INFO_VALUE_LOCALTAX1;
5905 if ($thirdparty_seller != $mysoc) {
5908 return $thirdparty_seller->localtax2_value;
5911 if (in_array($mysoc->country_code, array(
'ES'))) {
5912 return $thirdparty_buyer->localtax2_value;
5914 return $conf->global->MAIN_INFO_VALUE_LOCALTAX2;
5921 $sql =
"SELECT t.localtax1, t.localtax2, t.localtax1_type, t.localtax2_type";
5922 $sql .=
" FROM ".MAIN_DB_PREFIX.
"c_tva as t, ".MAIN_DB_PREFIX.
"c_country as c";
5923 $sql .=
" WHERE t.fk_pays = c.rowid AND c.code = '".$db->escape($thirdparty_seller->country_code).
"'";
5924 $sql .=
" AND t.taux = ".((float) $vatratecleaned).
" AND t.active = 1";
5925 if (!empty($vatratecode)) {
5926 $sql .=
" AND t.code ='".$db->escape($vatratecode).
"'";
5928 $sql .=
" AND t.recuperableonly = '".$db->escape($vatnpr).
"'";
5931 $resql = $db->query($sql);
5934 $obj = $db->fetch_object(
$resql);
5937 return $obj->localtax1;
5938 } elseif ($local == 2) {
5939 return $obj->localtax2;
5960 $valors = explode(
":", $tax);
5962 if (count($valors) > 1) {
5979 $sql =
" SELECT t.localtax".$local.
" as localtax";
5980 $sql .=
" FROM ".MAIN_DB_PREFIX.
"c_tva as t INNER JOIN ".MAIN_DB_PREFIX.
"c_country as c ON c.rowid = t.fk_pays";
5981 $sql .=
" WHERE c.code = '".$db->escape($mysoc->country_code).
"' AND t.active = 1 AND t.taux = (";
5982 $sql .=
"SELECT MAX(tt.taux) FROM ".MAIN_DB_PREFIX.
"c_tva as tt INNER JOIN ".MAIN_DB_PREFIX.
"c_country as c ON c.rowid = tt.fk_pays";
5983 $sql .=
" WHERE c.code = '".$db->escape($mysoc->country_code).
"' AND tt.active = 1)";
5984 $sql .=
" AND t.localtax".$local.
"_type <> '0'";
5985 $sql .=
" ORDER BY t.rowid DESC";
5987 $resql = $db->query($sql);
5989 $obj = $db->fetch_object(
$resql);
5990 return $obj->localtax;
6010 function getTaxesFromId($vatrate, $buyer =
null, $seller =
null, $firstparamisid = 1)
6014 dol_syslog(
"getTaxesFromId vat id or rate = ".$vatrate);
6017 $sql =
"SELECT t.rowid, t.code, t.taux as rate, t.recuperableonly as npr, t.accountancy_code_sell, t.accountancy_code_buy,";
6018 $sql .=
" t.localtax1, t.localtax1_type, t.localtax2, t.localtax2_type";
6019 $sql .=
" FROM ".MAIN_DB_PREFIX.
"c_tva as t";
6020 if ($firstparamisid) {
6021 $sql .=
" WHERE t.rowid = ".(int) $vatrate;
6023 $vatratecleaned = $vatrate;
6026 if (preg_match(
'/^(.*)\s*\((.*)\)$/', $vatrate, $reg)) {
6027 $vatratecleaned = $reg[1];
6028 $vatratecode = $reg[2];
6031 $sql .=
", ".MAIN_DB_PREFIX.
"c_country as c";
6034 $sql .=
" WHERE t.fk_pays = c.rowid AND c.code = '".$db->escape($seller->country_code).
"'";
6035 $sql .=
" AND t.taux = ".((float) $vatratecleaned).
" AND t.active = 1";
6037 $sql .=
" AND t.code = '".$db->escape($vatratecode).
"'";
6041 $resql = $db->query($sql);
6043 $obj = $db->fetch_object(
$resql);
6046 'rowid'=>$obj->rowid,
6049 'localtax1'=>$obj->localtax1,
6050 'localtax1_type'=>$obj->localtax1_type,
6051 'localtax2'=>$obj->localtax2,
6052 'localtax2_type'=>$obj->localtax2_type,
6054 'accountancy_code_sell'=>$obj->accountancy_code_sell,
6055 'accountancy_code_buy'=>$obj->accountancy_code_buy
6087 dol_syslog(
"getLocalTaxesFromRate vatrate=".$vatrate.
" local=".$local);
6090 $sql =
"SELECT t.taux as rate, t.code, t.localtax1, t.localtax1_type, t.localtax2, t.localtax2_type, t.accountancy_code_sell, t.accountancy_code_buy";
6091 $sql .=
" FROM ".MAIN_DB_PREFIX.
"c_tva as t";
6092 if ($firstparamisid) {
6093 $sql .=
" WHERE t.rowid = ".(int) $vatrate;
6095 $vatratecleaned = $vatrate;
6098 if (preg_match(
'/^(.*)\s*\((.*)\)$/', $vatrate, $reg)) {
6099 $vatratecleaned = $reg[1];
6100 $vatratecode = $reg[2];
6103 $sql .=
", ".MAIN_DB_PREFIX.
"c_country as c";
6104 if (!empty($mysoc) && $mysoc->country_code ==
'ES') {
6105 $sql .=
" WHERE t.fk_pays = c.rowid AND c.code = '".$db->escape($buyer->country_code).
"'";
6107 $sql .=
" WHERE t.fk_pays = c.rowid AND c.code = '".$db->escape(empty($seller->country_code) ? $mysoc->country_code : $seller->country_code).
"'";
6109 $sql .=
" AND t.taux = ".((float) $vatratecleaned).
" AND t.active = 1";
6111 $sql .=
" AND t.code = '".$db->escape($vatratecode).
"'";
6115 $resql = $db->query($sql);
6117 $obj = $db->fetch_object(
$resql);
6120 $vateratestring = $obj->rate.($obj->code ?
' ('.$obj->code.
')' :
'');
6123 return array($obj->localtax1_type,
get_localtax($vateratestring, $local, $buyer, $seller), $obj->accountancy_code_sell, $obj->accountancy_code_buy);
6124 } elseif ($local == 2) {
6125 return array($obj->localtax2_type,
get_localtax($vateratestring, $local, $buyer, $seller), $obj->accountancy_code_sell, $obj->accountancy_code_buy);
6127 return array($obj->localtax1_type,
get_localtax($vateratestring, 1, $buyer, $seller), $obj->localtax2_type,
get_localtax($vateratestring, 2, $buyer, $seller), $obj->accountancy_code_sell, $obj->accountancy_code_buy);
6147 global $db, $conf, $mysoc;
6149 require_once DOL_DOCUMENT_ROOT.
'/product/class/product.class.php';
6157 $result = $product->fetch($idprod);
6159 if ($mysoc->country_code == $thirdpartytouse->country_code) {
6160 if ($idprodfournprice > 0) {
6161 $product->get_buyprice($idprodfournprice, 0, 0, 0);
6162 $ret = $product->vatrate_supplier;
6163 if ($product->default_vat_code) {
6164 $ret .=
' ('.$product->default_vat_code.
')';
6167 $ret = $product->tva_tx;
6168 if ($product->default_vat_code) {
6169 $ret .=
' ('.$product->default_vat_code.
')';
6180 if (empty($conf->global->MAIN_VAT_DEFAULT_IF_AUTODETECT_FAILS)) {
6182 $sql =
"SELECT t.taux as vat_rate, t.code as default_vat_code";
6183 $sql .=
" FROM ".MAIN_DB_PREFIX.
"c_tva as t, ".MAIN_DB_PREFIX.
"c_country as c";
6184 $sql .=
" WHERE t.active=1 AND t.fk_pays = c.rowid AND c.code='".$db->escape($thirdpartytouse->country_code).
"'";
6185 $sql .=
" ORDER BY t.taux DESC, t.code ASC, t.recuperableonly ASC";
6186 $sql .= $db->plimit(1);
6188 $resql = $db->query($sql);
6190 $obj = $db->fetch_object(
$resql);
6192 $ret = $obj->vat_rate;
6193 if ($obj->default_vat_code) {
6194 $ret .=
' ('.$obj->default_vat_code.
')';
6202 $ret = $conf->global->MAIN_VAT_DEFAULT_IF_AUTODETECT_FAILS;
6206 dol_syslog(
"get_product_vat_for_country: ret=".$ret);
6223 if (!class_exists(
'Product')) {
6224 require_once DOL_DOCUMENT_ROOT.
'/product/class/product.class.php';
6233 $result = $product->fetch($idprod);
6235 if ($mysoc->country_code == $thirdpartytouse->country_code) {
6249 $sql =
"SELECT taux as vat_rate, localtax1, localtax2";
6250 $sql .=
" FROM ".MAIN_DB_PREFIX.
"c_tva as t, ".MAIN_DB_PREFIX.
"c_country as c";
6251 $sql .=
" WHERE t.active=1 AND t.fk_pays = c.rowid AND c.code='".$db->escape($thirdpartytouse->country_code).
"'";
6252 $sql .=
" ORDER BY t.taux DESC, t.recuperableonly ASC";
6253 $sql .= $db->plimit(1);
6255 $resql = $db->query($sql);
6257 $obj = $db->fetch_object(
$resql);
6260 $ret = $obj->localtax1;
6261 } elseif ($local == 2) {
6262 $ret = $obj->localtax2;
6270 dol_syslog(
"get_product_localtax_for_country: ret=".$ret);
6294 require_once DOL_DOCUMENT_ROOT.
'/core/lib/company.lib.php';
6297 $seller_use_vat = ((is_numeric($thirdparty_seller->tva_assuj) && !$thirdparty_seller->tva_assuj) || (!is_numeric($thirdparty_seller->tva_assuj) && $thirdparty_seller->tva_assuj ==
'franchise')) ? 0 : 1;
6299 $seller_country_code = $thirdparty_seller->country_code;
6300 $seller_in_cee =
isInEEC($thirdparty_seller);
6302 $buyer_country_code = $thirdparty_buyer->country_code;
6303 $buyer_in_cee =
isInEEC($thirdparty_buyer);
6305 dol_syslog(
"get_default_tva: seller use vat=".$seller_use_vat.
", seller country=".$seller_country_code.
", seller in cee=".$seller_in_cee.
", buyer vat number=".$thirdparty_buyer->tva_intra.
" buyer country=".$buyer_country_code.
", buyer in cee=".$buyer_in_cee.
", idprod=".$idprod.
", idprodfournprice=".$idprodfournprice.
", SERVICE_ARE_ECOMMERCE_200238EC=".(!empty($conf->global->SERVICES_ARE_ECOMMERCE_200238EC) ? $conf->global->SERVICES_ARE_ECOMMERCE_200238EC :
''));
6309 if (!empty($conf->global->SERVICE_ARE_ECOMMERCE_200238EC)) {
6310 if ($seller_in_cee && $buyer_in_cee) {
6311 $isacompany = $thirdparty_buyer->
isACompany();
6312 if ($isacompany && !empty($conf->global->MAIN_USE_VAT_COMPANIES_IN_EEC_WITH_INVALID_VAT_ID_ARE_INDIVIDUAL)) {
6313 require_once DOL_DOCUMENT_ROOT.
'/core/lib/functions2.lib.php';
6327 if (!$seller_use_vat) {
6335 if (($seller_country_code == $buyer_country_code)
6336 || (in_array($seller_country_code, array(
'FR',
'MC')) && in_array($buyer_country_code, array(
'FR',
'MC')))) {
6346 if (($seller_in_cee && $buyer_in_cee)) {
6347 $isacompany = $thirdparty_buyer->
isACompany();
6348 if ($isacompany && !empty($conf->global->MAIN_USE_VAT_COMPANIES_IN_EEC_WITH_INVALID_VAT_ID_ARE_INDIVIDUAL)) {
6349 require_once DOL_DOCUMENT_ROOT.
'/core/lib/functions2.lib.php';
6366 if (!empty($conf->global->MAIN_USE_VAT_OF_PRODUCT_FOR_INDIVIDUAL_CUSTOMER_OUT_OF_EEC) && empty($buyer_in_cee)) {
6367 $isacompany = $thirdparty_buyer->
isACompany();
6395 if ($idprodfournprice > 0) {
6396 if (!class_exists(
'ProductFournisseur')) {
6397 require_once DOL_DOCUMENT_ROOT.
'/fourn/class/fournisseur.product.class.php';
6400 $prodprice->fetch_product_fournisseur_price($idprodfournprice);
6401 return $prodprice->fourn_tva_npr;
6402 } elseif ($idprod > 0) {
6403 if (!class_exists(
'Product')) {
6404 require_once DOL_DOCUMENT_ROOT.
'/product/class/product.class.php';
6407 $prod->fetch($idprod);
6408 return $prod->tva_npr;
6431 if (!is_object($thirdparty_seller)) {
6434 if (!is_object($thirdparty_buyer)) {
6439 if ($mysoc->country_code ==
'ES') {
6440 if (is_numeric($thirdparty_buyer->localtax1_assuj) && !$thirdparty_buyer->localtax1_assuj) {
6445 if (is_numeric($thirdparty_seller->localtax1_assuj) && !$thirdparty_seller->localtax1_assuj) {
6448 if (!is_numeric($thirdparty_seller->localtax1_assuj) && $thirdparty_seller->localtax1_assuj ==
'localtax1off') {
6452 } elseif ($local == 2) {
6454 if (is_numeric($thirdparty_seller->localtax2_assuj) && !$thirdparty_seller->localtax2_assuj) {
6457 if (!is_numeric($thirdparty_seller->localtax2_assuj) && $thirdparty_seller->localtax2_assuj ==
'localtax2off') {
6462 if ($thirdparty_seller->country_code == $thirdparty_buyer->country_code) {
6477 function yn($yesno, $case = 1, $color = 0)
6481 $result =
'unknown';
6483 if ($yesno == 1 || strtolower($yesno) ==
'yes' || strtolower($yesno) ==
'true') {
6484 $result = $langs->trans(
'yes');
6485 if ($case == 1 || $case == 3) {
6486 $result = $langs->trans(
"Yes");
6489 $result =
'<input type="checkbox" value="1" checked disabled>';
6492 $result =
'<input type="checkbox" value="1" checked disabled> '.$result;
6496 } elseif ($yesno == 0 || strtolower($yesno) ==
'no' || strtolower($yesno) ==
'false') {
6497 $result = $langs->trans(
"no");
6498 if ($case == 1 || $case == 3) {
6499 $result = $langs->trans(
"No");
6502 $result =
'<input type="checkbox" value="0" disabled>';
6505 $result =
'<input type="checkbox" value="0" disabled> '.$result;
6511 $classname =
'error';
6515 return '<span class="'.$classname.
'">'.$result.
'</span>';
6535 function get_exdir($num, $level, $alpha, $withoutslash, $object, $modulepart =
'')
6539 if (empty($modulepart) && !empty($object->module)) {
6540 $modulepart = $object->module;
6545 $arrayforoldpath = array(
'cheque',
'category',
'holiday',
'supplier_invoice',
'invoice_supplier',
'mailing',
'supplier_payment');
6546 if (!empty($conf->global->PRODUCT_USE_OLD_PATH_FOR_PHOTO)) {
6547 $arrayforoldpath[] =
'product';
6549 if (!empty($level) && in_array($modulepart, $arrayforoldpath)) {
6551 if (empty($alpha)) {
6552 $num = preg_replace(
'/([^0-9])/i',
'', $num);
6554 $num = preg_replace(
'/^.*\-/i',
'', $num);
6556 $num = substr(
"000".$num, -$level);
6558 $path = substr($num, 0, 1);
6561 $path = substr($num, 1, 1).
'/'.substr($num, 0, 1);
6564 $path = substr($num, 2, 1).
'/'.substr($num, 1, 1).
'/'.substr($num, 0, 1);
6574 if (empty($withoutslash) && !empty($path)) {
6593 dol_syslog(
"functions.lib::dol_mkdir: dir=".$dir, LOG_INFO);
6596 if (@is_dir($dir_osencoded)) {
6604 if (!empty($dataroot)) {
6606 $dir = str_replace($dataroot.
'/',
'', $dir);
6607 $ccdir = $dataroot.
'/';
6610 $cdir = explode(
"/", $dir);
6611 $num = count($cdir);
6612 for ($i = 0; $i < $num; $i++) {
6614 $ccdir .=
'/'.$cdir[$i];
6616 $ccdir .= $cdir[$i];
6618 if (preg_match(
"/^.:$/", $ccdir, $regs)) {
6626 if (!@is_dir($ccdir_osencoded)) {
6627 dol_syslog(
"functions.lib::dol_mkdir: Directory '".$ccdir.
"' does not exists or is outside open_basedir PHP setting.", LOG_DEBUG);
6630 $dirmaskdec = octdec((
string) $newmask);
6631 if (empty($newmask)) {
6632 $dirmaskdec = empty($conf->global->MAIN_UMASK) ? octdec(
'0755') : octdec($conf->global->MAIN_UMASK);
6634 $dirmaskdec |= octdec(
'0111');
6635 if (!@mkdir($ccdir_osencoded, $dirmaskdec)) {
6637 dol_syslog(
"functions.lib::dol_mkdir: Fails to create directory '".$ccdir.
"' or directory already exists.", LOG_WARNING);
6640 dol_syslog(
"functions.lib::dol_mkdir: Directory '".$ccdir.
"' created", LOG_DEBUG);
6649 return ($nberr ? -$nberr : $nbcreated);
6660 return '<span class="fieldrequired">*</span>';
6680 function dol_string_nohtmltag($stringtoclean, $removelinefeed = 1, $pagecodeto =
'UTF-8', $strip_tags = 0, $removedoublespaces = 1)
6682 if ($removelinefeed == 2) {
6683 $stringtoclean = preg_replace(
'/<br[^>]*>(\n|\r)+/ims',
'<br>', $stringtoclean);
6685 $temp = preg_replace(
'/<br[^>]*>/i',
"\n", $stringtoclean);
6690 $temp = str_replace(
'< ',
'__ltspace__', $temp);
6693 $temp = strip_tags($temp);
6696 $pattern =
"/<[^<>]+>/";
6703 $tempbis = str_replace(
'<>',
'', $temp);
6704 $tempbis = preg_replace($pattern,
'', $tempbis);
6706 }
while ($tempbis != $temp);
6711 $temp = preg_replace(
'/<+([a-z]+)/i',
'\1', $temp);
6717 if ($removelinefeed == 1) {
6718 $temp = str_replace(array(
"\r\n",
"\r",
"\n"),
" ", $temp);
6722 if ($removedoublespaces) {
6723 while (strpos($temp,
" ")) {
6724 $temp = str_replace(
" ",
" ", $temp);
6728 $temp = str_replace(
'__ltspace__',
'< ', $temp);
6748 $allowed_tags = array(
6749 "html",
"head",
"meta",
"body",
"article",
"a",
"abbr",
"b",
"blockquote",
"br",
"cite",
"div",
"dl",
"dd",
"dt",
"em",
"font",
"img",
"ins",
"hr",
"i",
"li",
"link",
6750 "ol",
"p",
"q",
"s",
"section",
"span",
"strike",
"strong",
"title",
"table",
"tr",
"th",
"td",
"u",
"ul",
"sup",
"sub",
"blockquote",
"pre",
"h1",
"h2",
"h3",
"h4",
"h5",
"h6",
6754 $allowed_tags[] =
"iframe";
6757 $allowed_tags_string = join(
"><", $allowed_tags);
6758 $allowed_tags_string =
'<'.$allowed_tags_string.
'>';
6760 $stringtoclean = str_replace(
'<!DOCTYPE html>',
'__!DOCTYPE_HTML__', $stringtoclean);
6765 $stringtoclean = preg_replace(
'/<!--([^>]*)-->/',
'<comment>\1</comment>', $stringtoclean);
6767 $stringtoclean = preg_replace(
'/:/i',
':', $stringtoclean);
6768 $stringtoclean = preg_replace(
'/:|�+58|:/i',
'', $stringtoclean);
6769 $stringtoclean = preg_replace(
'/javascript\s*:/i',
'', $stringtoclean);
6771 $temp = strip_tags($stringtoclean, $allowed_tags_string);
6773 if ($cleanalsosomestyles) {
6774 $temp = preg_replace(
'/position\s*:\s*(absolute|fixed)\s*!\s*important/i',
'', $temp);
6776 if ($removeclassattribute) {
6777 $temp = preg_replace(
'/(<[^>]+)\s+class=((["\']).*?\\3|\\w*)/i',
'\\1', $temp);
6782 if ($cleanalsojavascript) {
6783 $temp = preg_replace(
'/javascript\s*:/i',
'', $temp);
6786 $temp = str_replace(
'__!DOCTYPE_HTML__',
'<!DOCTYPE html>', $temp);
6788 $temp = preg_replace(
'/<comment>([^>]*)<\/comment>/',
'<!--\1-->', $temp);
6806 function dol_string_onlythesehtmlattributes($stringtoclean, $allowed_attributes = array(
"allow",
"allowfullscreen",
"alt",
"class",
"contenteditable",
"data-html",
"frameborder",
"height",
"href",
"id",
"name",
"src",
"style",
"target",
"title",
"width"))
6808 if (class_exists(
'DOMDocument') && !empty($stringtoclean)) {
6809 $stringtoclean =
'<?xml encoding="UTF-8"><html><body>'.$stringtoclean.
'</body></html>';
6811 $dom =
new DOMDocument(
null,
'UTF-8');
6812 $dom->loadHTML($stringtoclean, LIBXML_ERR_NONE|LIBXML_HTML_NOIMPLIED|LIBXML_HTML_NODEFDTD|LIBXML_NONET|LIBXML_NOWARNING|LIBXML_NOXMLDECL);
6814 if (is_object($dom)) {
6815 for ($els = $dom->getElementsByTagname(
'*'), $i = $els->length - 1; $i >= 0; $i--) {
6816 for ($attrs = $els->item($i)->attributes, $ii = $attrs->length - 1; $ii >= 0; $ii--) {
6818 if (! empty($attrs->item($ii)->name)) {
6820 if (! in_array($attrs->item($ii)->name, $allowed_attributes)) {
6821 $els->item($i)->removeAttribute($attrs->item($ii)->name);
6822 } elseif (in_array($attrs->item($ii)->name, array(
'style'))) {
6823 $valuetoclean = $attrs->item($ii)->value;
6825 if (isset($valuetoclean)) {
6827 $oldvaluetoclean = $valuetoclean;
6828 $valuetoclean = preg_replace(
'/\/\*.*\*\//m',
'', $valuetoclean);
6829 $valuetoclean = preg_replace(
'/position\s*:\s*[a-z]+/mi',
'', $valuetoclean);
6830 if ($els->item($i)->tagName ==
'a') {
6831 $valuetoclean = preg_replace(
'/display\s*://m',
'', $valuetoclean);
6832 $valuetoclean = preg_replace(
'/z-index\s*://m',
'', $valuetoclean);
6833 $valuetoclean = preg_replace(
'/\s+(top|left|right|bottom)\s*://m',
'', $valuetoclean);
6835 }
while ($oldvaluetoclean != $valuetoclean);
6838 $attrs->item($ii)->value = $valuetoclean;
6845 $return = $dom->saveHTML();
6848 $return = preg_replace(
'/^'.preg_quote(
'<?xml encoding="UTF-8">',
'/').
'/',
'', $return);
6849 $return = preg_replace(
'/^'.preg_quote(
'<html><body>',
'/').
'/',
'', $return);
6850 $return = preg_replace(
'/'.preg_quote(
'</body></html>',
'/').
'$/',
'', $return);
6851 return trim($return);
6853 return $stringtoclean;
6870 $temp = $stringtoclean;
6871 foreach ($disallowed_tags as $tagtoremove) {
6872 $temp = preg_replace(
'/<\/?'.$tagtoremove.
'>/',
'', $temp);
6873 $temp = preg_replace(
'/<\/?'.$tagtoremove.
'\s+[^>]*>/',
'', $temp);
6876 if ($cleanalsosomestyles) {
6877 $temp = preg_replace(
'/position\s*:\s*(absolute|fixed)\s*!\s*important/',
'', $temp);
6895 if ($nboflines == 1) {
6897 $firstline = preg_replace(
'/<br[^>]*>.*$/s',
'', $text);
6898 $firstline = preg_replace(
'/<div[^>]*>.*$/s',
'', $firstline);
6900 $firstline = preg_replace(
'/[\n\r].*/',
'', $text);
6902 return $firstline.((strlen($firstline) != strlen($text)) ?
'...' :
'');
6906 $text = preg_replace(
'/\n/',
'', $text);
6908 $repTable = array(
"\t" =>
" ",
"\n" =>
" ",
"\r" =>
" ",
"\0" =>
" ",
"\x0B" =>
" ");
6910 $repTable = array(
"\t" =>
" ",
"\n" =>
"<br>",
"\r" =>
" ",
"\0" =>
" ",
"\x0B" =>
" ");
6913 $text = strtr($text, $repTable);
6914 if ($charset ==
'UTF-8') {
6915 $pattern =
'/(<br[^>]*>)/Uu';
6918 $pattern =
'/(<br[^>]*>)/U';
6920 $a = preg_split($pattern, $text, -1, PREG_SPLIT_DELIM_CAPTURE | PREG_SPLIT_NO_EMPTY);
6925 while (($i < $nba) && ($i < ($nboflines * 2))) {
6927 $firstline .= $a[$i];
6928 } elseif (($i < (($nboflines * 2) - 1)) && ($i < ($nba - 1))) {
6929 $firstline .= ($ishtml ?
"<br>\n" :
"\n");
6934 return $firstline.(($i < $nba) ?
'...' :
'');
6949 function dol_nl2br($stringtoencode, $nl2brmode = 0, $forxml =
false)
6952 return nl2br($stringtoencode, $forxml);
6954 $ret = preg_replace(
'/(\r\n|\r|\n)/i', ($forxml ?
'<br />' :
'<br>'), $stringtoencode);
6977 function dol_htmlentitiesbr($stringtoencode, $nl2brmode = 0, $pagecodefrom =
'UTF-8', $removelasteolbr = 1)
6979 $newstring = $stringtoencode;
6981 $newstring = preg_replace(
'/<br(\s[\sa-zA-Z_="]*)?\/?>/i',
'<br>', $newstring);
6982 if ($removelasteolbr) {
6983 $newstring = preg_replace(
'/<br>$/i',
'', $newstring);
6985 $newstring = strtr($newstring, array(
'&'=>
'__and__',
'<'=>
'__lt__',
'>'=>
'__gt__',
'"'=>
'__dquot__'));
6987 $newstring = strtr($newstring, array(
'__and__'=>
'&',
'__lt__'=>
'<',
'__gt__'=>
'>',
'__dquot__'=>
'"'));
6989 if ($removelasteolbr) {
6990 $newstring = preg_replace(
'/(\r\n|\r|\n)$/i',
'', $newstring);
7009 $ret = preg_replace(
'/'.
"\r\n".
'<br(\s[\sa-zA-Z_="]*)?\/?>/i',
"<br>", $ret);
7010 $ret = preg_replace(
'/<br(\s[\sa-zA-Z_="]*)?\/?>'.
"\r\n".
'/i',
"\r\n", $ret);
7011 $ret = preg_replace(
'/<br(\s[\sa-zA-Z_="]*)?\/?>'.
"\n".
'/i',
"\n", $ret);
7012 $ret = preg_replace(
'/<br(\s[\sa-zA-Z_="]*)?\/?>/i',
"\n", $ret);