1# 2# @(#) Test domain groups resolve using getgrnam() 3# 4 5load_lib "util-defs.exp" 6load_lib "compile.exp" 7 8# Compile getgrnam.c 9 10simple_compile "getgrnam" 11 12# Test domain groups 13 14set group_list [split [util_start "bin/wbinfo" "-g"] "\n"] 15 16verbose $group_list 17 18foreach {group} $group_list { 19 set output [util_start "$srcdir/$subdir/getgrnam" "\"$group\"" ""] 20 21 verbose $output 22 23 if {[regexp "PASS:" $output]} { 24 pass "getgrnam $group" 25 } else { 26 fail "getgrnam $group" 27 } 28} 29