2002-03-03 22:47:30 +01:00
|
|
|
<?php
|
|
|
|
/**************************************************************************\
|
|
|
|
* phpGroupWare - Setup *
|
|
|
|
* http://www.phpgroupware.org *
|
|
|
|
* -------------------------------------------- *
|
|
|
|
* This file written by Tony Puglisi (Angles) <angles@phpgroupware.org> *
|
|
|
|
* and Miles Lott<milosch@phpgroupware.org> *
|
|
|
|
* -------------------------------------------- *
|
|
|
|
* This program is free software; you can redistribute it and/or modify it *
|
|
|
|
* under the terms of the GNU General Public License as published by the *
|
|
|
|
* Free Software Foundation; either version 2 of the License, or (at your *
|
|
|
|
* option) any later version. *
|
|
|
|
\**************************************************************************/
|
|
|
|
|
|
|
|
/* $Id$ */
|
|
|
|
|
|
|
|
class setup_html
|
|
|
|
{
|
|
|
|
/*!
|
|
|
|
@function generate_header
|
|
|
|
@abstract generate header.inc.php file output - NOT a generic html header function
|
|
|
|
*/
|
|
|
|
function generate_header()
|
|
|
|
{
|
2003-12-22 12:43:06 +01:00
|
|
|
// PHP will automatically replace any dots in incoming
|
|
|
|
// variable names with underscores.
|
|
|
|
|
2002-03-03 22:47:30 +01:00
|
|
|
$GLOBALS['header_template']->set_file(array('header' => 'header.inc.php.template'));
|
2002-04-08 01:56:03 +02:00
|
|
|
$GLOBALS['header_template']->set_block('header','domain','domain');
|
2002-03-03 22:47:30 +01:00
|
|
|
$var = Array();
|
|
|
|
|
2002-04-30 05:35:52 +02:00
|
|
|
$deletedomain = get_var('deletedomain',Array('POST'));
|
|
|
|
$domains = get_var('domains',Array('POST'));
|
|
|
|
@reset($domains);
|
|
|
|
while($domains && list($k,$v) = @each($domains))
|
2002-04-08 01:56:03 +02:00
|
|
|
{
|
2003-03-05 15:21:49 +01:00
|
|
|
if(isset($deletedomain[$k]))
|
2002-04-08 01:56:03 +02:00
|
|
|
{
|
|
|
|
continue;
|
|
|
|
}
|
2003-12-22 12:43:06 +01:00
|
|
|
$variableName = str_replace('.','_',$k);
|
|
|
|
$dom = get_var('setting_'.$variableName,Array('POST'));
|
2002-04-08 01:56:03 +02:00
|
|
|
$GLOBALS['header_template']->set_var('DB_DOMAIN',$v);
|
|
|
|
while(list($x,$y) = @each($dom))
|
|
|
|
{
|
2004-01-20 14:16:45 +01:00
|
|
|
if(strtoupper($x) == 'CONFIG_PASS')
|
2004-01-18 22:03:56 +01:00
|
|
|
{
|
|
|
|
$GLOBALS['header_template']->set_var(strtoupper($x),md5($y));
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
$GLOBALS['header_template']->set_var(strtoupper($x),$y);
|
|
|
|
}
|
2002-04-08 01:56:03 +02:00
|
|
|
}
|
2004-01-20 14:16:45 +01:00
|
|
|
/* Admin did not type a new password, so use the old one from the hidden field,
|
|
|
|
* which is already md5 encoded.
|
|
|
|
*/
|
|
|
|
if($dom['config_password'] && !$dom['config_pass'])
|
|
|
|
{
|
|
|
|
/* Real == hidden */
|
|
|
|
$GLOBALS['header_template']->set_var('CONFIG_PASS',$dom['config_password']);
|
|
|
|
}
|
2003-12-22 03:57:52 +01:00
|
|
|
/* If the admin didn't select a db_port, set to the default */
|
|
|
|
if(!$dom['db_port'])
|
|
|
|
{
|
|
|
|
$GLOBALS['header_template']->set_var('DB_PORT',$GLOBALS['default_db_ports'][$dom['db_type']]);
|
|
|
|
}
|
2002-04-29 02:27:32 +02:00
|
|
|
$GLOBALS['header_template']->parse('domains','domain',True);
|
2002-04-08 01:56:03 +02:00
|
|
|
}
|
|
|
|
|
|
|
|
$GLOBALS['header_template']->set_var('domain','');
|
|
|
|
|
2002-04-30 05:35:52 +02:00
|
|
|
$setting = get_var('setting',Array('POST'));
|
|
|
|
while($setting && list($k,$v) = @each($setting))
|
2002-03-03 22:47:30 +01:00
|
|
|
{
|
2004-01-20 14:16:45 +01:00
|
|
|
if(strtoupper($k) == 'HEADER_ADMIN_PASSWORD')
|
2004-01-18 22:03:56 +01:00
|
|
|
{
|
|
|
|
$var[strtoupper($k)] = md5($v);
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
$var[strtoupper($k)] = $v;
|
|
|
|
}
|
2002-03-03 22:47:30 +01:00
|
|
|
}
|
2004-01-20 14:16:45 +01:00
|
|
|
/* Admin did not type a new header password, so use the old one from the hidden field,
|
|
|
|
* which is already md5 encoded.
|
|
|
|
*/
|
|
|
|
if($var['HEADER_ADMIN_PASS'] && !$var['HEADER_ADMIN_PASSWORD'])
|
|
|
|
{
|
|
|
|
/* Real == hidden */
|
|
|
|
$var['HEADER_ADMIN_PASSWORD'] = $var['HEADER_ADMIN_PASS'];
|
|
|
|
}
|
2002-03-03 22:47:30 +01:00
|
|
|
$GLOBALS['header_template']->set_var($var);
|
|
|
|
return $GLOBALS['header_template']->parse('out','header');
|
|
|
|
}
|
|
|
|
|
|
|
|
function setup_tpl_dir($app_name='setup')
|
|
|
|
{
|
|
|
|
/* hack to get tpl dir */
|
|
|
|
if (is_dir(PHPGW_SERVER_ROOT))
|
|
|
|
{
|
|
|
|
$srv_root = PHPGW_SERVER_ROOT . SEP . "$app_name" . SEP;
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
$srv_root = '';
|
|
|
|
}
|
|
|
|
|
|
|
|
$tpl_typical = 'templates' . SEP . 'default';
|
|
|
|
$tpl_root = "$srv_root" ."$tpl_typical";
|
|
|
|
return $tpl_root;
|
|
|
|
}
|
|
|
|
|
|
|
|
function show_header($title='',$nologoutbutton=False, $logoutfrom='config', $configdomain='')
|
|
|
|
{
|
2003-11-02 11:44:50 +01:00
|
|
|
$GLOBALS['setup_tpl']->set_var('charset',lang('charset'));
|
2003-10-22 13:28:17 +02:00
|
|
|
$style = array(
|
|
|
|
'th_bg' => '#486591',
|
|
|
|
'th_text' => '#FFFFFF',
|
|
|
|
'row_on' => '#DDDDDD',
|
|
|
|
'row_off' => '#EEEEEE',
|
|
|
|
'banner_bg' => '#4865F1',
|
|
|
|
'msg' => '#FF0000',
|
|
|
|
);
|
2003-08-28 16:31:11 +02:00
|
|
|
$GLOBALS['setup_tpl']->set_var($style);
|
2002-03-03 22:47:30 +01:00
|
|
|
if ($nologoutbutton)
|
|
|
|
{
|
2003-11-02 11:44:50 +01:00
|
|
|
$GLOBALS['setup_tpl']->set_block('T_head','loged_in');
|
|
|
|
$GLOBALS['setup_tpl']->set_var('loged_in','');
|
2002-03-03 22:47:30 +01:00
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
$btn_logout = '<a href="index.php?FormLogout=' . $logoutfrom . '" class="link">' . lang('Logout').'</a>';
|
2003-11-02 11:44:50 +01:00
|
|
|
$check_install = '<a class="textsidebox" href="check_install.php">'.lang('Check installation').'</a>';
|
2002-03-03 22:47:30 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
$GLOBALS['setup_tpl']->set_var('lang_setup', lang('setup'));
|
|
|
|
$GLOBALS['setup_tpl']->set_var('page_title',$title);
|
|
|
|
if ($configdomain == '')
|
|
|
|
{
|
|
|
|
$GLOBALS['setup_tpl']->set_var('configdomain','');
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
$GLOBALS['setup_tpl']->set_var('configdomain',' - ' . lang('Domain') . ': ' . $configdomain);
|
|
|
|
}
|
2002-04-07 19:51:37 +02:00
|
|
|
$GLOBALS['setup_tpl']->set_var('pgw_ver',@$GLOBALS['phpgw_info']['server']['versions']['phpgwapi']);
|
2003-11-02 11:44:50 +01:00
|
|
|
$GLOBALS['setup_tpl']->set_var(array(
|
|
|
|
'logoutbutton' => $btn_logout,
|
|
|
|
'check_install' => $check_install,
|
|
|
|
'main_menu' => lang('Setup Main Menu'),
|
|
|
|
'user_login' => lang('Back to user login')
|
|
|
|
));
|
2002-03-03 22:47:30 +01:00
|
|
|
$GLOBALS['setup_tpl']->pparse('out','T_head');
|
|
|
|
/* $setup_tpl->set_var('T_head',''); */
|
|
|
|
}
|
|
|
|
|
|
|
|
function show_footer()
|
|
|
|
{
|
|
|
|
$GLOBALS['setup_tpl']->pparse('out','T_footer');
|
|
|
|
unset($GLOBALS['setup_tpl']);
|
|
|
|
}
|
|
|
|
|
|
|
|
function show_alert_msg($alert_word='Setup alert',$alert_msg='setup alert (generic)')
|
|
|
|
{
|
|
|
|
$GLOBALS['setup_tpl']->set_var('V_alert_word',$alert_word);
|
|
|
|
$GLOBALS['setup_tpl']->set_var('V_alert_msg',$alert_msg);
|
|
|
|
$GLOBALS['setup_tpl']->pparse('out','T_alert_msg');
|
|
|
|
}
|
|
|
|
|
|
|
|
function make_frm_btn_simple($pre_frm_blurb='',$frm_method='POST',$frm_action='',$input_type='submit',$input_value='',$post_frm_blurb='')
|
|
|
|
{
|
|
|
|
/* a simple form has simple components */
|
|
|
|
$simple_form = $pre_frm_blurb ."\n"
|
|
|
|
. '<form method="' . $frm_method . '" action="' . $frm_action . '">' . "\n"
|
|
|
|
. '<input type="' . $input_type . '" value="' . $input_value . '">' . "\n"
|
|
|
|
. '</form>' . "\n"
|
|
|
|
. $post_frm_blurb . "\n";
|
|
|
|
return $simple_form;
|
|
|
|
}
|
|
|
|
|
|
|
|
function make_href_link_simple($pre_link_blurb='',$href_link='',$href_text='default text',$post_link_blurb='')
|
|
|
|
{
|
|
|
|
/* a simple href link has simple components */
|
|
|
|
$simple_link = $pre_link_blurb
|
|
|
|
. '<a href="' . $href_link . '">' . $href_text . '</a> '
|
|
|
|
. $post_link_blurb . "\n";
|
|
|
|
return $simple_link;
|
|
|
|
}
|
|
|
|
|
|
|
|
function login_form()
|
|
|
|
{
|
|
|
|
/* begin use TEMPLATE login_main.tpl */
|
2002-04-10 01:48:36 +02:00
|
|
|
$GLOBALS['setup_tpl']->set_var('ConfigLoginMSG',@$GLOBALS['phpgw_info']['setup']['ConfigLoginMSG']);
|
|
|
|
$GLOBALS['setup_tpl']->set_var('HeaderLoginMSG',@$GLOBALS['phpgw_info']['setup']['HeaderLoginMSG']);
|
2004-01-18 22:03:56 +01:00
|
|
|
$GLOBALS['setup_tpl']->set_var('lang_header_username',lang('Header Username'));
|
|
|
|
$GLOBALS['setup_tpl']->set_var('lang_header_password',lang('Header Password'));
|
|
|
|
$GLOBALS['setup_tpl']->set_var('lang_header_login',lang('Header Admin Login'));
|
|
|
|
$GLOBALS['setup_tpl']->set_var('lang_config_login',lang('Setup/Config Admin Login'));
|
|
|
|
$GLOBALS['setup_tpl']->set_var('lang_config_username',lang('Config Username'));
|
|
|
|
$GLOBALS['setup_tpl']->set_var('lang_config_password',lang('Config Password'));
|
|
|
|
$GLOBALS['setup_tpl']->set_var('lang_domain',lang('Domain'));
|
2002-03-03 22:47:30 +01:00
|
|
|
|
2003-09-23 15:08:40 +02:00
|
|
|
$GLOBALS['setup_tpl']->set_var('lang_select',lang_select());
|
|
|
|
|
2002-03-03 22:47:30 +01:00
|
|
|
if ($GLOBALS['phpgw_info']['setup']['stage']['header'] == '10')
|
|
|
|
{
|
|
|
|
/*
|
|
|
|
Begin use SUB-TEMPLATE login_stage_header,
|
|
|
|
fills V_login_stage_header used inside of login_main.tpl
|
|
|
|
*/
|
|
|
|
if (count($GLOBALS['phpgw_domain']) > 1)
|
|
|
|
{
|
2003-08-28 16:31:11 +02:00
|
|
|
foreach($GLOBALS['phpgw_domain'] as $domain => $data)
|
|
|
|
{
|
|
|
|
$domains .= "<option value=\"$domain\" ".($domain == @$GLOBALS['phpgw_info']['setup']['LastDomain'] ? ' SELECTED' : '').">$domain</option>\n";
|
|
|
|
}
|
|
|
|
$GLOBALS['setup_tpl']->set_var('domains',$domains);
|
|
|
|
|
2002-03-03 22:47:30 +01:00
|
|
|
// use BLOCK B_multi_domain inside of login_stage_header
|
|
|
|
$GLOBALS['setup_tpl']->parse('V_multi_domain','B_multi_domain');
|
|
|
|
// in this case, the single domain block needs to be nothing
|
|
|
|
$GLOBALS['setup_tpl']->set_var('V_single_domain','');
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
reset($GLOBALS['phpgw_domain']);
|
|
|
|
$default_domain = each($GLOBALS['phpgw_domain']);
|
|
|
|
$GLOBALS['setup_tpl']->set_var('default_domain_zero',$default_domain[0]);
|
|
|
|
|
|
|
|
/* Use BLOCK B_single_domain inside of login_stage_header */
|
|
|
|
$GLOBALS['setup_tpl']->parse('V_single_domain','B_single_domain');
|
|
|
|
/* in this case, the multi domain block needs to be nothing */
|
|
|
|
$GLOBALS['setup_tpl']->set_var('V_multi_domain','');
|
|
|
|
}
|
|
|
|
/*
|
|
|
|
End use SUB-TEMPLATE login_stage_header
|
|
|
|
put all this into V_login_stage_header for use inside login_main
|
|
|
|
*/
|
|
|
|
$GLOBALS['setup_tpl']->parse('V_login_stage_header','T_login_stage_header');
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
/* begin SKIP SUB-TEMPLATE login_stage_header */
|
|
|
|
$GLOBALS['setup_tpl']->set_var('V_multi_domain','');
|
|
|
|
$GLOBALS['setup_tpl']->set_var('V_single_domain','');
|
|
|
|
$GLOBALS['setup_tpl']->set_var('V_login_stage_header','');
|
|
|
|
}
|
|
|
|
/*
|
|
|
|
end use TEMPLATE login_main.tpl
|
|
|
|
now out the login_main template
|
|
|
|
*/
|
|
|
|
$GLOBALS['setup_tpl']->pparse('out','T_login_main');
|
|
|
|
}
|
|
|
|
|
|
|
|
function get_template_list()
|
|
|
|
{
|
|
|
|
$d = dir(PHPGW_SERVER_ROOT . '/phpgwapi/templates');
|
|
|
|
|
|
|
|
while($entry = $d->read())
|
|
|
|
{
|
|
|
|
if ($entry != 'CVS' && $entry != '.' && $entry != '..')
|
|
|
|
{
|
|
|
|
$list[$entry]['name'] = $entry;
|
|
|
|
$f = PHPGW_SERVER_ROOT . '/phpgwapi/templates/' . $entry . '/details.inc.php';
|
|
|
|
if (file_exists ($f))
|
|
|
|
{
|
|
|
|
include($f);
|
|
|
|
$list[$entry]['title'] = 'Use ' . $GLOBALS['phpgw_info']['template'][$entry]['title'] . 'interface';
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
$list[$entry]['title'] = $entry;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
$d->close();
|
|
|
|
reset ($list);
|
|
|
|
return $list;
|
|
|
|
}
|
|
|
|
|
|
|
|
function list_themes()
|
|
|
|
{
|
|
|
|
$dh = dir(PHPGW_SERVER_ROOT . '/phpgwapi/themes');
|
|
|
|
while ($file = $dh->read())
|
|
|
|
{
|
|
|
|
if (eregi("\.theme$", $file))
|
|
|
|
{
|
|
|
|
$list[] = substr($file,0,strpos($file,'.'));
|
|
|
|
}
|
|
|
|
}
|
|
|
|
$dh->close();
|
|
|
|
reset ($list);
|
|
|
|
return $list;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
?>
|