diff options
Diffstat (limited to 'src/lib/kadm5/unit-test/api.2/crte-principal.exp')
-rw-r--r-- | src/lib/kadm5/unit-test/api.2/crte-principal.exp | 140 |
1 files changed, 70 insertions, 70 deletions
diff --git a/src/lib/kadm5/unit-test/api.2/crte-principal.exp b/src/lib/kadm5/unit-test/api.2/crte-principal.exp index 85b2da2c4c..8a84af2710 100644 --- a/src/lib/kadm5/unit-test/api.2/crte-principal.exp +++ b/src/lib/kadm5/unit-test/api.2/crte-principal.exp @@ -25,7 +25,7 @@ proc test2 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } one_line_fail_test { @@ -33,7 +33,7 @@ proc test2 {} { {KADM5_PRINCIPAL} testpass } "EINVAL" if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } end_dump_compare "no-diffs" @@ -51,7 +51,7 @@ proc test3 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } one_line_fail_test [format { @@ -59,7 +59,7 @@ proc test3 {} { {KADM5_PRINCIPAL} null } $test] "EINVAL" if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } end_dump_compare "no-diffs" @@ -76,7 +76,7 @@ proc test4 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } one_line_fail_test [format { @@ -84,7 +84,7 @@ proc test4 {} { {KADM5_PRINCIPAL} "" } $test] "_Q_TOOSHORT" if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } end_dump_compare "no-diffs" @@ -100,7 +100,7 @@ proc test5 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } one_line_fail_test [format { @@ -108,7 +108,7 @@ proc test5 {} { [simple_principal "%s/a"] {0x100001} "%s/a" } $test $test] "BAD_MASK" if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } end_dump_compare "no-diffs" @@ -124,7 +124,7 @@ proc test6 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } one_line_fail_test [format { @@ -132,7 +132,7 @@ proc test6 {} { {KADM5_LAST_PWD_CHANGE} "%s/a" } $test $test] "BAD_MASK" if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } end_dump_compare "no-diffs" @@ -148,7 +148,7 @@ proc test7 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } one_line_fail_test [format { @@ -156,7 +156,7 @@ proc test7 {} { {KADM5_MOD_TIME} "%s/a" } $test $test] "BAD_MASK" if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } end_dump_compare "no-diffs" @@ -172,7 +172,7 @@ proc test8 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } one_line_fail_test [format { @@ -180,7 +180,7 @@ proc test8 {} { {KADM5_MOD_NAME} "%s/a" } $test $test] "BAD_MASK" if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } end_dump_compare "no-diffs" @@ -196,7 +196,7 @@ proc test9 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } one_line_fail_test [format { @@ -204,7 +204,7 @@ proc test9 {} { {KADM5_MKVNO} "%s/a" } $test $test] "BAD_MASK" if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } end_dump_compare "no-diffs" @@ -220,7 +220,7 @@ proc test10 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } one_line_fail_test [format { @@ -228,7 +228,7 @@ proc test10 {} { {KADM5_AUX_ATTRIBUTES} "%s/a" } $test $test] "BAD_MASK" if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } end_dump_compare "no-diffs" @@ -244,7 +244,7 @@ proc test11 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } one_line_fail_test [format { @@ -252,7 +252,7 @@ proc test11 {} { {KADM5_POLICY_CLR} "%s/a" } $test $test] "BAD_MASK" if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } end_dump_compare "no-diffs" @@ -268,7 +268,7 @@ proc test12 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } one_line_fail_test [format { @@ -276,7 +276,7 @@ proc test12 {} { {KADM5_PRINCIPAL} testpass } $test] "AUTH_ADD" if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } end_dump_compare "no-diffs" @@ -298,7 +298,7 @@ proc test13 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } one_line_fail_test [format { @@ -306,7 +306,7 @@ proc test13 {} { {KADM5_PRINCIPAL} testpass } $test] "AUTH_ADD" if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } end_dump_compare "no-diffs" @@ -327,7 +327,7 @@ proc test14 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } one_line_fail_test [format { @@ -335,7 +335,7 @@ proc test14 {} { {KADM5_PRINCIPAL} testpass } $test] "AUTH_ADD" if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } end_dump_compare "no-diffs" @@ -356,7 +356,7 @@ proc test15 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } one_line_fail_test [format { @@ -364,7 +364,7 @@ proc test15 {} { {KADM5_PRINCIPAL} testpass } $test] "AUTH_ADD" if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } end_dump_compare "no-diffs" @@ -380,7 +380,7 @@ proc test16 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } one_line_fail_test [format { @@ -388,7 +388,7 @@ proc test16 {} { {KADM5_PRINCIPAL} testpass } $test] "AUTH_ADD" if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } end_dump_compare "no-diffs" @@ -409,7 +409,7 @@ proc test17 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } one_line_fail_test [format { @@ -417,7 +417,7 @@ proc test17 {} { {KADM5_PRINCIPAL} testpass } $test] "DUP" if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } end_dump_compare "no-diffs" @@ -439,7 +439,7 @@ proc test18 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } one_line_fail_test [format { @@ -448,7 +448,7 @@ proc test18 {} { {KADM5_PRINCIPAL KADM5_POLICY} tP } $test] "_Q_TOOSHORT" if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } end_dump_compare "no-diffs" @@ -470,7 +470,7 @@ proc test19 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } one_line_fail_test [format { @@ -479,7 +479,7 @@ proc test19 {} { {KADM5_PRINCIPAL KADM5_POLICY} testpassword } $test] "_Q_CLASS" if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } end_dump_compare "no-diffs" @@ -501,7 +501,7 @@ proc test20 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } one_line_fail_test [format { @@ -510,7 +510,7 @@ proc test20 {} { {KADM5_PRINCIPAL KADM5_POLICY} Abyssinia } $test] "_Q_DICT" if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } end_dump_compare "no-diffs" @@ -532,7 +532,7 @@ proc test21 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } one_line_fail_test [format { @@ -541,7 +541,7 @@ proc test21 {} { {KADM5_PRINCIPAL KADM5_POLICY} NotinTheDictionary } $test] "UNK_POLICY" if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } end_dump_compare "no-diffs" @@ -562,7 +562,7 @@ proc test23 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } if {! [cmd [format { @@ -575,7 +575,7 @@ proc test23 {} { one_line_succeed_test \ [format {kadm5_get_principal $server_handle "%s/a" p KADM5_PRINCIPAL_NORMAL_MASK} $test] if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } } @@ -594,7 +594,7 @@ proc test24 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } if {! [cmd [format { @@ -607,7 +607,7 @@ proc test24 {} { one_line_succeed_test \ [format {kadm5_get_principal $server_handle "%s/a" p KADM5_PRINCIPAL_NORMAL_MASK} $test] if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } } @@ -629,7 +629,7 @@ proc test28 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } @@ -653,7 +653,7 @@ proc test28 {} { timeout { fail "$test" } } if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } } @@ -674,7 +674,7 @@ proc test29 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } if {! [cmd [format { @@ -697,7 +697,7 @@ proc test29 {} { timeout { fail "$test" } } if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } } @@ -718,7 +718,7 @@ proc test30 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } if {! [cmd [format { @@ -741,7 +741,7 @@ proc test30 {} { timeout { fail "$test" } } if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } } @@ -762,7 +762,7 @@ proc test31 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } if {! [cmd [format { @@ -786,7 +786,7 @@ proc test31 {} { timeout { fail "$test" } } if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } } @@ -807,7 +807,7 @@ proc test32 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } if {! [cmd [format { @@ -875,7 +875,7 @@ proc test32 {} { pass "$test" } if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } } @@ -896,7 +896,7 @@ proc test33 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } if {! [cmd [format { @@ -920,7 +920,7 @@ proc test33 {} { timeout { fail "$test" } } if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } } @@ -941,7 +941,7 @@ proc test34 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } if {! [cmd [format { @@ -965,7 +965,7 @@ proc test34 {} { timeout { fail "$test" } } if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } } @@ -986,7 +986,7 @@ proc test35 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } if {! [cmd [format { @@ -1010,7 +1010,7 @@ proc test35 {} { timeout { fail "$test" } } if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } } @@ -1031,7 +1031,7 @@ proc test36 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } if {! [cmd [format { @@ -1100,7 +1100,7 @@ proc test36 {} { } if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } } @@ -1121,7 +1121,7 @@ proc test37 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } if {! [cmd [format { @@ -1143,7 +1143,7 @@ proc test37 {} { timeout { fail "$test" } } if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } } @@ -1164,7 +1164,7 @@ proc test38 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } if {! [cmd [format { @@ -1187,7 +1187,7 @@ proc test38 {} { timeout { fail "$test" } } if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } } @@ -1208,7 +1208,7 @@ proc test39 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } if {! [cmd [format { @@ -1272,7 +1272,7 @@ proc test39 {} { return } if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } } @@ -1293,7 +1293,7 @@ proc test40 {} { $KADM5_STRUCT_VERSION $KADM5_API_VERSION_2 \ server_handle }]} { - error "$test: unexpected failure in init" + perror "$test: unexpected failure in init" return } if {! [cmd [format { @@ -1316,7 +1316,7 @@ proc test40 {} { timeout { fail "$test" } } if { ! [cmd {kadm5_destroy $server_handle}]} { - error "$test: unexpected failure in destroy" + perror "$test: unexpected failure in destroy" return } } |