Manuel Pégourié-Gonnard | fb2ed58 | 2022-07-21 11:04:52 +0200 | [diff] [blame] | 1 | #!/bin/sh |
| 2 | |
Manuel Pégourié-Gonnard | 222bc85 | 2022-12-29 13:47:25 +0100 | [diff] [blame] | 3 | # This script runs tests before and after a PR and analyzes the results in |
| 4 | # order to highlight any difference in the set of tests skipped. |
Manuel Pégourié-Gonnard | fca4dc6 | 2022-07-26 10:10:07 +0200 | [diff] [blame] | 5 | # |
Manuel Pégourié-Gonnard | 222bc85 | 2022-12-29 13:47:25 +0100 | [diff] [blame] | 6 | # It can be used to check the first testing criterion mentioned in strategy.md, |
Manuel Pégourié-Gonnard | fca4dc6 | 2022-07-26 10:10:07 +0200 | [diff] [blame] | 7 | # end of section "Supporting builds with drivers without the software |
Manuel Pégourié-Gonnard | 222bc85 | 2022-12-29 13:47:25 +0100 | [diff] [blame] | 8 | # implementation", namely: the sets of tests skipped in the default config and |
| 9 | # the full config must be the same before and after the PR. |
Manuel Pégourié-Gonnard | fca4dc6 | 2022-07-26 10:10:07 +0200 | [diff] [blame] | 10 | # |
Manuel Pégourié-Gonnard | 6bbeba6 | 2022-12-29 14:02:05 +0100 | [diff] [blame] | 11 | # USAGE: |
| 12 | # - First, commit any uncommited changes. (Also, see warning below.) |
Manuel Pégourié-Gonnard | 5a2e026 | 2023-01-23 12:51:52 +0100 | [diff] [blame] | 13 | # - Then launch --> [SKIP_SSL_OPT=1] docs/architecture/psa-migration/outcome-analysis.sh |
| 14 | # - SKIP_SSL_OPT=1 can optionally be set to skip ssl-opt.sh tests |
Manuel Pégourié-Gonnard | 6bbeba6 | 2022-12-29 14:02:05 +0100 | [diff] [blame] | 15 | # |
Manuel Pégourié-Gonnard | fca4dc6 | 2022-07-26 10:10:07 +0200 | [diff] [blame] | 16 | # WARNING: this script checks out a commit other than the head of the current |
Manuel Pégourié-Gonnard | 68429fc | 2022-07-27 20:37:12 +0200 | [diff] [blame] | 17 | # branch; it checks out the current branch again when running successfully, |
Manuel Pégourié-Gonnard | fca4dc6 | 2022-07-26 10:10:07 +0200 | [diff] [blame] | 18 | # but while the script is running, or if it terminates early in error, you |
Manuel Pégourié-Gonnard | 68429fc | 2022-07-27 20:37:12 +0200 | [diff] [blame] | 19 | # should be aware that you might be at a different commit than expected. |
Manuel Pégourié-Gonnard | fca4dc6 | 2022-07-26 10:10:07 +0200 | [diff] [blame] | 20 | # |
Manuel Pégourié-Gonnard | 222bc85 | 2022-12-29 13:47:25 +0100 | [diff] [blame] | 21 | # NOTE: you can comment out parts that don't need to be re-done when |
Manuel Pégourié-Gonnard | fb2ed58 | 2022-07-21 11:04:52 +0200 | [diff] [blame] | 22 | # re-running this script (for example "get numbers before this PR"). |
| 23 | |
Manuel Pégourié-Gonnard | fb2ed58 | 2022-07-21 11:04:52 +0200 | [diff] [blame] | 24 | set -eu |
| 25 | |
Manuel Pégourié-Gonnard | 6bbeba6 | 2022-12-29 14:02:05 +0100 | [diff] [blame] | 26 | : ${SKIP_SSL_OPT:=0} |
| 27 | |
Manuel Pégourié-Gonnard | fb2ed58 | 2022-07-21 11:04:52 +0200 | [diff] [blame] | 28 | cleanup() { |
| 29 | make clean |
| 30 | git checkout -- include/mbedtls/mbedtls_config.h include/psa/crypto_config.h |
| 31 | } |
| 32 | |
| 33 | record() { |
| 34 | export MBEDTLS_TEST_OUTCOME_FILE="$PWD/outcome-$1.csv" |
| 35 | rm -f $MBEDTLS_TEST_OUTCOME_FILE |
Manuel Pégourié-Gonnard | 6bbeba6 | 2022-12-29 14:02:05 +0100 | [diff] [blame] | 36 | |
Manuel Pégourié-Gonnard | fb2ed58 | 2022-07-21 11:04:52 +0200 | [diff] [blame] | 37 | make check |
Manuel Pégourié-Gonnard | 6bbeba6 | 2022-12-29 14:02:05 +0100 | [diff] [blame] | 38 | |
| 39 | if [ $SKIP_SSL_OPT -eq 0 ]; then |
| 40 | make -C programs ssl/ssl_server2 ssl/ssl_client2 \ |
| 41 | test/udp_proxy test/query_compile_time_config |
| 42 | tests/ssl-opt.sh |
| 43 | fi |
Manuel Pégourié-Gonnard | fb2ed58 | 2022-07-21 11:04:52 +0200 | [diff] [blame] | 44 | } |
| 45 | |
Valerio Setti | ccb0344 | 2023-07-31 15:07:49 +0200 | [diff] [blame] | 46 | # save current HEAD. |
Valerio Setti | ab02d39 | 2023-07-31 16:47:07 +0200 | [diff] [blame] | 47 | # Note: this can optionally be updated to |
| 48 | # HEAD=$(git branch --show-current) |
| 49 | # when using a Git version above 2.22 |
| 50 | HEAD=$(git rev-parse --abbrev-ref HEAD) |
Manuel Pégourié-Gonnard | fb2ed58 | 2022-07-21 11:04:52 +0200 | [diff] [blame] | 51 | |
Przemek Stekiel | 9398664 | 2022-11-09 15:06:44 +0100 | [diff] [blame] | 52 | # get the numbers before this PR for default and full |
Manuel Pégourié-Gonnard | fb2ed58 | 2022-07-21 11:04:52 +0200 | [diff] [blame] | 53 | cleanup |
Przemek Stekiel | 9398664 | 2022-11-09 15:06:44 +0100 | [diff] [blame] | 54 | git checkout $(git merge-base HEAD development) |
Manuel Pégourié-Gonnard | 6bbeba6 | 2022-12-29 14:02:05 +0100 | [diff] [blame] | 55 | |
Przemek Stekiel | 9398664 | 2022-11-09 15:06:44 +0100 | [diff] [blame] | 56 | record "before-default" |
Manuel Pégourié-Gonnard | fb2ed58 | 2022-07-21 11:04:52 +0200 | [diff] [blame] | 57 | |
| 58 | cleanup |
Manuel Pégourié-Gonnard | 6bbeba6 | 2022-12-29 14:02:05 +0100 | [diff] [blame] | 59 | |
Przemek Stekiel | 9398664 | 2022-11-09 15:06:44 +0100 | [diff] [blame] | 60 | scripts/config.py full |
| 61 | record "before-full" |
| 62 | |
| 63 | # get the numbers now for default and full |
| 64 | cleanup |
| 65 | git checkout $HEAD |
Manuel Pégourié-Gonnard | 6bbeba6 | 2022-12-29 14:02:05 +0100 | [diff] [blame] | 66 | |
Przemek Stekiel | 9398664 | 2022-11-09 15:06:44 +0100 | [diff] [blame] | 67 | record "after-default" |
| 68 | |
| 69 | cleanup |
Manuel Pégourié-Gonnard | 6bbeba6 | 2022-12-29 14:02:05 +0100 | [diff] [blame] | 70 | |
Przemek Stekiel | 9398664 | 2022-11-09 15:06:44 +0100 | [diff] [blame] | 71 | scripts/config.py full |
| 72 | record "after-full" |
| 73 | |
Manuel Pégourié-Gonnard | 6bbeba6 | 2022-12-29 14:02:05 +0100 | [diff] [blame] | 74 | cleanup |
| 75 | |
Manuel Pégourié-Gonnard | fb2ed58 | 2022-07-21 11:04:52 +0200 | [diff] [blame] | 76 | # analysis |
| 77 | |
Manuel Pégourié-Gonnard | 2bb2f15 | 2022-10-12 10:57:31 +0200 | [diff] [blame] | 78 | populate_suites () { |
| 79 | SUITES='' |
| 80 | make generated_files >/dev/null |
| 81 | data_files=$(cd tests/suites && echo *.data) |
| 82 | for data in $data_files; do |
Manuel Pégourié-Gonnard | 6bbeba6 | 2022-12-29 14:02:05 +0100 | [diff] [blame] | 83 | suite=${data%.data} |
Manuel Pégourié-Gonnard | 222bc85 | 2022-12-29 13:47:25 +0100 | [diff] [blame] | 84 | SUITES="$SUITES $suite" |
Manuel Pégourié-Gonnard | 2bb2f15 | 2022-10-12 10:57:31 +0200 | [diff] [blame] | 85 | done |
| 86 | make neat |
Manuel Pégourié-Gonnard | 6bbeba6 | 2022-12-29 14:02:05 +0100 | [diff] [blame] | 87 | |
| 88 | if [ $SKIP_SSL_OPT -eq 0 ]; then |
| 89 | SUITES="$SUITES ssl-opt" |
| 90 | extra_files=$(cd tests/opt-testcases && echo *.sh) |
| 91 | for extra in $extra_files; do |
| 92 | suite=${extra%.sh} |
| 93 | SUITES="$SUITES $suite" |
| 94 | done |
| 95 | fi |
Manuel Pégourié-Gonnard | 2bb2f15 | 2022-10-12 10:57:31 +0200 | [diff] [blame] | 96 | } |
| 97 | |
Manuel Pégourié-Gonnard | fb2ed58 | 2022-07-21 11:04:52 +0200 | [diff] [blame] | 98 | compare_suite () { |
| 99 | ref="outcome-$1.csv" |
| 100 | new="outcome-$2.csv" |
| 101 | suite="$3" |
| 102 | |
Manuel Pégourié-Gonnard | 6bbeba6 | 2022-12-29 14:02:05 +0100 | [diff] [blame] | 103 | pattern_suite=";$suite;" |
Manuel Pégourié-Gonnard | fb2ed58 | 2022-07-21 11:04:52 +0200 | [diff] [blame] | 104 | total=$(grep -c "$pattern_suite" "$ref") |
| 105 | sed_cmd="s/^.*$pattern_suite\(.*\);SKIP.*/\1/p" |
| 106 | sed -n "$sed_cmd" "$ref" > skipped-ref |
| 107 | sed -n "$sed_cmd" "$new" > skipped-new |
| 108 | nb_ref=$(wc -l <skipped-ref) |
| 109 | nb_new=$(wc -l <skipped-new) |
| 110 | |
Manuel Pégourié-Gonnard | 6bbeba6 | 2022-12-29 14:02:05 +0100 | [diff] [blame] | 111 | name=${suite#test_suite_} |
| 112 | printf "%40s: total %4d; skipped %4d -> %4d\n" \ |
| 113 | $name $total $nb_ref $nb_new |
Manuel Pégourié-Gonnard | 2bb2f15 | 2022-10-12 10:57:31 +0200 | [diff] [blame] | 114 | if diff skipped-ref skipped-new | grep '^> '; then |
| 115 | ret=1 |
| 116 | else |
| 117 | ret=0 |
| 118 | fi |
Manuel Pégourié-Gonnard | fb2ed58 | 2022-07-21 11:04:52 +0200 | [diff] [blame] | 119 | rm skipped-ref skipped-new |
Manuel Pégourié-Gonnard | 2bb2f15 | 2022-10-12 10:57:31 +0200 | [diff] [blame] | 120 | return $ret |
Manuel Pégourié-Gonnard | fb2ed58 | 2022-07-21 11:04:52 +0200 | [diff] [blame] | 121 | } |
| 122 | |
| 123 | compare_builds () { |
| 124 | printf "\n*** Comparing $1 -> $2 ***\n" |
Manuel Pégourié-Gonnard | 2bb2f15 | 2022-10-12 10:57:31 +0200 | [diff] [blame] | 125 | failed='' |
Manuel Pégourié-Gonnard | fb2ed58 | 2022-07-21 11:04:52 +0200 | [diff] [blame] | 126 | for suite in $SUITES; do |
Manuel Pégourié-Gonnard | 2bb2f15 | 2022-10-12 10:57:31 +0200 | [diff] [blame] | 127 | if compare_suite "$1" "$2" "$suite"; then :; else |
| 128 | failed="$failed $suite" |
| 129 | fi |
Manuel Pégourié-Gonnard | fb2ed58 | 2022-07-21 11:04:52 +0200 | [diff] [blame] | 130 | done |
Manuel Pégourié-Gonnard | b51051f | 2022-10-18 09:42:30 +0200 | [diff] [blame] | 131 | if [ -z "$failed" ]; then |
| 132 | printf "No coverage gap found.\n" |
| 133 | else |
| 134 | printf "Suites with less coverage:%s\n" "$failed" |
| 135 | fi |
Manuel Pégourié-Gonnard | fb2ed58 | 2022-07-21 11:04:52 +0200 | [diff] [blame] | 136 | } |
| 137 | |
Manuel Pégourié-Gonnard | 2bb2f15 | 2022-10-12 10:57:31 +0200 | [diff] [blame] | 138 | populate_suites |
Przemek Stekiel | 9398664 | 2022-11-09 15:06:44 +0100 | [diff] [blame] | 139 | compare_builds before-default after-default |
| 140 | compare_builds before-full after-full |