function myadminform($a)
{
global $action;
global $shdb;
global $lngstr;
print "<h1>Edit my admin details: " . $a[username] . "</h1>\n";
print "<form name=myadmin action=\"myadmin.php\" method=post>\n";
print " <table width=\"75%\">\n";
print " <tr>\n";
print " <td class=\"tableBody\" width=\"100\">\n";
print " <div align=\"right\">username</div>\n";
print " </td>\n";
print " <td class=\"tableBody\">" . $a[username] . "</td>\n";
print " </tr>\n";
print " <tr>\n";
print " <td class=\"tableBody\" width=\"100\">\n";
print " <div align=\"right\">new password</div>\n";
print " </td>\n";
print " <td class=\"tableBody\" onMouseOver=\"drc('Leave this field blank to keep the old password','Admin password');return true;\" onMouseOut=\"nd();return true;\">\n";
print " <input type=\"password\" name=\"newpassword1\" value=\"\" size=\"64\" maxlength=\"64\">\n";
print " </td>\n";
print " </tr>\n";
print " <tr>\n";
print " <td class=\"tableBody\" width=\"100\">\n";
print " <div align=\"right\">new password</div>\n";
print " </td>\n";
print " <td class=\"tableBody\" onMouseOver=\"drc('Leave this field blank to keep the old password','Admin password');return true;\" onMouseOut=\"nd();return true;\">\n";
print " <input type=\"password\" name=\"newpassword2\" value=\"\" size=\"64\" maxlength=\"64\"> (retype)\n";
print " </td>\n";
print " </tr>\n";
print "</td>\n";
print " </tr>\n";
print " <tr>\n";
print " <td class=\"tableBody\" width=\"100\">\n";
print " <div align=\"right\">fullname</div>\n";
print " </td>\n";
print " <td class=\"tableBody\">" . $a[fullname] . "</td>\n";
print " </tr>\n";
print " <tr>\n";
print " <td class=\"tableBody\" width=\"100\">\n";
print " <div align=\"right\">email</div>\n";
print " </td>\n";
print " <td class=\"tableBody\">" . $a[email] . "</td>\n";
print " </tr>\n";
print " <tr>\n";
print " <td class=\"tableBody\" width=\"100\">\n";
print " <div align=\"right\">" . $lngstr[tr_language] . "</div>\n\n";
print " </td>\n";
print " <td class=\"tableBody\">\n";
print " <select name=\"language\">\n";
print " <option value=\"----\" selected>----</option>\n";
$avl = languages_available();
reset($avl);
while (list($lk, $lv) = each($avl)) {
print " <option value=\"" . $lv . "\">" . $lv . "</option>\n";
}
print " </select>\n";
print " </td>\n";
print " </tr>\n";
print " <tr>\n";
print " <td class=\"tableBody\">\n";
print " <div align=\"right\">my privileges</div>\n";
print " </td>\n";
print " <td class=\"tableBody\">";
print " <img src=\"/images/icons/";
if ($a[ismaster] == 'true') {
print "mark_tick.png";
} else {
print "mark_x.png";
}
print "\"> master<br>\n";
print " <img src=\"/images/icons/";
if ($a[cansubnets] == 'true') {
print "mark_tick.png";
} else {
print "mark_x.png";
}
print "\"> subnets<br>\n";
print " <img src=\"/images/icons/";
if ($a[canhosts] == 'true') {
print "mark_tick.png";
} else {
print "mark_x.png";
}
print "\"> hosts<br>\n";
print " <img src=\"/images/icons/";
if ($a[candns] == 'true') {
print "mark_tick.png";
} else {
print "mark_x.png";
}
print "\"> dns<br>\n";
print " <img src=\"/images/icons/";
if ($a[candhcp] == 'true') {
print "mark_tick.png";
} else {
print "mark_x.png";
}
print "\"> dhcp<br>\n";
print " </td>\n";
print " </tr>\n";
print " </table>\n";
print " <input type=\"submit\" value=\"Update\" class=\"gumb\" name=\"Update\">\n";
print "</form>\n";
print "<script language=javascript>\n";
print " setCtrlValue( window.document.myadmin.language , \"{$a['language']}\" );\n";
print "</script>\n";
}
}
$input = do_get_output('do_input_yes_no', array('clean_url', $config->value, __('Si'), __('No'), $disabled));
$values[$desc] = $input;
// external authentification
$desc = __('Autentificación');
$config = get_config('auth');
$options = array();
$auths = user_auth_available();
foreach ($auths as $auth) {
$option = new StdClass();
$option->id = $auth;
$option->descr = $auth;
$options[] = $option;
}
$input = do_get_output('do_input_select', array('auth', $options, $config->value, true, __('Interna'), '', 'style=\'width:100px;\''));
$values[$desc] = $input;
// language selection
$desc = __('Lenguaje por defecto');
$config = get_config('locale');
$options = array();
$langs = languages_available();
foreach ($langs as $lang) {
$option = new StdClass();
$option->id = $lang;
$option->descr = $lang;
$options[] = $option;
}
$input = do_get_output('do_input_select', array('locale', $options, $config->value, true, 'es_BO', '', 'style=\'width:50px;\''));
$values[$desc] = $input;
//show table input
do_table_values($values, 'narrow');
