| # Copyright The Mbed TLS Contributors |
| # SPDX-License-Identifier: Apache-2.0 OR GPL-2.0-or-later |
| if (!@ARGV || $ARGV[0] == '--help') { |
| Usage: $0 mbedtls_test_foo <file.pem |
| $0 TEST_FOO mbedtls_test_foo <file.pem |
| Print out a PEM file as C code defining a string constant. |
| Used to include some of the test data in /library/certs.c for |
| self-tests and sample programs. |
| my $pp_name = @ARGV > 1 ? shift @ARGV : undef; |
| my @lines = map {chomp; s/([\\"])/\\$1/g; "\"$_\\r\\n\""} <STDIN>; |
| foreach ("#define $pp_name", @lines[0..@lines-2]) { |
| print "$lines[@lines-1]\n"; |
| print "const char $name\[\] = $pp_name;\n"; |
| print "const char $name\[\] ="; |