# Auto generated from "SM3.txt"
lappend auto_path [file dirname [file dirname [file dirname [file dirname [file join [pwd] [info script]]]]]]
package require tls
package require tcltest
tcltest::testConstraint SM3 [expr {[lsearch -nocase [tls::digests] SM3] > -1}]
catch {tls::provider legacy}
tcltest::test Hash_SM3-1.1 {SM3} \
-constraints SM3 \
-setup {set data ""} \
-body {tls::digest -digest SM3 -data $data} \
-match exact -result 1ab21d8355cfa17f8e61194831e81a8f22bec8c728fefb747ed035eb5082aa2b
tcltest::test Hash_SM3-1.2 {SM3} \
-constraints SM3 \
-setup {set data "a"} \
-body {tls::digest -digest SM3 -data $data} \
-match exact -result 623476ac18f65a2909e43c7fec61b49c7e764a91a18ccb82f1917a29c86c5e88
tcltest::test Hash_SM3-1.3 {SM3} \
-constraints SM3 \
-setup {set data "abc"} \
-body {tls::digest -digest SM3 -data $data} \
-match exact -result 66c7f0f462eeedd9d1f2d46bdc10e4e24167c4875cf2f7a2297da02b8f4ba8e0
tcltest::test Hash_SM3-1.4 {SM3} \
-constraints SM3 \
-setup {set data "abcdefghijklmnopqrstuvwxyz"} \
-body {tls::digest -digest SM3 -data $data} \
-match exact -result b80fe97a4da24afc277564f66a359ef440462ad28dcc6d63adb24d5c20a61595
tcltest::test Hash_SM3-1.5 {SM3} \
-constraints SM3 \
-setup {set data "abcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcd"} \
-body {tls::digest -digest SM3 -data $data} \
-match exact -result debe9ff92275b8a138604889c18e5a4d6fdb70e5387e5765293dcba39c0c5732
tcltest::test Hash_SM3-1.6 {SM3} \
-constraints SM3 \
-setup {set data "abcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcd"} \
-body {tls::digest -digest SM3 -data $data} \
-match exact -result b965764c8bebb091c7602b74afd34eefb531dccb4e0076d9b7cd813199b45971
# Cleanup
::tcltest::cleanupTests
return