webadmin.php

/var/www/html_us/wp-content/plugins/wp-smtp/vendor/stellarwp/arrays/src/Arrays/Arr.php

<?php

namespace StellarWP\Arrays;

use ArrayAccess;
use Closure;
use InvalidArgumentException;

/**
 * Array utilities
 */
class Arr {
    /**
     * Determines if the given value is array accessible.
     *
     * @param mixed $value
     *
     * @return bool
     */
    public static function accessible( $value ): bool {
        return is_array( $value ) || $value instanceof ArrayAccess;
    }

    /**
     * Add an element to an array using "dot" notation if it doesn't exist.
     *
     * @param array            $array
     * @param string|int|float $key
     * @param mixed            $value
     *
     * @return array
     */
    public static function add( $array, $key, $value ) {
        $key = explode( '.', $key );
        $key = static::wrap( $key );
        if ( is_null( static::get( $array, $key ) ) ) {
            $array = static::set( $array, $key, $value );
        }

        return $array;
    }

    /**
     * Duplicates any key not prefixed with '_' creating a prefixed duplicate one.
     *
     * The prefixing and duplication is recursive.
     *
     * @since 1.0.0
     *
     * @param mixed $array     The array whose keys should be duplicated.
     * @param bool  $recursive Whether the prefixing and duplication should be
     *                         recursive or shallow.
     *
     * @return array|mixed The array with the duplicate, prefixed, keys or the
     *               original input if not an array.
     */
    public static function add_prefixed_keys_to( $array, bool $recursive = false ) {
        if ( ! is_array( $array ) ) {
            return $array;
        }

        $prefixed = [];
        foreach ( $array as $key => $value ) {
            if ( $recursive && is_array( $value ) ) {
                $value = self::add_prefixed_keys_to( $value, true );
                // And also add it to the original array.
                $array[ $key ] = array_merge( $array[ $key ], $value );
            }

            if ( 0 === strpos( $key, '_' ) ) {
                continue;
            }

            $prefixed[ '_' . $key ] = $value;
        }

        return array_merge( $array, $prefixed );
    }

    /**
     * Duplicates any key prefixed with '_' creating an un-prefixed duplicate one.
     *
     * The un-prefixing and duplication is recursive.
     *
     * @since 1.0.0
     *
     * @param mixed $array     The array whose keys should be duplicated.
     * @param bool  $recursive Whether the un-prefixing and duplication should be
     *                         recursive or shallow.
     *
     * @return mixed|array The array with the duplicate, unprefixed, keys or the
     *               original input if not an array.
     */
    public static function add_unprefixed_keys_to( $array, bool $recursive = false ) {
        if ( ! is_array( $array ) ) {
            return $array;
        }

        $unprefixed = [];
        foreach ( $array as $key => $value ) {
            if ( $recursive && is_array( $value ) ) {
                $value = self::add_unprefixed_keys_to( $value, true );
                // And also add it to the original array.
                $array[ $key ] = array_merge( $array[ $key ], $value );
            }

            if ( 0 !== strpos( $key, '_' ) ) {
                continue;
            }
            $unprefixed[ substr( $key, 1 ) ] = $value;
        }

        return array_merge( $array, $unprefixed );
    }

    /**
     * Recursively visits all elements of an array applying the specified callback to each element
     * key and value.
     *
     * @since 1.0.0
     *
     * @param array|mixed $input   The input array whose nodes should be visited.
     * @param callable    $visitor A callback function that will be called on each array item; the callback will
     *                             receive the item key and value as input and should return an array that contains
     *                             the update key and value in the shape `[ <key>, <value> ]`. Returning a `null`
     *                             key will cause the element to be removed from the array.
     */
    public static function array_visit_recursive( $input, callable $visitor ) {
        if ( ! is_array( $input ) ) {
            return $input;
        }

        $return = [];

        foreach ( $input as $key => &$value ) {
            if ( is_array( $value ) ) {
                $value = static::array_visit_recursive( $value, $visitor );
            }
            // Ensure visitors can quickly return `null` to remove an element.
            [ $updated_key, $update_value ] = array_replace( [ $key, $value ], static::wrap( $visitor( $key, $value ) ) );
            if ( false === $updated_key ) {
                // Visitor will be able to remove an element by returning a `false` key for it.
                continue;
            }
            if ( null === $updated_key ) {
                // Automatically assign the first available numeric index to the element.
                $return[] = $update_value;
            } else {
                $return[ $updated_key ] = $update_value;
            }
        }

        return $return;
    }


    /**
     * Collapse an array of arrays into a single array.
     *
     * @param iterable $array
     *
     * @return array
     */
    public static function collapse( $array ) {
        $results = [];

        foreach ( $array as $values ) {
            if ( ! is_array( $values ) ) {
                continue;
            }

            $results[] = $values;
        }

        return array_merge( [], ...$results );
    }

