summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rwxr-xr-xkolab_wizard/Kolab.pm39
1 files changed, 4 insertions, 35 deletions
diff --git a/kolab_wizard/Kolab.pm b/kolab_wizard/Kolab.pm
index 4e7628c5..0ecec1f0 100755
--- a/kolab_wizard/Kolab.pm
+++ b/kolab_wizard/Kolab.pm
@@ -34,7 +34,7 @@ if (!$IPSERVER) {
($IPSERVER) = `/sbin/ip addr show dev $interface` =~ /^\s*inet\s+(\d+\.\d+\.\d+\.\d+)/m;
}
my $DOMAINNAME = chomp_(`dnsdomainname`);
-my $kolab_config = "/etc/kolab/kolab.conf";
+#my $kolab_config = "/etc/kolab/kolab.conf";
my $o = {
name => N("Kolab configuration wizard"),
@@ -50,7 +50,7 @@ my $o = {
maildomain => $DOMAINNAME,
password => '',
},
-# needed_rpm => [ 'proftpd', 'openldap-servers', 'apache2', 'kolab-server' ],
+ needed_rpm => [ 'proftpd', 'openldap-servers', 'apache2', 'kolab-server' ],
# defaultimage => $ENV{__WIZ_HOME__},
};
@@ -119,56 +119,25 @@ sub rpm_needed_kolab {
sub new {
my ($class) = @_;
- rpm_needed_kolab();
+# rpm_needed_kolab();
bless {
o => $o,
}, $class;
}
-sub backup_conf {
- my @conf = qw(/etc/postfix/main.cf
- /etc/postfix/master.cf
- /etc/postfix/transport
- /etc/postfix/virtual
- /etc/cyrus.conf
- /etc/imapd.conf
- /etc/proftpd.conf
- /etc/openldap/slapd.conf
- /etc/sysconfig/saslauthd
- );
-
- foreach (@conf) {
- -f $_ and MDK::Common::cp_af($_, $_.".orig");
- }
- cp_af("/var/lib/ldap/", "/var/lib/ldap.orig");
-}
-
-sub check_password {
-
-}
-
-
sub do_it {
return if $::testing;
my $in = 'interactive'->vnew('su', 'Kolab server');
my $w = $in->wait_message(N("Kolab server"), N("Configuring Kolab server on your system..."));
- backup_conf();
- system("service $_ stop") foreach qw(ldap saslauthd cyrus-imapd httpd postfix);
- system("groupadd -g 60001 kolab");
local *F;
- open(F, "|/usr/sbin/kolab_bootstrap.real -b\n");
+ open(F, "|/usr/sbin/kolab_bootstrap -b\n");
print F "$o->{var}{HOSTNAME}
$o->{var}{maildomain}
$o->{var}{password}
";
close F;
- substInFile {
- s/bind_pw :.*/bind_pw : $o->{var}{password}/;
- } $kolab_config;
-
- system("chkconfig --level 35 $_ off") foreach qw(ldap saslauthd cyrus-imapd httpd postfix);
system("service kolab-server restart");
undef $w;
}