File: setup.php

package info (click to toggle)
horde3 3.1.3-4etch7
  • links: PTS
  • area: main
  • in suites: etch
  • size: 22,876 kB
  • ctags: 18,071
  • sloc: php: 75,151; xml: 2,979; sql: 1,069; makefile: 79; sh: 64
file content (68 lines) | stat: -rwxr-xr-x 2,388 bytes parent folder | download | duplicates (2)
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
#!/usr/bin/php
<?php
/**
 * The main Horde setup script which allows for a step by step setup
 * or reconfiguration of a Horde installation.
 *
 * $Horde: horde/scripts/setup.php,v 1.25.10.10 2006/05/18 15:47:32 chuck Exp $
 *
 * Copyright 2003-2006 Marko Djukic <marko@oblo.com>
 * Copyright 2003-2006 Charles J. Hagenbuch <chuck@horde.org>
 *
 * See the enclosed file COPYING for license information (LGPL).  If you
 * did not receive this file, see http://www.fsf.org/copyleft/lgpl.html.
 *
 * @author  Marko Djukic <marko@oblo.com>
 * @author  Charles J. Hagenbuch <chuck@horde.org>
 * @since   Horde 3.0
 */

@define('AUTH_HANDLER', true);
@define('HORDE_BASE', dirname(__FILE__) . '/..');
require_once HORDE_BASE . '/lib/core.php';
require_once 'Horde/CLI.php';

$cli = new Horde_CLI();

/* Check for config files. */
$files = array('conf.php',
               'mime_drivers.php',
               'nls.php',
               'prefs.php',
               'registry.php');
foreach ($files as $filename) {
    $file = HORDE_BASE . '/config/' . $filename;
    if (file_exists($file)) {
        cli_log(sprintf(_("File \"%s\" is available."), $filename), 'message');
        continue;
    }

    cli_log(sprintf(_("File \"%s\" is missing."), $filename), 'warning');

    $distfile = $file . '.dist';
    if (file_exists($distfile)) {
        $create_config = $cli->prompt(sprintf(_("Create \"%s\" from defaults now?"), $filename), array('y' => _("Yes"), 'n' => _("No")));
        if ($create_config == 'y') {
            if (!copy($distfile, $file)) {
                $cli->fatal(sprintf(_("Copying \"%1$s.dist\" to \"%1$s\" failed. Check your installation."), $filename));
            }
            cli_log(sprintf(_("File %s created."), $filename), 'success');
        } else {
            $cli->fatal(sprintf(_("You need the \"%s\" file to continue setup and to use Horde."), $filename));
        }
    } else {
        $cli->fatal(sprintf(_("Cannot find \"%s\", check your installation."), $distfile));
    }
}

cli_log(_("Initial setup completed. Now continue the setup with your browser, go to: http://<Your Horde install URL>/admin/"), 'success');
exit;

/**
 * Wrap the messages with an indent, neater screen display.
 */
function cli_log($message, $type = 'message')
{
    $message = wordwrap($message, 69, "\n           ");
    $GLOBALS['cli']->message($message, 'cli.' . $type);
}