    /**
     * The inverse of the `stringify_keys` method, it will restore numeric keys for previously
     * stringified keys.
     *
     * @since 1.0.0
     *
     * @param array<int|string,mixed> $input  The input array whose stringified keys should be
     *                                        destringified.
     * @param string                  $prefix The prefix that should be used to target only specific string keys.
     *
     * @return array<int|string,mixed> The input array, its stringified keys destringified.
     */
    public static function destringify_keys( array $input, string $prefix = 'sk_' ): array {
        $visitor = static function( $key, $value ) use ( $prefix ) {
            $destringified_key = 0 === self::strpos( $key, $prefix ) ? null : $key;

            return [ $destringified_key, $value ];
        };

        return static::array_visit_recursive( $input, $visitor );
    }


    /**
     * Flatten a multi-dimensional associative array with dots.
     *
     * @param iterable $array
     * @param string   $prepend
     *
     * @return array
     */
    public static function dot( $array, $prepend = '' ) {
        $results = [];

        foreach ( $array as $key => $value ) {
            if ( is_array( $value ) ) {
                $results = array_merge( $results, static::dot( $value, $prepend . $key . '.' ) );
            } else {
                $results[ $prepend . $key ] = $value;
            }
        }

        return $results;
    }

    /**
     * Sanitize a multidimensional array.
     *
     * @link    https://gist.github.com/esthezia/5804445
     * @since   1.0.0
     *
     * @param array|mixed $data The array to sanitize.
     *
     * @return array The sanitized array
     *
     */
    public static function escape_multidimensional_array( $data = [] ): array {

        if ( ! is_array( $data ) || ! count( $data ) ) {
            return [];
        }

        foreach ( $data as $key => $value ) {
            if ( ! is_array( $value ) && ! is_object( $value ) ) {
                $data[ $key ] = esc_attr( trim( $value ) );
            }
            if ( is_array( $value ) ) {
                $data[ $key ] = self::escape_multidimensional_array( $value );
            }
        }

        return $data;
    }

    /**
     * Discards everything other than array values having string keys and scalar values, ensuring a
     * one-dimensional, associative array result.
     *
     * @link  https://www.php.net/manual/language.types.array.php Keys cast to non-strings will be discarded.
     *
     * @since 1.0.0
     *
     * @param array|mixed $array
     *
     * @return array|mixed Associative or empty array.
     */
    public static function filter_to_flat_scalar_associative_array( $array ) {
        $result = [];

        if ( ! is_array( $array ) ) {
            return $result;
        }

        foreach ( $array as $k => $v ) {
            if ( ! is_string( $k ) ) {
                continue;
            }

            if ( ! is_scalar( $v ) ) {
                continue;
            }

            $result[ $k ] = $v;
        }

        return $result;
    }

    /**
     * Get all of the given array except for a specified array of keys.
     *
     * @param array                  $array
     * @param array|string|int|float $keys
     *
     * @return array
     */
    public static function except( $array, $keys ) {
        $new_array = $array;
        static::forget( $new_array, $keys );

        return $new_array;
    }


    /**
     * Determine if the given key exists in the provided array.
     *
     * @param \ArrayAccess|array $array
     * @param string|int|float   $key
     *
     * @return bool
     */
    public static function exists( $array, $key ) {
        return static::has( $array, $key );
    }

    /**
     * Filters an associative array non-recursively, keeping only the values attached
     * to keys starting with the specified prefix.
     *
     * @since 1.0.0
     *
     * @param array  $array  The array to filter.
     * @param string $prefix The prefix, or prefixes, of the keys to keep.
     *
     * @return array The filtered array.
     */
    public static function filter_prefixed( array $array, string $prefix ): array {
        $prefixes = implode( '|', array_map( 'preg_quote', static::wrap( $prefix ) ) );
        $pattern  = '/^(' . $prefixes . ')/';
        $filtered = [];
        foreach ( $array as $key => $value ) {
            if ( ! preg_match( $pattern, $key ) ) {
                continue;
            }
            $filtered[ $key ] = $value;
        }

        return $filtered;
    }

    /**
     * Return the first element in an array passing a given truth test.
     *
     * @param iterable      $array
     * @param callable|null $callback
     * @param mixed         $default
     *
     * @return mixed
     */
    public static function first( $array, callable $callback = null, $default = null ) {
        if ( is_null( $callback ) ) {
            if ( empty( $array ) ) {
                return self::value( $default );
            }

            foreach ( $array as $item ) {
                return $item;
            }
        }

        foreach ( $array as $key => $value ) {
            if ( $callback( $value, $key ) ) {
                return $value;
            }
        }

        return self::value( $default );
    }

