mirror of
https://github.com/yuzu-emu/mbedtls.git
synced 2025-01-23 21:11:06 +00:00
Backport: Add option to do baremetal configuration.
Aligned with development branch and added option 'baremetal' that sets configuration for bare metal builds.
This commit is contained in:
Mohammad Azim Khan
parent
78493be3ee
commit
075dc853fe
|
|
@ -1,13 +1,51 @@
|
||||||
#!/usr/bin/perl
|
#!/usr/bin/perl
|
||||||
|
#
|
||||||
# Tune the configuration file
|
# This file is part of mbed TLS (https://tls.mbed.org)
|
||||||
|
#
|
||||||
|
# Copyright (c) 2014-2016, ARM Limited, All Rights Reserved
|
||||||
|
#
|
||||||
|
# Purpose
|
||||||
|
#
|
||||||
|
# Comments and uncomments #define lines in the given header file and optionally
|
||||||
|
# sets their value or can get the value. This is to provide scripting control of
|
||||||
|
# what preprocessor symbols, and therefore what build time configuration flags
|
||||||
|
# are set in the 'config.h' file.
|
||||||
|
#
|
||||||
|
# Usage: config.pl [-f <file> | --file <file>] [-o | --force]
|
||||||
|
# [set <symbol> <value> | unset <symbol> | get <symbol> |
|
||||||
|
# full | realfull]
|
||||||
|
#
|
||||||
|
# Full usage description provided below.
|
||||||
|
#
|
||||||
|
# Things that shouldn't be enabled with "full".
|
||||||
|
#
|
||||||
|
# MBEDTLS_TEST_NULL_ENTROPY
|
||||||
|
# MBEDTLS_DEPRECATED_REMOVED
|
||||||
|
# MBEDTLS_HAVE_SSE2
|
||||||
|
# MBEDTLS_PLATFORM_NO_STD_FUNCTIONS
|
||||||
|
# MBEDTLS_ECP_DP_M221_ENABLED
|
||||||
|
# MBEDTLS_ECP_DP_M383_ENABLED
|
||||||
|
# MBEDTLS_ECP_DP_M511_ENABLED
|
||||||
|
# MBEDTLS_NO_DEFAULT_ENTROPY_SOURCES
|
||||||
|
# MBEDTLS_NO_PLATFORM_ENTROPY
|
||||||
|
# MBEDTLS_REMOVE_ARC4_CIPHERSUITES
|
||||||
|
# MBEDTLS_SSL_HW_RECORD_ACCEL
|
||||||
|
# MBEDTLS_X509_ALLOW_EXTENSIONS_NON_V3
|
||||||
|
# MBEDTLS_X509_ALLOW_UNSUPPORTED_CRITICAL_EXTENSION
|
||||||
|
# - this could be enabled if the respective tests were adapted
|
||||||
|
# MBEDTLS_ZLIB_SUPPORT
|
||||||
|
# MBEDTLS_PKCS11_C
|
||||||
|
# and any symbol beginning _ALT
|
||||||
|
#
|
||||||
|
|
||||||
use warnings;
|
use warnings;
|
||||||
use strict;
|
use strict;
|
||||||
|
|
||||||
my $config_file = "include/mbedtls/config.h";
|
my $config_file = "include/mbedtls/config.h";
|
||||||
my $usage = <<EOU;
|
my $usage = <<EOU;
|
||||||
$0 [-f <file>] [set <symbol> <value> | unset <symbol> | full | realfull]
|
$0 [-f <file> | --file <file>] [-o | --force]
|
||||||
|
[set <symbol> <value> | unset <symbol> | get <symbol> |
|
||||||
|
full | realfull | baremetal]
|
||||||
|
|
||||||
Commands
|
Commands
|
||||||
set <symbol> [<value>] - Uncomments or adds a #define for the <symbol> to
|
set <symbol> [<value>] - Uncomments or adds a #define for the <symbol> to
|
||||||
|
|
@ -17,25 +55,27 @@ Commands
|
||||||
is returned.
|
is returned.
|
||||||
unset <symbol> - Comments out the #define for the given symbol if
|
unset <symbol> - Comments out the #define for the given symbol if
|
||||||
present in the configuration file.
|
present in the configuration file.
|
||||||
|
get <symbol> - Finds the #define for the given symbol, returning
|
||||||
|
an exitcode of 0 if the symbol is found, and 1 if
|
||||||
|
not. The value of the symbol is output if one is
|
||||||
|
specified in the configuration file.
|
||||||
full - Uncomments all #define's in the configuration file
|
full - Uncomments all #define's in the configuration file
|
||||||
excluding some reserved symbols, until the
|
excluding some reserved symbols, until the
|
||||||
'Module configuration options' section
|
'Module configuration options' section
|
||||||
realfull - Uncomments all #define's with no exclusions
|
realfull - Uncomments all #define's with no exclusions
|
||||||
|
baremetal - Sets full configuration suitable for baremetal build.
|
||||||
|
|
||||||
Options
|
Options
|
||||||
-f <filename> - The file or file path for the configuration file
|
-f | --file <filename> - The file or file path for the configuration file
|
||||||
to edit. When omitted, the following default is
|
to edit. When omitted, the following default is
|
||||||
used:
|
used:
|
||||||
$config_file
|
$config_file
|
||||||
EOU
|
-o | --force - If the symbol isn't present in the configuration
|
||||||
# for our eyes only:
|
file when setting its value, a #define is
|
||||||
# $0 [-f <file>] full|realfull
|
appended to the end of the file.
|
||||||
|
|
||||||
|
EOU
|
||||||
|
|
||||||
# Things that shouldn't be enabled with "full".
|
|
||||||
# Notes:
|
|
||||||
# - MBEDTLS_X509_ALLOW_EXTENSIONS_NON_V3 and
|
|
||||||
# MBEDTLS_X509_ALLOW_UNSUPPORTED_CRITICAL_EXTENSION could be enabled if the
|
|
||||||
# respective tests were adapted
|
|
||||||
my @excluded = qw(
|
my @excluded = qw(
|
||||||
MBEDTLS_DEPRECATED_REMOVED
|
MBEDTLS_DEPRECATED_REMOVED
|
||||||
MBEDTLS_HAVE_SSE2
|
MBEDTLS_HAVE_SSE2
|
||||||
|
|
@ -54,49 +94,107 @@ MBEDTLS_PKCS11_C
|
||||||
_ALT\s*$
|
_ALT\s*$
|
||||||
);
|
);
|
||||||
|
|
||||||
|
# Things that should be disabled in "baremetal"
|
||||||
|
my @excluded_baremetal = qw(
|
||||||
|
MBEDTLS_NET_C
|
||||||
|
MBEDTLS_TIMING_C
|
||||||
|
MBEDTLS_FS_IO
|
||||||
|
MBEDTLS_ENTROPY_NV_SEED
|
||||||
|
MBEDTLS_HAVE_TIME
|
||||||
|
MBEDTLS_HAVE_TIME_DATE
|
||||||
|
MBEDTLS_DEPRECATED_WARNING
|
||||||
|
MBEDTLS_HAVEGE_C
|
||||||
|
MBEDTLS_THREADING_C
|
||||||
|
MBEDTLS_THREADING_PTHREAD
|
||||||
|
MBEDTLS_MEMORY_BACKTRACE
|
||||||
|
MBEDTLS_MEMORY_BUFFER_ALLOC_C
|
||||||
|
MBEDTLS_PLATFORM_TIME_ALT
|
||||||
|
MBEDTLS_PLATFORM_FPRINTF_ALT
|
||||||
|
);
|
||||||
|
|
||||||
# Things that should be enabled in "full" even if they match @excluded
|
# Things that should be enabled in "full" even if they match @excluded
|
||||||
my @non_excluded = qw(
|
my @non_excluded = qw(
|
||||||
PLATFORM_[A-Z0-9]+_ALT
|
PLATFORM_[A-Z0-9]+_ALT
|
||||||
);
|
);
|
||||||
|
|
||||||
# get -f option
|
# Things that should be enabled in "baremetal"
|
||||||
if (@ARGV >= 2 && $ARGV[0] eq "-f") {
|
my @non_excluded_baremetal = qw(
|
||||||
shift; # -f
|
MBEDTLS_NO_PLATFORM_ENTROPY
|
||||||
$config_file = shift;
|
);
|
||||||
|
|
||||||
-f $config_file or die "No such file: $config_file\n";
|
# Process the command line arguments
|
||||||
} else {
|
|
||||||
if (! -f $config_file) {
|
my $force_option = 0;
|
||||||
chdir '..' or die;
|
|
||||||
-f $config_file
|
my ($arg, $name, $value, $action);
|
||||||
or die "Without -f, must be run from root or scripts\n"
|
|
||||||
|
while ($arg = shift) {
|
||||||
|
|
||||||
|
# Check if the argument is an option
|
||||||
|
if ($arg eq "-f" || $arg eq "--file") {
|
||||||
|
$config_file = shift;
|
||||||
|
|
||||||
|
-f $config_file or die "No such file: $config_file\n";
|
||||||
|
|
||||||
|
}
|
||||||
|
elsif ($arg eq "-o" || $arg eq "--force") {
|
||||||
|
$force_option = 1;
|
||||||
|
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
# ...else assume it's a command
|
||||||
|
$action = $arg;
|
||||||
|
|
||||||
|
if ($action eq "full" || $action eq "realfull" || $action eq "baremetal" ) {
|
||||||
|
# No additional parameters
|
||||||
|
die $usage if @ARGV;
|
||||||
|
|
||||||
|
}
|
||||||
|
elsif ($action eq "unset" || $action eq "get") {
|
||||||
|
die $usage unless @ARGV;
|
||||||
|
$name = shift;
|
||||||
|
|
||||||
|
}
|
||||||
|
elsif ($action eq "set") {
|
||||||
|
die $usage unless @ARGV;
|
||||||
|
$name = shift;
|
||||||
|
$value = shift if @ARGV;
|
||||||
|
|
||||||
|
}
|
||||||
|
else {
|
||||||
|
die "Command '$action' not recognised.\n\n".$usage;
|
||||||
|
}
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
# get action
|
# If no command was specified, exit...
|
||||||
die $usage unless @ARGV;
|
if ( not defined($action) ){ die $usage; }
|
||||||
my $action = shift;
|
|
||||||
|
|
||||||
my ($name, $value);
|
# Check the config file is present
|
||||||
if ($action eq "full" || $action eq "realfull") {
|
if (! -f $config_file) {
|
||||||
# nothing to do
|
|
||||||
} elsif ($action eq "unset") {
|
chdir '..' or die;
|
||||||
die $usage unless @ARGV;
|
|
||||||
$name = shift;
|
# Confirm this is the project root directory and try again
|
||||||
} elsif ($action eq "set") {
|
if ( !(-d 'scripts' && -d 'include' && -d 'library' && -f $config_file) ) {
|
||||||
die $usage unless @ARGV;
|
die "If no file specified, must be run from the project root or scripts directory.\n";
|
||||||
$name = shift;
|
}
|
||||||
$value = shift if @ARGV;
|
|
||||||
} else {
|
|
||||||
die $usage;
|
|
||||||
}
|
}
|
||||||
die $usage if @ARGV;
|
|
||||||
|
|
||||||
|
# Now read the file and process the contents
|
||||||
|
|
||||||
open my $config_read, '<', $config_file or die "read $config_file: $!\n";
|
open my $config_read, '<', $config_file or die "read $config_file: $!\n";
|
||||||
my @config_lines = <$config_read>;
|
my @config_lines = <$config_read>;
|
||||||
close $config_read;
|
close $config_read;
|
||||||
|
|
||||||
my ($exclude_re, $no_exclude_re);
|
# Add required baremetal symbols to the list that is included.
|
||||||
|
if ( $action eq "baremetal" ) {
|
||||||
|
@non_excluded = ( @non_excluded, @non_excluded_baremetal );
|
||||||
|
}
|
||||||
|
|
||||||
|
my ($exclude_re, $no_exclude_re, $exclude_baremetal_re);
|
||||||
if ($action eq "realfull") {
|
if ($action eq "realfull") {
|
||||||
$exclude_re = qr/^$/;
|
$exclude_re = qr/^$/;
|
||||||
$no_exclude_re = qr/./;
|
$no_exclude_re = qr/./;
|
||||||
|
|
@ -104,22 +202,30 @@ if ($action eq "realfull") {
|
||||||
$exclude_re = join '|', @excluded;
|
$exclude_re = join '|', @excluded;
|
||||||
$no_exclude_re = join '|', @non_excluded;
|
$no_exclude_re = join '|', @non_excluded;
|
||||||
}
|
}
|
||||||
|
if ( $action eq "baremetal" ) {
|
||||||
|
$exclude_baremetal_re = join '|', @excluded_baremetal;
|
||||||
|
}
|
||||||
|
|
||||||
open my $config_write, '>', $config_file or die "write $config_file: $!\n";
|
my $config_write = undef;
|
||||||
|
if ($action ne "get") {
|
||||||
|
open $config_write, '>', $config_file or die "write $config_file: $!\n";
|
||||||
|
}
|
||||||
|
|
||||||
my $done;
|
my $done;
|
||||||
for my $line (@config_lines) {
|
for my $line (@config_lines) {
|
||||||
if ($action eq "full" || $action eq "realfull") {
|
if ($action eq "full" || $action eq "realfull" || $action eq "baremetal" ) {
|
||||||
if ($line =~ /name SECTION: Module configuration options/) {
|
if ($line =~ /name SECTION: Module configuration options/) {
|
||||||
$done = 1;
|
$done = 1;
|
||||||
}
|
}
|
||||||
|
|
||||||
if (!$done && $line =~ m!^//\s?#define! &&
|
if (!$done && $line =~ m!^//\s?#define! &&
|
||||||
( $line !~ /$exclude_re/ || $line =~ /$no_exclude_re/ ) ) {
|
( $line !~ /$exclude_re/ || $line =~ /$no_exclude_re/ ) &&
|
||||||
|
( $action ne "baremetal" || ( $line !~ /$exclude_baremetal_re/ ) ) ) {
|
||||||
$line =~ s!^//\s?!!;
|
$line =~ s!^//\s?!!;
|
||||||
}
|
}
|
||||||
if (!$done && $line =~ m!^\s?#define! &&
|
if (!$done && $line =~ m!^\s?#define! &&
|
||||||
! ( $line !~ /$exclude_re/ || $line =~ /$no_exclude_re/ ) ) {
|
! ( ( $line !~ /$exclude_re/ || $line =~ /$no_exclude_re/ ) &&
|
||||||
|
( $action ne "baremetal" || ( $line !~ /$exclude_baremetal_re/ ) ) ) ) {
|
||||||
$line =~ s!^!//!;
|
$line =~ s!^!//!;
|
||||||
}
|
}
|
||||||
} elsif ($action eq "unset") {
|
} elsif ($action eq "unset") {
|
||||||
|
|
@ -134,14 +240,53 @@ for my $line (@config_lines) {
|
||||||
$line .= "\n";
|
$line .= "\n";
|
||||||
$done = 1;
|
$done = 1;
|
||||||
}
|
}
|
||||||
|
} elsif (!$done && $action eq "get") {
|
||||||
|
if ($line =~ /^\s*#define\s*$name(?:\s+(.*?))\s*(?:$|\/\*|\/\/)/) {
|
||||||
|
$value = $1;
|
||||||
|
$done = 1;
|
||||||
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
print $config_write $line;
|
if (defined $config_write) {
|
||||||
|
print $config_write $line or die "write $config_file: $!\n";
|
||||||
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
close $config_write;
|
# Did the set command work?
|
||||||
|
if ($action eq "set" && $force_option && !$done) {
|
||||||
|
|
||||||
die "configuration section not found" if ($action eq "full" && !$done);
|
# If the force option was set, append the symbol to the end of the file
|
||||||
die "$name not found" if ($action ne "full" && !$done);
|
my $line = "#define $name";
|
||||||
|
$line .= " $value" if defined $value && $value ne "";
|
||||||
|
$line .= "\n";
|
||||||
|
$done = 1;
|
||||||
|
|
||||||
|
print $config_write $line or die "write $config_file: $!\n";
|
||||||
|
}
|
||||||
|
|
||||||
|
if (defined $config_write) {
|
||||||
|
close $config_write or die "close $config_file: $!\n";
|
||||||
|
}
|
||||||
|
|
||||||
|
if ($action eq "get") {
|
||||||
|
if ($done) {
|
||||||
|
if ($value ne '') {
|
||||||
|
print "$value\n";
|
||||||
|
}
|
||||||
|
exit 0;
|
||||||
|
} else {
|
||||||
|
# If the symbol was not found, return an error
|
||||||
|
exit 1;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
if ($action eq "full" && !$done) {
|
||||||
|
die "Configuration section was not found in $config_file\n";
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
if ($action ne "full" && $action ne "unset" && !$done) {
|
||||||
|
die "A #define for the symbol $name was not found in $config_file\n";
|
||||||
|
}
|
||||||
|
|
||||||
__END__
|
__END__
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue