| 1 |
#!/usr/bin/perl |
|---|
| 2 |
|
|---|
| 3 |
# ispCP ω (OMEGA) a Virtual Hosting Control Panel |
|---|
| 4 |
# Copyright (c) 2001-2006 by moleSoftware GmbH |
|---|
| 5 |
# http://www.molesoftware.com |
|---|
| 6 |
# Copyright (c) 2006-2007 by isp Control Panel |
|---|
| 7 |
# http://isp-control.net |
|---|
| 8 |
# |
|---|
| 9 |
# |
|---|
| 10 |
# License: |
|---|
| 11 |
# This program is free software; you can redistribute it and/or |
|---|
| 12 |
# modify it under the terms of the MPL Mozilla Public License |
|---|
| 13 |
# as published by the Free Software Foundation; either version 1.1 |
|---|
| 14 |
# of the License, or (at your option) any later version. |
|---|
| 15 |
# |
|---|
| 16 |
# This program is distributed in the hope that it will be useful, |
|---|
| 17 |
# but WITHOUT ANY WARRANTY; without even the implied warranty of |
|---|
| 18 |
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
|---|
| 19 |
# MPL Mozilla Public License for more details. |
|---|
| 20 |
# |
|---|
| 21 |
# You may have received a copy of the MPL Mozilla Public License |
|---|
| 22 |
# along with this program. |
|---|
| 23 |
# |
|---|
| 24 |
# An on-line copy of the MPL Mozilla Public License can be found |
|---|
| 25 |
# http://www.mozilla.org/MPL/MPL-1.1.html |
|---|
| 26 |
# |
|---|
| 27 |
# |
|---|
| 28 |
# The ispCP ω Home Page is at: |
|---|
| 29 |
# |
|---|
| 30 |
# http://isp-control.net |
|---|
| 31 |
# |
|---|
| 32 |
|
|---|
| 33 |
use strict; |
|---|
| 34 |
use warnings; |
|---|
| 35 |
|
|---|
| 36 |
$main::engine_debug = undef; |
|---|
| 37 |
|
|---|
| 38 |
require 'ispcp_common_methods.pl'; |
|---|
| 39 |
require 'ispcp-db-keys.pl'; |
|---|
| 40 |
|
|---|
| 41 |
my $rs; |
|---|
| 42 |
|
|---|
| 43 |
$main::cfg_file = '/etc/ispcp/ispcp.conf'; |
|---|
| 44 |
|
|---|
| 45 |
$rs = get_conf(); |
|---|
| 46 |
|
|---|
| 47 |
return $rs if ($rs != 0); |
|---|
| 48 |
|
|---|
| 49 |
if ($main::cfg{'DEBUG'} != 0) { |
|---|
| 50 |
$main::engine_debug = '_on_'; |
|---|
| 51 |
} |
|---|
| 52 |
|
|---|
| 53 |
if ($main::db_pass_key eq '{KEY}' || $main::db_pass_iv eq '{IV}') { |
|---|
| 54 |
|
|---|
| 55 |
print STDERR "\tGenerating database keys, it may take some time, please wait...\n"; |
|---|
| 56 |
|
|---|
| 57 |
$rs = sys_command("perl $main::cfg{'ROOT_DIR'}/keys/rpl.pl $main::cfg{'GUI_ROOT_DIR'}/include/ispcp-db-keys.php $main::cfg{'ROOT_DIR'}/engine/ispcp-db-keys.pl $main::cfg{'ROOT_DIR'}/engine/messager/ispcp-db-keys.pl"); |
|---|
| 58 |
|
|---|
| 59 |
return $rs if ($rs != 0); |
|---|
| 60 |
|
|---|
| 61 |
do 'ispcp-db-keys.pl'; |
|---|
| 62 |
get_conf(); |
|---|
| 63 |
} |
|---|
| 64 |
|
|---|
| 65 |
$main::lock_file = $main::cfg{'MR_LOCK_FILE'}; |
|---|
| 66 |
|
|---|
| 67 |
$main::log_dir = $main::cfg{'LOG_DIR'}; |
|---|
| 68 |
|
|---|
| 69 |
$main::root_dir = $main::cfg{'ROOT_DIR'}; |
|---|
| 70 |
|
|---|
| 71 |
$main::ispcp = "$main::log_dir/ispcp-rqst-mngr.el"; |
|---|
| 72 |
|
|---|
| 73 |
$main::ispcp_rqst_mngr = "$main::root_dir/engine/ispcp-rqst-mngr"; |
|---|
| 74 |
|
|---|
| 75 |
$main::ispcp_rqst_mngr_el = "$main::log_dir/ispcp-rqst-mngr.el"; |
|---|
| 76 |
$main::ispcp_rqst_mngr_stdout = "$main::log_dir/ispcp-rqst-mngr.stdout"; |
|---|
| 77 |
$main::ispcp_rqst_mngr_stderr = "$main::log_dir/ispcp-rqst-mngr.stderr"; |
|---|
| 78 |
|
|---|
| 79 |
$main::ispcp_dmn_mngr = "$main::root_dir/engine/ispcp-dmn-mngr"; |
|---|
| 80 |
|
|---|
| 81 |
$main::ispcp_dmn_mngr_el = "$main::log_dir/ispcp-dmn-mngr.el"; |
|---|
| 82 |
$main::ispcp_dmn_mngr_stdout = "$main::log_dir/ispcp-dmn-mngr.stdout"; |
|---|
| 83 |
$main::ispcp_dmn_mngr_stderr = "$main::log_dir/ispcp-dmn-mngr.stderr"; |
|---|
| 84 |
|
|---|
| 85 |
$main::ispcp_sub_mngr = "$main::root_dir/engine/ispcp-sub-mngr"; |
|---|
| 86 |
|
|---|
| 87 |
$main::ispcp_sub_mngr_el = "$main::log_dir/ispcp-sub-mngr.el"; |
|---|
| 88 |
$main::ispcp_sub_mngr_stdout = "$main::log_dir/ispcp-sub-mngr.stdout"; |
|---|
| 89 |
$main::ispcp_sub_mngr_stderr = "$main::log_dir/ispcp-sub-mngr.stderr"; |
|---|
| 90 |
|
|---|
| 91 |
$main::ispcp_als_mngr = "$main::root_dir/engine/ispcp-als-mngr"; |
|---|
| 92 |
|
|---|
| 93 |
$main::ispcp_als_mngr_el = "$main::log_dir/ispcp-als-mngr.el"; |
|---|
| 94 |
$main::ispcp_als_mngr_stdout = "$main::log_dir/ispcp-als-mngr.stdout"; |
|---|
| 95 |
$main::ispcp_als_mngr_stderr = "$main::log_dir/ispcp-als-mngr.stderr"; |
|---|
| 96 |
|
|---|
| 97 |
$main::ispcp_mbox_mngr = "$main::root_dir/engine/ispcp-mbox-mngr"; |
|---|
| 98 |
|
|---|
| 99 |
$main::ispcp_mbox_mngr_el = "$main::log_dir/ispcp-mbox-mngr.el"; |
|---|
| 100 |
$main::ispcp_mbox_mngr_stdout = "$main::log_dir/ispcp-mbox-mngr.stdout"; |
|---|
| 101 |
$main::ispcp_mbox_mngr_stderr = "$main::log_dir/ispcp-mbox-mngr.stderr"; |
|---|
| 102 |
|
|---|
| 103 |
$main::ispcp_serv_mngr = "$main::root_dir/engine/ispcp-serv-mngr"; |
|---|
| 104 |
|
|---|
| 105 |
$main::ispcp_serv_mngr_el = "$main::log_dir/ispcp-serv-mngr.el"; |
|---|
| 106 |
$main::ispcp_serv_mngr_stdout = "$main::log_dir/ispcp-serv-mngr.stdout"; |
|---|
| 107 |
$main::ispcp_serv_mngr_stderr = "$main::log_dir/ispcp-serv-mngr.stderr"; |
|---|
| 108 |
|
|---|
| 109 |
# |
|---|
| 110 |
# htuser manager variables. |
|---|
| 111 |
# |
|---|
| 112 |
|
|---|
| 113 |
$main::ispcp_htuser_mngr = "$main::root_dir/engine/ispcp-htuser-mngr"; |
|---|
| 114 |
|
|---|
| 115 |
$main::ispcp_htuser_mngr_el = "$main::log_dir/ispcp-htuser-mngr.el"; |
|---|
| 116 |
$main::ispcp_htuser_mngr_stdout = "$main::log_dir/ispcp-htuser-mngr.stdout"; |
|---|
| 117 |
$main::ispcp_htuser_mngr_stderr = "$main::log_dir/ispcp-htuser-mngr.stderr"; |
|---|
| 118 |
|
|---|
| 119 |
|
|---|
| 120 |
$main::ispcp_vrl_traff = "$main::root_dir/engine/messager/ispcp-vrl-traff"; |
|---|
| 121 |
|
|---|
| 122 |
$main::ispcp_vrl_traff_el = "$main::log_dir/ispcp-vrl-traff.el"; |
|---|
| 123 |
$main::ispcp_vrl_traff_stdout = "$main::log_dir/ispcp-vrl-traff.stdout"; |
|---|
| 124 |
$main::ispcp_vrl_traff_stderr = "$main::log_dir/ispcp-vrl-traff.stderr"; |
|---|
| 125 |
|
|---|
| 126 |
$main::ispcp_vrl_traff_correction_el = "$main::log_dir/ispcp-vrl-traff-correction.el"; |
|---|
| 127 |
|
|---|
| 128 |
$main::ispcp_httpd_logs_mngr_el = "$main::log_dir/ispcp-httpd-logs-mngr.el"; |
|---|
| 129 |
$main::ispcp_httpd_logs_mngr_stdout = "$main::log_dir/ispcp-httpd-logs-mngr.stdout"; |
|---|
| 130 |
$main::ispcp_httpd_logs_mngr_stderr = "$main::log_dir/ispcp-httpd-logs-mngr.stderr"; |
|---|
| 131 |
|
|---|
| 132 |
$main::ispcp_ftp_acc_mngr_el = "$main::log_dir/ispcp-ftp-acc-mngr.el"; |
|---|
| 133 |
$main::ispcp_ftp_acc_mngr_stdout = "$main::log_dir/ispcp-ftp-acc-mngr.stdout"; |
|---|
| 134 |
$main::ispcp_ftp_acc_mngr_stderr = "$main::log_dir/ispcp-ftp-acc-mngr.stderr"; |
|---|
| 135 |
|
|---|
| 136 |
$main::ispcp_bk_task_el = "$main::log_dir/ispcp-bk-task.el"; |
|---|
| 137 |
|
|---|
| 138 |
$main::ispcp_srv_traff_el = "$main::log_dir/ispcp-srv-traff.el"; |
|---|
| 139 |
|
|---|
| 140 |
$main::ispcp_dsk_quota_el = "$main::log_dir/ispcp-dsk-quota.el"; |
|---|
| 141 |
|
|---|
| 142 |
######################################################################## |
|---|
| 143 |
|
|---|
| 144 |
return 1; |
|---|