    /**
     * Flatten a multi-dimensional array into a single level.
     *
     * Typical use case is to flatten arrays like those returned by `get_post_meta( $id )`.
     * Empty arrays are replaced with an empty string.
     *
     * @since 1.0.0
     *
     * @param iterable $array
     * @param int      $depth
     *
     * @return array The flattened array.
     */
    public static function flatten( $array, int $depth = PHP_INT_MAX ): array {
        $result = [];

        if ( $depth < 1 ) {
            return $array;
        }

        foreach ( $array as $key => $item ) {
            if ( ! is_array( $item ) ) {
                // Preserve string keys, use numeric keys for numeric
                if ( is_string( $key ) ) {
                    $result[ $key ] = $item;
                } else {
                    $result[] = $item;
                }
            } else {
                $values = $depth === 1
                    ? array_values( $item )
                    : static::flatten( $item, $depth - 1 );

                foreach ( $values as $value_key => $value ) {
                    // Preserve string keys from nested arrays
                    if ( is_string( $value_key ) ) {
                        $result[ $value_key ] = $value;
                    } else {
                        $result[] = $value;
                    }
                }
            }
        }

        return $result;
    }

    /**
     * Remove one or many array items from a given array using "dot" notation.
     *
     * @param array                  $array
     * @param array|string|int|float $keys
     *
     * @return void
     */
    public static function forget( &$array, $keys ) {
        $keys = (array) $keys;

        foreach ( $keys as $key ) {
            // Convert dot notation to array segments
            $parts = explode( '.', $key );

            if ( count( $parts ) === 1 ) {
                unset( $array[ $key ] );
                continue;
            }

            // For nested keys, traverse the array
            $current = &$array;
            $lastKey = array_pop( $parts );

            foreach ( $parts as $part ) {
                if ( ! isset( $current[ $part ] ) || ! is_array( $current[ $part ] ) ) {
                    continue 2;
                }
                $current = &$current[ $part ];
            }

            unset( $current[ $lastKey ] );
        }
    }

    /**
     * Find a value inside of an array or object, including one nested a few levels deep.
     *
     * Example: get( $a, [ 0, 1, 2 ] ) returns the value of $a[0][1][2] or the default.
     *
     * @param array|object|mixed    $variable Array or object to search within.
     * @param array|string|int|null $indexes  Specify each nested index in order. Can also be in dot notation.
     *                                        Example: array( 'lvl1', 'lvl2' ) or 'lvl1.lvl2'.
     * @param mixed                 $default  Default value if the search finds nothing.
     *
     * @return mixed The value of the specified index or the default if not found.
     * @throws \InvalidArgumentException If the provided variable is not an array and does not implement ArrayAccess.
     */
    public static function get( $variable, $indexes, $default = null ) {
        if ( ! static::accessible( $variable ) ) {
            throw new \InvalidArgumentException( 'The provided variable is not an array and does not implement ArrayAccess.' );
        }

        if ( is_null( $indexes ) ) {
            return $variable;
        }

        if ( is_string( $indexes ) && isset( $variable[ $indexes ] ) ) {
            return $variable[ $indexes ];
        } elseif ( is_string( $indexes ) ) {
            $indexes = explode( '.', $indexes );
        }

        $indexes = static::wrap( $indexes );

        foreach ( $indexes as $index ) {
            if ( ! static::exists( $variable, $index ) ) {
                $variable = $default;
                break;
            }

            $variable = $variable[ $index ];
        }

        return $variable;
    }

    /**
     * Returns the value associated with the first index, among the indexes, that is set in the array..
     *
     * @since 1.0.0
     *
     * @param array $array   The array to search.
     * @param array $indexes The indexes to search; in order the function will look from the first to the last.
     * @param mixed $default The value that will be returned if the array does not have any of the indexes set.
     *
     * @return mixed|null The set value or the default value.
     */
    public static function get_first_set( array $array, array $indexes, $default = null ) {
        foreach ( $indexes as $index ) {
            if ( ! isset( $array[ $index ] ) ) {
                continue;
            }

            return $array[ $index ];
        }

        return $default;
    }

    /**
     * Find a value inside a list of array or objects, including one nested a few levels deep.
     *
     * @since 1.0.0
     *
     * Example: get( [$a, $b, $c], [ 0, 1, 2 ] ) returns the value of $a[0][1][2] found in $a, $b or $c
     * or the default.
     *
     * @param array        $variables  Array of arrays or objects to search within.
     * @param array|string $indexes    Specify each nested index in order.
     *                                 Example: array( 'lvl1', 'lvl2' );
     * @param mixed        $default    Default value if the search finds nothing.
     *
     * @return mixed The value of the specified index or the default if not found.
     */
    public static function get_in_any( array $variables, $indexes, $default = null ) {
        foreach ( $variables as $variable ) {
            $found = self::get( $variable, $indexes, '__not_found__' );
            if ( '__not_found__' !== $found ) {
                return $found;
            }
        }

        return $default;
    }


