Show spam aliases #
This commit is contained in:
32
data/web/rc/program/include/clisetup.php
Normal file
32
data/web/rc/program/include/clisetup.php
Normal file
@@ -0,0 +1,32 @@
|
||||
<?php
|
||||
|
||||
/**
|
||||
+-----------------------------------------------------------------------+
|
||||
| program/include/clisetup.php |
|
||||
| |
|
||||
| This file is part of the Roundcube Webmail client |
|
||||
| Copyright (C) 2010-2014, The Roundcube Dev Team |
|
||||
| |
|
||||
| Licensed under the GNU General Public License version 3 or |
|
||||
| any later version with exceptions for skins & plugins. |
|
||||
| See the README file for a full license statement. |
|
||||
| |
|
||||
| PURPOSE: |
|
||||
| Setup the command line environment and provide some utitlity |
|
||||
| functions. |
|
||||
+-----------------------------------------------------------------------+
|
||||
| Author: Thomas Bruederli <roundcube@gmail.com> |
|
||||
+-----------------------------------------------------------------------+
|
||||
*/
|
||||
|
||||
if (php_sapi_name() != 'cli') {
|
||||
die('Not on the "shell" (php-cli).');
|
||||
}
|
||||
|
||||
require_once INSTALL_PATH . 'program/include/iniset.php';
|
||||
|
||||
// Unset max. execution time limit, set to 120 seconds in iniset.php
|
||||
@set_time_limit(0);
|
||||
|
||||
$rcmail = rcmail::get_instance();
|
||||
$rcmail->output = new rcmail_output_cli();
|
82
data/web/rc/program/include/iniset.php
Normal file
82
data/web/rc/program/include/iniset.php
Normal file
@@ -0,0 +1,82 @@
|
||||
<?php
|
||||
|
||||
/**
|
||||
+-----------------------------------------------------------------------+
|
||||
| program/include/iniset.php |
|
||||
| |
|
||||
| This file is part of the Roundcube Webmail client |
|
||||
| Copyright (C) 2008-2015, The Roundcube Dev Team |
|
||||
| |
|
||||
| Licensed under the GNU General Public License version 3 or |
|
||||
| any later version with exceptions for skins & plugins. |
|
||||
| See the README file for a full license statement. |
|
||||
| |
|
||||
| PURPOSE: |
|
||||
| Setup the application environment required to process |
|
||||
| any request. |
|
||||
+-----------------------------------------------------------------------+
|
||||
| Author: Till Klampaeckel <till@php.net> |
|
||||
| Thomas Bruederli <roundcube@gmail.com> |
|
||||
+-----------------------------------------------------------------------+
|
||||
*/
|
||||
|
||||
// application constants
|
||||
define('RCMAIL_VERSION', '1.3-beta');
|
||||
define('RCMAIL_START', microtime(true));
|
||||
|
||||
if (!defined('INSTALL_PATH')) {
|
||||
define('INSTALL_PATH', dirname($_SERVER['SCRIPT_FILENAME']).'/');
|
||||
}
|
||||
|
||||
if (!defined('RCMAIL_CONFIG_DIR')) {
|
||||
define('RCMAIL_CONFIG_DIR', INSTALL_PATH . 'config');
|
||||
}
|
||||
|
||||
if (!defined('RCUBE_LOCALIZATION_DIR')) {
|
||||
define('RCUBE_LOCALIZATION_DIR', INSTALL_PATH . 'program/localization/');
|
||||
}
|
||||
|
||||
define('RCUBE_INSTALL_PATH', INSTALL_PATH);
|
||||
define('RCUBE_CONFIG_DIR', RCMAIL_CONFIG_DIR.'/');
|
||||
|
||||
|
||||
// RC include folders MUST be included FIRST to avoid other
|
||||
// possible not compatible libraries (i.e PEAR) to be included
|
||||
// instead the ones provided by RC
|
||||
$include_path = INSTALL_PATH . 'program/lib' . PATH_SEPARATOR;
|
||||
$include_path.= ini_get('include_path');
|
||||
|
||||
if (set_include_path($include_path) === false) {
|
||||
die("Fatal error: ini_set/set_include_path does not work.");
|
||||
}
|
||||
|
||||
// increase maximum execution time for php scripts
|
||||
// (does not work in safe mode)
|
||||
@set_time_limit(120);
|
||||
|
||||
// include composer autoloader (if available)
|
||||
if (@file_exists(INSTALL_PATH . 'vendor/autoload.php')) {
|
||||
require INSTALL_PATH . 'vendor/autoload.php';
|
||||
}
|
||||
|
||||
// include Roundcube Framework
|
||||
require_once 'Roundcube/bootstrap.php';
|
||||
|
||||
// register autoloader for rcmail app classes
|
||||
spl_autoload_register('rcmail_autoload');
|
||||
|
||||
/**
|
||||
* PHP5 autoloader routine for dynamic class loading
|
||||
*/
|
||||
function rcmail_autoload($classname)
|
||||
{
|
||||
if (strpos($classname, 'rcmail') === 0) {
|
||||
$filepath = INSTALL_PATH . "program/include/$classname.php";
|
||||
if (is_readable($filepath)) {
|
||||
include_once $filepath;
|
||||
return true;
|
||||
}
|
||||
}
|
||||
|
||||
return false;
|
||||
}
|
2524
data/web/rc/program/include/rcmail.php
Normal file
2524
data/web/rc/program/include/rcmail.php
Normal file
File diff suppressed because it is too large
Load Diff
48
data/web/rc/program/include/rcmail_html_page.php
Normal file
48
data/web/rc/program/include/rcmail_html_page.php
Normal file
@@ -0,0 +1,48 @@
|
||||
<?php
|
||||
|
||||
/**
|
||||
+-----------------------------------------------------------------------+
|
||||
| program/include/rcmail_html_page.php |
|
||||
| |
|
||||
| This file is part of the Roundcube Webmail client |
|
||||
| Copyright (C) 2006-2013, The Roundcube Dev Team |
|
||||
| |
|
||||
| Licensed under the GNU General Public License version 3 or |
|
||||
| any later version with exceptions for skins & plugins. |
|
||||
| See the README file for a full license statement. |
|
||||
| |
|
||||
| PURPOSE: |
|
||||
| Render a simple HTML page with the given contents |
|
||||
| |
|
||||
+-----------------------------------------------------------------------+
|
||||
| Author: Thomas Bruederli <roundcube@gmail.com> |
|
||||
+-----------------------------------------------------------------------+
|
||||
*/
|
||||
|
||||
/**
|
||||
* Class to create an empty HTML page with some default styles
|
||||
*
|
||||
* @package Webmail
|
||||
* @subpackage View
|
||||
*/
|
||||
class rcmail_html_page extends rcmail_output_html
|
||||
{
|
||||
public function write($contents = '')
|
||||
{
|
||||
self::reset(true);
|
||||
|
||||
// load embed.css from skin folder (if exists)
|
||||
if ($embed_css = $this->get_skin_file('/embed.css')) {
|
||||
$this->include_css($embed_css);
|
||||
}
|
||||
else { // set default styles for warning blocks inside the attachment part frame
|
||||
$this->add_header(html::tag('style', array('type' => 'text/css'),
|
||||
".rcmail-inline-message { font-family: sans-serif; border:2px solid #ffdf0e;"
|
||||
. "background:#fef893; padding:0.6em 1em; margin-bottom:0.6em }\n" .
|
||||
".rcmail-inline-buttons { margin-bottom:0 }"
|
||||
));
|
||||
}
|
||||
|
||||
parent::write($contents);
|
||||
}
|
||||
}
|
835
data/web/rc/program/include/rcmail_install.php
Normal file
835
data/web/rc/program/include/rcmail_install.php
Normal file
@@ -0,0 +1,835 @@
|
||||
<?php
|
||||
|
||||
/**
|
||||
+-----------------------------------------------------------------------+
|
||||
| rcmail_install.php |
|
||||
| |
|
||||
| This file is part of the Roundcube Webmail package |
|
||||
| Copyright (C) 2008-2016, The Roundcube Dev Team |
|
||||
| |
|
||||
| Licensed under the GNU General Public License version 3 or |
|
||||
| any later version with exceptions for skins & plugins. |
|
||||
| See the README file for a full license statement. |
|
||||
+-----------------------------------------------------------------------+
|
||||
*/
|
||||
|
||||
/**
|
||||
* Class to control the installation process of the Roundcube Webmail package
|
||||
*
|
||||
* @category Install
|
||||
* @package Roundcube
|
||||
* @author Thomas Bruederli
|
||||
*/
|
||||
class rcmail_install
|
||||
{
|
||||
public $step;
|
||||
public $last_error;
|
||||
public $is_post = false;
|
||||
public $failures = 0;
|
||||
public $config = array();
|
||||
public $configured = false;
|
||||
public $legacy_config = false;
|
||||
public $email_pattern = '([a-z0-9][a-z0-9\-\.\+\_]*@[a-z0-9]([a-z0-9\-][.]?)*[a-z0-9])';
|
||||
public $bool_config_props = array();
|
||||
|
||||
public $local_config = array('db_dsnw', 'default_host', 'support_url', 'des_key', 'plugins');
|
||||
public $obsolete_config = array('db_backend', 'db_max_length', 'double_auth', 'preview_pane');
|
||||
public $replaced_config = array(
|
||||
'skin_path' => 'skin',
|
||||
'locale_string' => 'language',
|
||||
'multiple_identities' => 'identities_level',
|
||||
'addrbook_show_images' => 'show_images',
|
||||
'imap_root' => 'imap_ns_personal',
|
||||
'pagesize' => 'mail_pagesize',
|
||||
'top_posting' => 'reply_mode',
|
||||
'keep_alive' => 'refresh_interval',
|
||||
'min_keep_alive' => 'min_refresh_interval',
|
||||
);
|
||||
|
||||
// list of supported database drivers
|
||||
public $supported_dbs = array(
|
||||
'MySQL' => 'pdo_mysql',
|
||||
'PostgreSQL' => 'pdo_pgsql',
|
||||
'SQLite' => 'pdo_sqlite',
|
||||
'SQLite (v2)' => 'pdo_sqlite2',
|
||||
'SQL Server (SQLSRV)' => 'pdo_sqlsrv',
|
||||
'SQL Server (DBLIB)' => 'pdo_dblib',
|
||||
'Oracle' => 'oci8',
|
||||
);
|
||||
|
||||
|
||||
/**
|
||||
* Constructor
|
||||
*/
|
||||
public function __construct()
|
||||
{
|
||||
$this->step = intval($_REQUEST['_step']);
|
||||
$this->is_post = $_SERVER['REQUEST_METHOD'] == 'POST';
|
||||
}
|
||||
|
||||
/**
|
||||
* Singleton getter
|
||||
*/
|
||||
public static function get_instance()
|
||||
{
|
||||
static $inst;
|
||||
|
||||
if (!$inst) {
|
||||
$inst = new rcmail_install();
|
||||
}
|
||||
|
||||
return $inst;
|
||||
}
|
||||
|
||||
/**
|
||||
* Read the local config files and store properties
|
||||
*/
|
||||
public function load_config()
|
||||
{
|
||||
// defaults
|
||||
if ($config = $this->load_config_file(RCUBE_CONFIG_DIR . 'defaults.inc.php')) {
|
||||
$this->config = (array) $config;
|
||||
$this->defaults = $this->config;
|
||||
}
|
||||
|
||||
$config = null;
|
||||
|
||||
// config
|
||||
if ($config = $this->load_config_file(RCUBE_CONFIG_DIR . 'config.inc.php')) {
|
||||
$this->config = array_merge($this->config, $config);
|
||||
}
|
||||
else {
|
||||
if ($config = $this->load_config_file(RCUBE_CONFIG_DIR . 'main.inc.php')) {
|
||||
$this->config = array_merge($this->config, $config);
|
||||
$this->legacy_config = true;
|
||||
}
|
||||
|
||||
if ($config = $this->load_config_file(RCUBE_CONFIG_DIR . 'db.inc.php')) {
|
||||
$this->config = array_merge($this->config, $config);
|
||||
$this->legacy_config = true;
|
||||
}
|
||||
}
|
||||
|
||||
$this->configured = !empty($config);
|
||||
}
|
||||
|
||||
/**
|
||||
* Read the default config file and store properties
|
||||
*
|
||||
* @param string $file File name with path
|
||||
*/
|
||||
public function load_config_file($file)
|
||||
{
|
||||
if (!is_readable($file)) {
|
||||
return;
|
||||
}
|
||||
|
||||
include $file;
|
||||
|
||||
// read comments from config file
|
||||
if (function_exists('token_get_all')) {
|
||||
$tokens = token_get_all(file_get_contents($file));
|
||||
$in_config = false;
|
||||
$buffer = '';
|
||||
|
||||
for ($i = 0; $i < count($tokens); $i++) {
|
||||
$token = $tokens[$i];
|
||||
if ($token[0] == T_VARIABLE && ($token[1] == '$config' || $token[1] == '$rcmail_config')) {
|
||||
$in_config = true;
|
||||
if ($buffer && $tokens[$i+1] == '[' && $tokens[$i+2][0] == T_CONSTANT_ENCAPSED_STRING) {
|
||||
$propname = trim($tokens[$i+2][1], "'\"");
|
||||
$this->comments[$propname] = $buffer;
|
||||
$buffer = '';
|
||||
$i += 3;
|
||||
}
|
||||
}
|
||||
else if ($in_config && $token[0] == T_COMMENT) {
|
||||
$buffer .= strtr($token[1], array('\n' => "\n"));
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
// deprecated name of config variable
|
||||
if (is_array($rcmail_config)) {
|
||||
return $rcmail_config;
|
||||
}
|
||||
|
||||
return $config;
|
||||
}
|
||||
|
||||
/**
|
||||
* Getter for a certain config property
|
||||
*
|
||||
* @param string $name Property name
|
||||
* @param string $default Default value
|
||||
*
|
||||
* @return string The property value
|
||||
*/
|
||||
public function getprop($name, $default = '')
|
||||
{
|
||||
$value = $this->config[$name];
|
||||
|
||||
if ($name == 'des_key' && !$this->configured && !isset($_REQUEST["_$name"])) {
|
||||
$value = rcube_utils::random_bytes(24);
|
||||
}
|
||||
|
||||
return $value !== null && $value !== '' ? $value : $default;
|
||||
}
|
||||
|
||||
/**
|
||||
* Create configuration file that contains parameters
|
||||
* that differ from default values.
|
||||
*
|
||||
* @return string The complete config file content
|
||||
*/
|
||||
public function create_config()
|
||||
{
|
||||
$config = array();
|
||||
|
||||
foreach ($this->config as $prop => $default) {
|
||||
$is_default = !isset($_POST["_$prop"]);
|
||||
$value = !$is_default || $this->bool_config_props[$prop] ? $_POST["_$prop"] : $default;
|
||||
|
||||
// always disable installer
|
||||
if ($prop == 'enable_installer') {
|
||||
$value = false;
|
||||
}
|
||||
|
||||
// reset useragent to default (keeps version up-to-date)
|
||||
if ($prop == 'useragent' && stripos($value, 'Roundcube Webmail/') !== false) {
|
||||
$value = $this->defaults[$prop];
|
||||
}
|
||||
|
||||
// generate new encryption key, never use the default value
|
||||
if ($prop == 'des_key' && $value == $this->defaults[$prop]) {
|
||||
$value = rcube_utils::random_bytes(24);
|
||||
}
|
||||
|
||||
// convert some form data
|
||||
if ($prop == 'debug_level' && !$is_default) {
|
||||
if (is_array($value)) {
|
||||
$val = 0;
|
||||
foreach ($value as $dbgval) {
|
||||
$val += intval($dbgval);
|
||||
}
|
||||
$value = $val;
|
||||
}
|
||||
}
|
||||
else if ($prop == 'db_dsnw' && !empty($_POST['_dbtype'])) {
|
||||
if ($_POST['_dbtype'] == 'sqlite') {
|
||||
$value = sprintf('%s://%s?mode=0646', $_POST['_dbtype'],
|
||||
$_POST['_dbname']{0} == '/' ? '/' . $_POST['_dbname'] : $_POST['_dbname']);
|
||||
}
|
||||
else if ($_POST['_dbtype']) {
|
||||
$value = sprintf('%s://%s:%s@%s/%s', $_POST['_dbtype'],
|
||||
rawurlencode($_POST['_dbuser']), rawurlencode($_POST['_dbpass']), $_POST['_dbhost'], $_POST['_dbname']);
|
||||
}
|
||||
}
|
||||
else if ($prop == 'smtp_auth_type' && $value == '0') {
|
||||
$value = '';
|
||||
}
|
||||
else if ($prop == 'default_host' && is_array($value)) {
|
||||
$value = self::_clean_array($value);
|
||||
if (count($value) <= 1) {
|
||||
$value = $value[0];
|
||||
}
|
||||
}
|
||||
else if ($prop == 'mail_pagesize' || $prop == 'addressbook_pagesize') {
|
||||
$value = max(2, intval($value));
|
||||
}
|
||||
else if ($prop == 'smtp_user' && !empty($_POST['_smtp_user_u'])) {
|
||||
$value = '%u';
|
||||
}
|
||||
else if ($prop == 'smtp_pass' && !empty($_POST['_smtp_user_u'])) {
|
||||
$value = '%p';
|
||||
}
|
||||
else if (is_bool($default)) {
|
||||
$value = (bool) $value;
|
||||
}
|
||||
else if (is_numeric($value)) {
|
||||
$value = intval($value);
|
||||
}
|
||||
else if ($prop == 'plugins' && !empty($_POST['submit'])) {
|
||||
$value = array();
|
||||
foreach (array_keys($_POST) as $key) {
|
||||
if (preg_match('/^_plugins_*/', $key)) {
|
||||
array_push($value, $_POST[$key]);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
// skip this property
|
||||
if ($value == $this->defaults[$prop]
|
||||
&& (!in_array($prop, $this->local_config)
|
||||
|| in_array($prop, array_merge($this->obsolete_config, array_keys($this->replaced_config)))
|
||||
|| preg_match('/^db_(table|sequence)_/', $prop)
|
||||
)
|
||||
) {
|
||||
continue;
|
||||
}
|
||||
|
||||
// save change
|
||||
$this->config[$prop] = $value;
|
||||
$config[$prop] = $value;
|
||||
}
|
||||
|
||||
$out = "<?php\n\n";
|
||||
$out .= "/* Local configuration for Roundcube Webmail */\n\n";
|
||||
|
||||
foreach ($config as $prop => $value) {
|
||||
// copy option descriptions from existing config or defaults.inc.php
|
||||
$out .= $this->comments[$prop];
|
||||
$out .= "\$config['$prop'] = " . self::_dump_var($value, $prop) . ";\n\n";
|
||||
}
|
||||
|
||||
return $out;
|
||||
}
|
||||
|
||||
/**
|
||||
* save generated config file in RCUBE_CONFIG_DIR
|
||||
*
|
||||
* @return boolean True if the file was saved successfully, false if not
|
||||
*/
|
||||
public function save_configfile($config)
|
||||
{
|
||||
if (is_writable(RCUBE_CONFIG_DIR)) {
|
||||
return file_put_contents(RCUBE_CONFIG_DIR . 'config.inc.php', $config);
|
||||
}
|
||||
|
||||
return false;
|
||||
}
|
||||
|
||||
/**
|
||||
* Check the current configuration for missing properties
|
||||
* and deprecated or obsolete settings
|
||||
*
|
||||
* @return array List with problems detected
|
||||
*/
|
||||
public function check_config()
|
||||
{
|
||||
$this->load_config();
|
||||
|
||||
if (!$this->configured) {
|
||||
return;
|
||||
}
|
||||
|
||||
$out = $seen = array();
|
||||
|
||||
// iterate over the current configuration
|
||||
foreach (array_keys($this->config) as $prop) {
|
||||
if ($replacement = $this->replaced_config[$prop]) {
|
||||
$out['replaced'][] = array('prop' => $prop, 'replacement' => $replacement);
|
||||
$seen[$replacement] = true;
|
||||
}
|
||||
else if (!$seen[$prop] && in_array($prop, $this->obsolete_config)) {
|
||||
$out['obsolete'][] = array('prop' => $prop);
|
||||
$seen[$prop] = true;
|
||||
}
|
||||
}
|
||||
|
||||
// the old default mime_magic reference is obsolete
|
||||
if ($this->config['mime_magic'] == '/usr/share/misc/magic') {
|
||||
$out['obsolete'][] = array(
|
||||
'prop' => 'mime_magic',
|
||||
'explain' => "Set value to null in order to use system default"
|
||||
);
|
||||
}
|
||||
|
||||
// check config dependencies and contradictions
|
||||
if ($this->config['enable_spellcheck'] && $this->config['spellcheck_engine'] == 'pspell') {
|
||||
if (!extension_loaded('pspell')) {
|
||||
$out['dependencies'][] = array(
|
||||
'prop' => 'spellcheck_engine',
|
||||
'explain' => "This requires the <tt>pspell</tt> extension which could not be loaded."
|
||||
);
|
||||
}
|
||||
else if (!empty($this->config['spellcheck_languages'])) {
|
||||
foreach ($this->config['spellcheck_languages'] as $lang => $descr) {
|
||||
if (!@pspell_new($lang)) {
|
||||
$out['dependencies'][] = array(
|
||||
'prop' => 'spellcheck_languages',
|
||||
'explain' => "You are missing pspell support for language $lang ($descr)"
|
||||
);
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
if ($this->config['log_driver'] == 'syslog') {
|
||||
if (!function_exists('openlog')) {
|
||||
$out['dependencies'][] = array(
|
||||
'prop' => 'log_driver',
|
||||
'explain' => "This requires the <tt>syslog</tt> extension which could not be loaded."
|
||||
);
|
||||
}
|
||||
|
||||
if (empty($this->config['syslog_id'])) {
|
||||
$out['dependencies'][] = array(
|
||||
'prop' => 'syslog_id',
|
||||
'explain' => "Using <tt>syslog</tt> for logging requires a syslog ID to be configured"
|
||||
);
|
||||
}
|
||||
}
|
||||
|
||||
// check ldap_public sources having global_search enabled
|
||||
if (is_array($this->config['ldap_public']) && !is_array($this->config['autocomplete_addressbooks'])) {
|
||||
foreach ($this->config['ldap_public'] as $ldap_public) {
|
||||
if ($ldap_public['global_search']) {
|
||||
$out['replaced'][] = array(
|
||||
'prop' => 'ldap_public::global_search',
|
||||
'replacement' => 'autocomplete_addressbooks'
|
||||
);
|
||||
break;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
return $out;
|
||||
}
|
||||
|
||||
/**
|
||||
* Merge the current configuration with the defaults
|
||||
* and copy replaced values to the new options.
|
||||
*/
|
||||
public function merge_config()
|
||||
{
|
||||
$current = $this->config;
|
||||
$this->config = array();
|
||||
|
||||
foreach ($this->replaced_config as $prop => $replacement) {
|
||||
if (isset($current[$prop])) {
|
||||
if ($prop == 'skin_path') {
|
||||
$this->config[$replacement] = preg_replace('#skins/(\w+)/?$#', '\\1', $current[$prop]);
|
||||
}
|
||||
else if ($prop == 'multiple_identities') {
|
||||
$this->config[$replacement] = $current[$prop] ? 2 : 0;
|
||||
}
|
||||
else {
|
||||
$this->config[$replacement] = $current[$prop];
|
||||
}
|
||||
}
|
||||
|
||||
unset($current[$prop]);
|
||||
}
|
||||
|
||||
foreach ($this->obsolete_config as $prop) {
|
||||
unset($current[$prop]);
|
||||
}
|
||||
|
||||
// add all ldap_public sources having global_search enabled to autocomplete_addressbooks
|
||||
if (is_array($current['ldap_public'])) {
|
||||
foreach ($current['ldap_public'] as $key => $ldap_public) {
|
||||
if ($ldap_public['global_search']) {
|
||||
$this->config['autocomplete_addressbooks'][] = $key;
|
||||
unset($current['ldap_public'][$key]['global_search']);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
$this->config = array_merge($this->config, $current);
|
||||
|
||||
foreach (array_keys((array) $current['ldap_public']) as $key) {
|
||||
$this->config['ldap_public'][$key] = $current['ldap_public'][$key];
|
||||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* Compare the local database schema with the reference schema
|
||||
* required for this version of Roundcube
|
||||
*
|
||||
* @param rcube_db $db Database object
|
||||
*
|
||||
* @return boolean True if the schema is up-to-date, false if not or an error occurred
|
||||
*/
|
||||
public function db_schema_check($db)
|
||||
{
|
||||
if (!$this->configured) {
|
||||
return false;
|
||||
}
|
||||
|
||||
// read reference schema from mysql.initial.sql
|
||||
$db_schema = $this->db_read_schema(INSTALL_PATH . 'SQL/mysql.initial.sql');
|
||||
$errors = array();
|
||||
|
||||
// check list of tables
|
||||
$existing_tables = $db->list_tables();
|
||||
|
||||
foreach ($db_schema as $table => $cols) {
|
||||
$table = $this->config['db_prefix'] . $table;
|
||||
|
||||
if (!in_array($table, $existing_tables)) {
|
||||
$errors[] = "Missing table '".$table."'";
|
||||
}
|
||||
else { // compare cols
|
||||
$db_cols = $db->list_cols($table);
|
||||
$diff = array_diff(array_keys($cols), $db_cols);
|
||||
|
||||
if (!empty($diff)) {
|
||||
$errors[] = "Missing columns in table '$table': " . join(',', $diff);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
return !empty($errors) ? $errors : false;
|
||||
}
|
||||
|
||||
/**
|
||||
* Utility function to read database schema from an .sql file
|
||||
*/
|
||||
private function db_read_schema($schemafile)
|
||||
{
|
||||
$lines = file($schemafile);
|
||||
$table_block = false;
|
||||
$schema = array();
|
||||
$keywords = array('PRIMARY','KEY','INDEX','UNIQUE','CONSTRAINT','REFERENCES','FOREIGN');
|
||||
|
||||
foreach ($lines as $line) {
|
||||
if (preg_match('/^\s*create table `?([a-z0-9_]+)`?/i', $line, $m)) {
|
||||
$table_block = $m[1];
|
||||
}
|
||||
else if ($table_block && preg_match('/^\s*`?([a-z0-9_-]+)`?\s+([a-z]+)/', $line, $m)) {
|
||||
$col = $m[1];
|
||||
if (!in_array(strtoupper($col), $keywords)) {
|
||||
$schema[$table_block][$col] = $m[2];
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
return $schema;
|
||||
}
|
||||
|
||||
/**
|
||||
* Try to detect some file's mimetypes to test the correct behavior of fileinfo
|
||||
*/
|
||||
public function check_mime_detection()
|
||||
{
|
||||
$errors = array();
|
||||
$files = array(
|
||||
'skins/larry/images/roundcube_logo.png' => 'image/png',
|
||||
'program/resources/blank.tiff' => 'image/tiff',
|
||||
'program/resources/blocked.gif' => 'image/gif',
|
||||
'skins/larry/README' => 'text/plain',
|
||||
);
|
||||
|
||||
foreach ($files as $path => $expected) {
|
||||
$mimetype = rcube_mime::file_content_type(INSTALL_PATH . $path, basename($path));
|
||||
if ($mimetype != $expected) {
|
||||
$errors[] = array($path, $mimetype, $expected);
|
||||
}
|
||||
}
|
||||
|
||||
return $errors;
|
||||
}
|
||||
|
||||
/**
|
||||
* Check the correct configuration of the 'mime_types' mapping option
|
||||
*/
|
||||
public function check_mime_extensions()
|
||||
{
|
||||
$errors = array();
|
||||
$types = array(
|
||||
'application/zip' => 'zip',
|
||||
'text/css' => 'css',
|
||||
'application/pdf' => 'pdf',
|
||||
'image/gif' => 'gif',
|
||||
'image/svg+xml' => 'svg',
|
||||
);
|
||||
|
||||
foreach ($types as $mimetype => $expected) {
|
||||
$ext = rcube_mime::get_mime_extensions($mimetype);
|
||||
if (!in_array($expected, (array) $ext)) {
|
||||
$errors[] = array($mimetype, $ext, $expected);
|
||||
}
|
||||
}
|
||||
|
||||
return $errors;
|
||||
}
|
||||
|
||||
/**
|
||||
* Getter for the last error message
|
||||
*
|
||||
* @return string Error message or null if none exists
|
||||
*/
|
||||
public function get_error()
|
||||
{
|
||||
return $this->last_error['message'];
|
||||
}
|
||||
|
||||
/**
|
||||
* Return a list with all imap hosts configured
|
||||
*
|
||||
* @return array Clean list with imap hosts
|
||||
*/
|
||||
public function get_hostlist()
|
||||
{
|
||||
$default_hosts = (array) $this->getprop('default_host');
|
||||
$out = array();
|
||||
|
||||
foreach ($default_hosts as $key => $name) {
|
||||
if (!empty($name)) {
|
||||
$out[] = rcube_utils::parse_host(is_numeric($key) ? $name : $key);
|
||||
}
|
||||
}
|
||||
|
||||
return $out;
|
||||
}
|
||||
|
||||
/**
|
||||
* Create a HTML dropdown to select a previous version of Roundcube
|
||||
*/
|
||||
public function versions_select($attrib = array())
|
||||
{
|
||||
$select = new html_select($attrib);
|
||||
$select->add(array(
|
||||
'0.1-stable', '0.1.1',
|
||||
'0.2-alpha', '0.2-beta', '0.2-stable',
|
||||
'0.3-stable', '0.3.1',
|
||||
'0.4-beta', '0.4.2',
|
||||
'0.5-beta', '0.5', '0.5.1', '0.5.2', '0.5.3', '0.5.4',
|
||||
'0.6-beta', '0.6',
|
||||
'0.7-beta', '0.7', '0.7.1', '0.7.2', '0.7.3', '0.7.4',
|
||||
'0.8-beta', '0.8-rc', '0.8.0', '0.8.1', '0.8.2', '0.8.3', '0.8.4', '0.8.5', '0.8.6',
|
||||
'0.9-beta', '0.9-rc', '0.9-rc2',
|
||||
// Note: Do not add newer versions here
|
||||
));
|
||||
|
||||
return $select;
|
||||
}
|
||||
|
||||
/**
|
||||
* Return a list with available subfolders of the skin directory
|
||||
*/
|
||||
public function list_skins()
|
||||
{
|
||||
$skins = array();
|
||||
$skindir = INSTALL_PATH . 'skins/';
|
||||
|
||||
foreach (glob($skindir . '*') as $path) {
|
||||
if (is_dir($path) && is_readable($path)) {
|
||||
$skins[] = substr($path, strlen($skindir));
|
||||
}
|
||||
}
|
||||
|
||||
return $skins;
|
||||
}
|
||||
|
||||
/**
|
||||
* Return a list with available subfolders of the plugins directory
|
||||
* (with their associated description in composer.json)
|
||||
*/
|
||||
public function list_plugins()
|
||||
{
|
||||
$plugins = array();
|
||||
$plugin_dir = INSTALL_PATH . 'plugins/';
|
||||
|
||||
foreach (glob($plugin_dir . '*') as $path) {
|
||||
if (!is_dir($path)) {
|
||||
continue;
|
||||
}
|
||||
|
||||
if (is_readable($path . '/composer.json')) {
|
||||
$file_json = json_decode(file_get_contents($path . '/composer.json'));
|
||||
$plugin_desc = $file_json->description ?: 'N/A';
|
||||
}
|
||||
else {
|
||||
$plugin_desc = 'N/A';
|
||||
}
|
||||
|
||||
$name = substr($path, strlen($plugin_dir));
|
||||
$plugins[] = array(
|
||||
'name' => $name,
|
||||
'desc' => $plugin_desc,
|
||||
'enabled' => in_array($name, (array) $this->config['plugins'])
|
||||
);
|
||||
}
|
||||
|
||||
return $plugins;
|
||||
}
|
||||
|
||||
/**
|
||||
* Display OK status
|
||||
*
|
||||
* @param string $name Test name
|
||||
* @param string $message Confirm message
|
||||
*/
|
||||
public function pass($name, $message = '')
|
||||
{
|
||||
echo rcube::Q($name) . ': <span class="success">OK</span>';
|
||||
$this->_showhint($message);
|
||||
}
|
||||
|
||||
/**
|
||||
* Display an error status and increase failure count
|
||||
*
|
||||
* @param string $name Test name
|
||||
* @param string $message Error message
|
||||
* @param string $url URL for details
|
||||
* @param bool $optional Do not count this failure
|
||||
*/
|
||||
public function fail($name, $message = '', $url = '', $optional=false)
|
||||
{
|
||||
if (!$optional) {
|
||||
$this->failures++;
|
||||
}
|
||||
|
||||
echo rcube::Q($name) . ': <span class="fail">NOT OK</span>';
|
||||
$this->_showhint($message, $url);
|
||||
}
|
||||
|
||||
/**
|
||||
* Display an error status for optional settings/features
|
||||
*
|
||||
* @param string $name Test name
|
||||
* @param string $message Error message
|
||||
* @param string $url URL for details
|
||||
*/
|
||||
public function optfail($name, $message = '', $url = '')
|
||||
{
|
||||
echo rcube::Q($name) . ': <span class="na">NOT OK</span>';
|
||||
$this->_showhint($message, $url);
|
||||
}
|
||||
|
||||
/**
|
||||
* Display warning status
|
||||
*
|
||||
* @param string $name Test name
|
||||
* @param string $message Warning message
|
||||
* @param string $url URL for details
|
||||
*/
|
||||
public function na($name, $message = '', $url = '')
|
||||
{
|
||||
echo rcube::Q($name) . ': <span class="na">NOT AVAILABLE</span>';
|
||||
$this->_showhint($message, $url);
|
||||
}
|
||||
|
||||
private function _showhint($message, $url = '')
|
||||
{
|
||||
$hint = rcube::Q($message);
|
||||
|
||||
if ($url) {
|
||||
$hint .= ($hint ? '; ' : '') . 'See <a href="' . rcube::Q($url) . '" target="_blank">' . rcube::Q($url) . '</a>';
|
||||
}
|
||||
|
||||
if ($hint) {
|
||||
echo '<span class="indent">(' . $hint . ')</span>';
|
||||
}
|
||||
}
|
||||
|
||||
private static function _clean_array($arr)
|
||||
{
|
||||
$out = array();
|
||||
|
||||
foreach (array_unique($arr) as $k => $val) {
|
||||
if (!empty($val)) {
|
||||
if (is_numeric($k)) {
|
||||
$out[] = $val;
|
||||
}
|
||||
else {
|
||||
$out[$k] = $val;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
return $out;
|
||||
}
|
||||
|
||||
private static function _dump_var($var, $name=null)
|
||||
{
|
||||
// special values
|
||||
switch ($name) {
|
||||
case 'syslog_facility':
|
||||
$list = array(32 => 'LOG_AUTH', 80 => 'LOG_AUTHPRIV', 72 => ' LOG_CRON',
|
||||
24 => 'LOG_DAEMON', 0 => 'LOG_KERN', 128 => 'LOG_LOCAL0',
|
||||
136 => 'LOG_LOCAL1', 144 => 'LOG_LOCAL2', 152 => 'LOG_LOCAL3',
|
||||
160 => 'LOG_LOCAL4', 168 => 'LOG_LOCAL5', 176 => 'LOG_LOCAL6',
|
||||
184 => 'LOG_LOCAL7', 48 => 'LOG_LPR', 16 => 'LOG_MAIL',
|
||||
56 => 'LOG_NEWS', 40 => 'LOG_SYSLOG', 8 => 'LOG_USER', 64 => 'LOG_UUCP'
|
||||
);
|
||||
|
||||
if ($val = $list[$var]) {
|
||||
return $val;
|
||||
}
|
||||
break;
|
||||
/*
|
||||
// RCMAIL_VERSION is undefined here
|
||||
case 'useragent':
|
||||
if (preg_match('|^(.*)/('.preg_quote(RCMAIL_VERSION, '|').')$|i', $var, $m)) {
|
||||
return '"' . addcslashes($var, '"') . '/" . RCMAIL_VERSION';
|
||||
}
|
||||
break;
|
||||
*/
|
||||
}
|
||||
|
||||
if (is_array($var)) {
|
||||
if (empty($var)) {
|
||||
return 'array()';
|
||||
}
|
||||
else { // check if all keys are numeric
|
||||
$isnum = true;
|
||||
foreach (array_keys($var) as $key) {
|
||||
if (!is_numeric($key)) {
|
||||
$isnum = false;
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
if ($isnum) {
|
||||
return 'array(' . join(', ', array_map(array('rcmail_install', '_dump_var'), $var)) . ')';
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
return var_export($var, true);
|
||||
}
|
||||
|
||||
/**
|
||||
* Initialize the database with the according schema
|
||||
*
|
||||
* @param rcube_db $db Database connection
|
||||
*
|
||||
* @return boolen True on success, False on error
|
||||
*/
|
||||
public function init_db($db)
|
||||
{
|
||||
$engine = $db->db_provider;
|
||||
|
||||
// read schema file from /SQL/*
|
||||
$fname = INSTALL_PATH . "SQL/$engine.initial.sql";
|
||||
if ($sql = @file_get_contents($fname)) {
|
||||
$db->set_option('table_prefix', $this->config['db_prefix']);
|
||||
$db->exec_script($sql);
|
||||
}
|
||||
else {
|
||||
$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;
|
||||
}
|
||||
|
||||
return true;
|
||||
}
|
||||
|
||||
/**
|
||||
* Update database schema
|
||||
*
|
||||
* @param string $version Version to update from
|
||||
*
|
||||
* @return boolen True on success, False on error
|
||||
*/
|
||||
public function update_db($version)
|
||||
{
|
||||
return rcmail_utils::db_update(INSTALL_PATH . 'SQL',
|
||||
'roundcube', $version, array('quiet' => true));
|
||||
}
|
||||
|
||||
/**
|
||||
* Handler for Roundcube errors
|
||||
*/
|
||||
public function raise_error($p)
|
||||
{
|
||||
$this->last_error = $p;
|
||||
}
|
||||
}
|
118
data/web/rc/program/include/rcmail_output.php
Normal file
118
data/web/rc/program/include/rcmail_output.php
Normal file
@@ -0,0 +1,118 @@
|
||||
<?php
|
||||
|
||||
/**
|
||||
+-----------------------------------------------------------------------+
|
||||
| program/include/rcmail_output.php |
|
||||
| |
|
||||
| This file is part of the Roundcube PHP suite |
|
||||
| Copyright (C) 2005-2012 The Roundcube Dev Team |
|
||||
| |
|
||||
| Licensed under the GNU General Public License version 3 or |
|
||||
| any later version with exceptions for skins & plugins. |
|
||||
| See the README file for a full license statement. |
|
||||
| CONTENTS: |
|
||||
| Abstract class for output generation |
|
||||
| |
|
||||
+-----------------------------------------------------------------------+
|
||||
| Author: Thomas Bruederli <roundcube@gmail.com> |
|
||||
| Author: Aleksander Machniak <alec@alec.pl> |
|
||||
+-----------------------------------------------------------------------+
|
||||
*/
|
||||
|
||||
/**
|
||||
* Class for output generation
|
||||
*
|
||||
* @package Webmail
|
||||
* @subpackage View
|
||||
*/
|
||||
abstract class rcmail_output extends rcube_output
|
||||
{
|
||||
const JS_OBJECT_NAME = 'rcmail';
|
||||
const BLANK_GIF = 'R0lGODlhDwAPAIAAAMDAwAAAACH5BAEAAAAALAAAAAAPAA8AQAINhI+py+0Po5y02otnAQA7';
|
||||
|
||||
public $type = 'html';
|
||||
public $ajax_call = false;
|
||||
public $framed = false;
|
||||
|
||||
protected $pagetitle = '';
|
||||
protected $object_handlers = array();
|
||||
protected $devel_mode = false;
|
||||
|
||||
|
||||
/**
|
||||
* Object constructor
|
||||
*/
|
||||
public function __construct($task = null, $framed = false)
|
||||
{
|
||||
parent::__construct();
|
||||
|
||||
$this->devel_mode = (bool) $this->config->get('devel_mode');
|
||||
}
|
||||
|
||||
/**
|
||||
* Setter for page title
|
||||
*
|
||||
* @param string $title Page title
|
||||
*/
|
||||
public function set_pagetitle($title)
|
||||
{
|
||||
$this->pagetitle = $title;
|
||||
}
|
||||
|
||||
/**
|
||||
* Getter for the current skin path property
|
||||
*/
|
||||
public function get_skin_path()
|
||||
{
|
||||
return $this->config->get('skin_path');
|
||||
}
|
||||
|
||||
/**
|
||||
* Delete all stored env variables and commands
|
||||
*/
|
||||
public function reset()
|
||||
{
|
||||
parent::reset();
|
||||
|
||||
$this->object_handlers = array();
|
||||
$this->pagetitle = '';
|
||||
}
|
||||
|
||||
/**
|
||||
* Call a client method
|
||||
*
|
||||
* @param string Method to call
|
||||
* @param ... Additional arguments
|
||||
*/
|
||||
abstract function command();
|
||||
|
||||
/**
|
||||
* Add a localized label to the client environment
|
||||
*/
|
||||
abstract function add_label();
|
||||
|
||||
/**
|
||||
* Register a template object handler
|
||||
*
|
||||
* @param string $name Object name
|
||||
* @param string $func Function name to call
|
||||
*
|
||||
* @return void
|
||||
*/
|
||||
public function add_handler($name, $func)
|
||||
{
|
||||
$this->object_handlers[$name] = $func;
|
||||
}
|
||||
|
||||
/**
|
||||
* Register a list of template object handlers
|
||||
*
|
||||
* @param array $handlers Hash array with object=>handler pairs
|
||||
*
|
||||
* @return void
|
||||
*/
|
||||
public function add_handlers($handlers)
|
||||
{
|
||||
$this->object_handlers = array_merge($this->object_handlers, $handlers);
|
||||
}
|
||||
}
|
88
data/web/rc/program/include/rcmail_output_cli.php
Normal file
88
data/web/rc/program/include/rcmail_output_cli.php
Normal file
@@ -0,0 +1,88 @@
|
||||
<?php
|
||||
|
||||
/**
|
||||
+-----------------------------------------------------------------------+
|
||||
| program/include/rcmail_output_cli.php |
|
||||
| |
|
||||
| This file is part of the Roundcube PHP suite |
|
||||
| Copyright (C) 2005-2014 The Roundcube Dev Team |
|
||||
| |
|
||||
| Licensed under the GNU General Public License version 3 or |
|
||||
| any later version with exceptions for skins & plugins. |
|
||||
| See the README file for a full license statement. |
|
||||
| CONTENTS: |
|
||||
| Abstract class for output generation |
|
||||
| |
|
||||
+-----------------------------------------------------------------------+
|
||||
| Author: Thomas Bruederli <roundcube@gmail.com> |
|
||||
+-----------------------------------------------------------------------+
|
||||
*/
|
||||
|
||||
/**
|
||||
* Class for output generation
|
||||
*
|
||||
* @package Webmail
|
||||
* @subpackage View
|
||||
*/
|
||||
class rcmail_output_cli extends rcmail_output
|
||||
{
|
||||
public $type = 'cli';
|
||||
|
||||
/**
|
||||
* Object constructor
|
||||
*/
|
||||
public function __construct($task = null, $framed = false)
|
||||
{
|
||||
parent::__construct();
|
||||
}
|
||||
|
||||
/**
|
||||
* Call a client method
|
||||
*
|
||||
* @see rcube_output::command()
|
||||
*/
|
||||
function command()
|
||||
{
|
||||
// NOP
|
||||
}
|
||||
|
||||
/**
|
||||
* Add a localized label to the client environment
|
||||
*/
|
||||
function add_label()
|
||||
{
|
||||
// NOP
|
||||
}
|
||||
|
||||
/**
|
||||
* Invoke display_message command
|
||||
*
|
||||
* @see rcube_output::show_message()
|
||||
*/
|
||||
function show_message($message, $type = 'notice', $vars = null, $override = true, $timeout = 0)
|
||||
{
|
||||
if ($this->app->text_exists($message)) {
|
||||
$message = $this->app->gettext(array('name' => $message, 'vars' => $vars));
|
||||
}
|
||||
|
||||
printf("[%s] %s\n", strtoupper($type), $message);
|
||||
}
|
||||
|
||||
/**
|
||||
* Redirect to a certain url.
|
||||
*
|
||||
* @see rcube_output::redirect()
|
||||
*/
|
||||
function redirect($p = array(), $delay = 1)
|
||||
{
|
||||
// NOP
|
||||
}
|
||||
|
||||
/**
|
||||
* Send output to the client.
|
||||
*/
|
||||
function send()
|
||||
{
|
||||
// NOP
|
||||
}
|
||||
}
|
2119
data/web/rc/program/include/rcmail_output_html.php
Normal file
2119
data/web/rc/program/include/rcmail_output_html.php
Normal file
File diff suppressed because it is too large
Load Diff
260
data/web/rc/program/include/rcmail_output_json.php
Normal file
260
data/web/rc/program/include/rcmail_output_json.php
Normal file
@@ -0,0 +1,260 @@
|
||||
<?php
|
||||
|
||||
/**
|
||||
+-----------------------------------------------------------------------+
|
||||
| program/include/rcmail_output_json.php |
|
||||
| |
|
||||
| This file is part of the Roundcube Webmail client |
|
||||
| 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. |
|
||||
| See the README file for a full license statement. |
|
||||
| |
|
||||
| PURPOSE: |
|
||||
| Class to handle JSON (AJAX) output |
|
||||
+-----------------------------------------------------------------------+
|
||||
| Author: Thomas Bruederli <roundcube@gmail.com> |
|
||||
| Author: Aleksander Machniak <alec@alec.pl> |
|
||||
+-----------------------------------------------------------------------+
|
||||
*/
|
||||
|
||||
/**
|
||||
* View class to produce JSON responses
|
||||
*
|
||||
* @package Webmail
|
||||
* @subpackage View
|
||||
*/
|
||||
class rcmail_output_json extends rcmail_output
|
||||
{
|
||||
protected $texts = array();
|
||||
protected $commands = array();
|
||||
protected $callbacks = array();
|
||||
protected $message = null;
|
||||
|
||||
public $type = 'js';
|
||||
public $ajax_call = true;
|
||||
|
||||
|
||||
/**
|
||||
* Issue command to set page title
|
||||
*
|
||||
* @param string $title New page title
|
||||
*/
|
||||
public function set_pagetitle($title)
|
||||
{
|
||||
if ($this->config->get('devel_mode') && !empty($_SESSION['username'])) {
|
||||
$name = $_SESSION['username'];
|
||||
}
|
||||
else {
|
||||
$name = $this->config->get('product_name');
|
||||
}
|
||||
|
||||
$this->command('set_pagetitle', empty($name) ? $title : $name . ' :: ' . $title);
|
||||
}
|
||||
|
||||
/**
|
||||
* Register a template object handler
|
||||
*
|
||||
* @param string $obj Object name
|
||||
* @param string $func Function name to call
|
||||
*/
|
||||
public function add_handler($obj, $func)
|
||||
{
|
||||
// ignore
|
||||
}
|
||||
|
||||
/**
|
||||
* Register a list of template object handlers
|
||||
*
|
||||
* @param array $arr Hash array with object=>handler pairs
|
||||
*/
|
||||
public function add_handlers($arr)
|
||||
{
|
||||
// ignore
|
||||
}
|
||||
|
||||
/**
|
||||
* Call a client method
|
||||
*
|
||||
* @param string Method to call
|
||||
* @param ... Additional arguments
|
||||
*/
|
||||
public function command()
|
||||
{
|
||||
$cmd = func_get_args();
|
||||
|
||||
if (strpos($cmd[0], 'plugin.') === 0) {
|
||||
$this->callbacks[] = $cmd;
|
||||
}
|
||||
else {
|
||||
$this->commands[] = $cmd;
|
||||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* Add a localized label to the client environment
|
||||
*/
|
||||
public function add_label()
|
||||
{
|
||||
$args = func_get_args();
|
||||
if (count($args) == 1 && is_array($args[0])) {
|
||||
$args = $args[0];
|
||||
}
|
||||
|
||||
foreach ($args as $name) {
|
||||
$this->texts[$name] = $this->app->gettext($name);
|
||||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* Invoke display_message command
|
||||
*
|
||||
* @param string $message Message to display
|
||||
* @param string $type Message type [notice|confirm|error]
|
||||
* @param array $vars Key-value pairs to be replaced in localized text
|
||||
* @param boolean $override Override last set message
|
||||
* @param int $timeout Message displaying time in seconds
|
||||
*
|
||||
* @uses self::command()
|
||||
*/
|
||||
public function show_message($message, $type='notice', $vars=null, $override=true, $timeout=0)
|
||||
{
|
||||
if ($override || !$this->message) {
|
||||
if ($this->app->text_exists($message)) {
|
||||
if (!empty($vars)) {
|
||||
$vars = array_map(array('rcmail', 'Q'), $vars);
|
||||
}
|
||||
$msgtext = $this->app->gettext(array('name' => $message, 'vars' => $vars));
|
||||
}
|
||||
else
|
||||
$msgtext = $message;
|
||||
|
||||
$this->message = $message;
|
||||
$this->command('display_message', $msgtext, $type, $timeout * 1000);
|
||||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* Delete all stored env variables and commands
|
||||
*/
|
||||
public function reset()
|
||||
{
|
||||
parent::reset();
|
||||
$this->texts = array();
|
||||
$this->commands = array();
|
||||
}
|
||||
|
||||
/**
|
||||
* Redirect to a certain url
|
||||
*
|
||||
* @param mixed $p Either a string with the action or url parameters as key-value pairs
|
||||
* @param int $delay Delay in seconds
|
||||
*
|
||||
* @see rcmail::url()
|
||||
*/
|
||||
public function redirect($p = array(), $delay = 1)
|
||||
{
|
||||
$location = $this->app->url($p);
|
||||
$this->remote_response(sprintf("window.setTimeout(function(){ %s.redirect('%s',true); }, %d);",
|
||||
self::JS_OBJECT_NAME, $location, $delay));
|
||||
exit;
|
||||
}
|
||||
|
||||
/**
|
||||
* Send an AJAX response to the client.
|
||||
*/
|
||||
public function send()
|
||||
{
|
||||
$this->remote_response();
|
||||
exit;
|
||||
}
|
||||
|
||||
/**
|
||||
* Show error page and terminate script execution
|
||||
*
|
||||
* @param int $code Error code
|
||||
* @param string $message Error message
|
||||
*/
|
||||
public function raise_error($code, $message)
|
||||
{
|
||||
if ($code == 403) {
|
||||
header('HTTP/1.1 403 Forbidden');
|
||||
die("Invalid Request");
|
||||
}
|
||||
|
||||
$this->show_message("Application Error ($code): $message", 'error');
|
||||
$this->remote_response();
|
||||
exit;
|
||||
}
|
||||
|
||||
/**
|
||||
* Send an AJAX response with executable JS code
|
||||
*
|
||||
* @param string $add Additional JS code
|
||||
*/
|
||||
protected function remote_response($add = '')
|
||||
{
|
||||
static $s_header_sent = false;
|
||||
|
||||
if (!$s_header_sent) {
|
||||
$s_header_sent = true;
|
||||
$this->nocacheing_headers();
|
||||
header('Content-Type: text/plain; charset=' . $this->get_charset());
|
||||
}
|
||||
|
||||
// unset default env vars
|
||||
unset($this->env['task'], $this->env['action'], $this->env['comm_path']);
|
||||
|
||||
$rcmail = rcmail::get_instance();
|
||||
$response['action'] = $rcmail->action;
|
||||
|
||||
if ($unlock = rcube_utils::get_input_value('_unlock', rcube_utils::INPUT_GPC)) {
|
||||
$response['unlock'] = $unlock;
|
||||
}
|
||||
|
||||
if (!empty($this->env))
|
||||
$response['env'] = $this->env;
|
||||
|
||||
if (!empty($this->texts))
|
||||
$response['texts'] = $this->texts;
|
||||
|
||||
// send function calls
|
||||
$response['exec'] = $this->get_js_commands() . $add;
|
||||
|
||||
if (!empty($this->callbacks))
|
||||
$response['callbacks'] = $this->callbacks;
|
||||
|
||||
// trigger generic hook where plugins can put additional content to the response
|
||||
$hook = $this->app->plugins->exec_hook("render_response", array('response' => $response));
|
||||
|
||||
// save some memory
|
||||
$response = $hook['response'];
|
||||
unset($hook['response']);
|
||||
|
||||
echo self::json_serialize($response, $this->devel_mode);
|
||||
}
|
||||
|
||||
/**
|
||||
* Return executable javascript code for all registered commands
|
||||
*/
|
||||
protected function get_js_commands()
|
||||
{
|
||||
$out = '';
|
||||
|
||||
foreach ($this->commands as $i => $args) {
|
||||
$method = array_shift($args);
|
||||
foreach ($args as $i => $arg) {
|
||||
$args[$i] = self::json_serialize($arg, $this->devel_mode);
|
||||
}
|
||||
|
||||
$out .= sprintf(
|
||||
"this.%s(%s);\n",
|
||||
preg_replace('/^parent\./', '', $method),
|
||||
implode(',', $args)
|
||||
);
|
||||
}
|
||||
|
||||
return $out;
|
||||
}
|
||||
}
|
64
data/web/rc/program/include/rcmail_string_replacer.php
Normal file
64
data/web/rc/program/include/rcmail_string_replacer.php
Normal file
@@ -0,0 +1,64 @@
|
||||
<?php
|
||||
|
||||
/**
|
||||
+-----------------------------------------------------------------------+
|
||||
| program/include/rcmail_string_replacer.php |
|
||||
| |
|
||||
| This file is part of the Roundcube Webmail client |
|
||||
| Copyright (C) 2012-2013, The Roundcube Dev Team |
|
||||
| |
|
||||
| Licensed under the GNU General Public License version 3 or |
|
||||
| any later version with exceptions for skins & plugins. |
|
||||
| See the README file for a full license statement. |
|
||||
| |
|
||||
| PURPOSE: |
|
||||
| Turn URLs and email addresses into clickable links |
|
||||
| |
|
||||
+-----------------------------------------------------------------------+
|
||||
| Author: Thomas Bruederli <roundcube@gmail.com> |
|
||||
+-----------------------------------------------------------------------+
|
||||
*/
|
||||
|
||||
/**
|
||||
* Helper class for turning URLs and email addresses in plaintext content
|
||||
* into clickable links.
|
||||
*
|
||||
* @package Webmail
|
||||
* @subpackage Utils
|
||||
*/
|
||||
class rcmail_string_replacer extends rcube_string_replacer
|
||||
{
|
||||
/**
|
||||
* Callback function used to build mailto: links around e-mail strings
|
||||
*
|
||||
* This also adds an onclick-handler to open the Rouncube compose message screen on such links
|
||||
*
|
||||
* @param array $matches Matches result from preg_replace_callback
|
||||
*
|
||||
* @return int Index of saved string value
|
||||
* @see rcube_string_replacer::mailto_callback()
|
||||
*/
|
||||
public function mailto_callback($matches)
|
||||
{
|
||||
$href = $matches[1];
|
||||
$suffix = $this->parse_url_brackets($href);
|
||||
$email = $href;
|
||||
|
||||
if (strpos($email, '?')) {
|
||||
list($email,) = explode('?', $email);
|
||||
}
|
||||
|
||||
// skip invalid emails
|
||||
if (!rcube_utils::check_email($email, false)) {
|
||||
return $matches[1];
|
||||
}
|
||||
|
||||
$i = $this->add(html::a(array(
|
||||
'href' => 'mailto:' . $href,
|
||||
'onclick' => "return ".rcmail_output::JS_OBJECT_NAME.".command('compose','".rcube::JQ($href)."',this)",
|
||||
),
|
||||
rcube::Q($href)) . $suffix);
|
||||
|
||||
return $i >= 0 ? $this->get_replacement($i) : '';
|
||||
}
|
||||
}
|
372
data/web/rc/program/include/rcmail_utils.php
Normal file
372
data/web/rc/program/include/rcmail_utils.php
Normal file
@@ -0,0 +1,372 @@
|
||||
<?php
|
||||
|
||||
/**
|
||||
+-----------------------------------------------------------------------+
|
||||
| program/include/rcmail_utils.php |
|
||||
| |
|
||||
| This file is part of the Roundcube PHP suite |
|
||||
| Copyright (C) 2005-2015 The Roundcube Dev Team |
|
||||
| |
|
||||
| Licensed under the GNU General Public License version 3 or |
|
||||
| any later version with exceptions for skins & plugins. |
|
||||
| See the README file for a full license statement. |
|
||||
| |
|
||||
| CONTENTS: |
|
||||
| Roundcube utilities |
|
||||
| |
|
||||
+-----------------------------------------------------------------------+
|
||||
| Author: Thomas Bruederli <roundcube@gmail.com> |
|
||||
| Author: Aleksander Machniak <alec@alec.pl> |
|
||||
+-----------------------------------------------------------------------+
|
||||
*/
|
||||
|
||||
/**
|
||||
* Roundcube utilities
|
||||
*
|
||||
* @package Webmail
|
||||
* @subpackage Utils
|
||||
*/
|
||||
class rcmail_utils
|
||||
{
|
||||
public static $db;
|
||||
|
||||
/**
|
||||
* Initialize database object and connect
|
||||
*
|
||||
* @return rcube_db Database instance
|
||||
*/
|
||||
public static function db()
|
||||
{
|
||||
if (self::$db === null) {
|
||||
$rc = rcube::get_instance();
|
||||
$db = rcube_db::factory($rc->config->get('db_dsnw'));
|
||||
|
||||
$db->set_debug((bool)$rc->config->get('sql_debug'));
|
||||
|
||||
// Connect to database
|
||||
$db->db_connect('w');
|
||||
|
||||
if (!$db->is_connected()) {
|
||||
rcube::raise_error("Error connecting to database: " . $db->is_error(), false, true);
|
||||
}
|
||||
|
||||
self::$db = $db;
|
||||
}
|
||||
|
||||
return self::$db;
|
||||
}
|
||||
|
||||
/**
|
||||
* Initialize database schema
|
||||
*
|
||||
* @param string $dir Directory with sql files
|
||||
*/
|
||||
public static function db_init($dir)
|
||||
{
|
||||
$db = self::db();
|
||||
|
||||
$file = $dir . '/' . $db->db_provider . '.initial.sql';
|
||||
if (!file_exists($file)) {
|
||||
rcube::raise_error("DDL file $file not found", false, true);
|
||||
}
|
||||
|
||||
echo "Creating database schema... ";
|
||||
|
||||
if ($sql = file_get_contents($file)) {
|
||||
if (!$db->exec_script($sql)) {
|
||||
$error = $db->is_error();
|
||||
}
|
||||
}
|
||||
else {
|
||||
$error = "Unable to read file $file or it is empty";
|
||||
}
|
||||
|
||||
if ($error) {
|
||||
echo "[FAILED]\n";
|
||||
rcube::raise_error($error, false, true);
|
||||
}
|
||||
else {
|
||||
echo "[OK]\n";
|
||||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* Update database schema
|
||||
*
|
||||
* @param string $dir Directory with sql files
|
||||
* @param string $package Component name
|
||||
* @param string $ver Optional current version number
|
||||
* @param array $opts Parameters (errors, quiet)
|
||||
*
|
||||
* @return True on success, False on failure
|
||||
*/
|
||||
public static function db_update($dir, $package, $ver = null, $opts = array())
|
||||
{
|
||||
// Check if directory exists
|
||||
if (!file_exists($dir)) {
|
||||
if ($opts['errors']) {
|
||||
rcube::raise_error("Specified database schema directory doesn't exist.", false, true);
|
||||
}
|
||||
return false;
|
||||
}
|
||||
|
||||
$db = self::db();
|
||||
|
||||
// Read DB schema version from database (if 'system' table exists)
|
||||
if (in_array($db->table_name('system'), (array)$db->list_tables())) {
|
||||
$db->query("SELECT `value`"
|
||||
. " FROM " . $db->table_name('system', true)
|
||||
. " WHERE `name` = ?",
|
||||
$package . '-version');
|
||||
|
||||
$row = $db->fetch_array();
|
||||
$version = preg_replace('/[^0-9]/', '', $row[0]);
|
||||
}
|
||||
|
||||
// DB version not found, but release version is specified
|
||||
if (!$version && $ver) {
|
||||
// Map old release version string to DB schema version
|
||||
// Note: This is for backward compat. only, do not need to be updated
|
||||
$map = array(
|
||||
'0.1-stable' => 1,
|
||||
'0.1.1' => 2008030300,
|
||||
'0.2-alpha' => 2008040500,
|
||||
'0.2-beta' => 2008060900,
|
||||
'0.2-stable' => 2008092100,
|
||||
'0.2.1' => 2008092100,
|
||||
'0.2.2' => 2008092100,
|
||||
'0.3-stable' => 2008092100,
|
||||
'0.3.1' => 2009090400,
|
||||
'0.4-beta' => 2009103100,
|
||||
'0.4' => 2010042300,
|
||||
'0.4.1' => 2010042300,
|
||||
'0.4.2' => 2010042300,
|
||||
'0.5-beta' => 2010100600,
|
||||
'0.5' => 2010100600,
|
||||
'0.5.1' => 2010100600,
|
||||
'0.5.2' => 2010100600,
|
||||
'0.5.3' => 2010100600,
|
||||
'0.5.4' => 2010100600,
|
||||
'0.6-beta' => 2011011200,
|
||||
'0.6' => 2011011200,
|
||||
'0.7-beta' => 2011092800,
|
||||
'0.7' => 2011111600,
|
||||
'0.7.1' => 2011111600,
|
||||
'0.7.2' => 2011111600,
|
||||
'0.7.3' => 2011111600,
|
||||
'0.7.4' => 2011111600,
|
||||
'0.8-beta' => 2011121400,
|
||||
'0.8-rc' => 2011121400,
|
||||
'0.8.0' => 2011121400,
|
||||
'0.8.1' => 2011121400,
|
||||
'0.8.2' => 2011121400,
|
||||
'0.8.3' => 2011121400,
|
||||
'0.8.4' => 2011121400,
|
||||
'0.8.5' => 2011121400,
|
||||
'0.8.6' => 2011121400,
|
||||
'0.9-beta' => 2012080700,
|
||||
);
|
||||
|
||||
$version = $map[$ver];
|
||||
}
|
||||
|
||||
// Assume last version before the 'system' table was added
|
||||
if (empty($version)) {
|
||||
$version = 2012080700;
|
||||
}
|
||||
|
||||
$dir .= '/' . $db->db_provider;
|
||||
if (!file_exists($dir)) {
|
||||
if ($opts['errors']) {
|
||||
rcube::raise_error("DDL Upgrade files for " . $db->db_provider . " driver not found.", false, true);
|
||||
}
|
||||
return false;
|
||||
}
|
||||
|
||||
$dh = opendir($dir);
|
||||
$result = array();
|
||||
|
||||
while ($file = readdir($dh)) {
|
||||
if (preg_match('/^([0-9]+)\.sql$/', $file, $m) && $m[1] > $version) {
|
||||
$result[] = $m[1];
|
||||
}
|
||||
}
|
||||
sort($result, SORT_NUMERIC);
|
||||
|
||||
foreach ($result as $v) {
|
||||
if (!$opts['quiet']) {
|
||||
echo "Updating database schema ($v)... ";
|
||||
}
|
||||
|
||||
$error = self::db_update_schema($package, $v, "$dir/$v.sql");
|
||||
|
||||
if ($error) {
|
||||
if (!$opts['quiet']) {
|
||||
echo "[FAILED]\n";
|
||||
}
|
||||
if ($opts['errors']) {
|
||||
rcube::raise_error("Error in DDL upgrade $v: $error", false, true);
|
||||
}
|
||||
return false;
|
||||
}
|
||||
else if (!$opts['quiet']) {
|
||||
echo "[OK]\n";
|
||||
}
|
||||
}
|
||||
|
||||
return true;
|
||||
}
|
||||
|
||||
/**
|
||||
* Run database update from a single sql file
|
||||
*/
|
||||
protected static function db_update_schema($package, $version, $file)
|
||||
{
|
||||
$db = self::db();
|
||||
|
||||
// read DDL file
|
||||
if ($sql = file_get_contents($file)) {
|
||||
if (!$db->exec_script($sql)) {
|
||||
return $db->is_error();
|
||||
}
|
||||
}
|
||||
|
||||
// escape if 'system' table does not exist
|
||||
if ($version < 2013011000) {
|
||||
return;
|
||||
}
|
||||
|
||||
$system_table = $db->table_name('system', true);
|
||||
|
||||
$db->query("UPDATE " . $system_table
|
||||
. " SET `value` = ?"
|
||||
. " WHERE `name` = ?",
|
||||
$version, $package . '-version');
|
||||
|
||||
if (!$db->is_error() && !$db->affected_rows()) {
|
||||
$db->query("INSERT INTO " . $system_table
|
||||
." (`name`, `value`) VALUES (?, ?)",
|
||||
$package . '-version', $version);
|
||||
}
|
||||
|
||||
return $db->is_error();
|
||||
}
|
||||
|
||||
/**
|
||||
* Removes all deleted records older than X days
|
||||
*
|
||||
* @param int $days Number of days
|
||||
*/
|
||||
public static function db_clean($days)
|
||||
{
|
||||
// mapping for table name => primary key
|
||||
$primary_keys = array(
|
||||
'contacts' => 'contact_id',
|
||||
'contactgroups' => 'contactgroup_id',
|
||||
);
|
||||
|
||||
$db = self::db();
|
||||
|
||||
$threshold = date('Y-m-d 00:00:00', time() - $days * 86400);
|
||||
|
||||
foreach (array('contacts','contactgroups','identities') as $table) {
|
||||
$sqltable = $db->table_name($table, true);
|
||||
|
||||
// also delete linked records
|
||||
// could be skipped for databases which respect foreign key constraints
|
||||
if ($db->db_provider == 'sqlite' && ($table == 'contacts' || $table == 'contactgroups')) {
|
||||
$pk = $primary_keys[$table];
|
||||
$memberstable = $db->table_name('contactgroupmembers');
|
||||
|
||||
$db->query(
|
||||
"DELETE FROM " . $db->quote_identifier($memberstable)
|
||||
. " WHERE `$pk` IN ("
|
||||
. "SELECT `$pk` FROM $sqltable"
|
||||
. " WHERE `del` = 1 AND `changed` < ?"
|
||||
. ")",
|
||||
$threshold);
|
||||
|
||||
echo $db->affected_rows() . " records deleted from '$memberstable'\n";
|
||||
}
|
||||
|
||||
// delete outdated records
|
||||
$db->query("DELETE FROM $sqltable WHERE `del` = 1 AND `changed` < ?", $threshold);
|
||||
|
||||
echo $db->affected_rows() . " records deleted from '$table'\n";
|
||||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* Reindex contacts
|
||||
*/
|
||||
public static function indexcontacts()
|
||||
{
|
||||
$db = self::db();
|
||||
|
||||
// iterate over all users
|
||||
$sql_result = $db->query("SELECT `user_id` FROM " . $db->table_name('users', true) . " ORDER BY `user_id`");
|
||||
while ($sql_result && ($sql_arr = $db->fetch_assoc($sql_result))) {
|
||||
echo "Indexing contacts for user " . $sql_arr['user_id'] . "...\n";
|
||||
|
||||
$contacts = new rcube_contacts($db, $sql_arr['user_id']);
|
||||
$contacts->set_pagesize(9999);
|
||||
|
||||
$result = $contacts->list_records();
|
||||
while ($result->count && ($row = $result->next())) {
|
||||
unset($row['words']);
|
||||
$contacts->update($row['ID'], $row);
|
||||
}
|
||||
}
|
||||
|
||||
echo "done.\n";
|
||||
}
|
||||
|
||||
/**
|
||||
* Modify user preferences
|
||||
*
|
||||
* @param string $name Option name
|
||||
* @param string $value Option value
|
||||
* @param int $userid Optional user identifier
|
||||
* @param string $type Optional value type (bool, int, string)
|
||||
*/
|
||||
public static function mod_pref($name, $value, $userid = null, $type = 'string')
|
||||
{
|
||||
$db = self::db();
|
||||
|
||||
if ($userid) {
|
||||
$query = '`user_id` = ' . intval($userid);
|
||||
}
|
||||
else {
|
||||
$query = '1=1';
|
||||
}
|
||||
|
||||
$type = strtolower($type);
|
||||
|
||||
if ($type == 'bool' || $type == 'boolean') {
|
||||
$value = rcube_utils::get_boolean($value);
|
||||
}
|
||||
else if ($type == 'int' || $type == 'integer') {
|
||||
$value = (int) $value;
|
||||
}
|
||||
|
||||
// iterate over all users
|
||||
$sql_result = $db->query("SELECT * FROM " . $db->table_name('users', true) . " WHERE $query");
|
||||
|
||||
while ($sql_result && ($sql_arr = $db->fetch_assoc($sql_result))) {
|
||||
echo "Updating prefs for user " . $sql_arr['user_id'] . "...";
|
||||
|
||||
$user = new rcube_user($sql_arr['user_id'], $sql_arr);
|
||||
$prefs = $old_prefs = $user->get_prefs();
|
||||
|
||||
$prefs[$name] = $value;
|
||||
|
||||
if ($prefs != $old_prefs) {
|
||||
$user->save_prefs($prefs, true);
|
||||
echo "saved.\n";
|
||||
}
|
||||
else {
|
||||
echo "nothing changed.\n";
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
Reference in New Issue
Block a user