aboutsummaryrefslogtreecommitdiffstats
path: root/lib/testmore.php
diff options
context:
space:
mode:
Diffstat (limited to 'lib/testmore.php')
-rw-r--r--lib/testmore.php343
1 files changed, 0 insertions, 343 deletions
diff --git a/lib/testmore.php b/lib/testmore.php
deleted file mode 100644
index aa0616188..000000000
--- a/lib/testmore.php
+++ /dev/null
@@ -1,343 +0,0 @@
-<?php
-
-/*******************************************************************\
-* PROJECT INFORMATION *
-* *
-* Project: Apache-Test *
-* URL: http://perl.apache.org/Apache-Test/ *
-* Notice: Copyright (c) 2006 The Apache Software Foundation *
-* *
-*********************************************************************
-* LICENSE INFORMATION *
-* *
-* Licensed under the Apache License, Version 2.0 (the "License"); *
-* you may not use this file except in compliance with the *
-* License. You may obtain a copy of the License at: *
-* *
-* http://www.apache.org/licenses/LICENSE-2.0 *
-* *
-* Unless required by applicable law or agreed to in writing, *
-* software distributed under the License is distributed on an "AS *
-* IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either *
-* express or implied. See the License for the specific language *
-* governing permissions and limitations under the License. *
-* *
-*********************************************************************
-* MODULE INFORMATION *
-* *
-* This is a PHP implementation of Test::More: *
-* *
-* http://search.cpan.org/dist/Test-Simple/lib/Test/More.pm *
-* *
-*********************************************************************
-* CREDITS *
-* *
-* Originally inspired by work from Andy Lester. Written and *
-* maintained by Chris Shiflett. For contact information, see: *
-* *
-* http://shiflett.org/contact *
-* *
-\*******************************************************************/
-
-header('Content-Type: text/plain');
-register_shutdown_function('_test_end');
-
-$_no_plan = FALSE;
-$_num_failures = 0;
-$_num_skips = 0;
-$_test_num = 0;
-
-function plan($plan)
-{
- /*
- plan('no_plan');
- plan('skip_all');
- plan(array('skip_all' => 'My reason is...'));
- plan(23);
- */
-
- global $_no_plan;
- global $_skip_all;
-
- switch ($plan) {
- case 'no_plan':
- $_no_plan = TRUE;
- break;
-
- case 'skip_all':
- echo "1..0\n";
- break;
-
- default:
- if (is_array($plan)) {
- echo "1..0 # Skip {$plan['skip_all']}\n";
- exit;
- }
-
- echo "1..$plan\n";
- break;
- }
-}
-
-function ok($pass, $test_name = '')
-{
- global $_test_num;
- global $_num_failures;
- global $_num_skips;
-
- $_test_num++;
-
- if ($_num_skips) {
- $_num_skips--;
- return TRUE;
- }
-
- if (!empty($test_name) && $test_name[0] != '#') {
- $test_name = "- $test_name";
- }
-
- if ($pass) {
- echo "ok $_test_num $test_name\n";
- } else {
- echo "not ok $_test_num $test_name\n";
-
- $_num_failures++;
- $caller = debug_backtrace();
-
- if (strstr($caller['0']['file'], $_SERVER['PHP_SELF'])) {
- $file = $caller['0']['file'];
- $line = $caller['0']['line'];
- } else {
- $file = $caller['1']['file'];
- $line = $caller['1']['line'];
- }
-
- if (isset($_SERVER['SERVER_ROOT'])){
- $file = str_replace($_SERVER['SERVER_ROOT'], 't', $file);
- }
-
- diag(" Failed test ($file at line $line)");
- }
-
- return $pass;
-}
-
-function is($this, $that, $test_name = '')
-{
- $pass = ($this == $that);
-
- ok($pass, $test_name);
-
- if (!$pass) {
- diag(" got: '$this'");
- diag(" expected: '$that'");
- }
-
- return $pass;
-}
-
-function isnt($this, $that, $test_name = '')
-{
- $pass = ($this != $that);
-
- ok($pass, $test_name);
-
- if (!$pass) {
- diag(" '$this'");
- diag(' !=');
- diag(" '$that'");
- }
-
- return $pass;
-}
-
-function like($string, $pattern, $test_name = '')
-{
- $pass = preg_match($pattern, $string);
-
- ok($pass, $test_name);
-
- if (!$pass) {
- diag(" '$string'");
- diag(" doesn't match '$pattern'");
- }
-
- return $pass;
-}
-
-function unlike($string, $pattern, $test_name = '')
-{
- $pass = !preg_match($pattern, $string);
-
- ok($pass, $test_name);
-
- if (!$pass) {
- diag(" '$string'");
- diag(" matches '$pattern'");
- }
-
- return $pass;
-}
-
-function cmp_ok($this, $operator, $that, $test_name = '')
-{
- eval("\$pass = (\$this $operator \$that);");
-
- ob_start();
- var_dump($this);
- $_this = trim(ob_get_clean());
-
- ob_start();
- var_dump($that);
- $_that = trim(ob_get_clean());
-
- ok($pass, $test_name);
-
- if (!$pass) {
- diag(" got: $_this");
- diag(" expected: $_that");
- }
-
- return $pass;
-}
-
-function can_ok($object, $methods)
-{
- $pass = TRUE;
- $errors = array();
-
- foreach ($methods as $method) {
- if (!method_exists($object, $method)) {
- $pass = FALSE;
- $errors[] = " method_exists(\$object, $method) failed";
- }
- }
-
- if ($pass) {
- ok(TRUE, "method_exists(\$object, ...)");
- } else {
- ok(FALSE, "method_exists(\$object, ...)");
- diag($errors);
- }
-
- return $pass;
-}
-
-function isa_ok($object, $expected_class, $object_name = 'The object')
-{
- $got_class = get_class($object);
-
- if (version_compare(phpversion(), '5', '>=')) {
- $pass = ($got_class == $expected_class);
- } else {
- $pass = ($got_class == strtolower($expected_class));
- }
-
- if ($pass) {
- ok(TRUE, "$object_name isa $expected_class");
- } else {
- ok(FALSE, "$object_name isn't a '$expected_class' it's a '$got_class'");
- }
-
- return $pass;
-}
-
-function pass($test_name = '')
-{
- return ok(TRUE, $test_name);
-}
-
-function fail($test_name = '')
-{
- return ok(FALSE, $test_name);
-}
-
-function diag($message)
-{
- if (is_array($message)) {
- foreach($message as $current) {
- echo "# $current\n";
- }
- } else {
- echo "# $message\n";
- }
-}
-
-function include_ok($module)
-{
- $pass = ((include $module) == 1);
- return ok($pass);
-}
-
-function require_ok($module)
-{
- $pass = ((require $module) == 1);
- return ok($pass);
-}
-
-function skip($message, $num)
-{
- global $_num_skips;
-
- if ($num < 0) {
- $num = 0;
- }
-
- for ($i = 0; $i < $num; $i++) {
- pass("# SKIP $message");
- }
-
- $_num_skips = $num;
-}
-
-function is_deeply($got_struct, $expected_struct, $test_name = '')
-{
- $got_flat = var_export($got_struct, true);
- $expected_flat = var_export($expected_struct, true);
-
- is($got_flat, $expected_flat, $test_name);
-}
-
-
-/*
-
-TODO:
-
-function todo()
-{
-}
-
-function todo_skip()
-{
-}
-
-function eq_array()
-{
-}
-
-function eq_hash()
-{
-}
-
-function eq_set()
-{
-}
-
-*/
-
-function _test_end()
-{
- global $_no_plan;
- global $_num_failures;
- global $_test_num;
-
- if ($_no_plan) {
- echo "1..$_test_num\n";
- }
-
- if ($_num_failures) {
- diag("Looks like you failed $_num_failures tests of $_test_num.");
- }
-}
-
-?>
generated by cgit v1.2.1 (git 2.21.0) at 2024-05-07 15:23:17 +0000