    /**
     * Check if an item or items exist in an array using "dot" notation.
     *
     * @param \ArrayAccess|array    $array
     * @param array|string|int|null $indexes The indexes to search; in order the function will look from the first to the last.
     *
     * @return bool
     */
    public static function has( $array, $indexes ) {
        if ( ! is_array( $array ) ) {
            return false;
        }

        if ( isset( $array[ $indexes ] ) ) {
            return true;
        }

        if ( is_string( $indexes ) && isset( $array[ $indexes ] ) ) {
            return true;
        }

        if ( is_string( $indexes ) ) {
            $indexes = explode( '.', $indexes );
        }

        // Start with the root array
        $current = &$array;

        // Get all segments except the last one
        $segments  = array_slice( $indexes, 0, -1 );
        $final_key = end( $indexes );

        // Iterate through every key, setting the pointer one level deeper each time.
        foreach ( $segments as $segment ) {
            if ( ! isset( $current[ $segment ] ) || ! is_array( $current[ $segment ] ) ) {
                return false;
            }
            $current = &$current[ $segment ];
        }

        return isset( $current[ $final_key ] );
    }

    /**
     * Insert an array after a specified key within another array.
     *
     * @param string|int $key          The key of the array to insert after.
     * @param array      $source_array The array to insert into.
     * @param mixed      $insert       Value or array to insert.
     *
     * @return array
     */
    public static function insert_after_key( $key, array $source_array, $insert ): array {
        if ( ! is_array( $insert ) ) {
            $insert = [ $insert ];
        }

        if ( array_key_exists( $key, $source_array ) ) {
            $position     = array_search( $key, array_keys( $source_array ) ) + 1;
            $source_array = array_slice( $source_array, 0, $position, true ) + $insert + array_slice( $source_array, $position, null, true );
        } else {
            // If no key is found, then add it to the end of the array.
            $source_array += $insert;
        }

        return $source_array;
    }

    /**
     * Insert an array immediately before a specified key within another array.
     *
     * @param string|int $key          The key of the array to insert before.
     * @param array      $source_array The array to insert into.
     * @param mixed      $insert       Value or array to insert.
     *
     * @return array
     */
    public static function insert_before_key( $key, array $source_array, $insert ): array {
        if ( ! is_array( $insert ) ) {
            $insert = [ $insert ];
        }

        if ( array_key_exists( $key, $source_array ) ) {
            $position     = array_search( $key, array_keys( $source_array ) );
            $source_array = array_slice( $source_array, 0, $position, true ) + $insert + array_slice( $source_array, $position, null, true );
        } else {
            // If no key is found, then add it to the end of the array.
            $source_array += $insert;
        }

        return $source_array;
    }


    /**
     * Determines if an array is associative.
     *
     * An array is "associative" if it doesn't have sequential numerical keys beginning with zero.
     *
     * @param array $array
     *
     * @return bool
     */
    public static function is_assoc( array $array ) {
        return ! static::is_list( $array );
    }

    /**
     * Determines if an array is a list.
     *
     * An array is a "list" if all array keys are sequential integers starting from 0 with no gaps in between.
     *
     * @param array $array
     *
     * @return bool
     */
    public static function is_list( $array ) {
        if ( function_exists( 'array_is_list' ) ) {
            return array_is_list( $array );
        }

        $i = 0;
        foreach ( $array as $k => $v ) {
            if ( $k !== $i++ ) {
                return false;
            }
        }

        return true;
    }


    /**
     * Join all items using a string. The final items can use a separate glue string.
     *
     * @param array  $array
     * @param string $glue
     * @param string $finalGlue
     *
     * @return string
     */
    public static function join( $array, $glue, $finalGlue = '' ) {
        if ( $finalGlue === '' ) {
            return implode( $glue, $array );
        }

        if ( count( $array ) === 0 ) {
            return '';
        }

        if ( count( $array ) === 1 ) {
            return end( $array );
        }

        $finalItem = array_pop( $array );

        return implode( $glue, $array ) . $finalGlue . $finalItem;
    }

    /**
     * Return the last element in an array passing a given truth test.
     *
     * @param array         $array
     * @param callable|null $callback
     * @param mixed         $default
     *
     * @return mixed
     */
    public static function last( $array, callable $callback = null, $default = null ) {
        if ( is_null( $callback ) ) {
            return empty( $array ) ? self::value( $default ) : end( $array );
        }

        return static::first( array_reverse( $array, true ), $callback, $default );
    }

    /**
     * Converts a list to an array filtering out empty string elements.
     *
     * @param string|mixed|null $value A string representing a list of values separated by the specified separator
     *                                 or an array. If the list is a string (e.g. a CSV list) then it will urldecoded
     *                                 before processing.
     * @param string|mixed      $sep   The char(s) separating the list elements; will be ignored if the list is an array.
     *
     * @return array An array of list elements.
     */
    public static function list_to_array( $value, $sep = ',' ): array {
        // Let's not jump through all the hoops if the value is empty.
        if ( empty( $value ) ) {
            return [];
        }
        // since we might receive URL encoded strings for CSV lists let's URL decode them first
        $value = is_array( $value ) ? $value : urldecode( $value );

        $sep = ! is_string( $sep ) ? ',' : $sep;

        if ( $value === '' ) {
            return [];
        }

        if ( ! is_array( $value ) ) {
            $value = preg_split( '/\\s*' . preg_quote( $sep, '/' ) . '\\s*/', $value );
        }

        $filtered = [];
        foreach ( $value as $v ) {
            if ( '' === $v ) {
                continue;
            }
            $filtered[] = is_numeric( $v ) ? $v + 0 : $v;
        }

        return $filtered;
    }

