Index: ChangeLog
==================================================================
--- ChangeLog
+++ ChangeLog
@@ -1,5 +1,10 @@
+2003-10-07  Dan Razzell	<research@starfishsystems.ca>
+
+	* tests/ciphers.test: updated list of tested ciphers to correspond
+	* with those available from OpenSSL. [Request #811981]
+
 2003-10-07  Dan Razzell <research@starfishsystems.ca>
 
 	* tls.c: added CONST with intent similar to those from 2002-02-04.
 	[Request #811911]
 

Index: tests/ciphers.test
==================================================================
--- tests/ciphers.test
+++ tests/ciphers.test
@@ -76,61 +76,77 @@
 test ciphers-1.3 {Tls::ciphers for ssl3} {openssl} {
     # This will fail if you compiled against RSA bsafe or with a
     # different set of defines than the default.
     # Change the constraint setting above.
     set result [join [lsort -dict [eval tls::ciphers ssl3]] \n ]
-} [join [lsort -dict {EDH-RSA-DES-CBC3-SHA
-EDH-DSS-DES-CBC3-SHA
+} [join [lsort -dict {
+AES128-SHA
+AES256-SHA
+DES-CBC-SHA
 DES-CBC3-SHA
+DHE-DSS-AES128-SHA
+DHE-DSS-AES256-SHA
 DHE-DSS-RC4-SHA
-IDEA-CBC-SHA
-RC4-SHA
-RC4-MD5
-EXP1024-DHE-DSS-RC4-SHA
-EXP1024-RC4-SHA
-EXP1024-DHE-DSS-DES-CBC-SHA
+DHE-RSA-AES128-SHA
+DHE-RSA-AES256-SHA
+EDH-DSS-DES-CBC-SHA
+EDH-DSS-DES-CBC3-SHA
+EDH-RSA-DES-CBC-SHA
+EDH-RSA-DES-CBC3-SHA
+EXP-DES-CBC-SHA
+EXP-EDH-DSS-DES-CBC-SHA
+EXP-EDH-RSA-DES-CBC-SHA
+EXP-RC2-CBC-MD5
+EXP-RC4-MD5
 EXP1024-DES-CBC-SHA
+EXP1024-DHE-DSS-DES-CBC-SHA
+EXP1024-DHE-DSS-RC4-SHA
 EXP1024-RC2-CBC-MD5
 EXP1024-RC4-MD5
-EDH-RSA-DES-CBC-SHA
-EDH-DSS-DES-CBC-SHA
-DES-CBC-SHA
-EXP-EDH-RSA-DES-CBC-SHA
-EXP-EDH-DSS-DES-CBC-SHA
-EXP-DES-CBC-SHA
-EXP-RC2-CBC-MD5
-EXP-RC4-MD5}] \n]
+EXP1024-RC4-SHA
+IDEA-CBC-SHA
+RC4-MD5
+RC4-SHA
+}] \n]
 
 # This version of the test is correct for OpenSSL only.
 # An equivalent test for the RSA BSAFE SSL-C is earlier in this file.
 
 test ciphers-1.4 {Tls::ciphers for tls1} {openssl} {
     # This will fail if you compiled against RSA bsafe or with a
     # different set of defines than the default.
     # Change the constraint setting in all.tcl
     set result [join [lsort -dict [eval tls::ciphers tls1]] \n ]
-} [join [lsort -dict {EDH-RSA-DES-CBC3-SHA
-EDH-DSS-DES-CBC3-SHA
+} [join [lsort -dict {
+AES128-SHA
+AES256-SHA
+DES-CBC-SHA
 DES-CBC3-SHA
+DHE-DSS-AES128-SHA
+DHE-DSS-AES256-SHA
 DHE-DSS-RC4-SHA
-IDEA-CBC-SHA
-RC4-SHA
-RC4-MD5
-EXP1024-DHE-DSS-RC4-SHA
-EXP1024-RC4-SHA
-EXP1024-DHE-DSS-DES-CBC-SHA
+DHE-RSA-AES128-SHA
+DHE-RSA-AES256-SHA
+EDH-DSS-DES-CBC-SHA
+EDH-DSS-DES-CBC3-SHA
+EDH-RSA-DES-CBC-SHA
+EDH-RSA-DES-CBC3-SHA
+EXP-DES-CBC-SHA
+EXP-EDH-DSS-DES-CBC-SHA
+EXP-EDH-RSA-DES-CBC-SHA
+EXP-RC2-CBC-MD5
+EXP-RC4-MD5
 EXP1024-DES-CBC-SHA
+EXP1024-DHE-DSS-DES-CBC-SHA
+EXP1024-DHE-DSS-RC4-SHA
 EXP1024-RC2-CBC-MD5
 EXP1024-RC4-MD5
-EDH-RSA-DES-CBC-SHA
-EDH-DSS-DES-CBC-SHA
-DES-CBC-SHA
-EXP-EDH-RSA-DES-CBC-SHA
-EXP-EDH-DSS-DES-CBC-SHA
-EXP-DES-CBC-SHA
-EXP-RC2-CBC-MD5
-EXP-RC4-MD5}] \n]
+EXP1024-RC4-SHA
+IDEA-CBC-SHA
+RC4-MD5
+RC4-SHA
+}] \n]
 
 
 
 # cleanup
 ::tcltest::cleanupTests