lambda::partial() - Code Metrics - Ariadne-CMS/arc-base - Measure and Improve Code Quality continuously with Scrutinizer

lambda::partial() A
last analyzed 2020-10-26 14:30 UTC

↳ Parent: lambda

Complexity

Conditions	1
Paths	1

Size

Total Lines

Duplication

Lines	0
Ratio	0 %

Code Coverage

Tests	2
CRAP Score	1

Importance

Changes

Metric	Value
cc	1
nc	1
nop	3
dl	0
loc	4
ccs	2
cts	2
cp	1
crap	1
rs	10
c	0
b	0
f	0

<?php
/*
 * This file is part of the Ariadne Component Library.
 *
 * (c) Muze <[email protected]>
 *
 * For the full copyright and license information, please view the LICENSE
 * file that was distributed with this source code.
 */
namespace arc;

function singleton($f) {
    return function () use ($f) {
        static $result;
        if (null === $result) {
            if ( $f instanceof \Closure && isset($this) ) {

                $f = \Closure::bind($f, $this);
$x = 1;
$callable = function() use ($x) {
    $x = 2; // Not visible in outer scope. If you would like this, how
            // about using a different variable name than $x?
};

$callable();
var_dump($x); // integer(1)
            }
            $result = $f();
        }
        return $result;
    };
}

function partial(callable $callable, $partialArgs, $defaultArgs=[] ) {
    $partialMerge = function($partialArgs, $addedArgs, $defaultArgs = [])
    {
        end( $partialArgs );
        $l = key( $partialArgs );
        for ($i = 0; $i <= $l; $i++) {
            if (!array_key_exists($i, $partialArgs) && count($addedArgs)) {
                $partialArgs[ $i ] = array_shift( $addedArgs );
            }
        }
        if (count($addedArgs)) { // there are $addedArgs left, so there should be no 'holes' in $partialArgs
            $partialArgs =array_merge( $partialArgs, $addedArgs );
        }
        // fill any 'holes' in $partialArgs with entries from $defaultArgs
        $result =  array_replace( $defaultArgs, $partialArgs );
        ksort($result);

        return $result;
    };

    return function() use ($callable, $partialArgs, $defaultArgs, $partialMerge) {
        if ( $callable instanceof \Closure && isset($this) ) {

            $callable = \Closure::bind($callable, $this);
$x = 1;
$callable = function() use ($x) {
    $x = 2; // Not visible in outer scope. If you would like this, how
            // about using a different variable name than $x?
};

$callable();
var_dump($x); // integer(1)
        }
        return call_user_func_array( $callable, $partialMerge( $partialArgs, func_get_args(), $defaultArgs ) );
    };
}

/**
 * Class lambda
 * Experimental functionality, may be removed later, use at own risk.
 * @package arc
 */
class lambda
{
    /**
     * Returns a function with the given arguments already entered or partially applied.
     * @param callable $callable The function to curry
     * @param array $partialArgs unlimited Optional arguments to curry the function with
     * @param array $defaultArgs optional default values
     * @return callable
     */
    public static function partial(callable $callable, $partialArgs, $defaultArgs = [])
    {
        return partial($callable, $partialArgs, $defaultArgs);
    }


    /**
     * Returns a function with named arguments. The peppered function accepts one argument - a named array of values
     * @param callable $callable The function or method to pepper
     * @param array $namedArgs Optional. The named arguments to pepper the function with, the order must be the order
     *        in which the unpeppered function expects them. If not set, pepper will use Reflection to get them.
     *        Format is [ 'argumentName' => 'defaultValue' ]
     * @return callable
     */
    public static function pepper(callable $callable, $namedArgs=null)
    {
        if ( !is_array( $namedArgs ) ) {
            $ref = !is_array($callable) ? new \ReflectionFunction($callable) : new \ReflectionMethod($callable[0], $callable[1]);
            $namedArgs = [];
            foreach ($ref->getParameters() as $parameter) {
                $namedArgs[ $parameter->getName() ] = $parameter->getDefaultValue();
            }
        }

        return function ($otherArgs) use ($callable, $namedArgs) {
            $args = array_values( array_merge( $namedArgs, $otherArgs ) );
            return call_user_func_array( $callable, $args );
        };
    }