    /**
     * Returns an array of values obtained by using the keys on the map; keys
     * that do not have a match in map are discarded.
     *
     * To discriminate from not found results and legitimately `false`
     * values from the map the `$found` parameter will be set by reference.
     *
     * @since 1.0.0
     *
     * @param string|array $keys       One or more keys that should be used to get
     *                                 the new values
     * @param array        $map        An associative array relating the keys to the new
     *                                 values.
     * @param bool         $found      When using a single key this argument will be
     *                                 set to indicate whether the mapping was successful
     *                                 or not.
     *
     * @return array|mixed|false An array of mapped values, a single mapped value when passing
     *                           one key only or `false` if one key was passed but the key could
     *                           not be mapped.
     */
    public static function map_or_discard( $keys, array $map, bool &$found = true ) {
        $hash   = md5( (string) time() );
        $mapped = [];

        foreach ( (array) $keys as $key ) {
            $meta_key = self::get( $map, $key, $hash );
            if ( $hash === $meta_key ) {
                continue;
            }
            $mapped[] = $meta_key;
        }

        $found = (bool) count( $mapped );

        if ( is_array( $keys ) ) {
            return $mapped;
        }

        return $found ? $mapped[0] : false;
    }

    /**
     * Recursively merge two arrays preserving keys.
     *
     * @link  http://php.net/manual/en/function.array-merge-recursive.php#92195
     *
     * @since 1.0.0
     *
     * @param array $array1
     * @param array $array2
     *
     * @return array
     */
    public static function merge_recursive( array &$array1, array &$array2 ): array {
        $merged = $array1;

        foreach ( $array2 as $key => &$value ) {
            if ( is_array( $value ) && isset( $merged[ $key ] ) && is_array( $merged[ $key ] ) ) {
                $merged[ $key ] = static::merge_recursive( $merged[ $key ], $value );
            } else if ( is_int( $key ) ) {
                $merged[] = $value;
            } else {
                $merged[ $key ] = $value;
            }
        }

        return $merged;
    }

    /**
     * Merges two or more arrays in the nested format used by WP_Query arguments preserving and merging them correctly.
     *
     * The method will recursively replace named keys and merge numeric keys. The method takes its name from its intended
     * primary use, but it's not limited to query arguments only.
     *
     * @since 1.0.0
     *
     * @param array<string|int,mixed> ...$arrays A set of arrays to merge.
     *
     * @return array<string|int,mixed> The recursively merged array.
     */
    public static function merge_recursive_query_vars( array ...$arrays ): array {
        if ( ! count( $arrays ) ) {
            return [];
        }

        // Temporarily transform numeric keys to string keys generated with time-related randomness.
        $stringified = array_map( [ static::class, 'stringify_keys' ], $arrays );
        // Replace recursive will recursively replace any entry that has the same string key, stringified keys will never match due to randomness.
        $merged = array_replace_recursive( ...$stringified );

        // Finally destringify the keys to return something that will resemble, in shape, the original arrays.
        return static::destringify_keys( $merged );
    }

    /**
     * Get a subset of the items from the given array.
     *
     * @param array        $array
     * @param array|string $keys
     *
     * @return array
     */
    public static function only( $array, $keys ) {
        return array_intersect_key( $array, array_flip( static::wrap( $keys ) ) );
    }

    /**
     * Build an array from migrating aliased key values to their canonical key values, removing all alias keys.
     *
     * If the original array has values for both the alias and its canonical, keep the canonical's value and
     * discard the alias' value.
     *
     * @since 1.0.0
     *
     * @param array $original  An associative array of values, such as passed shortcode arguments.
     * @param array $alias_map An associative array of aliases: key as alias, value as mapped canonical.
     *                         Example: [ 'alias' => 'canonical', 'from' => 'to', 'that' => 'becomes_this' ]
     *
     * @return array
     */
    public static function parse_associative_array_alias( array $original, array $alias_map ): array {
        // Ensure array values.
        $alias_map = static::filter_to_flat_scalar_associative_array( $alias_map );

        // Fail gracefully if alias array wasn't setup as [ 'from' => 'to' ].
        if ( empty( $alias_map ) ) {
            return $original;
        }

        $result = $original;

        // Parse aliases.
        foreach ( $alias_map as $from => $to ) {
            // If this alias isn't in use, go onto the next.
            if ( ! isset( $result[ $from ] ) ) {
                continue;
            }

            // Only allow setting alias value if canonical value is not already present.
            if ( ! isset( $result[ $to ] ) ) {
                $result[ $to ] = $result[ $from ];
            }

            // Always remove the alias key.
            unset( $result[ $from ] );
        }

        return $result;
    }

