#!/usr/bin/perl --
#
# Configuration script for Debian's umich-libldap package.
# Used after installation to configure the default LDAP server and the
# default base DN to use. This can be run at any later time.
#

# Ensure umask is correct
umask 022;

# Turn on autoflush 
$|=1;

# Setting this to something other than /etc may be useful for testing
$etc='/etc/umich-ldap';

print "
==============================================================================
You must select the default LDAP server name for the LDAP server and
utilities to use [localhost]: ";

$defaultserver = <STDIN>;

if ($defaultserver eq "\n") {
   $defaultserver = "localhost";
}
else {
   print ">$defaultserver<";
}

open(N,">$etc/ldapserver") || die "Error creating $etc/ldapserver: $!\n";

print(N $defaultserver) || die "Error writing $etc/ldapserver: $!\n";

close(N) || die "Error closing $etc/ldapserver: $!\n";


print "
You must select the default base DN for the LDAP utilities to use
[o=Your Organization, c=US]: ";

$defaultbase = <STDIN>;

if ($defaultbase eq "\n") {
   $defaultbase = "o=Your Organization, c=US";
}

open(N,">$etc/defaultbase.ldap") || die "Error creating $etc/defaultbase.ldap: $!\n";

print(N $defaultbase) || die "Error writing $etc/defaultbase.ldap: $!\n";

close(N) || die "Error closing $etc/defaultbase.ldap: $!\n";

print "
You may run umich-libldapconfig anytime to change the configuration.
";

exit 0;
