xcodescripts/generate_features.pl

   1 #!/usr/bin/perl
   2
   3 # Generates the libc-features.h files used to control #ifdef behaviour in Libc
   4 use warnings;
   5 use Data::Dumper;
   6 use File::Path qw(mkpath);
   7
   8 #printf Dumper(\%ENV);
   9
  10 my $unifdef = 0;
  11 my %unifdefs = ();
  12 my $bash = 0;
  13 if (scalar(@ARGV) > 0) {
  14         $unifdef = 1 if $ARGV[0] =~ /--unifdef/;
  15         $bash = 1 if $ARGV[0] =~ /--bash/;
  16 }
  17
  18 for my $arch (split(/ /, $ENV{"ARCHS"}))
  19 {
  20         # set ENV{"CURRENT_ARCH"} so we can predicate on it
  21         $ENV{"CURRENT_ARCH"} = $arch;
  22
  23         my $platformName = $ENV{"VARIANT_PLATFORM_NAME"};
  24         $platformName =~ s/simulator/os/;
  25
  26         my $platformPath = $ENV{"SRCROOT"} . "/Platforms/" . $platformName . "/Makefile.inc";
  27         my $featuresHeaderDir = $ENV{"DERIVED_FILES_DIR"}."/".$arch;
  28         my $featuresHeader = $featuresHeaderDir."/libc-features.h";
  29
  30         open FEATURESFILE, "<$platformPath" or die "Unable to open: $platformPath";
  31
  32         my %features = ();
  33         my $skip = 0;
  34         my $nested = 0;
  35
  36         while (<FEATURESFILE>) {
  37                 next if $_ =~ /\s*#/;
  38
  39                 if ($_ =~ /^.endif/) {
  40                         $skip-- if $skip > 0;
  41                         $nested--;
  42                 }
  43
  44                 elsif ($_ =~ /^\.if\s+(\S+)\s+(\S+)/) {
  45                         # an if statement, very rudimentary regex against envvar
  46                         my $envvar = $1;
  47                         my $regex = $2;
  48
  49                         $nested++;
  50                         if (!defined($ENV{$envvar}) || ($ENV{$envvar} !~ /$regex/)) {
  51                                 $skip += 1;
  52                         }
  53                 }
  54
  55                 elsif ($_ =~ /^\s*([^= ]+)\s*=\s*(\d)/) {
  56                         if ($skip == 0) {
  57                                 if ($2 == 1) {
  58                                         $features{$1} = $2;
  59                                 } elsif (defined($features{$1})) {
  60                                         delete $features{$1};
  61                                 }
  62                         }
  63                 }
  64         }
  65
  66         close FEATURESFILE;
  67
  68         if ($bash == 1) {
  69                 for my $f (keys %features) {
  70                         print "$f=$features{$f} ";
  71                 }
  72                 printf "\n";
  73                 exit 0;
  74         }
  75
  76         elsif ($unifdef == 1) {
  77                 # assume FEATURE_BLOCKS was on by default
  78                 $unifdefs{"UNIFDEF_BLOCKS"} = 1;
  79                 $unifdefs{"UNIFDEF_DRIVERKIT"} = defined($ENV{"DRIVERKITSDK"});
  80                 $unifdefs{"UNIFDEF_LEGACY_64_APIS"} = defined($features{"FEATURE_LEGACY_64_APIS"});
  81                 $unifdefs{"UNIFDEF_LEGACY_RUNE_APIS"} = defined($features{"FEATURE_LEGACY_RUNE_APIS"});
  82                 $unifdefs{"UNIFDEF_LEGACY_UTMP_APIS"} = defined($features{"FEATURE_LEGACY_UTMP_APIS"});
  83                 $unifdefs{"UNIFDEF_POSIX_ILP32_ALLOW"} = defined($features{"FEATURE_POSIX_ILP32_ALLOW"});
  84
  85                 my $output = "";
  86                 for my $d (keys %unifdefs) {
  87                         $output .= " " . ($unifdefs{$d} == 1 ? "-D" : "-U") . $d;
  88                 }
  89
  90                 chomp $output;
  91                 print "$output\n";
  92                 exit 0;
  93         }
  94
  95         elsif ($unifdef == 0) {
  96                 # If we touch this file on every build, then every other iterative build in Xcode will rebuild *everything*
  97                 my $platform_mtime = (stat($platformPath))[9];
  98                 my $header_mtime = (stat($featuresHeader))[9];
  99
 100                 if (defined($header_mtime) && defined($platform_mtime) && ($header_mtime > $platform_mtime)) {
 101                         exit 0;
 102                 }
 103
 104                 printf $arch." features:\n";
 105                 printf Dumper(\%features);
 106
 107                 if ($nested != 0) {
 108                         die "Unbalanced .if/.endif directive";
 109                 }
 110
 111                 # And the meat, new header options should go under here
 112                 if (! -d $featuresHeaderDir) {
 113                         mkpath $featuresHeaderDir or die "Unable to mkdir: $featuresHeaderDir";
 114                 }
 115                 open HEADER, ">$featuresHeader" or die "Unable to open (for writing): $featuresHeader";
 116
 117                 printf HEADER "#ifndef _LIBC_FEATURES_H_\n";
 118                 printf HEADER "#define _LIBC_FEATURES_H_\n\n";
 119
 120                 my $shortarch = $arch;
 121                 $shortarch =~ s/armv\d+[a-z]?/arm/g;
 122
 123                 # map all arm64 subtypes to arm64
 124                 $shortarch =~ s/arm64[_a-z0-9]*/arm64/g;
 125
 126                 printf HEADER "#if !defined(__".$shortarch."__)\n";
 127                 printf HEADER "#error Mismatched libc-features.h architecture\n";
 128                 printf HEADER "#endif\n\n";
 129
 130                 if (defined($features{"FEATURE_LEGACY_RUNE_APIS"})) {
 131                         printf HEADER "#define UNIFDEF_LEGACY_RUNE_APIS 1\n";
 132                 } else {
 133                         printf HEADER "/* #undef UNIFDEF_LEGACY_RUNE_APIS */\n";
 134                 }
 135
 136                 if (defined($features{"FEATURE_LEGACY_CRT1_ENVIRON"})) {
 137                         printf HEADER "#define LEGACY_CRT1_ENVIRON 1\n";
 138                 } else {
 139                         printf HEADER "/* #undef LEGACY_CRT1_ENVIRON */\n";
 140                 }
 141
 142                 if (defined($features{"FEATURE_LEGACY_UTMP_APIS"})) {
 143                         printf HEADER "#define UNIFDEF_LEGACY_UTMP_APIS 1\n";
 144                 } else {
 145                         printf HEADER "/* #undef UNIFDEF_LEGACY_UTMP_APIS */\n";
 146                 }
 147
 148                 if (defined($features{"FEATURE_ONLY_1050_VARIANTS"})) {
 149                         printf HEADER "#if !__DARWIN_ONLY_VERS_1050\n";
 150                         printf HEADER "#  error Feature mismatch: __DARWIN_ONLY_VERS_1050 == 0\n";
 151                         printf HEADER "#endif /* !__DARWIN_ONLY_VERS_1050 */\n";
 152                 } else {
 153                         printf HEADER "#if __DARWIN_ONLY_VERS_1050\n";
 154                         printf HEADER "#  error Feature mismatch: __DARWIN_ONLY_VERS_1050 == 1\n";
 155                         printf HEADER "#endif /* __DARWIN_ONLY_VERS_1050 */\n";
 156                 }
 157
 158                 if (defined($features{"FEATURE_ONLY_UNIX_CONFORMANCE"})) {
 159                         printf HEADER "#if !__DARWIN_ONLY_UNIX_CONFORMANCE\n";
 160                         printf HEADER "#  error Feature mismatch: __DARWIN_ONLY_UNIX_CONFORMANCE == 0\n";
 161                         printf HEADER "#endif /* !__DARWIN_ONLY_UNIX_CONFORMANCE */\n";
 162                 } else {
 163                         printf HEADER "#if __DARWIN_ONLY_UNIX_CONFORMANCE\n";
 164                         printf HEADER "#  error Feature mismatch: __DARWIN_ONLY_UNIX_CONFORMANCE == 1\n";
 165                         printf HEADER "#endif /* __DARWIN_ONLY_UNIX_CONFORMANCE */\n";
 166                 }
 167
 168                 if (defined($features{"FEATURE_ONLY_64_BIT_INO_T"})) {
 169                         printf HEADER "#if !__DARWIN_ONLY_64_BIT_INO_T\n";
 170                         printf HEADER "#  error Feature mismatch: __DARWIN_ONLY_64_BIT_INO_T == 0\n";
 171                         printf HEADER "#endif /* !__DARWIN_ONLY_64_BIT_INO_T */\n";
 172                 } else {
 173                         printf HEADER "#if __DARWIN_ONLY_64_BIT_INO_T\n";
 174                         printf HEADER "#  error Feature mismatch: __DARWIN_ONLY_64_BIT_INO_T == 1\n";
 175                         printf HEADER "#endif /* __DARWIN_ONLY_64_BIT_INO_T */\n";
 176                 }
 177
 178                 if (defined($features{"FEATURE_PATCH_3417676"})) {
 179                         printf HEADER "#define __APPLE_PR3417676_HACK__ 1\n";
 180                 } else {
 181                         printf HEADER "/* #undef __APPLE_PR3417676_HACK__ */\n";
 182                 }
 183
 184                 if (defined($features{"FEATURE_PLOCKSTAT"})) {
 185                         printf HEADER "#define PLOCKSTAT 1\n";
 186                 } else {
 187                         printf HEADER "/* #undef PLOCKSTAT */\n";
 188                 }
 189
 190                 if (defined($features{"FEATURE_TIMEZONE_CHANGE_NOTIFICATION"})) {
 191                         printf HEADER "#define NOTIFY_TZ 1\n";
 192                 } else {
 193                         printf HEADER "/* #undef NOTIFY_TZ */\n";
 194                 }
 195
 196                 if (defined($features{"FEATURE_SMALL_STDIOBUF"})) {
 197                         printf HEADER "#define FEATURE_SMALL_STDIOBUF 1\n";
 198                 } else {
 199                         printf HEADER "/* #undef FEATURE_SMALL_STDIOBUF */\n";
 200                 }
 201
 202                 if (defined($features{"FEATURE_XPRINTF_PERF"})) {
 203                         printf HEADER "#define XPRINTF_PERF 1\n";
 204                 } else {
 205                         printf HEADER "/* #undef XPRINTF_PERF */\n";
 206                 }
 207
 208                 if (defined($features{"FEATURE_SIGNAL_RESTRICTION"})) {
 209                         printf HEADER "#define FEATURE_SIGNAL_RESTRICTION 1\n";
 210                 } else {
 211                         printf HEADER "/* #undef FEATURE_SIGNAL_RESTRICTION */\n";
 212                 }
 213
 214                 printf HEADER "#endif // _LIBC_FEATURES_H_\n";
 215                 close HEADER;
 216         }
 217 }
 218
 219 exit 0;