    /**
     * Push an item onto the beginning of an array.
     *
     * @param array $array
     * @param mixed $value
     * @param mixed $key
     *
     * @return array
     */
    public static function prepend( $array, $value, $key = null ) {
        if ( func_num_args() == 2 ) {
            array_unshift( $array, $value );
        } else {
            $array = [ $key => $value ] + $array;
        }

        return $array;
    }

    /**
     * Get a value from the array, and remove it.
     *
     * @param array      $array
     * @param string|int $key
     * @param mixed      $default
     *
     * @return mixed
     */
    public static function pull( &$array, $key, $default = null ) {
        $value = static::get( $array, $key, $default );

        static::forget( $array, $key );

        return $value;
    }

    /**
     * Convert the array into a query string.
     *
     * @param array $array
     *
     * @return string
     */
    public static function query( $array ) {
        return http_build_query( $array, '', '&', PHP_QUERY_RFC3986 );
    }

    /**
     * Get one or a specified number of random values from an array.
     *
     * @param array    $array
     * @param int|null $number
     * @param bool     $preserveKeys
     *
     * @return mixed
     *
     * @throws \InvalidArgumentException
     */
    public static function random( $array, $number = null, $preserveKeys = false ) {
        $requested = is_null( $number ) ? 1 : $number;

        $count = count( $array );

        if ( $requested > $count ) {
            throw new InvalidArgumentException(
                "You requested {$requested} items, but there are only {$count} items available."
            );
        }

        if ( is_null( $number ) ) {
            return $array[ array_rand( $array ) ];
        }

        if ( (int) $number === 0 ) {
            return [];
        }

        $keys = array_rand( $array, $number );
        $keys = static::wrap( $keys );

        $results = [];

        if ( $preserveKeys ) {
            foreach ( $keys as $key ) {
                $results[ $key ] = $array[ $key ];
            }
        } else {
            foreach ( $keys as $key ) {
                $results[] = $array[ $key ];
            }
        }

        return $results;
    }

    /**
     * Recursively key-sort an array.
     *
     * @since 1.0.0
     *
     * @param array $array The array to sort, modified by reference.
     *
     * @return bool The sorting result.
     */
    public static function recursive_ksort( array &$array ): bool {
        // First recursively sort all sub-arrays
        foreach ( $array as &$value ) {
            if ( is_array( $value ) ) {
                static::recursive_ksort( $value );
            }
        }

        // Then sort the current array, ensuring numeric keys are sorted numerically
        return ksort( $array, SORT_NATURAL );
    }

    /**
     * Recursively remove numeric keys from an array.
     *
     * @since 1.0.0
     *
     * @param array<string|int,mixed> $input The input array.
     *
     * @return array<int|mixed> An array that only contains integer keys at any of its levels.
     */
    public static function remove_numeric_keys_recursive( array $input ): array {
        return self::array_visit_recursive(
            $input,
            static function( $key ) {
                return is_numeric( $key ) ? false : $key;
            }
        );
    }

    /**
     * Recursively remove numeric keys from an array.
     *
     * @since 1.0.0
     *
     * @param array<string|int,mixed> $input The input array.
     *
     * @return array<string,mixed> An array that only contains non numeric keys at any of its levels.
     */
    public static function remove_string_keys_recursive( array $input ): array {
        return self::array_visit_recursive(
            $input,
            static function( $key ) {
                return ! is_numeric( $key ) ? false : $key;
            }
        );
    }

    /**
     * Set key/value within an array, can set a key nested inside of a multidimensional array.
     *
     * Example: set( $a, [ 0, 1, 2 ], 'hi' ) sets $a[0][1][2] = 'hi' and returns $a.
     *
     * @param mixed        $array  The array containing the key this sets.
     * @param string|array $key    To set a key nested multiple levels deep pass an array
     *                             specifying each key in order as a value.
     *                             Example: array( 'lvl1', 'lvl2', 'lvl3' );
     * @param mixed        $value  The value.
     *
     * @return array Full array with the key set to the specified value.
     */
    public static function set( $array, $key, $value ): array {
        // Convert input to array if not already
        if ( ! is_array( $array ) ) {
            $array = [];
        }

        // If key is a string with dots, convert to array
        if ( is_string( $key ) ) {
            $key = explode( '.', $key );
        }

        // Convert strings and such to array.
        $key = static::wrap( $key );

        // Start with the root array
        $current = &$array;

        // Get all segments except the last one
        $segments  = array_slice( $key, 0, -1 );
        $final_key = end( $key );

        // Traverse through each key segment
        foreach ( $segments as $segment ) {
            // If the current segment is a Closure or not an array, convert it to an array
            if ( ! isset( $current[ $segment ] ) || ! is_array( $current[ $segment ] ) ) {
                $current[ $segment ] = [];
            }

            // Move pointer to next level
            $current = &$current[ $segment ];
        }

        // Set the final value
        $current[ $final_key ] = $value;

        return $array;
    }

