Send a CCS from the client in a non-early_data handshake
[openssl.git] / util / mkbuildinf.pl
1 #! /usr/bin/env perl
2 # Copyright 2014-2017 The OpenSSL Project Authors. All Rights Reserved.
3 #
4 # Licensed under the OpenSSL license (the "License").  You may not use
5 # this file except in compliance with the License.  You can obtain a copy
6 # in the file LICENSE in the source distribution or at
7 # https://www.openssl.org/source/license.html
8
9 use strict;
10 use warnings;
11
12 my ($cflags, $platform) = @ARGV;
13 $cflags = "compiler: $cflags";
14
15 my $date = gmtime($ENV{'SOURCE_DATE_EPOCH'} || time()) . " UTC";
16
17 print <<"END_OUTPUT";
18 /*
19  * WARNING: do not edit!
20  * Generated by util/mkbuildinf.pl
21  *
22  * Copyright 2014-2017 The OpenSSL Project Authors. All Rights Reserved.
23  *
24  * Licensed under the OpenSSL license (the "License").  You may not use
25  * this file except in compliance with the License.  You can obtain a copy
26  * in the file LICENSE in the source distribution or at
27  * https://www.openssl.org/source/license.html
28  */
29
30 #define PLATFORM "platform: $platform"
31 #define DATE "built on: $date"
32
33 /*
34  * Generate compiler_flags as an array of individual characters. This is a
35  * workaround for the situation where CFLAGS gets too long for a C90 string
36  * literal
37  */
38 static const char compiler_flags[] = {
39 END_OUTPUT
40
41 my $ctr = 0;
42 foreach my $c (split //, $cflags) {
43     $c =~ s|([\\'])|\\$1|;
44     # Max 16 characters per line
45     if  (($ctr++ % 16) == 0) {
46         if ($ctr != 1) {
47             print "\n";
48         }
49         print "    ";
50     }
51     print "'$c',";
52 }
53 print <<"END_OUTPUT";
54 '\\0'
55 };
56 END_OUTPUT