Subversion Repositories vgwhois

#!/usr/bin/php

<?php

#

#  VGWhoIs (ViaThinkSoft Global WhoIs, a fork of generic Whois / gwhois)

#  Maintenance / Developer utilities

#

#  (c) 2012-2019 by Daniel Marschall, ViaThinkSoft <info@daniel-marschall.de>

#

#  License: https://www.gnu.org/licenses/gpl-2.0.html (GPL version 2)

#

# There are 2 possibilities

# - Coverage by section. At least 1 line per command must be covered

#   => this is currently our behavior

# - Every line must be covered

require_once __DIR__ . '/../../../shared/php_includes/common_functions.inc.php';

$testcases = array();

$testcases_tmp = file(__DIR__ . '/../../config/testcases.list');

foreach ($testcases_tmp as &$tc) {

	$tc = trim($tc);

	if ($tc == '') continue;

	if ($tc[0] == '#') continue;

	$testcases[] = $tc;

}

$patterns = glob(__DIR__ . '/../../../main/pattern/*');

$count_total = 0;

$count_covered = 0;

$count_uncovered = 0;

echo "Uncovered\n\n";

foreach ($patterns as $pattern_file) {

	$pattern = file($pattern_file);

	$pattern[] = ':end';

	$count_total--; // wegen ":end"

	$content = '';

	$covered = false;

	$cmd = '';

	foreach ($pattern as $p) {

		$p = trim($p);

		if ($p == '') continue;

		if ($p[0] == '#') continue; // comment

		if ($p[0] == ':') {

			$count_total++;

			if ($covered) {

				$count_covered++;

				$covered = false;

			} else {

				if ($cmd != '') {

					$count_uncovered++;

					echo "$pattern_file ($cmd): $content\n\n";

				}

			}

			$cmd = $p;

			$content = '';

		} else if (!$covered) {

			if ($p[0] == '=') {

				// IP

				$p_ = substr($p, 1);

				foreach ($testcases as $query) {

					$match = false;

					if (strpos($p, ':') !== false) {

						// IPv6

						if (!ipv6_valid($query)) continue;

						$covered = ipv6_in_cidr($p_, $query);

					} else {

						// IPv4

						if (!ipv4_valid($query)) continue;

						$covered = ipv4_in_cidr($p_, $query);

					}

					if ($covered) break;

				}

			} else if ($p[0] == '*') {

				// ASN

				preg_match('#\*(.*):(\d+)(-(\d+)){0,1}#isU', $p, $m);

				$prefix = $m[1];

				$min = $m[2];

				$max = (isset($m[4])) ? $m[4] : $min;

				foreach ($testcases as $query) {

					if (preg_match('#'.preg_quote($prefix, '#').'(\d+)#is', $query, $m)) {

						$num = $m[1];

						if (($num >= $min) && ($num <= $max)) {

							$covered = true;

							break;

						}

					}

				}

			} else if (preg_match('@^(urn:){0,1}oid:(.*)@i', $p, $m)) {

				// OIDs

				$oid = normalize_oid($m[2]);

				foreach ($testcases as $query) {

					if (preg_match('@^(urn:){0,1}oid:(.*)@i', $query, $m2)) {

						$oid_tc = normalize_oid($m2[2]);

						if (strpos($oid.'.', $oid_tc.'.') === 0) {

							$covered = true;

							break;

						}

					}

				}

			} else {

				// REGEX

				$regex = $p;

				foreach ($testcases as $query) {

					if (preg_match('/'.$regex.'/i', $query, $m)) {

						$covered = true;

						break;

					}

				}

			}

		}

		$content .= "$p\n";

	}

}

if ($count_uncovered == 0) {

	echo 'Every instruction is covered with at least one testcase!\n\n';

}

echo "Stats\n\n";

echo "Total     = $count_total\n";

echo "Covered   = $count_covered\n";

echo "Uncovered = $count_uncovered\n";

$coverage = $count_covered/$count_total * 100;

echo "Coverage  = $coverage %\n";