<?php

// phpunit is such a pain to install, we're going with pure-PHP here.
class TestSuite {
	public static $errors = array();
	public static $warnings = array();

	protected function assertFalse($bool) {
		$this->assertTrue(!$bool);
	}

	protected function assertTrue($bool) {
		if($bool)
			return;

		$bt = debug_backtrace(false);
		self::$errors []= sprintf("Assertion failed: %s:%d (%s)\n",
			$bt[0]["file"], $bt[0]["line"], $bt[1]["function"]);
	}

    protected function assertLess($a, $b) {
        if($a < $b) 
            return;

        $bt = debug_backtrace(false);
        self::$errors[] = sprintf("Assertion failed (%s >= %s): %s: %d (%s\n",
            print_r($a, true), print_r($b, true),
            $bt[0]["file"], $bt[0]["line"], $bt[1]["function"]);
    }

	protected function assertEquals($a, $b) {
		if($a === $b)
			return;

		$bt = debug_backtrace(false);
		self::$errors []= sprintf("Assertion failed (%s !== %s): %s:%d (%s)\n",
			print_r($a, true), print_r($b, true),
			$bt[0]["file"], $bt[0]["line"], $bt[1]["function"]);
	}

	protected function markTestSkipped($msg='') {
		$bt = debug_backtrace(false);
		self::$warnings []= sprintf("Skipped test: %s:%d (%s) %s\n",
			$bt[0]["file"], $bt[0]["line"], $bt[1]["function"], $msg);

		throw new Exception($msg);
	}

	public static function run($className, $str_limit) {
        $rc = new ReflectionClass($className);
		$methods = $rc->GetMethods(ReflectionMethod::IS_PUBLIC);

        if ($str_limit) {
            echo "Limiting to tests with the substring: '$str_limit'\n";
        }

		foreach($methods as $m) {
			$name = $m->name;
			if(substr($name, 0, 4) !== 'test')
				continue;

            /* If TestRedis.php was envoked with an argument, do a simple
             * match against the routine.  Useful to limit to one test */
            if ($str_limit && strpos(strtolower($name),strtolower($str_limit))===false)
                continue;

			$count = count($className::$errors);
			$rt = new $className;
			try {
				$rt->setUp();
				$rt->$name();
				echo ($count === count($className::$errors)) ? "." : "F";
			} catch (Exception $e) {
				if ($e instanceof RedisException) {
					$className::$errors[] = "Uncaught exception '".$e->getMessage()."' ($name)\n";
					echo 'F';
				} else {
					echo 'S';
				}
			}
		}
		echo "\n";
		echo implode('', $className::$warnings);

		if(empty($className::$errors)) {
			echo "All tests passed.\n";
			return 0;
		}

		echo implode('', $className::$errors);
		return 1;
	}
}

?>