Overview
Context
Changes
Added tests/test_vectors/Symetric_Block/ARIA128.test version [d018dfabed].
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
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 version [6c5826b0f9].
|
1
2
3
4
5
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 version [141aaf226e].
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
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 version [5645c76813].
|
1
2
3
4
5
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 version [e64140f2f6].
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
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 version [6ea522af22].
|
1
2
3
4
5
6
|
+
+
+
+
+
+
|
# ARIA256 cipher from RFC 5794
# A.3. 256-Bit Key
Key = 000102030405060708090a0b0c0d0e0f101112131415161718191a1b1c1d1e1f
Plaintext = 00112233445566778899aabbccddeeff
Ciphertext = f92bd7c79fb72e2f2b8f80c1972d24fc
|
| | | | |