This commit fixes the test suite aspects. Callers of the various
authorTom Yu <tlyu@mit.edu>
Sat, 19 Oct 2002 01:22:31 +0000 (01:22 +0000)
committerTom Yu <tlyu@mit.edu>
Sat, 19 Oct 2002 01:22:31 +0000 (01:22 +0000)
read_password functions still need to be updated.

* api.2/init-v2.exp (test106): Make regexp more forgiving of
variant password prompts.

* api.0/init.exp (test7, test22, test225): Make regexp more
forgiving of variant password prompts.

ticket: 1217
status: open

git-svn-id: svn://anonsvn.mit.edu/krb5/trunk@14932 dc483132-0cff-0310-8789-dd5450dbe970

src/lib/kadm5/unit-test/ChangeLog
src/lib/kadm5/unit-test/api.0/init.exp
src/lib/kadm5/unit-test/api.2/init-v2.exp

index 660b75ca45461cef289fe748bbeff7eab0c15651..81bfb13f8f69c493c62e9c358737700fc2532aa5 100644 (file)
@@ -1,3 +1,11 @@
+2002-10-18  Tom Yu  <tlyu@mit.edu>
+
+       * api.2/init-v2.exp (test106): Make regexp more forgiving of
+       variant password prompts.
+
+       * api.0/init.exp (test7, test22, test225): Make regexp more
+       forgiving of variant password prompts.
+
 2002-09-15  Tom Yu  <tlyu@mit.edu>
 
        * api.0/chpass-principal.exp:
index 62b1bde357ab8b16a34d1706b7a497285668d715..f232d23d080a741ff61be21882259e18e5b6306d 100644 (file)
@@ -104,7 +104,7 @@ proc test7 {} {
 
     expect {
        {Enter password:} { }
-       -re "key:$" { }
+       -re "\n\[^\n\]+key:\[^\n\]*$" { }
        eof {
                fail "$test: eof instead of password prompt"
                api_exit
@@ -338,7 +338,7 @@ proc test22 {} {
        }]
        send "\n"
        expect {
-           -re ":$" { set prompting 1}
+           -re "\n\[^\n\]+:\[^\n\]*$" { set prompting 1}
            -re "\nOK .*$prompt$" { fail "$test: premature success" }
            -re "\nERROR .*$prompt$" { fail "$test: premature failure" }
                timeout { fail "$test: timeout" }
@@ -363,7 +363,7 @@ proc test225 {} {
        }]
        send "\n"
        expect {
-           -re ":$" { set prompting 1}
+           -re "\n\[^\n\]+:\[^\n\]*$" { set prompting 1}
            -re "\nOK .*$prompt$" { fail "$test: premature success" }
            -re "\nERROR .*$prompt$" { fail "$test: premature failure" }
                timeout { fail "$test: timeout" }
index 11eac5b455e4f36ec52ee11af40b0c2007ae832d..0e3359b193f51b4c0a0d4bdc6d85481dfbf73822 100644 (file)
@@ -112,7 +112,8 @@ if {! $RPC} test103
 test "init 106"
 proc test106 {} {
     global test prompt
-    
+
+    set prompting 0
     send [string trim {
        kadm5_init admin admin $KADM5_ADMIN_SERVICE \
                [config_params {KADM5_CONFIG_MKEY_FROM_KBD} 1] \
@@ -121,7 +122,7 @@ proc test106 {} {
     }]
     send "\n"
     expect {
-       -re ":$" { set prompting 1}
+       -re "\n\[^\n\]+:\[^\n\]*$" { set prompting 1}
        -re "\nOK .*$prompt$" { fail "$test: premature success" }
        -re "\nERROR .*$prompt$" { fail "$test: premature failure" }
        timeout { fail "$test: timeout" }