ADDED   tests/test_vectors/Symetric_Block/ARIA128.test
Index: tests/test_vectors/Symetric_Block/ARIA128.test
==================================================================
--- /dev/null
+++ tests/test_vectors/Symetric_Block/ARIA128.test
@@ -0,0 +1,25 @@
+# Auto generated from "ARIA128.txt"
+lappend auto_path [file dirname [file dirname [file dirname [file dirname [file join [pwd] [info script]]]]]]
+package require tls
+package require tcltest
+
+catch {tls::provider legacy}
+tcltest::testConstraint ARIA128 [expr {[lsearch -nocase [tls::ciphers] ARIA128] > -1}]
+
+tcltest::test Symetric_Block_ARIA128-1.1 {Encrypt ARIA128} \
+	-constraints ARIA128 \
+	-body {binary encode hex [tls::encrypt -cipher ARIA128 -padding 0 \
+		 -key [binary decode hex 000102030405060708090a0b0c0d0e0f] \
+		 -data [binary decode hex 00112233445566778899aabbccddeeff]]} \
+	-match exact -result d718fbd6ab644c739da95f3be6451778
+
+tcltest::test Symetric_Block_ARIA128-1.2 {Decrypt ARIA128} \
+	-constraints ARIA128 \
+	-body {binary encode hex [tls::decrypt -cipher ARIA128 -padding 0 \
+		 -key [binary decode hex 000102030405060708090a0b0c0d0e0f] \
+		 -data [binary decode hex d718fbd6ab644c739da95f3be6451778]]} \
+	-match exact -result 00112233445566778899aabbccddeeff
+
+# Cleanup
+::tcltest::cleanupTests
+return

ADDED   tests/test_vectors/Symetric_Block/ARIA128.txt
Index: tests/test_vectors/Symetric_Block/ARIA128.txt
==================================================================
--- /dev/null
+++ tests/test_vectors/Symetric_Block/ARIA128.txt
@@ -0,0 +1,6 @@
+# ARIA128 cipher from RFC 5794
+
+# A.1.  128-Bit Key
+Key = 000102030405060708090a0b0c0d0e0f
+Plaintext = 00112233445566778899aabbccddeeff
+Ciphertext = d718fbd6ab644c739da95f3be6451778

ADDED   tests/test_vectors/Symetric_Block/ARIA192.test
Index: tests/test_vectors/Symetric_Block/ARIA192.test
==================================================================
--- /dev/null
+++ tests/test_vectors/Symetric_Block/ARIA192.test
@@ -0,0 +1,25 @@
+# Auto generated from "ARIA192.txt"
+lappend auto_path [file dirname [file dirname [file dirname [file dirname [file join [pwd] [info script]]]]]]
+package require tls
+package require tcltest
+
+catch {tls::provider legacy}
+tcltest::testConstraint ARIA192 [expr {[lsearch -nocase [tls::ciphers] ARIA192] > -1}]
+
+tcltest::test Symetric_Block_ARIA192-1.1 {Encrypt ARIA192} \
+	-constraints ARIA192 \
+	-body {binary encode hex [tls::encrypt -cipher ARIA192 -padding 0 \
+		 -key [binary decode hex 000102030405060708090a0b0c0d0e0f1011121314151617] \
+		 -data [binary decode hex 00112233445566778899aabbccddeeff]]} \
+	-match exact -result 26449c1805dbe7aa25a468ce263a9e79
+
+tcltest::test Symetric_Block_ARIA192-1.2 {Decrypt ARIA192} \
+	-constraints ARIA192 \
+	-body {binary encode hex [tls::decrypt -cipher ARIA192 -padding 0 \
+		 -key [binary decode hex 000102030405060708090a0b0c0d0e0f1011121314151617] \
+		 -data [binary decode hex 26449c1805dbe7aa25a468ce263a9e79]]} \
+	-match exact -result 00112233445566778899aabbccddeeff
+
+# Cleanup
+::tcltest::cleanupTests
+return

ADDED   tests/test_vectors/Symetric_Block/ARIA192.txt
Index: tests/test_vectors/Symetric_Block/ARIA192.txt
==================================================================
--- /dev/null
+++ tests/test_vectors/Symetric_Block/ARIA192.txt
@@ -0,0 +1,6 @@
+# ARIA192 cipher from RFC 5794
+
+# A.2.  192-Bit Key
+Key = 000102030405060708090a0b0c0d0e0f1011121314151617
+Plaintext = 00112233445566778899aabbccddeeff
+Ciphertext = 26449c1805dbe7aa25a468ce263a9e79

ADDED   tests/test_vectors/Symetric_Block/ARIA256.test
Index: tests/test_vectors/Symetric_Block/ARIA256.test
==================================================================
--- /dev/null
+++ tests/test_vectors/Symetric_Block/ARIA256.test
@@ -0,0 +1,25 @@
+# Auto generated from "ARIA256.txt"
+lappend auto_path [file dirname [file dirname [file dirname [file dirname [file join [pwd] [info script]]]]]]
+package require tls
+package require tcltest
+
+catch {tls::provider legacy}
+tcltest::testConstraint ARIA256 [expr {[lsearch -nocase [tls::ciphers] ARIA256] > -1}]
+
+tcltest::test Symetric_Block_ARIA256-1.1 {Encrypt ARIA256} \
+	-constraints ARIA256 \
+	-body {binary encode hex [tls::encrypt -cipher ARIA256 -padding 0 \
+		 -key [binary decode hex 000102030405060708090a0b0c0d0e0f101112131415161718191a1b1c1d1e1f] \
+		 -data [binary decode hex 00112233445566778899aabbccddeeff]]} \
+	-match exact -result f92bd7c79fb72e2f2b8f80c1972d24fc
+
+tcltest::test Symetric_Block_ARIA256-1.2 {Decrypt ARIA256} \
+	-constraints ARIA256 \
+	-body {binary encode hex [tls::decrypt -cipher ARIA256 -padding 0 \
+		 -key [binary decode hex 000102030405060708090a0b0c0d0e0f101112131415161718191a1b1c1d1e1f] \
+		 -data [binary decode hex f92bd7c79fb72e2f2b8f80c1972d24fc]]} \
+	-match exact -result 00112233445566778899aabbccddeeff
+
+# Cleanup
+::tcltest::cleanupTests
+return

ADDED   tests/test_vectors/Symetric_Block/ARIA256.txt
Index: tests/test_vectors/Symetric_Block/ARIA256.txt
==================================================================
--- /dev/null
+++ tests/test_vectors/Symetric_Block/ARIA256.txt
@@ -0,0 +1,6 @@
+# ARIA256 cipher from RFC 5794
+
+# A.3.  256-Bit Key
+Key = 000102030405060708090a0b0c0d0e0f101112131415161718191a1b1c1d1e1f
+Plaintext = 00112233445566778899aabbccddeeff
+Ciphertext = f92bd7c79fb72e2f2b8f80c1972d24fc