2007-12-11 02:28:07 +01:00
< ? php
/**
* eGgroupWare setup - create / change eGW configuration
*
* @ link http :// www . egroupware . org
* @ author Ralf Becker < RalfBecker - AT - outdoor - training . de >
* @ package setup
* @ copyright ( c ) 2007 by Ralf Becker < RalfBecker - AT - outdoor - training . de >
* @ license http :// opensource . org / licenses / gpl - license . php GPL - GNU General Public License
2008-06-30 09:50:29 +02:00
* @ version $Id $
2007-12-11 02:28:07 +01:00
*/
/**
* setup command : create / change eGW configuration
*/
2008-06-30 09:50:29 +02:00
class setup_cmd_config extends setup_cmd
2007-12-11 02:28:07 +01:00
{
/**
* Constructor
*
* @ param string $domain string with domain - name or array with all arguments
* @ param string $config_user = null user to config the domain ( or header_admin_user )
* @ param string $config_passwd = null pw of above user
* @ param string $arguments = null array with command line argruments
* @ param boolean $verbose = false if true , echos out some status information during the run
*/
function __construct ( $domain , $config_user = null , $config_passwd = null , $arguments = null , $verbose = false )
{
if ( ! is_array ( $domain ))
{
$domain = array (
'domain' => $domain ,
'config_user' => $config_user ,
'config_passwd' => $config_passwd ,
'arguments' => $arguments ,
'verbose' => $verbose ,
);
}
//echo __CLASS__.'::__construct()'; _debug_array($domain);
admin_cmd :: __construct ( $domain );
}
/**
2007-12-13 03:41:55 +01:00
* run the command : write the configuration to the database
2008-06-30 09:50:29 +02:00
*
2007-12-11 02:28:07 +01:00
* @ param boolean $check_only = false only run the checks ( and throw the exceptions ), but not the command itself
2007-12-13 03:41:55 +01:00
* @ return string success message
2007-12-11 02:28:07 +01:00
* @ throws Exception ( lang ( 'Wrong credentials to access the header.inc.php file!' ), 2 );
* @ throws Exception ( 'header.inc.php not found!' );
*/
protected function exec ( $check_only = false )
{
if ( $check_only && $this -> remote_id )
{
return true ; // can only check locally
}
// instanciate setup object and check authorisation
$this -> check_setup_auth ( $this -> config_user , $this -> config_passwd , $this -> domain );
2008-06-30 09:50:29 +02:00
2007-12-11 02:28:07 +01:00
$this -> check_installed ( $this -> domain , 15 , $this -> verbose );
$values = array ();
if ( $this -> arguments ) // we have command line arguments
{
$save_ea_profile = $this -> _parse_cli_arguments ( $values );
}
else
{
$save_ea_profile = $this -> _parse_properties ( $values );
}
// store the config
foreach ( $values as $name => $value )
{
self :: $egw_setup -> db -> insert ( self :: $egw_setup -> config_table , array (
'config_value' => $value ,
), array (
'config_app' => 'phpgwapi' ,
'config_name' => $name ,
), __LINE__ , __FILE__ );
}
if ( count ( $values ))
{
if ( $save_ea_profile ) $this -> _save_ea_profile ();
2008-06-30 09:50:29 +02:00
2007-12-11 02:28:07 +01:00
return lang ( 'Configuration changed.' );
}
2007-12-14 02:28:33 +01:00
$this -> restore_db ();
2007-12-11 02:28:07 +01:00
return lang ( 'Nothing to change.' );
}
2008-06-30 09:50:29 +02:00
2007-12-11 02:28:07 +01:00
/**
* Return or echo the most common config options
*
* @ param boolean $echoit = false if true the config is additionally echo ' ed out
* @ return array with name => value pairs
*/
static function get_config ( $echoit = false )
{
self :: $egw_setup -> db -> select ( self :: $egw_setup -> config_table , 'config_name,config_value' , array (
'config_app' => 'phpgwapi' ,
" (config_name LIKE '% \\ _dir' OR (config_name LIKE 'mail%' AND config_name != 'mail_footer') OR config_name LIKE 'smtp \\ _%' OR config_name LIKE 'ldap%' OR config_name IN ('webserver_url','system_charset','auth_type','account_repository')) " ,
), __LINE__ , __FILE__ );
$config = array ();
while (( $row = self :: $egw_setup -> db -> row ( true )))
{
$config [ $row [ 'config_name' ]] = $row [ 'config_value' ];
}
if ( $echoit )
{
echo lang ( 'Current configuration:' ) . " \n " ;
foreach ( $config as $name => $value )
{
echo str_pad ( $name . ':' , 22 ) . $value . " \n " ;
}
}
return $config ;
}
2008-06-30 09:50:29 +02:00
2007-12-11 02:28:07 +01:00
/**
* Available options and allowed arguments
*
* @ var array
*/
static $options = array (
'--config' => array (), // name=value,...
'--files-dir' => 'files_dir' ,
'--backup-dir' => 'backup_dir' ,
'--temp-dir' => 'temp_dir' ,
'--webserver-url' => 'webserver_url' ,
'--mailserver' => array ( //server,{IMAP|IMAPS|POP|POPS},[domain],[{standard(default)|vmailmgr = add domain for mailserver login}]
'mail_server' ,
array ( 'name' => 'mail_server_type' , 'allowed' => array ( 'imap' , 'imaps' , 'pop3' , 'pop3s' ), 'default' => 'imap' ),
'mail_suffix' ,
array ( 'name' => 'mail_login_type' , 'allowed' => array (
'username (standard)' => 'standard' , 'username@domain (virtual mail manager)' => 'vmailmgr' ,
), 'default' => 'standard' ),
),
'--cyrus' => array (
'imapAdminUsername' ,
'imapAdminPW' ,
array ( 'name' => 'imapType' , 'default' => 3 ),
array ( 'name' => 'imapEnableCyrusAdmin' , 'default' => 'yes' ),
),
'--sieve' => array (
array ( 'name' => 'imapSieveServer' , 'default' => 'localhost' ),
array ( 'name' => 'imapSievePort' , 'default' => 2000 ),
array ( 'name' => 'imapEnableSieve' , 'default' => 'yes' ), // null or yes
),
'--postfix' => array (
array ( 'name' => 'editforwardingaddress' , 'allowed' => array ( 'yes' , null )),
array ( 'name' => 'smtpType' , 'default' => 2 ),
),
'--smtpserver' => array ( //smtp server,[smtp port],[smtp user],[smtp password]
'smtp_server' , array ( 'name' => 'smtp_port' , 'default' => 25 ), 'smtp_auth_user' , 'smtp_auth_passwd' , ''
),
'--account-auth' => array (
array ( 'name' => 'account_repository' , 'allowed' => array ( 'sql' , 'ldap' ), 'default' => 'sql' ),
array ( 'name' => 'auth_type' , 'allowed' => array ( 'sql' , 'ldap' , 'mail' , 'ads' , 'http' , 'sqlssl' , 'nis' , 'pam' ), 'default' => 'sql' ),
array ( 'name' => 'sql_encryption' , 'allowed' => array ( 'md5' , 'blowfish_crypt' , 'md5_crypt' , 'crypt' ), 'default' => 'md5' ),
'check_save_password' , 'allow_cookie_auth' ),
'--ldap-host' => 'ldap_host' ,
'--ldap-root-dn' => 'ldap_root_dn' ,
'--ldap-root-pw' => 'ldap_root_pw' ,
'--ldap-context' => 'ldap_context' ,
'--ldap-search-filter' => 'ldap_search_filter' ,
'--ldap-group-context' => 'ldap_group_context' ,
2007-12-14 02:28:33 +01:00
'--allow-remote-admin' => 'allow_remote_admin' ,
2007-12-11 02:28:07 +01:00
);
2008-06-30 09:50:29 +02:00
2007-12-11 02:28:07 +01:00
/**
* Parses properties from this object
2008-06-30 09:50:29 +02:00
*
2007-12-11 02:28:07 +01:00
* @ param array & $value contains set values on return
* @ return boolean do we need to save the emailadmin profile
*/
private function _parse_properties ( & $values )
{
$this -> _merge_defaults ();
$save_ea_profile = false ;
$values = array ();
foreach ( self :: $options as $arg => $option )
{
foreach ( is_array ( $option ) ? $option : array ( $option ) as $n => $data )
{
$name = is_array ( $data ) ? $data [ 'name' ] : $data ;
2008-06-30 09:50:29 +02:00
2007-12-11 02:28:07 +01:00
if ( isset ( $this -> $name ))
2008-06-30 09:50:29 +02:00
{
2007-12-11 02:28:07 +01:00
$save_ea_profile |= $this -> _parse_value ( $arg , $n , $option , $this -> $name , $values );
}
}
}
return $save_ea_profile ;
}
/**
* Parses command line arguments in $this -> arguments
2008-06-30 09:50:29 +02:00
*
2007-12-11 02:28:07 +01:00
* @ param array & $value contains set values on return
* @ return boolean do we need to save the emailadmin profile
*/
private function _parse_cli_arguments ( & $values )
{
$arguments = $this -> arguments ;
$values = array ();
$save_ea_profile = false ;
$args = $this -> arguments ;
while (( $arg = array_shift ( $args )))
{
if ( ! isset ( self :: $options [ $arg ]))
{
throw new egw_exception_wrong_userinput ( lang ( " Unknown option '%1' !!! " , $arg ), 90 );
}
$options = is_array ( self :: $options [ $arg ]) ? explode ( ',' , array_shift ( $args )) : array ( array_shift ( $args ));
2008-06-30 09:50:29 +02:00
2007-12-11 02:28:07 +01:00
if ( $arg == '--config' )
{
foreach ( $options as $option )
{
list ( $name , $value ) = explode ( '=' , $option , 2 );
$values [ $name ] = $value ;
}
continue ;
}
$options [] = '' ; $options [] = '' ;
foreach ( $options as $n => $value )
{
$save_ea_profile |= $this -> _parse_value ( $arg , $n , self :: $options [ $arg ], $value , $values );
}
}
return $save_ea_profile ;
}
2008-06-30 09:50:29 +02:00
2007-12-11 02:28:07 +01:00
/**
* Parses a single value
*
* @ param string $arg current cli argument processed
* @ param int $n number of the property
* @ param array / string $data string with type or array containing values for type , allowed
* @ param mixed $value value to set
* @ param array & $values where the values get set
*/
private function _parse_value ( $arg , $n , $data , $value , array & $values )
{
if ( $value === '' && is_array ( $data ) && ! isset ( $data [ $n ][ 'default' ])) return false ;
2008-06-30 09:50:29 +02:00
2007-12-11 02:28:07 +01:00
$name = is_array ( $data ) || $n ? $data [ $n ] : $data ;
2008-06-30 09:50:29 +02:00
2007-12-11 02:28:07 +01:00
if ( is_array ( $name ))
{
if ( ! $value && isset ( $name [ 'default' ])) $value = $name [ 'default' ];
if ( isset ( $name [ 'allowed' ]) && ! in_array ( $value , $name [ 'allowed' ]))
{
throw new egw_exception_wrong_userinput ( lang ( " '%1' is not allowed as %2. arguments of option %3 !!! " , $value , 1 + $n , $arg ) . " ( $name[name] ) " , 91 );
}
$name = $name [ 'name' ];
}
$values [ $name ] = $value ;
return in_array ( $arg , array ( '--mailserver' , '--smtpserver' , '--cyrus' , '--postfix' , '--sieve' ));
}
2008-06-30 09:50:29 +02:00
2007-12-11 02:28:07 +01:00
/**
* Updates the default EMailAdmin profile from the eGW config
*/
function _save_ea_profile ( $config = array ())
{
self :: $egw_setup -> db -> select ( self :: $egw_setup -> config_table , 'config_name,config_value' , array (
'config_app' => 'phpgwapi' ,
" ((config_name LIKE 'mail%' AND config_name != 'mail_footer') OR config_name LIKE 'smtp%' OR config_name LIKE 'imap%' OR config_name='editforwardingaddress') " ,
), __LINE__ , __FILE__ );
while (( $row = self :: $egw_setup -> db -> row ( true )))
{
$config [ $row [ 'config_name' ]] = $row [ 'config_value' ];
}
$config [ 'smtpAuth' ] = $config [ 'smtp_auth_user' ] ? 'yes' : null ;
2008-06-30 09:50:29 +02:00
$emailadmin = new emailadmin_bo ( - 1 , false ); // false=no session stuff
2007-12-11 02:28:07 +01:00
$emailadmin -> setDefaultProfile ( $config );
2008-06-30 09:50:29 +02:00
2007-12-11 02:28:07 +01:00
if ( $this -> verbose )
{
echo " \n " . lang ( 'EMailAdmin profile updated:' ) . " \n " ;
foreach ( $config as $name => $value )
{
echo str_pad ( $name . ':' , 22 ) . $value . " \n " ;
}
}
}
/**
* Return the options from the $options array
*
* @ return array with name => array ( value => label , ... ) pairs
*/
static function options ()
{
$options = array ();
foreach ( self :: $options as $option )
{
if ( is_array ( $option ))
{
foreach ( $option as $n => $data )
{
if ( is_array ( $data ) && isset ( $data [ 'allowed' ]))
{
foreach ( $data [ 'allowed' ] as $label => $value )
{
if ( is_int ( $label ))
{
$label = ( string ) $value === '' ? 'No' : strtoupper ( $value );
}
$options [ $data [ 'name' ]][ $value ] = lang ( $label );
}
}
}
}
}
return $options ;
}
/**
* Return the defaults from the $options array
*
* @ return array with name => $value pairs
*/
static function defaults ()
{
$defaults = array ();
// fetch the default from the cli options
foreach ( self :: $options as $option )
{
if ( is_array ( $option ))
{
foreach ( $option as $n => $data )
{
if ( is_array ( $data ) && isset ( $data [ 'default' ]))
{
$defaults [ $data [ 'name' ]] = $data [ 'default' ];
}
}
}
}
// some extra defaults for non-cli operation
$defaults [ 'files_dir' ] = '/var/lib/egroupware/$domain/files' ;
$defaults [ 'backup_dir' ] = '/var/lib/egroupware/$domain/backup' ;
$defaults [ 'temp_dir' ] = '/tmp' ;
$defaults [ 'webserver_url' ] = '/egroupware' ;
$defaults [ 'smtp_server' ] = $defaults [ 'mail_server' ] = 'localhost' ;
$defaults [ 'mail_suffix' ] = '$domain' ;
$defaults [ 'imapAdminUsername' ] = 'cyrus@$domain' ;
$defaults [ 'imapAdminPW' ] = self :: randomstring ();
2008-06-30 09:50:29 +02:00
2007-12-11 02:28:07 +01:00
return $defaults ;
}
/**
* Merges the default into the current properties , if they are empty or contain placeholders
2008-06-30 09:50:29 +02:00
*
2007-12-11 02:28:07 +01:00
* Replacements like $domain , only work for values listed by self :: defaults ()
*/
private function _merge_defaults ()
{
foreach ( self :: defaults () as $name => $default )
{
if ( ! $this -> $name )
{
//echo "<p>setting $name='{$this->$name}' to it's default='$default'</p>\n";
$this -> set_defaults [ $name ] = $this -> $name = $default ;
}
if ( strpos ( $this -> $name , '$' ) !== false )
{
$this -> $name = str_replace ( array (
'$domain' ,
), array (
$this -> domain ,
), $this -> $name );
}
2008-06-30 09:50:29 +02:00
}
2007-12-11 02:28:07 +01:00
}
}