| 1 |
<?php |
| 2 |
|
| 3 |
namespace Money\Parser; |
| 4 |
|
| 5 |
use Money\Currencies; |
| 6 |
use Money\Currency; |
| 7 |
use Money\Exception\ParserException; |
| 8 |
use Money\Money; |
| 9 |
use Money\MoneyParser; |
| 10 |
use Money\Number; |
| 11 |
|
| 12 |
/** |
| 13 |
* Parses a decimal string into a Money object. |
| 14 |
* |
| 15 |
* @author Teoh Han Hui <teohhanhui@gmail.com> |
| 16 |
*/ |
| 17 |
final class DecimalMoneyParser implements MoneyParser |
| 18 |
{ |
| 19 |
const DECIMAL_PATTERN = '/^(?P<sign>-)?(?P<digits>0|[1-9]\d*)?\.?(?P<fraction>\d+)?$/'; |
| 20 |
|
| 21 |
/** |
| 22 |
* @var Currencies |
| 23 |
*/ |
| 24 |
private $currencies; |
| 25 |
|
| 26 |
public function __construct(Currencies $currencies) |
| 27 |
{ |
| 28 |
$this->currencies = $currencies; |
| 29 |
} |
| 30 |
|
| 31 |
/** |
| 32 |
* {@inheritdoc} |
| 33 |
*/ |
| 34 |
public function parse($money, $forceCurrency = null) |
| 35 |
{ |
| 36 |
if (!is_string($money)) { |
| 37 |
throw new ParserException('Formatted raw money should be string, e.g. 1.00'); |
| 38 |
} |
| 39 |
|
| 40 |
if (null === $forceCurrency) { |
| 41 |
throw new ParserException('DecimalMoneyParser cannot parse currency symbols. Use forceCurrency argument'); |
| 42 |
} |
| 43 |
|
| 44 |
/* |
| 45 |
* This conversion is only required whilst currency can be either a string or a |
| 46 |
* Currency object. |
| 47 |
*/ |
| 48 |
$currency = $forceCurrency; |
| 49 |
if (!$currency instanceof Currency) { |
| 50 |
@trigger_error('Passing a currency as string is deprecated since 3.1 and will be removed in 4.0. Please pass a '.Currency::class.' instance instead.', E_USER_DEPRECATED); |
| 51 |
$currency = new Currency($currency); |
| 52 |
} |
| 53 |
|
| 54 |
$decimal = trim($money); |
| 55 |
|
| 56 |
if ($decimal === '') { |
| 57 |
return new Money(0, $currency); |
| 58 |
} |
| 59 |
|
| 60 |
$subunit = $this->currencies->subunitFor($currency); |
| 61 |
|
| 62 |
if (!preg_match(self::DECIMAL_PATTERN, $decimal, $matches) || !isset($matches['digits'])) { |
| 63 |
throw new ParserException(sprintf('Cannot parse "%s" to Money.', $decimal)); |
| 64 |
} |
| 65 |
|
| 66 |
$negative = isset($matches['sign']) && $matches['sign'] === '-'; |
| 67 |
|
| 68 |
$decimal = $matches['digits']; |
| 69 |
|
| 70 |
if ($negative) { |
| 71 |
$decimal = '-'.$decimal; |
| 72 |
} |
| 73 |
|
| 74 |
if (isset($matches['fraction'])) { |
| 75 |
$fractionDigits = strlen($matches['fraction']); |
| 76 |
$decimal .= $matches['fraction']; |
| 77 |
$decimal = Number::roundMoneyValue($decimal, $subunit, $fractionDigits); |
| 78 |
|
| 79 |
if ($fractionDigits > $subunit) { |
| 80 |
$decimal = substr($decimal, 0, $subunit - $fractionDigits); |
| 81 |
} elseif ($fractionDigits < $subunit) { |
| 82 |
$decimal .= str_pad('', $subunit - $fractionDigits, '0'); |
| 83 |
} |
| 84 |
} else { |
| 85 |
$decimal .= str_pad('', $subunit, '0'); |
| 86 |
} |
| 87 |
|
| 88 |
if ($negative) { |
| 89 |
$decimal = '-'.ltrim(substr($decimal, 1), '0'); |
| 90 |
} else { |
| 91 |
$decimal = ltrim($decimal, '0'); |
| 92 |
} |
| 93 |
|
| 94 |
if ($decimal === '' || $decimal === '-') { |
| 95 |
$decimal = '0'; |
| 96 |
} |
| 97 |
|
| 98 |
return new Money($decimal, $currency); |
| 99 |
} |
| 100 |
} |
| 101 |
|
