root/tags/omega-1.0.0-rc3/engine/ispcp_common_code.pl

Revision 980, 4.9 kB (checked in by rats, 10 months ago)

Fixed some issues VHCS 2.4.7 -> ispCP RC3

Line 
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;
Note: See TracBrowser for help on using the browser.