Wavyzz/dolibarr
2
0
Fork 1
mirror of https://github.com/Dolibarr/dolibarr.git synced 2025-12-06 01:28:19 +01:00
Code Issues Packages Projects Releases Wiki Activity

UIUX: Interpret first token as thousands separator 21.500,00 (when French, ...). (#33832)

Browse Source 
* Qual: Add testcase for price2num to convert '21.500,00' in FR

* NEW: Accept numbers like 1.213,00 in locales with whitespace/empty thousands separator

# NEW: Accept numbers like 1.213,00 in locales with whitespace/empty thousands separator

- Graceful handling of comma and dot as decimal points and thousands separators in the `price2num` function.
- Improved the `getNonEmptyString` function to include proper indentation and spacing (automatic).

* Add testcases for price2num

* en_US tests for invalid prices, add doc for price2num regex

* Restore lost test to validate compatibility

* Update FunctionsLibTest.php

---------

Co-authored-by: Laurent Destailleur <eldy@destailleur.fr>
This commit is contained in:
MDW
2025-04-21 11:57:13 +02:00
committed by GitHub
parent e013e1c1b4
commit 69e3d4b5df
2 changed files with 71 additions and 39 deletions
Download Patch File Download Diff File Expand all files Collapse all files

95
htdocs/core/lib/functions.lib.php
View File

@@ -403,38 +403,38 @@ function isModEnabled($module)
*/
function getWarningDelay($module, $parmlevel1, $parmlevel2 = '')
{
global $conf;
global $conf;
// For compatibility with bad naming on module
$moduletomoduletouse = array(
'invoice' => 'facture',
);
$moduleParmsMapping = array(
'product' => 'produit',
);
// For compatibility with bad naming on module
$moduletomoduletouse = array(
'invoice' => 'facture',
);
$moduleParmsMapping = array(
'product' => 'produit',
);
if (!empty($moduletomoduletouse[$module])) {
$module = $moduletomoduletouse[$module];
}
if (!empty($moduletomoduletouse[$module])) {
$module = $moduletomoduletouse[$module];
}
$warningDelayPath = $parmlevel1;
if (!empty($moduleParmsMapping[$warningDelayPath])) {
$warningDelayPath = $moduleParmsMapping[$warningDelayPath];
}
$warningDelayPath = $parmlevel1;
if (!empty($moduleParmsMapping[$warningDelayPath])) {
$warningDelayPath = $moduleParmsMapping[$warningDelayPath];
}
if ($parmlevel2) {
if (!empty($conf->$module->$warningDelayPath->warning_delay)) {
if (!empty($conf->$module->$warningDelayPath->$parmlevel2->warning_delay)) {
return (int) $conf->$module->$warningDelayPath->$parmlevel2->warning_delay;
}
}
} else {
if (!empty($conf->$module->$warningDelayPath->warning_delay)) {
return (int) $conf->$module->$warningDelayPath->$parmlevel1->warning_delay;
if ($parmlevel2) {
if (!empty($conf->$module->$warningDelayPath->warning_delay)) {
if (!empty($conf->$module->$warningDelayPath->$parmlevel2->warning_delay)) {
return (int) $conf->$module->$warningDelayPath->$parmlevel2->warning_delay;
}
}
} else {
if (!empty($conf->$module->$warningDelayPath->warning_delay)) {
return (int) $conf->$module->$warningDelayPath->$parmlevel1->warning_delay;
}
}
return 0;
return 0;
}
/**
@@ -2595,7 +2595,7 @@ function dol_syslog($message, $level = LOG_INFO, $ident = 0, $suffixinfilename =
$data['ip'] .= (($j == 1) ? ' [via ' : ',').$remoteip;
}
$data['ip'] .= (($j > 0) ? ']' : '');
} elseif (!empty($_SERVER['HTTP_CLIENT_IP']) ) {
} elseif (!empty($_SERVER['HTTP_CLIENT_IP'])) {
$tmpips = explode(',', $_SERVER['HTTP_CLIENT_IP']);
$data['ip'] = '';
$foundremoteip = 0;
@@ -7258,9 +7258,30 @@ function price2num($amount, $rounding = '', $option = 0)
}
//print "QQ".$amount."<br>\n";
// Now make replace (the main goal of function)
// Now make replaceents (the main goal of function)
if ($thousand != ',' && $thousand != '.') {
$amount = str_replace(',', '.', $amount); // To accept 2 notations for french users
// Accept the two types of decimal points french users (i.e., using ' ' for thousands)
// REGEX: Find the integral and decimal parts.
//
// We require that the decimal point only appears once in $amount.
// The regex `/^(?<int>[^,]*,|[^.]*\.)(?<dec>[^.,]*)$/u` can be broken down as follows:
// - `(?<int>[^,]*,|[^.]*\.)` is any accepted sequence up to the last potential decimal point '.' or ',' and named `int`.
// It covers two cases:
// - `[^,]*,`: Any sequence of characters that is not ',' with ',' accepted as the decimal point (from start of string because of earlier `^`);
// - `[^.]*\.`: Any sequence of characters that is not a '.' with '.' accepted as the decimal point (from start of string.
// - `(?<dec>[^.,]*)`: The sequence after the character accepted as the decimal point, not including it.
if (preg_match('/^(?<int>[^,]*,|[^.]*\.)(?<dec>[^.,]*)$/u', $amount, $matches)) {
$intPart = $matches['int'];
$decPart = $matches['dec'];
// Remove all commas and dots from intPart
$intPart = str_replace(['.', ','], '', $intPart);
// Combine intPart and decPart with a dot
$amount = $intPart . $dec . $decPart;
}
}
$amount = str_replace(' ', '', $amount); // To avoid spaces
@@ -12122,16 +12143,23 @@ function dolExplodeKeepIfQuotes($input)
* @return string
*/
static function ($a, $b, $c) {
if ($a !== '') return $a;
if ($b !== '') return $b;
if ($c !== '') return $c;
if ($a !== '') {
return $a;
}
if ($b !== '') {
return $b;
}
if ($c !== '') {
return $c;
}
return '';
},
$matches[1],
$matches[2],
$matches[3]
);
return array_values(array_filter($result,
return array_values(array_filter(
$result,
/**
* Filter out empty strings from the result array.
*
@@ -12140,7 +12168,8 @@ function dolExplodeKeepIfQuotes($input)
*/
static function ($val) {
return $val !== '';
}));
}
));
}