    /**
     * Shapes, filtering it, an array to the specified expected set of required keys.
     *
     * @since 1.0.0
     *
     * @param array $array The input array to shape.
     * @param array $shape The shape to update the array with. It should only define keys
     *                     or arrays of keys. Keys that have no values will be set to `null`.
     *                     To add the key only if set, prefix the key with `?`, e.g. `?foo`.
     *
     * @return array The input array shaped and ordered per the shape.
     */
    public static function shape_filter( array $array, array $shape ): array {
        $shaped = [];
        foreach ( $shape as $shape_index => $shape_key ) {
            $optional = is_array( $shape_key ) ?
                strpos( $shape_index, '?' ) === 0
                : strpos( $shape_key, '?' ) === 0;

            if ( is_array( $shape_key ) ) {
                $shape_index = $optional ? substr( $shape_index, 1 ) : $shape_index;
                if ( $optional && ! isset( $array[ $shape_index ] ) ) {
                    continue;
                }
                $shaped[ $shape_index ] = self::shape_filter( $array[ $shape_index ] ?? [], $shape_key );
            } else {
                $shape_key = $optional ? substr( $shape_key, 1 ) : $shape_key;
                if ( ! isset( $array[ $shape_key ] ) && $optional ) {
                    continue;
                }
                $shaped[ $shape_key ] = $array[ $shape_key ] ?? null;
            }
        }

        return $shaped;
    }

    /**
     * Shuffle the given array and return the result.
     *
     * @param array    $array
     * @param int|null $seed
     *
     * @return array
     */
    public static function shuffle( $array, $seed = null ) {
        if ( is_null( $seed ) ) {
            shuffle( $array );
        } else {
            mt_srand( $seed );
            shuffle( $array );
            mt_srand();
        }

        return $array;
    }

    /**
     * Sort based on Priority
     *
     * @since  1.0.0
     *
     * @param array $array Array to sort.
     *
     * @return array
     */
    public static function sort_by_priority( $array ): array {
        if ( ! is_array( $array ) ) {
            throw new \InvalidArgumentException( 'Input must be an array' );
        }

        if ( static::is_assoc( $array ) ) {
            uasort( $array, [ static::class, 'sort_by_priority_comparison' ] );
        } else {
            usort( $array, [ static::class, 'sort_by_priority_comparison' ] );
        }

        return $array;
    }

    /**
     * Sort based on Priority
     *
     * @since  1.0.0
     *
     * @param object|array $b Second subject to compare
     *
     * @param object|array $a First Subject to compare
     *
     * @return int
     */
    public static function sort_by_priority_comparison( $a, $b ): int {
        if ( is_array( $a ) ) {
            $a_priority = $a['priority'];
        } else {
            $a_priority = $a->priority;
        }

        if ( is_array( $b ) ) {
            $b_priority = $b['priority'];
        } else {
            $b_priority = $b->priority;
        }

        if ( (int) $a_priority === (int) $b_priority ) {
            return 0;
        }

        return (int) $a_priority > (int) $b_priority ? 1 : -1;
    }

    /**
     * Recursively sort an array by keys and values.
     *
     * @param array $array
     * @param int   $options
     * @param bool  $descending
     *
     * @return array
     */
    public static function sort_recursive( $array, $options = SORT_REGULAR, $descending = false ) {
        foreach ( $array as &$value ) {
            if ( is_array( $value ) ) {
                $value = static::sort_recursive( $value, $options, $descending );
            }
        }

        if ( ! static::is_list( $array ) ) {
            $descending
                ? krsort( $array, $options )
                : ksort( $array, $options );
        } else {
            $descending
                ? rsort( $array, $options )
                : sort( $array, $options );
        }

        return $array;
    }

    /**
     * Recursively sort an array by keys and values in descending order.
     *
     * @param array $array
     * @param int   $options
     *
     * @return array
     */
    public static function sort_recursive_desc( $array, $options = SORT_REGULAR ) {
        return static::sort_recursive( $array, $options, true );
    }

    /**
     * Stringifies the numeric keys of an array.
     *
     * @since 1.0.0
     *
     * @param array<int|string,mixed> $input  The input array whose keys should be stringified.
     * @param string|null             $prefix The prefix that should be use to stringify the keys, if not provided
     *                                        then it will be generated.
     *
     * @return array<string,mixed> The input array with each numeric key stringified.
     */
    public static function stringify_keys( array $input, $prefix = null ): array {
        $prefix  = null === $prefix ? uniqid( 'sk_' ) : $prefix;
        $visitor = static function( $key, $value ) use ( $prefix ) {
            $string_key = is_numeric( $key ) ? $prefix . $key : $key;

            return [ $string_key, $value ];
        };

        return static::array_visit_recursive( $input, $visitor );
    }

