AggregateMoneyParser.php
4 years ago
BitcoinMoneyParser.php
4 years ago
DecimalMoneyParser.php
1 year ago
IntlLocalizedDecimalParser.php
1 year ago
IntlMoneyParser.php
1 year ago
IntlMoneyParser.php
98 lines
| 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 string into a Money object using intl extension. |
| 14 | * |
| 15 | * @author Frederik Bosch <f.bosch@genkgo.nl> |
| 16 | */ |
| 17 | final class IntlMoneyParser implements MoneyParser |
| 18 | { |
| 19 | /** |
| 20 | * @var \NumberFormatter |
| 21 | */ |
| 22 | private $formatter; |
| 23 | |
| 24 | /** |
| 25 | * @var Currencies |
| 26 | */ |
| 27 | private $currencies; |
| 28 | |
| 29 | public function __construct(\NumberFormatter $formatter, Currencies $currencies) |
| 30 | { |
| 31 | $this->formatter = $formatter; |
| 32 | $this->currencies = $currencies; |
| 33 | } |
| 34 | |
| 35 | /** |
| 36 | * {@inheritdoc} |
| 37 | */ |
| 38 | public function parse($money, $forceCurrency = null) |
| 39 | { |
| 40 | if (!is_string($money)) { |
| 41 | throw new ParserException('Formatted raw money should be string, e.g. $1.00'); |
| 42 | } |
| 43 | |
| 44 | $currency = null; |
| 45 | $decimal = $this->formatter->parseCurrency($money, $currency); |
| 46 | |
| 47 | if (false === $decimal) { |
| 48 | throw new ParserException('Cannot parse '.$money.' to Money. '.$this->formatter->getErrorMessage()); |
| 49 | } |
| 50 | |
| 51 | if (null !== $forceCurrency) { |
| 52 | $currency = $forceCurrency; |
| 53 | } else { |
| 54 | $currency = new Currency($currency); |
| 55 | } |
| 56 | |
| 57 | /* |
| 58 | * This conversion is only required whilst currency can be either a string or a |
| 59 | * Currency object. |
| 60 | */ |
| 61 | if (!$currency instanceof Currency) { |
| 62 | @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); |
| 63 | $currency = new Currency($currency); |
| 64 | } |
| 65 | |
| 66 | $decimal = (string) $decimal; |
| 67 | $subunit = $this->currencies->subunitFor($currency); |
| 68 | $decimalPosition = strpos($decimal, '.'); |
| 69 | |
| 70 | if (false !== $decimalPosition) { |
| 71 | $decimalLength = strlen($decimal); |
| 72 | $fractionDigits = $decimalLength - $decimalPosition - 1; |
| 73 | $decimal = str_replace('.', '', $decimal); |
| 74 | $decimal = Number::roundMoneyValue($decimal, $subunit, $fractionDigits); |
| 75 | |
| 76 | if ($fractionDigits > $subunit) { |
| 77 | $decimal = substr($decimal, 0, $decimalPosition + $subunit); |
| 78 | } elseif ($fractionDigits < $subunit) { |
| 79 | $decimal .= str_pad('', $subunit - $fractionDigits, '0'); |
| 80 | } |
| 81 | } else { |
| 82 | $decimal .= str_pad('', $subunit, '0'); |
| 83 | } |
| 84 | |
| 85 | if ('-' === $decimal[0]) { |
| 86 | $decimal = '-'.ltrim(substr($decimal, 1), '0'); |
| 87 | } else { |
| 88 | $decimal = ltrim($decimal, '0'); |
| 89 | } |
| 90 | |
| 91 | if ('' === $decimal) { |
| 92 | $decimal = '0'; |
| 93 | } |
| 94 | |
| 95 | return new Money($decimal, $currency); |
| 96 | } |
| 97 | } |
| 98 |