function do_package_install()
{
    global $package_installer_console;
    global $edit_domain;
    global $adm_login;
    global $pkg_info;
    global $dtcpkg_db_login;
    $package_installer_console .= "=> Starting nuked-klan Installer for nuked-klan sp 4.4<br>";
    $admin_path = getAdminPath($adm_login);
    $vhost_path = $admin_path . "/" . $edit_domain . "/subdomains/" . $_REQUEST["subdomain"] . "/html";
    $hostname = $_REQUEST["subdomain"] . "." . $edit_domain;
    $vhost_url = "http://{$hostname}/";
    $cmd = "mv " . $vhost_path . "/" . $pkg_info["directory"] . " " . $vhost_path . "/" . $_REQUEST["dtcpkg_directory"];
    $data = array();
    $data['board_email'] = $_REQUEST['dtcpkg_email'];
    $data['install_pseudo'] = $_REQUEST['dtcpkg_login'];
    $data['install_pass'] = $_REQUEST['dtcpkg_pass'];
    $data['db_name'] = $_REQUEST['database_name'];
    $data['db_user'] = $dtcpkg_db_login;
    $data['db_passwd'] = $_REQUEST['dtcpkg_db_pass'];
    $url = $vhost_url . $_REQUEST["dtcpkg_directory"] . "/" . $pkg_info["post_script_url"];
    //  print_r($data);
    $package_installer_console .= "=> Calling {$url}<br>";
    $ret = HTTP_Post($url, $data, $url);
    $weblines = explode("\n", $ret);
    // HTTP/1.1 200 OK
    $package_installer_console .= "=> Script returns: " . $weblines[0];
    return 0;
    // Ok, no problem ! :)
}
function do_package_install()
{
    global $package_installer_console;
    global $edit_domain;
    global $adm_login;
    global $pkg_info;
    global $dtcpkg_db_login;
    global $conf_mysql_db;
    $package_installer_console .= "=> Starting phpBB Installer for wanewsletter 2.3.0<br>";
    $admin_path = getAdminPath($adm_login);
    $vhost_path = $admin_path . "/" . $edit_domain . "/subdomains/" . $_REQUEST["subdomain"] . "/html";
    $hostname = $_REQUEST["subdomain"] . "." . $edit_domain;
    $vhost_url = "http://{$hostname}/";
    $vhost_url2 = "http://{$hostname}";
    if ($_REQUEST["dtcpkg_directory"] == "") {
        $dest_dir = $vhost_path;
    } else {
        $dest_dir = $vhost_path . "/" . $_REQUEST["dtcpkg_directory"];
    }
    $url = $vhost_url2 . $_REQUEST["dtcpkg_directory"] . "/" . $pkg_info["post_script_url"];
    /*Todo: uncomment and make the following work:
      $data = array();
      $data["admin_email"] = $_REQUEST["dtcpkg_email"];
      $data["admin_login"] = $_REQUEST["dtcpkg_login"];
      $data["admin_pass"] = $_REQUEST["dtcpkg_pass"];
      $data["confirm_pass"] = $_REQUEST["dtcpkg_pass"];
    
      $data["dbname"] = $_REQUEST["database_name"];
      $data["driver"] = "mysql";
      $data["host"] = "localhost";
    
      $data["language"] = "francais";
      $data["pass"] = $_REQUEST["dtcpkg_db_pass"];
      $data["prefix"] = "wa_";
    
      $data["prev_language"] = "francais";
      $data["start"] = "Démarrer l'installation";
      $data["urlscript"] = $_REQUEST["dtcpkg_directory"]."/";
      $data["urlsite"] = $vhost_url;
      $data["user"] = $dtcpkg_db_login;
      $data[""] = "";
    
      echo "<pre>"; print_r($data); echo "</pre>";
    
      $package_installer_console .= "=> Calling $url<br>";
      $ret = HTTP_Post($url,$data, $url);
      $weblines = explode("\n",$ret);
      $package_installer_console .= "=> Script returns: ".$weblines[0];
    */
    $package_installer_console .= "Please finish the installation here:<br><a href=\"{$url}\">{$url}</a><br>";
    return 0;
    // Ok, no problem ! :)
}
function do_package_install()
{
    global $package_installer_console;
    global $edit_domain;
    global $adm_login;
    global $pkg_info;
    global $dtcpkg_db_login;
    $package_installer_console .= "=> Starting installer for osCommere 2.2ms2<br>";
    $admin_path = getAdminPath($adm_login);
    $vhost_path = $admin_path . "/" . $edit_domain . "/subdomains/" . $_REQUEST["subdomain"] . "/html";
    $pkg_dest = $vhost_path . "/" . $_REQUEST["dtcpkg_directory"];
    $hostname = $_REQUEST["subdomain"] . "." . $edit_domain;
    $vhost_url = "http://{$hostname}/";
    $cmd = "mv {$pkg_dest}/catalog/* {$pkg_dest}";
    exec($cmd, $exec_out, $return_val);
    $package_installer_console .= "Please go to <a target=\"_blank\" href=\"{$vhost_url}" . $_REQUEST["dtcpkg_directory"] . "/install/\">the package original installer</a> to finish your installation<br>";
    $cmd = "mv " . $vhost_path . "/" . $pkg_info["directory"] . " " . $vhost_path . "/" . $_REQUEST["dtcpkg_directory"];
    /*
      $data = array();
      $data["lang"] = "english";
      $data["dbms"] = "mysql4";
      $data["upgrade"] = "0";
      $data["dbhost"] = "localhost";
      $data["dbname"] = $_REQUEST["database_name"];
      $data["dbuser"] = $dtcpkg_db_login;
      $data["dbpasswd"] = $_REQUEST["dtcpkg_db_pass"];
      $data["prefix"] = "phpbb_";
      $data["board_email"] = $_REQUEST["dtcpkg_email"];
      $data["server_name"] = $hostname;
      $data["server_port"] = "80";
      $data["admin_name"] = $_REQUEST["dtcpkg_login"];
      $data["admin_pass1"] = $_REQUEST["dtcpkg_pass"];
      $data["admin_pass2"] = $_REQUEST["dtcpkg_pass"];
      $data["install_step"] = "1";
      $data["cur_lang"] = "english";
    
      $url = $vhost_url.$_REQUEST["dtcpkg_directory"]."/".$pkg_info["post_script_url"];
    
    //  print_r($data);
      $package_installer_console .= "=> Calling $url<br>";
      $ret = HTTP_Post($url,$data, $url);
      $weblines = explode("\n",$ret);
    // HTTP/1.1 200 OK
      $package_installer_console .= "=> Script returns: ".$weblines[0];
    */
    return 0;
    // Ok, no problem ! :)
}
Пример #4
0
function subdomainDeleteDirsCallBack($id)
{
    global $adm_login;
    global $pro_mysql_subdomain_table;
    setZoneToGenerate($id);
    $adm_path = getAdminPath($adm_login);
    $doms = explode("/", $_REQUEST["addrlink"]);
    $domain = $doms[0];
    $q = "SELECT * FROM {$pro_mysql_subdomain_table} WHERE id='{$id}';";
    $r = mysql_query($q) or die("Cannot query \"{$q}\" line " . __LINE__ . " file " . __FILE__ . " sql said: " . mysql_error());
    $n = mysql_num_rows($r);
    if ($n != 1) {
        echo "<font color=\"red\">" . _("Could not found subdomain in table for folder deletion") . "</font>";
    } else {
        $a = mysql_fetch_array($r);
        $subdom_name = $a["subdomain_name"];
        $subdomain_dirpath = $adm_path . "/" . $domain . "/subdomains/{$subdom_name}";
        system("rm -rf {$subdomain_dirpath}");
    }
    updateUsingCron("gen_vhosts='yes',restart_apache='yes',gen_named='yes',reload_named ='yes',gen_backup='yes'");
}
function do_package_install()
{
    global $package_installer_console;
    global $edit_domain;
    global $adm_login;
    global $pkg_info;
    global $dtcpkg_db_login;
    $package_installer_console .= "=> Starting phpSurveyor Installer <br>";
    $admin_path = getAdminPath($adm_login);
    $vhost_path = $admin_path . "/" . $edit_domain . "/subdomains/" . $_REQUEST["subdomain"] . "/html";
    $hostname = $_REQUEST["subdomain"] . "." . $edit_domain;
    $vhost_url = "http://{$hostname}/";
    $cmd = "mv " . $vhost_path . "/" . $pkg_info["directory"] . " " . $vhost_path . "/" . $_REQUEST["dtcpkg_directory"];
    $data = array();
    $data["lang"] = "english";
    $data["dbms"] = "mysql4";
    $data["upgrade"] = "0";
    $data["dbhost"] = "localhost";
    $data["dbname"] = $_REQUEST["database_name"];
    $data["dbuser"] = $dtcpkg_db_login;
    $data["dbpasswd"] = $_REQUEST["dtcpkg_db_pass"];
    $data["prefix"] = "svy_";
    $data["board_email"] = $_REQUEST["dtcpkg_email"];
    $data["server_name"] = $hostname;
    $data["server_port"] = "80";
    $data["admin_name"] = $_REQUEST["dtcpkg_login"];
    $data["admin_pass1"] = $_REQUEST["dtcpkg_pass"];
    $data["admin_pass2"] = $_REQUEST["dtcpkg_pass"];
    $data["install_step"] = "1";
    $data["cur_lang"] = "english";
    $url = $vhost_url . $_REQUEST["dtcpkg_directory"] . "/" . $pkg_info["post_script_url"];
    //  print_r($data);
    $package_installer_console .= "=> Calling {$url}<br>";
    $ret = HTTP_Post($url, $data, $url);
    $weblines = explode("\n", $ret);
    // HTTP/1.1 200 OK
    $package_installer_console .= "=> Script returns: " . $weblines[0];
    return 0;
    // Ok, no problem ! :)
}
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}");
}
Пример #7
0
function list_options()
{
    global $edit_domain;
    global $adm_login;
    global $conf_use_advanced_lists_tunables;
    $admin_path = getAdminPath($adm_login);
    $list_path = $admin_path . "/" . $edit_domain . "/lists/" . $edit_domain . "_" . $_REQUEST["edit_mailbox"];
    $output = "";
    $output .= "<tr><td colspan=\"2\"><b>" . _("Rights") . "</b></td></tr>";
    $output .= getListOptionsBoolean($list_path, "subonlypost", _("Subscribers only post:"));
    $output .= getListOptionsBoolean($list_path, "closedlist", _("Closed list:"));
    $output .= getListOptionsList($list_path, "owner", _("Owner:"));
    $output .= getListOptionsBoolean($list_path, "moderated", _("Moderated:"));
    $output .= getListOptionsList($list_path, "moderators", _("Moderators:"));
    $output .= getListOptionsBoolean($list_path, "nosubconfirm", _("No subscribtion confirmation:"));
    $output .= "<tr><td colspan=\"2\"><b>" . _("Header") . "</b></td></tr>";
    $output .= getListOptionsValue($list_path, "prefix", _("Subject prefix:"));
    $output .= getListOptionsList($list_path, "delheaders", _("Delete headers:"));
    $output .= getListOptionsBoolean($list_path, "addtohdr", _("Add To: header:"));
    $output .= getListOptionsBoolean($list_path, "tocc", _("To: or Cc: not mandatory:"));
    $output .= getListOptionsTextarea($list_path, "customheaders", _("Custom headers:"));
    $output .= getListOptionsTextarea($list_path, "footer", _("Added footer:"));
    $output .= "<tr><td colspan=\"2\"><b>" . _("Archive") . "</b></td></tr>";
    $output .= getListOptionsBoolean($list_path, "noarchive", _("No archives:"));
    $output .= getListOptionsBoolean($list_path, "noget", _("No get-N function:"));
    $output .= getListOptionsBoolean($list_path, "subonlyget", _("get-N function only for subscribers:"));
    $output .= "<tr><td colspan=\"2\"><b>" . _("Digest") . "</b></td></tr>";
    $output .= getListOptionsValue($list_path, "digestinterval", _("Digest interval:"));
    $output .= getListOptionsValue($list_path, "digestmaxmails", _("Digest max mails:"));
    $output .= "<tr><td colspan=\"2\"><b>" . _("Notifications") . "</b></td></tr>";
    $output .= getListOptionsBoolean($list_path, "notifysub", _("Notify new subscribtions:"));
    $output .= getListOptionsBoolean($list_path, "nosubonlydenymails", _("Notify when post and not subscribed:"));
    $output .= getListOptionsBoolean($list_path, "notoccdenymails", _("Deny if no To: or Cc::"));
    $output .= getListOptionsBoolean($list_path, "noaccessdenymails", _("Notify when post and no access:"));
    $output .= "<tr><td colspan=\"2\"><b>" . _("SMTP configuration") . "</b></td></tr>";
    $output .= getListOptionsValue($list_path, "memorymailsize", _("Max mail memory size:"));
    if ($conf_use_advanced_lists_tunables == "yes") {
        $output .= getListOptionsValue($list_path, "relayhost", _("SMTP relay server:"));
        $output .= getListOptionsValue($list_path, "verp", _("VERP:"));
        $output .= getListOptionsValue($list_path, "maxverprecips", _("Max VERP recipients:"));
        $output .= getListOptionsValue($list_path, "delimiter", _("Delimiter:"));
        $output .= getListOptionsValue($list_path, "bouncelife", _("Bounce life:"));
        $output .= getListOptionsTextarea($list_path, "access", _("Access list:"));
    }
    $output .= "<tr><td colspan=\"2\"><b>" . _("Subscribe/Unsubscribe an email address") . "</b></td></tr>";
    $output .= "<tr><td onmouseover=\"Tip('" . _("Insert here an email address to subscribe it.") . "',STICKY,true,CLICKCLOSE,true,FADEIN,600)\" valign=\"top\" align=\"right\">" . _("Subscribe:") . "</td>\n    <td><input size=\"40\" type=\"text\" value=\"\" name=\"sub\"></td></tr>";
    $output .= "<tr><td onmouseover=\"Tip('" . _("Insert here an email address to unsubscribe it.") . "',STICKY,true,CLICKCLOSE,true,FADEIN,600)\" valign=\"top\" align=\"right\">" . _("Unsubscribe:") . "</td>\n    <td><input size=\"40\" type=\"text\" value=\"\" name=\"unsub\"></td></tr>";
    $output .= "<tr><td colspan=\"2\"><b>" . _("Web archive") . "</b></td></tr>";
    $output .= getListOptionsWABoolean("webarchive", _("Enable webarchive:"));
    $output .= getListOptionsWATextarea($list_path, "rcfile", _("Own template:"));
    $output .= getListOptionsWABooleanActions("recreatewa", _("Recreate:"));
    $output .= getListOptionsWABooleanActions("deletewa", _("Delete:"));
    $output .= getListOptionsWABoolean("spammode", _("Anti-spam mode:"));
    return $output;
}
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);
}
Пример #9
0
function emailAccountsCreateCallback($id)
{
    global $pro_mysql_pop_table;
    global $pro_mysql_list_table;
    global $conf_dtc_system_uid;
    global $conf_dtc_system_gid;
    global $adm_login;
    global $edit_domain;
    global $cyrus_used;
    global $pro_mysql_mailaliasgroup_table;
    global $CYRUS;
    $q = "SELECT * FROM {$pro_mysql_pop_table} WHERE autoinc='{$id}';";
    $r = mysql_query($q) or die("Cannot query {$q} line: " . __LINE__ . " file " . __FILE__ . " sql said:" . mysql_error());
    $n = mysql_num_rows($r);
    if ($n != 1) {
        die("Cannot find created email line " . __LINE__ . " file " . __FILE__);
    }
    $a = mysql_fetch_array($r);
    $test_query = "SELECT * FROM {$pro_mysql_list_table} WHERE name='" . $a["id"] . "' AND domain='{$edit_domain}'";
    $test_result = mysql_query($test_query) or die("Cannot execute query \"{$test_query}\" line " . __LINE__ . " file " . __FILE__ . " sql said " . mysql_error());
    $testnum_rows = mysql_num_rows($test_result);
    if ($testnum_rows >= 1) {
        $q = "DELETE FROM {$pro_mysql_pop_table} WHERE autoinc='{$id}';";
        $r = mysql_query($q) or die("Cannot query {$q} line: " . __LINE__ . " file " . __FILE__ . " sql said:" . mysql_error());
        return "<font color=\"red\">" . _("Error: a mailing list already exists with this name!") . "</font>";
    }
    $test_query = "SELECT * FROM {$pro_mysql_mailaliasgroup_table} WHERE id='" . $a["id"] . "' AND domain_parent='{$edit_domain}'";
    $test_result = mysql_query($test_query) or die("Cannot execute query \"{$test_query}\" line " . __LINE__ . " file " . __FILE__ . " sql said " . mysql_error());
    $testnum_rows = mysql_num_rows($test_result);
    if ($testnum_rows >= 1) {
        $q = "DELETE FROM {$pro_mysql_pop_table} WHERE autoinc='{$id}';";
        $r = mysql_query($q) or die("Cannot query {$q} line: " . __LINE__ . " file " . __FILE__ . " sql said:" . mysql_error());
        return "<font color=\"red\">" . _("Error: Email group alias already exists with this name!") . "</font><br />";
    }
    $crypted_pass = crypt($a["passwd"], dtc_makesalt());
    if (!$cyrus_used) {
        writeDotQmailFile($a["id"], $a["mbox_host"]);
    }
    $admin_path = getAdminPath($adm_login);
    $box_path = "{$admin_path}/{$edit_domain}/Mailboxs/" . $a["id"];
    $q = "UPDATE {$pro_mysql_pop_table} SET crypt='{$crypted_pass}',home='{$box_path}',uid='{$conf_dtc_system_uid}',gid='{$conf_dtc_system_gid}',fullemail='" . $a["id"] . '@' . $a["mbox_host"] . "',quota_couriermaildrop=CONCAT(1024000*quota_size,'S,',quota_files,'C') WHERE autoinc='{$id}';";
    $r2 = mysql_query($q) or die("Cannot query {$q} line: " . __LINE__ . " file " . __FILE__ . " sql said:" . mysql_error());
    triggerMXListUpdate();
    if ($cyrus_used) {
        # login to cyradm
        $cyr_conn = new cyradm();
        $error = $cyr_conn->imap_login();
        if ($error != 0) {
            die("imap_login Error {$error}");
        }
        $result = $cyr_conn->createmb("user/" . $a["id"] . "@" . $edit_domain);
        $result = $cyr_conn->createmb("user/" . $a["id"] . "/" . $a["spam_mailbox"] . "@" . $edit_domain);
        $result = $cyr_conn->setacl("user/" . $a["id"] . "@" . $edit_domain, $CYRUS['ADMIN'], "lrswipcda");
        $result = $cyr_conn->setmbquota("user/" . $a["id"] . "@" . $edit_domain, $a["quota_size"]);
    }
    updateUsingCron("gen_qmail='yes', qmail_newu='yes'");
    return "";
}
function do_package_install()
{
    global $package_installer_console;
    global $edit_domain;
    global $adm_login;
    global $pkg_info;
    global $dtcpkg_db_login;
    $package_installer_console .= "=> Installer Preparing Configuration for WordPress 2.5.1<br>";
    $admin_path = getAdminPath($adm_login);
    $vhost_path = $admin_path . "/" . $edit_domain . "/subdomains/" . $_REQUEST["subdomain"] . "/html";
    $hostname = $_REQUEST["subdomain"] . "." . $edit_domain;
    $vhost_url = "http://{$hostname}/";
    $cmd = "mv " . $vhost_path . "/" . $pkg_info["directory"] . " " . $vhost_path . "/" . $_REQUEST["dtcpkg_directory"];
    $data = array();
    $data["lang"] = "english";
    $data["dbms"] = "mysql4";
    $data["upgrade"] = "0";
    $data["dbhost"] = "localhost";
    $data["dbname"] = $_REQUEST["database_name"];
    $data["dbuser"] = $dtcpkg_db_login;
    $data["dbpasswd"] = $_REQUEST["dtcpkg_db_pass"];
    $data["prefix"] = "wordpress_";
    $data["server_name"] = $hostname;
    $data["server_port"] = "80";
    $data["admin_name"] = $_REQUEST["dtcpkg_login"];
    $data["admin_pass1"] = $_REQUEST["dtcpkg_pass"];
    $data["admin_pass2"] = $_REQUEST["dtcpkg_pass"];
    $data["install_step"] = "1";
    $data["cur_lang"] = "english";
    //Prepare WordPress Configuration
    function keygen($length)
    {
        $key = '';
        for ($i = 0; $i < $length; $i++) {
            $key .= chr(rand(40, 127));
        }
        return $key;
    }
    $wpconfig = array();
    $wpconfig["gophp"] = "<?php";
    $wpconfig["dbname"] = "define('DB_NAME','" . $data["dbname"] . "');";
    $wpconfig["dbuser"] = "******" . $data["dbuser"] . "');";
    $wpconfig["dbpasswd"] = "define('DB_PASSWORD','" . $data["dbpasswd"] . "');";
    $wpconfig["dbhost"] = "define('DB_HOST','localhost');";
    $wpconfig["dbcharset"] = "define('DB_CHARSET','utf8');";
    $wpconfig["dbcollate"] = "define('DB_COLLATE','');";
    $wpconfig["seckey"] = "define('SECRET_KEY','" . keygen(25) . "');";
    $wpconfig["tblpfx"] = "\$" . "table_prefix = 'wp_';";
    $wpconfig["wplang"] = "define('WPLANG','');";
    $wpconfig["abspath"] = "define('ABSPATH',dirname(__FILE__).'/');";
    $wpconfig["req_once"] = "require_once(ABSPATH.'wp-settings.php');";
    $wpconfig["nophp"] = "?>";
    $wpconf_str = implode("\n", $wpconfig);
    //Write WordPress Config File
    if (!file_put_contents($vhost_path . "/" . $_REQUEST["dtcpkg_directory"] . "/wp-config.php", $wpconf_str)) {
        $package_installer_console .= "=> Error Writing WordPress Configuration 'wp-config.php'<br>";
    } else {
        $package_installer_console .= "=> WordPress Configuration 'wp-config.php' written<br>";
    }
    //Set url for post install script, currently not used,
    //but returns HTTP/1.1 200 OK on WordPress install success.
    $url = $vhost_url . $_REQUEST["dtcpkg_directory"] . "/" . $pkg_info["post_script_url"];
    //  print_r($data);
    $package_installer_console .= "=> Calling {$url}<br>";
    $ret = HTTP_Post($url, $data, $url);
    $weblines = explode("\n", $ret);
    // HTTP/1.1 200 OK
    $package_installer_console .= "=> Script returns: " . $weblines[0] . "\n\n";
    $package_installer_console .= "WordPress will ask for a blog name and admin email address the first time you run it.\n\n  WordPress will then show your admin login and password.  Write it down to avoid trouble!\n\n";
    return 0;
    // Ok, no problem ! :)
}
Пример #11
0
function drawTicketConfig()
{
    global $pro_mysql_tik_admins_table;
    global $pro_mysql_tik_cats_table;
    global $pro_mysql_domain_table;
    global $rub;
    global $sousrub;
    global $conf_all_customers_list_domain;
    global $conf_all_customers_list_email;
    global $pro_mysql_list_table;
    global $pro_mysql_domain_table;
    global $pro_mysql_client_table;
    $out = "";
    $domains = array();
    $domains[] = "default";
    $q = "SELECT name FROM {$pro_mysql_domain_table};";
    $r = mysql_query($q) or die("Cannot query {$q} line " . __LINE__ . " file " . __FILE__ . " mysql said " . mysql_error());
    $n = mysql_num_rows($r);
    for ($i = 0; $i < $n; $i++) {
        $a = mysql_fetch_array($r);
        $domains[] = $a["name"];
    }
    $all_lists = array();
    $domains[] = _("no list selected");
    $q = "SELECT * FROM {$pro_mysql_list_table} WHERE domain='{$conf_all_customers_list_domain}';";
    $r = mysql_query($q) or die("Cannot query {$q} line " . __LINE__ . " file " . __FILE__ . " mysql said " . mysql_error());
    $n = mysql_num_rows($r);
    for ($i = 0; $i < $n; $i++) {
        $a = mysql_fetch_array($r);
        $all_lists[] = $a["name"];
    }
    $dsc = array("title" => _("Mailing list for sending email to all customers"), "action" => "tik_global_param_list", "forward" => array("rub", "sousrub"), "cols" => array("all_customers_list_email" => array("legend" => _("All customers list address: "), "type" => "popup", "values" => $all_lists), "all_customers_list_domain" => array("legend" => "@", "type" => "popup", "values" => $domains)));
    $out .= configEditorTemplate($dsc);
    if (isset($_REQUEST["action"]) && $_REQUEST["action"] == "resubscript_all_users") {
        $q = "SELECT owner FROM {$pro_mysql_domain_table} WHERE name='{$conf_all_customers_list_domain}';";
        $r = mysql_query($q) or die("Cannot query {$q} line " . __LINE__ . " file " . __FILE__ . " sql said: " . mysql_error());
        $n = mysql_num_rows($r);
        if ($n != 1) {
            die("No domain by this name: {$conf_all_customers_list_domain} line " . __LINE__ . " file " . __FILE__);
        }
        $a = mysql_fetch_array($r);
        $admpath = getAdminPath($a["owner"]);
        $subs_path = $admpath . "/{$conf_all_customers_list_domain}/lists/" . $conf_all_customers_list_domain . "_" . $conf_all_customers_list_email . "/subscribers.d";
        if (!is_dir($subs_path)) {
            $out .= "<font color=\"red\">" . _("Could not find the folder") . " " . $subs_path . " " . _("when resubscribing all users.") . "</font>";
        } else {
            // First we list all files in the subscriber.d folder
            $file_list = array();
            if ($dh = opendir($subs_path)) {
                while (($file = readdir($dh)) !== false) {
                    $fullpath = $subs_path . "/" . $file;
                    if (filetype($fullpath) != "dir") {
                        $file_list[] = $fullpath;
                    }
                }
            }
            // Then we delete them all
            $n = sizeof($file_list);
            for ($i = 0; $i < $n; $i++) {
                unlink($file_list[$i]);
            }
            // Then we get a list of all the users and we subscribe them
            $old_file = "";
            $addr_list = "";
            $q = "SELECT DISTINCT email FROM {$pro_mysql_client_table} ORDER BY email";
            $r = mysql_query($q) or die("Cannot query {$q} line " . __LINE__ . " file " . __FILE__ . " sql said: " . mysql_error());
            $n = mysql_num_rows($r);
            for ($i = 0; $i < $n; $i++) {
                $a = mysql_fetch_array($r);
                $fname = strtolower(substr($a["email"], 0, 1));
                if ($fname == $old_file || $old_file == "") {
                    $addr_list .= $a["email"] . "\n";
                } else {
                    $fullpath = $subs_path . "/" . $old_file;
                    $fp = fopen($fullpath, "w+");
                    fwrite($fp, $addr_list);
                    fclose($fp);
                    $addr_list = $a["email"] . "\n";
                }
                $old_file = $fname;
            }
            if ($n > 0) {
                $fullpath = $subs_path . "/" . substr($a["email"], 0, 1);
                $fp = fopen($fullpath, "w+");
                fwrite($fp, $addr_list);
                fclose($fp);
            }
        }
    }
    $out .= "<form action=\"" . $_SERVER["PHP_SELF"] . "\">\n<input type=\"hidden\" name=\"rub\" value=\"{$rub}\">\n<input type=\"hidden\" name=\"sousrub\" value=\"" . $_REQUEST["sousrub"] . "\">\n<input type=\"hidden\" name=\"action\" value=\"resubscript_all_users\">\n<div class=\"input_btn_container\" onMouseOver=\"this.className='input_btn_container-hover';\" onMouseOut=\"this.className='input_btn_container';\">\n<div class=\"input_btn_left\"></div>\n<div class=\"input_btn_mid\"><input class=\"input_btn\" type=\"submit\" value=\"" . _("Resubscribe all users") . "\"></div>\n<div class=\"input_btn_right\"></div></div></form><br><br>\n" . _("Note that you should always click on the above button to resubscribe all of your users before sending an email to the list") . "<br>\n";
    $out .= "<h3>" . _("Support ticket configuration") . "</h3>";
    $dsc = array("title" => _("Ticket global parameters"), "action" => "tik_global_param", "forward" => array("rub", "sousrub"), "cols" => array("support_ticket_email" => array("legend" => _("Support ticket email address: "), "type" => "text", "size" => "32"), "support_ticket_fw_email" => array("legend" => _("Support ticket forward email address:"), "type" => "text", "size" => "32"), "support_ticket_domain" => array("legend" => "@", "type" => "popup", "values" => $domains)));
    $out .= configEditorTemplate($dsc);
    $dsc = array("table_name" => $pro_mysql_tik_admins_table, "title" => _("List of the administrators receiving request for support messages:"), "action" => "tik_admins", "forward" => array("rub", "sousrub"), "cols" => array("id" => array("type" => "id", "display" => "no", "legend" => "id"), "pseudo" => array("type" => "text", "legend" => _("Nick name")), "realname" => array("type" => "text", "legend" => _("Real name")), "email" => array("type" => "text", "legend" => _("Email addr")), "tikadm_pass" => array("type" => "password", "legend" => _("Password")), "available" => array("type" => "radio", "legend" => _("Available"), "values" => array("yes", "no"), "display_replace" => array(_("Yes"), _("No")))));
    $out .= dtcDatagrid($dsc);
    $dsc = array("table_name" => $pro_mysql_tik_cats_table, "title" => _("Ticket categories:"), "action" => "tik_cats", "forward" => array("rub", "sousrub"), "cols" => array("id" => array("type" => "id", "display" => "no", "legend" => "id"), "catname" => array("type" => "text", "legend" => _("Category")), "catdescript" => array("type" => "text", "size" => "50", "legend" => _("Category description"))));
    $out .= dtcDatagrid($dsc);
    return $out;
}
Пример #12
0
function updateAllListWebArchive()
{
    global $pro_mysql_list_table;
    global $pro_mysql_domain_table;
    $query = "SELECT * FROM {$pro_mysql_list_table} WHERE webarchive='yes'";
    $result = mysql_query($query) or die("Cannot execute query \"{$query}\" line " . __LINE__ . " file " . __FILE__ . " sql said " . mysql_error());
    $number = mysql_num_rows($result);
    //	$row = mysql_fetch_array($result);
    echo "Update of {$number} webarchive:\n";
    for ($j = 0; $j < $number; $j++) {
        $row = mysql_fetch_array($result);
        $list_domain = $row["domain"];
        $list_name = $row["name"];
        $query2 = "SELECT owner FROM {$pro_mysql_domain_table} WHERE name='{$list_domain}' LIMIT 1";
        $result2 = mysql_query($query2) or die("Cannot execute query \"{$query2}\" line " . __LINE__ . " file " . __FILE__ . " sql said " . mysql_error());
        $row2 = mysql_fetch_array($result2);
        $list_admin = $row2["owner"];
        echo "...webarchive updating of {$list_name} on {$list_domain}\n";
        $admin_path = getAdminPath($list_admin);
        $list_dir = $admin_path . "/" . $list_domain . "/lists/" . $list_domain . "_" . $list_name;
        $web_path = $admin_path . "/" . $list_domain . "/subdomains/www/html/lists/" . $list_name;
        $archive_dir = $list_dir . "/archive";
        $list_rcfile = $list_dir . "/rcfile";
        if (file_exists($list_rcfile)) {
            $rcfile = " -rcfile " . $list_rcfile . " ";
        } else {
            $rcfile = " ";
        }
        if ($row["spammode"] == "yes") {
            $spammode = " -spammode ";
        } else {
            $spammode = " -nospammode ";
        }
        $updatewa = "mhonarc" . $rcfile . "-outdir " . $web_path . " -add " . $spammode . $archive_dir;
        exec($updatewa);
    }
}
Пример #13
0
function tunablesWABooleanActionsRequestCheck($list_dir)
{
    global $adm_login;
    global $pro_mysql_list_table;
    global $edit_domain;
    $name = $_REQUEST["edit_mailbox"];
    $admin_path = getAdminPath($adm_login);
    $this_list_web_path = $admin_path . "/" . $edit_domain . "/subdomains/www/html/lists/" . $name;
    $test_query = "SELECT webarchive FROM {$pro_mysql_list_table}\tWHERE domain='{$edit_domain}' AND name='{$name}' LIMIT 1";
    $test_result = mysql_query($test_query) or die("Cannot execute query \"{$test_query}\" line " . __LINE__ . " file " . __FILE__ . " sql said " . mysql_error());
    $test = mysql_fetch_array($test_result);
    if ($test[0] == "no") {
        if (isset($_REQUEST["deletewa"])) {
            if (file_exists($this_list_web_path)) {
                $delete_this_web_path = "rm -rf " . $this_list_web_path;
                exec($delete_this_web_path);
            }
        }
    }
    if ($test[0] == "yes") {
        if (isset($_REQUEST["recreatewa"])) {
            if (file_exists($this_list_web_path)) {
                $delete_this_web_path = "rm -rf " . $this_list_web_path;
                exec($delete_this_web_path);
            }
            if (!file_exists($this_list_web_path)) {
                $create_this_web_path = "mkdir " . $this_list_web_path;
                exec($create_this_web_path);
            }
            $this_list_rcfile = $list_dir . "/rcfile";
            if (file_exists($this_list_rcfile)) {
                $rcfile = " -rcfile " . $this_list_rcfile . " ";
            } else {
                $rcfile = " ";
            }
            $archive_dir = $list_dir . "/archive";
            $createwa = "mhonarc" . $rcfile . "-outdir " . $this_list_web_path . " " . $archive_dir;
            exec($createwa);
        }
    }
}
Пример #14
0
function drawAdminTools_PackageInstaller($domain, $adm_path)
{
    global $adm_login;
    global $adm_pass;
    global $edit_domain;
    global $addrlink;
    global $dtcshared_path;
    global $pro_mysql_subdomain_table;
    global $conf_mysql_db;
    global $conf_user_mysql_type;
    global $conf_user_mysql_host;
    global $conf_user_mysql_root_login;
    global $conf_user_mysql_root_pass;
    global $package_installer_console;
    global $dtcpkg_db_login;
    global $pkg_info;
    $txt = "";
    $dir = $dtcshared_path . "/package-installer";
    if (isset($_REQUEST["action"]) && ($_REQUEST["action"] == "do_install" || $_REQUEST["action"] == "prepareinstall")) {
        $pkg_path = $dir . "/" . $_REQUEST["pkg"];
        $dtc_pkg_info = $pkg_path . "/dtc-pkg-info.php";
        if (!file_exists($dtc_pkg_info)) {
            die("Package {$dtc_pkg_info} not found line " . __LINE__ . " file " . __FILE__);
        }
        include $dtc_pkg_info;
    }
    if (isset($_REQUEST["action"]) && $_REQUEST["action"] == "do_install") {
        $pkg_path = $dir . "/" . $_REQUEST["pkg"];
        $dtc_pkg_install = $pkg_path . "/dtc-pkg-install.php";
        if (file_exists($dtc_pkg_install)) {
            include $dtc_pkg_install;
        }
        // Check if user has enough rights
        checkLoginPassAndDomain($adm_login, $adm_pass, $edit_domain);
        checkSubdomainFormat($_REQUEST["subdomain"]);
        $admin_path = getAdminPath($adm_login);
        $target = "{$admin_path}/{$edit_domain}/subdomains/" . $_REQUEST["subdomain"] . "/html";
        if (!is_dir($target)) {
            die("Destination directory does not exists line " . __LINE__ . " file " . __FILE__);
        }
        // Unpack the distribution package in target folder
        if ($pkg_info["unpack_type"] == "tar.gz") {
            $cmd = "tar -C {$target} -xvzf {$pkg_path}/" . $pkg_info["file"];
            $x = "=> tar -C {$target} -xvzf {$pkg_path}/" . $pkg_info["file"] . "\n";
            exec($cmd, $exec_out, $return_val);
        } else {
            if ($pkg_info["unpack_type"] == "tar.bz2") {
                $cmd = "tar -C {$target} -xvjf {$pkg_path}/" . $pkg_info["file"];
                $x = "=> tar -xvjf " . $pkg_info["file"] . "\n";
                exec($cmd, $exec_out, $return_val);
            } else {
                die("Package methode not supported yet");
            }
        }
        // Rename folder to the destination folder name (eg remove version out of package.X.X.X folder name if exists)
        if (isset($pkg_info["renamedir_to"]) && isset($pkg_info["resulting_dir"]) && $pkg_info["resulting_dir"] != $pkg_info["renamedir_to"]) {
            $cmd = "mv {$target}/" . $pkg_info["resulting_dir"] . " {$target}/" . $pkg_info["renamedir_to"];
            $x .= "=> Moving " . $pkg_info["resulting_dir"] . " to " . $pkg_info["renamedir_to"] . "<br>";
            exec($cmd, $exec_out, $return_val);
        }
        // https://dtc.gpl-host.com/dtc/index.php?adm_login=zigo&adm_pass=toto&addrlink=gpl-host.com/package-installer&action=prepareinstall&pkg=phpbb
        // Move the folder to the requested name dtcpkg_directory=bla
        if ($pkg_info["can_select_directory"] == "yes") {
            if ($_REQUEST["dtcpkg_directory"] == "") {
                $cmd = "mv {$target}/" . $pkg_info["renamedir_to"] . "/* {$target}/";
                $x .= "=> Moving " . $pkg_info["renamedir_to"] . " to folder /<br>";
                exec($cmd, $exec_out, $return_val);
                $realtarget = "{$target}";
            } else {
                $cmd = "mv {$target}/" . $pkg_info["renamedir_to"] . " {$target}/" . $_REQUEST["dtcpkg_directory"];
                $x .= "=> Moving " . $pkg_info["renamedir_to"] . " to " . $_REQUEST["dtcpkg_directory"] . "<br>";
                exec($cmd, $exec_out, $return_val);
                $realtarget = "{$target}/" . $_REQUEST["dtcpkg_directory"];
            }
        }
        if ($conf_user_mysql_type == "distant") {
            $newid = mysql_connect($conf_user_mysql_host, $conf_user_mysql_root_login, $conf_user_mysql_root_pass) or die("Cannot connect to user host");
        }
        // Get the database infos beffore calling the custom package installer
        $q = "SELECT DISTINCT db.Db,db.User FROM mysql.user,mysql.db WHERE user.dtcowner='{$adm_login}' AND db.User=user.User AND db.Db='" . $_REQUEST["database_name"] . "';";
        $r = mysql_query($q) or die("Cannot query {$q} line " . __LINE__ . " file " . __FILE__ . " sql said: " . mysql_error());
        $n = mysql_num_rows($r);
        if ($n != 1) {
            die("Cannot find database line " . __LINE__ . " file " . __FILE__);
        }
        $a = mysql_fetch_array($r);
        $dtcpkg_db_login = $a["User"];
        if ($conf_user_mysql_type == "distant") {
            mysql_close($newid) or die("Cannot disconnect to user database");
            connect2base();
        }
        // Call the package specific installer php script
        $install_ret = do_package_install();
        // reselect the current dtc db in case another have been set
        mysql_select_db($conf_mysql_db);
        if ($install_ret == 0) {
            $package_installer_console .= "Install successful !<br>";
        }
        $nbr_remove = sizeof($pkg_info["remove_folder_path"]);
        if ($nbr_remove > 0) {
            //	print_r($pkg_info["remove_folder_path"]);
            $nbr_remove = sizeof($pkg_info["remove_folder_path"]);
            $package_installer_console .= "Removing install folders...<br>";
            for ($i = 0; $i < $nbr_remove; $i++) {
                $cmd = "rm -r {$realtarget}/" . $pkg_info["remove_folder_path"][$i];
                //	$package_installer_console .= $cmd."<br>";
                exec($cmd, $exec_out, $return_val);
            }
        }
        // Print the results
        $txt .= "<h3>Installation of " . $pkg_info["name"] . ":</h3><br><pre>" . $x . $package_installer_console . "</pre>";
        return $txt;
    }
    if (isset($_REQUEST["action"]) && $_REQUEST["action"] == "prepareinstall") {
        $txt = "<h3>You are about to install " . $pkg_info["name"] . ":</h3><br>\n\t\t<u>Description:</u> " . $pkg_info["long_desc"] . "<br>\n\t\t<u>Version:</u> " . $pkg_info["version"] . "<br><br>";
        $txt .= "<form action=\"" . $_SERVER["PHP_SELF"] . "\">\n\t\t<input type=\"hidden\" name=\"adm_login\" value=\"{$adm_login}\">\n\t\t<input type=\"hidden\" name=\"adm_pass\" value=\"{$adm_pass}\">\n\t\t<input type=\"hidden\" name=\"addrlink\" value=\"{$addrlink}\">";
        if ($pkg_info["need_database"] == "yes") {
            $txt .= "<h3>Choose a database name for setup:</h3><br>";
            if ($conf_user_mysql_type == "distant") {
                $newid = mysql_connect($conf_user_mysql_host, $conf_user_mysql_root_login, $conf_user_mysql_root_pass) or die("Cannot connect to user SQL host");
            }
            mysql_select_db("mysql") or die("Cannot select db: mysql");
            $q = "SELECT db.Db,db.User FROM user,db\n\t\t\tWHERE user.dtcowner='{$adm_login}'\n\t\t\tAND db.User=user.User";
            $r = mysql_query($q) or die("Cannot query {$q} line " . __LINE__ . " file " . __FILE__ . " sql said: " . mysql_error());
            $n = mysql_num_rows($r);
            if ($n < 1) {
                $txt .= "You don't have any database yet. Please create one using the database tool\n\t\t\t\t(click database in the menu, then create a user and a database for this user).";
                if ($conf_user_mysql_type == "distant") {
                    mysql_close($newid) or die("Cannot disconnect to user database");
                    connect2base();
                }
                mysql_select_db($conf_mysql_db);
                return $txt;
            }
            $txt .= "Database name: <select name=\"database_name\">";
            for ($i = 0; $i < $n; $i++) {
                $a = mysql_fetch_array($r);
                $txt .= "<option value=\"" . $a["Db"] . "\">" . $a["Db"] . " (login: "******"User"] . ")" . "</option>";
            }
            $txt .= "</select><br>\n\t\t\t\tDatabase password: <input type=\"password\" name=\"dtcpkg_db_pass\" value=\"\"><br><br>";
            if ($conf_user_mysql_type == "distant") {
                mysql_close($newid) or die("Cannot disconnect to user database");
                connect2base();
            }
            mysql_select_db($conf_mysql_db) or die("Cannot select db: {$conf_mysql_db} line " . __LINE__ . " file " . __FILE__);
        }
        if ($pkg_info["need_admin_email"] == "yes") {
            $txt .= "<h3>Enter email for the admin of this package:</h3><br>";
            $txt .= "Email: <input type=\"text\" name=\"dtcpkg_email\" value=\"\"><br><br>";
        }
        if ($pkg_info["need_admin_login"] == "yes") {
            $txt .= "<h3>Enter login informations for the admin of this package:</h3><br>";
            $txt .= "Login: <input type=\"text\" name=\"dtcpkg_login\" value=\"\"><br>";
            if ($pkg_info["need_admin_pass"] == "yes") {
                $txt .= "Pass: <input type=\"text\" name=\"dtcpkg_pass\" value=\"\"><br>";
            }
            $txt .= "<br>";
        }
        $txt .= "<h3>Choose the subdomain and install :</h3><br>";
        $txt .= "<input type=\"hidden\" name=\"action\" value=\"do_install\">\n\t\t<input type=\"hidden\" name=\"pkg\" value=\"" . $_REQUEST["pkg"] . "\">\n\t\tSubdomain: <select name=\"subdomain\">";
        //		echo "<pre>";
        //		print_r($domain);
        //		echo "</pre>";
        $n = sizeof($domain["subdomains"]);
        for ($i = 0; $i < $n; $i++) {
            $txt .= "<option value=\"" . $domain["subdomains"][$i]["name"] . "\">" . $domain["subdomains"][$i]["name"] . "</option>";
        }
        $txt .= "</select><br><br>";
        if ($pkg_info["can_select_directory"] == "yes") {
            $txt .= "<h3>Enter the directory where you want to install this package:</h3><br>";
            $txt .= "Directory (blank for /): <input type=\"text\" name=\"dtcpkg_directory\" value=\"\"><br><br>";
        }
        $txt .= "<input type=\"submit\" value=\"Install\">";
        $txt .= "</form>";
        return $txt;
    }
    $txt = "<h3>" . _("Choose a package to install") . ":</h3>";
    $txt .= "<table cellspacing=\"0\" cellpadding=\"4\" border=\"1\">";
    $txt .= "<tr><td>" . _("Package name") . "</td><td>" . _("Description") . "</td><td>" . _("Package version") . "</td><td>" . _("Need a database") . "</td><td>" . _("Unpack size") . "</td><td>" . _("Install") . "</td></tr>";
    $packages = array();
    if (is_dir($dir) && ($dh = opendir($dir))) {
        while (($file = readdir($dh)) !== false) {
            if (is_dir($dir . "/" . $file) && $file != "." && $file != "..") {
                $packages[] = $file;
            }
        }
        closedir($dh);
    }
    sort($packages);
    foreach ($packages as $package) {
        if (file_exists($dir . "/" . $package . "/dtc-pkg-info.php")) {
            include $dir . "/" . $package . "/dtc-pkg-info.php";
            $txt .= "<tr><td>" . $pkg_info["name"] . "</td>\n\t\t\t\t<td>" . $pkg_info["short_desc"] . "</td>\n\t\t\t\t<td>" . $pkg_info["version"] . "</td>\n\t\t\t\t<td>" . $pkg_info["need_database"] . "</td>\n\t\t\t\t<td style=\"white-space:nowrap;text-align=right\" nowrap>" . smartByte($pkg_info["unpack_disk_usage"]) . "</td>\n\t\t\t\t<td><a href=\"" . $_SERVER["PHP_SELF"] . "?adm_login={$adm_login}&adm_pass={$adm_pass}&addrlink={$addrlink}&action=prepareinstall&pkg={$package}\">" . _("Install") . "</a></td></tr>";
        }
    }
    $txt .= "</table>";
    return $txt;
}
function do_package_install()
{
    global $package_installer_console;
    global $edit_domain;
    global $adm_login;
    global $pkg_info;
    global $dtcpkg_db_login;
    $package_installer_console .= "=> Starting Drupal Installer for Drupal 5.1<br />";
    $admin_path = getAdminPath($adm_login);
    $vhost_path = $admin_path . "/" . $edit_domain . "/subdomains/" . $_REQUEST["subdomain"] . "/html";
    $hostname = $_REQUEST["subdomain"] . "." . $edit_domain;
    $vhost_url = "http://{$hostname}/";
    $cmd = "mv " . $vhost_path . "/" . $pkg_info["directory"] . " " . $vhost_path . "/" . $_REQUEST["dtcpkg_directory"];
    //inserting the database dump
    $mysql_ver = mysql_get_server_info();
    //i must add different db schemas for different mysql version
    $package_installer_console .= "=> Inserting the Drupal 5.1 database schemas for you MySQL: " . $mysql_ver . "<br />";
    if (ereg('^4.0', $mysql_ver)) {
        $db_driver = 'mysql';
    } else {
        $db_driver = 'mysqli';
    }
    //update the drupal config file
    $package_installer_console .= "=> Changing Drupal Drupal 5.1 configuration file...<br />";
    if ($_REQUEST["dtcpkg_directory"] == "") {
        $dest_dir = $vhost_path;
    } else {
        $dest_dir = $vhost_path . "/" . $_REQUEST["dtcpkg_directory"];
    }
    $fname = $dest_dir . "/sites/default/settings.php";
    $ar = file($fname);
    for ($k = 0; $k < count($ar); $k++) {
        if (ereg('^\\$db_url.+', $ar[$k])) {
            $ar[$k] = '$db_url = \'' . $db_driver . '://' . $dtcpkg_db_login . ':' . $_REQUEST["dtcpkg_db_pass"] . '@localhost/' . $_REQUEST["database_name"] . "';\n";
        }
    }
    $fp = fopen($fname, "w");
    if ($fp == FALSE) {
        $package_installer_console .= "<font color=\"red\">Cannot open Drupal config file!</font><br />";
        return 1;
    }
    fwrite($fp, join("", $ar));
    fclose($fp);
    if ($_REQUEST["dtcpkg_directory"] == "") {
        $dest_dir = $vhost_url;
    } else {
        $dest_dir = $vhost_url . $_REQUEST["dtcpkg_directory"];
    }
    $data = array();
    $data['profile'] = 'default';
    $url = $dest_dir . "/" . $pkg_info["install_script_url"];
    $package_installer_console .= "=> Calling {$url}<br />";
    $ret = HTTP_Get($url, $data, $url);
    if (is_numeric(strpos($ret, "Drupal already installed"))) {
        $package_installer_console .= "=> Warning: Drupal database tables already exist!<br />";
        $package_installer_console .= "=> (You must manually drop the tables if desired.)<br />";
    } elseif (!is_numeric(strpos($ret, 'Congratulations, Drupal has been successfully installed.'))) {
        $package_installer_console .= "=> Installation Failed! Check your parameters.<br />";
        $package_installer_console .= $ret;
        return 1;
    }
    $package_installer_console .= "=> Installation Success.<br />";
    $package_installer_console .= "=> You need to go to <a href=\"" . $dest_dir . "\" target=\"blank\">your new Drupal site</a> to create the first account and complete the setup!<br />";
    return 0;
    // Ok, no problem ! :)
}
function do_package_install()
{
    global $package_installer_console;
    global $edit_domain;
    global $adm_login;
    global $pkg_info;
    global $dtcpkg_db_login;
    global $conf_mysql_db;
    $package_installer_console .= "=> Starting phpBB Installer for PHPBB 2.0.17<br>";
    $admin_path = getAdminPath($adm_login);
    $vhost_path = $admin_path . "/" . $edit_domain . "/subdomains/" . $_REQUEST["subdomain"] . "/html";
    $hostname = $_REQUEST["subdomain"] . "." . $edit_domain;
    $vhost_url = "http://{$hostname}/";
    if ($_REQUEST["dtcpkg_directory"] == "") {
        $dest_dir = $vhost_path;
    } else {
        $dest_dir = $vhost_path . "/" . $_REQUEST["dtcpkg_directory"];
    }
    $config_php_file = '<?php
$dbhost = "localhost";
$dbuname = "' . $dtcpkg_db_login . '";
$dbpass = "******"dtcpkg_db_pass"] . '";
$dbname = "' . $_REQUEST["database_name"] . '";
$prefix = "nuke";
$user_prefix = "nuke";
$dbtype = "MySQL";
$sitekey = "S·kQSd5%W@Y62-dm29-.-39.3a8sUf+W9";
$gfx_chk = 0;
$subscription_url = "";
$admin_file = "admin";
$advanced_editor = 0;
$reasons = array("As Is","Offtopic","Flamebait","Troll","Redundant","Insighful","Interesting","Informative","Funny","Overrated","Underrated");
$badreasons = 4;
$AllowableHTML = array("b"=>1,"i"=>1,"u"=>1,"div"=>2,"a"=>2,"em"=>1,"br"=>1,"strong"=>1,"blockquote"=>1,"tt"=>1,"li"=>1,"ol"=>1,"ul"=>1);
$CensorList = array("f**k","c**t","f****r","f*****g","pussy","c**k","c0ck","cum","twat","c**t","bitch","fuk","fuking","m**********r");
$tipath = "images/topics/";
$commercial_license = 0;
if (eregi("config.php",$_SERVER[\'PHP_SELF\'])) {
Header("Location: index.php");
die();
}
?>';
    $fp = fopen($dest_dir . "/config.php", "w+");
    if ($fp == FALSE) {
        $package_installer_console .= "<font color=\"red\">Cannot open config file!</font><br>";
        return 1;
    }
    fwrite($fp, $config_php_file);
    fclose($fp);
    $file = $dest_dir . "/nuke.sql";
    $cmd = "mysql -u{$dtcpkg_db_login} -D" . $_REQUEST["database_name"] . " -p" . $_REQUEST["dtcpkg_db_pass"] . " <{$file}";
    exec($cmd, $exec_out2, $return_val);
    $n = sizeof($exec_out2);
    $exec_out = "";
    for ($i = 0; $i < $n; $i++) {
        $exec_out .= $exec_out2[$i] . "\n";
    }
    $package_installer_console .= "<pre>{$exec_out}</pre>";
    /*
      echo $file;
      $fp = fopen($file,"r");
      $sql_init_script = fread($fp,filesize ( $file ));
      fclose($fp);
    
      mysql_select_db($_REQUEST["database_name"])or die ("Cannot select db: ".$_REQUEST["database_name"]." line ".__LINE__." file ".__FILE__);
      $r = mysql_query($sql_init_script)or die("Cannot query $sql_init_script line ".__LINE__." file ".__FILE__." sql said ".mysql_error());
      mysql_select_db($conf_mysql_db)or die ("Cannot select db: $conf_mysql_db line ".__LINE__." file ".__FILE__);
    */
    /*
      $data["board_email"] = $_REQUEST["dtcpkg_email"];
      $data["admin_name"] = $_REQUEST["dtcpkg_login"];
      $data["admin_pass1"] = $_REQUEST["dtcpkg_pass"];
      $data["admin_pass2"] = $_REQUEST["dtcpkg_pass"];
      $url = $vhost_url.$_REQUEST["dtcpkg_directory"]."/".$pkg_info["post_script_url"];*/
    return 0;
    // Ok, no problem ! :)
}
Пример #17
0
    if ($_REQUEST["physical_setup"] == "yes") {
        $soap_client = connectToVPSServer($a["vps_server_hostname"]);
        if ($soap_client == false) {
            echo "Could not connect to the VPS server for doing the setup: please contact the administrator!";
        } else {
            $image_type = "lvm";
            if (isVPSNodeLVMEnabled($a["vps_server_hostname"]) == "no") {
                $image_type = "vbd";
            }
            $r = $soap_client->call("setupLVMDisks", array("vpsname" => $a["vps_xen_name"], "hddsize" => $prod["quota_disk"], "swapsize" => $prod["memory_size"], "imagetype" => $image_type), "", "", "");
        }
    }
}
// Import of domain config
if (isset($_REQUEST["action"]) && $_REQUEST["action"] == "import_domain") {
    $adm_path = getAdminPath($adm_login);
    $uploaded_file = basename($_FILES['domain_import_file']['name']);
    $uploaded_full_path = $adm_path . "/" . $uploaded_file;
    //	echo "Importing domain file: ".$_FILES["domain_import_file"]["name"]." for user $adm_login";
    move_uploaded_file($_FILES["domain_import_file"]["tmp_name"], $uploaded_full_path);
    domainImport($uploaded_full_path, $adm_login, $adm_pass);
    unlink($uploaded_full_path);
    // Tell the cron job to activate the changes
    $adm_query = "UPDATE {$pro_mysql_cronjob_table} SET qmail_newu='yes',restart_qmail='yes',reload_named='yes',\n\trestart_apache='yes',gen_vhosts='yes',gen_named='yes',gen_qmail='yes',gen_webalizer='yes',gen_backup='yes',gen_ssh='yes' WHERE 1;";
    mysql_query($adm_query);
    triggerDomainListUpdate();
}
///////////////////////////////////////////////////////////////
// Mark all named zone file for generation and serial update //
///////////////////////////////////////////////////////////////
if (isset($_REQUEST["reinit_named_zones"]) && $_REQUEST["reinit_named_zones"] == "1") {
function do_package_install()
{
    global $package_installer_console;
    global $edit_domain;
    global $adm_login;
    global $pkg_info;
    global $dtcpkg_db_login;
    global $joomla_lang;
    $package_installer_console .= "=> Starting Joomla Install for <br>";
    $admin_path = getAdminPath($adm_login);
    $vhost_path = $admin_path . "/" . $edit_domain . "/subdomains/" . $_REQUEST["subdomain"] . "/html";
    $hostname = $_REQUEST["subdomain"] . "." . $edit_domain;
    $vhost_url = "http://{$hostname}/";
    $cmd = "mv " . $vhost_path . "/" . $pkg_info["directory"] . " " . $vhost_path . "/" . $_REQUEST["dtcpkg_directory"];
    $url = $vhost_url . $_REQUEST["dtcpkg_directory"] . "/" . $pkg_info["post_script_url"];
    $pkg_url = $vhost_url . $_REQUEST["dtcpkg_directory"] . "/";
    $rootdir = $vhost_path . "/" . $_REQUEST["dtcpkg_directory"] . "/";
    $installer_url = $pkg_url . "installation/index.php";
    install_joomla($pkg_url, $_REQUEST["dtcpkg_email"], $_REQUEST["dtcpkg_pass"], $dtcpkg_db_login, $_REQUEST["dtcpkg_db_pass"], $_REQUEST["database_name"]);
    $package_installer_console .= "<script type='text/javascript'>alert('Congratulations! Installation complete - please see the messages below for more details');</script>";
    $package_installer_console .= "<br/><b>Your new system details are</b><br/>";
    $package_installer_console .= "Site address: <a href='{$pkg_url}' target='_blank'>{$pkg_url}</a> <br/>";
    $package_installer_console .= "Administrator Address: <a href='{$pkg_url}/administrator/'>{$pkg_url}/administrator/</a><br/>";
    $package_installer_console .= "Administrator Username: admin<br/>";
    $admin_passdisplay = $_REQUEST["dtcpkg_pass"];
    $package_installer_console .= "Administrator Password: {$admin_passdisplay} <br/>";
    $package_installer_console .= "Thank you for using the package installer!";
    return 0;
    // Ok, no problem ! :)
}
Пример #19
0
function domainImport($path_from, $adm_login, $adm_pass)
{
    global $pro_mysql_domain_table;
    global $pro_mysql_pop_table;
    global $pro_mysql_subdomain_table;
    global $pro_mysql_pop_table;
    global $pro_mysql_mailaliasgroup_table;
    global $pro_mysql_list_table;
    global $pro_mysql_ftp_table;
    global $pro_mysql_ssh_table;
    global $conf_dtc_system_uid;
    global $conf_dtc_system_gid;
    // Read the file
    $fp = fopen($path_from, "r+");
    $xml_content = fread($fp, filesize($path_from));
    fclose($fp);
    // Unserialize
    $options = array('tagMap' => array('util' => 'XML_Util'), 'classAttribute' => '_classname');
    $unserializer = new XML_Unserializer($options);
    $result = $unserializer->unserialize($xml_content);
    if (PEAR::isError($result)) {
        echo _("Method unserialize() failed, could not import your domain configuration: ") . $result->getMessage();
        return;
    }
    $dom_ar = $unserializer->getUnserializedData();
    if (PEAR::isError($dom_ar)) {
        echo _("Method getUnserializedData() failed, could not import your domain configuration: ") . $dom_ar->getMessage();
        return;
    }
    // Because of an issue of the programming of older versions of DTC,
    // if there was multiple domains in the XLM file, then we have things like this,
    // as PHP assotiative array, once Unserialize() is done:
    // <dtc-export-file version="0.1">
    //   <domains>
    //      <item>
    //         <example.com>
    //           ........
    //         </example.com>
    //      </item>
    //   </domains
    // </dtc-export-file>
    // the below code will remove the <item> thing that is on the way,
    // and quite annoying for using array_keys().
    if (isset($dom_ar["domains"]["item"])) {
        $nbr_domains = sizeof($dom_ar["domains"]["item"]);
        $my_domains = array();
        for ($doms = 0; $doms < $nbr_domains; $doms++) {
            $mykey = array_keys($dom_ar["domains"]["item"][$doms]);
            $my_domains["domains"][$mykey[0]] = $dom_ar["domains"]["item"][$doms][$mykey[0]];
        }
        $dom_ar = $my_domains;
        $all_domains = array_keys($dom_ar["domains"]);
    } else {
        $all_domains = array_keys($dom_ar["domains"]);
        $nbr_domains = sizeof($all_domains);
    }
    // Iterate on all domains of the file (if there's only one, it's fine too...)
    for ($doms = 0; $doms < $nbr_domains; $doms++) {
        // We will work on each domains one by one
        $dom_name = $all_domains[$doms];
        if ($dom_name == "" || $dom_name == "Array") {
            echo _("Domain name is empty in your export file: could not import domain number ") . $doms;
            return;
        }
        $console .= "Importing domain: {$dom_name}<br>";
        $cur_dom = $dom_ar["domains"][$dom_name];
        $dom_name = $cur_dom["domain_config"]["name"];
        // Check if the domain exists, if not, add it to the user
        $q = "SELECT * FROM {$pro_mysql_domain_table} WHERE name='{$dom_name}';";
        $r = mysql_query($q) or die("Cannot query {$q} line " . __LINE__ . " file " . __FILE__ . " sql said: " . mysql_error());
        $n = mysql_num_rows($r);
        if ($n == 0) {
            addDomainToUser($adm_login, $adm_pass, $dom_name);
        }
        // Add owner path to ftp & ssh accounts
        $adm_path = getAdminPath($adm_login);
        $cur_dom = addOwnerPathToArray($cur_dom, $adm_path, "ftp", "homedir");
        $cur_dom = addOwnerPathToArray($cur_dom, $adm_path, "ssh", "homedir");
        $cur_dom = addOwnerPathToArray($cur_dom, $adm_path, "mailboxes", "home");
        // Reimport all the stuff
        updateRowValue($pro_mysql_domain_table, "name='{$dom_name}'", $cur_dom["domain_config"], "safe_mode,sbox_protect,default_subdomain,quota,max_email,max_lists,max_ftp,max_subdomain,max_ssh,primary_dns,other_dns,primary_mx,other_mx,whois,hosting,gen_unresolved_domain_alias,txt_root_entry,txt_root_entry2,catchall_email,domain_parking,registrar_password,ttl,stats_login,stats_pass,stats_subdomain,wildcard_dns,domain_parking_type");
        recreateAllRows($pro_mysql_subdomain_table, "domain_name='{$dom_name}'", $cur_dom["subdomains"], "safe_mode,sbox_protect,subdomain_name,ip,register_globals,associated_txt_record,generate_vhost,ssl_ip,nameserver_for,ttl,srv_record,add_default_charset,customize_vhost", ",domain_name", ",'{$dom_name}'");
        recreateAllRows($pro_mysql_pop_table, "mbox_host='{$dom_name}'", $cur_dom["mailboxes"], "id,home,passwd,crypt,redirect1,redirect2,localdeliver,vacation_flag,bounce_msg,vacation_text,spam_mailbox_enable,quota_size,quota_files,quota_couriermaildrop", ",mbox_host", ",'{$dom_name}'");
        recreateAllRows($pro_mysql_mailaliasgroup_table, "domain_parent='{$dom_name}'", $cur_dom["alias_group"], "id,delivery_group", ",domain_parent", ",'{$dom_name}'");
        recreateAllRows($pro_mysql_list_table, "domain='{$dom_name}'", $cur_dom["lists"], "name,owner,spammode,webarchive", ",domain", ",'{$dom_name}'");
        recreateAllRows($pro_mysql_ftp_table, "hostname='{$dom_name}'", $cur_dom["ftp"], "login,password,homedir", ",hostname", ",'{$dom_name}'");
        recreateAllRows($pro_mysql_ssh_table, "hostname='{$dom_name}'", $cur_dom["ssh"], "login,crypt,password,homedir", ",hostname", ",'{$dom_name}'");
        // Fixes the UID / GID for ssh, ftp and email accounts
        $q = "UPDATE {$pro_mysql_pop_table} SET uid='{$conf_dtc_system_uid}',gid='{$conf_dtc_system_gid}' WHERE mbox_host='{$dom_name}';";
        $r = mysql_query($q) or die("Cannot query {$q} line " . __LINE__ . " file " . __FILE__ . " sql said: " . mysql_error());
        $q = "UPDATE {$pro_mysql_ftp_table} SET uid='{$conf_dtc_system_uid}',gid='{$conf_dtc_system_gid}' WHERE hostname='{$dom_name}';";
        $r = mysql_query($q) or die("Cannot query {$q} line " . __LINE__ . " file " . __FILE__ . " sql said: " . mysql_error());
        $q = "UPDATE {$pro_mysql_ssh_table} SET uid='{$conf_dtc_system_uid}',gid='{$conf_dtc_system_gid}' WHERE hostname='{$dom_name}';";
        $r = mysql_query($q) or die("Cannot query {$q} line " . __LINE__ . " file " . __FILE__ . " sql said: " . mysql_error());
    }
    if (isset($dom_ar["mysql"])) {
        $n_user = sizeof($dom_ar["mysql"]);
        $console .= _("Number of database users in this import: ") . $n_user . "<br>";
        $musers = array_keys($dom_ar["mysql"]);
        for ($i = 0; $i < $n_user; $i++) {
            $username = $musers[$i];
            $console .= _("Importing database username: "******"<br>";
            unset($user);
            $user = $dom_ar["mysql"][$musers[$i]];
            $password = $user["password"];
            $q = "INSERT IGNORE INTO mysql.user\n\t\t\t(Host,User,Password,Select_priv,Insert_priv,Update_priv,Delete_priv,Create_priv,Drop_priv,Reload_priv,Shutdown_priv,Process_priv,File_priv,\n\t\t\tGrant_priv,References_priv,Index_priv,Alter_priv,Show_db_priv,Super_priv,Create_tmp_table_priv,Lock_tables_priv,\n\t\t\tExecute_priv,Repl_slave_priv,Repl_client_priv,Create_view_priv,Show_view_priv,Create_routine_priv,\n\t\t\tAlter_routine_priv,Create_user_priv,dtcowner)\n\t\t\tVALUES ('%','{$username}','{$password}','N','N','N','N','N','N','N','N','N','N','N','N','N','N','N','N','N','N',\n\t\t\t'N','N','N','N','N','N','N','N','{$adm_login}');";
            $r = mysql_query($q) or die("Cannot query {$q} line " . __LINE__ . " file " . __FILE__ . " sql said: " . mysql_error());
            $q = "INSERT IGNORE INTO mysql.user\n\t\t\t(Host,User,Password,Select_priv,Insert_priv,Update_priv,Delete_priv,Create_priv,Drop_priv,Reload_priv,Shutdown_priv,Process_priv,File_priv,\n\t\t\tGrant_priv,References_priv,Index_priv,Alter_priv,Show_db_priv,Super_priv,Create_tmp_table_priv,Lock_tables_priv,\n\t\t\tExecute_priv,Repl_slave_priv,Repl_client_priv,Create_view_priv,Show_view_priv,Create_routine_priv,\n\t\t\tAlter_routine_priv,Create_user_priv,dtcowner)\n\t\t\tVALUES ('localhost','{$username}','{$password}','N','N','N','N','N','N','N','N','N','N','N','N','N','N','N','N','N','N',\n\t\t\t'N','N','N','N','N','N','N','N','{$adm_login}');";
            $r = mysql_query($q) or die("Cannot query {$q} line " . __LINE__ . " file " . __FILE__ . " sql said: " . mysql_error());
            if (isset($user["dbs"])) {
                $n_db = sizeof($user["dbs"]);
                $console .= _("Number of database owned by user") . " " . $username . ": " . $n_db . "<br>";
                $mdbs = array_keys($user["dbs"]);
                for ($j = 0; $j < $n_db; $j++) {
                    $db = $mdbs[$j];
                    $q = "INSERT IGNORE INTO mysql.db (Host,Db,User,Select_priv,Insert_priv,Update_priv,Delete_priv,Create_priv,Drop_priv,Grant_priv,\n\t\t\t\t\tReferences_priv,Index_priv,Alter_priv,Create_tmp_table_priv,Lock_tables_priv,Create_view_priv,\n\t\t\t\t\tShow_view_priv,Create_routine_priv,Alter_routine_priv,Execute_priv)\n\t\t\t\t\tVALUES('%','{$db}','{$username}','Y','Y','Y','Y','Y','Y','N','Y','Y','Y','Y','Y','Y','Y','Y','Y','Y');";
                    $r = mysql_query($q) or die("Cannot query {$q} line " . __LINE__ . " file " . __FILE__ . " sql said: " . mysql_error());
                    $q = "INSERT IGNORE INTO mysql.db (Host,Db,User,Select_priv,Insert_priv,Update_priv,Delete_priv,Create_priv,Drop_priv,Grant_priv,\n\t\t\t\t\tReferences_priv,Index_priv,Alter_priv,Create_tmp_table_priv,Lock_tables_priv,Create_view_priv,\n\t\t\t\t\tShow_view_priv,Create_routine_priv,Alter_routine_priv,Execute_priv)\n\t\t\t\t\tVALUES('localhost','{$db}','{$username}','Y','Y','Y','Y','Y','Y','N','Y','Y','Y','Y','Y','Y','Y','Y','Y','Y');";
                    $r = mysql_query($q) or die("Cannot query {$q} line " . __LINE__ . " file " . __FILE__ . " sql said: " . mysql_error());
                }
            }
        }
        $q = "FLUSH PRIVILEGES;";
        $r = mysql_query($q) or die("Cannot query {$q} line " . __LINE__ . " file " . __FILE__ . " sql said: " . mysql_error());
    }
    return;
}