RoundingProvider::getRoundingMode() - Code Metrics - JordanRL/Fermat - Measure and Improve Code Quality continuously with Scrutinizer

RoundingProvider::getRoundingMode() A
last analyzed 2022-10-22 04:55 UTC

↳ Parent: RoundingProvider
Complexity

Conditions	1
Paths	1
Size

Total Lines	3
Code Lines	1
Duplication

Lines	0
Ratio	0 %
Code Coverage

Tests	2
CRAP Score	1
Importance

Changes
Metric	Value
cc	1
dl	0
loc	3
ccs	2
cts	2
cp	1
crap	1
rs	10
c	0
b	0
f	0
eloc	1
nc	1
nop	0
<?php

namespace Samsara\Fermat\Core\Provider;

use JetBrains\PhpStorm\ExpectedValues;
use JetBrains\PhpStorm\Pure;
use Samsara\Fermat\Core\Enums\RandomMode;
use Samsara\Fermat\Core\Enums\RoundingMode;
use Samsara\Fermat\Core\Provider\RoundingModeAdapters\ModeAdapterFactory;
use Samsara\Fermat\Core\Types\Base\Interfaces\Numbers\DecimalInterface;

/**
 *
 */
class RoundingProvider
{

    private static RoundingMode $mode = RoundingMode::HalfEven;

    /**
     * @param RoundingMode $mode
     * @return void
     */
    public static function setRoundingMode(
        RoundingMode $mode
    ): void
    {
        static::$mode = $mode;

    }

    /**
     * @return RoundingMode
     */
    public static function getRoundingMode(): RoundingMode
    {
        return self::$mode;
    }