    /**
    * Returns a method that will generate and call the given function only once and return its result for every call.
    * The first call generates the result. Each subsequent call simply returns that same result. This allows you
    * to create in-context singletons for any kind of object.
    * <code>
    *   $proto = \arc\lambda::prototype([
    *     'getSingleton' => \arc\lambda::singleton( function () {
    *       return new ComplexObject();
    *     })
    *   ]);
    * </code>
    * @param callable $f The function to generate the singleton.
    * @return mixed The singleton.
    */
    public static function singleton($f)
    {
        return singleton($f);
    }

}


1		<?php
2		/*
3		* This file is part of the Ariadne Component Library.
4		*
5		* (c) Muze <[email protected]>
6		*
7		* For the full copyright and license information, please view the LICENSE
8		* file that was distributed with this source code.
9		*/
10		namespace arc;
11
12	1	function singleton($f) {
13	2	return function () use ($f) {
14	2	static $result;
15	2	if (null === $result) {
16	2	if ( $f instanceof \Closure && isset($this) ) {
		0 ignored issues – show Bug introduced 2015-12-18 13:35 UTC by Report Bug Copy Issue Report The variable `$this` seems to never exist, and therefore `isset` should always return `false`. Did you maybe rename this variable? This check looks for calls to `isset(...)` or `empty()` on variables that are yet undefined. These calls will always produce the same result and can be removed. This is most likely caused by the renaming of a variable or the removal of a function/method parameter. Loading history...
17		$f = \Closure::bind($f, $this);
		0 ignored issues – show Bug introduced 2015-12-18 13:35 UTC by Report Bug Copy Issue Report Consider using a different name than the imported variable `$f`, or did you forget to import by reference? It seems like you are assigning to a variable which was imported through a `use` statement which was not imported by reference. For clarity, we suggest to use a different name or import by reference depending on whether you would like to have the change visibile in outer-scope. Change not visible in outer-scope $x = 1; $callable = function() use ($x) { $x = 2; // Not visible in outer scope. If you would like this, how // about using a different variable name than $x? }; $callable(); var_dump($x); // integer(1) Change visible in outer-scope $x = 1; $callable = function() use (&$x) { $x = 2; }; $callable(); var_dump($x); // integer(2) Loading history...
18		}
19	2	$result = $f();
20		}
21	2	return $result;
22	2	};
23		}
24
25	1	function partial(callable $callable, $partialArgs, $defaultArgs=[] ) {
26	4	$partialMerge = function($partialArgs, $addedArgs, $defaultArgs = [])
27		{
28	4	end( $partialArgs );
29	4	$l = key( $partialArgs );
30	4	for ($i = 0; $i <= $l; $i++) {
31	4	if (!array_key_exists($i, $partialArgs) && count($addedArgs)) {
32	4	$partialArgs[ $i ] = array_shift( $addedArgs );
33		}
34		}
35	4	if (count($addedArgs)) { // there are $addedArgs left, so there should be no 'holes' in $partialArgs
36		$partialArgs =array_merge( $partialArgs, $addedArgs );
37		}
38		// fill any 'holes' in $partialArgs with entries from $defaultArgs
39	4	$result = array_replace( $defaultArgs, $partialArgs );
40	4	ksort($result);
41
42	4	return $result;
43	4	};
44
45	4	return function() use ($callable, $partialArgs, $defaultArgs, $partialMerge) {
46	4	if ( $callable instanceof \Closure && isset($this) ) {
		0 ignored issues – show Bug introduced 2015-12-18 13:35 UTC by Report Bug Copy Issue Report The variable `$this` seems to never exist, and therefore `isset` should always return `false`. Did you maybe rename this variable? This check looks for calls to `isset(...)` or `empty()` on variables that are yet undefined. These calls will always produce the same result and can be removed. This is most likely caused by the renaming of a variable or the removal of a function/method parameter. Loading history...
47		$callable = \Closure::bind($callable, $this);
		0 ignored issues – show Bug introduced 2015-12-18 13:35 UTC by Report Bug Copy Issue Report Consider using a different name than the imported variable `$callable`, or did you forget to import by reference? It seems like you are assigning to a variable which was imported through a `use` statement which was not imported by reference. For clarity, we suggest to use a different name or import by reference depending on whether you would like to have the change visibile in outer-scope. Change not visible in outer-scope $x = 1; $callable = function() use ($x) { $x = 2; // Not visible in outer scope. If you would like this, how // about using a different variable name than $x? }; $callable(); var_dump($x); // integer(1) Change visible in outer-scope $x = 1; $callable = function() use (&$x) { $x = 2; }; $callable(); var_dump($x); // integer(2) Loading history...
48		}
49	4	return call_user_func_array( $callable, $partialMerge( $partialArgs, func_get_args(), $defaultArgs ) );
50	4	};
51		}
52
53		/**
54		* Class lambda
55		* Experimental functionality, may be removed later, use at own risk.
56		* @package arc
57		*/
58		class lambda
59		{
60		/**
61		* Returns a function with the given arguments already entered or partially applied.
62		* @param callable $callable The function to curry
63		* @param array $partialArgs unlimited Optional arguments to curry the function with
64		* @param array $defaultArgs optional default values
65		* @return callable
66		*/
67	4	public static function partial(callable $callable, $partialArgs, $defaultArgs = [])
68		{
69	4	return partial($callable, $partialArgs, $defaultArgs);
70		}
71
72
73		/**
74		* Returns a function with named arguments. The peppered function accepts one argument - a named array of values
75		* @param callable $callable The function or method to pepper
76		* @param array $namedArgs Optional. The named arguments to pepper the function with, the order must be the order
77		* in which the unpeppered function expects them. If not set, pepper will use Reflection to get them.
78		* Format is [ 'argumentName' => 'defaultValue' ]
79		* @return callable
80		*/
81	2	public static function pepper(callable $callable, $namedArgs=null)
82		{
83	2	if ( !is_array( $namedArgs ) ) {
84		$ref = !is_array($callable) ? new \ReflectionFunction($callable) : new \ReflectionMethod($callable[0], $callable[1]);
85		$namedArgs = [];
86		foreach ($ref->getParameters() as $parameter) {
87		$namedArgs[ $parameter->getName() ] = $parameter->getDefaultValue();
88		}
89		}
90
91	2	return function ($otherArgs) use ($callable, $namedArgs) {
92	2	$args = array_values( array_merge( $namedArgs, $otherArgs ) );
93	2	return call_user_func_array( $callable, $args );
94	2	};
95		}
96
97		/**
98		* Returns a method that will generate and call the given function only once and return its result for every call.
99		* The first call generates the result. Each subsequent call simply returns that same result. This allows you
100		* to create in-context singletons for any kind of object.
101		* <code>
102		* $proto = \arc\lambda::prototype([
103		* 'getSingleton' => \arc\lambda::singleton( function () {
104		* return new ComplexObject();
105		* })
106		* ]);
107		* </code>
108		* @param callable $f The function to generate the singleton.
109		* @return mixed The singleton.
110		*/
111	2	public static function singleton($f)
112		{
113	2	return singleton($f);
114		}
115
116		}
117

Ariadne-CMS / arc-base

lambda::partial() A last analyzed 2020-10-26 14:30 UTC

Complexity

Size

Duplication

Code Coverage

Importance

Change not visible in outer-scope

Change visible in outer-scope

Change not visible in outer-scope

Change visible in outer-scope

Duplication Side-by-Side

Filter issues like

lambda::partial() A
last analyzed 2020-10-26 14:30 UTC