xref: /freebsd/crypto/openssl/util/mkbuildinf.pl (revision 63d1fd5970ec814904aa0f4580b10a0d302d08b2) 
1#!/usr/local/bin/perl
2
3my ($cflags, $platform) = @ARGV;
4
5$cflags = "compiler: $cflags";
6$date = localtime();
7print <<"END_OUTPUT";
8#ifndef MK1MF_BUILD
9    /* auto-generated by util/mkbuildinf.pl for crypto/cversion.c */
10    #define CFLAGS cflags
11    /*
12     * Generate CFLAGS as an array of individual characters. This is a
13     * workaround for the situation where CFLAGS gets too long for a C90 string
14     * literal
15     */
16    static const char cflags[] = {
17END_OUTPUT
18my $ctr = 0;
19foreach my $c (split //, $cflags) {
20    # Max 18 characters per line
21    if  (($ctr++ % 18) == 0) {
22        if ($ctr != 1) {
23            print "\n";
24        }
25        print "        ";
26    }
27    print "'$c',";
28}
29print <<"END_OUTPUT";
30'\\0'
31    };
32    #define PLATFORM "platform: $platform"
33    #define DATE "built on: $date"
34#endif
35END_OUTPUT
36