1276856Sjkim#!/usr/local/bin/perl 2276856Sjkim 3276856Sjkimmy ($cflags, $platform) = @ARGV; 4276856Sjkim 5276856Sjkim$cflags = "compiler: $cflags"; 6276856Sjkim$date = localtime(); 7276856Sjkimprint <<"END_OUTPUT"; 8276856Sjkim#ifndef MK1MF_BUILD 9276856Sjkim /* auto-generated by util/mkbuildinf.pl for crypto/cversion.c */ 10276863Sjkim #define CFLAGS cflags 11276856Sjkim /* 12276856Sjkim * Generate CFLAGS as an array of individual characters. This is a 13276856Sjkim * workaround for the situation where CFLAGS gets too long for a C90 string 14276856Sjkim * literal 15276856Sjkim */ 16276856Sjkim static const char cflags[] = { 17276856SjkimEND_OUTPUT 18276856Sjkimmy $ctr = 0; 19276856Sjkimforeach my $c (split //, $cflags) { 20276856Sjkim # Max 18 characters per line 21276856Sjkim if (($ctr++ % 18) == 0) { 22276856Sjkim if ($ctr != 1) { 23276856Sjkim print "\n"; 24276856Sjkim } 25276856Sjkim print " "; 26276856Sjkim } 27276856Sjkim print "'$c',"; 28276856Sjkim} 29276856Sjkimprint <<"END_OUTPUT"; 30276856Sjkim'\\0' 31276856Sjkim }; 32276856Sjkim #define PLATFORM "platform: $platform" 33276856Sjkim #define DATE "built on: $date" 34276856Sjkim#endif 35276856SjkimEND_OUTPUT 36