2014-08-31 10:22:11 +02:00
|
|
|
#!/bin/sh
|
2013-07-19 13:41:51 +02:00
|
|
|
|
2016-09-04 23:31:09 +02:00
|
|
|
# compat.sh
|
|
|
|
#
|
2020-08-07 13:07:28 +02:00
|
|
|
# Copyright The Mbed TLS Contributors
|
2020-05-26 01:54:15 +02:00
|
|
|
# SPDX-License-Identifier: Apache-2.0
|
|
|
|
#
|
|
|
|
# Licensed under the Apache License, Version 2.0 (the "License"); you may
|
|
|
|
# not use this file except in compliance with the License.
|
|
|
|
# You may obtain a copy of the License at
|
|
|
|
#
|
|
|
|
# http://www.apache.org/licenses/LICENSE-2.0
|
|
|
|
#
|
|
|
|
# Unless required by applicable law or agreed to in writing, software
|
|
|
|
# distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
|
|
|
|
# WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
|
|
|
|
# See the License for the specific language governing permissions and
|
|
|
|
# limitations under the License.
|
|
|
|
#
|
2016-09-04 23:31:09 +02:00
|
|
|
# Purpose
|
|
|
|
#
|
|
|
|
# Test interoperbility with OpenSSL, GnuTLS as well as itself.
|
2014-03-25 19:07:28 +01:00
|
|
|
#
|
|
|
|
# Check each common ciphersuite, with each version, both ways (client/server),
|
|
|
|
# with and without client authentication.
|
2014-02-20 11:01:30 +01:00
|
|
|
|
2014-03-28 10:12:38 +01:00
|
|
|
set -u
|
|
|
|
|
2019-07-03 14:51:04 +02:00
|
|
|
# Limit the size of each log to 10 GiB, in case of failures with this script
|
|
|
|
# where it may output seemingly unlimited length error logs.
|
|
|
|
ulimit -f 20971520
|
|
|
|
|
2014-03-25 18:04:59 +01:00
|
|
|
# initialise counters
|
2014-08-31 10:22:11 +02:00
|
|
|
TESTS=0
|
|
|
|
FAILED=0
|
|
|
|
SKIPPED=0
|
|
|
|
SRVMEM=0
|
2013-08-27 22:00:47 +02:00
|
|
|
|
2019-01-23 15:24:37 +01:00
|
|
|
# default commands, can be overridden by the environment
|
2016-09-04 23:31:09 +02:00
|
|
|
: ${M_SRV:=../programs/ssl/ssl_server2}
|
|
|
|
: ${M_CLI:=../programs/ssl/ssl_client2}
|
2014-03-13 18:47:44 +01:00
|
|
|
: ${OPENSSL_CMD:=openssl} # OPENSSL would conflict with the build system
|
|
|
|
: ${GNUTLS_CLI:=gnutls-cli}
|
|
|
|
: ${GNUTLS_SERV:=gnutls-serv}
|
2014-02-27 12:25:54 +01:00
|
|
|
|
2014-08-31 16:20:58 +02:00
|
|
|
# do we have a recent enough GnuTLS?
|
2015-06-26 15:45:30 +02:00
|
|
|
if ( which $GNUTLS_CLI && which $GNUTLS_SERV ) >/dev/null 2>&1; then
|
2014-10-24 12:57:37 +02:00
|
|
|
G_VER="$( $GNUTLS_CLI --version | head -n1 )"
|
|
|
|
if echo "$G_VER" | grep '@VERSION@' > /dev/null; then # git version
|
2014-08-31 16:20:58 +02:00
|
|
|
PEER_GNUTLS=" GnuTLS"
|
2014-10-24 12:57:37 +02:00
|
|
|
else
|
|
|
|
eval $( echo $G_VER | sed 's/.* \([0-9]*\)\.\([0-9]\)*\.\([0-9]*\)$/MAJOR="\1" MINOR="\2" PATCH="\3"/' )
|
|
|
|
if [ $MAJOR -lt 3 -o \
|
|
|
|
\( $MAJOR -eq 3 -a $MINOR -lt 2 \) -o \
|
|
|
|
\( $MAJOR -eq 3 -a $MINOR -eq 2 -a $PATCH -lt 15 \) ]
|
|
|
|
then
|
|
|
|
PEER_GNUTLS=""
|
|
|
|
else
|
|
|
|
PEER_GNUTLS=" GnuTLS"
|
2018-06-14 13:14:29 +02:00
|
|
|
if [ $MINOR -lt 4 ]; then
|
|
|
|
GNUTLS_MINOR_LT_FOUR='x'
|
|
|
|
fi
|
2014-10-24 12:57:37 +02:00
|
|
|
fi
|
2014-08-31 16:20:58 +02:00
|
|
|
fi
|
|
|
|
else
|
|
|
|
PEER_GNUTLS=""
|
|
|
|
fi
|
|
|
|
|
2014-03-25 18:04:59 +01:00
|
|
|
# default values for options
|
2021-05-12 17:49:18 +02:00
|
|
|
MODES="tls1_2 dtls1_2"
|
2012-11-23 14:25:34 +01:00
|
|
|
VERIFIES="NO YES"
|
2013-08-27 21:03:33 +02:00
|
|
|
TYPES="ECDSA RSA PSK"
|
2013-07-19 13:41:51 +02:00
|
|
|
FILTER=""
|
2018-02-15 11:43:55 +01:00
|
|
|
# exclude:
|
|
|
|
# - NULL: excluded from our default config
|
|
|
|
# avoid plain DES but keep 3DES-EDE-CBC (mbedTLS), DES-CBC3 (OpenSSL)
|
2021-05-28 09:42:25 +02:00
|
|
|
# - ARIA: not in default mbedtls_config.h + requires OpenSSL >= 1.1.1
|
2018-06-18 11:38:22 +02:00
|
|
|
# - ChachaPoly: requires OpenSSL >= 1.1.0
|
2019-02-11 22:47:30 +01:00
|
|
|
# - 3DES: not in default config
|
2021-02-22 14:36:29 +01:00
|
|
|
EXCLUDE='NULL\|DES\|ARIA\|CHACHA20-POLY1305'
|
2013-07-19 13:41:51 +02:00
|
|
|
VERBOSE=""
|
2014-02-27 15:37:24 +01:00
|
|
|
MEMCHECK=0
|
2015-01-22 17:43:54 +01:00
|
|
|
PEERS="OpenSSL$PEER_GNUTLS mbedTLS"
|
2013-07-19 13:41:51 +02:00
|
|
|
|
2015-08-04 16:43:37 +02:00
|
|
|
# hidden option: skip DTLS with OpenSSL
|
|
|
|
# (travis CI has a version that doesn't work for us)
|
|
|
|
: ${OSSL_NO_DTLS:=0}
|
|
|
|
|
2014-02-26 18:21:02 +01:00
|
|
|
print_usage() {
|
|
|
|
echo "Usage: $0"
|
2014-12-11 11:51:28 +01:00
|
|
|
printf " -h|--help\tPrint this help.\n"
|
2020-08-26 20:05:11 +02:00
|
|
|
printf " -f|--filter\tOnly matching ciphersuites are tested (Default: '%s')\n" "$FILTER"
|
|
|
|
printf " -e|--exclude\tMatching ciphersuites are excluded (Default: '%s')\n" "$EXCLUDE"
|
|
|
|
printf " -m|--modes\tWhich modes to perform (Default: '%s')\n" "$MODES"
|
|
|
|
printf " -t|--types\tWhich key exchange type to perform (Default: '%s')\n" "$TYPES"
|
|
|
|
printf " -V|--verify\tWhich verification modes to perform (Default: '%s')\n" "$VERIFIES"
|
|
|
|
printf " -p|--peers\tWhich peers to use (Default: '%s')\n" "$PEERS"
|
2014-12-11 11:51:28 +01:00
|
|
|
printf " \tAlso available: GnuTLS (needs v3.2.15 or higher)\n"
|
|
|
|
printf " -M|--memcheck\tCheck memory leaks and errors.\n"
|
|
|
|
printf " -v|--verbose\tSet verbose output.\n"
|
2014-02-26 18:21:02 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
get_options() {
|
|
|
|
while [ $# -gt 0 ]; do
|
|
|
|
case "$1" in
|
|
|
|
-f|--filter)
|
|
|
|
shift; FILTER=$1
|
|
|
|
;;
|
2014-03-13 17:45:35 +01:00
|
|
|
-e|--exclude)
|
|
|
|
shift; EXCLUDE=$1
|
|
|
|
;;
|
2014-02-26 18:21:02 +01:00
|
|
|
-m|--modes)
|
|
|
|
shift; MODES=$1
|
|
|
|
;;
|
|
|
|
-t|--types)
|
|
|
|
shift; TYPES=$1
|
|
|
|
;;
|
|
|
|
-V|--verify)
|
|
|
|
shift; VERIFIES=$1
|
|
|
|
;;
|
2014-03-13 17:45:35 +01:00
|
|
|
-p|--peers)
|
|
|
|
shift; PEERS=$1
|
|
|
|
;;
|
2014-02-26 18:21:02 +01:00
|
|
|
-v|--verbose)
|
|
|
|
VERBOSE=1
|
|
|
|
;;
|
2014-02-27 15:37:24 +01:00
|
|
|
-M|--memcheck)
|
|
|
|
MEMCHECK=1
|
|
|
|
;;
|
2014-02-26 18:21:02 +01:00
|
|
|
-h|--help)
|
|
|
|
print_usage
|
|
|
|
exit 0
|
|
|
|
;;
|
|
|
|
*)
|
|
|
|
echo "Unknown argument: '$1'"
|
|
|
|
print_usage
|
|
|
|
exit 1
|
|
|
|
;;
|
|
|
|
esac
|
|
|
|
shift
|
|
|
|
done
|
2014-10-24 12:47:26 +02:00
|
|
|
|
|
|
|
# sanitize some options (modes checked later)
|
|
|
|
VERIFIES="$( echo $VERIFIES | tr [a-z] [A-Z] )"
|
|
|
|
TYPES="$( echo $TYPES | tr [a-z] [A-Z] )"
|
2014-02-26 18:21:02 +01:00
|
|
|
}
|
2013-07-19 13:41:51 +02:00
|
|
|
|
2014-02-19 15:29:38 +01:00
|
|
|
log() {
|
2013-07-19 13:41:51 +02:00
|
|
|
if [ "X" != "X$VERBOSE" ]; then
|
2014-03-26 15:30:16 +01:00
|
|
|
echo ""
|
2013-07-19 13:41:51 +02:00
|
|
|
echo "$@"
|
|
|
|
fi
|
|
|
|
}
|
2012-04-12 23:26:34 +02:00
|
|
|
|
2014-03-26 15:30:16 +01:00
|
|
|
# is_dtls <mode>
|
|
|
|
is_dtls()
|
|
|
|
{
|
2021-05-13 22:56:31 +02:00
|
|
|
test "$1" = "dtls1_2"
|
2014-03-26 15:30:16 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
# minor_ver <mode>
|
|
|
|
minor_ver()
|
|
|
|
{
|
|
|
|
case "$1" in
|
|
|
|
tls1_2|dtls1_2)
|
|
|
|
echo 3
|
|
|
|
;;
|
|
|
|
*)
|
|
|
|
echo "error: invalid mode: $MODE" >&2
|
|
|
|
# exiting is no good here, typically called in a subshell
|
|
|
|
echo -1
|
|
|
|
esac
|
|
|
|
}
|
|
|
|
|
2013-08-27 20:48:40 +02:00
|
|
|
filter()
|
|
|
|
{
|
2014-03-13 17:45:35 +01:00
|
|
|
LIST="$1"
|
2013-08-27 20:48:40 +02:00
|
|
|
NEW_LIST=""
|
|
|
|
|
2021-02-22 14:36:29 +01:00
|
|
|
EXCLMODE="$EXCLUDE"
|
2014-03-26 15:30:16 +01:00
|
|
|
|
2013-08-27 20:48:40 +02:00
|
|
|
for i in $LIST;
|
|
|
|
do
|
2014-03-26 15:30:16 +01:00
|
|
|
NEW_LIST="$NEW_LIST $( echo "$i" | grep "$FILTER" | grep -v "$EXCLMODE" )"
|
2013-08-27 20:48:40 +02:00
|
|
|
done
|
|
|
|
|
2014-02-27 11:50:40 +01:00
|
|
|
# normalize whitespace
|
2014-12-11 11:51:28 +01:00
|
|
|
echo "$NEW_LIST" | sed -e 's/[[:space:]][[:space:]]*/ /g' -e 's/^ //' -e 's/ $//'
|
2013-08-27 20:48:40 +02:00
|
|
|
}
|
|
|
|
|
2014-07-11 17:41:24 +02:00
|
|
|
# OpenSSL 1.0.1h with -Verify wants a ClientCertificate message even for
|
|
|
|
# PSK ciphersuites with DTLS, which is incorrect, so disable them for now
|
|
|
|
check_openssl_server_bug()
|
|
|
|
{
|
|
|
|
if test "X$VERIFY" = "XYES" && is_dtls "$MODE" && \
|
|
|
|
echo "$1" | grep "^TLS-PSK" >/dev/null;
|
|
|
|
then
|
|
|
|
SKIP_NEXT="YES"
|
|
|
|
fi
|
|
|
|
}
|
|
|
|
|
2014-02-28 12:42:57 +01:00
|
|
|
filter_ciphersuites()
|
|
|
|
{
|
2014-03-13 17:45:35 +01:00
|
|
|
if [ "X" != "X$FILTER" -o "X" != "X$EXCLUDE" ];
|
2014-02-28 12:42:57 +01:00
|
|
|
then
|
2016-09-04 23:31:09 +02:00
|
|
|
# Ciphersuite for mbed TLS
|
|
|
|
M_CIPHERS=$( filter "$M_CIPHERS" )
|
|
|
|
|
|
|
|
# Ciphersuite for OpenSSL
|
2014-03-13 17:45:35 +01:00
|
|
|
O_CIPHERS=$( filter "$O_CIPHERS" )
|
2016-09-04 23:31:09 +02:00
|
|
|
|
|
|
|
# Ciphersuite for GnuTLS
|
2014-03-13 17:45:35 +01:00
|
|
|
G_CIPHERS=$( filter "$G_CIPHERS" )
|
2014-02-28 12:42:57 +01:00
|
|
|
fi
|
2014-07-10 20:12:56 +02:00
|
|
|
|
2019-08-10 17:38:34 +02:00
|
|
|
# OpenSSL <1.0.2 doesn't support DTLS 1.2. Check what OpenSSL
|
|
|
|
# supports from the s_server help. (The s_client help isn't
|
|
|
|
# accurate as of 1.0.2g: it supports DTLS 1.2 but doesn't list it.
|
|
|
|
# But the s_server help seems to be accurate.)
|
|
|
|
if ! $OPENSSL_CMD s_server -help 2>&1 | grep -q "^ *-$MODE "; then
|
|
|
|
M_CIPHERS=""
|
2014-07-10 20:12:56 +02:00
|
|
|
O_CIPHERS=""
|
|
|
|
fi
|
|
|
|
|
2015-01-23 12:33:38 +01:00
|
|
|
# For GnuTLS client -> mbed TLS server,
|
2014-07-11 17:01:06 +02:00
|
|
|
# we need to force IPv4 by connecting to 127.0.0.1 but then auth fails
|
2014-07-10 20:12:56 +02:00
|
|
|
if [ "X$VERIFY" = "XYES" ] && is_dtls "$MODE"; then
|
|
|
|
G_CIPHERS=""
|
|
|
|
fi
|
2014-02-28 12:42:57 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
reset_ciphersuites()
|
2014-02-19 13:51:58 +01:00
|
|
|
{
|
2016-09-04 23:31:09 +02:00
|
|
|
M_CIPHERS=""
|
2014-02-19 13:51:58 +01:00
|
|
|
O_CIPHERS=""
|
2014-02-28 12:42:57 +01:00
|
|
|
G_CIPHERS=""
|
|
|
|
}
|
2014-02-19 13:51:58 +01:00
|
|
|
|
2021-07-29 12:35:59 +02:00
|
|
|
check_translation()
|
|
|
|
{
|
2021-07-29 13:51:09 +02:00
|
|
|
if [ $1 -ne 0 ]; then
|
|
|
|
echo "translate_ciphers.py failed with exit code $1" >&2
|
|
|
|
echo "$2" >&2
|
2021-07-29 12:35:59 +02:00
|
|
|
exit 1
|
|
|
|
fi
|
|
|
|
}
|
|
|
|
|
2018-02-15 11:43:55 +01:00
|
|
|
# Ciphersuites that can be used with all peers.
|
|
|
|
# Since we currently have three possible peers, each ciphersuite should appear
|
|
|
|
# three times: in each peer's list (with the name that this peer uses).
|
2014-03-25 19:07:28 +01:00
|
|
|
add_common_ciphersuites()
|
2014-02-28 12:42:57 +01:00
|
|
|
{
|
2021-07-27 15:55:56 +02:00
|
|
|
CIPHERS=""
|
2014-02-19 13:51:58 +01:00
|
|
|
case $TYPE in
|
|
|
|
|
|
|
|
"ECDSA")
|
2014-03-26 15:30:16 +01:00
|
|
|
if [ `minor_ver "$MODE"` -gt 0 ]
|
2014-02-19 13:51:58 +01:00
|
|
|
then
|
2021-07-27 15:55:56 +02:00
|
|
|
CIPHERS="$CIPHERS \
|
|
|
|
TLS-ECDHE-ECDSA-WITH-NULL-SHA \
|
2014-02-19 13:51:58 +01:00
|
|
|
TLS-ECDHE-ECDSA-WITH-3DES-EDE-CBC-SHA \
|
|
|
|
TLS-ECDHE-ECDSA-WITH-AES-128-CBC-SHA \
|
|
|
|
TLS-ECDHE-ECDSA-WITH-AES-256-CBC-SHA \
|
2014-03-25 19:07:28 +01:00
|
|
|
"
|
2014-02-19 13:51:58 +01:00
|
|
|
fi
|
2014-03-26 15:30:16 +01:00
|
|
|
if [ `minor_ver "$MODE"` -ge 3 ]
|
2014-02-19 13:51:58 +01:00
|
|
|
then
|
2021-07-27 15:55:56 +02:00
|
|
|
CIPHERS="$CIPHERS \
|
|
|
|
TLS-ECDHE-ECDSA-WITH-AES-128-CBC-SHA256 \
|
2014-02-19 13:51:58 +01:00
|
|
|
TLS-ECDHE-ECDSA-WITH-AES-256-CBC-SHA384 \
|
|
|
|
TLS-ECDHE-ECDSA-WITH-AES-128-GCM-SHA256 \
|
|
|
|
TLS-ECDHE-ECDSA-WITH-AES-256-GCM-SHA384 \
|
2014-03-25 19:07:28 +01:00
|
|
|
"
|
2014-02-19 13:51:58 +01:00
|
|
|
fi
|
|
|
|
;;
|
|
|
|
|
|
|
|
"RSA")
|
2021-07-27 15:55:56 +02:00
|
|
|
CIPHERS="$CIPHERS \
|
|
|
|
TLS-DHE-RSA-WITH-AES-128-CBC-SHA \
|
2014-02-19 13:51:58 +01:00
|
|
|
TLS-DHE-RSA-WITH-AES-256-CBC-SHA \
|
|
|
|
TLS-DHE-RSA-WITH-CAMELLIA-128-CBC-SHA \
|
|
|
|
TLS-DHE-RSA-WITH-CAMELLIA-256-CBC-SHA \
|
|
|
|
TLS-DHE-RSA-WITH-3DES-EDE-CBC-SHA \
|
|
|
|
TLS-RSA-WITH-AES-256-CBC-SHA \
|
|
|
|
TLS-RSA-WITH-CAMELLIA-256-CBC-SHA \
|
|
|
|
TLS-RSA-WITH-AES-128-CBC-SHA \
|
|
|
|
TLS-RSA-WITH-CAMELLIA-128-CBC-SHA \
|
|
|
|
TLS-RSA-WITH-3DES-EDE-CBC-SHA \
|
|
|
|
TLS-RSA-WITH-NULL-MD5 \
|
|
|
|
TLS-RSA-WITH-NULL-SHA \
|
2014-03-25 19:07:28 +01:00
|
|
|
"
|
2014-03-26 15:30:16 +01:00
|
|
|
if [ `minor_ver "$MODE"` -gt 0 ]
|
2014-02-19 13:51:58 +01:00
|
|
|
then
|
2021-07-27 15:55:56 +02:00
|
|
|
CIPHERS="$CIPHERS \
|
|
|
|
TLS-ECDHE-RSA-WITH-AES-128-CBC-SHA \
|
2014-02-19 13:51:58 +01:00
|
|
|
TLS-ECDHE-RSA-WITH-AES-256-CBC-SHA \
|
|
|
|
TLS-ECDHE-RSA-WITH-3DES-EDE-CBC-SHA \
|
|
|
|
TLS-ECDHE-RSA-WITH-NULL-SHA \
|
|
|
|
"
|
|
|
|
fi
|
2014-03-26 15:30:16 +01:00
|
|
|
if [ `minor_ver "$MODE"` -ge 3 ]
|
2014-02-19 13:51:58 +01:00
|
|
|
then
|
2021-07-27 15:55:56 +02:00
|
|
|
CIPHERS="$CIPHERS \
|
|
|
|
TLS-RSA-WITH-AES-128-CBC-SHA256 \
|
2014-02-19 13:51:58 +01:00
|
|
|
TLS-DHE-RSA-WITH-AES-128-CBC-SHA256 \
|
|
|
|
TLS-RSA-WITH-AES-256-CBC-SHA256 \
|
|
|
|
TLS-DHE-RSA-WITH-AES-256-CBC-SHA256 \
|
|
|
|
TLS-ECDHE-RSA-WITH-AES-128-CBC-SHA256 \
|
|
|
|
TLS-ECDHE-RSA-WITH-AES-256-CBC-SHA384 \
|
|
|
|
TLS-RSA-WITH-AES-128-GCM-SHA256 \
|
|
|
|
TLS-RSA-WITH-AES-256-GCM-SHA384 \
|
|
|
|
TLS-DHE-RSA-WITH-AES-128-GCM-SHA256 \
|
|
|
|
TLS-DHE-RSA-WITH-AES-256-GCM-SHA384 \
|
|
|
|
TLS-ECDHE-RSA-WITH-AES-128-GCM-SHA256 \
|
|
|
|
TLS-ECDHE-RSA-WITH-AES-256-GCM-SHA384 \
|
2021-08-13 13:30:28 +02:00
|
|
|
TLS-RSA-WITH-NULL-SHA256 \
|
2014-02-19 13:51:58 +01:00
|
|
|
"
|
|
|
|
fi
|
|
|
|
;;
|
|
|
|
|
|
|
|
"PSK")
|
2021-07-27 15:55:56 +02:00
|
|
|
CIPHERS="$CIPHERS \
|
|
|
|
TLS-PSK-WITH-3DES-EDE-CBC-SHA \
|
2014-02-19 13:51:58 +01:00
|
|
|
TLS-PSK-WITH-AES-128-CBC-SHA \
|
|
|
|
TLS-PSK-WITH-AES-256-CBC-SHA \
|
|
|
|
"
|
|
|
|
;;
|
|
|
|
esac
|
2021-07-27 15:55:56 +02:00
|
|
|
|
|
|
|
M_CIPHERS="$M_CIPHERS $CIPHERS"
|
|
|
|
|
2021-07-30 17:57:04 +02:00
|
|
|
T=$(./scripts/translate_ciphers.py g $CIPHERS)
|
2021-07-29 13:51:09 +02:00
|
|
|
check_translation $? "$T"
|
2021-07-29 12:35:59 +02:00
|
|
|
G_CIPHERS="$G_CIPHERS $T"
|
2021-07-27 15:55:56 +02:00
|
|
|
|
2021-07-30 17:57:04 +02:00
|
|
|
T=$(./scripts/translate_ciphers.py o $CIPHERS)
|
2021-07-29 13:51:09 +02:00
|
|
|
check_translation $? "$T"
|
2021-07-29 12:35:59 +02:00
|
|
|
O_CIPHERS="$O_CIPHERS $T"
|
2014-02-19 13:51:58 +01:00
|
|
|
}
|
|
|
|
|
2018-02-15 11:43:55 +01:00
|
|
|
# Ciphersuites usable only with Mbed TLS and OpenSSL
|
2021-07-27 16:40:12 +02:00
|
|
|
# Each ciphersuite is compiled case by case in the MBedTLS standard, and
|
|
|
|
# is appended to the list of MBedTLS ciphersuites $M_CIPHERS. The same list
|
2021-07-27 17:32:21 +02:00
|
|
|
# is translated to the OpenSSL naming standard and appended to the list of
|
2021-07-27 16:40:12 +02:00
|
|
|
# OpenSSL ciphersuites $O_CIPHERS
|
2018-02-15 11:43:55 +01:00
|
|
|
#
|
|
|
|
# NOTE: for some reason RSA-PSK doesn't work with OpenSSL,
|
2018-03-06 09:54:10 +01:00
|
|
|
# so RSA-PSK ciphersuites need to go in other sections, see
|
|
|
|
# https://github.com/ARMmbed/mbedtls/issues/1419
|
2018-06-18 11:38:22 +02:00
|
|
|
#
|
|
|
|
# ChachaPoly suites are here rather than in "common", as they were added in
|
|
|
|
# GnuTLS in 3.5.0 and the CI only has 3.4.x so far.
|
2014-03-25 19:07:28 +01:00
|
|
|
add_openssl_ciphersuites()
|
|
|
|
{
|
2021-07-27 15:55:56 +02:00
|
|
|
CIPHERS=""
|
2014-03-25 19:07:28 +01:00
|
|
|
case $TYPE in
|
|
|
|
|
|
|
|
"ECDSA")
|
2014-03-26 15:30:16 +01:00
|
|
|
if [ `minor_ver "$MODE"` -gt 0 ]
|
2014-03-25 19:07:28 +01:00
|
|
|
then
|
2021-07-27 15:55:56 +02:00
|
|
|
CIPHERS="$CIPHERS \
|
|
|
|
TLS-ECDH-ECDSA-WITH-NULL-SHA \
|
2014-03-25 19:07:28 +01:00
|
|
|
TLS-ECDH-ECDSA-WITH-3DES-EDE-CBC-SHA \
|
|
|
|
TLS-ECDH-ECDSA-WITH-AES-128-CBC-SHA \
|
|
|
|
TLS-ECDH-ECDSA-WITH-AES-256-CBC-SHA \
|
|
|
|
"
|
|
|
|
fi
|
2014-03-26 15:30:16 +01:00
|
|
|
if [ `minor_ver "$MODE"` -ge 3 ]
|
2014-03-25 19:07:28 +01:00
|
|
|
then
|
2021-07-27 15:55:56 +02:00
|
|
|
CIPHERS="$CIPHERS \
|
|
|
|
TLS-ECDH-ECDSA-WITH-AES-128-CBC-SHA256 \
|
2014-03-25 19:07:28 +01:00
|
|
|
TLS-ECDH-ECDSA-WITH-AES-256-CBC-SHA384 \
|
|
|
|
TLS-ECDH-ECDSA-WITH-AES-128-GCM-SHA256 \
|
|
|
|
TLS-ECDH-ECDSA-WITH-AES-256-GCM-SHA384 \
|
2018-02-15 11:43:55 +01:00
|
|
|
TLS-ECDHE-ECDSA-WITH-ARIA-256-GCM-SHA384 \
|
|
|
|
TLS-ECDHE-ECDSA-WITH-ARIA-128-GCM-SHA256 \
|
2018-06-18 11:38:22 +02:00
|
|
|
TLS-ECDHE-ECDSA-WITH-CHACHA20-POLY1305-SHA256 \
|
2014-03-25 19:07:28 +01:00
|
|
|
"
|
|
|
|
fi
|
|
|
|
;;
|
|
|
|
|
|
|
|
"RSA")
|
2021-07-27 15:55:56 +02:00
|
|
|
CIPHERS="$CIPHERS \
|
|
|
|
TLS-RSA-WITH-DES-CBC-SHA \
|
2014-03-25 19:07:28 +01:00
|
|
|
TLS-DHE-RSA-WITH-DES-CBC-SHA \
|
|
|
|
"
|
2018-02-15 11:43:55 +01:00
|
|
|
if [ `minor_ver "$MODE"` -ge 3 ]
|
|
|
|
then
|
2021-07-27 15:55:56 +02:00
|
|
|
CIPHERS="$CIPHERS \
|
|
|
|
TLS-ECDHE-RSA-WITH-ARIA-256-GCM-SHA384 \
|
2018-02-15 11:43:55 +01:00
|
|
|
TLS-DHE-RSA-WITH-ARIA-256-GCM-SHA384 \
|
2018-02-20 11:58:44 +01:00
|
|
|
TLS-RSA-WITH-ARIA-256-GCM-SHA384 \
|
2018-02-15 11:43:55 +01:00
|
|
|
TLS-ECDHE-RSA-WITH-ARIA-128-GCM-SHA256 \
|
|
|
|
TLS-DHE-RSA-WITH-ARIA-128-GCM-SHA256 \
|
2018-02-20 11:58:44 +01:00
|
|
|
TLS-RSA-WITH-ARIA-128-GCM-SHA256 \
|
2018-06-18 11:38:22 +02:00
|
|
|
TLS-DHE-RSA-WITH-CHACHA20-POLY1305-SHA256 \
|
|
|
|
TLS-ECDHE-RSA-WITH-CHACHA20-POLY1305-SHA256 \
|
2018-02-15 11:43:55 +01:00
|
|
|
"
|
|
|
|
fi
|
2014-03-25 19:07:28 +01:00
|
|
|
;;
|
|
|
|
|
|
|
|
"PSK")
|
2018-02-15 11:43:55 +01:00
|
|
|
if [ `minor_ver "$MODE"` -ge 3 ]
|
|
|
|
then
|
2021-07-27 15:55:56 +02:00
|
|
|
CIPHERS="$CIPHERS \
|
|
|
|
TLS-DHE-PSK-WITH-ARIA-256-GCM-SHA384 \
|
2018-02-20 11:58:44 +01:00
|
|
|
TLS-DHE-PSK-WITH-ARIA-128-GCM-SHA256 \
|
2018-02-15 11:43:55 +01:00
|
|
|
TLS-PSK-WITH-ARIA-256-GCM-SHA384 \
|
|
|
|
TLS-PSK-WITH-ARIA-128-GCM-SHA256 \
|
2018-06-18 11:38:22 +02:00
|
|
|
TLS-PSK-WITH-CHACHA20-POLY1305-SHA256 \
|
|
|
|
TLS-ECDHE-PSK-WITH-CHACHA20-POLY1305-SHA256 \
|
|
|
|
TLS-DHE-PSK-WITH-CHACHA20-POLY1305-SHA256 \
|
2018-02-15 11:43:55 +01:00
|
|
|
"
|
|
|
|
fi
|
2014-03-25 19:07:28 +01:00
|
|
|
;;
|
|
|
|
esac
|
2021-07-27 15:55:56 +02:00
|
|
|
|
|
|
|
M_CIPHERS="$M_CIPHERS $CIPHERS"
|
|
|
|
|
2021-07-30 17:57:04 +02:00
|
|
|
T=$(./scripts/translate_ciphers.py o $CIPHERS)
|
2021-07-29 13:51:09 +02:00
|
|
|
check_translation $? "$T"
|
2021-07-29 12:35:59 +02:00
|
|
|
O_CIPHERS="$O_CIPHERS $T"
|
2014-03-25 19:07:28 +01:00
|
|
|
}
|
|
|
|
|
2018-02-15 11:43:55 +01:00
|
|
|
# Ciphersuites usable only with Mbed TLS and GnuTLS
|
2021-07-27 16:40:12 +02:00
|
|
|
# Each ciphersuite is compiled case by case in the MBedTLS standard, and
|
|
|
|
# is appended to the list of MBedTLS ciphersuites $M_CIPHERS. The same list
|
2021-07-27 17:32:21 +02:00
|
|
|
# is translated to the GnuTLS naming standard and appended to the list of
|
2021-07-27 16:40:12 +02:00
|
|
|
# GnuTLS ciphersuites $G_CIPHERS
|
2014-02-28 12:42:57 +01:00
|
|
|
add_gnutls_ciphersuites()
|
2014-02-19 13:51:58 +01:00
|
|
|
{
|
2021-07-27 15:55:56 +02:00
|
|
|
CIPHERS=""
|
2014-02-19 13:51:58 +01:00
|
|
|
case $TYPE in
|
|
|
|
|
|
|
|
"ECDSA")
|
2014-03-26 15:30:16 +01:00
|
|
|
if [ `minor_ver "$MODE"` -ge 3 ]
|
2014-02-19 13:51:58 +01:00
|
|
|
then
|
2021-07-27 15:55:56 +02:00
|
|
|
CIPHERS="$CIPHERS \
|
|
|
|
TLS-ECDHE-ECDSA-WITH-CAMELLIA-128-CBC-SHA256 \
|
2021-07-26 13:20:00 +02:00
|
|
|
TLS-ECDHE-ECDSA-WITH-CAMELLIA-256-CBC-SHA384 \
|
|
|
|
TLS-ECDHE-ECDSA-WITH-CAMELLIA-128-GCM-SHA256 \
|
|
|
|
TLS-ECDHE-ECDSA-WITH-CAMELLIA-256-GCM-SHA384 \
|
|
|
|
TLS-ECDHE-ECDSA-WITH-AES-128-CCM \
|
|
|
|
TLS-ECDHE-ECDSA-WITH-AES-256-CCM \
|
|
|
|
TLS-ECDHE-ECDSA-WITH-AES-128-CCM-8 \
|
|
|
|
TLS-ECDHE-ECDSA-WITH-AES-256-CCM-8 \
|
2014-03-13 16:21:59 +01:00
|
|
|
"
|
2014-02-19 13:51:58 +01:00
|
|
|
fi
|
|
|
|
;;
|
|
|
|
|
|
|
|
"RSA")
|
2014-03-26 15:30:16 +01:00
|
|
|
if [ `minor_ver "$MODE"` -ge 3 ]
|
2014-02-19 13:51:58 +01:00
|
|
|
then
|
2021-07-27 15:55:56 +02:00
|
|
|
CIPHERS="$CIPHERS \
|
|
|
|
TLS-ECDHE-RSA-WITH-CAMELLIA-128-CBC-SHA256 \
|
2014-02-19 13:51:58 +01:00
|
|
|
TLS-ECDHE-RSA-WITH-CAMELLIA-256-CBC-SHA384 \
|
|
|
|
TLS-RSA-WITH-CAMELLIA-128-CBC-SHA256 \
|
|
|
|
TLS-RSA-WITH-CAMELLIA-256-CBC-SHA256 \
|
|
|
|
TLS-DHE-RSA-WITH-CAMELLIA-128-CBC-SHA256 \
|
|
|
|
TLS-DHE-RSA-WITH-CAMELLIA-256-CBC-SHA256 \
|
|
|
|
TLS-ECDHE-RSA-WITH-CAMELLIA-128-GCM-SHA256 \
|
|
|
|
TLS-ECDHE-RSA-WITH-CAMELLIA-256-GCM-SHA384 \
|
|
|
|
TLS-DHE-RSA-WITH-CAMELLIA-128-GCM-SHA256 \
|
|
|
|
TLS-DHE-RSA-WITH-CAMELLIA-256-GCM-SHA384 \
|
|
|
|
TLS-RSA-WITH-CAMELLIA-128-GCM-SHA256 \
|
|
|
|
TLS-RSA-WITH-CAMELLIA-256-GCM-SHA384 \
|
2018-06-14 13:14:29 +02:00
|
|
|
TLS-RSA-WITH-AES-128-CCM \
|
|
|
|
TLS-RSA-WITH-AES-256-CCM \
|
|
|
|
TLS-DHE-RSA-WITH-AES-128-CCM \
|
|
|
|
TLS-DHE-RSA-WITH-AES-256-CCM \
|
|
|
|
TLS-RSA-WITH-AES-128-CCM-8 \
|
|
|
|
TLS-RSA-WITH-AES-256-CCM-8 \
|
|
|
|
TLS-DHE-RSA-WITH-AES-128-CCM-8 \
|
|
|
|
TLS-DHE-RSA-WITH-AES-256-CCM-8 \
|
2014-03-13 16:21:59 +01:00
|
|
|
"
|
2014-02-19 13:51:58 +01:00
|
|
|
fi
|
|
|
|
;;
|
|
|
|
|
|
|
|
"PSK")
|
2021-07-27 15:55:56 +02:00
|
|
|
CIPHERS="$CIPHERS \
|
|
|
|
TLS-DHE-PSK-WITH-3DES-EDE-CBC-SHA \
|
|
|
|
TLS-DHE-PSK-WITH-AES-128-CBC-SHA \
|
|
|
|
TLS-DHE-PSK-WITH-AES-256-CBC-SHA \
|
2014-07-13 15:44:19 +02:00
|
|
|
"
|
2014-03-26 15:30:16 +01:00
|
|
|
if [ `minor_ver "$MODE"` -gt 0 ]
|
2014-02-19 13:51:58 +01:00
|
|
|
then
|
2021-07-27 15:55:56 +02:00
|
|
|
CIPHERS="$CIPHERS \
|
|
|
|
TLS-ECDHE-PSK-WITH-AES-256-CBC-SHA \
|
2014-02-19 13:51:58 +01:00
|
|
|
TLS-ECDHE-PSK-WITH-AES-128-CBC-SHA \
|
|
|
|
TLS-ECDHE-PSK-WITH-3DES-EDE-CBC-SHA \
|
2014-02-28 12:42:57 +01:00
|
|
|
TLS-RSA-PSK-WITH-3DES-EDE-CBC-SHA \
|
|
|
|
TLS-RSA-PSK-WITH-AES-256-CBC-SHA \
|
|
|
|
TLS-RSA-PSK-WITH-AES-128-CBC-SHA \
|
2014-03-13 16:21:59 +01:00
|
|
|
"
|
2014-02-28 12:42:57 +01:00
|
|
|
fi
|
2014-03-26 15:30:16 +01:00
|
|
|
if [ `minor_ver "$MODE"` -ge 3 ]
|
2014-02-28 12:42:57 +01:00
|
|
|
then
|
2021-07-27 15:55:56 +02:00
|
|
|
CIPHERS="$CIPHERS \
|
|
|
|
TLS-ECDHE-PSK-WITH-AES-256-CBC-SHA384 \
|
2014-02-19 13:51:58 +01:00
|
|
|
TLS-ECDHE-PSK-WITH-CAMELLIA-256-CBC-SHA384 \
|
|
|
|
TLS-ECDHE-PSK-WITH-AES-128-CBC-SHA256 \
|
|
|
|
TLS-ECDHE-PSK-WITH-CAMELLIA-128-CBC-SHA256 \
|
|
|
|
TLS-ECDHE-PSK-WITH-NULL-SHA384 \
|
|
|
|
TLS-ECDHE-PSK-WITH-NULL-SHA256 \
|
2014-02-28 12:42:57 +01:00
|
|
|
TLS-PSK-WITH-AES-128-CBC-SHA256 \
|
|
|
|
TLS-PSK-WITH-AES-256-CBC-SHA384 \
|
|
|
|
TLS-DHE-PSK-WITH-AES-128-CBC-SHA256 \
|
|
|
|
TLS-DHE-PSK-WITH-AES-256-CBC-SHA384 \
|
|
|
|
TLS-PSK-WITH-NULL-SHA256 \
|
|
|
|
TLS-PSK-WITH-NULL-SHA384 \
|
|
|
|
TLS-DHE-PSK-WITH-NULL-SHA256 \
|
|
|
|
TLS-DHE-PSK-WITH-NULL-SHA384 \
|
|
|
|
TLS-RSA-PSK-WITH-AES-256-CBC-SHA384 \
|
|
|
|
TLS-RSA-PSK-WITH-AES-128-CBC-SHA256 \
|
|
|
|
TLS-RSA-PSK-WITH-NULL-SHA256 \
|
|
|
|
TLS-RSA-PSK-WITH-NULL-SHA384 \
|
|
|
|
TLS-DHE-PSK-WITH-CAMELLIA-128-CBC-SHA256 \
|
|
|
|
TLS-DHE-PSK-WITH-CAMELLIA-256-CBC-SHA384 \
|
|
|
|
TLS-PSK-WITH-CAMELLIA-128-CBC-SHA256 \
|
|
|
|
TLS-PSK-WITH-CAMELLIA-256-CBC-SHA384 \
|
|
|
|
TLS-RSA-PSK-WITH-CAMELLIA-256-CBC-SHA384 \
|
|
|
|
TLS-RSA-PSK-WITH-CAMELLIA-128-CBC-SHA256 \
|
2014-02-19 13:51:58 +01:00
|
|
|
TLS-PSK-WITH-AES-128-GCM-SHA256 \
|
|
|
|
TLS-PSK-WITH-AES-256-GCM-SHA384 \
|
|
|
|
TLS-DHE-PSK-WITH-AES-128-GCM-SHA256 \
|
|
|
|
TLS-DHE-PSK-WITH-AES-256-GCM-SHA384 \
|
2018-06-14 13:14:29 +02:00
|
|
|
TLS-PSK-WITH-AES-128-CCM \
|
|
|
|
TLS-PSK-WITH-AES-256-CCM \
|
|
|
|
TLS-DHE-PSK-WITH-AES-128-CCM \
|
|
|
|
TLS-DHE-PSK-WITH-AES-256-CCM \
|
|
|
|
TLS-PSK-WITH-AES-128-CCM-8 \
|
|
|
|
TLS-PSK-WITH-AES-256-CCM-8 \
|
|
|
|
TLS-DHE-PSK-WITH-AES-128-CCM-8 \
|
|
|
|
TLS-DHE-PSK-WITH-AES-256-CCM-8 \
|
2014-02-19 13:51:58 +01:00
|
|
|
TLS-RSA-PSK-WITH-CAMELLIA-128-GCM-SHA256 \
|
|
|
|
TLS-RSA-PSK-WITH-CAMELLIA-256-GCM-SHA384 \
|
|
|
|
TLS-PSK-WITH-CAMELLIA-128-GCM-SHA256 \
|
|
|
|
TLS-PSK-WITH-CAMELLIA-256-GCM-SHA384 \
|
|
|
|
TLS-DHE-PSK-WITH-CAMELLIA-128-GCM-SHA256 \
|
|
|
|
TLS-DHE-PSK-WITH-CAMELLIA-256-GCM-SHA384 \
|
|
|
|
TLS-RSA-PSK-WITH-AES-256-GCM-SHA384 \
|
|
|
|
TLS-RSA-PSK-WITH-AES-128-GCM-SHA256 \
|
|
|
|
"
|
|
|
|
fi
|
|
|
|
;;
|
|
|
|
esac
|
2021-07-27 17:32:21 +02:00
|
|
|
|
2021-07-27 15:55:56 +02:00
|
|
|
M_CIPHERS="$M_CIPHERS $CIPHERS"
|
|
|
|
|
2021-07-30 17:57:04 +02:00
|
|
|
T=$(./scripts/translate_ciphers.py g $CIPHERS)
|
2021-07-29 13:51:09 +02:00
|
|
|
check_translation $? "$T"
|
2021-07-29 12:35:59 +02:00
|
|
|
G_CIPHERS="$G_CIPHERS $T"
|
2014-02-28 12:42:57 +01:00
|
|
|
}
|
2014-02-19 13:51:58 +01:00
|
|
|
|
2018-02-15 11:43:55 +01:00
|
|
|
# Ciphersuites usable only with Mbed TLS (not currently supported by another
|
|
|
|
# peer usable in this script). This provide only very rudimentaty testing, as
|
|
|
|
# this is not interop testing, but it's better than nothing.
|
2015-04-08 12:49:31 +02:00
|
|
|
add_mbedtls_ciphersuites()
|
2014-02-28 12:42:57 +01:00
|
|
|
{
|
|
|
|
case $TYPE in
|
|
|
|
|
|
|
|
"ECDSA")
|
2014-03-26 15:30:16 +01:00
|
|
|
if [ `minor_ver "$MODE"` -gt 0 ]
|
2014-02-28 12:42:57 +01:00
|
|
|
then
|
2016-09-04 23:31:09 +02:00
|
|
|
M_CIPHERS="$M_CIPHERS \
|
2014-02-28 12:42:57 +01:00
|
|
|
TLS-ECDH-ECDSA-WITH-CAMELLIA-128-CBC-SHA256 \
|
|
|
|
TLS-ECDH-ECDSA-WITH-CAMELLIA-256-CBC-SHA384 \
|
|
|
|
"
|
|
|
|
fi
|
2014-03-26 15:30:16 +01:00
|
|
|
if [ `minor_ver "$MODE"` -ge 3 ]
|
2014-02-28 12:42:57 +01:00
|
|
|
then
|
2016-09-04 23:31:09 +02:00
|
|
|
M_CIPHERS="$M_CIPHERS \
|
2014-02-28 12:42:57 +01:00
|
|
|
TLS-ECDH-ECDSA-WITH-CAMELLIA-128-GCM-SHA256 \
|
|
|
|
TLS-ECDH-ECDSA-WITH-CAMELLIA-256-GCM-SHA384 \
|
2018-02-15 11:07:58 +01:00
|
|
|
TLS-ECDHE-ECDSA-WITH-ARIA-256-CBC-SHA384 \
|
|
|
|
TLS-ECDHE-ECDSA-WITH-ARIA-128-CBC-SHA256 \
|
2018-02-20 11:58:44 +01:00
|
|
|
TLS-ECDH-ECDSA-WITH-ARIA-256-GCM-SHA384 \
|
|
|
|
TLS-ECDH-ECDSA-WITH-ARIA-128-GCM-SHA256 \
|
|
|
|
TLS-ECDH-ECDSA-WITH-ARIA-256-CBC-SHA384 \
|
|
|
|
TLS-ECDH-ECDSA-WITH-ARIA-128-CBC-SHA256 \
|
2014-02-28 12:42:57 +01:00
|
|
|
"
|
|
|
|
fi
|
|
|
|
;;
|
|
|
|
|
|
|
|
"RSA")
|
2018-02-15 11:06:14 +01:00
|
|
|
if [ `minor_ver "$MODE"` -ge 3 ]
|
2014-05-22 14:36:02 +02:00
|
|
|
then
|
2016-09-04 23:31:09 +02:00
|
|
|
M_CIPHERS="$M_CIPHERS \
|
2018-02-15 11:07:58 +01:00
|
|
|
TLS-ECDHE-RSA-WITH-ARIA-256-CBC-SHA384 \
|
|
|
|
TLS-DHE-RSA-WITH-ARIA-256-CBC-SHA384 \
|
|
|
|
TLS-ECDHE-RSA-WITH-ARIA-128-CBC-SHA256 \
|
|
|
|
TLS-DHE-RSA-WITH-ARIA-128-CBC-SHA256 \
|
2018-02-20 11:58:44 +01:00
|
|
|
TLS-RSA-WITH-ARIA-256-CBC-SHA384 \
|
|
|
|
TLS-RSA-WITH-ARIA-128-CBC-SHA256 \
|
2014-05-22 14:36:02 +02:00
|
|
|
"
|
|
|
|
fi
|
2014-02-28 12:42:57 +01:00
|
|
|
;;
|
|
|
|
|
|
|
|
"PSK")
|
2015-07-07 11:54:14 +02:00
|
|
|
# *PSK-NULL-SHA suites supported by GnuTLS 3.3.5 but not 3.2.15
|
2016-09-04 23:31:09 +02:00
|
|
|
M_CIPHERS="$M_CIPHERS \
|
2014-02-28 12:42:57 +01:00
|
|
|
TLS-PSK-WITH-NULL-SHA \
|
|
|
|
TLS-DHE-PSK-WITH-NULL-SHA \
|
|
|
|
"
|
2014-03-26 15:30:16 +01:00
|
|
|
if [ `minor_ver "$MODE"` -gt 0 ]
|
2014-02-28 12:42:57 +01:00
|
|
|
then
|
2016-09-04 23:31:09 +02:00
|
|
|
M_CIPHERS="$M_CIPHERS \
|
2014-02-28 12:42:57 +01:00
|
|
|
TLS-ECDHE-PSK-WITH-NULL-SHA \
|
2014-07-13 15:44:19 +02:00
|
|
|
TLS-RSA-PSK-WITH-NULL-SHA \
|
2014-02-28 12:42:57 +01:00
|
|
|
"
|
|
|
|
fi
|
2018-02-15 11:06:14 +01:00
|
|
|
if [ `minor_ver "$MODE"` -ge 3 ]
|
2014-05-22 14:36:02 +02:00
|
|
|
then
|
2016-09-04 23:31:09 +02:00
|
|
|
M_CIPHERS="$M_CIPHERS \
|
2018-02-15 11:07:58 +01:00
|
|
|
TLS-RSA-PSK-WITH-ARIA-256-CBC-SHA384 \
|
|
|
|
TLS-RSA-PSK-WITH-ARIA-128-CBC-SHA256 \
|
|
|
|
TLS-PSK-WITH-ARIA-256-CBC-SHA384 \
|
|
|
|
TLS-PSK-WITH-ARIA-128-CBC-SHA256 \
|
2018-02-15 11:43:55 +01:00
|
|
|
TLS-RSA-PSK-WITH-ARIA-256-GCM-SHA384 \
|
|
|
|
TLS-RSA-PSK-WITH-ARIA-128-GCM-SHA256 \
|
2018-02-20 11:58:44 +01:00
|
|
|
TLS-ECDHE-PSK-WITH-ARIA-256-CBC-SHA384 \
|
|
|
|
TLS-ECDHE-PSK-WITH-ARIA-128-CBC-SHA256 \
|
|
|
|
TLS-DHE-PSK-WITH-ARIA-256-CBC-SHA384 \
|
|
|
|
TLS-DHE-PSK-WITH-ARIA-128-CBC-SHA256 \
|
2018-06-18 11:38:22 +02:00
|
|
|
TLS-RSA-PSK-WITH-CHACHA20-POLY1305-SHA256 \
|
2014-05-22 14:36:02 +02:00
|
|
|
"
|
|
|
|
fi
|
2014-02-28 12:42:57 +01:00
|
|
|
;;
|
|
|
|
esac
|
2014-02-19 13:51:58 +01:00
|
|
|
}
|
|
|
|
|
2014-02-19 13:35:52 +01:00
|
|
|
setup_arguments()
|
|
|
|
{
|
2014-03-26 15:30:16 +01:00
|
|
|
G_MODE=""
|
|
|
|
case "$MODE" in
|
2014-02-28 12:42:57 +01:00
|
|
|
"tls1_2")
|
|
|
|
G_PRIO_MODE="+VERS-TLS1.2"
|
2014-02-19 14:24:24 +01:00
|
|
|
;;
|
2014-03-26 15:30:16 +01:00
|
|
|
"dtls1_2")
|
|
|
|
G_PRIO_MODE="+VERS-DTLS1.2"
|
2014-09-26 16:33:45 +02:00
|
|
|
G_MODE="-u"
|
2014-03-26 15:30:16 +01:00
|
|
|
;;
|
2014-02-19 14:24:24 +01:00
|
|
|
*)
|
|
|
|
echo "error: invalid mode: $MODE" >&2
|
|
|
|
exit 1;
|
|
|
|
esac
|
|
|
|
|
2018-06-14 13:14:29 +02:00
|
|
|
# GnuTLS < 3.4 will choke if we try to allow CCM-8
|
|
|
|
if [ -z "${GNUTLS_MINOR_LT_FOUR-}" ]; then
|
|
|
|
G_PRIO_CCM="+AES-256-CCM-8:+AES-128-CCM-8:"
|
|
|
|
else
|
|
|
|
G_PRIO_CCM=""
|
|
|
|
fi
|
|
|
|
|
2021-02-22 14:36:29 +01:00
|
|
|
M_SERVER_ARGS="server_port=$PORT server_addr=0.0.0.0 force_version=$MODE"
|
2021-04-01 14:00:11 +02:00
|
|
|
O_SERVER_ARGS="-accept $PORT -cipher NULL,ALL -$MODE"
|
2014-03-26 15:30:16 +01:00
|
|
|
G_SERVER_ARGS="-p $PORT --http $G_MODE"
|
2021-02-22 14:36:29 +01:00
|
|
|
G_SERVER_PRIO="NORMAL:${G_PRIO_CCM}+NULL:+MD5:+PSK:+DHE-PSK:+ECDHE-PSK:+SHA256:+SHA384:+RSA-PSK:-VERS-TLS-ALL:$G_PRIO_MODE"
|
2014-02-28 12:42:57 +01:00
|
|
|
|
2021-04-01 14:00:11 +02:00
|
|
|
# The default prime for `openssl s_server` depends on the version:
|
|
|
|
# * OpenSSL <= 1.0.2a: 512-bit
|
|
|
|
# * OpenSSL 1.0.2b to 1.1.1b: 1024-bit
|
|
|
|
# * OpenSSL >= 1.1.1c: 2048-bit
|
|
|
|
# Mbed TLS wants >=1024, so force that for older versions. Don't force
|
|
|
|
# it for newer versions, which reject a 1024-bit prime. Indifferently
|
|
|
|
# force it or not for intermediate versions.
|
|
|
|
case $($OPENSSL_CMD version) in
|
|
|
|
"OpenSSL 1.0"*)
|
|
|
|
O_SERVER_ARGS="$O_SERVER_ARGS -dhparam data_files/dhparams.pem"
|
|
|
|
;;
|
|
|
|
esac
|
|
|
|
|
2014-07-11 17:01:06 +02:00
|
|
|
# with OpenSSL 1.0.1h, -www, -WWW and -HTTP break DTLS handshakes
|
|
|
|
if is_dtls "$MODE"; then
|
2014-09-26 16:33:45 +02:00
|
|
|
O_SERVER_ARGS="$O_SERVER_ARGS"
|
2014-07-11 17:01:06 +02:00
|
|
|
else
|
|
|
|
O_SERVER_ARGS="$O_SERVER_ARGS -www"
|
|
|
|
fi
|
|
|
|
|
2016-09-04 23:31:09 +02:00
|
|
|
M_CLIENT_ARGS="server_port=$PORT server_addr=127.0.0.1 force_version=$MODE"
|
2014-05-28 22:59:30 +02:00
|
|
|
O_CLIENT_ARGS="-connect localhost:$PORT -$MODE"
|
2014-03-26 15:30:16 +01:00
|
|
|
G_CLIENT_ARGS="-p $PORT --debug 3 $G_MODE"
|
2014-03-13 16:21:59 +01:00
|
|
|
G_CLIENT_PRIO="NONE:$G_PRIO_MODE:+COMP-NULL:+CURVE-ALL:+SIGN-ALL"
|
2014-02-19 14:24:24 +01:00
|
|
|
|
2014-02-19 13:35:52 +01:00
|
|
|
if [ "X$VERIFY" = "XYES" ];
|
|
|
|
then
|
2016-09-04 23:31:09 +02:00
|
|
|
M_SERVER_ARGS="$M_SERVER_ARGS ca_file=data_files/test-ca_cat12.crt auth_mode=required"
|
2014-02-19 14:24:24 +01:00
|
|
|
O_SERVER_ARGS="$O_SERVER_ARGS -CAfile data_files/test-ca_cat12.crt -Verify 10"
|
2014-02-28 12:42:57 +01:00
|
|
|
G_SERVER_ARGS="$G_SERVER_ARGS --x509cafile data_files/test-ca_cat12.crt --require-client-cert"
|
|
|
|
|
2016-09-04 23:31:09 +02:00
|
|
|
M_CLIENT_ARGS="$M_CLIENT_ARGS ca_file=data_files/test-ca_cat12.crt auth_mode=required"
|
2014-02-21 10:10:20 +01:00
|
|
|
O_CLIENT_ARGS="$O_CLIENT_ARGS -CAfile data_files/test-ca_cat12.crt -verify 10"
|
2014-03-13 16:21:59 +01:00
|
|
|
G_CLIENT_ARGS="$G_CLIENT_ARGS --x509cafile data_files/test-ca_cat12.crt"
|
2014-02-21 10:10:20 +01:00
|
|
|
else
|
2014-02-28 12:42:57 +01:00
|
|
|
# don't request a client cert at all
|
2016-09-04 23:31:09 +02:00
|
|
|
M_SERVER_ARGS="$M_SERVER_ARGS ca_file=none auth_mode=none"
|
2014-02-28 12:42:57 +01:00
|
|
|
G_SERVER_ARGS="$G_SERVER_ARGS --disable-client-cert"
|
|
|
|
|
2016-09-04 23:31:09 +02:00
|
|
|
M_CLIENT_ARGS="$M_CLIENT_ARGS ca_file=none auth_mode=none"
|
2014-03-19 17:34:52 +01:00
|
|
|
O_CLIENT_ARGS="$O_CLIENT_ARGS"
|
|
|
|
G_CLIENT_ARGS="$G_CLIENT_ARGS --insecure"
|
2014-02-19 13:35:52 +01:00
|
|
|
fi
|
|
|
|
|
|
|
|
case $TYPE in
|
|
|
|
"ECDSA")
|
2016-09-04 23:31:09 +02:00
|
|
|
M_SERVER_ARGS="$M_SERVER_ARGS crt_file=data_files/server5.crt key_file=data_files/server5.key"
|
2014-02-19 14:24:24 +01:00
|
|
|
O_SERVER_ARGS="$O_SERVER_ARGS -cert data_files/server5.crt -key data_files/server5.key"
|
2014-02-28 12:42:57 +01:00
|
|
|
G_SERVER_ARGS="$G_SERVER_ARGS --x509certfile data_files/server5.crt --x509keyfile data_files/server5.key"
|
|
|
|
|
2014-02-27 14:38:29 +01:00
|
|
|
if [ "X$VERIFY" = "XYES" ]; then
|
2016-09-04 23:31:09 +02:00
|
|
|
M_CLIENT_ARGS="$M_CLIENT_ARGS crt_file=data_files/server6.crt key_file=data_files/server6.key"
|
2014-02-27 14:38:29 +01:00
|
|
|
O_CLIENT_ARGS="$O_CLIENT_ARGS -cert data_files/server6.crt -key data_files/server6.key"
|
2014-03-13 16:21:59 +01:00
|
|
|
G_CLIENT_ARGS="$G_CLIENT_ARGS --x509certfile data_files/server6.crt --x509keyfile data_files/server6.key"
|
2014-02-27 14:38:29 +01:00
|
|
|
else
|
2016-09-04 23:31:09 +02:00
|
|
|
M_CLIENT_ARGS="$M_CLIENT_ARGS crt_file=none key_file=none"
|
2014-02-27 14:38:29 +01:00
|
|
|
fi
|
2014-02-19 13:35:52 +01:00
|
|
|
;;
|
|
|
|
|
|
|
|
"RSA")
|
2020-08-21 12:24:32 +02:00
|
|
|
M_SERVER_ARGS="$M_SERVER_ARGS crt_file=data_files/server2-sha256.crt key_file=data_files/server2.key"
|
|
|
|
O_SERVER_ARGS="$O_SERVER_ARGS -cert data_files/server2-sha256.crt -key data_files/server2.key"
|
|
|
|
G_SERVER_ARGS="$G_SERVER_ARGS --x509certfile data_files/server2-sha256.crt --x509keyfile data_files/server2.key"
|
2014-02-28 12:42:57 +01:00
|
|
|
|
2014-02-27 14:38:29 +01:00
|
|
|
if [ "X$VERIFY" = "XYES" ]; then
|
2020-08-21 12:24:32 +02:00
|
|
|
M_CLIENT_ARGS="$M_CLIENT_ARGS crt_file=data_files/cert_sha256.crt key_file=data_files/server1.key"
|
|
|
|
O_CLIENT_ARGS="$O_CLIENT_ARGS -cert data_files/cert_sha256.crt -key data_files/server1.key"
|
|
|
|
G_CLIENT_ARGS="$G_CLIENT_ARGS --x509certfile data_files/cert_sha256.crt --x509keyfile data_files/server1.key"
|
2014-02-27 14:38:29 +01:00
|
|
|
else
|
2016-09-04 23:31:09 +02:00
|
|
|
M_CLIENT_ARGS="$M_CLIENT_ARGS crt_file=none key_file=none"
|
2014-02-27 14:38:29 +01:00
|
|
|
fi
|
2014-02-19 13:35:52 +01:00
|
|
|
;;
|
|
|
|
|
|
|
|
"PSK")
|
2014-02-28 12:42:57 +01:00
|
|
|
# give RSA-PSK-capable server a RSA cert
|
2014-02-27 14:38:29 +01:00
|
|
|
# (should be a separate type, but harder to close with openssl)
|
2020-08-21 12:24:32 +02:00
|
|
|
M_SERVER_ARGS="$M_SERVER_ARGS psk=6162636465666768696a6b6c6d6e6f70 ca_file=none crt_file=data_files/server2-sha256.crt key_file=data_files/server2.key"
|
2014-02-27 14:38:29 +01:00
|
|
|
O_SERVER_ARGS="$O_SERVER_ARGS -psk 6162636465666768696a6b6c6d6e6f70 -nocert"
|
2020-08-21 12:24:32 +02:00
|
|
|
G_SERVER_ARGS="$G_SERVER_ARGS --x509certfile data_files/server2-sha256.crt --x509keyfile data_files/server2.key --pskpasswd data_files/passwd.psk"
|
2014-02-28 12:42:57 +01:00
|
|
|
|
2016-09-04 23:31:09 +02:00
|
|
|
M_CLIENT_ARGS="$M_CLIENT_ARGS psk=6162636465666768696a6b6c6d6e6f70 crt_file=none key_file=none"
|
2014-02-19 14:24:24 +01:00
|
|
|
O_CLIENT_ARGS="$O_CLIENT_ARGS -psk 6162636465666768696a6b6c6d6e6f70"
|
2014-03-13 16:21:59 +01:00
|
|
|
G_CLIENT_ARGS="$G_CLIENT_ARGS --pskusername Client_identity --pskkey=6162636465666768696a6b6c6d6e6f70"
|
2014-02-19 13:35:52 +01:00
|
|
|
;;
|
|
|
|
esac
|
|
|
|
}
|
|
|
|
|
2016-09-04 23:31:09 +02:00
|
|
|
# is_mbedtls <cmd_line>
|
|
|
|
is_mbedtls() {
|
2014-02-27 15:37:24 +01:00
|
|
|
echo "$1" | grep 'ssl_server2\|ssl_client2' > /dev/null
|
|
|
|
}
|
|
|
|
|
|
|
|
# has_mem_err <log_file_name>
|
|
|
|
has_mem_err() {
|
|
|
|
if ( grep -F 'All heap blocks were freed -- no leaks are possible' "$1" &&
|
|
|
|
grep -F 'ERROR SUMMARY: 0 errors from 0 contexts' "$1" ) > /dev/null
|
|
|
|
then
|
|
|
|
return 1 # false: does not have errors
|
|
|
|
else
|
|
|
|
return 0 # true: has errors
|
|
|
|
fi
|
|
|
|
}
|
|
|
|
|
2017-12-14 19:02:00 +01:00
|
|
|
# Wait for process $2 to be listening on port $1
|
|
|
|
if type lsof >/dev/null 2>/dev/null; then
|
|
|
|
wait_server_start() {
|
|
|
|
START_TIME=$(date +%s)
|
|
|
|
if is_dtls "$MODE"; then
|
|
|
|
proto=UDP
|
|
|
|
else
|
|
|
|
proto=TCP
|
|
|
|
fi
|
|
|
|
while ! lsof -a -n -b -i "$proto:$1" -p "$2" >/dev/null 2>/dev/null; do
|
|
|
|
if [ $(( $(date +%s) - $START_TIME )) -gt $DOG_DELAY ]; then
|
|
|
|
echo "SERVERSTART TIMEOUT"
|
|
|
|
echo "SERVERSTART TIMEOUT" >> $SRV_OUT
|
|
|
|
break
|
|
|
|
fi
|
|
|
|
# Linux and *BSD support decimal arguments to sleep. On other
|
|
|
|
# OSes this may be a tight loop.
|
|
|
|
sleep 0.1 2>/dev/null || true
|
|
|
|
done
|
|
|
|
}
|
|
|
|
else
|
2018-01-08 12:38:15 +01:00
|
|
|
echo "Warning: lsof not available, wait_server_start = sleep"
|
2017-12-14 19:02:00 +01:00
|
|
|
wait_server_start() {
|
2018-01-22 10:22:09 +01:00
|
|
|
sleep 2
|
2017-12-14 19:02:00 +01:00
|
|
|
}
|
|
|
|
fi
|
|
|
|
|
|
|
|
|
2014-02-19 14:45:00 +01:00
|
|
|
# start_server <name>
|
|
|
|
# also saves name and command
|
|
|
|
start_server() {
|
|
|
|
case $1 in
|
|
|
|
[Oo]pen*)
|
2014-03-13 18:47:44 +01:00
|
|
|
SERVER_CMD="$OPENSSL_CMD s_server $O_SERVER_ARGS"
|
2014-02-19 14:45:00 +01:00
|
|
|
;;
|
2014-02-28 12:42:57 +01:00
|
|
|
[Gg]nu*)
|
2014-03-13 18:47:44 +01:00
|
|
|
SERVER_CMD="$GNUTLS_SERV $G_SERVER_ARGS --priority $G_SERVER_PRIO"
|
2014-02-28 12:42:57 +01:00
|
|
|
;;
|
2015-01-22 18:05:05 +01:00
|
|
|
mbed*)
|
2016-09-04 23:31:09 +02:00
|
|
|
SERVER_CMD="$M_SRV $M_SERVER_ARGS"
|
2014-02-27 15:37:24 +01:00
|
|
|
if [ "$MEMCHECK" -gt 0 ]; then
|
|
|
|
SERVER_CMD="valgrind --leak-check=full $SERVER_CMD"
|
|
|
|
fi
|
2014-02-19 14:45:00 +01:00
|
|
|
;;
|
|
|
|
*)
|
|
|
|
echo "error: invalid server name: $1" >&2
|
|
|
|
exit 1
|
|
|
|
;;
|
|
|
|
esac
|
|
|
|
SERVER_NAME=$1
|
|
|
|
|
|
|
|
log "$SERVER_CMD"
|
2014-05-28 23:06:50 +02:00
|
|
|
echo "$SERVER_CMD" > $SRV_OUT
|
2014-07-11 17:01:06 +02:00
|
|
|
# for servers without -www or equivalent
|
2015-02-09 14:05:54 +01:00
|
|
|
while :; do echo bla; sleep 1; done | $SERVER_CMD >> $SRV_OUT 2>&1 &
|
2014-02-19 14:45:00 +01:00
|
|
|
PROCESS_ID=$!
|
|
|
|
|
2017-12-14 19:02:00 +01:00
|
|
|
wait_server_start "$PORT" "$PROCESS_ID"
|
2014-02-19 14:45:00 +01:00
|
|
|
}
|
|
|
|
|
2014-08-31 10:37:14 +02:00
|
|
|
# terminate the running server
|
2014-02-19 15:29:38 +01:00
|
|
|
stop_server() {
|
2014-08-14 15:47:33 +02:00
|
|
|
kill $PROCESS_ID 2>/dev/null
|
|
|
|
wait $PROCESS_ID 2>/dev/null
|
2014-02-27 15:37:24 +01:00
|
|
|
|
|
|
|
if [ "$MEMCHECK" -gt 0 ]; then
|
2016-09-04 23:31:09 +02:00
|
|
|
if is_mbedtls "$SERVER_CMD" && has_mem_err $SRV_OUT; then
|
2014-02-27 15:37:24 +01:00
|
|
|
echo " ! Server had memory errors"
|
2014-08-31 10:22:11 +02:00
|
|
|
SRVMEM=$(( $SRVMEM + 1 ))
|
2014-02-27 15:37:24 +01:00
|
|
|
return
|
|
|
|
fi
|
|
|
|
fi
|
|
|
|
|
2014-05-28 23:06:50 +02:00
|
|
|
rm -f $SRV_OUT
|
2014-02-19 15:29:38 +01:00
|
|
|
}
|
|
|
|
|
2014-02-25 16:21:22 +01:00
|
|
|
# kill the running server (used when killed by signal)
|
|
|
|
cleanup() {
|
2014-05-28 23:06:50 +02:00
|
|
|
rm -f $SRV_OUT $CLI_OUT
|
2014-08-31 10:37:14 +02:00
|
|
|
kill $PROCESS_ID >/dev/null 2>&1
|
|
|
|
kill $WATCHDOG_PID >/dev/null 2>&1
|
2014-02-25 16:21:22 +01:00
|
|
|
exit 1
|
|
|
|
}
|
|
|
|
|
2014-08-30 22:41:47 +02:00
|
|
|
# wait for client to terminate and set EXIT
|
|
|
|
# must be called right after starting the client
|
|
|
|
wait_client_done() {
|
|
|
|
CLI_PID=$!
|
|
|
|
|
|
|
|
( sleep "$DOG_DELAY"; echo "TIMEOUT" >> $CLI_OUT; kill $CLI_PID ) &
|
|
|
|
WATCHDOG_PID=$!
|
|
|
|
|
|
|
|
wait $CLI_PID
|
|
|
|
EXIT=$?
|
|
|
|
|
|
|
|
kill $WATCHDOG_PID
|
|
|
|
wait $WATCHDOG_PID
|
|
|
|
|
|
|
|
echo "EXIT: $EXIT" >> $CLI_OUT
|
|
|
|
}
|
|
|
|
|
2014-02-19 15:23:21 +01:00
|
|
|
# run_client <name> <cipher>
|
|
|
|
run_client() {
|
2014-02-27 11:12:30 +01:00
|
|
|
# announce what we're going to do
|
2014-08-31 10:22:11 +02:00
|
|
|
TESTS=$(( $TESTS + 1 ))
|
2014-02-27 11:12:30 +01:00
|
|
|
VERIF=$(echo $VERIFY | tr '[:upper:]' '[:lower:]')
|
2014-08-31 10:22:11 +02:00
|
|
|
TITLE="`echo $1 | head -c1`->`echo $SERVER_NAME | head -c1`"
|
|
|
|
TITLE="$TITLE $MODE,$VERIF $2"
|
2020-08-26 20:05:11 +02:00
|
|
|
printf "%s " "$TITLE"
|
2014-08-31 10:22:11 +02:00
|
|
|
LEN=$(( 72 - `echo "$TITLE" | wc -c` ))
|
2014-12-11 11:51:28 +01:00
|
|
|
for i in `seq 1 $LEN`; do printf '.'; done; printf ' '
|
2014-02-27 11:12:30 +01:00
|
|
|
|
2014-07-11 17:41:24 +02:00
|
|
|
# should we skip?
|
|
|
|
if [ "X$SKIP_NEXT" = "XYES" ]; then
|
|
|
|
SKIP_NEXT="NO"
|
|
|
|
echo "SKIP"
|
|
|
|
SKIPPED=$(( $SKIPPED + 1 ))
|
|
|
|
return
|
|
|
|
fi
|
|
|
|
|
2014-02-19 15:23:21 +01:00
|
|
|
# run the command and interpret result
|
|
|
|
case $1 in
|
|
|
|
[Oo]pen*)
|
2014-03-13 18:47:44 +01:00
|
|
|
CLIENT_CMD="$OPENSSL_CMD s_client $O_CLIENT_ARGS -cipher $2"
|
2014-02-19 15:23:21 +01:00
|
|
|
log "$CLIENT_CMD"
|
2014-05-28 23:06:50 +02:00
|
|
|
echo "$CLIENT_CMD" > $CLI_OUT
|
2015-08-04 17:15:13 +02:00
|
|
|
printf 'GET HTTP/1.0\r\n\r\n' | $CLIENT_CMD >> $CLI_OUT 2>&1 &
|
2014-08-30 22:41:47 +02:00
|
|
|
wait_client_done
|
2014-02-19 15:23:21 +01:00
|
|
|
|
2014-08-31 10:22:11 +02:00
|
|
|
if [ $EXIT -eq 0 ]; then
|
2014-02-19 15:23:21 +01:00
|
|
|
RESULT=0
|
|
|
|
else
|
2018-03-13 16:22:58 +01:00
|
|
|
# If the cipher isn't supported...
|
2014-05-28 23:06:50 +02:00
|
|
|
if grep 'Cipher is (NONE)' $CLI_OUT >/dev/null; then
|
2014-02-19 15:23:21 +01:00
|
|
|
RESULT=1
|
|
|
|
else
|
|
|
|
RESULT=2
|
|
|
|
fi
|
|
|
|
fi
|
|
|
|
;;
|
|
|
|
|
2014-03-13 16:21:59 +01:00
|
|
|
[Gg]nu*)
|
2014-07-10 20:12:56 +02:00
|
|
|
# need to force IPv4 with UDP, but keep localhost for auth
|
|
|
|
if is_dtls "$MODE"; then
|
|
|
|
G_HOST="127.0.0.1"
|
|
|
|
else
|
|
|
|
G_HOST="localhost"
|
|
|
|
fi
|
|
|
|
CLIENT_CMD="$GNUTLS_CLI $G_CLIENT_ARGS --priority $G_PRIO_MODE:$2 $G_HOST"
|
2014-03-13 16:21:59 +01:00
|
|
|
log "$CLIENT_CMD"
|
2014-05-28 23:06:50 +02:00
|
|
|
echo "$CLIENT_CMD" > $CLI_OUT
|
2015-08-04 17:15:13 +02:00
|
|
|
printf 'GET HTTP/1.0\r\n\r\n' | $CLIENT_CMD >> $CLI_OUT 2>&1 &
|
2014-08-30 22:41:47 +02:00
|
|
|
wait_client_done
|
2014-03-13 16:21:59 +01:00
|
|
|
|
2014-08-31 10:22:11 +02:00
|
|
|
if [ $EXIT -eq 0 ]; then
|
2014-03-13 16:21:59 +01:00
|
|
|
RESULT=0
|
|
|
|
else
|
2014-03-13 17:45:35 +01:00
|
|
|
RESULT=2
|
|
|
|
# interpret early failure, with a handshake_failure alert
|
|
|
|
# before the server hello, as "no ciphersuite in common"
|
2014-05-28 23:06:50 +02:00
|
|
|
if grep -F 'Received alert [40]: Handshake failed' $CLI_OUT; then
|
|
|
|
if grep -i 'SERVER HELLO .* was received' $CLI_OUT; then :
|
2014-03-13 17:45:35 +01:00
|
|
|
else
|
|
|
|
RESULT=1
|
|
|
|
fi
|
|
|
|
fi >/dev/null
|
2014-03-13 16:21:59 +01:00
|
|
|
fi
|
|
|
|
;;
|
|
|
|
|
2015-01-22 18:05:05 +01:00
|
|
|
mbed*)
|
2016-09-04 23:31:09 +02:00
|
|
|
CLIENT_CMD="$M_CLI $M_CLIENT_ARGS force_ciphersuite=$2"
|
2014-02-27 15:37:24 +01:00
|
|
|
if [ "$MEMCHECK" -gt 0 ]; then
|
|
|
|
CLIENT_CMD="valgrind --leak-check=full $CLIENT_CMD"
|
|
|
|
fi
|
2014-02-19 15:23:21 +01:00
|
|
|
log "$CLIENT_CMD"
|
2014-05-28 23:06:50 +02:00
|
|
|
echo "$CLIENT_CMD" > $CLI_OUT
|
2014-08-30 22:41:47 +02:00
|
|
|
$CLIENT_CMD >> $CLI_OUT 2>&1 &
|
|
|
|
wait_client_done
|
2014-02-19 15:23:21 +01:00
|
|
|
|
|
|
|
case $EXIT in
|
2016-09-04 23:31:09 +02:00
|
|
|
# Success
|
2014-02-19 15:23:21 +01:00
|
|
|
"0") RESULT=0 ;;
|
2016-09-04 23:31:09 +02:00
|
|
|
|
|
|
|
# Ciphersuite not supported
|
2014-02-19 15:23:21 +01:00
|
|
|
"2") RESULT=1 ;;
|
2016-09-04 23:31:09 +02:00
|
|
|
|
|
|
|
# Error
|
2014-02-19 15:23:21 +01:00
|
|
|
*) RESULT=2 ;;
|
|
|
|
esac
|
2014-02-27 15:37:24 +01:00
|
|
|
|
|
|
|
if [ "$MEMCHECK" -gt 0 ]; then
|
2016-09-04 23:31:09 +02:00
|
|
|
if is_mbedtls "$CLIENT_CMD" && has_mem_err $CLI_OUT; then
|
2014-02-27 15:37:24 +01:00
|
|
|
RESULT=2
|
|
|
|
fi
|
|
|
|
fi
|
|
|
|
|
2014-02-19 15:23:21 +01:00
|
|
|
;;
|
|
|
|
|
|
|
|
*)
|
|
|
|
echo "error: invalid client name: $1" >&2
|
|
|
|
exit 1
|
|
|
|
;;
|
|
|
|
esac
|
|
|
|
|
2014-05-28 23:06:50 +02:00
|
|
|
echo "EXIT: $EXIT" >> $CLI_OUT
|
2014-03-25 14:16:44 +01:00
|
|
|
|
2014-02-19 15:23:21 +01:00
|
|
|
# report and count result
|
|
|
|
case $RESULT in
|
|
|
|
"0")
|
2014-02-24 13:20:14 +01:00
|
|
|
echo PASS
|
2014-02-19 15:23:21 +01:00
|
|
|
;;
|
|
|
|
"1")
|
2014-02-24 13:20:14 +01:00
|
|
|
echo SKIP
|
2014-08-31 10:22:11 +02:00
|
|
|
SKIPPED=$(( $SKIPPED + 1 ))
|
2014-02-19 15:23:21 +01:00
|
|
|
;;
|
|
|
|
"2")
|
2014-02-24 13:20:14 +01:00
|
|
|
echo FAIL
|
2014-08-31 10:22:11 +02:00
|
|
|
cp $SRV_OUT c-srv-${TESTS}.log
|
|
|
|
cp $CLI_OUT c-cli-${TESTS}.log
|
|
|
|
echo " ! outputs saved to c-srv-${TESTS}.log, c-cli-${TESTS}.log"
|
2014-08-31 17:42:53 +02:00
|
|
|
|
2020-07-27 09:46:53 +02:00
|
|
|
if [ "${LOG_FAILURE_ON_STDOUT:-0}" != 0 ]; then
|
2014-08-31 17:42:53 +02:00
|
|
|
echo " ! server output:"
|
|
|
|
cat c-srv-${TESTS}.log
|
|
|
|
echo " ! ==================================================="
|
|
|
|
echo " ! client output:"
|
|
|
|
cat c-cli-${TESTS}.log
|
|
|
|
fi
|
|
|
|
|
2014-08-31 10:22:11 +02:00
|
|
|
FAILED=$(( $FAILED + 1 ))
|
2014-02-19 15:23:21 +01:00
|
|
|
;;
|
|
|
|
esac
|
2014-02-27 11:12:30 +01:00
|
|
|
|
2014-05-28 23:06:50 +02:00
|
|
|
rm -f $CLI_OUT
|
2014-02-19 15:23:21 +01:00
|
|
|
}
|
|
|
|
|
2014-02-26 18:21:02 +01:00
|
|
|
#
|
|
|
|
# MAIN
|
|
|
|
#
|
|
|
|
|
2015-03-10 14:41:04 +01:00
|
|
|
if cd $( dirname $0 ); then :; else
|
|
|
|
echo "cd $( dirname $0 ) failed" >&2
|
|
|
|
exit 1
|
|
|
|
fi
|
|
|
|
|
2014-03-14 18:13:53 +01:00
|
|
|
get_options "$@"
|
|
|
|
|
2014-02-27 12:25:54 +01:00
|
|
|
# sanity checks, avoid an avalanche of errors
|
2016-09-04 23:31:09 +02:00
|
|
|
if [ ! -x "$M_SRV" ]; then
|
|
|
|
echo "Command '$M_SRV' is not an executable file" >&2
|
2014-02-27 12:25:54 +01:00
|
|
|
exit 1
|
|
|
|
fi
|
2016-09-04 23:31:09 +02:00
|
|
|
if [ ! -x "$M_CLI" ]; then
|
|
|
|
echo "Command '$M_CLI' is not an executable file" >&2
|
2014-02-27 12:25:54 +01:00
|
|
|
exit 1
|
|
|
|
fi
|
2014-03-14 18:13:53 +01:00
|
|
|
|
|
|
|
if echo "$PEERS" | grep -i openssl > /dev/null; then
|
|
|
|
if which "$OPENSSL_CMD" >/dev/null 2>&1; then :; else
|
|
|
|
echo "Command '$OPENSSL_CMD' not found" >&2
|
2014-03-13 18:47:44 +01:00
|
|
|
exit 1
|
|
|
|
fi
|
2014-03-14 18:13:53 +01:00
|
|
|
fi
|
2014-02-27 12:25:54 +01:00
|
|
|
|
2014-03-14 18:13:53 +01:00
|
|
|
if echo "$PEERS" | grep -i gnutls > /dev/null; then
|
|
|
|
for CMD in "$GNUTLS_CLI" "$GNUTLS_SERV"; do
|
|
|
|
if which "$CMD" >/dev/null 2>&1; then :; else
|
|
|
|
echo "Command '$CMD' not found" >&2
|
|
|
|
exit 1
|
|
|
|
fi
|
|
|
|
done
|
|
|
|
fi
|
|
|
|
|
|
|
|
for PEER in $PEERS; do
|
|
|
|
case "$PEER" in
|
2015-01-22 18:05:05 +01:00
|
|
|
mbed*|[Oo]pen*|[Gg]nu*)
|
2014-03-14 18:13:53 +01:00
|
|
|
;;
|
|
|
|
*)
|
|
|
|
echo "Unknown peers: $PEER" >&2
|
|
|
|
exit 1
|
|
|
|
esac
|
|
|
|
done
|
2014-02-26 18:21:02 +01:00
|
|
|
|
2014-05-28 22:59:30 +02:00
|
|
|
# Pick a "unique" port in the range 10000-19999.
|
|
|
|
PORT="0000$$"
|
2014-06-16 16:54:36 +02:00
|
|
|
PORT="1$(echo $PORT | tail -c 5)"
|
2014-05-28 22:59:30 +02:00
|
|
|
|
2014-05-28 23:06:50 +02:00
|
|
|
# Also pick a unique name for intermediate files
|
|
|
|
SRV_OUT="srv_out.$$"
|
|
|
|
CLI_OUT="cli_out.$$"
|
|
|
|
|
2014-08-30 22:41:47 +02:00
|
|
|
# client timeout delay: be more patient with valgrind
|
|
|
|
if [ "$MEMCHECK" -gt 0 ]; then
|
|
|
|
DOG_DELAY=30
|
|
|
|
else
|
|
|
|
DOG_DELAY=10
|
|
|
|
fi
|
|
|
|
|
2014-07-11 17:41:24 +02:00
|
|
|
SKIP_NEXT="NO"
|
|
|
|
|
2014-02-25 16:21:22 +01:00
|
|
|
trap cleanup INT TERM HUP
|
|
|
|
|
2014-02-19 15:29:38 +01:00
|
|
|
for VERIFY in $VERIFIES; do
|
|
|
|
for MODE in $MODES; do
|
|
|
|
for TYPE in $TYPES; do
|
2014-03-13 17:45:35 +01:00
|
|
|
for PEER in $PEERS; do
|
2013-04-17 19:27:58 +02:00
|
|
|
|
2014-02-19 15:29:38 +01:00
|
|
|
setup_arguments
|
2014-02-28 12:42:57 +01:00
|
|
|
|
2014-03-13 17:45:35 +01:00
|
|
|
case "$PEER" in
|
|
|
|
|
|
|
|
[Oo]pen*)
|
|
|
|
|
2015-08-04 16:43:37 +02:00
|
|
|
if test "$OSSL_NO_DTLS" -gt 0 && is_dtls "$MODE"; then
|
|
|
|
continue;
|
|
|
|
fi
|
|
|
|
|
2014-03-13 17:45:35 +01:00
|
|
|
reset_ciphersuites
|
2014-03-25 19:07:28 +01:00
|
|
|
add_common_ciphersuites
|
2014-03-13 17:45:35 +01:00
|
|
|
add_openssl_ciphersuites
|
|
|
|
filter_ciphersuites
|
|
|
|
|
2016-09-04 23:31:09 +02:00
|
|
|
if [ "X" != "X$M_CIPHERS" ]; then
|
2014-03-13 17:45:35 +01:00
|
|
|
start_server "OpenSSL"
|
2016-09-04 23:31:09 +02:00
|
|
|
for i in $M_CIPHERS; do
|
2014-07-11 17:41:24 +02:00
|
|
|
check_openssl_server_bug $i
|
2015-01-22 17:43:54 +01:00
|
|
|
run_client mbedTLS $i
|
2014-03-13 17:45:35 +01:00
|
|
|
done
|
|
|
|
stop_server
|
|
|
|
fi
|
|
|
|
|
|
|
|
if [ "X" != "X$O_CIPHERS" ]; then
|
2015-01-22 17:43:54 +01:00
|
|
|
start_server "mbedTLS"
|
2014-03-13 17:45:35 +01:00
|
|
|
for i in $O_CIPHERS; do
|
|
|
|
run_client OpenSSL $i
|
|
|
|
done
|
|
|
|
stop_server
|
|
|
|
fi
|
|
|
|
|
|
|
|
;;
|
|
|
|
|
|
|
|
[Gg]nu*)
|
|
|
|
|
|
|
|
reset_ciphersuites
|
2014-03-25 19:07:28 +01:00
|
|
|
add_common_ciphersuites
|
2014-03-13 17:45:35 +01:00
|
|
|
add_gnutls_ciphersuites
|
|
|
|
filter_ciphersuites
|
|
|
|
|
2016-09-04 23:31:09 +02:00
|
|
|
if [ "X" != "X$M_CIPHERS" ]; then
|
2014-03-13 17:45:35 +01:00
|
|
|
start_server "GnuTLS"
|
2016-09-04 23:31:09 +02:00
|
|
|
for i in $M_CIPHERS; do
|
2015-01-22 17:43:54 +01:00
|
|
|
run_client mbedTLS $i
|
2014-03-13 17:45:35 +01:00
|
|
|
done
|
|
|
|
stop_server
|
|
|
|
fi
|
|
|
|
|
|
|
|
if [ "X" != "X$G_CIPHERS" ]; then
|
2015-01-22 17:43:54 +01:00
|
|
|
start_server "mbedTLS"
|
2014-03-13 17:45:35 +01:00
|
|
|
for i in $G_CIPHERS; do
|
|
|
|
run_client GnuTLS $i
|
|
|
|
done
|
|
|
|
stop_server
|
|
|
|
fi
|
|
|
|
|
|
|
|
;;
|
|
|
|
|
2015-01-22 18:05:05 +01:00
|
|
|
mbed*)
|
2014-03-13 17:45:35 +01:00
|
|
|
|
|
|
|
reset_ciphersuites
|
2014-03-25 19:07:28 +01:00
|
|
|
add_common_ciphersuites
|
2014-03-13 17:45:35 +01:00
|
|
|
add_openssl_ciphersuites
|
|
|
|
add_gnutls_ciphersuites
|
2015-04-08 12:49:31 +02:00
|
|
|
add_mbedtls_ciphersuites
|
2014-03-13 17:45:35 +01:00
|
|
|
filter_ciphersuites
|
|
|
|
|
2016-09-04 23:31:09 +02:00
|
|
|
if [ "X" != "X$M_CIPHERS" ]; then
|
2015-01-22 17:43:54 +01:00
|
|
|
start_server "mbedTLS"
|
2016-09-04 23:31:09 +02:00
|
|
|
for i in $M_CIPHERS; do
|
2015-01-22 17:43:54 +01:00
|
|
|
run_client mbedTLS $i
|
2014-03-13 17:45:35 +01:00
|
|
|
done
|
|
|
|
stop_server
|
|
|
|
fi
|
|
|
|
|
|
|
|
;;
|
|
|
|
|
2014-03-25 18:04:59 +01:00
|
|
|
*)
|
2014-05-22 15:47:58 +02:00
|
|
|
echo "Unknown peer: $PEER" >&2
|
2014-03-25 18:04:59 +01:00
|
|
|
exit 1
|
|
|
|
;;
|
|
|
|
|
2014-03-13 17:45:35 +01:00
|
|
|
esac
|
|
|
|
|
|
|
|
done
|
2014-02-19 15:29:38 +01:00
|
|
|
done
|
|
|
|
done
|
2013-08-27 19:57:15 +02:00
|
|
|
done
|
2013-08-27 22:00:47 +02:00
|
|
|
|
2014-02-24 13:20:14 +01:00
|
|
|
echo "------------------------------------------------------------------------"
|
2013-08-27 22:00:47 +02:00
|
|
|
|
2014-08-31 10:22:11 +02:00
|
|
|
if [ $FAILED -ne 0 -o $SRVMEM -ne 0 ];
|
2013-08-27 22:00:47 +02:00
|
|
|
then
|
2014-12-11 11:51:28 +01:00
|
|
|
printf "FAILED"
|
2013-08-27 22:00:47 +02:00
|
|
|
else
|
2014-12-11 11:51:28 +01:00
|
|
|
printf "PASSED"
|
2013-08-27 22:00:47 +02:00
|
|
|
fi
|
|
|
|
|
2014-03-13 17:57:45 +01:00
|
|
|
if [ "$MEMCHECK" -gt 0 ]; then
|
2014-08-31 10:22:11 +02:00
|
|
|
MEMREPORT=", $SRVMEM server memory errors"
|
2014-03-13 17:57:45 +01:00
|
|
|
else
|
|
|
|
MEMREPORT=""
|
|
|
|
fi
|
|
|
|
|
2014-08-31 10:22:11 +02:00
|
|
|
PASSED=$(( $TESTS - $FAILED ))
|
|
|
|
echo " ($PASSED / $TESTS tests ($SKIPPED skipped$MEMREPORT))"
|
2013-08-27 22:00:47 +02:00
|
|
|
|
2014-08-31 10:22:11 +02:00
|
|
|
FAILED=$(( $FAILED + $SRVMEM ))
|
|
|
|
exit $FAILED
|