$ docker run --rm --name validator-libsodium-usage-r-cran-sodium-r13-hash-blake2b-length-2732 -t --mount type=bind,src=/tmp/validator-status-libsodium-usage-r-cran-sodium-r13-hash-blake2b-length,dst=/validator/status validator-libsodium-shared bash -lc 'set -euo pipefail
/validator/tests/_shared/install_override_debs.sh
exec /validator/tests/_shared/run_library_tests.sh "$@"' validator-testcase libsodium usage-r-cran-sodium-r13-hash-blake2b-length -- bash -c 'PS4=$1; shift; set -x; source "$@"' validator-xtrace '__VALIDATOR_XTRACE__ ' /validator/tests/libsodium/tests/cases/usage/usage-r-cran-sodium-r13-hash-blake2b-length.sh
no override packages found; continuing with apt originals
suppressMessages(library(sodium))
msg <- charToRaw("r-cran-sodium r13 blake2b payload")
h32 <- hash(msg, size = 32)
h64 <- hash(msg, size = 64)
stopifnot(is.raw(h32), is.raw(h64))
stopifnot(length(h32) == 32)
stopifnot(length(h64) == 64)
stopifnot(identical(h32, hash(msg, size = 32)))
stopifnot(identical(h64, hash(msg, size = 64)))
# Different-size digests should not be a prefix of each other byte-for-byte.
stopifnot(!identical(h32, h64[1:32]))
cat("ok\n")
'
ok