You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
157 lines
6.2 KiB
157 lines
6.2 KiB
<?php
|
|
|
|
// (c) Copyright by authors of the Tiki Wiki CMS Groupware Project
|
|
//
|
|
// All Rights Reserved. See copyright.txt for details and a complete list of authors.
|
|
// Licensed under the GNU LESSER GENERAL PUBLIC LICENSE. See license.txt for details.
|
|
// $Id$
|
|
|
|
/**
|
|
* Smarty plugin
|
|
* @package Smarty
|
|
* @subpackage plugins
|
|
*/
|
|
|
|
/**
|
|
* Smarty money_format modifier plugin
|
|
*
|
|
* Type: modifier<br>
|
|
* Name: money_format<br>
|
|
* Purpose: Format a currency amount.
|
|
* Mimics money_format, which can't be used on windows servers, with some enhancements for alignment.
|
|
* Copyright: Based on code posted at http://www.php.net/manual/en/function.money-format.php#89060
|
|
* by Rafael M. Salvioni on 19-Feb-2009 08:20.
|
|
* All documentation and comments on that site are covered by the
|
|
* Creative Commons Attribution 3.0 License, copyright (c) the PHP Documentation Group.
|
|
* See http://www.php.net/license/index.php#web-lic and http://creativecommons.org/licenses/by/3.0/
|
|
* @link based on money_format(): http://www.php.net/manual/en/function.money-format.php#89060
|
|
* @author lindon
|
|
* @param number
|
|
* @param locale: currency locale for formatting (default=en_US)
|
|
* @param format: format string
|
|
* @oaram all: whether all amounts in list have a currency symbol or on first item
|
|
* @return formatted number
|
|
*/
|
|
|
|
function smarty_modifier_money_format($number, $local, $currency, $format = '%(#10n', $display = 0)
|
|
{
|
|
|
|
if (! empty($local)) {
|
|
$ret = setlocale(LC_MONETARY, $local);
|
|
if ($ret === false) {
|
|
Feedback::error(tr('"%0" is not supported by this system.', $local));
|
|
return $number;
|
|
}
|
|
}
|
|
|
|
if (! extension_loaded('intl')) {
|
|
Feedback::error(tr('The PHP "intl" extension is required for "money_format".'));
|
|
return $number;
|
|
}
|
|
|
|
$locale = localeconv();
|
|
|
|
if (! empty($currency)) {
|
|
$locale['int_curr_symbol'] = $currency;
|
|
$fmt = new NumberFormatter(locale_get_default() . "@currency=$currency", NumberFormatter::CURRENCY);
|
|
$locale['currency_symbol'] = $fmt->getSymbol(NumberFormatter::CURRENCY_SYMBOL);
|
|
}
|
|
|
|
//regex for format string
|
|
$regex = '/%((?:[\^!\-]|\+|\(|\=.)*)([0-9]+)?' .
|
|
'(?:#([0-9]+))?(?:\.([0-9]+))?([in%])/';
|
|
preg_match_all($regex, $format, $matches, PREG_SET_ORDER);
|
|
foreach ($matches as $fmatch) {
|
|
$value = (float)$number;
|
|
$flags = [
|
|
'fillchar' => preg_match('/\=(.)/', $fmatch[1], $match) ?
|
|
$match[1] : ' ',
|
|
'nogroup' => preg_match('/\^/', $fmatch[1]) > 0,
|
|
'usesignal' => preg_match('/\+|\(/', $fmatch[1], $match) ?
|
|
$match[0] : '+',
|
|
'nosimbol' => preg_match('/\!/', $fmatch[1]) > 0,
|
|
'isleft' => preg_match('/\-/', $fmatch[1]) > 0,
|
|
];
|
|
$width = trim($fmatch[2]) ? (int) $fmatch[2] : 0;
|
|
$left = trim($fmatch[3]) ? (int) $fmatch[3] : 0;
|
|
$right = trim($fmatch[4]) ? (int) $fmatch[4] : $locale['int_frac_digits'];
|
|
$conversion = $fmatch[5];
|
|
|
|
$positive = true;
|
|
if ($value < 0) {
|
|
$positive = false;
|
|
$value *= -1;
|
|
}
|
|
$letter = $positive ? 'p' : 'n';
|
|
|
|
$prefix = $suffix = $cprefix = $csuffix = $signal = '';
|
|
$signal = $positive ? $locale['positive_sign'] : $locale['negative_sign'];
|
|
|
|
switch (true) {
|
|
case $locale["{$letter}_sign_posn"] == 1 && $flags['usesignal'] == '+':
|
|
$prefix = $signal;
|
|
break;
|
|
case $locale["{$letter}_sign_posn"] == 2 && $flags['usesignal'] == '+':
|
|
$suffix = $signal;
|
|
break;
|
|
case $locale["{$letter}_sign_posn"] == 3 && $flags['usesignal'] == '+':
|
|
$cprefix = $signal;
|
|
break;
|
|
case $locale["{$letter}_sign_posn"] == 4 && $flags['usesignal'] == '+':
|
|
$csuffix = $signal;
|
|
break;
|
|
case $flags['usesignal'] == '(':
|
|
case $locale["{$letter}_sign_posn"] == 0:
|
|
if ($positive == false) {
|
|
$prefix = '(';
|
|
$suffix = ')';
|
|
}
|
|
break;
|
|
}
|
|
|
|
if (! $flags['nosimbol']) {
|
|
$currency = $cprefix . ($conversion == 'i' ? $locale['int_curr_symbol'] : $locale['currency_symbol']) . $csuffix;
|
|
} else {
|
|
$currency = '';
|
|
}
|
|
|
|
if (! empty($currency) && $display == 0) {
|
|
$currency = '<span style="visibility:hidden">' . $currency . '</span>';
|
|
}
|
|
|
|
$space = $locale["{$letter}_sep_by_space"] && ! empty($currency) && $display == 1 ? ' ' : '';
|
|
|
|
$value = number_format(
|
|
$value,
|
|
$right,
|
|
$locale['mon_decimal_point'],
|
|
$flags['nogroup'] ? '' : $locale['mon_thousands_sep']
|
|
);
|
|
$value = @explode($locale['mon_decimal_point'], $value);
|
|
|
|
$n = strlen($prefix) + strlen($currency) + strlen($value[0]);
|
|
if ($left > 0 && $left > $n) {
|
|
$value[0] = str_repeat($flags['fillchar'], $left - $n) . $value[0];
|
|
}
|
|
$value = implode($locale['mon_decimal_point'], $value);
|
|
|
|
if ($locale["{$letter}_cs_precedes"]) {
|
|
$value = $prefix . $currency . $space . $value . $suffix;
|
|
//create right pad for alignment
|
|
$rightpad = empty($suffix) && $flags['usesignal'] == '(' ? ')' : '';
|
|
} else {
|
|
$value = $prefix . $value . $space . $currency . $suffix;
|
|
//create right pad for alignment
|
|
$rightpad = $locale['n_sep_by_space'] == true && $locale['n_cs_precedes'] == false && strlen($space) == 0 ? ' ' : '';
|
|
$currpad = $conversion == 'i' ? $locale['int_curr_symbol'] : $locale['currency_symbol'];
|
|
$rightpad .= ($locale['p_cs_precedes'] == false || $locale['n_cs_precedes'] == false) && empty($currency) ? $currpad : '';
|
|
$rightpad .= empty($suffix) && $flags['usesignal'] == '(' ? ')' : '';
|
|
}
|
|
|
|
$format = str_replace($fmatch[0], $value, $format);
|
|
if (! empty($rightpad) && $display == 0) {
|
|
$format .= '<span style="visibility:hidden">' . $rightpad . '</span>';
|
|
}
|
|
}
|
|
return $format;
|
|
}
|