aboutsummaryrefslogtreecommitdiff
path: root/lib/mbedtls-2.27.0/scripts/generate_query_config.pl
diff options
context:
space:
mode:
Diffstat (limited to 'lib/mbedtls-2.27.0/scripts/generate_query_config.pl')
-rwxr-xr-xlib/mbedtls-2.27.0/scripts/generate_query_config.pl90
1 files changed, 0 insertions, 90 deletions
diff --git a/lib/mbedtls-2.27.0/scripts/generate_query_config.pl b/lib/mbedtls-2.27.0/scripts/generate_query_config.pl
deleted file mode 100755
index 3cef101..0000000
--- a/lib/mbedtls-2.27.0/scripts/generate_query_config.pl
+++ /dev/null
@@ -1,90 +0,0 @@
-#! /usr/bin/env perl
-
-# Generate query_config.c
-#
-# The file query_config.c contains a C function that can be used to check if
-# a configuration macro is defined and to retrieve its expansion in string
-# form (if any). This facilitates querying the compile time configuration of
-# the library, for example, for testing.
-#
-# The query_config.c is generated from the current configuration at
-# include/mbedtls/config.h. The idea is that the config.h contains ALL the
-# compile time configurations available in Mbed TLS (commented or uncommented).
-# This script extracts the configuration macros from the config.h and this
-# information is used to automatically generate the body of the query_config()
-# function by using the template in scripts/data_files/query_config.fmt.
-#
-# Usage: ./scripts/generate_query_config.pl without arguments
-#
-# Copyright The Mbed TLS Contributors
-# 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.
-
-use strict;
-
-my $config_file = "./include/mbedtls/config.h";
-
-my $query_config_format_file = "./scripts/data_files/query_config.fmt";
-my $query_config_file = "./programs/test/query_config.c";
-
-# Excluded macros from the generated query_config.c. For example, macros that
-# have commas or function-like macros cannot be transformed into strings easily
-# using the preprocessor, so they should be excluded or the preprocessor will
-# throw errors.
-my @excluded = qw(
-MBEDTLS_SSL_CIPHERSUITES
-MBEDTLS_PARAM_FAILED
-);
-my $excluded_re = join '|', @excluded;
-
-open(CONFIG_FILE, "$config_file") or die "Opening config file '$config_file': $!";
-
-# This variable will contain the string to replace in the CHECK_CONFIG of the
-# format file
-my $config_check = "";
-
-while (my $line = <CONFIG_FILE>) {
- if ($line =~ /^(\/\/)?\s*#\s*define\s+(MBEDTLS_\w+).*/) {
- my $name = $2;
-
- # Skip over the macro that prevents multiple inclusion
- next if "MBEDTLS_CONFIG_H" eq $name;
-
- # Skip over the macro if it is in the ecluded list
- next if $name =~ /$excluded_re/;
-
- $config_check .= "#if defined($name)\n";
- $config_check .= " if( strcmp( \"$name\", config ) == 0 )\n";
- $config_check .= " {\n";
- $config_check .= " MACRO_EXPANSION_TO_STR( $name );\n";
- $config_check .= " return( 0 );\n";
- $config_check .= " }\n";
- $config_check .= "#endif /* $name */\n";
- $config_check .= "\n";
- }
-}
-
-# Read the full format file into a string
-local $/;
-open(FORMAT_FILE, "$query_config_format_file") or die "Opening query config format file '$query_config_format_file': $!";
-my $query_config_format = <FORMAT_FILE>;
-close(FORMAT_FILE);
-
-# Replace the body of the query_config() function with the code we just wrote
-$query_config_format =~ s/CHECK_CONFIG/$config_check/g;
-
-# Rewrite the query_config.c file
-open(QUERY_CONFIG_FILE, ">$query_config_file") or die "Opening destination file '$query_config_file': $!";
-print QUERY_CONFIG_FILE $query_config_format;
-close(QUERY_CONFIG_FILE);