Glob::toRegex() - Code Metrics - Inspection of "Merge branch 'feature/1136-integrate-with-new-plat..." - insideout10/wordlift-plugin - Measure and Improve Code Quality continuously with Scrutinizer

Completed

Push — develop ( f11ef2...d41b65 )

by David

created 2020-11-17 13:14 UTC

Glob::toRegex() F

↳ Parent: Glob

Complexity

Conditions	40
Paths	397

Size

Total Lines

Duplication

Lines	0
Ratio	0 %

Importance

Changes

Metric	Value
cc	40
nc	397
nop	4
dl	0
loc	68
rs	0.8708
c	0
b	0
f	0

How to fix Long Method Complexity

<?php

/*
 * This file is part of the Symfony package.
 *
 * (c) Fabien Potencier <[email protected]>
 *
 * For the full copyright and license information, please view the LICENSE
 * file that was distributed with this source code.
 */

namespace Symfony\Component\Finder;

/**
 * Glob matches globbing patterns against text.
 *
 *     if match_glob("foo.*", "foo.bar") echo "matched\n";
 *
 *     // prints foo.bar and foo.baz
 *     $regex = glob_to_regex("foo.*");
 *     for (['foo.bar', 'foo.baz', 'foo', 'bar'] as $t)
 *     {
 *         if (/$regex/) echo "matched: $car\n";
 *     }
 *
 * Glob implements glob(3) style matching that can be used to match
 * against text, rather than fetching names from a filesystem.
 *
 * Based on the Perl Text::Glob module.
 *
 * @author Fabien Potencier <[email protected]> PHP port
 * @author     Richard Clamp <[email protected]> Perl version
 * @copyright  2004-2005 Fabien Potencier <[email protected]>
 * @copyright  2002 Richard Clamp <[email protected]>
 */
class Glob
{
    /**
     * Returns a regexp which is the equivalent of the glob pattern.
     *
     * @return string
     */
    public static function toRegex(string $glob, bool $strictLeadingDot = true, bool $strictWildcardSlash = true, string $delimiter = '#')
    {
        $firstByte = true;
        $escaping = false;
        $inCurlies = 0;
        $regex = '';
        $sizeGlob = \strlen($glob);
        for ($i = 0; $i < $sizeGlob; ++$i) {
            $car = $glob[$i];
            if ($firstByte && $strictLeadingDot && '.' !== $car) {
                $regex .= '(?=[^\.])';
            }

            $firstByte = '/' === $car;

            if ($firstByte && $strictWildcardSlash && isset($glob[$i + 2]) && '**' === $glob[$i + 1].$glob[$i + 2] && (!isset($glob[$i + 3]) || '/' === $glob[$i + 3])) {
                $car = '[^/]++/';
                if (!isset($glob[$i + 3])) {
                    $car .= '?';
                }

                if ($strictLeadingDot) {
                    $car = '(?=[^\.])'.$car;
                }

                $car = '/(?:'.$car.')*';
                $i += 2 + isset($glob[$i + 3]);

                if ('/' === $delimiter) {
                    $car = str_replace('/', '\\/', $car);
                }
            }

            if ($delimiter === $car || '.' === $car || '(' === $car || ')' === $car || '|' === $car || '+' === $car || '^' === $car || '$' === $car) {
                $regex .= "\\$car";
            } elseif ('*' === $car) {
                $regex .= $escaping ? '\\*' : ($strictWildcardSlash ? '[^/]*' : '.*');
            } elseif ('?' === $car) {
                $regex .= $escaping ? '\\?' : ($strictWildcardSlash ? '[^/]' : '.');
            } elseif ('{' === $car) {
                $regex .= $escaping ? '\\{' : '(';
                if (!$escaping) {
                    ++$inCurlies;
                }
            } elseif ('}' === $car && $inCurlies) {
                $regex .= $escaping ? '}' : ')';
                if (!$escaping) {
                    --$inCurlies;
                }
            } elseif (',' === $car && $inCurlies) {
                $regex .= $escaping ? ',' : '|';
            } elseif ('\\' === $car) {
                if ($escaping) {
                    $regex .= '\\\\';
                    $escaping = false;
                } else {
                    $escaping = true;
                }

                continue;
            } else {
                $regex .= $car;
            }
            $escaping = false;
        }

        return $delimiter.'^'.$regex.'$'.$delimiter;
    }
}


