<?php
/* -*- tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
/*
# ***** BEGIN LICENSE BLOCK *****
# This file is part of InDefero, an open source project management application.
# Copyright (C) 2010 Céondo Ltd and contributors.
#
# InDefero is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# InDefero is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
#
# ***** END LICENSE BLOCK ***** */

require_once("simpletest/autorun.php");

/**
 * Test the monotone class.
 */
class IDF_Tests_TestMonotone extends UnitTestCase
{
    private $tmpdir, $dbfile;

    private function mtnCall($args, $stdin = null, $dir = null)
    {
        $cmdline = array("mtn",
                        "--confdir", $this->tmpdir,
                        "--db", $this->dbfile,
                        "--norc",
                        "--timestamps");

        $cmdline = array_merge($cmdline, $args);

        $descriptorspec = array(
           0 => array("pipe", "r"),
           1 => array("pipe", "w"),
           2 => array("file", "{$this->tmpdir}/mtn-errors", "a")
        );

        $pipes = array();
        $process = proc_open(implode(" ", $cmdline),
                             $descriptorspec,
                             $pipes,
                             empty($dir) ? $this->tmpdir : $dir);

        if (!is_resource($process))
        {
            throw new Exception("could not create process");
        }

        if (!empty($stdin))
        {
            fwrite($pipes[0], $stdin);
            fclose($pipes[0]);
        }

        $stdout = stream_get_contents($pipes[1]);
        fclose($pipes[1]);

        $ret = proc_close($process);
        if ($ret != 0)
        {
            throw new Exception(
                "call ended with a non-zero error code (complete cmdline was: ".
                implode(" ", $cmdline).")"
            );
        }

        return $stdout;
    }

    public function __construct()
    {
        parent::__construct("Test the monotone class.");

        $this->tmpdir = sys_get_temp_dir() . "/mtn-test";
        echo "test root is {$this->tmpdir}\n";
        $this->dbfile = "{$this->tmpdir}/test.mtn";
    }

    private static function deleteRecursive($dirname)
    {
        if (is_dir($dirname))
            $dir_handle=opendir($dirname);

        while ($file = readdir($dir_handle))
        {
            if ($file!="." && $file!="..")
            {
                if (!is_dir($dirname."/".$file))
                {
                    unlink ($dirname."/".$file);
                    continue;
                }
                self::deleteRecursive($dirname."/".$file);
            }
        }

        closedir($dir_handle);
        rmdir($dirname);

        return true;
    }

    public function setUp()
    {
        if (is_dir($this->tmpdir))
        {
            self::deleteRecursive($this->tmpdir);
        }

        mkdir($this->tmpdir);

        $this->mtnCall(array("db", "init"));

        $this->mtnCall(array("genkey", "test@test.de"), "\n\n");

        $workspaceRoot = "{$this->tmpdir}/test-workspace";
        mkdir($workspaceRoot);

        $this->mtnCall(array("setup", "-b", "testbranch", "blafoo"), null, $workspaceRoot);

        file_put_contents("$workspaceRoot/foo", "blafoo");
        $this->mtnCall(array("add", "foo"), null, $workspaceRoot);

        $this->mtnCall(array("commit", "-m", "initial"), null, $workspaceRoot);

        file_put_contents("$workspaceRoot/foo", "bla");

        file_put_contents("$workspaceRoot/bar", "blafoo");
        $this->mtnCall(array("add", "bar"), null, $workspaceRoot);

        $this->mtnCall(array("commit", "-m", "second"), null, $workspaceRoot);
    }

    public function testBranches()
    {
        $this->assertTrue(false);
    }
}