    /**
     * Behaves exactly like the native strpos(), but accepts an array of needles.
     *
     * @see strpos()
     *
     * @param string       $haystack String to search in.
     * @param array|string $needles  Strings to search for.
     * @param int          $offset   Starting position of search.
     *
     * @return false|int Integer position of first needle occurrence.
     */
    public static function strpos( string $haystack, $needles, int $offset = 0 ) {
        $needles = static::wrap( $needles );

        $needles = array_filter( $needles, static function( $needle ) {
            return is_string( $needle ) && $needle !== '';
        } );

        foreach ( $needles as $i ) {
            $search = strpos( $haystack, $i, $offset );

            if ( false !== $search ) {
                return $search;
            }
        }

        return false;
    }

    /**
     * Returns a list separated by the specified separator.
     *
     * @since 1.0.0
     *
     * @param mixed  $list
     * @param string $sep
     *
     * @return string The list separated by the specified separator or the original list if the list is empty.
     */
    public static function to_list( $list, string $sep = ',' ): string {
        if ( $list === null ) {
            return '';
        }

        if ( empty( $list ) ) {
            return is_array( $list ) ? '' : $list;
        }

        if ( is_array( $list ) ) {
            return implode( $sep, $list );
        }

        return $list;
    }

    /**
     * Convert a flatten "dot" notation array into an expanded array.
     *
     * @param iterable $array
     *
     * @return array
     */
    public static function undot( $array ) {
        $results = [];

        foreach ( $array as $key => $value ) {
            $results = static::set( $results, explode( '.', $key ), $value );
        }

        return $results;
    }

    /**
     * Searches an array using a callback and returns the index of the first match.
     *
     * This method fills the gap left by the non-existence of an `array_usearch` function.
     *
     * @since 1.0.0
     *
     * @param mixed    $needle   The element to search in the array.
     * @param array    $haystack The array to search.
     * @param callable $callback A callback function with signature `fn($needle, $value, $key) :bool`
     *                           that will be used to find the first match of needle in haystack.
     *
     * @return string|int|false Either the index of the first match or `false` if no match was found.
     */
    public static function usearch( $needle, array $haystack, callable $callback ) {
        foreach ( $haystack as $key => $value ) {
            if ( $callback( $needle, $value, $key ) ) {
                return $key;
            }
        }

        return false;
    }

    /**
     * Filter the array using the given callback.
     *
     * @param array    $array
     * @param callable $callback
     *
     * @return array
     */
    public static function where( $array, callable $callback ) {
        return array_filter( $array, $callback, ARRAY_FILTER_USE_BOTH );
    }

    /**
     * Filter items where the value is not null.
     *
     * @param array $array
     *
     * @return array
     */
    public static function where_not_null( $array ) {
        return static::where( $array, static function( $value ) {
            return ! is_null( $value );
        } );
    }

    /**
     * If the given value is not an array and not null, wrap it in one.
     *
     * @param mixed $value
     *
     * @return array
     */
    public static function wrap( $value ) {
        if ( is_null( $value ) ) {
            return [];
        }

        return is_array( $value ) ? $value : [ $value ];
    }

    /**
     * Recursively computes the intersection of arrays using keys for comparison.
     *
     * @param mixed[] $array     The array with master keys to check.
     * @param mixed[] ...$arrays Additional arrays to compare keys against.
     *
     * @return mixed[] An associative array containing all the entries of $array
     *                 whose keys exist in every provided array, recursively.
     */
    public static function intersect_key_recursive( array $array, array ...$arrays ): array {
        $array = array_intersect_key( $array, ...$arrays );

        foreach ( $array as $key => $value ) {
            if ( ! is_array( $value ) ) {
                continue;
            }

            $arrays_to_intersect = [];
            foreach ( $arrays as $intersect_array ) {
                if ( ! isset( $intersect_array[ $key ] ) ) {
                    unset( $array[ $key ] );
                    continue 2;
                }

                if ( ! is_array( $intersect_array[ $key ] ) ) {
                    continue;
                }

                $arrays_to_intersect[] = $intersect_array[ $key ];
            }

            if ( empty( $arrays_to_intersect ) ) {
                continue;
            }

            $array[ $key ] = static::intersect_key_recursive( $value, ...$arrays_to_intersect );
        }

        return $array;
    }

    /**
     * Return the default value of the given value.
     *
     * @template TValue
     * @template TArgs
     *
     * @param  TValue|\Closure(TArgs): TValue  $value
     * @param  TArgs  ...$args
     * @return TValue
     */
    private static function value( $value, ...$args ) {
        return $value instanceof Closure ? $value( ...$args ) : $value;
    }
}