function bwoupUserEditForms($adm_login, $adm_pass)
{
global $adm_random_pass;
global $conf_skin;
global $addrlink;
global $rub;
$ret["err"] = 0;
$ret["mesg"] = "No error";
if (isset($adm_login) && $adm_login != "" && isset($adm_pass) && $adm_pass != "") {
// Fetch all the selected user informations, Print a nice error message if failure.
$admin = fetchAdmin($adm_login, $adm_pass);
if (isset($adm_random_pass)) {
$pass = $adm_random_pass;
} else {
$pass = $adm_pass;
}
if (($error = $admin["err"]) != 0) {
echo _("Error fetching admin") . " : {$error}";
$ret["err"] = $admin["err"];
$ret["mesg"] = $admin["mesg"];
return $ret;
}
$out = '<ul class="box_wnb_content_nb">';
if ($rub != "user" && $rub != "") {
$out .= "<li class=\"box_wnb_content_nb_item\"><a href=\"?adm_login={$adm_login}&adm_pass={$pass}&rub=user\"><img width=\"16\" height=\"16\" src=\"gfx/skin/bwoup/gfx/tabs/p_clientinterface.gif\" align=\"absmiddle\" border=\"0\"> " . _("Client interface") . "</a></li>";
} else {
$out .= "<li class=\"box_wnb_content_nb_item_select\"><a href=\"?adm_login={$adm_login}&adm_pass={$pass}&rub=user\"><img width=\"16\" height=\"16\" src=\"gfx/skin/bwoup/gfx/tabs/p_clientinterface.gif\" align=\"absmiddle\" border=\"0\"> " . _("Client interface") . "</a></li>";
}
$out .= '<li class="box_wnb_content_nb_item_vsep"></li>';
if ($rub != "domain_config") {
$out .= "<li class=\"box_wnb_content_nb_item\"><a href=\"?adm_login={$adm_login}&adm_pass={$pass}&rub=domain_config\"><img width=\"16\" height=\"16\" src=\"gfx/skin/bwoup/gfx/tabs/p_domainconfig.gif\" align=\"absmiddle\" border=\"0\">" . _("Domain config") . "</a></li>";
} else {
$out .= "<li class=\"box_wnb_content_nb_item_select\"><a href=\"?adm_login={$adm_login}&adm_pass={$pass}&rub=domain_config\"><img width=\"16\" height=\"16\" src=\"gfx/skin/bwoup/gfx/tabs/p_domainconfig.gif\" align=\"absmiddle\" border=\"0\">" . _("Domain config") . "</a></li>";
}
$out .= '<li class="box_wnb_content_nb_item_vsep"></li>';
if ($rub != "adminedit") {
$out .= "<li class=\"box_wnb_content_nb_item\"><a href=\"?adm_login={$adm_login}&adm_pass={$pass}&rub=adminedit\"><img width=\"16\" height=\"16\" src=\"gfx/skin/bwoup/gfx/tabs/p_admineditor.gif\" align=\"absmiddle\" border=\"0\">" . _("Admin editor") . "</a></li>";
} else {
$out .= "<li class=\"box_wnb_content_nb_item_select\"><a href=\"?adm_login={$adm_login}&adm_pass={$pass}&rub=adminedit\"><img width=\"16\" height=\"16\" src=\"gfx/skin/bwoup/gfx/tabs/p_admineditor.gif\" align=\"absmiddle\" border=\"0\">" . _("Admin editor") . "</a></li>";
}
$out .= "</ul>";
//fix up the $adm_login in case it changed because of session vars:
//in case users play silly bugger with the "GET" variables
$adm_login = $admin["info"]["adm_login"];
// Draw the html forms
if (isset($rub) && $rub == "adminedit") {
$out .= drawEditAdmin($admin);
} else {
if (isset($rub) && $rub == "domain_config") {
$out .= drawDomainConfig($admin);
} else {
$out .= '<table class="box_wnb_content_clientimport"><tr><td>' . drawAdminTools($admin) . '</td></tr></table>';
}
}
return $out;
} else {
// If no user is in edition, draw a tool for adding an admin
return drawNewAdminForm();
}
}
function mail_account_generate_postfix()
{
global $pro_mysql_domain_table;
global $pro_mysql_admin_table;
global $pro_mysql_subdomain_table;
global $console;
global $conf_generated_file_path;
global $conf_addr_mail_server;
global $conf_dtcadmin_path;
global $conf_unix_type;
global $conf_nobody_user_id;
global $conf_dtc_system_uid;
global $conf_dtc_system_username;
global $conf_use_cyrus;
global $conf_use_mail_alias_group;
global $conf_support_ticket_email;
global $conf_support_ticket_fw_email;
global $conf_support_ticket_domain;
global $conf_main_domain;
global $adm_realpass;
global $adm_pass;
global $adm_random_pass;
//global $conf_postfix_virtual_mailbox_domains_path;
//global $conf_postfix_virtual_path;
//global $conf_postfix_vmailbox_path;
//global $conf_postfix_virtual_uid_mapping_path;
// prepend the configured path here
$conf_postfix_virtual_mailbox_domains_path = $conf_generated_file_path . "/postfix_virtual_mailbox_domains";
$conf_local_domains_path = $conf_generated_file_path . "/local_domains";
$conf_postfix_virtual_path = $conf_generated_file_path . "/postfix_virtual";
$conf_postfix_aliases_path = $conf_generated_file_path . "/postfix_aliases";
$conf_postfix_vmailbox_path = $conf_generated_file_path . "/postfix_vmailbox";
$conf_postfix_virtual_uid_mapping_path = $conf_generated_file_path . "/postfix_virtual_uid_mapping";
$conf_postfix_relay_domains_path = $conf_generated_file_path . "/postfix_relay_domains";
$conf_postfix_relay_recipients_path = $conf_generated_file_path . "/postfix_relay_recipients";
$conf_postfix_recipient_lists_path = $conf_generated_file_path . "/recipientlists";
// now for our variables to write out the db info to
$domains_file = "";
$local_domains_file = "";
$domains_postmasters_file = "";
$aliases_file = "";
$vmailboxes_file = "";
$uid_mappings_file = "";
$relay_domains_file = "";
$relay_recipients_file = "";
//store ALL of the domains we know about
//if we manage to get better information later, don't worry about the entry on this one
$relay_recipients_all_domains = "";
$data = "";
// init var for use later on
#CL: Don create sasldb password when using cyrus.
if ($conf_use_cyrus != "yes") {
genSasl2PasswdDBStart();
}
// go through each admin login and find the domains associated
$query = "SELECT * FROM {$pro_mysql_admin_table} ORDER BY adm_login;";
$result = mysql_query($query) or die("Cannot execute query : \"{$query}\"");
$num_rows = mysql_num_rows($result);
if ($num_rows < 1) {
die("No account to generate");
}
for ($i = 0; $i < $num_rows; $i++) {
$row = mysql_fetch_array($result) or die("Cannot fetch user-admin");
$user_admin_name = $row["adm_login"];
$user_admin_pass = $row["adm_pass"];
$adm_realpass = $row["adm_pass"];
$adm_pass = $row["adm_pass"];
$adm_random_pass = $row["adm_pass"];
$admin = fetchAdmin($user_admin_name, $user_admin_pass);
if (($error = $admin["err"]) != 0) {
die("Error fetching admin : {$error}");
}
//Path of user's mailing lists
$admin_path = getAdminPath($user_admin_name);
$info = $admin["info"];
$nbr_domain = 0;
if (isset($admin["data"])) {
$data = $admin["data"];
$nbr_domain = sizeof($data);
}
for ($j = 0; $j < $nbr_domain; $j++) {
$domain = $data[$j];
$domain_full_name = $domain["name"];
//$console .= "Processing $domain_full_name ...\n";
//if we are primary mx, add to domains
//else add to relay
$primary_mx = 0;
if ($domain["primary_mx"] == "" || $domain["primary_mx"] == "default") {
$primary_mx = 1;
$domains_file .= "{$domain_full_name} virtual\n";
$local_domains_file .= "{$domain_full_name}\n";
} else {
$relay_domains_file .= "{$domain_full_name}\n";
$relay_recipients_all_domains .= "{$domain_full_name}\n";
}
$store_catch_all = "";
//$store_catch_all_md = "";
$catch_all_id = $domain["catchall_email"];
$abuse_address = 0;
$postmaster_address = 0;
// This should handle domain parking without a lot of code! :)
if ($domain["domain_parking"] != "no-parking") {
for ($b = 0; $b < $nbr_domain; $b++) {
if ($data[$b]["name"] == $domain["domain_parking"]) {
if (isset($data[$b]["emails"])) {
$domain["emails"] = $data[$b]["emails"];
} else {
unset($domain["emails"]);
}
}
}
}
//Mail Group Aliases Start
if ($conf_use_mail_alias_group == "yes") {
if ($primary_mx && $domain["domain_parking"] != "no-parking") {
// @domain1 -> @domain2
$domains_postmasters_file .= "# Mail Alias Groups for " . $domain["name"] . "\n";
$domains_postmasters_file .= "@" . $domain["name"] . " @" . $domain["domain_parking"] . "\n";
$domains_postmasters_file .= "#\n";
} elseif ($primary_mx && isset($domain["aliases"])) {
// name@domain1 -> othername@domain1,user@domain2,etc.
$aliases = $domain["aliases"];
$nbr_boites = sizeof($aliases);
// go through each of these emails and build the vmailbox file
//also create our sasldb2 if we have a saslpasswd2 exe
for ($k = 0; $k < $nbr_boites; $k++) {
$alias = $aliases[$k];
$id = $alias["id"];
$domain_parent = $alias["domain_parent"];
$ainc = $alias["autoinc"];
$mailbox_cleanup1 = str_replace("\r\n", "\n", $alias["delivery_group"]);
$mailbox_cleanup2 = split("\n", $mailbox_cleanup1);
$deliver_mailbox = '';
if ($k == 0) {
$domains_postmasters_file .= "# Mail Alias Groups for : " . $domain_parent . "\n";
}
for ($x = 0; $x < count($mailbox_cleanup2); $x++) {
if ($x < count($mailbox_cleanup2) - 1) {
$deliver_mailbox .= trim($mailbox_cleanup2[$x]) . ",";
} else {
$deliver_mailbox .= trim($mailbox_cleanup2[$x]);
}
}
$domains_postmasters_file .= $id . "@" . $domain_parent . " " . $deliver_mailbox . "\n";
if ($k == $nbr_boites - 1) {
$domains_postmasters_file .= "#\n";
}
}
}
}
//Mail Group Aliases End
if (isset($domain["emails"]) && $primary_mx && $domain["domain_parking"] == "no-parking") {
$emails = $domain["emails"];
$nbr_boites = sizeof($emails);
// go through each of these emails and build the vmailbox file
//also create our sasldb2 if we have a saslpasswd2 exe
for ($k = 0; $k < $nbr_boites; $k++) {
$email = $emails[$k];
$id = $email["id"];
$uid = $email["uid"];
// if our uid is 65534, make sure it's the correct uid as per the OS (99 for redhat)
/* if ($uid == 65534){
$uid = $conf_nobody_user_id;
}*/
$localdeliver = $email["localdeliver"];
$redirect1 = $email["redirect1"];
$redirect2 = $email["redirect2"];
$_id = strtr($id, ".", ":");
$home = $email["home"];
$passwdtemp = $email["passwd"];
$passwd = crypt($passwdtemp, dtc_makesalt());
$spam_mailbox = $email["spam_mailbox"];
$spam_mailbox_enable = $email["spam_mailbox_enable"];
$vacation_flag = $email["vacation_flag"];
$vacation_text = stripslashes($email["vacation_text"]);
if ($k == 0) {
$domains_postmasters_file .= "# Mailboxes for : " . $domain_full_name . "\n";
}
$spam_stuff_done = 0;
$homedir_created = 0;
if (!isset($home) || $home == "" && $conf_use_cyrus != "yes") {
$console .= "Missing home variable for {$id}";
}
if (!is_dir($home) && $conf_use_cyrus != "yes" && strlen($home) > 0 && $id != "cyrus" && $id != "cyradm") {
$PATH = getenv('PATH');
putenv("PATH=/usr/lib/courier-imap/bin:{$PATH}");
system("/bin/mkdir -p {$home} && maildirmake {$home}");
putenv("PATH={$PATH}");
$homedir_created = 1;
}
// if we have a $id equal to abuse
if ($id == "abuse") {
$abuse_address++;
}
if ($id == "postmaster") {
$postmaster_address++;
}
// Previously: only generate sasl logins for local accounts
// In fact, there is no reason to do so. We might want to create a mail account ONLY for sending
// some mail, and not receiving.
#CL: Not needed for cyrus
if ($conf_use_cyrus != "yes") {
genSasl2PasswdDBEntry($domain_full_name, $id, $passwdtemp, $conf_addr_mail_server);
}
// setup a postfix mapping for local delivery or vacation flags
if ($localdeliver == "yes" || $localdeliver == "true" || $vacation_flag == "yes") {
// setup the catch_all for locally delivered email addresses
if ($id == $catch_all_id) {
//$store_catch_all_md .= "@$domain_full_name $home/Maildir/\n";
$store_catch_all .= "@{$domain_full_name}\t{$id}@{$domain_full_name}\n";
}
$vmailboxes_file .= "{$id}@{$domain_full_name} {$home}/Maildir/\n";
$uid_mappings_file .= "{$id}@{$domain_full_name} {$uid}\n";
if (isset($catch_all_id) || $catch_all_id != "") {
//just so we can deliver to our vmailboxs if we have set a catch-all (otherwise postfix gets confused, and delivers all mail to the catch all)
$domains_postmasters_file .= "{$id}@{$domain_full_name} {$id}@{$domain_full_name}\n";
}
}
if (isset($redirect1) && $redirect1 != "") {
unset($extra_redirects);
if ($localdeliver == "yes" || $localdeliver == "true" || $vacation_flag == "yes") {
// need to generate .mailfilter file with "cc" and also local delivery
if ($conf_use_cyrus != "yes" && (!isset($redirect2) || $redirect2 == "")) {
genDotMailfilterFile($home, $id, $domain_full_name, $spam_mailbox_enable, $spam_mailbox, $localdeliver, $vacation_flag, $vacation_text, $redirect1);
}
$spam_stuff_done = 1;
} else {
$extra_redirects = " {$redirect1} ";
}
if ($redirect2 != "" && isset($redirect2)) {
if ($localdeliver == "yes" || $localdeliver == "true" || $vacation_flag == "yes") {
//need to generate .mailfilter file with "cc" and also local delivery
if ($conf_use_cyrus != "yes") {
genDotMailfilterFile($home, $id, $domain_full_name, $spam_mailbox_enable, $spam_mailbox, $localdeliver, $vacation_flag, $vacation_text, $redirect1, $redirect2);
}
$spam_stuff_done = 1;
} else {
if (isset($extra_redirects)) {
$extra_redirects .= " , {$redirect2}";
}
}
}
if ($store_catch_all == "" && ($id == "*" || $id == $catch_all_id)) {
if (isset($extra_redirects)) {
$store_catch_all .= "@{$domain_full_name} {$extra_redirects}\n";
}
} else {
if (isset($extra_redirects)) {
$domains_postmasters_file .= "{$id}@{$domain_full_name}\t{$extra_redirects}\n";
}
}
unset($extra_redirects);
}
//if we haven't added the spam mailbox yet, do it here
if ($spam_stuff_done == 0) {
if ($conf_use_cyrus != "yes") {
genDotMailfilterFile($home, $id, $domain_full_name, $spam_mailbox_enable, $spam_mailbox, $localdeliver, $vacation_flag, $vacation_text, $redirect1, $redirect2);
}
}
if (is_dir($home) && $homedir_created == 1 && $id != "cyrus" && $id != "cyradm") {
system("chown -R {$conf_dtc_system_username} {$home}");
}
if ($k == $nbr_boites - 1) {
$domains_postmasters_file .= "#\n";
}
}
}
//add support for creation of mailing lists
if (isset($domain["mailinglists"]) && $primary_mx) {
$lists = $domain["mailinglists"];
$nbr_boites = sizeof($lists);
// go through each of these lists and add to virtual maps and normal aliases
for ($k = 0; $k < $nbr_boites; $k++) {
$list = $lists[$k];
$list_id = $list["id"];
$list_name = $list["name"];
if ($list_name == "abuse") {
$abuse_address++;
} else {
if ($list_name == "postmaster") {
$postmaster_address++;
}
}
$list_owner = $list["owner"];
$list_domain = $list["domain"];
$list_path = "{$admin_path}/{$list_domain}/lists";
$name = $list_domain . "_" . $list_name;
if (!preg_match("/\\@/", $list_owner)) {
$owner = $list_owner . "@" . $list_domain;
} else {
$owner = $list_owner;
}
$modified_name = str_replace("-", "_", $name);
$domains_postmasters_file .= $list_name . "@" . $list_domain . " " . $modified_name . "\n";
$aliases_file .= $modified_name . ': "|/usr/bin/mlmmj-recieve -L ' . $list_path . '/' . $name . '/"' . "\n";
}
}
// if an abuse@ email hasn't been set, set one here to go to postmaster
if ($abuse_address == 0 && $primary_mx) {
$domains_postmasters_file .= "abuse@{$domain_full_name} postmaster\n";
}
if ($postmaster_address == 0 && $primary_mx) {
$domains_postmasters_file .= "postmaster@{$domain_full_name} postmaster\n";
}
//always store catch all last... :)
if (isset($store_catch_all) && $store_catch_all != "") {
$domains_postmasters_file .= $store_catch_all;
}
//now store the Maildir version
if (isset($store_catch_all_md) && $store_catch_all_md != "") {
$vmailboxes_file .= $store_catch_all_md;
}
}
}
//check to see if the domain is in our local recipients first before adding to allowed relay domains
$relay_domains_file_temp_list = explode("\n", get_remote_mail_domains());
foreach ($relay_domains_file_temp_list as $domain) {
if (isset($domain) && strlen($domain) > 0) {
if (!preg_match("/^{$domain}\\s/", $domains_file)) {
$relay_domains_file .= "{$domain}\n";
}
}
}
$relay_recipients_list = explode("\n", get_remote_mail_recipients());
foreach ($relay_recipients_list as $email) {
if (isset($email) && strlen($email) > 0) {
// echo "Stage 1 - adding $email";
$relay_recipients_file .= $email . " OK\n";
}
}
// if we haven't added the following domains to the $relay_recipients_file, then we need to add a wildcard, bad, but necessary for domains we don't have email lists for
$relay_recipients_all_domains_list = explode("\n", $relay_recipients_all_domains);
foreach ($relay_recipients_all_domains_list as $domain) {
// if the $domain isn't set here, keep going
if (!(isset($domain) && strlen($domain) > 0)) {
continue;
}
//$console .= "$domain is being backed up\n";
//try and read a file here, and see if we have a list already created
if (is_file("{$conf_postfix_recipient_lists_path}/{$domain}")) {
//$console .= "File found with domain info - $conf_postfix_recipient_lists_path/$domain\n";
//check to see if we have already got this domain...
//if we do, then it means that we have a rogue $domain file, and it should be deleted! :)
if (preg_match("/\\@{$domain}\\s+OK/", $relay_recipients_file)) {
unlink("{$conf_postfix_recipient_lists_path}/{$domain}");
} else {
// echo "Reading $domain from recip file...";
$fp = fopen("{$conf_postfix_recipient_lists_path}/{$domain}", "r");
$contents = fread($fp, filesize("{$conf_postfix_recipient_lists_path}/{$domain}"));
fclose($fp);
//now we have found some domain email list, append it here
$relay_recipients_file .= $contents;
// echo "Stage 2 - adding $contents";
}
}
//finally check to see if we haven't got any entries for this domain
if (!preg_match("/\\@{$domain}\\s+OK/", $relay_recipients_file)) {
//$console .= "Faking domain entry for $domain...\n";
$relay_recipients_file .= "@{$domain} OK\n";
// echo "Stage 3 - adding $domain OK";
//write this to a file, so admin/users can edit later
if (!file_exists("{$conf_postfix_recipient_lists_path}")) {
//make a directory here if it doesn't exist yet
mkdir("{$conf_postfix_recipient_lists_path}");
}
$fp = fopen("{$conf_postfix_recipient_lists_path}/{$domain}", "w");
fwrite($fp, "@{$domain} OK\n");
fclose($fp);
}
}
// Add the support@ email
$aliases_file .= "dtc_support_ticket_messages: \"| " . $conf_dtcadmin_path . "/support-receive.php\"\n";
$domains_postmasters_file .= $conf_support_ticket_email . "@" . $conf_support_ticket_domain . " dtc_support_ticket_messages\n";
// Add the supportforward@ email
$aliases_file .= "dtc_support_forward_ticket_messages: \"| reformime -e -s 1.2 | " . $conf_dtcadmin_path . "/support-receive.php\"\n";
$domains_postmasters_file .= $conf_support_ticket_fw_email . "@" . $conf_support_ticket_domain . " dtc_support_ticket_messages\n";
//write out our config files
$fp = fopen("{$conf_postfix_virtual_mailbox_domains_path}", "w");
fwrite($fp, $domains_file);
fclose($fp);
$fp = fopen("{$conf_local_domains_path}", "w");
fwrite($fp, $local_domains_file);
fclose($fp);
$fp = fopen("{$conf_postfix_virtual_path}", "w");
fwrite($fp, $domains_postmasters_file);
fclose($fp);
$fp = fopen("{$conf_postfix_aliases_path}", "w");
fwrite($fp, $aliases_file);
fclose($fp);
$fp = fopen("{$conf_postfix_vmailbox_path}", "w");
fwrite($fp, $vmailboxes_file);
fclose($fp);
$fp = fopen("{$conf_postfix_virtual_uid_mapping_path}", "w");
fwrite($fp, $uid_mappings_file);
fclose($fp);
$fp = fopen("{$conf_postfix_relay_domains_path}", "w");
fwrite($fp, $relay_domains_file);
fclose($fp);
$fp = fopen("{$conf_postfix_relay_recipients_path}", "w");
fwrite($fp, $relay_recipients_file);
fclose($fp);
//now that we have our base files, go and rebuild the db's
if ($conf_unix_type == "bsd") {
$POSTMAP_BIN = "/usr/local/sbin/postmap -r";
$POSTALIAS_BIN = "/usr/local/sbin/postalias -r";
} else {
$POSTMAP_BIN = "/usr/sbin/postmap -r";
$POSTALIAS_BIN = "/usr/sbin/postalias -r";
}
system("{$POSTMAP_BIN} {$conf_postfix_virtual_mailbox_domains_path}");
system("{$POSTMAP_BIN} {$conf_postfix_virtual_path}");
system("{$POSTALIAS_BIN} {$conf_postfix_aliases_path}");
system("{$POSTMAP_BIN} {$conf_postfix_vmailbox_path}");
system("{$POSTMAP_BIN} {$conf_postfix_virtual_uid_mapping_path}");
system("{$POSTMAP_BIN} {$conf_postfix_relay_recipients_path}");
genSaslFinishConfigAndRights();
system("chown " . $conf_dtc_system_username . ":postfix " . $conf_generated_file_path . "/postfix_*");
//in case our relay_domains file hasn't been created correctly, we should touch it
system("touch {$conf_postfix_relay_domains_path}");
}
function userEditForms($adm_login, $adm_pass)
{
global $adm_random_pass;
global $conf_skin;
global $addrlink;
global $rub;
$ret["err"] = 0;
$ret["mesg"] = "No error";
if (isset($adm_login) && $adm_login != "" && isset($adm_pass) && $adm_pass != "") {
// Fetch all the selected user informations, Print a nice error message if failure.
$admin = fetchAdmin($adm_login, $adm_pass);
if (isset($adm_random_pass)) {
$pass = $adm_random_pass;
} else {
$pass = $adm_pass;
}
if (($error = $admin["err"]) != 0) {
// now print out all the stuff from our HTTP headers
//$input = array_merge($_GET, $_POST,
// $_COOKIE, $_SERVER,
// $_ENV, $_FILES,
// isset($_SESSION) ? $_SESSION : array());
//foreach ($input as $k => $v) {
// echo "$k - $input[$k]\n";
//}
echo "Error fetching admin : {$error} line " . __LINE__ . " file " . __FILE__;
$ret["err"] = $admin["err"];
$ret["mesg"] = $admin["mesg"];
return $ret;
}
$iface_select = "<table height=\"1\" border=\"0\" width=\"100%\">";
$iface_select .= "<tr><td width=\"33%\" valign=\"top\"><center>";
if ($rub != "user" && $rub != "") {
$iface_select .= "<a href=\"?rub=user&adm_login={$adm_login}&adm_pass={$pass}\">";
}
$iface_select .= "<img src=\"gfx/menu/client-interface.png\" width=\"48\" height=\"48\" border=\"0\"><br>\n" . _("Client interface");
if ($rub != "user" && $rub != "") {
$iface_select .= "</a>";
}
$iface_select .= "</center></td><td width=\"33%\" valign=\"top\"><center>";
if ($rub != "domain_config") {
$iface_select .= "<a href=\"?rub=domain_config&adm_login={$adm_login}&adm_pass={$pass}\">";
}
$iface_select .= "<img src=\"gfx/menu/domain-config.png\" width=\"48\" height=\"48\" border=\"0\"><br>\n" . _("Domain config");
if ($rub != "domain_config") {
$iface_select .= "</a>";
}
$iface_select .= "</center></td><td width=\"33%\" valign=\"top\"><center>";
if ($rub != "adminedit") {
$iface_select .= "<a href=\"?rub=adminedit&adm_login={$adm_login}&adm_pass={$pass}\">";
}
$iface_select .= "<img src=\"gfx/menu/user-editor.png\" width=\"48\" height=\"48\" border=\"0\"><br>\n" . _("Admin editor");
if ($rub != "adminedit") {
$iface_select .= "</a>";
}
$iface_select .= "</center></td></tr></table>";
$iface_skined = skin($conf_skin, $iface_select, _("User administration") . " {$adm_login}");
//fix up the $adm_login in case it changed because of session vars:
//in case users play silly bugger with the "GET" variables
$adm_login = $admin["info"]["adm_login"];
// Draw the html forms
if (isset($rub) && $rub == "adminedit") {
$HTML_admin_edit_info = drawEditAdmin($admin);
$user_config = skin($conf_skin, $HTML_admin_edit_info, _("Configuration of the virtual administrator") . "<i>\"{$adm_login}\"</i>");
// return $user_config;
} else {
if (isset($rub) && $rub == "domain_config") {
$HTML_admin_domain_config = drawDomainConfig($admin);
$user_config = skin($conf_skin, $HTML_admin_domain_config, _("Configuration of domains for") . " <i>\"{$adm_login}\"</i>");
} else {
$HTML_admin_edit_data = drawAdminTools($admin);
$user_config = skin($conf_skin, $HTML_admin_edit_data, _("Domains for") . " " . $adm_login);
// return $user_tools;
}
}
// All thoses tools in a simple table
return "<table width=\"100%\" height=\"100%\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">\n\t<tr>\n\t\t<tr><td width=\"100%\">{$iface_skined}</td></tr>\n\t\t<tr><td width=\"100%\">{$user_config}</td></tr>\n\t\t<tr><td height=\"100%\"> </td></tr>\n\t</tr>\n</table>\n";
} else {
// If no user is in edition, draw a tool for adding an admin
$add_a_user = drawNewAdminForm();
return skin($conf_skin, $add_a_user, _("Add a virtual administrator"));
}
}
function mail_account_generate_qmail()
{
global $pro_mysql_domain_table;
global $pro_mysql_admin_table;
global $pro_mysql_subdomain_table;
global $pro_mysql_backup_table;
global $console;
global $conf_generated_file_path;
global $conf_qmail_rcpthost_path;
global $conf_qmail_virtualdomains_path;
global $conf_qmail_assign_path;
global $conf_qmail_poppasswd_path;
global $conf_nobody_user_id;
global $conf_nobody_group_id;
global $conf_dtc_system_gid;
global $conf_dtc_system_uid;
global $conf_dtc_system_username;
$rcpthosts_file = "";
$local_domains_file = "";
$virtualdomains_file = "";
$poppasswd_file = "";
$assign_file = "";
$more_rcpt = "";
$query = "SELECT * FROM {$pro_mysql_admin_table} ORDER BY adm_login;";
$result = mysql_query($query) or die("Cannot execute query : \"{$query}\"");
$num_rows = mysql_num_rows($result);
if ($num_rows < 1) {
die("No account to generate");
}
for ($i = 0; $i < $num_rows; $i++) {
$row = mysql_fetch_array($result) or die("Cannot fetch user-admin");
$user_admin_name = $row["adm_login"];
$user_admin_pass = $row["adm_pass"];
$admin = fetchAdmin($user_admin_name, $user_admin_pass);
$admin_path = getAdminPath($user_admin_name);
if (($error = $admin["err"]) != 0) {
die("Error fetching admin : {$error}");
}
$info = $admin["info"];
if (isset($admin["data"])) {
$data = $admin["data"];
$nbr_domain = sizeof($data);
} else {
$nbr_domain = 0;
}
for ($j = 0; $j < $nbr_domain; $j++) {
$domain = $data[$j];
$domain_full_name = $domain["name"];
$domain_qmail_name = strtr($domain_full_name, ".", "-");
$rcpthosts_file .= "{$domain_full_name}\n";
$local_domains_file .= "{$domain_full_name}\n";
$more_rcpt .= "{$domain_full_name}\n";
if ($domain["primary_mx"] == "" || $domain["primary_mx"] == "default") {
$virtualdomains_file .= "{$domain_full_name}:{$domain_qmail_name}\n";
$primary_mx = 1;
} else {
$primary_mx = 0;
}
if (isset($domain["mailinglists"]) && $primary_mx) {
$lists = $domain["mailinglists"];
$nbr_boites = sizeof($lists);
// go through each of these lists and add accounts to it
for ($k = 0; $k < $nbr_boites; $k++) {
$list = $lists[$k];
$list_id = $list["id"];
$list_name = $list["name"];
$list_owner = $list["owner"];
$list_domain = $list["domain"];
// add the missing domain to the list owner
if (!preg_match("/\\@/", $list_owner)) {
$list_owner .= "@" . $list_domain;
}
$list_path = "{$admin_path}/{$list_domain}/lists/{$list_domain}" . "_" . "{$list_name}";
writeMlmmjQmailFile($admin_path);
$assign_file .= "+{$domain_qmail_name}-{$list_name}:{$conf_dtc_system_username}:{$conf_dtc_system_uid}:{$conf_dtc_system_gid}:{$list_path}:::\n";
}
}
if ($primary_mx && isset($domain["emails"])) {
$emails = $domain["emails"];
$catch_all = $domain["catchall_email"];
$nbr_boites = sizeof($emails);
$catch_all_flag = "no";
// Handles all domain parking nicely
if ($domain["domain_parking"] != "no-parking") {
for ($b = 0; $b < $nbr_domain; $b++) {
if ($data[$b]["name"] == $domain["domain_parking"]) {
$domain["emails"] = $data[$b]["emails"];
}
}
}
// Loop for all mailboxes
for ($k = 0; $k < $nbr_boites; $k++) {
$email = $emails[$k];
$id = $email["id"];
$home = $email["home"];
// $box_path = "$admin_path/Mailboxs/$id";
$qmail_id = strtr($id, ".", ":");
$passwdtemp = $email["passwd"];
$passwd = crypt($passwdtemp, dtc_makesalt());
// This one is if you use the jedi's checkpassword programm
// $poppasswd_file .= "$id@$domain_full_name:$passwd:nobody:$home\n";
// This one is for cmd5checkpw
$poppasswd_file .= "{$id}@{$domain_full_name}:{$passwdtemp}\n";
if ($catch_all == $id) {
$catch_all_flag = "yes";
$catchall_home = $home;
} else {
$assign_file .= "={$domain_qmail_name}-{$id}:{$conf_dtc_system_username}:{$conf_dtc_system_uid}:{$conf_dtc_system_gid}:{$home}:::\n";
}
}
// Gen the catchall if there is a box like that
if ($catch_all_flag == "yes") {
$assign_file .= "+{$domain_qmail_name}:{$conf_dtc_system_username}:{$conf_dtc_system_ui}:{$conf_dtc_system_gid}:" . getAdminPath($user_admin_name) . "/" . $domain["name"] . "/Mailboxs:::\n";
}
}
}
}
$rcpthosts_file .= get_remote_mail_domains();
$assign_file .= ".\n";
$fp = fopen("{$conf_generated_file_path}/{$conf_qmail_rcpthost_path}", "w");
fwrite($fp, $rcpthosts_file);
fclose($fp);
$fp = fopen("{$conf_generated_file_path}/local_domains", "w");
fwrite($fp, $local_domains_file);
fclose($fp);
$fp = fopen("{$conf_generated_file_path}/{$conf_qmail_virtualdomains_path}", "w");
fwrite($fp, $virtualdomains_file);
fclose($fp);
$fp = fopen("{$conf_generated_file_path}/{$conf_qmail_poppasswd_path}", "w");
fwrite($fp, $poppasswd_file);
fclose($fp);
$fp = fopen("{$conf_generated_file_path}/{$conf_qmail_assign_path}", "w");
fwrite($fp, $assign_file);
fclose($fp);
$fp = fopen("{$conf_generated_file_path}/morercpthosts", "w");
fwrite($fp, $more_rcpt);
fclose($fp);
}
function drawAdminMonitor()
{
global $pro_mysql_client_table;
global $pro_mysql_admin_table;
global $conf_mysql_db;
global $adm_realpass;
global $adm_pass;
global $adm_random_pass;
$out = "";
// For each clients
$q = "SELECT * FROM {$pro_mysql_client_table} WHERE 1 ORDER BY familyname,christname";
$r = mysql_query($q) or die("Cannot query: \"{$q}\" !" . mysql_error() . " line " . __LINE__ . " in file " . __FILE__);
$nr = mysql_num_rows($r);
$out .= '<br><table border="1" width="100%" height="1" cellpadding="1" cellspacing="1">';
$out .= "<tr><td><b>" . _("User") . "</b></td><td><b>" . _("Transfer") . " / " . _("BW Quota") . "</b></td><td><b>" . _("Transfer per month") . "</b></td><td><b>" . _("Disk usage") . " / " . _("Quota") . "</b></td></tr>";
$total_box_transfer = 0;
$total_box_hits = 0;
for ($i = 0; $i < $nr; $i++) {
$ar = mysql_fetch_array($r);
$transfer = 0;
$total_hits = 0;
$du = 0;
// make sure we are selecting the correct DB
// there is a condition where we have lost the link to the main DB
// this may hide another bug, but at least it will show things to the user
mysql_select_db($conf_mysql_db);
// For each of it's admins
$q2 = "SELECT * FROM {$pro_mysql_admin_table} WHERE id_client='" . $ar["id"] . "';";
$r2 = mysql_query($q2) or die("Cannot query: \"{$q2}\" !" . mysql_error() . " line " . __LINE__ . " in file " . __FILE__);
$nr2 = mysql_num_rows($r2);
$admin = array();
$admin_stats = array();
for ($j = 0; $j < $nr2; $j++) {
$ar2 = mysql_fetch_array($r2);
$adm_realpass = $ar2["adm_pass"];
$adm_pass = $ar2["adm_pass"];
$adm_random_pass = $ar2["adm_pass"];
$oneadmin = fetchAdmin($ar2["adm_login"], $ar2["adm_pass"]);
$admin_stats = fetchAdminStats($oneadmin);
$admin = array_merge($admin, $oneadmin);
if (isset($admin_stats["total_transfer"])) {
$transfer += $admin_stats["total_transfer"];
}
if (isset($admin_stats["total_du"])) {
$du += $admin_stats["total_du"];
}
if (isset($admin_stats["total_hit"])) {
$hits = $admin_stats["total_hit"];
$total_hits += $hits;
}
}
if ($i % 2) {
$back = " bgcolor=\"#000000\" style=\"white-space:nowrap;color:#FFFFFF\" nowrap";
} else {
$back = " style=\"white-space:nowrap;\" nowrap";
}
$nbr_row = 0;
if (!isset($admin["vps"])) {
$nbr_vps = 0;
} else {
$nbr_vps = sizeof($admin["vps"]);
$nbr_row += $nbr_vps;
}
if (isset($admin["data"])) {
$nbr_row += 1;
}
if ($nbr_row > 1) {
$rowspan_entry = "rowspan=\"{$nbr_row}\"";
} else {
$rowspan_entry = "";
}
// Admin name
$out .= "<tr><td{$back} {$rowspan_entry}><u>" . $ar["company_name"] . ":</u><br>\n" . $ar["familyname"] . ", " . $ar["christname"] . "</td>";
if (isset($admin["data"])) {
// Transfer this month
$out .= "<td{$back}>" . drawPercentBar($transfer, $ar["bw_quota_per_month_gb"] * 1024 * 1024 * 1024, "no") . "<br>\n" . smartByte($transfer) . " / " . smartByte($ar["bw_quota_per_month_gb"] * 1024 * 1024 * 1024) . " ({$total_hits} hits)</td>";
// Per month transfer graph
$out .= "<td{$back}><img width=\"120\" height=\"48\" src=\"bw_per_month.php?cid=" . $ar["id"] . "\"></td>";
// Share hosing hard disk space
$out .= "<td{$back}>" . drawPercentBar($du, $ar["disk_quota_mb"] * 1024 * 1024, "no") . "<br>\n" . smartByte($du) . " / " . smartByte($ar["disk_quota_mb"] * 1024 * 1024) . "</td></tr>";
}
for ($j = 0; $j < $nbr_vps; $j++) {
if (isset($admin["data"]) || $j > 1) {
$out .= "<tr>";
}
$out .= "<td {$back} colspan=\"3\">" . $admin["vps"][$j]["vps_server_hostname"] . ":" . $admin["vps"][$j]["vps_xen_name"];
$out .= "<table border=\"1\" width=\"100%\" height=\"1\" cellpadding=\"1\" cellspacing=\"1\">";
$out .= "<tr><td {$back}>" . _("Network") . "</td><td {$back}>" . _("HDD") . "</td><td {$back}>" . _("Swap") . "</td><td {$back}>" . _("CPU") . "</td></tr>";
$out .= "<tr><td {$back}><img width=\"120\" height=\"48\" src=\"vps_stats_network.php?vps_node=" . $admin["vps"][$j]["vps_server_hostname"] . "&vps_name=" . $admin["vps"][$j]["vps_xen_name"] . "\"></td>\n<td {$back}><img width=\"120\" height=\"48\" src=\"vps_stats_hdd.php?vps_node=" . $admin["vps"][$j]["vps_server_hostname"] . "&vps_name=" . $admin["vps"][$j]["vps_xen_name"] . "\"></td>\n<td {$back}><img width=\"120\" height=\"48\" src=\"vps_stats_swap.php?vps_node=" . $admin["vps"][$j]["vps_server_hostname"] . "&vps_name=" . $admin["vps"][$j]["vps_xen_name"] . "\"></td>\n<td {$back}><img width=\"120\" height=\"48\" src=\"vps_stats_cpu.php?vps_node=" . $admin["vps"][$j]["vps_server_hostname"] . "&vps_name=" . $admin["vps"][$j]["vps_xen_name"] . "\"></td>";
$out .= "</tr>";
$out .= "</table>";
$out .= "</td></tr>";
}
$total_box_transfer += $transfer;
$total_box_hits += $total_hits;
//fetchAdminStats($admin)
}
$out .= "</table>";
$out .= _("Server accounted transfers this month: ") . smartByte($total_box_transfer) . " ({$total_box_hits} hits)";
return $out;
}