blob: de0f266f01b12c4a4e5eb57e12a47b4066cce01b (
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
|
<?php
if (version_compare(PHP_VERSION, '5.3.0') < 0) {
echo "Just a heads up: Filebin has not been tested with php older than 5.3. You might run into problems.";
}
$errors = "";
define('SELF', pathinfo(__FILE__, PATHINFO_BASENAME));
define('FCPATH', str_replace(SELF, "", __FILE__));
if (file_exists(FCPATH."is_installed")) {
exit("already installed\n");
}
$old_path = getenv("PATH");
putenv("PATH=$old_path:/usr/local/bin:/usr/bin:/bin:/usr/local/sbin:/usr/sbin:/sbin");
// test exec()
exec("echo -n works") == "works" || $errors .= "exec() failed\n";
// test passthru()
ob_start();
passthru("echo -n works");
$buf = ob_get_contents();
ob_end_clean();
$buf == "works" || $errors .= "passthru() failed\n";
// test perl HTML::FromANSI
ob_start();
passthru("perl 2>&1 ".FCPATH."/scripts/install_helper.pl");
$buf = ob_get_contents();
ob_end_clean();
if ($buf != "works") {
$errors .= " - Error when running perl tests.\n";
$errors .= nl2br($buf);
}
// test memcache
if (!class_exists("Memcache")) {
$errors .= " - Missing \"Memcache\" php class. Please install your distribution's package of http://pecl.php.net/package/memcache\n";
}
// test qrencode
ob_start();
passthru("qrencode -V 2>&1", $buf);
ob_end_clean();
if ($buf != "0") {
$errors .= " - Error when testing qrencode: Return code was \"$buf\".\n";
}
if ($errors != "") {
echo nl2br("\n\n");
echo nl2br("Errors occured:\n");
echo nl2br($errors);
} else {
// TODO: Make this an actual installer
file_put_contents(FCPATH."is_installed", "true");
echo nl2br("Tests completed.\n"
."The following steps remain:\n"
." - copy the files from ./application/config/example/ to ./application/config/ and edit them to suit your setup\n"
." - the database will be set up automatically\n"
);
}
|
