summaryrefslogtreecommitdiff
path: root/ext/openssl/tests/ServerClientTestCase.inc
blob: 03e0c2de87c92ab3e3cf420b0389c7eb9869f332 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
<?php

const WORKER_ARGV_VALUE = 'RUN_WORKER';

function phpt_notify()
{
    ServerClientTestCase::getInstance()->notify();
}

function phpt_wait()
{
    ServerClientTestCase::getInstance()->wait();
}

/**
 * This is a singleton to let the wait/notify functions work
 * I know it's horrible, but it's a means to an end
 */
class ServerClientTestCase
{
    private $isWorker = false;

    private $workerHandle;

    private $workerStdIn;

    private $workerStdOut;

    private static $instance;

    public static function getInstance($isWorker = false)
    {
        if (!isset(self::$instance)) {
            self::$instance = new self($isWorker);
        }

        return self::$instance;
    }

    public function __construct($isWorker = false)
    {
        if (!isset(self::$instance)) {
            self::$instance = $this;
        }

        $this->isWorker = $isWorker;
    }

    private function spawnWorkerProcess($code)
    {
        $cmd = sprintf('%s "%s" %s', PHP_BINARY, __FILE__, WORKER_ARGV_VALUE);

        $this->workerHandle = proc_open($cmd, [['pipe', 'r'], ['pipe', 'w'], STDERR], $pipes);
        $this->workerStdIn = $pipes[0];
        $this->workerStdOut = $pipes[1];

        fwrite($this->workerStdIn, $code . "\n---\n");
    }

    private function cleanupWorkerProcess()
    {
        fclose($this->workerStdIn);
        fclose($this->workerStdOut);
        proc_close($this->workerHandle);
    }

    private function stripPhpTagsFromCode($code)
    {
        return preg_replace('/^\s*<\?(?:php)?|\?>\s*$/i', '', $code);
    }

    public function runWorker()
    {
        $code = '';

        while (1) {
            $line = fgets(STDIN);

            if (trim($line) === "---") {
                break;
            }

            $code .= $line;
        }

        eval($code);
    }

    public function run($proc1Code, $proc2Code)
    {
        $this->spawnWorkerProcess($this->stripPhpTagsFromCode($proc2Code));
        eval($this->stripPhpTagsFromCode($proc1Code));
        $this->cleanupWorkerProcess();
    }
    
    public function wait()
    {
        fgets($this->isWorker ? STDIN : $this->workerStdOut);
    }

    public function notify()
    {
        fwrite($this->isWorker ? STDOUT : $this->workerStdIn, "\n");
    }
}

if (isset($argv[1]) && $argv[1] === WORKER_ARGV_VALUE) {
    ServerClientTestCase::getInstance(true)->runWorker();
}