r22170: To get the smbclient blackbox test to pass again, we need to get the
authorAndrew Bartlett <abartlet@samba.org>
Wed, 11 Apr 2007 12:10:40 +0000 (12:10 +0000)
committerGerald (Jerry) Carter <jerry@samba.org>
Wed, 10 Oct 2007 19:49:57 +0000 (14:49 -0500)
private dir to contain a valid machine account.

It isn't really valid it use the DC's account any more, so extend this
script to also join the domain.  This nicely tests out some previously
untested code too!

Andrew Bartlett

source/script/tests/selftest.pl
testprogs/blackbox/test_smbclient.sh

index 6886f8231e09f12e00608baa294ceb111994b7c8..a9ad56d312cbada0ff6b0f7893951f45e05edcc0 100755 (executable)
@@ -448,6 +448,14 @@ sub write_clientconf($$)
 
        my $abs_srcdir = cwd();
 
+       mkdir "$prefix/client" unless -d "$prefix/client";
+       
+       if ( -d "$prefix/client/private" ) {
+               unlink <$prefix/client/private/*>;
+       } else {
+               mkdir("$prefix/client/private");
+       }
+
        open(CF, ">$conffile");
        print CF "[global]\n";
        if (defined($ENV{VALGRIND})) {
@@ -456,8 +464,7 @@ sub write_clientconf($$)
                print CF "\ticonv:native = false\n";
        }
        print CF 
-"      netbios name = localtest
-       netbios aliases = localhost
+"      netbios name = client
 ";
        if (defined($vars->{DOMAIN})) {
                print CF "\tworkgroup = $vars->{DOMAIN}\n";
@@ -465,9 +472,6 @@ sub write_clientconf($$)
        if (defined($vars->{REALM})) {
                print CF "\trealm = $vars->{REALM}\n";
        }
-       if (defined($vars->{PIDDIR})) {
-               print CF "\tpid directory = $vars->{PIDDIR}\n";
-       }
        if (defined($vars->{NCALRPCDIR})) {
                print CF "\tncalrpc dir = $vars->{NCALRPCDIR}\n";
        }
@@ -475,6 +479,7 @@ sub write_clientconf($$)
                print CF "\twinbindd socket directory = $vars->{WINBINDD_SOCKET_DIR}\n";
        }
        print CF "
+        private dir = $abs_srcdir/$prefix/client/private
        js include = $abs_srcdir/scripting/libjs
        name resolve order = bcast
        interfaces = $interfaces
@@ -483,8 +488,8 @@ sub write_clientconf($$)
        notify:inotify = false
        ldb:nosync = true
        system:anonymous = true
-#We don't want to pass our self-tests if the PAC code is wrong
        torture:basedir = ./st
+#We don't want to pass our self-tests if the PAC code is wrong
        gensec:require_pac = true
 ";
        close(CF);
index e8f90060de834e51ca59f513bc2f8d61345a5ab0..a3bd958cc81ad303843bfc003e51bbb8b37b9317 100755 (executable)
@@ -37,6 +37,8 @@ runcmd() {
        return $?
 }
 
+testit "domain join" $VALGRIND bin/net join $DOMAIN $CONFIGURATION  -W "$DOMAIN" -U"$USERNAME%$PASSWORD" $@ || failed=`expr $failed + 1`
+
 # Generate random file
 cat >tmpfile<<EOF
 foo