1			<?php
2
3			/*
4			* This file is part of the Symfony package.
5			*
6			* (c) Fabien Potencier <[email protected]>
7			*
8			* For the full copyright and license information, please view the LICENSE
9			* file that was distributed with this source code.
10			*/
11
12			namespace Symfony\Component\Finder;
13
14			/**
15			* Glob matches globbing patterns against text.
16			*
17			* if match_glob("foo.*", "foo.bar") echo "matched\n";
18			*
19			* // prints foo.bar and foo.baz
20			* $regex = glob_to_regex("foo.*");
21			* for (['foo.bar', 'foo.baz', 'foo', 'bar'] as $t)
22			* {
23			* if (/$regex/) echo "matched: $car\n";
24			* }
25			*
26			* Glob implements glob(3) style matching that can be used to match
27			* against text, rather than fetching names from a filesystem.
28			*
29			* Based on the Perl Text::Glob module.
30			*
31			* @author Fabien Potencier <[email protected]> PHP port
32			* @author Richard Clamp <[email protected]> Perl version
33			* @copyright 2004-2005 Fabien Potencier <[email protected]>
34			* @copyright 2002 Richard Clamp <[email protected]>
35			*/
36			class Glob
37			{
38			/**
39			* Returns a regexp which is the equivalent of the glob pattern.
40			*
41			* @return string
42			*/
43			public static function toRegex(string $glob, bool $strictLeadingDot = true, bool $strictWildcardSlash = true, string $delimiter = '#')
44			{
45			$firstByte = true;
46			$escaping = false;
47			$inCurlies = 0;
48			$regex = '';
49			$sizeGlob = \strlen($glob);
50			for ($i = 0; $i < $sizeGlob; ++$i) {
51			$car = $glob[$i];
52			if ($firstByte && $strictLeadingDot && '.' !== $car) {
53			$regex .= '(?=[^\.])';
54			}
55
56			$firstByte = '/' === $car;
57
58			if ($firstByte && $strictWildcardSlash && isset($glob[$i + 2]) && '**' === $glob[$i + 1].$glob[$i + 2] && (!isset($glob[$i + 3]) \|\| '/' === $glob[$i + 3])) {
59			$car = '[^/]++/';
60			if (!isset($glob[$i + 3])) {
61			$car .= '?';
62			}
63
64			if ($strictLeadingDot) {
65			$car = '(?=[^\.])'.$car;
66			}
67
68			$car = '/(?:'.$car.')*';
69			$i += 2 + isset($glob[$i + 3]);
70
71			if ('/' === $delimiter) {
72			$car = str_replace('/', '\\/', $car);
73			}
74			}
75
76			if ($delimiter === $car \|\| '.' === $car \|\| '(' === $car \|\| ')' === $car \|\| '\|' === $car \|\| '+' === $car \|\| '^' === $car \|\| '$' === $car) {
77			$regex .= "\\$car";
78			} elseif ('*' === $car) {
79			$regex .= $escaping ? '\\' : ($strictWildcardSlash ? '[^/]' : '.*');
80			} elseif ('?' === $car) {
81			$regex .= $escaping ? '\\?' : ($strictWildcardSlash ? '[^/]' : '.');
82			} elseif ('{' === $car) {
83			$regex .= $escaping ? '\\{' : '(';
84			if (!$escaping) {
85			++$inCurlies;
86			}
87			} elseif ('}' === $car && $inCurlies) {
88			$regex .= $escaping ? '}' : ')';
89			if (!$escaping) {
90			--$inCurlies;
91			}
92			} elseif (',' === $car && $inCurlies) {
93			$regex .= $escaping ? ',' : '\|';
94			} elseif ('\\' === $car) {
95			if ($escaping) {
96			$regex .= '\\\\';
97			$escaping = false;
98			} else {
99			$escaping = true;
100			}
101
102			continue;
103			} else {
104			$regex .= $car;
105			}
106			$escaping = false;
107			}
108
109			return $delimiter.'^'.$regex.'$'.$delimiter;
110			}
111			}
112

insideout10 / wordlift-plugin

Push — develop ( f11ef2...d41b65 )

Glob::toRegex() F

Complexity

Size

Duplication

Importance

How to fix Long Method Complexity

Long Method

Duplication Side-by-Side

Filter issues like