thomascube
2011-08-31 43486922fac591683fcbe4335166c349f726c6eb
commit | author | age
354978 1 <?php
T 2
3 /*
4  +-----------------------------------------------------------------------+
5  | rcube_install.php                                                     |
6  |                                                                       |
e019f2 7  | This file is part of the Roundcube Webmail package                    |
434869 8  | Copyright (C) 2008-2011, The Roundcube Dev Team                       |
354978 9  | Licensed under the GNU Public License                                 |
T 10  +-----------------------------------------------------------------------+
11
12  $Id:  $
13
14 */
15
16
17 /**
e019f2 18  * Class to control the installation process of the Roundcube Webmail package
354978 19  *
T 20  * @category Install
e019f2 21  * @package  Roundcube
354978 22  * @author Thomas Bruederli
T 23  */
24 class rcube_install
25 {
26   var $step;
237119 27   var $is_post = false;
354978 28   var $failures = 0;
c5042d 29   var $config = array();
b3f9df 30   var $configured = false;
c5042d 31   var $last_error = null;
e6bb83 32   var $db_map = array('pgsql' => 'postgres', 'mysqli' => 'mysql', 'sqlsrv' => 'mssql');
ad43e6 33   var $email_pattern = '([a-z0-9][a-z0-9\-\.\+\_]*@[a-z0-9]([a-z0-9\-][.]?)*[a-z0-9])';
871ca9 34   var $bool_config_props = array();
e10712 35
e6bb83 36   var $obsolete_config = array('db_backend', 'double_auth');
cbffc2 37   var $replaced_config = array(
T 38     'skin_path' => 'skin',
39     'locale_string' => 'language',
40     'multiple_identities' => 'identities_level',
2a4135 41     'addrbook_show_images' => 'show_images',
00290a 42     'imap_root' => 'imap_ns_personal',
cbffc2 43   );
e10712 44   
2491c6 45   // these config options are required for a working system
e6bb83 46   var $required_config = array(
T 47     'db_dsnw', 'db_table_contactgroups', 'db_table_contactgroupmembers',
48     'des_key', 'session_lifetime',
49   );
354978 50   
T 51   /**
52    * Constructor
53    */
54   function rcube_install()
55   {
56     $this->step = intval($_REQUEST['_step']);
237119 57     $this->is_post = $_SERVER['REQUEST_METHOD'] == 'POST';
354978 58   }
T 59   
c5042d 60   /**
T 61    * Singleton getter
62    */
63   function get_instance()
64   {
65     static $inst;
66     
67     if (!$inst)
68       $inst = new rcube_install();
69     
70     return $inst;
71   }
354978 72   
T 73   /**
c5042d 74    * Read the default config files and store properties
354978 75    */
190e97 76   function load_defaults()
354978 77   {
c5042d 78     $this->_load_config('.php.dist');
T 79   }
80
81
82   /**
83    * Read the local config files and store properties
84    */
85   function load_config()
86   {
b3f9df 87     $this->config = array();
c5042d 88     $this->_load_config('.php');
b3f9df 89     $this->configured = !empty($this->config);
c5042d 90   }
T 91
92   /**
93    * Read the default config file and store properties
94    * @access private
95    */
96   function _load_config($suffix)
97   {
434869 98     if (is_readable($main_inc = RCMAIL_CONFIG_DIR . '/main.inc' . $suffix)) {
T 99       include($main_inc);
100       if (is_array($rcmail_config))
101         $this->config += $rcmail_config;
354978 102     }
434869 103     if (is_readable($db_inc = RCMAIL_CONFIG_DIR . '/db.inc'. $suffix)) {
T 104       include($db_inc);
105       if (is_array($rcmail_config))
106         $this->config += $rcmail_config;
354978 107     }
T 108   }
109   
110   
111   /**
112    * Getter for a certain config property
113    *
114    * @param string Property name
ad43e6 115    * @param string Default value
354978 116    * @return string The property value
T 117    */
fa7539 118   function getprop($name, $default = '')
354978 119   {
b77d0d 120     $value = $this->config[$name];
354978 121     
ccb412 122     if ($name == 'des_key' && !$this->configured && !isset($_REQUEST["_$name"]))
807d17 123       $value = rcube_install::random_key(24);
354978 124     
fa7539 125     return $value !== null && $value !== '' ? $value : $default;
354978 126   }
403f0b 127
A 128
354978 129   /**
T 130    * Take the default config file and replace the parameters
131    * with the submitted form data
132    *
133    * @param string Which config file (either 'main' or 'db')
134    * @return string The complete config file content
135    */
e10712 136   function create_config($which, $force = false)
354978 137   {
2c3d81 138     $out = @file_get_contents(RCMAIL_CONFIG_DIR . "/{$which}.inc.php.dist");
403f0b 139
354978 140     if (!$out)
2c3d81 141       return '[Warning: could not read the config template file]';
0c3bde 142
c5042d 143     foreach ($this->config as $prop => $default) {
403f0b 144
871ca9 145       $value = (isset($_POST["_$prop"]) || $this->bool_config_props[$prop]) ? $_POST["_$prop"] : $default;
403f0b 146
354978 147       // convert some form data
b77d0d 148       if ($prop == 'debug_level') {
354978 149         $val = 0;
7d7f67 150         if (is_array($value))
T 151           foreach ($value as $dbgval)
b77d0d 152             $val += intval($dbgval);
7d7f67 153         $value = $val;
354978 154       }
0c3bde 155       else if ($which == 'db' && $prop == 'db_dsnw' && !empty($_POST['_dbtype'])) {
237119 156         if ($_POST['_dbtype'] == 'sqlite')
T 157           $value = sprintf('%s://%s?mode=0646', $_POST['_dbtype'], $_POST['_dbname']{0} == '/' ? '/' . $_POST['_dbname'] : $_POST['_dbname']);
158         else
b61965 159           $value = sprintf('%s://%s:%s@%s/%s', $_POST['_dbtype'], 
7d7f67 160             rawurlencode($_POST['_dbuser']), rawurlencode($_POST['_dbpass']), $_POST['_dbhost'], $_POST['_dbname']);
c5042d 161       }
T 162       else if ($prop == 'smtp_auth_type' && $value == '0') {
163         $value = '';
164       }
165       else if ($prop == 'default_host' && is_array($value)) {
807d17 166         $value = rcube_install::_clean_array($value);
c5042d 167         if (count($value) <= 1)
T 168           $value = $value[0];
169       }
ccb412 170       else if ($prop == 'pagesize') {
T 171         $value = max(2, intval($value));
172       }
c5042d 173       else if ($prop == 'smtp_user' && !empty($_POST['_smtp_user_u'])) {
T 174         $value = '%u';
175       }
176       else if ($prop == 'smtp_pass' && !empty($_POST['_smtp_user_u'])) {
177         $value = '%p';
178       }
00290a 179       else if ($prop == 'default_imap_folders') {
A 180         $value = Array();
181         foreach ($this->config['default_imap_folders'] as $_folder) {
182           switch($_folder) {
183           case 'Drafts': $_folder = $this->config['drafts_mbox']; break;
184           case 'Sent':   $_folder = $this->config['sent_mbox']; break;
185           case 'Junk':   $_folder = $this->config['junk_mbox']; break;
186           case 'Trash':  $_folder = $this->config['trash_mbox']; break;
569654 187           }
00290a 188         if (!in_array($_folder, $value))
A 189           $value[] = $_folder;
569654 190         }
A 191       }
c5042d 192       else if (is_bool($default)) {
27564f 193         $value = (bool)$value;
T 194       }
195       else if (is_numeric($value)) {
196         $value = intval($value);
c5042d 197       }
403f0b 198
c5042d 199       // skip this property
403f0b 200       if (!$force && !$this->configured && ($value == $default))
c5042d 201         continue;
b77d0d 202
A 203       // save change
204       $this->config[$prop] = $value;
205
354978 206       // replace the matching line in config file
T 207       $out = preg_replace(
208         '/(\$rcmail_config\[\''.preg_quote($prop).'\'\])\s+=\s+(.+);/Uie',
5f25a1 209         "'\\1 = ' . rcube_install::_dump_var(\$value) . ';'",
354978 210         $out);
T 211     }
0c3bde 212
967b34 213     return trim($out);
c5042d 214   }
e10712 215
T 216
217   /**
218    * Check the current configuration for missing properties
219    * and deprecated or obsolete settings
220    *
221    * @return array List with problems detected
222    */
223   function check_config()
224   {
225     $this->config = array();
226     $this->load_defaults();
227     $defaults = $this->config;
228     
229     $this->load_config();
230     if (!$this->configured)
231       return null;
232     
233     $out = $seen = array();
f8c06e 234     $required = array_flip($this->required_config);
e10712 235     
cbffc2 236     // iterate over the current configuration
e10712 237     foreach ($this->config as $prop => $value) {
T 238       if ($replacement = $this->replaced_config[$prop]) {
239         $out['replaced'][] = array('prop' => $prop, 'replacement' => $replacement);
240         $seen[$replacement] = true;
241       }
242       else if (!$seen[$prop] && in_array($prop, $this->obsolete_config)) {
243         $out['obsolete'][] = array('prop' => $prop);
244         $seen[$prop] = true;
245       }
246     }
247     
248     // iterate over default config
249     foreach ($defaults as $prop => $value) {
f8c06e 250       if (!isset($seen[$prop]) && !isset($this->config[$prop]) && isset($required[$prop]))
e10712 251         $out['missing'][] = array('prop' => $prop);
T 252     }
f8c06e 253
871ca9 254     // check config dependencies and contradictions
T 255     if ($this->config['enable_spellcheck'] && $this->config['spellcheck_engine'] == 'pspell') {
256       if (!extension_loaded('pspell')) {
257         $out['dependencies'][] = array('prop' => 'spellcheck_engine',
258           'explain' => 'This requires the <tt>pspell</tt> extension which could not be loaded.');
259       }
924b1a 260       else if (!empty($this->config['spellcheck_languages'])) {
01a8c5 261         foreach ($this->config['spellcheck_languages'] as $lang => $descr)
924b1a 262           if (!pspell_new($lang))
01a8c5 263             $out['dependencies'][] = array('prop' => 'spellcheck_languages',
T 264               'explain' => "You are missing pspell support for language $lang ($descr)");
871ca9 265       }
T 266     }
267     
268     if ($this->config['log_driver'] == 'syslog') {
269       if (!function_exists('openlog')) {
270         $out['dependencies'][] = array('prop' => 'log_driver',
271           'explain' => 'This requires the <tt>sylog</tt> extension which could not be loaded.');
272       }
273       if (empty($this->config['syslog_id'])) {
274         $out['dependencies'][] = array('prop' => 'syslog_id',
275           'explain' => 'Using <tt>syslog</tt> for logging requires a syslog ID to be configured');
276       }
5f25a1 277     }
T 278     
279     // check ldap_public sources having global_search enabled
280     if (is_array($this->config['ldap_public']) && !is_array($this->config['autocomplete_addressbooks'])) {
281       foreach ($this->config['ldap_public'] as $ldap_public) {
282         if ($ldap_public['global_search']) {
283           $out['replaced'][] = array('prop' => 'ldap_public::global_search', 'replacement' => 'autocomplete_addressbooks');
284           break;
285         }
286       }
871ca9 287     }
T 288     
e10712 289     return $out;
T 290   }
291   
292   
293   /**
294    * Merge the current configuration with the defaults
295    * and copy replaced values to the new options.
296    */
297   function merge_config()
298   {
299     $current = $this->config;
300     $this->config = array();
301     $this->load_defaults();
302     
e6bb83 303     foreach ($this->replaced_config as $prop => $replacement) {
e10712 304       if (isset($current[$prop])) {
T 305         if ($prop == 'skin_path')
306           $this->config[$replacement] = preg_replace('#skins/(\w+)/?$#', '\\1', $current[$prop]);
cbffc2 307         else if ($prop == 'multiple_identities')
T 308           $this->config[$replacement] = $current[$prop] ? 2 : 0;
e10712 309         else
T 310           $this->config[$replacement] = $current[$prop];
e6bb83 311       }
T 312       unset($current[$prop]);
e10712 313     }
T 314     
315     foreach ($this->obsolete_config as $prop) {
316       unset($current[$prop]);
317     }
318     
5f25a1 319     // add all ldap_public sources having global_search enabled to autocomplete_addressbooks
T 320     if (is_array($current['ldap_public'])) {
321       foreach ($current['ldap_public'] as $key => $ldap_public) {
322         if ($ldap_public['global_search']) {
323           $this->config['autocomplete_addressbooks'][] = $key;
324           unset($current['ldap_public'][$key]['global_search']);
325         }
326       }
327     }
e6bb83 328     
T 329     if ($current['keep_alive'] && $current['session_lifetime'] < $current['keep_alive'])
330       $current['session_lifetime'] = max(10, ceil($current['keep_alive'] / 60) * 2);
5f25a1 331     
T 332     $this->config  = array_merge($this->config, $current);
333     
334     foreach ((array)$current['ldap_public'] as $key => $values) {
335       $this->config['ldap_public'][$key] = $current['ldap_public'][$key];
336     }
e10712 337   }
c5042d 338   
2491c6 339   /**
T 340    * Compare the local database schema with the reference schema
e019f2 341    * required for this version of Roundcube
2491c6 342    *
T 343    * @param boolean True if the schema schould be updated
344    * @return boolean True if the schema is up-to-date, false if not or an error occured
345    */
346   function db_schema_check($DB, $update = false)
347   {
348     if (!$this->configured)
349       return false;
350     
e6bb83 351     // read reference schema from mysql.initial.sql
T 352     $db_schema = $this->db_read_schema(INSTALL_PATH . 'SQL/mysql.initial.sql');
2491c6 353     $errors = array();
T 354     
355     // check list of tables
356     $existing_tables = $DB->list_tables();
f6ee6f 357
2491c6 358     foreach ($db_schema as $table => $cols) {
f6ee6f 359       $table = !empty($this->config['db_table_'.$table]) ? $this->config['db_table_'.$table] : $table;
e6bb83 360       if (!in_array($table, $existing_tables)) {
T 361         $errors[] = "Missing table '".$table."'";
362       }
363       else {  // compare cols
364         $db_cols = $DB->list_cols($table);
365         $diff = array_diff(array_keys($cols), $db_cols);
366         if (!empty($diff))
367           $errors[] = "Missing columns in table '$table': " . join(',', $diff);
368       }
2491c6 369     }
T 370     
371     return !empty($errors) ? $errors : false;
372   }
e6bb83 373
T 374   /**
375    * Utility function to read database schema from an .sql file
376    */
377   private function db_read_schema($schemafile)
378   {
379     $lines = file($schemafile);
380     $table_block = false;
381     $schema = array();
382     foreach ($lines as $line) {
383       if (preg_match('/^\s*create table `?([a-z0-9_]+)`?/i', $line, $m)) {
384         $table_block = $m[1];
385       }
386       else if ($table_block && preg_match('/^\s*`?([a-z0-9_-]+)`?\s+([a-z]+)/', $line, $m)) {
387         $col = $m[1];
388         if (!in_array(strtoupper($col), array('PRIMARY','KEY','INDEX','UNIQUE','CONSTRAINT','REFERENCES','FOREIGN'))) {
389           $schema[$table_block][$col] = $m[2];
390         }
391       }
392     }
393     
394     return $schema;
395   }
396   
c5042d 397   
T 398   /**
871ca9 399    * Compare the local database schema with the reference schema
e019f2 400    * required for this version of Roundcube
871ca9 401    *
T 402    * @param boolean True if the schema schould be updated
403    * @return boolean True if the schema is up-to-date, false if not or an error occured
404    */
2491c6 405   function mdb2_schema_check($update = false)
871ca9 406   {
T 407     if (!$this->configured)
408       return false;
409     
410     $options = array(
411       'use_transactions' => false,
412       'log_line_break' => "\n",
413       'idxname_format' => '%s',
414       'debug' => false,
415       'quote_identifier' => true,
416       'force_defaults' => false,
417       'portability' => true
418     );
419     
924b1a 420     $dsnw = $this->config['db_dsnw'];
T 421     $schema = MDB2_Schema::factory($dsnw, $options);
871ca9 422     $schema->db->supported['transactions'] = false;
T 423     
424     if (PEAR::isError($schema)) {
425       $this->raise_error(array('code' => $schema->getCode(), 'message' => $schema->getMessage() . ' ' . $schema->getUserInfo()));
426       return false;
427     }
428     else {
429       $definition = $schema->getDefinitionFromDatabase();
430       $definition['charset'] = 'utf8';
431       
432       if (PEAR::isError($definition)) {
433         $this->raise_error(array('code' => $definition->getCode(), 'message' => $definition->getMessage() . ' ' . $definition->getUserInfo()));
434         return false;
435       }
436       
437       // load reference schema
924b1a 438       $dsn_arr = MDB2::parseDSN($this->config['db_dsnw']);
T 439
440       $ref_schema = INSTALL_PATH . 'SQL/' . $dsn_arr['phptype'] . '.schema.xml';
871ca9 441       
924b1a 442       if (is_readable($ref_schema)) {
871ca9 443         $reference = $schema->parseDatabaseDefinition($ref_schema, false, array(), $schema->options['fail_on_invalid_names']);
T 444         
445         if (PEAR::isError($reference)) {
446           $this->raise_error(array('code' => $reference->getCode(), 'message' => $reference->getMessage() . ' ' . $reference->getUserInfo()));
447         }
448         else {
449           $diff = $schema->compareDefinitions($reference, $definition);
450           
451           if (empty($diff)) {
452             return true;
453           }
454           else if ($update) {
455             // update database schema with the diff from the above check
456             $success = $schema->alterDatabase($reference, $definition, $diff);
457             
458             if (PEAR::isError($success)) {
459               $this->raise_error(array('code' => $success->getCode(), 'message' => $success->getMessage() . ' ' . $success->getUserInfo()));
460             }
461             else
462               return true;
463           }
464           echo '<pre>'; var_dump($diff); echo '</pre>';
465           return false;
466         }
467       }
468       else
469         $this->raise_error(array('message' => "Could not find reference schema file ($ref_schema)"));
470         return false;
471     }
472     
473     return false;
474   }
475   
476   
477   /**
c5042d 478    * Getter for the last error message
T 479    *
480    * @return string Error message or null if none exists
481    */
482   function get_error()
483   {
484       return $this->last_error['message'];
354978 485   }
T 486   
487   
488   /**
112c54 489    * Return a list with all imap hosts configured
T 490    *
491    * @return array Clean list with imap hosts
492    */
493   function get_hostlist()
494   {
495     $default_hosts = (array)$this->getprop('default_host');
496     $out = array();
497     
498     foreach ($default_hosts as $key => $name) {
499       if (!empty($name))
058eb6 500         $out[] = rcube_parse_host(is_numeric($key) ? $name : $key);
112c54 501     }
T 502     
503     return $out;
e6bb83 504   }
T 505   
506   /**
507    * Create a HTML dropdown to select a previous version of Roundcube
508    */
509   function versions_select($attrib = array())
510   {
511     $select = new html_select($attrib);
512     $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'));
513     return $select;
112c54 514   }
T 515   
e49064 516   /**
T 517    * Return a list with available subfolders of the skin directory
518    */
519   function list_skins()
520   {
521     $skins = array();
522     $skindir = INSTALL_PATH . 'skins/';
523     foreach (glob($skindir . '*') as $path) {
524       if (is_dir($path) && is_readable($path)) {
525         $skins[] = substr($path, strlen($skindir));
526       }
527     }
528     return $skins;
529   }
112c54 530   
T 531   /**
354978 532    * Display OK status
T 533    *
534    * @param string Test name
535    * @param string Confirm message
536    */
537   function pass($name, $message = '')
538   {
539     echo Q($name) . ':&nbsp; <span class="success">OK</span>';
6557d3 540     $this->_showhint($message);
354978 541   }
T 542   
543   
544   /**
545    * Display an error status and increase failure count
546    *
547    * @param string Test name
548    * @param string Error message
549    * @param string URL for details
550    */
551   function fail($name, $message = '', $url = '')
552   {
553     $this->failures++;
554     
555     echo Q($name) . ':&nbsp; <span class="fail">NOT OK</span>';
6557d3 556     $this->_showhint($message, $url);
354978 557   }
11e670 558
A 559
560   /**
561    * Display an error status for optional settings/features
562    *
563    * @param string Test name
564    * @param string Error message
565    * @param string URL for details
566    */
567   function optfail($name, $message = '', $url = '')
568   {
569     echo Q($name) . ':&nbsp; <span class="na">NOT OK</span>';
570     $this->_showhint($message, $url);
571   }
354978 572   
T 573   
574   /**
575    * Display warning status
576    *
577    * @param string Test name
578    * @param string Warning message
579    * @param string URL for details
580    */
6557d3 581   function na($name, $message = '', $url = '')
354978 582   {
6557d3 583     echo Q($name) . ':&nbsp; <span class="na">NOT AVAILABLE</span>';
T 584     $this->_showhint($message, $url);
585   }
586   
587   
588   function _showhint($message, $url = '')
589   {
590     $hint = Q($message);
591     
354978 592     if ($url)
6557d3 593       $hint .= ($hint ? '; ' : '') . 'See <a href="' . Q($url) . '" target="_blank">' . Q($url) . '</a>';
T 594       
595     if ($hint)
596       echo '<span class="indent">(' . $hint . ')</span>';
354978 597   }
T 598   
599   
5f25a1 600   static function _clean_array($arr)
c5042d 601   {
T 602     $out = array();
603     
5f25a1 604     foreach (array_unique($arr) as $k => $val) {
T 605       if (!empty($val)) {
606         if (is_numeric($k))
607           $out[] = $val;
608         else
609           $out[$k] = $val;
610       }
611     }
c5042d 612     
T 613     return $out;
614   }
615   
190e97 616   
5f25a1 617   static function _dump_var($var) {
T 618     if (is_array($var)) {
619       if (empty($var)) {
620         return 'array()';
621       }
622       else {  // check if all keys are numeric
623         $isnum = true;
624         foreach ($var as $key => $value) {
625           if (!is_numeric($key)) {
626             $isnum = false;
627             break;
628           }
629         }
630         
631         if ($isnum)
632           return 'array(' . join(', ', array_map(array('rcube_install', '_dump_var'), $var)) . ')';
633       }
634     }
635     
636     return var_export($var, true);
637   }
638   
639   
190e97 640   /**
T 641    * Initialize the database with the according schema
642    *
643    * @param object rcube_db Database connection
644    * @return boolen True on success, False on error
645    */
646   function init_db($DB)
647   {
e6bb83 648     $engine = isset($this->db_map[$DB->db_provider]) ? $this->db_map[$DB->db_provider] : $DB->db_provider;
190e97 649     
T 650     // read schema file from /SQL/*
e6bb83 651     $fname = INSTALL_PATH . "SQL/$engine.initial.sql";
T 652     if ($sql = @file_get_contents($fname)) {
653       $this->exec_sql($sql, $DB);
190e97 654     }
T 655     else {
656       $this->fail('DB Schema', "Cannot read the schema file: $fname");
657       return false;
658     }
659     
660     if ($err = $this->get_error()) {
661       $this->fail('DB Schema', "Error creating database schema: $err");
662       return false;
663     }
664
665     return true;
666   }
667   
e6bb83 668   
T 669   /**
670    * Update database with SQL statements from SQL/*.update.sql
671    *
672    * @param object rcube_db Database connection
673    * @param string Version to update from
674    * @return boolen True on success, False on error
675    */
676   function update_db($DB, $version)
677   {
678     $version = strtolower($version);
679     $engine = isset($this->db_map[$DB->db_provider]) ? $this->db_map[$DB->db_provider] : $DB->db_provider;
680     
681     // read schema file from /SQL/*
682     $fname = INSTALL_PATH . "SQL/$engine.update.sql";
683     if ($lines = @file($fname, FILE_SKIP_EMPTY_LINES)) {
684       $from = false; $sql = '';
685       foreach ($lines as $line) {
686         $is_comment = preg_match('/^--/', $line);
687         if (!$from && $is_comment && preg_match('/from version\s([0-9.]+[a-z-]*)/', $line, $m)) {
688           $v = strtolower($m[1]);
689           if ($v == $version || version_compare($version, $v, '<='))
690             $from = true;
691         }
692         if ($from && !$is_comment)
693           $sql .= $line. "\n";
694       }
695       
696       if ($sql)
697         $this->exec_sql($sql, $DB);
698     }
699     else {
700       $this->fail('DB Schema', "Cannot read the update file: $fname");
701       return false;
702     }
703     
704     if ($err = $this->get_error()) {
705       $this->fail('DB Schema', "Error updating database: $err");
706       return false;
707     }
708
709     return true;
710   }
711   
712   
713   /**
714    * Execute the given SQL queries on the database connection
715    *
716    * @param string SQL queries to execute
717    * @param object rcube_db Database connection
718    * @return boolen True on success, False on error
719    */
720   function exec_sql($sql, $DB)
721   {
722     $buff = '';
723     foreach (explode("\n", $sql) as $line) {
724       if (preg_match('/^--/', $line) || trim($line) == '')
725         continue;
726         
727       $buff .= $line . "\n";
728       if (preg_match('/(;|^GO)$/', trim($line))) {
729         $DB->query($buff);
730         $buff = '';
731         if ($DB->is_error())
732           break;
733       }
734     }
735     
736     return !$DB->is_error();
737   }
738   
739   
c5042d 740   /**
e019f2 741    * Handler for Roundcube errors
c5042d 742    */
T 743   function raise_error($p)
744   {
745       $this->last_error = $p;
746   }
747   
748   
354978 749   /**
T 750    * Generarte a ramdom string to be used as encryption key
751    *
752    * @param int Key length
753    * @return string The generated random string
754    * @static
755    */
756   function random_key($length)
757   {
758     $alpha = 'ABCDEFGHIJKLMNOPQERSTUVXYZabcdefghijklmnopqrtsuvwxyz0123456789+*%&?!$-_=';
759     $out = '';
760     
761     for ($i=0; $i < $length; $i++)
762       $out .= $alpha{rand(0, strlen($alpha)-1)};
763     
764     return $out;
765   }
766   
c5042d 767 }
T 768