Changeset 479
- Timestamp:
- 04/11/07 11:59:34
(2 years ago)
- Author:
- malte
- Message:
--
-
Files:
-
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
| r154 |
r479 |
|
| 29 | 29 | $(CMD_DIR_INSTALL) -m 0700 $(SYSTEM_ENGINE_ROOT)/tools |
|---|
| 30 | 30 | cd traffic && $(MAKE) install |
|---|
| 31 | | $(CMD_INSTALL) ./vhcs2_common_code.pl $(SYSTEM_ENGINE_ROOT) |
|---|
| 32 | | # keys needed for VHCS engine; |
|---|
| 33 | | $(CMD_INSTALL) ./vhcs2-db-keys.pl $(SYSTEM_ENGINE_ROOT) |
|---|
| | 31 | $(CMD_INSTALL) ./ispcp_common_code.pl $(SYSTEM_ENGINE_ROOT) |
|---|
| | 32 | # keys needed for ISPCP engine; |
|---|
| | 33 | $(CMD_INSTALL) ./ispcp-db-keys.pl $(SYSTEM_ENGINE_ROOT) |
|---|
| 34 | 34 | # one more copy for auto replay system; |
|---|
| 35 | | $(CMD_INSTALL) ./vhcs2-db-keys.pl $(SYSTEM_ENGINE_ROOT)/messager |
|---|
| 36 | | $(CMD_INSTALL) ./vhcs2-rqst-mngr $(SYSTEM_ENGINE_ROOT) |
|---|
| 37 | | $(CMD_INSTALL) ./vhcs2-dmn-mngr $(SYSTEM_ENGINE_ROOT) |
|---|
| 38 | | $(CMD_INSTALL) ./vhcs2-sub-mngr $(SYSTEM_ENGINE_ROOT) |
|---|
| 39 | | $(CMD_INSTALL) ./vhcs2-als-mngr $(SYSTEM_ENGINE_ROOT) |
|---|
| 40 | | $(CMD_INSTALL) ./vhcs2-htuser-mngr $(SYSTEM_ENGINE_ROOT) |
|---|
| 41 | | $(CMD_INSTALL) ./vhcs2-mbox-mngr $(SYSTEM_ENGINE_ROOT) |
|---|
| 42 | | $(CMD_INSTALL) ./vhcs2-serv-mngr $(SYSTEM_ENGINE_ROOT) |
|---|
| 43 | | $(CMD_INSTALL) ./vhcs2-db-passwd $(SYSTEM_ENGINE_ROOT) |
|---|
| 44 | | $(CMD_INSTALL) ./backup/vhcs2-bk-task $(SYSTEM_ENGINE_ROOT)/backup |
|---|
| 45 | | $(CMD_INSTALL) ./backup/vhcs2-backup-all $(SYSTEM_ENGINE_ROOT)/backup |
|---|
| 46 | | $(CMD_INSTALL) ./quota/vhcs2-dsk-quota $(SYSTEM_ENGINE_ROOT)/quota |
|---|
| 47 | | $(CMD_INSTALL) ./traffic/vhcs2-srv-traff $(SYSTEM_ENGINE_ROOT)/traffic |
|---|
| 48 | | $(CMD_INSTALL) ./traffic/vhcs2-vrl-traff $(SYSTEM_ENGINE_ROOT)/traffic |
|---|
| 49 | | $(CMD_INSTALL) ./traffic/vhcs2-vrl-traff-SUSE $(SYSTEM_ENGINE_ROOT)/traffic |
|---|
| 50 | | $(CMD_INSTALL) ./messager/vhcs2-arpl-msgr $(SYSTEM_ENGINE_ROOT)/messager |
|---|
| | 35 | $(CMD_INSTALL) ./ispcp-db-keys.pl $(SYSTEM_ENGINE_ROOT)/messager |
|---|
| | 36 | $(CMD_INSTALL) ./ispcp-rqst-mngr $(SYSTEM_ENGINE_ROOT) |
|---|
| | 37 | $(CMD_INSTALL) ./ispcp-dmn-mngr $(SYSTEM_ENGINE_ROOT) |
|---|
| | 38 | $(CMD_INSTALL) ./ispcp-sub-mngr $(SYSTEM_ENGINE_ROOT) |
|---|
| | 39 | $(CMD_INSTALL) ./ispcp-als-mngr $(SYSTEM_ENGINE_ROOT) |
|---|
| | 40 | $(CMD_INSTALL) ./ispcp-htuser-mngr $(SYSTEM_ENGINE_ROOT) |
|---|
| | 41 | $(CMD_INSTALL) ./ispcp-mbox-mngr $(SYSTEM_ENGINE_ROOT) |
|---|
| | 42 | $(CMD_INSTALL) ./ispcp-serv-mngr $(SYSTEM_ENGINE_ROOT) |
|---|
| | 43 | $(CMD_INSTALL) ./ispcp-db-passwd $(SYSTEM_ENGINE_ROOT) |
|---|
| | 44 | $(CMD_INSTALL) ./backup/ispcp-bk-task $(SYSTEM_ENGINE_ROOT)/backup |
|---|
| | 45 | $(CMD_INSTALL) ./backup/ispcp-backup-all $(SYSTEM_ENGINE_ROOT)/backup |
|---|
| | 46 | $(CMD_INSTALL) ./quota/ispcp-dsk-quota $(SYSTEM_ENGINE_ROOT)/quota |
|---|
| | 47 | $(CMD_INSTALL) ./traffic/ispcp-srv-traff $(SYSTEM_ENGINE_ROOT)/traffic |
|---|
| | 48 | $(CMD_INSTALL) ./traffic/ispcp-vrl-traff $(SYSTEM_ENGINE_ROOT)/traffic |
|---|
| | 49 | $(CMD_INSTALL) ./traffic/ispcp-vrl-traff-SUSE $(SYSTEM_ENGINE_ROOT)/traffic |
|---|
| | 50 | $(CMD_INSTALL) ./messager/ispcp-arpl-msgr $(SYSTEM_ENGINE_ROOT)/messager |
|---|
| 51 | 51 | $(CMD_INSTALL) ./setup/set-engine-permissions.sh $(SYSTEM_ENGINE_ROOT)/setup |
|---|
| 52 | 52 | $(CMD_INSTALL) ./setup/set-gui-permissions.sh $(SYSTEM_ENGINE_ROOT)/setup |
|---|
| 53 | | $(CMD_INSTALL) ./setup/vhcs2-setup $(SYSTEM_ENGINE_ROOT)/setup |
|---|
| 54 | | $(CMD_INSTALL) ./setup/vhcs2-uninstall $(SYSTEM_ENGINE_ROOT)/setup |
|---|
| | 53 | $(CMD_INSTALL) ./setup/ispcp-setup $(SYSTEM_ENGINE_ROOT)/setup |
|---|
| | 54 | $(CMD_INSTALL) ./setup/ispcp-uninstall $(SYSTEM_ENGINE_ROOT)/setup |
|---|
| 55 | 55 | $(CMD_INSTALL) ./setup/copy-errordocs.sh $(SYSTEM_ENGINE_ROOT)/setup |
|---|
| 56 | | $(CMD_INSTALL) ./tools/vhcs2-httpd-logs-mngr $(SYSTEM_ENGINE_ROOT)/tools/vhcs2-httpd-logs-mngr |
|---|
| 57 | | $(CMD_INSTALL) ./tools/vhcs2phptemp.sh $(SYSTEM_ENGINE_ROOT)/tools/vhcs2phptemp.sh |
|---|
| | 56 | $(CMD_INSTALL) ./tools/ispcp-httpd-logs-mngr $(SYSTEM_ENGINE_ROOT)/tools/ispcp-httpd-logs-mngr |
|---|
| | 57 | $(CMD_INSTALL) ./tools/ispcpphptemp.sh $(SYSTEM_ENGINE_ROOT)/tools/ispcpphptemp.sh |
|---|
| 58 | 58 | |
|---|
| 59 | 59 | uninstall: |
|---|
| r366 |
r479 |
|
| 37 | 37 | cd ./traffic && $(MAKE) install |
|---|
| 38 | 38 | |
|---|
| 39 | | $(CMD_INSTALL) ./vhcs2_common_code.pl $(SYSTEM_ENGINE_ROOT) |
|---|
| | 39 | $(CMD_INSTALL) ./ispcp_common_code.pl $(SYSTEM_ENGINE_ROOT) |
|---|
| 40 | 40 | |
|---|
| 41 | | # keys needed for VHCS engine; |
|---|
| 42 | | $(CMD_INSTALL) ./vhcs2-db-keys.pl $(SYSTEM_ENGINE_ROOT) |
|---|
| | 41 | # keys needed for ISPCP engine; |
|---|
| | 42 | $(CMD_INSTALL) ./ispcp-db-keys.pl $(SYSTEM_ENGINE_ROOT) |
|---|
| 43 | 43 | |
|---|
| 44 | 44 | # one more copy for auto replay system; |
|---|
| 45 | | $(CMD_INSTALL) ./vhcs2-db-keys.pl $(SYSTEM_ENGINE_ROOT)/messager |
|---|
| | 45 | $(CMD_INSTALL) ./ispcp-db-keys.pl $(SYSTEM_ENGINE_ROOT)/messager |
|---|
| 46 | 46 | |
|---|
| 47 | | $(CMD_INSTALL) ./vhcs2-rqst-mngr $(SYSTEM_ENGINE_ROOT) |
|---|
| 48 | | $(CMD_INSTALL) ./vhcs2-dmn-mngr $(SYSTEM_ENGINE_ROOT) |
|---|
| 49 | | $(CMD_INSTALL) ./vhcs2-sub-mngr $(SYSTEM_ENGINE_ROOT) |
|---|
| 50 | | $(CMD_INSTALL) ./vhcs2-als-mngr $(SYSTEM_ENGINE_ROOT) |
|---|
| 51 | | $(CMD_INSTALL) ./vhcs2-htuser-mngr $(SYSTEM_ENGINE_ROOT) |
|---|
| 52 | | $(CMD_INSTALL) ./vhcs2-mbox-mngr $(SYSTEM_ENGINE_ROOT) |
|---|
| 53 | | $(CMD_INSTALL) ./vhcs2-serv-mngr $(SYSTEM_ENGINE_ROOT) |
|---|
| 54 | | $(CMD_INSTALL) ./vhcs2-db-passwd $(SYSTEM_ENGINE_ROOT) |
|---|
| | 47 | $(CMD_INSTALL) ./ispcp-rqst-mngr $(SYSTEM_ENGINE_ROOT) |
|---|
| | 48 | $(CMD_INSTALL) ./ispcp-dmn-mngr $(SYSTEM_ENGINE_ROOT) |
|---|
| | 49 | $(CMD_INSTALL) ./ispcp-sub-mngr $(SYSTEM_ENGINE_ROOT) |
|---|
| | 50 | $(CMD_INSTALL) ./ispcp-als-mngr $(SYSTEM_ENGINE_ROOT) |
|---|
| | 51 | $(CMD_INSTALL) ./ispcp-htuser-mngr $(SYSTEM_ENGINE_ROOT) |
|---|
| | 52 | $(CMD_INSTALL) ./ispcp-mbox-mngr $(SYSTEM_ENGINE_ROOT) |
|---|
| | 53 | $(CMD_INSTALL) ./ispcp-serv-mngr $(SYSTEM_ENGINE_ROOT) |
|---|
| | 54 | $(CMD_INSTALL) ./ispcp-db-passwd $(SYSTEM_ENGINE_ROOT) |
|---|
| 55 | 55 | |
|---|
| 56 | | $(CMD_INSTALL) ./backup/vhcs2-bk-task $(SYSTEM_ENGINE_ROOT)/backup |
|---|
| 57 | | $(CMD_INSTALL) ./backup/vhcs2-backup-all $(SYSTEM_ENGINE_ROOT)/backup |
|---|
| | 56 | $(CMD_INSTALL) ./backup/ispcp-bk-task $(SYSTEM_ENGINE_ROOT)/backup |
|---|
| | 57 | $(CMD_INSTALL) ./backup/ispcp-backup-all $(SYSTEM_ENGINE_ROOT)/backup |
|---|
| 58 | 58 | |
|---|
| 59 | | $(CMD_INSTALL) ./quota/vhcs2-dsk-quota $(SYSTEM_ENGINE_ROOT)/quota |
|---|
| | 59 | $(CMD_INSTALL) ./quota/ispcp-dsk-quota $(SYSTEM_ENGINE_ROOT)/quota |
|---|
| 60 | 60 | |
|---|
| 61 | | $(CMD_INSTALL) ./messager/vhcs2-arpl-msgr $(SYSTEM_ENGINE_ROOT)/messager |
|---|
| | 61 | $(CMD_INSTALL) ./messager/ispcp-arpl-msgr $(SYSTEM_ENGINE_ROOT)/messager |
|---|
| 62 | 62 | |
|---|
| 63 | 63 | $(CMD_INSTALL) ./setup/set-engine-permissions.sh $(SYSTEM_ENGINE_ROOT)/setup |
|---|
| 64 | 64 | $(CMD_INSTALL) ./setup/set-gui-permissions.sh $(SYSTEM_ENGINE_ROOT)/setup |
|---|
| 65 | 65 | $(CMD_INSTALL) ./setup/reset-setup $(SYSTEM_ENGINE_ROOT)/setup |
|---|
| 66 | | $(CMD_INSTALL) ./setup/vhcs2-setup $(SYSTEM_ENGINE_ROOT)/setup |
|---|
| 67 | | $(CMD_INSTALL) ./setup/vhcs2-uninstall $(SYSTEM_ENGINE_ROOT)/setup |
|---|
| | 66 | $(CMD_INSTALL) ./setup/ispcp-setup $(SYSTEM_ENGINE_ROOT)/setup |
|---|
| | 67 | $(CMD_INSTALL) ./setup/ispcp-uninstall $(SYSTEM_ENGINE_ROOT)/setup |
|---|
| 68 | 68 | $(CMD_INSTALL) ./setup/copy-errordocs.sh $(SYSTEM_ENGINE_ROOT)/setup |
|---|
| 69 | 69 | |
|---|
| 70 | | $(CMD_INSTALL) ./tools/vhcs2-httpd-logs-mngr $(SYSTEM_ENGINE_ROOT)/tools/vhcs2-httpd-logs-mngr |
|---|
| 71 | | $(CMD_INSTALL) ./tools/vhcs2phptemp.sh $(SYSTEM_ENGINE_ROOT)/tools/vhcs2phptemp.sh |
|---|
| | 70 | $(CMD_INSTALL) ./tools/ispcp-httpd-logs-mngr $(SYSTEM_ENGINE_ROOT)/tools/ispcp-httpd-logs-mngr |
|---|
| | 71 | $(CMD_INSTALL) ./tools/ispcpphptemp.sh $(SYSTEM_ENGINE_ROOT)/tools/ispcpphptemp.sh |
|---|
| 72 | 72 | |
|---|
| 73 | | $(CMD_INSTALL) ./traffic/vhcs2-srv-traff $(SYSTEM_ENGINE_ROOT)/traffic |
|---|
| 74 | | $(CMD_INSTALL) ./traffic/vhcs2-vrl-traff $(SYSTEM_ENGINE_ROOT)/traffic |
|---|
| 75 | | $(CMD_INSTALL) ./traffic/vhcs2-vrl-traff-SUSE $(SYSTEM_ENGINE_ROOT)/traffic |
|---|
| | 73 | $(CMD_INSTALL) ./traffic/ispcp-srv-traff $(SYSTEM_ENGINE_ROOT)/traffic |
|---|
| | 74 | $(CMD_INSTALL) ./traffic/ispcp-vrl-traff $(SYSTEM_ENGINE_ROOT)/traffic |
|---|
| | 75 | $(CMD_INSTALL) ./traffic/ispcp-vrl-traff-SUSE $(SYSTEM_ENGINE_ROOT)/traffic |
|---|
| 76 | 76 | |
|---|
| 77 | 77 | uninstall: |
|---|
| r442 |
r479 |
|
| 1 | 1 | #!/usr/bin/perl |
|---|
| 2 | 2 | |
|---|
| 3 | | # VHCS ω (OMEGA) - Virtual Hosting Control System | Omega Version |
|---|
| | 3 | # ISPCP ω (OMEGA) - Virtual Hosting Control System | Omega Version |
|---|
| 4 | 4 | # Copyright (c) 2001-2006 by moleSoftware GmbH |
|---|
| 5 | 5 | # http://www.molesoftware.com |
|---|
| … | … | |
| 26 | 26 | # |
|---|
| 27 | 27 | # |
|---|
| 28 | | # The VHCS ω Home Page is at: |
|---|
| | 28 | # The ISPCP ω Home Page is at: |
|---|
| 29 | 29 | # |
|---|
| 30 | 30 | # http://isp-control.net |
|---|
| … | … | |
| 34 | 34 | use FindBin; |
|---|
| 35 | 35 | use lib "$FindBin::Bin/"; |
|---|
| 36 | | require 'vhcs2_common_code.pl'; |
|---|
| | 36 | require 'ispcp_common_code.pl'; |
|---|
| 37 | 37 | |
|---|
| 38 | 38 | use strict; |
|---|
| … | … | |
| 56 | 56 | # Let's clear Execution Logs, if any. |
|---|
| 57 | 57 | |
|---|
| 58 | | if (-e $main::vhcs2_als_mngr_el) { |
|---|
| 59 | | |
|---|
| 60 | | $rs = del_file($main::vhcs2_als_mngr_el); |
|---|
| | 58 | if (-e $main::ispcp_als_mngr_el) { |
|---|
| | 59 | |
|---|
| | 60 | $rs = del_file($main::ispcp_als_mngr_el); |
|---|
| 61 | 61 | |
|---|
| 62 | 62 | return $rs if ($rs != 0); |
|---|
| … | … | |
| 1062 | 1062 | |
|---|
| 1063 | 1063 | |
|---|
| 1064 | | my $sys_cfg = "$main::cfg{'APACHE_SITES_DIR'}/vhcs2.conf"; |
|---|
| 1065 | | |
|---|
| 1066 | | my $working_cfg = "$working_dir/vhcs2.conf"; |
|---|
| | 1064 | my $sys_cfg = "$main::cfg{'APACHE_SITES_DIR'}/ispcp.conf"; |
|---|
| | 1065 | |
|---|
| | 1066 | my $working_cfg = "$working_dir/ispcp.conf"; |
|---|
| 1067 | 1067 | |
|---|
| 1068 | 1068 | |
|---|
| … | … | |
| 1401 | 1401 | |
|---|
| 1402 | 1402 | |
|---|
| 1403 | | my $sys_cfg = "$main::cfg{'APACHE_SITES_DIR'}/vhcs2.conf"; |
|---|
| 1404 | | |
|---|
| 1405 | | my $working_cfg = "$working_dir/vhcs2.conf"; |
|---|
| | 1403 | my $sys_cfg = "$main::cfg{'APACHE_SITES_DIR'}/ispcp.conf"; |
|---|
| | 1404 | |
|---|
| | 1405 | my $working_cfg = "$working_dir/ispcp.conf"; |
|---|
| 1406 | 1406 | |
|---|
| 1407 | 1407 | |
|---|
| … | … | |
| 2092 | 2092 | |
|---|
| 2093 | 2093 | |
|---|
| 2094 | | my $sys_cfg = "/etc/postfix/vhcs2/domains"; |
|---|
| | 2094 | my $sys_cfg = "/etc/postfix/ispcp/domains"; |
|---|
| 2095 | 2095 | |
|---|
| 2096 | 2096 | my $working_cfg = "$working_dir/domains"; |
|---|
| … | … | |
| 2183 | 2183 | |
|---|
| 2184 | 2184 | |
|---|
| 2185 | | my $sys_cfg = "/etc/postfix/vhcs2/domains"; |
|---|
| | 2185 | my $sys_cfg = "/etc/postfix/ispcp/domains"; |
|---|
| 2186 | 2186 | |
|---|
| 2187 | 2187 | my $working_cfg = "$working_dir/domains"; |
|---|
| … | … | |
| 2630 | 2630 | if ($rs != 0) { |
|---|
| 2631 | 2631 | |
|---|
| 2632 | | dump_el(\@main::el, $main::vhcs2_als_mngr_el); |
|---|
| | 2632 | dump_el(\@main::el, $main::ispcp_als_mngr_el); |
|---|
| 2633 | 2633 | |
|---|
| 2634 | 2634 | als_mngr_shut_down(); |
|---|
| … | … | |
| 2642 | 2642 | if ($rs != 0) { |
|---|
| 2643 | 2643 | |
|---|
| 2644 | | dump_el(\@main::el, $main::vhcs2_als_mngr_el); |
|---|
| | 2644 | dump_el(\@main::el, $main::ispcp_als_mngr_el); |
|---|
| 2645 | 2645 | |
|---|
| 2646 | 2646 | als_mngr_shut_down(); |
|---|
| … | … | |
| 2654 | 2654 | if ($rs != 0) { |
|---|
| 2655 | 2655 | |
|---|
| 2656 | | dump_el(\@main::el, $main::vhcs2_als_mngr_el); |
|---|
| | 2656 | dump_el(\@main::el, $main::ispcp_als_mngr_el); |
|---|
| 2657 | 2657 | |
|---|
| 2658 | 2658 | exit 1; |
|---|
| r154 |
r479 |
|
| 1 | 1 | #!/usr/bin/perl |
|---|
| 2 | 2 | |
|---|
| 3 | | # VHCS(tm) - Virtual Hosting Control System |
|---|
| | 3 | # ISPCP(tm) - Virtual Hosting Control System |
|---|
| 4 | 4 | # Copyright (c) 2001-2004 by moleSoftware GmbH |
|---|
| 5 | 5 | # http://www.molesoftware.com |
|---|
| … | … | |
| 24 | 24 | # |
|---|
| 25 | 25 | # |
|---|
| 26 | | # The VHCS Home Page is at: |
|---|
| | 26 | # The ISPCP Home Page is at: |
|---|
| 27 | 27 | # |
|---|
| 28 | 28 | # http://www.vhcs.net |
|---|
| … | … | |
| 31 | 31 | use FindBin; |
|---|
| 32 | 32 | use lib "$FindBin::Bin/"; |
|---|
| 33 | | require 'vhcs2_common_code.pl'; |
|---|
| | 33 | require 'ispcp_common_code.pl'; |
|---|
| 34 | 34 | |
|---|
| 35 | 35 | use strict; |
|---|
| r442 |
r479 |
|
| 1 | 1 | #!/usr/bin/perl |
|---|
| 2 | 2 | |
|---|
| 3 | | # VHCS ω (OMEGA) - Virtual Hosting Control System | Omega Version |
|---|
| | 3 | # ISPCP ω (OMEGA) - Virtual Hosting Control System | Omega Version |
|---|
| 4 | 4 | # Copyright (c) 2001-2006 by moleSoftware GmbH |
|---|
| 5 | 5 | # http://www.molesoftware.com |
|---|
| … | … | |
| 26 | 26 | # |
|---|
| 27 | 27 | # |
|---|
| 28 | | # The VHCS ω Home Page is at: |
|---|
| | 28 | # The ISPCP ω Home Page is at: |
|---|
| 29 | 29 | # |
|---|
| 30 | 30 | # http://isp-control.net |
|---|
| … | … | |
| 34 | 34 | use FindBin; |
|---|
| 35 | 35 | use lib "$FindBin::Bin/"; |
|---|
| 36 | | require 'vhcs2_common_code.pl'; |
|---|
| | 36 | require 'ispcp_common_code.pl'; |
|---|
| 37 | 37 | |
|---|
| 38 | 38 | use strict; |
|---|
| … | … | |
| 63 | 63 | # Let's clear Execution Logs, if any. |
|---|
| 64 | 64 | |
|---|
| 65 | | if (-e $main::vhcs2_dmn_mngr_el) { |
|---|
| 66 | | |
|---|
| 67 | | $rs = del_file($main::vhcs2_dmn_mngr_el); |
|---|
| | 65 | if (-e $main::ispcp_dmn_mngr_el) { |
|---|
| | 66 | |
|---|
| | 67 | $rs = del_file($main::ispcp_dmn_mngr_el); |
|---|
| 68 | 68 | |
|---|
| 69 | 69 | return $rs if ($rs != 0); |
|---|
| … | … | |
| 1104 | 1104 | |
|---|
| 1105 | 1105 | |
|---|
| 1106 | | my $sys_cfg = "$main::cfg{'APACHE_SITES_DIR'}/vhcs2.conf"; |
|---|
| 1107 | | |
|---|
| 1108 | | my $working_cfg = "$working_dir/vhcs2.conf"; |
|---|
| | 1106 | my $sys_cfg = "$main::cfg{'APACHE_SITES_DIR'}/ispcp.conf"; |
|---|
| | 1107 | |
|---|
| | 1108 | my $working_cfg = "$working_dir/ispcp.conf"; |
|---|
| 1109 | 1109 | |
|---|
| 1110 | 1110 | |
|---|
| 1111 | 1111 | if (!(-e $working_cfg)) { |
|---|
| 1112 | 1112 | |
|---|
| 1113 | | my $vhcs2_base_tpl; |
|---|
| 1114 | | |
|---|
| 1115 | | ($rs, $vhcs2_base_tpl) = get_file($tpl_dir."/vhcs2_base.tpl"); |
|---|
| | 1113 | my $ispcp_base_tpl; |
|---|
| | 1114 | |
|---|
| | 1115 | ($rs, $ispcp_base_tpl) = get_file($tpl_dir."/ispcp_base.tpl"); |
|---|
| 1116 | 1116 | |
|---|
| 1117 | 1117 | return $rs if ($rs != 0); |
|---|
| … | … | |
| 1119 | 1119 | ($rs, $rdata) = store_file( |
|---|
| 1120 | 1120 | $working_cfg, |
|---|
| 1121 | | $vhcs2_base_tpl, |
|---|
| | 1121 | $ispcp_base_tpl, |
|---|
| 1122 | 1122 | "root", |
|---|
| 1123 | 1123 | "root", |
|---|
| … | … | |
| 1469 | 1469 | |
|---|
| 1470 | 1470 | |
|---|
| 1471 | | my $sys_cfg = "$main::cfg{'APACHE_SITES_DIR'}/vhcs2.conf"; |
|---|
| 1472 | | |
|---|
| 1473 | | my $working_cfg = "$working_dir/vhcs2.conf"; |
|---|
| | 1471 | my $sys_cfg = "$main::cfg{'APACHE_SITES_DIR'}/ispcp.conf"; |
|---|
| | 1472 | |
|---|
| | 1473 | my $working_cfg = "$working_dir/ispcp.conf"; |
|---|
| 1474 | 1474 | |
|---|
| 1475 | 1475 | |
|---|
| … | … | |
| 2572 | 2572 | |
|---|
| 2573 | 2573 | |
|---|
| 2574 | | my $sys_cfg = "/etc/postfix/vhcs2/domains"; |
|---|
| | 2574 | my $sys_cfg = "/etc/postfix/ispcp/domains"; |
|---|
| 2575 | 2575 | |
|---|
| 2576 | 2576 | my $working_cfg = "$working_dir/domains"; |
|---|
| … | … | |
| 2666 | 2666 | |
|---|
| 2667 | 2667 | |
|---|
| 2668 | | my $sys_cfg = "/etc/postfix/vhcs2/domains"; |
|---|
| | 2668 | my $sys_cfg = "/etc/postfix/ispcp/domains"; |
|---|
| 2669 | 2669 | |
|---|
| 2670 | 2670 | my $working_cfg = "$working_dir/domains"; |
|---|
| … | … | |
| 4002 | 4002 | if ($rs != 0) { |
|---|
| 4003 | 4003 | |
|---|
| 4004 | | dump_el(\@main::el, $main::vhcs2_dmn_mngr_el); |
|---|
| | 4004 | dump_el(\@main::el, $main::ispcp_dmn_mngr_el); |
|---|
| 4005 | 4005 | |
|---|
| 4006 | 4006 | dmn_mngr_shut_down(); |
|---|
| … | … | |
| 4014 | 4014 | if ($rs != 0) { |
|---|
| 4015 | 4015 | |
|---|
| 4016 | | dump_el(\@main::el, $main::vhcs2_dmn_mngr_el); |
|---|
| | 4016 | dump_el(\@main::el, $main::ispcp_dmn_mngr_el); |
|---|
| 4017 | 4017 | |
|---|
| 4018 | 4018 | dmn_mngr_shut_down(); |
|---|
| … | … | |
| 4026 | 4026 | if ($rs != 0) { |
|---|
| 4027 | 4027 | |
|---|
| 4028 | | dump_el(\@main::el, $main::vhcs2_dmn_mngr_el); |
|---|
| | 4028 | dump_el(\@main::el, $main::ispcp_dmn_mngr_el); |
|---|
| 4029 | 4029 | |
|---|
| 4030 | 4030 | exit 1; |
|---|
| r458 |
r479 |
|
| 1 | 1 | #!/usr/bin/perl |
|---|
| 2 | 2 | |
|---|
| 3 | | # VHCS ω (OMEGA) - Virtual Hosting Control System | Omega Version |
|---|
| | 3 | # ISPCP ω (OMEGA) - Virtual Hosting Control System | Omega Version |
|---|
| 4 | 4 | # Copyright (c) 2001-2006 by moleSoftware GmbH |
|---|
| 5 | 5 | # http://www.molesoftware.com |
|---|
| … | … | |
| 26 | 26 | # |
|---|
| 27 | 27 | # |
|---|
| 28 | | # The VHCS ω Home Page is at: |
|---|
| | 28 | # The ISPCP ω Home Page is at: |
|---|
| 29 | 29 | # |
|---|
| 30 | 30 | # http://isp-control.net |
|---|
| … | … | |
| 34 | 34 | use FindBin; |
|---|
| 35 | 35 | use lib "$FindBin::Bin/"; |
|---|
| 36 | | require 'vhcs2_common_code.pl'; |
|---|
| | 36 | require 'ispcp_common_code.pl'; |
|---|
| 37 | 37 | |
|---|
| 38 | 38 | use strict; |
|---|
| … | … | |
| 56 | 56 | # Let's clear Execution Logs, if any. |
|---|
| 57 | 57 | |
|---|
| 58 | | if (-e $main::vhcs2_htuser_mngr_el) { |
|---|
| 59 | | |
|---|
| 60 | | $rs = del_file($main::vhcs2_htuser_mngr_el); |
|---|
| | 58 | if (-e $main::ispcp_htuser_mngr_el) { |
|---|
| | 59 | |
|---|
| | 60 | $rs = del_file($main::ispcp_htuser_mngr_el); |
|---|
| 61 | 61 | |
|---|
| 62 | 62 | return $rs if ($rs != 0); |
|---|
| … | … | |
| 1263 | 1263 | if ($rs != 0) { |
|---|
| 1264 | 1264 | |
|---|
| 1265 | | dump_el(\@main::el, $main::vhcs2_htuser_mngr_el); |
|---|
| | 1265 | dump_el(\@main::el, $main::ispcp_htuser_mngr_el); |
|---|
| 1266 | 1266 | |
|---|
| 1267 | 1267 | htuser_mngr_shut_down(); |
|---|
| … | … | |
| 1275 | 1275 | if ($rs != 0) { |
|---|
| 1276 | 1276 | |
|---|
| 1277 | | dump_el(\@main::el, $main::vhcs2_htuser_mngr_el); |
|---|
| | 1277 | dump_el(\@main::el, $main::ispcp_htuser_mngr_el); |
|---|
| 1278 | 1278 | |
|---|
| 1279 | 1279 | htuser_mngr_shut_down(); |
|---|
| … | … | |
| 1287 | 1287 | if ($rs != 0) { |
|---|
| 1288 | 1288 | |
|---|
| 1289 | | dump_el(\@main::el, $main::vhcs2_htuser_mngr_el); |
|---|
| | 1289 | dump_el(\@main::el, $main::ispcp_htuser_mngr_el); |
|---|
| 1290 | 1290 | |
|---|
| 1291 | 1291 | exit 1; |
|---|
| r154 |
r479 |
|
| 1 | 1 | #!/usr/bin/perl |
|---|
| 2 | 2 | |
|---|
| 3 | | # VHCS(tm) - Virtual Hosting Control System |
|---|
| | 3 | # ISPCP(tm) - Virtual Hosting Control System |
|---|
| 4 | 4 | # Copyright (c) 2001-2004 by moleSoftware GmbH |
|---|
| 5 | 5 | # http://www.molesoftware.com |
|---|
| … | … | |
| 24 | 24 | # |
|---|
| 25 | 25 | # |
|---|
| 26 | | # The VHCS Home Page is at: |
|---|
| | 26 | # The ISPCP Home Page is at: |
|---|
| 27 | 27 | # |
|---|
| 28 | 28 | # http://www.vhcs.net |
|---|
| … | … | |
| 31 | 31 | use FindBin; |
|---|
| 32 | 32 | use lib "$FindBin::Bin/"; |
|---|
| 33 | | require 'vhcs2_common_code.pl'; |
|---|
| | 33 | require 'ispcp_common_code.pl'; |
|---|
| 34 | 34 | |
|---|
| 35 | 35 | use strict; |
|---|
| … | … | |
| 164 | 164 | # Let's clear Execution Logs, if any. |
|---|
| 165 | 165 | |
|---|
| 166 | | if (-e $main::vhcs2_mbox_mngr_el) { |
|---|
| 167 | | |
|---|
| 168 | | $rs = del_file($main::vhcs2_mbox_mngr_el); |
|---|
| | 166 | if (-e $main::ispcp_mbox_mngr_el) { |
|---|
| | 167 | |
|---|
| | 168 | $rs = del_file($main::ispcp_mbox_mngr_el); |
|---|
| 169 | 169 | |
|---|
| 170 | 170 | return $rs if ($rs != 0); |
|---|
| … | … | |
| 271 | 271 | my ($sys, $working) = (undef, undef); |
|---|
| 272 | 272 | |
|---|
| 273 | | my $aliases_cfg = "/etc/postfix/vhcs2/aliases"; |
|---|
| | 273 | my $aliases_cfg = "/etc/postfix/ispcp/aliases"; |
|---|
| 274 | 274 | |
|---|
| 275 | 275 | my $aliases_working_cfg = "$working_dir/aliases"; |
|---|
| … | … | |
| 277 | 277 | my $aliases_backup_cfg = "$backup_dir/aliases.$timestamp"; |
|---|
| 278 | 278 | |
|---|
| 279 | | my $transport_cfg = "/etc/postfix/vhcs2/transport"; |
|---|
| | 279 | my $transport_cfg = "/etc/postfix/ispcp/transport"; |
|---|
| 280 | 280 | |
|---|
| 281 | 281 | my $transport_working_cfg = "$working_dir/transport"; |
|---|
| … | … | |
| 307 | 307 | my $hash_key = "$mail_acc\@$dmn_name"; |
|---|
| 308 | 308 | |
|---|
| 309 | | my $hash_value = "$mail_acc\@$dmn_name,$mail_acc\@vhcs2-arpl.$dmn_name"; |
|---|
| | 309 | my $hash_value = "$mail_acc\@$dmn_name,$mail_acc\@ispcp-arpl.$dmn_name"; |
|---|
| 310 | 310 | |
|---|
| 311 | 311 | $rs = del_mta_hash_value($aliases_working_cfg, $hash_key); |
|---|
| … | … | |
| 326 | 326 | |
|---|
| 327 | 327 | |
|---|
| 328 | | $hash_key = "vhcs2-arpl.$dmn_name"; |
|---|
| 329 | | |
|---|
| 330 | | $hash_value = "vhcs2-arpl:"; |
|---|
| | 328 | $hash_key = "ispcp-arpl.$dmn_name"; |
|---|
| | 329 | |
|---|
| | 330 | $hash_value = "ispcp-arpl:"; |
|---|
| 331 | 331 | |
|---|
| 332 | 332 | $rs = set_mta_hash_value($transport_working_cfg, $hash_key, $hash_value); |
|---|
| … | … | |
| 350 | 350 | my $hash_key = "$mail_acc\@$dmn_name"; |
|---|
| 351 | 351 | |
|---|
| 352 | | my $hash_value = "$mail_acc\@$dmn_name,$mail_acc\@vhcs2-arpl.$dmn_name"; |
|---|
| | 352 | my $hash_value = "$mail_acc\@$dmn_name,$mail_acc\@ispcp-arpl.$dmn_name"; |
|---|
| 353 | 353 | |
|---|
| 354 | 354 | $rs = del_mta_hash_value($aliases_working_cfg, $hash_key); |
|---|
| … | … | |
| 369 | 369 | |
|---|
| 370 | 370 | |
|---|
| 371 | | $hash_key = "vhcs2-arpl.$dmn_name"; |
|---|
| 372 | | |
|---|
| 373 | | $hash_value = "vhcs2-arpl:"; |
|---|
| | 371 | $hash_key = "ispcp-arpl.$dmn_name"; |
|---|
| | 372 | |
|---|
| | 373 | $hash_value = "ispcp-arpl:"; |
|---|
| 374 | 374 | |
|---|
| 375 | 375 | $rs = set_mta_hash_value($transport_working_cfg, $hash_key, $hash_value); |
|---|
| … | … | |
| 397 | 397 | my $hash_key = "$mail_acc\@$sub_name"; |
|---|
| 398 | 398 | |
|---|
| 399 | | my $hash_value = "$mail_acc\@$sub_name,$mail_acc\@vhcs2-arpl.$sub_name"; |
|---|
| | 399 | my $hash_value = "$mail_acc\@$sub_name,$mail_acc\@ispcp-arpl.$sub_name"; |
|---|
| 400 | 400 | |
|---|
| 401 | 401 | $rs = del_mta_hash_value($aliases_working_cfg, $hash_key); |
|---|
| … | … | |
| 416 | 416 | |
|---|
| 417 | 417 | |
|---|
| 418 | | $hash_key = "vhcs2-arpl.$sub_name"; |
|---|
| 419 | | |
|---|
| 420 | | $hash_value = "vhcs2-arpl:"; |
|---|
| | 418 | $hash_key = "ispcp-arpl.$sub_name"; |
|---|
| | 419 | |
|---|
| | 420 | $hash_value = "ispcp-arpl:"; |
|---|
| 421 | 421 | |
|---|
| 422 | 422 | $rs = set_mta_hash_value($transport_working_cfg, $hash_key, $hash_value); |
|---|
| … | … | |
| 448 | 448 | if ($rdata eq '') { |
|---|
| 449 | 449 | |
|---|
| 450 | | $hash_value = "$mail_acc\@$dmn_name,$mail_acc\@vhcs2-arpl.$dmn_name"; |
|---|
| | 450 | $hash_value = "$mail_acc\@$dmn_name,$mail_acc\@ispcp-arpl.$dmn_name"; |
|---|
| 451 | 451 | |
|---|
| 452 | 452 | } else { |
|---|
| 453 | 453 | |
|---|
| 454 | | $hash_value = $rdata.",$mail_acc\@vhcs2-arpl.$dmn_name"; |
|---|
| | 454 | $hash_value = $rdata.",$mail_acc\@ispcp-arpl.$dmn_name"; |
|---|
| 455 | 455 | |
|---|
| 456 | 456 | } |
|---|
| … | … | |
| 470 | 470 | |
|---|
| 471 | 471 | |
|---|
| 472 | | $hash_key = "vhcs2-arpl.$dmn_name"; |
|---|
| 473 | | |
|---|
| 474 | | $hash_value = "vhcs2-arpl:"; |
|---|
| | 472 | $hash_key = "ispcp-arpl.$dmn_name"; |
|---|
| | 473 | |
|---|
| | 474 | $hash_value = "ispcp-arpl:"; |
|---|
| 475 | 475 | |
|---|
| 476 | 476 | $rs = set_mta_hash_value($transport_working_cfg, $hash_key, $hash_value); |
|---|
| … | … | |
| 502 | 502 | if ($rdata eq '') { |
|---|
| 503 | 503 | |
|---|
| 504 | | $hash_value = "$mail_acc\@$dmn_name,$mail_acc\@vhcs2-arpl.$dmn_name"; |
|---|
| | 504 | $hash_value = "$mail_acc\@$dmn_name,$mail_acc\@ispcp-arpl.$dmn_name"; |
|---|
| 505 | 505 | |
|---|
| 506 | 506 | } else { |
|---|
| 507 | 507 | |
|---|
| 508 | | $hash_value = $rdata.",$mail_acc\@vhcs2-arpl.$dmn_name"; |
|---|
| | 508 | $hash_value = $rdata.",$mail_acc\@ispcp-arpl.$dmn_name"; |
|---|
| 509 | 509 | |
|---|
| 510 | 510 | } |
|---|
| … | … | |
| 524 | 524 | |
|---|
| 525 | 525 | |
|---|
| 526 | | $hash_key = "vhcs2-arpl.$dmn_name"; |
|---|
| 527 | | |
|---|
| 528 | | $hash_value = "vhcs2-arpl:"; |
|---|
| | 526 | $hash_key = "ispcp-arpl.$dmn_name"; |
|---|
| | 527 | |
|---|
| | 528 | $hash_value = "ispcp-arpl:"; |
|---|
| 529 | 529 | |
|---|
| 530 | 530 | $rs = set_mta_hash_value($transport_working_cfg, $hash_key, $hash_value); |
|---|
| … | … | |
| 559 | 559 | if ($rdata eq '') { |
|---|
| 560 | 560 | |
|---|
| 561 | | $hash_value = "$mail_acc\@$sub_name,$mail_acc\@vhcs2-arpl.$sub_name"; |
|---|
| | 561 | $hash_value = "$mail_acc\@$sub_name,$mail_acc\@ispcp-arpl.$sub_name"; |
|---|
| 562 | 562 | |
|---|
| 563 | 563 | } else { |
|---|
| 564 | 564 | |
|---|
| 565 | | $hash_value = $rdata.",$mail_acc\@vhcs2-arpl.$sub_name"; |
|---|
| | 565 | $hash_value = $rdata.",$mail_acc\@ispcp-arpl.$sub_name"; |
|---|
| 566 | 566 | |
|---|
| 567 | 567 | } |
|---|
| … | … | |
| 581 | 581 | |
|---|
| 582 | 582 | |
|---|
| 583 | | $hash_key = "vhcs2-arpl.$sub_name"; |
|---|
| 584 | | |
|---|
| 585 | | $hash_value = "vhcs2-arpl:"; |
|---|
| | 583 | $hash_key = "ispcp-arpl.$sub_name"; |
|---|
| | 584 | |
|---|
| | 585 | $hash_value = "ispcp-arpl:"; |
|---|
| 586 | 586 | |
|---|
| 587 | 587 | $rs = set_mta_hash_value($transport_working_cfg, $hash_key, $hash_value); |
|---|
| … | … | |
| 686 | 686 | |
|---|
| 687 | 687 | |
|---|
| 688 | | my $hash_key = "vhcs2-arpl.$dmn_name"; |
|---|
| | 688 | my $hash_key = "ispcp-arpl.$dmn_name"; |
|---|
| 689 | 689 | |
|---|
| 690 | 690 | if ($mail_type eq 'alias_mail' || $mail_type eq 'alias_forward') { |
|---|
| … | … | |
| 692 | 692 | my $als_name = $main::als_id_name{$mail_sub_id}; |
|---|
| 693 | 693 | |
|---|
| 694 | | $hash_key = "vhcs2-arpl.$als_name"; |
|---|
| | 694 | $hash_key = "ispcp-arpl.$als_name"; |
|---|
| 695 | 695 | |
|---|
| 696 | 696 | } |
|---|
| … | … | |
| 718 | 718 | my $sub_name = "$sub_pref.$dmn_name"; |
|---|
| 719 | 719 | |
|---|
| 720 | | $hash_key = "vhcs2-arpl.$sub_name"; |
|---|
| | 720 | $hash_key = "ispcp-arpl.$sub_name"; |
|---|
| 721 | 721 | |
|---|
| 722 | 722 | $rs = del_mta_hash_value($transport_working_cfg, $hash_key); |
|---|
| … | … | |
| 779 | 779 | my ($sys, $working) = (undef, undef); |
|---|
| 780 | 780 | |
|---|
| 781 | | my $aliases_cfg = "/etc/postfix/vhcs2/aliases"; |
|---|
| | 781 | my $aliases_cfg = "/etc/postfix/ispcp/aliases"; |
|---|
| 782 | 782 | |
|---|
| 783 | 783 | my $aliases_working_cfg = "$working_dir/aliases"; |
|---|
| … | … | |
| 785 | 785 | my $aliases_backup_cfg = "$backup_dir/aliases.$timestamp"; |
|---|
| 786 | 786 | |
|---|
| 787 | | my $transport_cfg = "/etc/postfix/vhcs2/transport"; |
|---|
| | 787 | my $transport_cfg = "/etc/postfix/ispcp/transport"; |
|---|
| 788 | 788 | |
|---|
| 789 | 789 | my $transport_working_cfg = "$working_dir/transport"; |
|---|
| … | … | |
| 962 | 962 | if ($rdata ne '') { |
|---|
| 963 | 963 | |
|---|
| 964 | | $rdata =~ s/\,$mail_acc\@vhcs2-arpl\.$dmn_name//gi; |
|---|
| | 964 | $rdata =~ s/\,$mail_acc\@ispcp-arpl\.$dmn_name//gi; |
|---|
| 965 | 965 | |
|---|
| 966 | 966 | $rs = set_mta_hash_value($aliases_working_cfg, $hash_key, $rdata); |
|---|
| … | … | |
| 1019 | 1019 | if ($rdata ne '') { |
|---|
| 1020 | 1020 | |
|---|
| 1021 | | $rdata =~ s/\,$mail_acc\@vhcs2-arpl\.$dmn_name//gi; |
|---|
| | 1021 | $rdata =~ s/\,$mail_acc\@ispcp-arpl\.$dmn_name//gi; |
|---|
| 1022 | 1022 | |
|---|
| 1023 | 1023 | $rs = set_mta_hash_value($aliases_working_cfg, $hash_key, $rdata); |
|---|
| … | … | |
| 1080 | 1080 | if ($rdata ne '') { |
|---|
| 1081 | 1081 | |
|---|
| 1082 | | $rdata =~ s/\,$mail_acc\@vhcs2-arpl\.$sub_name//gi; |
|---|
| | 1082 | $rdata =~ s/\,$mail_acc\@ispcp-arpl\.$sub_name//gi; |
|---|
| 1083 | 1083 | |
|---|
| 1084 | 1084 | $rs = set_mta_hash_value($aliases_working_cfg, $hash_key, $rdata); |
|---|
| … | … | |
| 1182 | 1182 | my ($sys, $working) = (undef, undef); |
|---|
| 1183 | 1183 | |
|---|
| 1184 | | my $mailboxes_cfg = "/etc/postfix/vhcs2/mailboxes"; |
|---|
| | 1184 | my $mailboxes_cfg = "/etc/postfix/ispcp/mailboxes"; |
|---|
| 1185 | 1185 | |
|---|
| 1186 | 1186 | my $mailboxes_working_cfg = "$working_dir/mailboxes"; |
|---|
| … | … | |
| 1188 | 1188 | my $mailboxes_backup_cfg = "$backup_dir/mailboxes.$timestamp"; |
|---|
| 1189 | 1189 | |
|---|
| 1190 | | my $aliases_cfg = "/etc/postfix/vhcs2/aliases"; |
|---|
| | 1190 | my $aliases_cfg = "/etc/postfix/ispcp/aliases"; |
|---|
| 1191 | 1191 | |
|---|
| 1192 | 1192 | my $aliases_working_cfg = "$working_dir/aliases"; |
|---|
| … | … | |
| 1790 | 1790 | my ($sys, $working) = (undef, undef); |
|---|
| 1791 | 1791 | |
|---|
| 1792 | | my $mailboxes_cfg = "/etc/postfix/vhcs2/mailboxes"; |
|---|
| | 1792 | my $mailboxes_cfg = "/etc/postfix/ispcp/mailboxes"; |
|---|
| 1793 | 1793 | |
|---|
| 1794 | 1794 | my $mailboxes_working_cfg = "$working_dir/mailboxes"; |
|---|
| … | … | |
| 1796 | 1796 | my $mailboxes_backup_cfg = "$backup_dir/mailboxes.$timestamp"; |
|---|
| 1797 | 1797 | |
|---|
| 1798 | | my $aliases_cfg = "/etc/postfix/vhcs2/aliases"; |
|---|
| | 1798 | my $aliases_cfg = "/etc/postfix/ispcp/aliases"; |
|---|
| 1799 | 1799 | |
|---|
| 1800 | 1800 | my $aliases_working_cfg = "$working_dir/aliases"; |
|---|
| … | … | |
| 2715 | 2715 | my $rdata = undef; |
|---|
| 2716 | 2716 | |
|---|
| 2717 | | my $check_file = "/tmp/vhcs2-mbox-check-sasl-user"; |
|---|
| | 2717 | my $check_file = "/tmp/ispcp-mbox-check-sasl-user"; |
|---|
| 2718 | 2718 | |
|---|
| 2719 | 2719 | $cmd = "$main::cfg{'CMD_SASLDB_LISTUSERS2'} -f $main::cfg{'MTA_SASLDB_FILE'} | $main::cfg{'CMD_GREP'} '$uname' &> $check_file"; |
|---|
| … | … | |
| 3358 | 3358 | if ($rs != 0) { |
|---|
| 3359 | 3359 | |
|---|
| 3360 | | dump_el(\@main::el, $main::vhcs2_mbox_mngr_el); |
|---|
| | 3360 | dump_el(\@main::el, $main::ispcp_mbox_mngr_el); |
|---|
| 3361 | 3361 | |
|---|
| 3362 | 3362 | mbox_mngr_shut_down(); |
|---|
| … | … | |
| 3371 | 3371 | if ($rs != 0) { |
|---|
| 3372 | 3372 | |
|---|
| 3373 | | dump_el(\@main::el, $main::vhcs2_mbox_mngr_el); |
|---|
| | 3373 | dump_el(\@main::el, $main::ispcp_mbox_mngr_el); |
|---|
| 3374 | 3374 | |
|---|
| 3375 | 3375 | mbox_mngr_shut_down(); |
|---|
| … | … | |
| 3383 | 3383 | if ($rs != 0) { |
|---|
| 3384 | 3384 | |
|---|
| 3385 | | dump_el(\@main::el, $main::vhcs2_mbox_mngr_el); |
|---|
| | 3385 | dump_el(\@main::el, $main::ispcp_mbox_mngr_el); |
|---|
| 3386 | 3386 | |
|---|
| 3387 | 3387 | exit 1; |
|---|
| r449 |
r479 |
|
| 1 | 1 | #!/usr/bin/perl |
|---|
| 2 | 2 | |
|---|
| 3 | | # VHCS(tm) - Virtual Hosting Control System |
|---|
| | 3 | # ISPCP(tm) - Virtual Hosting Control System |
|---|
| 4 | 4 | # Copyright (c) 2001-2004 by moleSoftware GmbH |
|---|
| 5 | 5 | # http://www.molesoftware.com |
|---|
| … | … | |
| 24 | 24 | # |
|---|
| 25 | 25 | # |
|---|
| 26 | | # The VHCS Home Page is at: |
|---|
| | 26 | # The ISPCP Home Page is at: |
|---|
| 27 | 27 | # |
|---|
| 28 | 28 | # http://www.vhcs.net |
|---|
| … | … | |
| 31 | 31 | use FindBin; |
|---|
| 32 | 32 | use lib "$FindBin::Bin/"; |
|---|
| 33 | | require 'vhcs2_common_code.pl'; |
|---|
| | 33 | require 'ispcp_common_code.pl'; |
|---|
| 34 | 34 | |
|---|
| 35 | 35 | use strict; |
|---|
| … | … | |
| 51 | 51 | # Let's clear Execution Logs, if any. |
|---|
| 52 | 52 | |
|---|
| 53 | | if (-e $main::vhcs2_rqst_mngr_el) { |
|---|
| 54 | | |
|---|
| 55 | | $rs = del_file($main::vhcs2_rqst_mngr_el); |
|---|
| | 53 | if (-e $main::ispcp_rqst_mngr_el) { |
|---|
| | 54 | |
|---|
| | 55 | $rs = del_file($main::ispcp_rqst_mngr_el); |
|---|
| 56 | 56 | |
|---|
| 57 | 57 | return $rs if ($rs != 0); |
|---|
| … | … | |
| 141 | 141 | } |
|---|
| 142 | 142 | |
|---|
| 143 | | $rs = sys_command("$main::vhcs2_dmn_mngr $dmn_id 1>$main::vhcs2_dmn_mngr_stdout 2>$main::vhcs2_dmn_mngr_stderr"); |
|---|
| | 143 | $rs = sys_command("$main::ispcp_dmn_mngr $dmn_id 1>$main::ispcp_dmn_mngr_stdout 2>$main::ispcp_dmn_mngr_stderr"); |
|---|
| 144 | 144 | |
|---|
| 145 | 145 | if ($rs != 0) { |
|---|
| 146 | 146 | |
|---|
| 147 | | if (-e $main::vhcs2_dmn_mngr_el) { |
|---|
| | 147 | if (-e $main::ispcp_dmn_mngr_el) { |
|---|
| 148 | 148 | |
|---|
| 149 | 149 | my $rs1 = undef; |
|---|
| … | … | |
| 151 | 151 | pop_el(\@main::el); # removing 'sys_command()' error message; |
|---|
| 152 | 152 | |
|---|
| 153 | | ($rs1, $rdata) = get_el_error($main::vhcs2_dmn_mngr_el); |
|---|
| | 153 | ($rs1, $rdata) = get_el_error($main::ispcp_dmn_mngr_el); |
|---|
| 154 | 154 | |
|---|
| 155 | 155 | return $rs1 if ($rs1 != 0); |
|---|
| 156 | 156 | |
|---|
| 157 | | push_el(\@main::el, $main::vhcs2_dmn_mngr, $rdata); |
|---|
| | 157 | push_el(\@main::el, $main::ispcp_dmn_mngr, $rdata); |
|---|
| 158 | 158 | |
|---|
| 159 | 159 | } |
|---|
| … | … | |
| 161 | 161 | if (!defined($main::engine_debug)) { |
|---|
| 162 | 162 | |
|---|
| 163 | | del_file($main::vhcs2_dmn_mngr_stdout); del_file($main::vhcs2_dmn_mngr_stderr); |
|---|
| | 163 | del_file($main::ispcp_dmn_mngr_stdout); del_file($main::ispcp_dmn_mngr_stderr); |
|---|
| 164 | 164 | |
|---|
| 165 | 165 | } |
|---|
| … | … | |
| 171 | 171 | if (!defined($main::engine_debug)) { |
|---|
| 172 | 172 | |
|---|
| 173 | | del_file($main::vhcs2_dmn_mngr_stdout); del_file($main::vhcs2_dmn_mngr_stderr); |
|---|
| | 173 | del_file($main::ispcp_dmn_mngr_stdout); del_file($main::ispcp_dmn_mngr_stderr); |
|---|
| 174 | 174 | |
|---|
| 175 | 175 | } |
|---|
| … | … | |
| 204 | 204 | } |
|---|
| 205 | 205 | |
|---|
| 206 | | $rs = sys_command("$main::vhcs2_sub_mngr $sub_id 1>$main::vhcs2_sub_mngr_stdout 2>$main::vhcs2_sub_mngr_stderr"); |
|---|
| | 206 | $rs = sys_command("$main::ispcp_sub_mngr $sub_id 1>$main::ispcp_sub_mngr_stdout 2>$main::ispcp_sub_mngr_stderr"); |
|---|
| 207 | 207 | |
|---|
| 208 | 208 | if ($rs != 0) { |
|---|
| 209 | 209 | |
|---|
| 210 | | if (-e $main::vhcs2_sub_mngr_el) { |
|---|
| | 210 | if (-e $main::ispcp_sub_mngr_el) { |
|---|
| 211 | 211 | |
|---|
| 212 | 212 | my $rs1 = undef; |
|---|
| … | … | |
| 214 | 214 | pop_el(\@main::el); # removing 'sys_command()' error message; |
|---|
| 215 | 215 | |
|---|
| 216 | | ($rs1, $rdata) = get_el_error($main::vhcs2_sub_mngr_el); |
|---|
| | 216 | ($rs1, $rdata) = get_el_error($main::ispcp_sub_mngr_el); |
|---|
| 217 | 217 | |
|---|
| 218 | 218 | return $rs1 if ($rs1 != 0); |
|---|
| 219 | 219 | |
|---|
| 220 | | push_el(\@main::el, $main::vhcs2_sub_mngr, $rdata); |
|---|
| | 220 | push_el(\@main::el, $main::ispcp_sub_mngr, $rdata); |
|---|
| 221 | 221 | |
|---|
| 222 | 222 | } |
|---|
| … | … | |
| 224 | 224 | if (!defined($main::engine_debug)) { |
|---|
| 225 | 225 | |
|---|
| 226 | | del_file($main::vhcs2_sub_mngr_stdout); del_file($main::vhcs2_sub_mngr_stderr); |
|---|
| | 226 | del_file($main::ispcp_sub_mngr_stdout); del_file($main::ispcp_sub_mngr_stderr); |
|---|
| 227 | 227 | |
|---|
| 228 | 228 | } |
|---|
| … | … | |
| 234 | 234 | if (!defined($main::engine_debug)) { |
|---|
| 235 | 235 | |
|---|
| 236 | | del_file($main::vhcs2_sub_mngr_stdout); del_file($main::vhcs2_sub_mngr_stderr); |
|---|
| | 236 | del_file($main::ispcp_sub_mngr_stdout); del_file($main::ispcp_sub_mngr_stderr); |
|---|
| 237 | 237 | |
|---|
| 238 | 238 | } |
|---|
| … | … | |
| 266 | 266 | } |
|---|
| 267 | 267 | |
|---|
| 268 | | $rs = sys_command("$main::vhcs2_als_mngr $als_id 1>$main::vhcs2_als_mngr_stdout 2>$main::vhcs2_als_mngr_stderr"); |
|---|
| | 268 | $rs = sys_command("$main::ispcp_als_mngr $als_id 1>$main::ispcp_als_mngr_stdout 2>$main::ispcp_als_mngr_stderr"); |
|---|
| 269 | 269 | |
|---|
| 270 | 270 | if ($rs != 0) { |
|---|
| 271 | 271 | |
|---|
| 272 | | if (-e $main::vhcs2_als_mngr_el) { |
|---|
| | 272 | if (-e $main::ispcp_als_mngr_el) { |
|---|
| 273 | 273 | |
|---|
| 274 | 274 | my $rs1 = undef; |
|---|
| … | … | |
| 276 | 276 | pop_el(\@main::el); # removing 'sys_command()' error message; |
|---|
| 277 | 277 | |
|---|
| 278 | | ($rs1, $rdata) = get_el_error($main::vhcs2_als_mngr_el); |
|---|
| | 278 | ($rs1, $rdata) = get_el_error($main::ispcp_als_mngr_el); |
|---|
| 279 | 279 | |
|---|
| 280 | 280 | return $rs1 if ($rs1 != 0); |
|---|
| 281 | 281 | |
|---|
| 282 | | push_el(\@main::el, $main::vhcs2_als_mngr, $rdata); |
|---|
| | 282 | push_el(\@main::el, $main::ispcp_als_mngr, $rdata); |
|---|
| 283 | 283 | |
|---|
| 284 | 284 | } |
|---|
| … | … | |
| 286 | 286 | if (!defined($main::engine_debug)) { |
|---|
| 287 | 287 | |
|---|
| 288 | | del_file($main::vhcs2_als_mngr_stdout); del_file($main::vhcs2_als_mngr_stderr); |
|---|
| | 288 | del_file($main::ispcp_als_mngr_stdout); del_file($main::ispcp_als_mngr_stderr); |
|---|
| 289 | 289 | |
|---|
| 290 | 290 | } |
|---|
| … | … | |
| 296 | 296 | if (!defined($main::engine_debug)) { |
|---|
| 297 | 297 | |
|---|
| 298 | | del_file($main::vhcs2_als_mngr_stdout); del_file($main::vhcs2_als_mngr_stderr); |
|---|
| | 298 | del_file($main::ispcp_als_mngr_stdout); del_file($main::ispcp_als_mngr_stderr); |
|---|
| 299 | 299 | |
|---|
| 300 | 300 | } |
|---|
| … | … | |
| 331 | 331 | } |
|---|
| 332 | 332 | |
|---|
| 333 | | $rs = sys_command("$main::vhcs2_mbox_mngr $mail_id 1>$main::vhcs2_mbox_mngr_stdout 2>$main::vhcs2_mbox_mngr_stderr"); |
|---|
| | 333 | $rs = sys_command("$main::ispcp_mbox_mngr $mail_id 1>$main::ispcp_mbox_mngr_stdout 2>$main::ispcp_mbox_mngr_stderr"); |
|---|
| 334 | 334 | |
|---|
| 335 | 335 | if ($rs != 0) { |
|---|
| 336 | 336 | |
|---|
| 337 | | if (-e $main::vhcs2_mbox_mngr_el) { |
|---|
| | 337 | if (-e $main::ispcp_mbox_mngr_el) { |
|---|
| 338 | 338 | |
|---|
| 339 | 339 | my $rs1 = undef; |
|---|
| … | … | |
| 341 | 341 | pop_el(\@main::el); # removing 'sys_command()' error message; |
|---|
| 342 | 342 | |
|---|
| 343 | | ($rs1, $rdata) = get_el_error($main::vhcs2_mbox_mngr_el); |
|---|
| | 343 | ($rs1, $rdata) = get_el_error($main::ispcp_mbox_mngr_el); |
|---|
| 344 | 344 | |
|---|
| 345 | 345 | return $rs1 if ($rs1 != 0); |
|---|
| 346 | 346 | |
|---|
| 347 | | push_el(\@main::el, $main::vhcs2_mbox_mngr, $rdata); |
|---|
| | 347 | push_el(\@main::el, $main::ispcp_mbox_mngr, $rdata); |
|---|
| 348 | 348 | |
|---|
| 349 | 349 | } |
|---|
| … | … | |
| 351 | 351 | if (!defined($main::engine_debug)) { |
|---|
| 352 | 352 | |
|---|
| 353 | | del_file($main::vhcs2_mbox_mngr_stdout); del_file($main::vhcs2_mbox_mngr_stderr); |
|---|
| | 353 | del_file($main::ispcp_mbox_mngr_stdout); del_file($main::ispcp_mbox_mngr_stderr); |
|---|
| 354 | 354 | |
|---|
| 355 | 355 | } |
|---|
| … | … | |
| 361 | 361 | if (!defined($main::engine_debug)) { |
|---|
| 362 | 362 | |
|---|
| 363 | | del_file($main::vhcs2_mbox_mngr_stdout); del_file($main::vhcs2_mbox_mngr_stderr); |
|---|
| | 363 | del_file($main::ispcp_mbox_mngr_stdout); del_file($main::ispcp_mbox_mngr_stderr); |
|---|
| 364 | 364 | |
|---|
| 365 | 365 | } |
|---|
| … | … | |
| 371 | 371 | if ($dmn_count > 0 || $sub_count > 0 || $als_count > 0 || $mail_count > 0) { |
|---|
| 372 | 372 | |
|---|
| 373 | | $rs = sys_command("$main::vhcs2_serv_mngr $dmn_count $sub_count $als_count $mail_count 1>$main::vhcs2_serv_mngr_stdout 2>$main::vhcs2_serv_mngr_stderr"); |
|---|
| | 373 | $rs = sys_command("$main::ispcp_serv_mngr $dmn_count $sub_count $als_count $mail_count 1>$main::ispcp_serv_mngr_stdout 2>$main::ispcp_serv_mngr_stderr"); |
|---|
| 374 | 374 | |
|---|
| 375 | 375 | if ($rs != 0) { |
|---|
| 376 | 376 | |
|---|
| 377 | | if (-e $main::vhcs2_serv_mngr_el) { |
|---|
| | 377 | if (-e $main::ispcp_serv_mngr_el) { |
|---|
| 378 | 378 | |
|---|
| 379 | 379 | my $rs1 = undef; |
|---|
| … | … | |
| 381 | 38 |
|---|
|