From d0b742ae97d201d661ce2701c836a4f706da820e Mon Sep 17 00:00:00 2001 From: Ken Raeburn Date: Mon, 24 Nov 2008 20:27:44 +0000 Subject: [PATCH] Test with varying numbers of principal name components, of varying lengths. Test principal modifications, not just additions. git-svn-id: svn://anonsvn.mit.edu/krb5/trunk@21181 dc483132-0cff-0310-8789-dd5450dbe970 --- src/tests/dejagnu/krb-standalone/iprop.exp | 21 +++++++++++++++++++-- 1 file changed, 19 insertions(+), 2 deletions(-) diff --git a/src/tests/dejagnu/krb-standalone/iprop.exp b/src/tests/dejagnu/krb-standalone/iprop.exp index 91c8b7da4..54a71a34a 100644 --- a/src/tests/dejagnu/krb-standalone/iprop.exp +++ b/src/tests/dejagnu/krb-standalone/iprop.exp @@ -70,6 +70,23 @@ proc doit { } { if ![add_kerberos_key wakawaka 0] { return } + set c chocolate-flavored-school-bus + # Long enough to make realloc likely, but not enough to grow + # basic ulog entry size. + set longname $c/$c/$c/$c/$c/$c/$c/$c/$c/$c/$c/$c/$c + if ![add_kerberos_key $longname 0] { + return + } + if ![add_kerberos_key w 0] { + return + } + if ![modify_principal w -allow_tix] { + return + } + if ![modify_principal w +allow_tix] { + return + } + # Should test rename_principal once we have that. # Run kproplog, look at output. setup_kerberos_env kdc @@ -89,7 +106,7 @@ proc doit { } { expect -re "Update log dump" expect -re "First serial \# : 1" if $des3_krbtgt { - expect -re "Last serial \# : 4" + expect -re "Last serial \# : 8" expect -re "Update Entry" expect -re "Update serial \# : 1" expect -re "Attributes changed : 15" @@ -102,7 +119,7 @@ proc doit { } { expect -re "Update Entry" expect -re "Update serial \# : 4" } else { - expect -re "Last serial \# : 3" + expect -re "Last serial \# : 7" expect -re "Update Entry" expect -re "Update serial \# : 1" expect -re "Attributes changed : 15" -- 2.26.2