<?php defined("SYSPATH") or die("No direct script access.");
/**
 * Gallery - a web based photo album viewer and editor
 * Copyright (C) 2000-2008 Bharat Mediratta
 *
 * This program 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.
 *
 * This program 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 Street - Fifth Floor, Boston, MA  02110-1301, USA.
 */
class installer {
  static function command_line() {
    // Set error handlers
    set_error_handler(create_function('$errno, $errstr, $errfile, $errline',
        'throw new ErrorException($errstr, 0, $errno, $errfile, $errline);'));
    set_exception_handler(array("installer", "print_exception"));

    $config = self::parse_cli_params();
    try {
      self::environment_check();
      self::setup_database($config);
      self::setup_varpath();
      self::install($config);
      list ($user, $password) = self::create_admin($config);
      print "Successfully installed your Gallery 3!\n";
      print "Log in with:\n  username: admin\n  password: $password\n";
    } catch (InstallException $e) {
      self::display_errors($e->errors());
    }
  }

  static function environment_check() {
    $errors = array();

    if (version_compare(PHP_VERSION, "5.2", "<")) {
      $errors["PHP Version"] = sprintf(
        "Gallery3 requires PHP 5.2 or newer, current version: %s.", PHP_VERSION);
    }

    if (!@preg_match("/^.$/u", utf8_encode("\xF1"))) {
      $errors["PCRE UTF-8"] =
        "PHP is missing Perl-Compatible Regular Expression support  (http://php.net/pcre)";
    }

    if (!(class_exists("ReflectionClass"))) {
      $errors["PHP Reflection"] = "PHP is missing Reflection support (http://php.net/reflection)";
    }

    if (!(function_exists("filter_list"))) {
      $errors["Filters"] = "PHP is missing the filter extension (http://php.net/filter)";
    }

    if (!(extension_loaded("iconv"))) {
      $errors["iconv"] = "PHP is missing the iconv extension (http://php.net/iconv)";
    }

    if (extension_loaded("mbstring") &&
        (ini_get("mbstring.func_overload") & MB_OVERLOAD_STRING)) {
      $errors["Multibyte Strings"] =
        "The mbstring extension is overloading PHP's native string functions " .
        "(http://php.net/mbstring)";
    }

    if (!(isset($_SERVER["REQUEST_URI"]) || isset($_SERVER["PHP_SELF"]))) {
      $errors["URL Detection"] =
        "Neither \$_SERVER['REQUEST_URI'] or \$_SERVER['PHP_SELF'] is available";
    }

    $short_tags = ini_get("short_open_tag");
    if (empty($short_tags)) {
      $errors["Short Tags"] =
        "PHP short tag support is disabled.  (http://php.net/manual/en/ini.core.php)";
    }

    if ($errors) {
      throw new InstallException($errors);
    }
  }

  static function parse_cli_params() {
    $config = array("host" => "localhost",
                    "user" => "root",
                    "password" => "",
                    "dbname" => "gallery3",
                    "prefix" => "");

    if (function_exists("mysqli_init")) {
      $config["type"] = "mysqli";
    } else {
      $config["type"] = "mysql";
    }

    $argv = $_SERVER["argv"];
    for ($i = 1; $i < count($argv); $i++) {
      switch (strtolower($argv[$i])) {
      case "-d":
        $config["dbname"] = $argv[++$i];
        break;
      case "-h":
        $config["host"] = $argv[++$i];
        break;
      case "-u":
        $config["user"] = $argv[++$i];
        break;
      case "-p":
        $config["password"] = $argv[++$i];
        break;
      }
    }

    return $config;
  }

  static function setup_database($config) {
    $errors = array();
    if (!mysql_connect($config["host"], $config["user"], $config["password"])) {
      $errors["Database"] =
        "Unable to connect to your database with the credentials provided.  Error details:\n" .
        mysql_error();
      return;
    }

    if (!mysql_select_db($config["dbname"]) &&
        !function_exists("mysql_create_db") ||
        !mysql_create_db($config["dbname"])) {
      $errors["Database"] = sprintf(
        "Database '%s' is not defined and can't be created",
        $config["dbname"]);
    }

    if (empty($errors) && mysql_num_rows(mysql_query("SHOW TABLES FROM {$config['dbname']}"))) {
      $errors["Database"] = sprintf(
        "Database '%s' exists and has tables in it, continuing may overwrite an existing install",
        $config["dbname"]);
    }

    if ($errors) {
      throw new InstallException($errors);
    }
  }

  static function setup_varpath() {
    $errors = array();
    if (is_writable(VARPATH)) {
      return;
    }

    if (is_writable(dirname(VARPATH)) && !mkdir(VARPATH)) {
      $errors["Filesystem"] =
        sprintf("The %s directory doesn't exist and can't be created", VARPATH);
    }

    if ($errors) {
      throw new InstallException($errors);
    }
  }

  static function install($config) {
    $errors = array();

    include(DOCROOT . "installer/init_var.php");

    $db_config_file = VARPATH . "database.php";
    $output = self::_render("installer/database_config.php", $config);

    if (!file_put_contents($db_config_file, $output) !== false) {
      $errors["Config"] = "Unable to create " . VARPATH . "database.php";
    }

    $buf = "";
    foreach (file("installer/install.sql") as $line) {
      $buf .= $line;
      if (preg_match("/;$/", $buf)) {
        if (!mysql_query($buf)) {
          $errors["Database"] = "Unable to install database tables.  Error details:\n" .
            mysql_error();
          break;
        }
        $buf = "";
      }
    }

    system("chmod -R 777 " . VARPATH);

    if ($errors) {
      throw new InstallException($errors);
    }
  }

  static function create_admin($config) {
    $errors = array();
    $salt = "";
    for ($i = 0; $i < 4; $i++) {
      $char = mt_rand(48, 109);
      $char += ($char > 90) ? 13 : ($char > 57) ? 7 : 0;
      $salt .= chr($char);
    }
    $password = substr(md5(time() * rand()), 0, 6);
    $hashed_password = $salt . md5($salt . $password);
    if (mysql_query("UPDATE `users` SET `password` = '$hashed_password' WHERE `id` = 2")) {
    } else {
      $errors["Database"] = "Unable to set admin password.  Error details:\n" . mysql_error();
    }

    if ($errors) {
      throw new InstallException($errors);
    }

    return array("admin", $password);
  }

  private static function _render($view, $data) {
    extract($data);
    ob_start();
    include($view);
    return ob_get_clean();
  }

  static function print_exception($exception) {
    print $exception->getMessage() . "\n";
    print $exception->getTraceAsString();
  }

  static function display_errors($errors) {
    print "Errors\n";
    foreach ($errors as $title => $error) {
      print "$title\n";
      print "  $error\n\n";
    }
  }
}

class InstallException extends Exception {
  var $errors;

  function __construct($errors) {
    parent::__construct();
    $this->errors = $errors;
  }

  function errors() {
    return $this->errors;
  }
}