Loading...
--- xnu/xnu-12377.121.6/libsyscall/xcodescripts/compile-syscalls.pl
+++ /dev/null
@@ -1,133 +0,0 @@
-#!/usr/bin/perl
-#
-# Copyright (c) 2010 Apple Inc. All rights reserved.
-#
-# @APPLE_OSREFERENCE_LICENSE_HEADER_START@
-#
-# This file contains Original Code and/or Modifications of Original Code
-# as defined in and that are subject to the Apple Public Source License
-# Version 2.0 (the 'License'). You may not use this file except in
-# compliance with the License. The rights granted to you under the License
-# may not be used to create, or enable the creation or redistribution of,
-# unlawful or unlicensed copies of an Apple operating system, or to
-# circumvent, violate, or enable the circumvention or violation of, any
-# terms of an Apple operating system software license agreement.
-#
-# Please obtain a copy of the License at
-# http://www.opensource.apple.com/apsl/ and read it before using this file.
-#
-# The Original Code and all software distributed under the License are
-# distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
-# EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
-# INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
-# FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
-# Please see the License for the specific language governing rights and
-# limitations under the License.
-#
-# @APPLE_OSREFERENCE_LICENSE_HEADER_END@
-#
-
-use warnings;
-use strict;
-
-use Data::Dumper;
-use File::Spec;
-use IO::File;
-use File::Basename ();
-
-my $basename = File::Basename::basename($0);
-
-sub usage {
- print "$basename: <source list> <output archive>";
- exit 1;
-}
-
-usage unless scalar(@ARGV) == 2;
-
-my $sourceList = $ARGV[0];
-my $outputFile = $ARGV[1];
-
-my $f = IO::File->new($sourceList, 'r');
-die "$basename: $sourceList: $!\n" unless defined($f);
-
-my @objects;
-my @archs = split / /, $ENV{"ARCHS"};
-my @sources = <$f>;
-chomp @sources;
-
-undef $f;
-
-# compiler options
-chomp(my $CC = `xcrun -sdk "$ENV{'SDKROOT'}" -find cc`);
-my @CFLAGS = (
- "-x assembler-with-cpp",
- "-c",
- "-isysroot", $ENV{'SDKROOT'} || "/",
- "-I".$ENV{"SDKROOT"}."/".$ENV{"SDK_INSTALL_HEADERS_ROOT"}."/usr/include",
- "-I".$ENV{"SDKROOT"}."/".$ENV{"SDK_INSTALL_HEADERS_ROOT"}."/usr/local/include",
- "-I".$ENV{"SDKROOT"}."/".$ENV{"SDK_INSTALL_HEADERS_ROOT"}."/System/Library/Frameworks/System.framework/PrivateHeaders",
-);
-
-chomp(my $LIBTOOL = `xcrun -sdk "$ENV{'SDKROOT'}" -find libtool`);
-my @LIBTOOLFLAGS = (
- "-static",
-);
-
-# architectures
-for my $arch (@archs) {
- push(@CFLAGS, "-arch $arch");
-}
-
-# do each compile
-my $jobs = `sysctl -n hw.ncpu` + 2;
-
-for my $src (@sources) {
- if ($jobs == 0) {
- if (wait != -1) {
- $jobs++;
- } else {
- printf "wait exited with -1 (no children) and exhausted allowed jobs. Exiting.\n";
- exit 1;
- }
-
- if ($? != 0) {
- printf "$CC exited with value %d\n", $? >> 8;
- exit 1;
- }
- }
-
- (my $o = $src) =~ s/\.s$/\.o/;
- my $compileCommand = "$CC " . join(' ', @CFLAGS) . " -o $o $src";
- printf $compileCommand . "\n";
-
- $jobs--;
- my $pid = fork();
- if ($pid == 0) {
- exec($compileCommand);
- }
- push(@objects, $o);
-}
-
-while (wait != -1) {
- if ($? != 0) {
- printf "$CC exited with value %d\n", $? >> 8;
- exit 1;
- }
-}
-
-printf "Finished assembly, beginning link.\n";
-
-# final link
-
-if (-f $outputFile) {
- unlink($outputFile);
-}
-
-my $linkCommand = "$LIBTOOL " . join(' ', @LIBTOOLFLAGS) . " -o $outputFile " . join(' ', @objects);
-
-printf $linkCommand . "\n";
-system($linkCommand);
-if ($? != 0) {
- print "$LIBTOOL exited with value %d\n", $? >> 8;
- exit 1;
-}