Aleksander Machniak
2012-10-03 4e004778ab01c3087a773e05cf4693720a52d08f
installer/rcube_install.php
@@ -5,7 +5,7 @@
 | rcube_install.php                                                     |
 |                                                                       |
 | This file is part of the Roundcube Webmail package                    |
 | Copyright (C) 2008-2011, The Roundcube Dev Team                       |
 | Copyright (C) 2008-2012, The Roundcube Dev Team                       |
 |                                                                       |
 | Licensed under the GNU General Public License version 3 or            |
 | any later version with exceptions for skins & plugins.                |
@@ -50,7 +50,7 @@
  // these config options are required for a working system
  var $required_config = array(
    'db_dsnw', 'db_table_contactgroups', 'db_table_contactgroupmembers',
    'des_key', 'session_lifetime',
    'des_key', 'session_lifetime', 'support_url',
  );
  /**
@@ -254,7 +254,7 @@
    
    // iterate over default config
    foreach ($defaults as $prop => $value) {
      if (!isset($seen[$prop]) && !isset($this->config[$prop]) && isset($required[$prop]))
      if (!isset($seen[$prop]) && isset($required[$prop]) && !(is_bool($this->config[$prop]) || strlen($this->config[$prop])))
        $out['missing'][] = array('prop' => $prop);
    }
@@ -266,7 +266,7 @@
      }
      else if (!empty($this->config['spellcheck_languages'])) {
        foreach ($this->config['spellcheck_languages'] as $lang => $descr)
          if (!pspell_new($lang))
          if (!@pspell_new($lang))
            $out['dependencies'][] = array('prop' => 'spellcheck_languages',
              'explain' => "You are missing pspell support for language $lang ($descr)");
      }
@@ -413,7 +413,7 @@
  {
    if (!$this->configured)
      return false;
    $options = array(
      'use_transactions' => false,
      'log_line_break' => "\n",
@@ -423,11 +423,11 @@
      'force_defaults' => false,
      'portability' => true
    );
    $dsnw = $this->config['db_dsnw'];
    $schema = MDB2_Schema::factory($dsnw, $options);
    $schema->db->supported['transactions'] = false;
    if (PEAR::isError($schema)) {
      $this->raise_error(array('code' => $schema->getCode(), 'message' => $schema->getMessage() . ' ' . $schema->getUserInfo()));
      return false;
@@ -435,33 +435,33 @@
    else {
      $definition = $schema->getDefinitionFromDatabase();
      $definition['charset'] = 'utf8';
      if (PEAR::isError($definition)) {
        $this->raise_error(array('code' => $definition->getCode(), 'message' => $definition->getMessage() . ' ' . $definition->getUserInfo()));
        return false;
      }
      // load reference schema
      $dsn_arr = MDB2::parseDSN($this->config['db_dsnw']);
      $ref_schema = INSTALL_PATH . 'SQL/' . $dsn_arr['phptype'] . '.schema.xml';
      if (is_readable($ref_schema)) {
        $reference = $schema->parseDatabaseDefinition($ref_schema, false, array(), $schema->options['fail_on_invalid_names']);
        if (PEAR::isError($reference)) {
          $this->raise_error(array('code' => $reference->getCode(), 'message' => $reference->getMessage() . ' ' . $reference->getUserInfo()));
        }
        else {
          $diff = $schema->compareDefinitions($reference, $definition);
          if (empty($diff)) {
            return true;
          }
          else if ($update) {
            // update database schema with the diff from the above check
            $success = $schema->alterDatabase($reference, $definition, $diff);
            if (PEAR::isError($success)) {
              $this->raise_error(array('code' => $success->getCode(), 'message' => $success->getMessage() . ' ' . $success->getUserInfo()));
            }
@@ -476,11 +476,11 @@
        $this->raise_error(array('message' => "Could not find reference schema file ($ref_schema)"));
        return false;
    }
    return false;
  }
  /**
   * Getter for the last error message
   *
@@ -490,8 +490,8 @@
  {
      return $this->last_error['message'];
  }
  /**
   * Return a list with all imap hosts configured
   *
@@ -501,12 +501,12 @@
  {
    $default_hosts = (array)$this->getprop('default_host');
    $out = array();
    foreach ($default_hosts as $key => $name) {
      if (!empty($name))
        $out[] = rcube_parse_host(is_numeric($key) ? $name : $key);
    }
    return $out;
  }
@@ -523,7 +523,8 @@
        '0.4-beta', '0.4.2',
        '0.5-beta', '0.5', '0.5.1',
        '0.6-beta', '0.6',
        '0.7-beta', '0.7', '0.7.1'
        '0.7-beta', '0.7', '0.7.1', '0.7.2', '0.7.3',
        '0.8-beta', '0.8-rc', '0.8.0', '0.8.1',
    ));
    return $select;
  }
@@ -542,7 +543,7 @@
    }
    return $skins;
  }
  /**
   * Display OK status
   *
@@ -554,8 +555,8 @@
    echo Q($name) . ':&nbsp; <span class="success">OK</span>';
    $this->_showhint($message);
  }
  /**
   * Display an error status and increase failure count
   *
@@ -566,7 +567,7 @@
  function fail($name, $message = '', $url = '')
  {
    $this->failures++;
    echo Q($name) . ':&nbsp; <span class="fail">NOT OK</span>';
    $this->_showhint($message, $url);
  }
@@ -584,8 +585,8 @@
    echo Q($name) . ':&nbsp; <span class="na">NOT OK</span>';
    $this->_showhint($message, $url);
  }
  /**
   * Display warning status
   *
@@ -598,24 +599,24 @@
    echo Q($name) . ':&nbsp; <span class="na">NOT AVAILABLE</span>';
    $this->_showhint($message, $url);
  }
  function _showhint($message, $url = '')
  {
    $hint = Q($message);
    if ($url)
      $hint .= ($hint ? '; ' : '') . 'See <a href="' . Q($url) . '" target="_blank">' . Q($url) . '</a>';
    if ($hint)
      echo '<span class="indent">(' . $hint . ')</span>';
  }
  static function _clean_array($arr)
  {
    $out = array();
    foreach (array_unique($arr) as $k => $val) {
      if (!empty($val)) {
        if (is_numeric($k))
@@ -624,11 +625,11 @@
          $out[$k] = $val;
      }
    }
    return $out;
  }
  static function _dump_var($var, $name=null) {
    // special values
    switch ($name) {
@@ -657,16 +658,16 @@
            break;
          }
        }
        if ($isnum)
          return 'array(' . join(', ', array_map(array('rcube_install', '_dump_var'), $var)) . ')';
      }
    }
    return var_export($var, true);
  }
  /**
   * Initialize the database with the according schema
   *
@@ -676,7 +677,7 @@
  function init_db($DB)
  {
    $engine = isset($this->db_map[$DB->db_provider]) ? $this->db_map[$DB->db_provider] : $DB->db_provider;
    // read schema file from /SQL/*
    $fname = INSTALL_PATH . "SQL/$engine.initial.sql";
    if ($sql = @file_get_contents($fname)) {
@@ -686,7 +687,7 @@
      $this->fail('DB Schema', "Cannot read the schema file: $fname");
      return false;
    }
    if ($err = $this->get_error()) {
      $this->fail('DB Schema', "Error creating database schema: $err");
      return false;
@@ -694,8 +695,8 @@
    return true;
  }
  /**
   * Update database with SQL statements from SQL/*.update.sql
   *
@@ -707,7 +708,7 @@
  {
    $version = strtolower($version);
    $engine = isset($this->db_map[$DB->db_provider]) ? $this->db_map[$DB->db_provider] : $DB->db_provider;
    // read schema file from /SQL/*
    $fname = INSTALL_PATH . "SQL/$engine.update.sql";
    if ($lines = @file($fname, FILE_SKIP_EMPTY_LINES)) {
@@ -722,7 +723,7 @@
        if ($from && !$is_comment)
          $sql .= $line. "\n";
      }
      if ($sql)
        $this->exec_sql($sql, $DB);
    }
@@ -730,7 +731,7 @@
      $this->fail('DB Schema', "Cannot read the update file: $fname");
      return false;
    }
    if ($err = $this->get_error()) {
      $this->fail('DB Schema', "Error updating database: $err");
      return false;
@@ -738,8 +739,8 @@
    return true;
  }
  /**
   * Execute the given SQL queries on the database connection
   *
@@ -753,7 +754,7 @@
    foreach (explode("\n", $sql) as $line) {
      if (preg_match('/^--/', $line) || trim($line) == '')
        continue;
      $buff .= $line . "\n";
      if (preg_match('/(;|^GO)$/', trim($line))) {
        $DB->query($buff);
@@ -762,11 +763,11 @@
          break;
      }
    }
    return !$DB->is_error();
  }
  /**
   * Handler for Roundcube errors
   */
@@ -774,8 +775,8 @@
  {
      $this->last_error = $p;
  }
  /**
   * Generarte a ramdom string to be used as encryption key
   *
@@ -787,12 +788,12 @@
  {
    $alpha = 'ABCDEFGHIJKLMNOPQERSTUVXYZabcdefghijklmnopqrtsuvwxyz0123456789+*%&?!$-_=';
    $out = '';
    for ($i=0; $i < $length; $i++)
      $out .= $alpha{rand(0, strlen($alpha)-1)};
    return $out;
  }
}