diff options
Diffstat (limited to 'testsuite/nsswitch/getpwnam.exp')
-rw-r--r-- | testsuite/nsswitch/getpwnam.exp | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/testsuite/nsswitch/getpwnam.exp b/testsuite/nsswitch/getpwnam.exp new file mode 100644 index 0000000000..49f61f1a5c --- /dev/null +++ b/testsuite/nsswitch/getpwnam.exp @@ -0,0 +1,29 @@ +# +# @(#) Test default domain users resolve using getpwnam() +# + +load_lib util-defs.exp +load_lib "$srcdir/config/env.exp" +load_lib "$srcdir/config/default-nt-names.exp" + +# Compile getpwnam.c + +set output [target_compile "$srcdir/$subdir/getpwnam.c" \ + "$srcdir/$subdir/getpwnam" executable {additional_flags="-g"}] + +if {$output != ""} { + perror "compile getpwnam" + puts $output + return +} + +# Test domain users + +foreach {user} $domain_users { + set output [util_start "$srcdir/$subdir/getpwnam" "\"$user\"" ""] + if {[regexp "PASS:" $output]} { + pass "getpwnam $user" + } else { + fail "getpwnam $user" + } +} |