    /**
     * @param string $decimal
     * @param int $places
     * @return string
     */
    public static function round(string $decimal, int $places = 0): string
    {
        $carry = 0;

        [
            $rawString,
            $roundedPart,
            $roundedPartString,
            $otherPart,
            $pos,
            $wholePart,
            $decimalPart,
            $currentPart,
            $isNegative
        ] = self::roundPreFormat($decimal, $places);

        $sign = $isNegative ? '-' : '';
        $imaginary = str_ends_with($decimal, 'i') ? 'i' : '';

        if (empty($decimalPart) && $places >= 0) {
            return $sign.$rawString.$imaginary;
        }

        do {
            if (!array_key_exists($pos, $roundedPart)) {
            if (!array_key_exists($pos, /** @scrutinizer ignore-type */ $roundedPart)) {
                break;
            }

            [$digit, $nextDigit, $remainder] = self::roundLoopStart(
                $roundedPart,
                /** @scrutinizer ignore-type */ $roundedPart,
                $otherPart,
                /** @scrutinizer ignore-type */ $otherPart,
                $roundedPartString,
                $pos,
                $carry,
                $currentPart
            );

            if ($carry == 0) {
                $roundingMode = ModeAdapterFactory::getAdapter(self::getRoundingMode(), $isNegative, $remainder);
                $carry = $roundingMode->determineCarry($digit, $nextDigit);
            } else {
                if ($digit > 9) {
                    $carry = 1;
                    $roundedPart[$pos] = '0';
                } else {
                    $carry = 0;
                    $roundedPart[$pos] = $digit;
                }
            }

            [$roundedPart, $otherPart, $pos, $carry, $currentPart] = self::roundLoopEnd(
                $roundedPart,
                /** @scrutinizer ignore-type */ $roundedPart,
                $otherPart,
                /** @scrutinizer ignore-type */ $otherPart,
                $pos,
                $carry,
                $currentPart
            );
        } while ($carry == 1);

        [$newWholePart, $newDecimalPart] = self::roundPostFormat($currentPart, $wholePart, $roundedPart, $otherPart, $places);
        [$newWholePart, $newDecimalPart] = self::roundPostFormat(/** @scrutinizer ignore-type */ $currentPart, $wholePart, $roundedPart, $otherPart, $places);

        return $sign.$newWholePart.'.'.$newDecimalPart.$imaginary;
    }

    /**
     * @param string $decimal
     * @param int $places
     * @return array
     */
    private static function roundPreFormat(string $decimal, int $places): array
    {
        $decimal = trim(rtrim($decimal));

        $isNegative = str_starts_with($decimal, '-');

        $rawString = str_replace('-', '', $decimal);

        if (str_contains($rawString, '.')) {
            [$wholePart, $decimalPart] = explode('.', $rawString);
        } else {
            $wholePart = $rawString;
            $decimalPart = '';
        }

        $absPlaces = abs($places);

        $currentPart = $places >= 0;

        if ($currentPart) {
            $roundedPart = str_split($decimalPart);
            $roundedPartString = $decimalPart;
            $otherPart = str_split($wholePart);
            $baseLength = strlen($decimalPart)-1;
            $pos = ($absPlaces > $baseLength && $places < 0) ? $baseLength : $places;
        } else {
            $roundedPart = str_split($wholePart);
            $roundedPartString = $wholePart;
            $otherPart = str_split($decimalPart);
            $baseLength = strlen($wholePart);
            $pos = ($absPlaces >= $baseLength) ? 0 : $baseLength + $places;
        }

        return [
            $rawString,
            $roundedPart,
            $roundedPartString,
            $otherPart,
            $pos,
            $wholePart,
            $decimalPart,
            $currentPart,
            $isNegative
        ];
    }

    /**
     * @param string $currentPart
     * @param string $wholePart
     * @param array $roundedPart
     * @param array $otherPart
     * @param int $places
     * @return array
     */
    private static function roundPostFormat(
        string $currentPart,
        string $wholePart,
        array $roundedPart,
        array $otherPart,
        int $places
    ): array
    {
        if ($currentPart) {
            $newDecimalPart = implode('', $roundedPart);
            $newWholePart = implode('', $otherPart);
        } else {
            $newDecimalPart = implode('', $otherPart);
            $newWholePart = implode('', $roundedPart);
        }

        if ($places > 0) {
            $newDecimalPart = substr($newDecimalPart, 0, $places);
        } elseif ($places == 0) {
            $newDecimalPart = '0';
        } else {
            $newWholePart = substr($newWholePart, 0, strlen($wholePart)+$places).str_repeat('0', $places*-1);
            $newDecimalPart = '0';
        }

        if (!strlen(str_replace('0', '', $newDecimalPart))) {
            $newDecimalPart = '0';
        }

        return [$newWholePart, $newDecimalPart];
    }

    /**
     * @param array $roundedPart
     * @param array $otherPart
     * @param string $roundedPartString
     * @param int $pos
     * @param int $carry
     * @param bool $currentPart
     * @return array
     */
    private static function roundLoopStart(
        array $roundedPart,
        array $otherPart,
        string $roundedPartString,
        int $pos,
        int $carry,
        bool $currentPart
    ): array
    {
        $digit = (int)$roundedPart[$pos] + $carry;

        if ($carry == 0 && $digit == 5 && strlen($roundedPartString) > $pos+1) {
            $remainder = substr($roundedPartString, $pos+1);
        } else {
            $remainder = null;
        }

        if ($pos == 0) {
            if ($currentPart) {
                $nextDigit = (int)$otherPart[count($otherPart)-1];
            } else {
                $nextDigit = 0;
            }
        } else {
            $nextDigit = (int)$roundedPart[$pos-1];
        }

        return [$digit, $nextDigit, $remainder];
    }

    /**
     * @param array $roundedPart
     * @param array $otherPart
     * @param int $pos
     * @param int $carry
     * @param bool $currentPart
     * @return array
     */
    private static function roundLoopEnd(
        array $roundedPart,
        array $otherPart,
        int $pos,
        int $carry,
        bool $currentPart
    ): array
    {
        if ($pos == 0 && $carry == 1) {
            if ($currentPart) {
                $currentPart = false;

                // Do the variable swap dance
                $temp = $otherPart;
                $otherPart = $roundedPart;
                $roundedPart = $temp;

                $pos = count($roundedPart)-1;
            } else {
                array_unshift($roundedPart, $carry);
                $carry = 0;
            }
        } else {
            $pos -= 1;
        }

        return [$roundedPart, $otherPart, $pos, $carry, $currentPart];
    }

}
JordanRL / Fermat

RoundingProvider::getRoundingMode() A last analyzed 2022-10-22 04:55 UTC

Complexity

Size

Duplication

Code Coverage

Importance

Duplication Side-by-Side

Filter issues like

RoundingProvider::getRoundingMode() A
last analyzed 2022-10-22 04:55 UTC
