ld64-77.1.tar.gz

[apple/ld64.git] / src / Options.cpp

/* -*- mode: C++; c-basic-offset: 4; tab-width: 4 -*-
 *
 * Copyright (c) 2005-2007 Apple Inc. All rights reserved.
 *
 * @APPLE_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. 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_LICENSE_HEADER_END@
 */


#include <sys/types.h>
#include <sys/stat.h>
#include <mach/vm_prot.h>
#include <math.h>
#include <fcntl.h>
#include <vector>

#include "Options.h"

void throwf(const char* format, ...)
{
        va_list list;
        char*   p;
        va_start(list, format);
        vasprintf(&p, format, list);
        va_end(list);

        const char*     t = p;
        throw t;
}

Options::Options(int argc, const char* argv[])
        : fOutputFile("a.out"), fArchitecture(0), fOutputKind(kDynamicExecutable), fPrebind(false), fBindAtLoad(false),
          fKeepPrivateExterns(false),
          fInterposable(false), fNeedsModuleTable(false), fIgnoreOtherArchFiles(false), fForceSubtypeAll(false), 
          fDeadStrip(kDeadStripOff), fNameSpace(kTwoLevelNameSpace),
          fDylibCompatVersion(0), fDylibCurrentVersion(0), fDylibInstallName(NULL), fFinalName(NULL), fEntryName("start"), fBaseAddress(0),
          fBaseWritableAddress(0), fSplitSegs(false),
          fExportMode(kExportDefault), fLibrarySearchMode(kSearchAllDirsForDylibsThenAllDirsForArchives),
          fUndefinedTreatment(kUndefinedError), fMessagesPrefixedWithArchitecture(false), 
          fWeakReferenceMismatchTreatment(kWeakReferenceMismatchNonWeak),
          fClientName(NULL),
          fUmbrellaName(NULL), fInitFunctionName(NULL), fDotOutputFile(NULL), fExecutablePath(NULL),
          fBundleLoader(NULL), fDtraceScriptName(NULL), fSegAddrTablePath(NULL), fMapPath(NULL), 
          fZeroPageSize(ULLONG_MAX), fStackSize(0), fStackAddr(0), fExecutableStack(false), fMinimumHeaderPad(32),
          fCommonsMode(kCommonsIgnoreDylibs),  fUUIDMode(kUUIDContent), fLocalSymbolHandling(kLocalSymbolsAll), fWarnCommons(false), 
          fVerbose(false), fKeepRelocations(false), fWarnStabs(false),
          fTraceDylibSearching(false), fPause(false), fStatistics(false), fPrintOptions(false),
          fSharedRegionEligible(false), fPrintOrderFileStatistics(false),  
          fReadOnlyx86Stubs(false), fPositionIndependentExecutable(false), fMaxMinimumHeaderPad(false),
          fDeadStripDylibs(false), fSuppressWarnings(false), fSaveTempFiles(false)
{
        this->checkForClassic(argc, argv);
        this->parsePreCommandLineEnvironmentSettings();
        this->parse(argc, argv);
        this->parsePostCommandLineEnvironmentSettings();
        this->reconfigureDefaults();
        this->checkIllegalOptionCombinations();
}

Options::~Options()
{
}

const ObjectFile::ReaderOptions& Options::readerOptions()
{
        return fReaderOptions;
}

cpu_type_t Options::architecture()
{
        return fArchitecture;
}

const char*     Options::getOutputFilePath()
{
        return fOutputFile;
}

std::vector<Options::FileInfo>& Options::getInputFiles()
{
        return fInputFiles;
}

Options::OutputKind     Options::outputKind()
{
        return fOutputKind;
}

bool Options::bindAtLoad()
{
        return fBindAtLoad;
}

bool Options::prebind()
{
        return fPrebind;
}

bool Options::fullyLoadArchives()
{
        return fReaderOptions.fFullyLoadArchives;
}

Options::NameSpace Options::nameSpace()
{
        return fNameSpace;
}

const char*     Options::installPath()
{
        if ( fDylibInstallName != NULL )
                return fDylibInstallName;
        else if ( fFinalName != NULL )
                return fFinalName;
        else
                return fOutputFile;
}

uint32_t Options::currentVersion()
{
        return fDylibCurrentVersion;
}

uint32_t Options::compatibilityVersion()
{
        return fDylibCompatVersion;
}

const char*     Options::entryName()
{
        return fEntryName;
}

uint64_t Options::baseAddress()
{
        return fBaseAddress;
}

bool Options::keepPrivateExterns()
{
        return fKeepPrivateExterns;
}

bool Options::interposable()
{
        return fInterposable;
}

bool Options::needsModuleTable()
{
        return fNeedsModuleTable;
}

bool Options::ignoreOtherArchInputFiles()
{
        return fIgnoreOtherArchFiles;
}

bool Options::forceCpuSubtypeAll()
{
        return fForceSubtypeAll;
}

bool Options::traceDylibs()
{
        return fReaderOptions.fTraceDylibs;
}

bool Options::traceArchives()
{
        return fReaderOptions.fTraceArchives;
}

Options::UndefinedTreatment Options::undefinedTreatment()
{
        return fUndefinedTreatment;
}

ObjectFile::ReaderOptions::VersionMin Options::macosxVersionMin()
{
        return fReaderOptions.fVersionMin;
}

Options::WeakReferenceMismatchTreatment Options::weakReferenceMismatchTreatment()
{
        return fWeakReferenceMismatchTreatment;
}

const char* Options::umbrellaName()
{
        return fUmbrellaName;
}

std::vector<const char*>& Options::allowableClients()
{
        return fAllowableClients;
}

const char* Options::clientName()
{
        return fClientName;
}

uint64_t Options::zeroPageSize()
{
        return fZeroPageSize;
}

bool Options::hasCustomStack()
{
        return (fStackSize != 0);
}

uint64_t Options::customStackSize()
{
        return fStackSize;
}

uint64_t Options::customStackAddr()
{
        return fStackAddr;
}

bool Options::hasExecutableStack()
{
        return fExecutableStack;
}

std::vector<const char*>& Options::initialUndefines()
{
        return fInitialUndefines;
}

bool Options::printWhyLive(const char* symbolName)
{
        return ( fWhyLive.find(symbolName) != fWhyLive.end() );
}


const char*     Options::initFunctionName()
{
        return fInitFunctionName;
}

const char*     Options::dotOutputFile()
{
        return fDotOutputFile;
}

bool Options::hasExportRestrictList()
{
        return (fExportMode != kExportDefault);
}

bool Options::allGlobalsAreDeadStripRoots()
{
        // -exported_symbols_list means globals are not exported by default
        if ( fExportMode == kExportSome )
                return false;
        //
        switch ( fOutputKind ) {
                case Options::kDynamicExecutable:
                case Options::kStaticExecutable:
                        // by default unused globals in a main executable are stripped
                        return false;
                case Options::kDynamicLibrary:
                case Options::kDynamicBundle:
                case Options::kObjectFile:
                case Options::kDyld:
                        return true;
        }
        return false;
}

uint32_t Options::minimumHeaderPad()
{
        return fMinimumHeaderPad;
}

std::vector<Options::ExtraSection>&     Options::extraSections()
{
        return fExtraSections;
}

std::vector<Options::SectionAlignment>& Options::sectionAlignments()
{
        return fSectionAlignments;
}

Options::CommonsMode Options::commonsMode()
{
        return fCommonsMode;
}

bool Options::warnCommons()
{
        return fWarnCommons;
}

bool Options::keepRelocations()
{
        return fKeepRelocations;
}

bool Options::warnStabs()
{
        return fWarnStabs;
}

const char* Options::executablePath()
{
        return fExecutablePath;
}

Options::DeadStripMode Options::deadStrip()
{
        return fDeadStrip;
}

bool Options::shouldExport(const char* symbolName)
{
        switch (fExportMode) {
                case kExportSome:
                        return fExportSymbols.contains(symbolName);
                case kDontExportSome:
                        return ! fDontExportSymbols.contains(symbolName);
                case kExportDefault:
                        return true;
        }
        throw "internal error";
}

bool Options::keepLocalSymbol(const char* symbolName)
{
        switch (fLocalSymbolHandling) {
                case kLocalSymbolsAll:
                        return true;
                case kLocalSymbolsNone:
                        return false;
                case kLocalSymbolsSelectiveInclude:
                        return fLocalSymbolsIncluded.contains(symbolName);
                case kLocalSymbolsSelectiveExclude:
                        return ! fLocalSymbolsExcluded.contains(symbolName);
        }
        throw "internal error";
}

void Options::parseArch(const char* architecture)
{
        if ( architecture == NULL )
                throw "-arch must be followed by an architecture string";
        if ( strcmp(architecture, "ppc") == 0 )
                fArchitecture = CPU_TYPE_POWERPC;
        else if ( strcmp(architecture, "ppc64") == 0 )
                fArchitecture = CPU_TYPE_POWERPC64;
        else if ( strcmp(architecture, "i386") == 0 )
                fArchitecture = CPU_TYPE_I386;
        else if ( strcmp(architecture, "x86_64") == 0 )
                fArchitecture = CPU_TYPE_X86_64;
        // compatibility support for cpu-sub-types
        else if ( (strcmp(architecture, "ppc750") == 0)
                        || (strcmp(architecture, "ppc7400") == 0)
                        || (strcmp(architecture, "ppc7450") == 0)
                        || (strcmp(architecture, "ppc970") == 0) )
                fArchitecture = CPU_TYPE_POWERPC;
        else
                throwf(" unknown/unsupported architecture name for: -arch %s", architecture);
}

bool Options::checkForFile(const char* format, const char* dir, const char* rootName, FileInfo& result)
{
        struct stat statBuffer;
        char possiblePath[strlen(dir)+strlen(rootName)+strlen(format)+8];
        sprintf(possiblePath, format,  dir, rootName);
        bool found = (stat(possiblePath, &statBuffer) == 0);
        if ( fTraceDylibSearching )
                printf("[Logging for XBS]%sfound library: '%s'\n", (found ? " " : " not "), possiblePath);
        if ( found ) {
                result.path = strdup(possiblePath);
                result.fileLen = statBuffer.st_size;
                result.modTime = statBuffer.st_mtime;
                return true;
        }
        return false;
}


Options::FileInfo Options::findLibrary(const char* rootName)
{
        FileInfo result;
        const int rootNameLen = strlen(rootName);
        // if rootName ends in .o there is no .a vs .dylib choice
        if ( (rootNameLen > 3) && (strcmp(&rootName[rootNameLen-2], ".o") == 0) ) {
                for (std::vector<const char*>::iterator it = fLibrarySearchPaths.begin();
                         it != fLibrarySearchPaths.end();
                         it++) {
                        const char* dir = *it;
                        if ( checkForFile("%s/%s", dir, rootName, result) )
                                return result;
                }
        }
        else {
                bool lookForDylibs = ( fOutputKind != Options::kDyld);
                switch ( fLibrarySearchMode ) {
                case kSearchAllDirsForDylibsThenAllDirsForArchives:
                                // first look in all directories for just for dylibs
                                if ( lookForDylibs ) {
                                        for (std::vector<const char*>::iterator it = fLibrarySearchPaths.begin();
                                                 it != fLibrarySearchPaths.end();
                                                 it++) {
                                                const char* dir = *it;
                                                if ( checkForFile("%s/lib%s.dylib", dir, rootName, result) )
                                                        return result;
                                        }
                                        for (std::vector<const char*>::iterator it = fLibrarySearchPaths.begin();
                                                 it != fLibrarySearchPaths.end();
                                                 it++) {
                                                const char* dir = *it;
                                                if ( checkForFile("%s/lib%s.so", dir, rootName, result) )
                                                        return result;
                                        }
                                }
                                // next look in all directories for just for archives
                                for (std::vector<const char*>::iterator it = fLibrarySearchPaths.begin();
                                         it != fLibrarySearchPaths.end();
                                         it++) {
                                        const char* dir = *it;
                                        if ( checkForFile("%s/lib%s.a", dir, rootName, result) )
                                                return result;
                                }
                                break;

                        case kSearchDylibAndArchiveInEachDir:
                                // look in each directory for just for a dylib then for an archive
                                for (std::vector<const char*>::iterator it = fLibrarySearchPaths.begin();
                                         it != fLibrarySearchPaths.end();
                                         it++) {
                                        const char* dir = *it;
                                        if ( lookForDylibs && checkForFile("%s/lib%s.dylib", dir, rootName, result) )
                                                return result;
                                        if ( lookForDylibs && checkForFile("%s/lib%s.so", dir, rootName, result) )
                                                return result;
                                        if ( checkForFile("%s/lib%s.a", dir, rootName, result) )
                                                return result;
                                }
                                break;
                }
        }
        throwf("library not found for -l%s", rootName);
}

Options::FileInfo Options::findFramework(const char* frameworkName)
{
        if ( frameworkName == NULL )
                throw "-framework missing next argument";
        char temp[strlen(frameworkName)+1];
        strcpy(temp, frameworkName);
        const char* name = temp;
        const char* suffix = NULL;
        char* comma = strchr(temp, ',');
        if ( comma != NULL ) {
                *comma = '\0';
                suffix = &comma[1];
        }
        return findFramework(name, suffix);
}

Options::FileInfo Options::findFramework(const char* rootName, const char* suffix)
{
        struct stat statBuffer;
        for (std::vector<const char*>::iterator it = fFrameworkSearchPaths.begin();
                 it != fFrameworkSearchPaths.end();
                 it++) {
                // ??? Shouldn't we be using String here and just initializing it?
                // ??? Use str.c_str () to pull out the string for the stat call.
                const char* dir = *it;
                char possiblePath[PATH_MAX];
                strcpy(possiblePath, dir);
                strcat(possiblePath, "/");
                strcat(possiblePath, rootName);
                strcat(possiblePath, ".framework/");
                strcat(possiblePath, rootName);
                if ( suffix != NULL ) {
                        char realPath[PATH_MAX];
                        // no symlink in framework to suffix variants, so follow main symlink
                        if ( realpath(possiblePath, realPath) != NULL ) {
                                strcpy(possiblePath, realPath);
                                strcat(possiblePath, suffix);
                        }
                }
                bool found = (stat(possiblePath, &statBuffer) == 0);
                if ( fTraceDylibSearching )
                        printf("[Logging for XBS]%sfound framework: '%s'\n",
                                   (found ? " " : " not "), possiblePath);
                if ( found ) {
                        FileInfo result;
                        result.path = strdup(possiblePath);
                        result.fileLen = statBuffer.st_size;
                        result.modTime = statBuffer.st_mtime;
                        return result;
                }
        }
        // try without suffix
        if ( suffix != NULL )
                return findFramework(rootName, NULL);
        else
                throwf("framework not found %s", rootName);
}

Options::FileInfo Options::findFile(const char* path)
{
        FileInfo result;
        struct stat statBuffer;

        // if absolute path and not a .o file, the use SDK prefix
        if ( (path[0] == '/') && (strcmp(&path[strlen(path)-2], ".o") != 0) ) {
                const int pathLen = strlen(path);
                for (std::vector<const char*>::iterator it = fSDKPaths.begin(); it != fSDKPaths.end(); it++) {
                        // ??? Shouldn't we be using String here?
                        const char* sdkPathDir = *it;
                        const int sdkPathDirLen = strlen(sdkPathDir);
                        char possiblePath[sdkPathDirLen+pathLen+4];
                        strcpy(possiblePath, sdkPathDir);
                        if ( possiblePath[sdkPathDirLen-1] == '/' )
                                possiblePath[sdkPathDirLen-1] = '\0';
                        strcat(possiblePath, path);
                        if ( stat(possiblePath, &statBuffer) == 0 ) {
                                result.path = strdup(possiblePath);
                                result.fileLen = statBuffer.st_size;
                                result.modTime = statBuffer.st_mtime;
                                return result;
                        }
                }
        }
        // try raw path
        if ( stat(path, &statBuffer) == 0 ) {
                result.path = strdup(path);
                result.fileLen = statBuffer.st_size;
                result.modTime = statBuffer.st_mtime;
                return result;
        }

        // try @executable_path substitution
        if ( (strncmp(path, "@executable_path/", 17) == 0) && (fExecutablePath != NULL) ) {
                char newPath[strlen(fExecutablePath) + strlen(path)];
                strcpy(newPath, fExecutablePath);
                char* addPoint = strrchr(newPath,'/');
                if ( addPoint != NULL )
                        strcpy(&addPoint[1], &path[17]);
                else
                        strcpy(newPath, &path[17]);
                if ( stat(newPath, &statBuffer) == 0 ) {
                        result.path = strdup(newPath);
                        result.fileLen = statBuffer.st_size;
                        result.modTime = statBuffer.st_mtime;
                        return result;
                }
        }

        // not found
        throwf("file not found: %s", path);
}

Options::FileInfo Options::findFileUsingPaths(const char* path)
{
        FileInfo result;

        const char* lastSlash = strrchr(path, '/');
        const char* leafName = (lastSlash == NULL) ? path : &lastSlash[1];

        // Is this in a framework?
        // /path/Foo.framework/Foo                                                      ==> true (Foo)
        // /path/Foo.framework/Frameworks/Bar.framework/Bar ==> true (Bar)
        // /path/Foo.framework/Resources/Bar                            ==> false
        bool isFramework = false;
        if ( lastSlash != NULL ) {
                char frameworkDir[strlen(leafName) + 20];
                strcpy(frameworkDir, "/");
                strcat(frameworkDir, leafName);
                strcat(frameworkDir, ".framework/");
                if ( strstr(path, frameworkDir) != NULL )
                        isFramework = true;
        }
        
        // These are abbreviated versions of the routines findFramework and findLibrary above
        // because we already know the final name of the file that we're looking for and so
        // don't need to try variations, just paths. We do need to add the additional bits
        // onto the framework path though.
        if ( isFramework ) {
                for (std::vector<const char*>::iterator it = fFrameworkSearchPaths.begin();
                         it != fFrameworkSearchPaths.end();
                         it++) {
                        const char* dir = *it;
                        char possiblePath[PATH_MAX];
                        strcpy(possiblePath, dir);
                        strcat(possiblePath, "/");
                        strcat(possiblePath, leafName);
                        strcat(possiblePath, ".framework");

                        //fprintf(stderr,"Finding Framework: %s/%s, leafName=%s\n", possiblePath, leafName, leafName);
                        if ( checkForFile("%s/%s", possiblePath, leafName, result) )
                                return result;
                }
        } 
        else {
                for (std::vector<const char*>::iterator it = fLibrarySearchPaths.begin();
                         it != fLibrarySearchPaths.end();
                         it++) {
                        const char* dir = *it;
                        //fprintf(stderr,"Finding Library: %s/%s\n", dir, leafName);
                        if ( checkForFile("%s/%s", dir, leafName, result) )
                                return result;
                }
        }

        // If we didn't find it fall back to findFile.
        return findFile(path);
}
 

void Options::parseSegAddrTable(const char* segAddrPath, const char* installPath)
{
        FILE* file = fopen(segAddrPath, "r");
        if ( file == NULL ) {
                fprintf(stderr, "ld64: warning, -seg_addr_table file cannot be read: %s\n", segAddrPath);
                return;
        }
        
        char path[PATH_MAX];
        uint64_t firstColumAddress = 0;
        uint64_t secondColumAddress = 0;
        bool hasSecondColumn = false;
        while ( fgets(path, PATH_MAX, file) != NULL ) {
                path[PATH_MAX-1] = '\0';
                char* eol = strchr(path, '\n');
                if ( eol != NULL )
                        *eol = '\0';
                // ignore lines not starting with 0x number
                if ( (path[0] == '0') && (path[1] == 'x') ) {
                        char* p;
                        firstColumAddress = strtoull(path, &p, 16);
                        while ( isspace(*p) )
                                ++p;
                        // see if second column is a number
                        if ( (p[0] == '0') && (p[1] == 'x') ) {
                                secondColumAddress = strtoull(p, &p, 16);
                                hasSecondColumn = true;
                                while ( isspace(*p) )
                                        ++p;
                        }
                        while ( isspace(*p) )
                                ++p;
                        if ( p[0] == '/' ) {
                                // remove any trailing whitespace
                                for(char* end = eol-1; (end > p) && isspace(*end); --end)
                                        *end = '\0';
                                // see if this line is for the dylib being linked
                                if ( strcmp(p, installPath) == 0 ) {
                                        fBaseAddress = firstColumAddress;
                                        if ( hasSecondColumn ) {
                                                fBaseWritableAddress = secondColumAddress;
                                                fSplitSegs = true;
                                        }
                                        break; // out of while loop
                                }
                        }
                }
        }

        fclose(file);
}

void Options::loadFileList(const char* fileOfPaths)
{
        FILE* file;
        const char* comma = strrchr(fileOfPaths, ',');
        const char* prefix = NULL;
        if ( comma != NULL ) {
                prefix = comma+1;
                int realFileOfPathsLen = comma-fileOfPaths;
                char realFileOfPaths[realFileOfPathsLen+1];
                strncpy(realFileOfPaths,fileOfPaths, realFileOfPathsLen);
                realFileOfPaths[realFileOfPathsLen] = '\0';
                file = fopen(realFileOfPaths, "r");
                if ( file == NULL )
                        throwf("-filelist file not found: %s\n", realFileOfPaths);
        }
        else {
                file = fopen(fileOfPaths, "r");
                if ( file == NULL )
                        throwf("-filelist file not found: %s\n", fileOfPaths);
        }

        char path[PATH_MAX];
        while ( fgets(path, PATH_MAX, file) != NULL ) {
                path[PATH_MAX-1] = '\0';
                char* eol = strchr(path, '\n');
                if ( eol != NULL )
                        *eol = '\0';
                if ( prefix != NULL ) {
                        char builtPath[strlen(prefix)+strlen(path)+2];
                        strcpy(builtPath, prefix);
                        strcat(builtPath, "/");
                        strcat(builtPath, path);
                        fInputFiles.push_back(findFile(builtPath));
                }
                else {
                        fInputFiles.push_back(findFile(path));
                }
        }
        fclose(file);
}

bool Options::SetWithWildcards::hasWildCards(const char* symbol)
{
        // an exported symbol name containing *, ?, or [ requires wildcard matching
        return ( strpbrk(symbol, "*?[") != NULL );
}

void Options::SetWithWildcards::insert(const char* symbol)
{
        if ( hasWildCards(symbol) )
                fWildCard.push_back(symbol);
        else
                fRegular.insert(symbol);
}

bool Options::SetWithWildcards::contains(const char* symbol)
{
        // first look at hash table on non-wildcard symbols
        if ( fRegular.find(symbol) != fRegular.end() )
                return true;
        // next walk list of wild card symbols looking for a match
        for(std::vector<const char*>::iterator it = fWildCard.begin(); it != fWildCard.end(); ++it) {
                if ( wildCardMatch(*it, symbol) )
                        return true;
        }
        return false;
}


bool Options::SetWithWildcards::inCharRange(const char*& p, unsigned char c)
{
        ++p; // find end
        const char* b = p;
        while ( *p != '\0' ) {
                if ( *p == ']') {
                        const char* e = p;
                        // found beginining [ and ending ]
                        unsigned char last = '\0';
                        for ( const char* s = b; s < e; ++s ) {
                                if ( *s == '-' ) {
                                        unsigned char next = *(++s);
                                        if ( (last <= c) && (c <= next) )
                                                return true;
                                        ++s;
                                }
                                else {
                                        if ( *s == c )
                                                return true;
                                        last = *s;
                                }
                        }
                        return false;
                }
                ++p;
        }
        return false;
}

bool Options::SetWithWildcards::wildCardMatch(const char* pattern, const char* symbol)
{
        const char* s = symbol;
        for (const char* p = pattern; *p != '\0'; ++p) {
                switch ( *p ) {
                        case '*':
                                if ( p[1] == '\0' )
                                        return true;
                                for (const char* t = s; *t != '\0'; ++t) {
                                        if ( wildCardMatch(&p[1], t) )
                                                return true;
                                }
                                return false;
                        case '?':
                                if ( *s == '\0' )
                                        return false;
                                ++s;
                                break;
                        case '[':
                                if ( ! inCharRange(p, *s) )
                                        return false;
                                ++s;
                                break;
                        default:
                                if ( *s != *p )
                                        return false;
                                ++s;
                }
        }
        return (*s == '\0');
}


void Options::loadExportFile(const char* fileOfExports, const char* option, SetWithWildcards& set)
{
        // read in whole file
        int fd = ::open(fileOfExports, O_RDONLY, 0);
        if ( fd == -1 )
                throwf("can't open %s file: %s", option, fileOfExports);
        struct stat stat_buf;
        ::fstat(fd, &stat_buf);
        char* p = (char*)malloc(stat_buf.st_size);
        if ( p == NULL )
                throwf("can't process %s file: %s", option, fileOfExports);

        if ( read(fd, p, stat_buf.st_size) != stat_buf.st_size )
                throwf("can't read %s file: %s", option, fileOfExports);

        ::close(fd);

        // parse into symbols and add to hash_set
        char * const end = &p[stat_buf.st_size];
        enum { lineStart, inSymbol, inComment } state = lineStart;
        char* symbolStart = NULL;
        for (char* s = p; s < end; ++s ) {
                switch ( state ) {
                case lineStart:
                        if ( *s =='#' ) {
                                state = inComment;
                        }
                        else if ( !isspace(*s) ) {
                                state = inSymbol;
                                symbolStart = s;
                        }
                        break;
                case inSymbol:
                        if ( (*s == '\n') || (*s == '\r') ) {
                                *s = '\0';
                                // removing any trailing spaces
                                char* last = s-1;
                                while ( isspace(*last) ) {
                                        *last = '\0';
                                        --last;
                                }
                                set.insert(symbolStart);
                                symbolStart = NULL;
                                state = lineStart;
                        }
                        break;
                case inComment:
                        if ( (*s == '\n') || (*s == '\r') )
                                state = lineStart;
                        break;
                }
        }
        if ( state == inSymbol ) {
                fprintf(stderr, "ld64 warning: missing line-end at end of file \"%s\"\n", fileOfExports);
                int len = end-symbolStart+1;
                char* temp = new char[len];
                strlcpy(temp, symbolStart, len);

                // remove any trailing spaces
                char* last = &temp[len-2];
                while ( isspace(*last) ) {
                        *last = '\0';
                        --last;
                }
                set.insert(temp);
        }

        // Note: we do not free() the malloc buffer, because the strings are used by the export-set hash table
}

void Options::parseAliasFile(const char* fileOfAliases)
{
        // read in whole file
        int fd = ::open(fileOfAliases, O_RDONLY, 0);
        if ( fd == -1 )
                throwf("can't open alias file: %s", fileOfAliases);
        struct stat stat_buf;
        ::fstat(fd, &stat_buf);
        char* p = (char*)malloc(stat_buf.st_size+1);
        if ( p == NULL )
                throwf("can't process alias file: %s", fileOfAliases);

        if ( read(fd, p, stat_buf.st_size) != stat_buf.st_size )
                throwf("can't read alias file: %s", fileOfAliases);
        p[stat_buf.st_size] = '\n';
        ::close(fd);

        // parse into symbols and add to fAliases
        ObjectFile::ReaderOptions::AliasPair pair;
        char * const end = &p[stat_buf.st_size+1];
        enum { lineStart, inRealName, inBetween, inAliasName, inComment } state = lineStart;
        int lineNumber = 1;
        for (char* s = p; s < end; ++s ) {
                switch ( state ) {
                case lineStart:
                        if ( *s =='#' ) {
                                state = inComment;
                        }
                        else if ( !isspace(*s) ) {
                                state = inRealName;
                                pair.realName = s;
                        }
                        break;
                case inRealName:
                        if ( *s == '\n' ) {
                                fprintf(stderr, "ld64 warning: line needs two symbols but has only one at line #%d in \"%s\"\n", lineNumber, fileOfAliases);
                                ++lineNumber;
                                state = lineStart;
                        }
                        else if ( isspace(*s) ) {
                                *s = '\0';
                                state = inBetween;
                        }
                        break;
                case inBetween:
                        if ( *s == '\n' ) {
                                fprintf(stderr, "ld64 warning: line needs two symbols but has only one at line #%d in \"%s\"\n", lineNumber, fileOfAliases);
                                ++lineNumber;
                                state = lineStart;
                        }
                        else if ( ! isspace(*s) ) {
                                state = inAliasName;
                                pair.alias = s;
                        }
                        break;
                case inAliasName:
                        if ( *s =='#' ) {
                                *s = '\0';
                                // removing any trailing spaces
                                char* last = s-1;
                                while ( isspace(*last) ) {
                                        *last = '\0';
                                        --last;
                                }
                                fReaderOptions.fAliases.push_back(pair);
                                state = inComment;
                        }
                        else if ( *s == '\n' ) {
                                *s = '\0';
                                // removing any trailing spaces
                                char* last = s-1;
                                while ( isspace(*last) ) {
                                        *last = '\0';
                                        --last;
                                }
                                fReaderOptions.fAliases.push_back(pair);
                                state = lineStart;
                        }
                        break;
                case inComment:
                        if ( *s == '\n' )
                                state = lineStart;
                        break;
                }
        }

        // Note: we do not free() the malloc buffer, because the strings therein are used by fAliases
}



void Options::setUndefinedTreatment(const char* treatment)
{
        if ( treatment == NULL )
                throw "-undefined missing [ warning | error | suppress | dynamic_lookup ]";

        if ( strcmp(treatment, "warning") == 0 )
                fUndefinedTreatment = kUndefinedWarning;
        else if ( strcmp(treatment, "error") == 0 )
                fUndefinedTreatment = kUndefinedError;
        else if ( strcmp(treatment, "suppress") == 0 )
                fUndefinedTreatment = kUndefinedSuppress;
        else if ( strcmp(treatment, "dynamic_lookup") == 0 )
                fUndefinedTreatment = kUndefinedDynamicLookup;
        else
                throw "invalid option to -undefined [ warning | error | suppress | dynamic_lookup ]";
}

Options::Treatment Options::parseTreatment(const char* treatment)
{
        if ( treatment == NULL )
                return kNULL;

        if ( strcmp(treatment, "warning") == 0 )
                return kWarning;
        else if ( strcmp(treatment, "error") == 0 )
                return kError;
        else if ( strcmp(treatment, "suppress") == 0 )
                return kSuppress;
        else
                return kInvalid;
}

void Options::setVersionMin(const char* version)
{
        if ( version == NULL )
                throw "-macosx_version_min argument missing";

        if ( (strncmp(version, "10.", 3) == 0) && isdigit(version[3]) ) {
                int num = version[3] - '0';
                switch ( num ) {
                        case 0:
                        case 1:
                                fReaderOptions.fVersionMin = ObjectFile::ReaderOptions::k10_1;
                                break;
                        case 2:
                                fReaderOptions.fVersionMin = ObjectFile::ReaderOptions::k10_2;
                                break;
                        case 3:
                                fReaderOptions.fVersionMin = ObjectFile::ReaderOptions::k10_3;
                                break;
                        case 4:
                                fReaderOptions.fVersionMin = ObjectFile::ReaderOptions::k10_4;
                                break;
                        default:
                                fReaderOptions.fVersionMin = ObjectFile::ReaderOptions::k10_5;
                                break;
                        }
        }
        else {
                fprintf(stderr, "ld64: unknown option to -macosx_version_min not 10.x");
        }
}

void Options::setWeakReferenceMismatchTreatment(const char* treatment)
{
        if ( treatment == NULL )
                throw "-weak_reference_mismatches missing [ error | weak | non-weak ]";

        if ( strcmp(treatment, "error") == 0 )
                fWeakReferenceMismatchTreatment = kWeakReferenceMismatchError;
        else if ( strcmp(treatment, "weak") == 0 )
                fWeakReferenceMismatchTreatment = kWeakReferenceMismatchWeak;
        else if ( strcmp(treatment, "non-weak") == 0 )
                fWeakReferenceMismatchTreatment = kWeakReferenceMismatchNonWeak;
        else
                throw "invalid option to -weak_reference_mismatches [ error | weak | non-weak ]";
}

Options::CommonsMode Options::parseCommonsTreatment(const char* mode)
{
        if ( mode == NULL )
                throw "-commons missing [ ignore_dylibs | use_dylibs | error ]";

        if ( strcmp(mode, "ignore_dylibs") == 0 )
                return kCommonsIgnoreDylibs;
        else if ( strcmp(mode, "use_dylibs") == 0 )
                return kCommonsOverriddenByDylibs;
        else if ( strcmp(mode, "error") == 0 )
                return kCommonsConflictsDylibsError;
        else
                throw "invalid option to -commons [ ignore_dylibs | use_dylibs | error ]";
}

void Options::addDylibOverride(const char* paths)
{
        if ( paths == NULL )
                throw "-dylib_file must followed by two colon separated paths";
        const char* colon = strchr(paths, ':');
        if ( colon == NULL )
                throw "-dylib_file must followed by two colon separated paths";
        int len = colon-paths;
        char* target = new char[len+2];
        strncpy(target, paths, len);
        target[len] = '\0';
        DylibOverride entry;
        entry.installName = target;
        entry.useInstead = &colon[1];   
        fDylibOverrides.push_back(entry);
}

uint64_t Options::parseAddress(const char* addr)
{
        char* endptr;
        uint64_t result = strtoull(addr, &endptr, 16);
        return result;
}

uint32_t Options::parseProtection(const char* prot)
{
        uint32_t result = 0;
        for(const char* p = prot; *p != '\0'; ++p) {
                switch(tolower(*p)) {
                        case 'r':
                                result |= VM_PROT_READ;
                                break;
                        case 'w':
                                result |= VM_PROT_WRITE;
                                break;
                        case 'x':
                                result |= VM_PROT_EXECUTE;
                                break;
                        case '-':
                                break;
                        default:
                                throwf("unknown -segprot lettter in %s", prot);
                }
        }
        return result;
}



//
// Parses number of form X[.Y[.Z]] into a uint32_t where the nibbles are xxxx.yy.zz
//
//
uint32_t Options::parseVersionNumber(const char* versionString)
{
        unsigned long x = 0;
        unsigned long y = 0;
        unsigned long z = 0;
        char* end;
        x = strtoul(versionString, &end, 10);
        if ( *end == '.' ) {
                y = strtoul(&end[1], &end, 10);
                if ( *end == '.' ) {
                        z = strtoul(&end[1], &end, 10);
                }
        }
        if ( (*end != '\0') || (x > 0xffff) || (y > 0xff) || (z > 0xff) )
                throwf("malformed version number: %s", versionString);

        return (x << 16) | ( y << 8 ) | z;
}

static const char* cstringSymbolName(const char* orderFileString)
{
        char* result;
        asprintf(&result, "cstring=%s", orderFileString);
        // convert escaped characters
        char* d = result;
        for(const char* s=result; *s != '\0'; ++s, ++d) {
                if ( *s == '\\' ) {
                        ++s;
                        switch ( *s ) {
                                case 'n':
                                        *d = '\n';
                                        break;
                                case 't':
                                        *d = '\t';
                                        break;
                                case 'v':
                                        *d = '\v';
                                        break;
                                case 'b':
                                        *d = '\b';
                                        break;
                                case 'r':
                                        *d = '\r';
                                        break;
                                case 'f':
                                        *d = '\f';
                                        break;
                                case 'a':
                                        *d = '\a';
                                        break;
                                case '\\':
                                        *d = '\\';
                                        break;
                                case '?':
                                        *d = '\?';
                                        break;
                                case '\'':
                                        *d = '\r';
                                        break;
                                case '\"':
                                        *d = '\"';
                                        break;
                                case 'x':
                                        // hexadecimal value of char
                                        {
                                                ++s;
                                                char value = 0;
                                                while ( isxdigit(*s) ) {
                                                        value *= 16;
                                                        if ( isdigit(*s) )
                                                                value += (*s-'0');
                                                        else
                                                                value += ((toupper(*s)-'A') + 10);
                                                        ++s;
                                                }
                                                *d = value;
                                        }
                                        break;
                                default:
                                        if ( isdigit(*s) ) {
                                                // octal value of char
                                                char value = 0;
                                                while ( isdigit(*s) ) {
                                                        value = (value << 3) + (*s-'0');
                                                        ++s;
                                                }
                                                *d = value;
                                        }
                        }
                }
                else {
                        *d = *s;
                }
        }
        *d = '\0';
        return result;
}

void Options::parseOrderFile(const char* path, bool cstring)
{
        // read in whole file
        int fd = ::open(path, O_RDONLY, 0);
        if ( fd == -1 )
                throwf("can't open order file: %s", path);
        struct stat stat_buf;
        ::fstat(fd, &stat_buf);
        char* p = (char*)malloc(stat_buf.st_size+1);
        if ( p == NULL )
                throwf("can't process order file: %s", path);
        if ( read(fd, p, stat_buf.st_size) != stat_buf.st_size )
                throwf("can't read order file: %s", path);
        ::close(fd);
        p[stat_buf.st_size] = '\n';

        // parse into vector of pairs
        char * const end = &p[stat_buf.st_size+1];
        enum { lineStart, inSymbol, inComment } state = lineStart;
        char* symbolStart = NULL;
        for (char* s = p; s < end; ++s ) {
                switch ( state ) {
                case lineStart:
                        if ( *s =='#' ) {
                                state = inComment;
                        }
                        else if ( !isspace(*s) || cstring ) {
                                state = inSymbol;
                                symbolStart = s;
                        }
                        break;
                case inSymbol:
                        if ( (*s == '\n') || (!cstring && (*s == '#')) ) {
                                bool wasComment = (*s == '#');
                                *s = '\0';
                                // removing any trailing spaces
                                char* last = s-1;
                                while ( isspace(*last) ) {
                                        *last = '\0';
                                        --last;
                                }
                                if ( strncmp(symbolStart, "ppc:", 4) == 0 ) {
                                        if ( fArchitecture == CPU_TYPE_POWERPC )
                                                symbolStart = &symbolStart[4];
                                        else
                                                symbolStart = NULL;
                                }
                                // if there is an architecture prefix, only use this symbol it if matches current arch
                                else if ( strncmp(symbolStart, "ppc64:", 6) == 0 ) {
                                        if ( fArchitecture == CPU_TYPE_POWERPC64 )
                                                symbolStart = &symbolStart[6];
                                        else
                                                symbolStart = NULL;
                                }
                                else if ( strncmp(symbolStart, "i386:", 5) == 0 ) {
                                        if ( fArchitecture == CPU_TYPE_I386 )
                                                symbolStart = &symbolStart[5];
                                        else
                                                symbolStart = NULL;
                                }
                                else if ( strncmp(symbolStart, "x86_64:", 7) == 0 ) {
                                        if ( fArchitecture == CPU_TYPE_X86_64 )
                                                symbolStart = &symbolStart[7];
                                        else
                                                symbolStart = NULL;
                                }
                                if ( symbolStart != NULL ) {
                                        char* objFileName = NULL;
                                        char* colon = strstr(symbolStart, ".o:");
                                        if ( colon != NULL ) {
                                                colon[2] = '\0';
                                                objFileName = symbolStart;
                                                symbolStart = &colon[3];
                                        }
                                        // trim leading spaces
                                        while ( isspace(*symbolStart) ) 
                                                ++symbolStart;
                                        Options::OrderedSymbol pair;
                                        if ( cstring )
                                                pair.symbolName = cstringSymbolName(symbolStart);
                                        else
                                                pair.symbolName = symbolStart;
                                        pair.objectFileName = objFileName;
                                        fOrderedSymbols.push_back(pair);
                                }
                                symbolStart = NULL;
                                if ( wasComment )
                                        state = inComment;
                                else
                                        state = lineStart;
                        }
                        break;
                case inComment:
                        if ( *s == '\n' )
                                state = lineStart;
                        break;
                }
        }
        // Note: we do not free() the malloc buffer, because the strings are used by the fOrderedSymbols
}

void Options::parseSectionOrderFile(const char* segment, const char* section, const char* path)
{
        if ( (strcmp(section, "__cstring") == 0) && (strcmp(segment, "__TEXT") == 0) ) {
                parseOrderFile(path, true);
        }
        else if ( (strncmp(section, "__literal",9) == 0) && (strcmp(segment, "__TEXT") == 0) ) {
                fprintf(stderr, "ld64 warning: sorting of __literal[4,8,16] sections not supported\n");
        }
        else {
                // ignore section information and append all symbol names to global order file
                parseOrderFile(path, false);
        }
}

void Options::addSection(const char* segment, const char* section, const char* path)
{
        if ( strlen(segment) > 16 )
                throw "-seccreate segment name max 16 chars";
        if ( strlen(section) > 16 ) {
                char* tmp = strdup(section);
                tmp[16] = '\0';
                fprintf(stderr, "ld64 warning: -seccreate section name (%s) truncated to 16 chars (%s)\n", section, tmp);
                section = tmp;
        }

        // read in whole file
        int fd = ::open(path, O_RDONLY, 0);
        if ( fd == -1 )
                throwf("can't open -sectcreate file: %s", path);
        struct stat stat_buf;
        ::fstat(fd, &stat_buf);
        char* p = (char*)malloc(stat_buf.st_size);
        if ( p == NULL )
                throwf("can't process -sectcreate file: %s", path);
        if ( read(fd, p, stat_buf.st_size) != stat_buf.st_size )
                throwf("can't read -sectcreate file: %s", path);
        ::close(fd);

        // record section to create
        ExtraSection info = { segment, section, path, (uint8_t*)p, stat_buf.st_size };
        fExtraSections.push_back(info);
}

void Options::addSectionAlignment(const char* segment, const char* section, const char* alignmentStr)
{
        if ( strlen(segment) > 16 )
                throw "-sectalign segment name max 16 chars";
        if ( strlen(section) > 16 )
                throw "-sectalign section name max 16 chars";

        // argument to -sectalign is a hexadecimal number
        char* endptr;
        unsigned long value = strtoul(alignmentStr, &endptr, 16);
        if ( *endptr != '\0')
                throw "argument for -sectalign is not a hexadecimal number";
        if ( value > 0x8000 )
                throw "argument for -sectalign must be less than or equal to 0x8000";
        if ( value == 0 ) {
                fprintf(stderr, "ld64 warning: zero is not a valid -sectalign\n");
                value = 1;
        }

        // alignment is power of 2 (e.g. page alignment = 12)
        uint8_t alignment = (uint8_t)__builtin_ctz(value);
        if ( (unsigned long)(1 << alignment) != value ) {
                fprintf(stderr, "ld64 warning: alignment for -sectalign %s %s is not a power of two, using 0x%X\n",
                        segment, section, 1 << alignment);
        }

        SectionAlignment info = { segment, section, alignment };
        fSectionAlignments.push_back(info);
}

void Options::addLibrary(const FileInfo& info)
{
        // if this library has already been added, don't add again (archives are automatically repeatedly searched)
        for (std::vector<Options::FileInfo>::iterator fit = fInputFiles.begin(); fit != fInputFiles.end(); fit++) {
                if ( strcmp(info.path, fit->path) == 0 ) {
                        // if dylib is specified again but weak, record that it should be weak
                        if ( info.options.fWeakImport )
                                fit->options.fWeakImport = true;
                        return;
                }
        }
        // add to list
        fInputFiles.push_back(info);
}

void Options::warnObsolete(const char* arg)
{
        if ( emitWarnings() )
                fprintf(stderr, "ld64: warning: option %s is obsolete and being ignored\n", arg);
}




//
// Process all command line arguments.
//
// The only error checking done here is that each option is valid and if it has arguments
// that they too are valid.
//
// The general rule is "last option wins", i.e. if both -bundle and -dylib are specified,
// whichever was last on the command line is used.
//
// Error check for invalid combinations of options is done in checkIllegalOptionCombinations()
//
void Options::parse(int argc, const char* argv[])
{
        // pass one builds search list from -L and -F options
        this->buildSearchPaths(argc, argv);

        // reduce re-allocations
        fInputFiles.reserve(32);

        // pass two parse all other options
        for(int i=1; i < argc; ++i) {
                const char* arg = argv[i];

                if ( arg[0] == '-' ) {

                        // Since we don't care about the files passed, just the option names, we do this here.
                        if (fPrintOptions)
                                fprintf (stderr, "[Logging ld64 options]\t%s\n", arg);

                        if ( (arg[1] == 'L') || (arg[1] == 'F') ) {
                                // previously handled by buildSearchPaths()
                        }
                        // The one gnu style option we have to keep compatibility
                        // with gcc. Might as well have the single hyphen one as well.
                        else if ( (strcmp(arg, "--help") == 0)
                                          || (strcmp(arg, "-help") == 0)) {
                                fprintf (stdout, "ld64: For information on command line options please use 'man ld'.\n");
                                exit (0);
                        }
                        else if ( strcmp(arg, "-arch") == 0 ) {
                                parseArch(argv[++i]);
                        }
                        else if ( strcmp(arg, "-dynamic") == 0 ) {
                                // default
                        }
                        else if ( strcmp(arg, "-static") == 0 ) {
                                if ( fOutputKind != kObjectFile )
                                        fOutputKind = kStaticExecutable;
                                fReaderOptions.fForStatic = true;
                        }
                        else if ( strcmp(arg, "-dylib") == 0 ) {
                                fOutputKind = kDynamicLibrary;
                        }
                        else if ( strcmp(arg, "-bundle") == 0 ) {
                                fOutputKind = kDynamicBundle;
                        }
                        else if ( strcmp(arg, "-dylinker") == 0 ) {
                                fOutputKind = kDyld;
                        }
                        else if ( strcmp(arg, "-execute") == 0 ) {
                                if ( fOutputKind != kStaticExecutable )
                                        fOutputKind = kDynamicExecutable;
                        }
                        else if ( strcmp(arg, "-r") == 0 ) {
                                fOutputKind = kObjectFile;
                        }
                        else if ( strcmp(arg, "-o") == 0 ) {
                                fOutputFile = argv[++i];
                        }
                        else if ( arg[1] == 'l' ) {
                                addLibrary(findLibrary(&arg[2]));
                        }
                        // This causes a dylib to be weakly bound at
                        // link time.  This corresponds to weak_import.
                        else if ( strncmp(arg, "-weak-l", 7) == 0 ) {
                                FileInfo info = findLibrary(&arg[7]);
                                info.options.fWeakImport = true;
                                addLibrary(info);
                        }
                        // Avoid lazy binding.
                        // ??? Deprecate.
                        else if ( strcmp(arg, "-bind_at_load") == 0 ) {
                                fBindAtLoad = true;
                        }
                        else if ( strcmp(arg, "-twolevel_namespace") == 0 ) {
                                fNameSpace = kTwoLevelNameSpace;
                        }
                        else if ( strcmp(arg, "-flat_namespace") == 0 ) {
                                fNameSpace = kFlatNameSpace;
                        }
                        // Also sets a bit to ensure dyld causes everything
                        // in the namespace to be flat.
                        // ??? Deprecate
                        else if ( strcmp(arg, "-force_flat_namespace") == 0 ) {
                                fNameSpace = kForceFlatNameSpace;
                        }
                        // Similar to --whole-archive.
                        else if ( strcmp(arg, "-all_load") == 0 ) {
                                fReaderOptions.fFullyLoadArchives = true;
                        }
                        else if ( strcmp(arg, "-noall_load") == 0) {
                                warnObsolete(arg);
                        }
                        // Similar to -all_load
                        else if ( strcmp(arg, "-ObjC") == 0 ) {
                                fReaderOptions.fLoadAllObjcObjectsFromArchives = true;
                        }
                        // Library versioning.
                        else if ( (strcmp(arg, "-dylib_compatibility_version") == 0)
                                          || (strcmp(arg, "-compatibility_version") == 0)) {
                                 const char* vers = argv[++i];
                                 if ( vers == NULL )
                                        throw "-dylib_compatibility_version missing <version>";
                                fDylibCompatVersion = parseVersionNumber(vers);
                        }
                        else if ( (strcmp(arg, "-dylib_current_version") == 0)
                                          || (strcmp(arg, "-current_version") == 0)) {
                                 const char* vers = argv[++i];
                                 if ( vers == NULL )
                                        throw "-dylib_current_version missing <version>";
                                fDylibCurrentVersion = parseVersionNumber(vers);
                        }
                        else if ( strcmp(arg, "-sectorder") == 0 ) {
                                 if ( (argv[i+1]==NULL) || (argv[i+2]==NULL) || (argv[i+3]==NULL) )
                                        throw "-sectorder missing <segment> <section> <file-path>";
                                parseSectionOrderFile(argv[i+1], argv[i+2], argv[i+3]);
                                i += 3;
                        }
                        else if ( strcmp(arg, "-order_file") == 0 ) {
                                parseOrderFile(argv[++i], false);
                        }
                        else if ( strcmp(arg, "-order_file_statistics") == 0 ) {
                                fPrintOrderFileStatistics = true;
                        }
                        // ??? Deprecate segcreate.
                        // -sectcreate puts whole files into a section in the output.
                        else if ( (strcmp(arg, "-sectcreate") == 0) || (strcmp(arg, "-segcreate") == 0) ) {
                                 if ( (argv[i+1]==NULL) || (argv[i+2]==NULL) || (argv[i+3]==NULL) )
                                        throw "-sectcreate missing <segment> <section> <file-path>";
                                addSection(argv[i+1], argv[i+2], argv[i+3]);
                                i += 3;
                        }
                        // Since we have a full path in binary/library names we need to be able to override it.
                        else if ( (strcmp(arg, "-dylib_install_name") == 0)
                                          || (strcmp(arg, "-dylinker_install_name") == 0)
                                          || (strcmp(arg, "-install_name") == 0)) {
                                fDylibInstallName = argv[++i];
                                 if ( fDylibInstallName == NULL )
                                        throw "-install_name missing <path>";
                        }
                        // Sets the base address of the output.
                        else if ( (strcmp(arg, "-seg1addr") == 0) || (strcmp(arg, "-image_base") == 0) ) {
                                 const char* address = argv[++i];
                                 if ( address == NULL )
                                        throwf("%s missing <address>", arg);
                                fBaseAddress = parseAddress(address);
                        }
                        else if ( strcmp(arg, "-e") == 0 ) {
                                fEntryName = argv[++i];
                        }
                        // Same as -@ from the FSF linker.
                        else if ( strcmp(arg, "-filelist") == 0 ) {
                                 const char* path = argv[++i];
                                 if ( (path == NULL) || (path[0] == '-') )
                                        throw "-filelist missing <path>";
                                 loadFileList(path);
                        }
                        else if ( strcmp(arg, "-keep_private_externs") == 0 ) {
                                 fKeepPrivateExterns = true;
                        }
                        else if ( strcmp(arg, "-final_output") == 0 ) {
                                fFinalName = argv[++i];
                        }
                        // Ensure that all calls to exported symbols go through lazy pointers.  Multi-module
                        // just ensures that this happens for cross object file boundaries.
                        else if ( (strcmp(arg, "-interposable") == 0) || (strcmp(arg, "-multi_module") == 0)) {
                                 fInterposable = true;
                        }
                        // Default for -interposable/-multi_module/-single_module.
                        else if ( strcmp(arg, "-single_module") == 0 ) {
                                 fInterposable = false;
                        }
                        else if ( strcmp(arg, "-exported_symbols_list") == 0 ) {
                                if ( fExportMode == kDontExportSome )
                                        throw "can't use -exported_symbols_list and -unexported_symbols_list";
                                fExportMode = kExportSome;
                                loadExportFile(argv[++i], "-exported_symbols_list", fExportSymbols);
                        }
                        else if ( strcmp(arg, "-unexported_symbols_list") == 0 ) {
                                if ( fExportMode == kExportSome )
                                        throw "can't use -unexported_symbols_list and -exported_symbols_list";
                                fExportMode = kDontExportSome;
                                loadExportFile(argv[++i], "-unexported_symbols_list", fDontExportSymbols);
                        }
                        else if ( strcmp(arg, "-exported_symbol") == 0 ) {
                                if ( fExportMode == kDontExportSome )
                                        throw "can't use -exported_symbol and -unexported_symbols";
                                fExportMode = kExportSome;
                                fExportSymbols.insert(argv[++i]);
                        }
                        else if ( strcmp(arg, "-unexported_symbol") == 0 ) {
                                if ( fExportMode == kExportSome )
                                        throw "can't use -unexported_symbol and -exported_symbol";
                                fExportMode = kDontExportSome;
                                fDontExportSymbols.insert(argv[++i]);
                        }
                        else if ( strcmp(arg, "-non_global_symbols_no_strip_list") == 0 ) {
                                if ( fLocalSymbolHandling == kLocalSymbolsSelectiveExclude )
                                        throw "can't use -non_global_symbols_no_strip_list and -non_global_symbols_strip_list";
                                fLocalSymbolHandling = kLocalSymbolsSelectiveInclude;
                                loadExportFile(argv[++i], "-non_global_symbols_no_strip_list", fLocalSymbolsIncluded);
                        }
                        else if ( strcmp(arg, "-non_global_symbols_strip_list") == 0 ) {
                                if ( fLocalSymbolHandling == kLocalSymbolsSelectiveInclude )
                                        throw "can't use -non_global_symbols_no_strip_list and -non_global_symbols_strip_list";
                                fLocalSymbolHandling = kLocalSymbolsSelectiveExclude;
                                loadExportFile(argv[++i], "-non_global_symbols_strip_list", fLocalSymbolsExcluded);
                        }
                        // ??? Deprecate
                        else if ( strcmp(arg, "-no_arch_warnings") == 0 ) {
                                 fIgnoreOtherArchFiles = true;
                        }
                        else if ( strcmp(arg, "-force_cpusubtype_ALL") == 0 ) {
                                 fForceSubtypeAll = true;
                        }
                        // Similar to -weak-l but uses the absolute path name to the library.
                        else if ( strcmp(arg, "-weak_library") == 0 ) {
                                FileInfo info = findFile(argv[++i]);
                                info.options.fWeakImport = true;
                                addLibrary(info);
                        }
                        else if ( strcmp(arg, "-framework") == 0 ) {
                                addLibrary(findFramework(argv[++i]));
                        }
                        else if ( strcmp(arg, "-weak_framework") == 0 ) {
                                FileInfo info = findFramework(argv[++i]);
                                info.options.fWeakImport = true;
                                addLibrary(info);
                        }
                        else if ( strcmp(arg, "-search_paths_first") == 0 ) {
                                // previously handled by buildSearchPaths()
                        }
                        else if ( strcmp(arg, "-undefined") == 0 ) {
                                 setUndefinedTreatment(argv[++i]);
                        }
                        // Debugging output flag.
                        else if ( strcmp(arg, "-arch_multiple") == 0 ) {
                                 fMessagesPrefixedWithArchitecture = true;
                        }
                        // Specify what to do with relocations in read only
                        // sections like .text.  Could be errors, warnings,
                        // or suppressed.  Currently we do nothing with the
                        // flag.
                        else if ( strcmp(arg, "-read_only_relocs") == 0 ) {
                                Treatment temp = parseTreatment(argv[++i]);

                                if ( temp == kNULL )
                                        throw "-read_only_relocs missing [ warning | error | suppress ]";
                                else if ( temp == kInvalid )
                                        throw "invalid option to -read_only_relocs [ warning | error | suppress ]";
                        }
                        else if ( strcmp(arg, "-sect_diff_relocs") == 0 ) {
                                warnObsolete(arg);
                                ++i;
                        }
                        // Warn, error or make strong a mismatch between weak
                        // and non-weak references.
                        else if ( strcmp(arg, "-weak_reference_mismatches") == 0 ) {
                                 setWeakReferenceMismatchTreatment(argv[++i]);
                        }
                        // For a deployment target of 10.3 and earlier ld64 will
                        // prebind an executable with 0s in all addresses that
                        // are prebound.  This can then be fixed up by update_prebinding
                        // later.  Prebinding is less useful on 10.4 and greater.
                        else if ( strcmp(arg, "-prebind") == 0 ) {
                                fPrebind = true;
                        }
                        else if ( strcmp(arg, "-noprebind") == 0 ) {
                                warnObsolete(arg);
                                fPrebind = false;
                        }
                        else if ( strcmp(arg, "-prebind_allow_overlap") == 0 ) {
                                warnObsolete(arg);
                        }
                        else if ( strcmp(arg, "-prebind_all_twolevel_modules") == 0 ) {
                                warnObsolete(arg);
                        }
                        else if ( strcmp(arg, "-noprebind_all_twolevel_modules") == 0 ) {
                                warnObsolete(arg);
                        }
                        else if ( strcmp(arg, "-nofixprebinding") == 0 ) {
                                warnObsolete(arg);
                        }
                        // This should probably be deprecated when we respect -L and -F
                        // when searching for libraries.
                        else if ( strcmp(arg, "-dylib_file") == 0 ) {
                                 addDylibOverride(argv[++i]);
                        }
                        // What to expand @executable_path to if found in dependent dylibs
                        else if ( strcmp(arg, "-executable_path") == 0 ) {
                                 fExecutablePath = argv[++i];
                                 if ( (fExecutablePath == NULL) || (fExecutablePath[0] == '-') )
                                        throw "-executable_path missing <path>";
                                // if a directory was passed, add / to end
                                // <rdar://problem/5171880> ld64 can't find @executable _path relative dylibs from our umbrella frameworks
                                struct stat statBuffer;
                                if ( stat(fExecutablePath, &statBuffer) == 0 ) {
                                        if ( (statBuffer.st_mode & S_IFMT) == S_IFDIR ) {
                                                char* pathWithSlash = new char[strlen(fExecutablePath)+2];
                                                strcpy(pathWithSlash, fExecutablePath);
                                                strcat(pathWithSlash, "/");
                                                fExecutablePath = pathWithSlash;
                                        }
                                }
                        }
                        // Aligns all segments to the power of 2 boundary specified.
                        else if ( strcmp(arg, "-segalign") == 0 ) {
                                warnObsolete(arg);
                                ++i;
                        }
                        // Puts a specified segment at a particular address that must
                        // be a multiple of the segment alignment.
                        else if ( strcmp(arg, "-segaddr") == 0 ) {
                                SegmentStart seg;
                                seg.name = argv[++i];
                                 if ( (seg.name == NULL) || (argv[i+1] == NULL) )
                                        throw "-segaddr missing segName Adddress";
                                seg.address = parseAddress(argv[++i]);
                                uint64_t temp = seg.address & (-4096); // page align
                                if ( (seg.address != temp) && emitWarnings() )
                                        fprintf(stderr, "ld64: warning, -segaddr %s not page aligned, rounding down\n", seg.name);
                                fCustomSegmentAddresses.push_back(seg);
                        }
                        // ??? Deprecate when we deprecate split-seg.
                        else if ( strcmp(arg, "-segs_read_only_addr") == 0 ) {
                                fBaseAddress = parseAddress(argv[++i]);
                        }
                        // ??? Deprecate when we deprecate split-seg.
                        else if ( strcmp(arg, "-segs_read_write_addr") == 0 ) {
                                fBaseWritableAddress = parseAddress(argv[++i]);
                                fSplitSegs = true;
                        }
                        // ??? Deprecate when we get rid of basing at build time.
                        else if ( strcmp(arg, "-seg_addr_table") == 0 ) {
                                const char* name = argv[++i];
                                if ( name == NULL )
                                        throw "-seg_addr_table missing argument";
                                fSegAddrTablePath = name;
                        }
                        else if ( strcmp(arg, "-seg_addr_table_filename") == 0 ) {
                                warnObsolete(arg);
                                ++i;
                        }
                        else if ( strcmp(arg, "-segprot") == 0 ) {
                                SegmentProtect seg;
                                seg.name = argv[++i];
                                 if ( (seg.name == NULL) || (argv[i+1] == NULL) || (argv[i+2] == NULL) )
                                        throw "-segprot missing segName max-prot init-prot";
                                seg.max = parseProtection(argv[++i]);
                                seg.init = parseProtection(argv[++i]);
                                fCustomSegmentProtections.push_back(seg);
                        }
                        else if ( strcmp(arg, "-pagezero_size") == 0 ) {
                                 const char* size = argv[++i];
                                 if ( size == NULL )
                                        throw "-pagezero_size missing <size>";
                                fZeroPageSize = parseAddress(size);
                                uint64_t temp = fZeroPageSize & (-4096); // page align
                                if ( (fZeroPageSize != temp) && emitWarnings() )
                                        fprintf(stderr, "ld64: warning, -pagezero_size not page aligned, rounding down\n");
                                 fZeroPageSize = temp;
                        }
                        else if ( strcmp(arg, "-stack_addr") == 0 ) {
                                 const char* address = argv[++i];
                                 if ( address == NULL )
                                        throw "-stack_addr missing <address>";
                                fStackAddr = parseAddress(address);
                        }
                        else if ( strcmp(arg, "-stack_size") == 0 ) {
                                 const char* size = argv[++i];
                                 if ( size == NULL )
                                        throw "-stack_size missing <address>";
                                fStackSize = parseAddress(size);
                                uint64_t temp = fStackSize & (-4096); // page align
                                if ( (fStackSize != temp) && emitWarnings() )
                                        fprintf(stderr, "ld64: warning, -stack_size not page aligned, rounding down\n");
                        }
                        else if ( strcmp(arg, "-allow_stack_execute") == 0 ) {
                                fExecutableStack = true;
                        }
                        else if ( strcmp(arg, "-sectalign") == 0 ) {
                                 if ( (argv[i+1]==NULL) || (argv[i+2]==NULL) || (argv[i+3]==NULL) )
                                        throw "-sectalign missing <segment> <section> <file-path>";
                                addSectionAlignment(argv[i+1], argv[i+2], argv[i+3]);
                                i += 3;
                        }
                        else if ( strcmp(arg, "-sectorder_detail") == 0 ) {
                                warnObsolete(arg);
                        }
                        else if ( strcmp(arg, "-sectobjectsymbols") == 0 ) {
                                warnObsolete(arg);
                                i += 2;
                        }
                        else if ( strcmp(arg, "-bundle_loader") == 0 ) {
                                fBundleLoader = argv[++i];
                                if ( (fBundleLoader == NULL) || (fBundleLoader[0] == '-') )
                                        throw "-bundle_loader missing <path>";
                                FileInfo info = findFile(fBundleLoader);
                                info.options.fBundleLoader = true;
                                fInputFiles.push_back(info);
                        }
                        else if ( strcmp(arg, "-private_bundle") == 0 ) {
                                warnObsolete(arg);
                        }
                        else if ( strcmp(arg, "-twolevel_namespace_hints") == 0 ) {
                                // FIX FIX
                        }
                        // Use this flag to set default behavior for deployement targets.
                        else if ( strcmp(arg, "-macosx_version_min") == 0 ) {
                                setVersionMin(argv[++i]);
                        }
                        else if ( strcmp(arg, "-multiply_defined") == 0 ) {
                                //warnObsolete(arg);
                                ++i;
                        }
                        else if ( strcmp(arg, "-multiply_defined_unused") == 0 ) {
                                warnObsolete(arg);
                                ++i;
                        }
                        else if ( strcmp(arg, "-nomultidefs") == 0 ) {
                                warnObsolete(arg);
                        }
                        // Display each file in which the argument symbol appears and whether
                        // the file defines or references it.  This option takes an argument
                        // as -y<symbol> note that there is no space.
                        else if ( strncmp(arg, "-y", 2) == 0 ) {
                                warnObsolete("-y");
                        }
                        // Same output as -y, but output <arg> number of undefined symbols only.
                        else if ( strcmp(arg, "-Y") == 0 ) {
                                //warnObsolete(arg);
                                ++i;
                        }
                        // This option affects all objects linked into the final result.
                        else if ( strcmp(arg, "-m") == 0 ) {
                                warnObsolete(arg);
                        }
                        else if ( (strcmp(arg, "-why_load") == 0) || (strcmp(arg, "-whyload") == 0) ) {
                                 fReaderOptions.fWhyLoad = true;
                        }
                        else if ( strcmp(arg, "-why_live") == 0 ) {
                                 const char* name = argv[++i];
                                if ( name == NULL )
                                        throw "-why_live missing symbol name argument";
                                fWhyLive.insert(name);
                        }
                        else if ( strcmp(arg, "-u") == 0 ) {
                                const char* name = argv[++i];
                                if ( name == NULL )
                                        throw "-u missing argument";
                                fInitialUndefines.push_back(name);
                        }
                        else if ( strcmp(arg, "-U") == 0 ) {
                                const char* name = argv[++i];
                                if ( name == NULL )
                                        throw "-U missing argument";
                                fAllowedUndefined.insert(name);
                        }
                        else if ( strcmp(arg, "-s") == 0 ) {
                                warnObsolete(arg);
                                fLocalSymbolHandling = kLocalSymbolsNone;
                                fReaderOptions.fDebugInfoStripping = ObjectFile::ReaderOptions::kDebugInfoNone;
                        }
                        else if ( strcmp(arg, "-x") == 0 ) {
                                fLocalSymbolHandling = kLocalSymbolsNone;
                        }
                        else if ( strcmp(arg, "-S") == 0 ) {
                                fReaderOptions.fDebugInfoStripping = ObjectFile::ReaderOptions::kDebugInfoNone;
                        }
                        else if ( strcmp(arg, "-X") == 0 ) {
                                warnObsolete(arg);
                        }
                        else if ( strcmp(arg, "-Si") == 0 ) {
                                warnObsolete(arg);
                                fReaderOptions.fDebugInfoStripping = ObjectFile::ReaderOptions::kDebugInfoFull;
                        }
                        else if ( strcmp(arg, "-b") == 0 ) {
                                warnObsolete(arg);
                        }
                        else if ( strcmp(arg, "-Sn") == 0 ) {
                                warnObsolete(arg);
                                fReaderOptions.fDebugInfoStripping = ObjectFile::ReaderOptions::kDebugInfoFull;
                        }
                        else if ( strcmp(arg, "-Sp") == 0 ) {
                                warnObsolete(arg);
                        }
                        else if ( strcmp(arg, "-dead_strip") == 0 ) {
                                fDeadStrip = kDeadStripOnPlusUnusedInits;
                        }
                        else if ( strcmp(arg, "-no_dead_strip_inits_and_terms") == 0 ) {
                                fDeadStrip = kDeadStripOn;
                        }
                        else if ( strcmp(arg, "-w") == 0 ) {
                                // previously handled by buildSearchPaths()
                        }
                        else if ( strcmp(arg, "-arch_errors_fatal") == 0 ) {
                                // FIX FIX
                        }
                        else if ( strcmp(arg, "-M") == 0 ) {
                                // FIX FIX
                        }
                        else if ( strcmp(arg, "-headerpad") == 0 ) {
                                const char* size = argv[++i];
                                if ( size == NULL )
                                        throw "-headerpad missing argument";
                                 fMinimumHeaderPad = parseAddress(size);
                        }
                        else if ( strcmp(arg, "-headerpad_max_install_names") == 0 ) {
                                fMaxMinimumHeaderPad = true;
                        }
                        else if ( strcmp(arg, "-t") == 0 ) {
                                fReaderOptions.fLogAllFiles = true;
                        }
                        else if ( strcmp(arg, "-whatsloaded") == 0 ) {
                                fReaderOptions.fLogObjectFiles = true;
                        }
                        else if ( strcmp(arg, "-A") == 0 ) {
                                warnObsolete(arg);
                                 ++i;
                        }
                        else if ( strcmp(arg, "-umbrella") == 0 ) {
                                const char* name = argv[++i];
                                if ( name == NULL )
                                        throw "-umbrella missing argument";
                                fUmbrellaName = name;
                        }
                        else if ( strcmp(arg, "-allowable_client") == 0 ) {
                                const char* name = argv[++i];

                                if ( name == NULL )
                                        throw "-allowable_client missing argument";

                                fAllowableClients.push_back(name);
                        }
                        else if ( strcmp(arg, "-client_name") == 0 ) {
                                const char* name = argv[++i];

                                if ( name == NULL )
                                        throw "-client_name missing argument";

                                fClientName = name;
                        }
                        else if ( strcmp(arg, "-sub_umbrella") == 0 ) {
                                const char* name = argv[++i];
                                if ( name == NULL )
                                        throw "-sub_umbrella missing argument";
                                 fSubUmbellas.push_back(name);
                        }
                        else if ( strcmp(arg, "-sub_library") == 0 ) {
                                const char* name = argv[++i];
                                if ( name == NULL )
                                        throw "-sub_library missing argument";
                                 fSubLibraries.push_back(name);
                        }
                        else if ( strcmp(arg, "-init") == 0 ) {
                                const char* name = argv[++i];
                                if ( name == NULL )
                                        throw "-init missing argument";
                                fInitFunctionName = name;
                        }
                        else if ( strcmp(arg, "-dot") == 0 ) {
                                const char* name = argv[++i];
                                if ( name == NULL )
                                        throw "-dot missing argument";
                                fDotOutputFile = name;
                        }
                        else if ( strcmp(arg, "-warn_commons") == 0 ) {
                                fWarnCommons = true;
                        }
                        else if ( strcmp(arg, "-commons") == 0 ) {
                                fCommonsMode = parseCommonsTreatment(argv[++i]);
                        }
                        else if ( strcmp(arg, "-keep_relocs") == 0 ) {
                                fKeepRelocations = true;
                        }
                        else if ( strcmp(arg, "-warn_stabs") == 0 ) {
                                fWarnStabs = true;
                        }
                        else if ( strcmp(arg, "-pause") == 0 ) {
                                fPause = true;
                        }
                        else if ( strcmp(arg, "-print_statistics") == 0 ) {
                                fStatistics = true;
                        }
                        else if ( strcmp(arg, "-d") == 0 ) {
                                fReaderOptions.fMakeTentativeDefinitionsReal = true;
                        }
                        else if ( strcmp(arg, "-v") == 0 ) {
                                // previously handled by buildSearchPaths()
                        }
                        else if ( strcmp(arg, "-Z") == 0 ) {
                                // previously handled by buildSearchPaths()
                        }
                        else if ( strcmp(arg, "-syslibroot") == 0 ) {
                                ++i;
                                // previously handled by buildSearchPaths()
                        }
                        else if ( strcmp(arg, "-no_uuid") == 0 ) {
                                fUUIDMode = kUUIDNone;
                        }
                        else if ( strcmp(arg, "-random_uuid") == 0 ) {
                                fUUIDMode = kUUIDRandom;
                        }
                        else if ( strcmp(arg, "-dtrace") == 0 ) {
                                const char* name = argv[++i];
                                if ( name == NULL )
                                        throw "-dtrace missing argument";
                                fDtraceScriptName = name;
                        }
                        else if ( strcmp(arg, "-root_safe") == 0 ) {
                                fReaderOptions.fRootSafe = true;
                        }
                        else if ( strcmp(arg, "-setuid_safe") == 0 ) {
                                fReaderOptions.fSetuidSafe = true;
                        }
                        else if ( strcmp(arg, "-alias") == 0 ) {
                                ObjectFile::ReaderOptions::AliasPair pair;
                                pair.realName = argv[++i];
                                if ( pair.realName == NULL )
                                        throw "missing argument to -alias";
                                pair.alias = argv[++i];
                                if ( pair.alias == NULL )
                                        throw "missing argument to -alias";
                                fReaderOptions.fAliases.push_back(pair);
                        }
                        else if ( strcmp(arg, "-alias_list") == 0 ) {
                                parseAliasFile(argv[++i]);
                        }
                        // put this last so that it does not interfer with other options starting with 'i'
                        else if ( strncmp(arg, "-i", 2) == 0 ) {
                                const char* colon = strchr(arg, ':');
                                if ( colon == NULL )
                                        throwf("unknown option: %s", arg);
                                ObjectFile::ReaderOptions::AliasPair pair;
                                char* temp = new char[colon-arg];
                                strlcpy(temp, &arg[2], colon-arg-1);
                                pair.realName = &colon[1];
                                pair.alias = temp;
                                fReaderOptions.fAliases.push_back(pair);
                        }
                        else if ( strcmp(arg, "-save-temps") == 0 ) {
                                fSaveTempFiles = true;
                        }
                        else if ( strcmp(arg, "-rpath") == 0 ) {
                                const char* path = argv[++i];
                                if ( path == NULL )
                                        throw "missing argument to -rpath";
                                fRPaths.push_back(path);
                        }
                        else if ( strcmp(arg, "-read_only_stubs") == 0 ) {
                                fReadOnlyx86Stubs = true;
                        }
                        else if ( strcmp(arg, "-map") == 0 ) {
                                fMapPath = argv[++i];
                                if ( fMapPath == NULL )
                                        throw "missing argument to -map";
                        }
                        else if ( strcmp(arg, "-pie") == 0 ) {
                                fPositionIndependentExecutable = true;
                        }
                        else if ( strncmp(arg, "-reexport-l", 11) == 0 ) {
                                FileInfo info = findLibrary(&arg[11]);
                                info.options.fReExport = true;
                                addLibrary(info);
                        }
                        else if ( strcmp(arg, "-reexport_library") == 0 ) {
                                FileInfo info = findFile(argv[++i]);
                                info.options.fReExport = true;
                                addLibrary(info);
                        }
                        else if ( strcmp(arg, "-reexport_framework") == 0 ) {
                                FileInfo info = findFramework(argv[++i]);
                                info.options.fReExport = true;
                                addLibrary(info);
                        }
                        else if ( strcmp(arg, "-dead_strip_dylibs") == 0 ) {
                                fDeadStripDylibs = true;
                        }
                        else if ( strcmp(arg, "-new_linker") == 0 ) {
                                // ignore
                        }
                        else {
                                throwf("unknown option: %s", arg);
                        }
                }
                else {
                        FileInfo info = findFile(arg);
                        if ( strcmp(&info.path[strlen(info.path)-2], ".a") == 0 )
                                addLibrary(info);
                        else
                                fInputFiles.push_back(info);
                }
        }
}



//
// -syslibroot <path> is used for SDK support.
// The rule is that all search paths (both explicit and default) are
// checked to see if they exist in the SDK.  If so, that path is
// replaced with the sdk prefixed path.  If not, that search path
// is used as is.  If multiple -syslibroot options are specified
// their directory structures are logically overlayed and files
// from sdks specified earlier on the command line used before later ones.

void Options::buildSearchPaths(int argc, const char* argv[])
{
        bool addStandardLibraryDirectories = true;
        std::vector<const char*> libraryPaths;
        std::vector<const char*> frameworkPaths;
        libraryPaths.reserve(10);
        frameworkPaths.reserve(10);
        // scan through argv looking for -L, -F, -Z, and -syslibroot options
        for(int i=0; i < argc; ++i) {
                if ( (argv[i][0] == '-') && (argv[i][1] == 'L') )
                        libraryPaths.push_back(&argv[i][2]);
                else if ( (argv[i][0] == '-') && (argv[i][1] == 'F') )
                        frameworkPaths.push_back(&argv[i][2]);
                else if ( strcmp(argv[i], "-Z") == 0 )
                        addStandardLibraryDirectories = false;
                else if ( strcmp(argv[i], "-v") == 0 ) {
                        fVerbose = true;
                        extern const char ldVersionString[];
                        fprintf(stderr, "%s", ldVersionString);
                         // if only -v specified, exit cleanly
                         if ( argc == 2 )
                                exit(0);
                }
                else if ( strcmp(argv[i], "-syslibroot") == 0 ) {
                        const char* path = argv[++i];
                        if ( path == NULL )
                                throw "-syslibroot missing argument";
                        fSDKPaths.push_back(path);
                }
                else if ( strcmp(argv[i], "-search_paths_first") == 0 ) {
                        // ??? Deprecate when we get -Bstatic/-Bdynamic.
                        fLibrarySearchMode = kSearchDylibAndArchiveInEachDir;
                }
                else if ( strcmp(argv[i], "-w") == 0 ) {
                        fSuppressWarnings = true;
                }
        }
        if ( addStandardLibraryDirectories ) {
                libraryPaths.push_back("/usr/lib");
                libraryPaths.push_back("/usr/local/lib");

                frameworkPaths.push_back("/Library/Frameworks/");
                frameworkPaths.push_back("/System/Library/Frameworks/");
                frameworkPaths.push_back("/Network/Library/Frameworks/");
        }

        // now merge sdk and library paths to make real search paths
        fLibrarySearchPaths.reserve(libraryPaths.size()*(fSDKPaths.size()+1));
        for (std::vector<const char*>::iterator it = libraryPaths.begin(); it != libraryPaths.end(); it++) {
                const char* libDir = *it;
                bool sdkOverride = false;
                if ( libDir[0] == '/' ) {
                        char betterLibDir[PATH_MAX];
                        if ( strstr(libDir, "/..") != NULL ) {
                                if ( realpath(libDir, betterLibDir) != NULL )
                                        libDir = strdup(betterLibDir);
                        }
                        const int libDirLen = strlen(libDir);
                        for (std::vector<const char*>::iterator sdkit = fSDKPaths.begin(); sdkit != fSDKPaths.end(); sdkit++) {
                                // ??? Should be using string here.
                                const char* sdkDir = *sdkit;
                                const int sdkDirLen = strlen(sdkDir);
                                char newPath[libDirLen + sdkDirLen+4];
                                strcpy(newPath, sdkDir);
                                if ( newPath[sdkDirLen-1] == '/' )
                                        newPath[sdkDirLen-1] = '\0';
                                strcat(newPath, libDir);
                                struct stat statBuffer;
                                if ( stat(newPath, &statBuffer) == 0 ) {
                                        fLibrarySearchPaths.push_back(strdup(newPath));
                                        sdkOverride = true;
                                }
                        }
                }
                if ( !sdkOverride )
                        fLibrarySearchPaths.push_back(libDir);
        }

        // now merge sdk and framework paths to make real search paths
        fFrameworkSearchPaths.reserve(frameworkPaths.size()*(fSDKPaths.size()+1));
        for (std::vector<const char*>::iterator it = frameworkPaths.begin(); it != frameworkPaths.end(); it++) {
                const char* frameworkDir = *it;
                bool sdkOverride = false;
                if ( frameworkDir[0] == '/' ) {
                        char betterFrameworkDir[PATH_MAX];
                        if ( strstr(frameworkDir, "/..") != NULL ) {
                                if ( realpath(frameworkDir, betterFrameworkDir) != NULL )
                                        frameworkDir = strdup(betterFrameworkDir);
                        }
                        const int frameworkDirLen = strlen(frameworkDir);
                        for (std::vector<const char*>::iterator sdkit = fSDKPaths.begin(); sdkit != fSDKPaths.end(); sdkit++) {
                                // ??? Should be using string here
                                const char* sdkDir = *sdkit;
                                const int sdkDirLen = strlen(sdkDir);
                                char newPath[frameworkDirLen + sdkDirLen+4];
                                strcpy(newPath, sdkDir);
                                if ( newPath[sdkDirLen-1] == '/' )
                                        newPath[sdkDirLen-1] = '\0';
                                strcat(newPath, frameworkDir);
                                struct stat statBuffer;
                                if ( stat(newPath, &statBuffer) == 0 ) {
                                        fFrameworkSearchPaths.push_back(strdup(newPath));
                                        sdkOverride = true;
                                }
                        }
                }
                if ( !sdkOverride )
                        fFrameworkSearchPaths.push_back(frameworkDir);
        }

        if ( fVerbose ) {
                fprintf(stderr,"Library search paths:\n");
                for (std::vector<const char*>::iterator it = fLibrarySearchPaths.begin();
                         it != fLibrarySearchPaths.end();
                         it++)
                        fprintf(stderr,"\t%s\n", *it);
                fprintf(stderr,"Framework search paths:\n");
                for (std::vector<const char*>::iterator it = fFrameworkSearchPaths.begin();
                         it != fFrameworkSearchPaths.end();
                         it++)
                        fprintf(stderr,"\t%s\n", *it);
        }
}

// this is run before the command line is parsed
void Options::parsePreCommandLineEnvironmentSettings()
{
        if ((getenv("LD_TRACE_ARCHIVES") != NULL)
                || (getenv("RC_TRACE_ARCHIVES") != NULL))
            fReaderOptions.fTraceArchives = true;

        if ((getenv("LD_TRACE_DYLIBS") != NULL)
                || (getenv("RC_TRACE_DYLIBS") != NULL)) {
            fReaderOptions.fTraceDylibs = true;
                fReaderOptions.fTraceIndirectDylibs = true;
        }

        if (getenv("RC_TRACE_DYLIB_SEARCHING") != NULL) {
            fTraceDylibSearching = true;
        }

        if (getenv("LD_PRINT_OPTIONS") != NULL)
                fPrintOptions = true;

        if (fReaderOptions.fTraceDylibs || fReaderOptions.fTraceArchives)
                fReaderOptions.fTraceOutputFile = getenv("LD_TRACE_FILE");

        if (getenv("LD_PRINT_ORDER_FILE_STATISTICS") != NULL)
                fPrintOrderFileStatistics = true;
}

// this is run after the command line is parsed
void Options::parsePostCommandLineEnvironmentSettings()
{
        // when building a dynamic main executable, default any use of @executable_path to output path
        if ( fExecutablePath == NULL && (fOutputKind == kDynamicExecutable) ) {
                fExecutablePath = fOutputFile;
        }

        // allow build system to set default seg_addr_table
        if ( fSegAddrTablePath == NULL )
                fSegAddrTablePath = getenv("LD_SEG_ADDR_TABLE");

        // allow build system to turn on prebinding
        if ( !fPrebind ) {
                fPrebind = ( getenv("LD_PREBIND") != NULL );
        }
}

void Options::reconfigureDefaults()
{
        // sync reader options
        switch ( fOutputKind ) {
                case Options::kObjectFile:
                        fReaderOptions.fForFinalLinkedImage = false;
                        break;
                case Options::kDyld:
                        fReaderOptions.fForDyld = true;
                        fReaderOptions.fForFinalLinkedImage = true;
                        break;
                case Options::kDynamicLibrary:
                case Options::kDynamicBundle:
                        fReaderOptions.fForFinalLinkedImage = true;
                        break;
                case Options::kDynamicExecutable:
                case Options::kStaticExecutable:
                        fReaderOptions.fLinkingMainExecutable = true;
                        fReaderOptions.fForFinalLinkedImage = true;
                        break;
        }

        // set default min OS version
        if ( fReaderOptions.fVersionMin == ObjectFile::ReaderOptions::kMinUnset ) {
                // if -macosx_version_min not used, try environment variable
                const char* envVers = getenv("MACOSX_DEPLOYMENT_TARGET");
                if ( envVers != NULL ) 
                        setVersionMin(envVers);
                // if -macosx_version_min and environment variable not used assume current OS version
                if ( fReaderOptions.fVersionMin == ObjectFile::ReaderOptions::kMinUnset )
                        fReaderOptions.fVersionMin = ObjectFile::ReaderOptions::k10_5; // FIX FIX, this really should be a check of the OS version the linker is running on
        }

        // adjust min based on architecture
        switch ( fArchitecture ) {
                case CPU_TYPE_I386:
                        if ( fReaderOptions.fVersionMin < ObjectFile::ReaderOptions::k10_4 ) {
                                //fprintf(stderr, "ld64 warning: -macosx_version_min should be 10.4 or later for i386\n");
                                fReaderOptions.fVersionMin = ObjectFile::ReaderOptions::k10_4;
                        }
                        break;
                case CPU_TYPE_POWERPC64:
                        if ( fReaderOptions.fVersionMin < ObjectFile::ReaderOptions::k10_4 ) {
                                //fprintf(stderr, "ld64 warning: -macosx_version_min should be 10.4 or later for ppc64\n");
                                fReaderOptions.fVersionMin = ObjectFile::ReaderOptions::k10_4;
                        }
                        break;
                case CPU_TYPE_X86_64:
                        if ( fReaderOptions.fVersionMin < ObjectFile::ReaderOptions::k10_4 ) {
                                //fprintf(stderr, "ld64 warning: -macosx_version_min should be 10.4 or later for x86_64\n");
                                fReaderOptions.fVersionMin = ObjectFile::ReaderOptions::k10_4;
                        }
                        break;
        }

        // determine if info for shared region should be added
        if ( fOutputKind == Options::kDynamicLibrary ) {
                if ( fReaderOptions.fVersionMin >= ObjectFile::ReaderOptions::k10_5 )
                        fSharedRegionEligible = true;
        }

        // allow build system to force linker to ignore seg_addr_table
        if ( getenv("LD_FORCE_NO_SEG_ADDR_TABLE") != NULL )
                   fSegAddrTablePath = NULL;

        // check for base address specified externally
        if ( (fSegAddrTablePath != NULL) &&  (fOutputKind == Options::kDynamicLibrary) ) 
                parseSegAddrTable(fSegAddrTablePath, this->installPath());
        

        // split segs only allowed for dylibs
        if ( fSplitSegs ) {
                if ( fOutputKind != Options::kDynamicLibrary )
                        fSplitSegs = false;
                // split seg only supported for ppc and i386
                switch ( fArchitecture ) {
                        case CPU_TYPE_POWERPC:
                        case CPU_TYPE_I386:
                                break;
                        default:
                                fSplitSegs = false;
                                fBaseAddress = 0;
                                fBaseWritableAddress = 0;
                }
        }

        // disable prebinding depending on arch and min OS version
        if ( fPrebind ) {
                switch ( fArchitecture ) {
                        case CPU_TYPE_POWERPC:
                        case CPU_TYPE_I386:
                                if ( fReaderOptions.fVersionMin >= ObjectFile::ReaderOptions::k10_4 ) {
                                        // only split seg dylibs are prebound
                                        if ( (fOutputKind != Options::kDynamicLibrary) || ! fSplitSegs )
                                                fPrebind = false;
                                }
                                break;
                        case CPU_TYPE_POWERPC64:
                        case CPU_TYPE_X86_64:
                                fPrebind = false;
                                break;
                }
        }


        // figure out if module table is needed for compatibility with old ld/dyld
        if ( fOutputKind == Options::kDynamicLibrary ) {
                switch ( fArchitecture ) {
                        case CPU_TYPE_POWERPC:  // 10.3 and earlier dyld requires a module table
                        case CPU_TYPE_I386:             // ld_classic for 10.4.x requires a module table
                                if ( fReaderOptions.fVersionMin <= ObjectFile::ReaderOptions::k10_5 )
                                        fNeedsModuleTable = true;
                }
        }
        
        
}

void Options::checkIllegalOptionCombinations()
{
        // check -undefined setting
        switch ( fUndefinedTreatment ) {
                case kUndefinedError:
                case kUndefinedDynamicLookup:
                        // always legal
                        break;
                case kUndefinedWarning:
                case kUndefinedSuppress:
                        // requires flat namespace
                        if ( fNameSpace == kTwoLevelNameSpace )
                                throw "can't use -undefined warning or suppress with -twolevel_namespace";
                        break;
        }

        // unify -sub_umbrella with dylibs
        for (std::vector<const char*>::iterator it = fSubUmbellas.begin(); it != fSubUmbellas.end(); it++) {
                const char* subUmbrella = *it;
                bool found = false;
                for (std::vector<Options::FileInfo>::iterator fit = fInputFiles.begin(); fit != fInputFiles.end(); fit++) {
                        Options::FileInfo& info = *fit;
                        const char* lastSlash = strrchr(info.path, '/');
                        if ( lastSlash == NULL )
                                lastSlash = info.path - 1;
                        if ( strcmp(&lastSlash[1], subUmbrella) == 0 ) {
                                info.options.fReExport = true;
                                found = true;
                                break;
                        }
                }
                if ( ! found && emitWarnings() )
                        fprintf(stderr, "ld64 warning: -sub_umbrella %s does not match a supplied dylib\n", subUmbrella);
        }

        // unify -sub_library with dylibs
        for (std::vector<const char*>::iterator it = fSubLibraries.begin(); it != fSubLibraries.end(); it++) {
                const char* subLibrary = *it;
                bool found = false;
                for (std::vector<Options::FileInfo>::iterator fit = fInputFiles.begin(); fit != fInputFiles.end(); fit++) {
                        Options::FileInfo& info = *fit;
                        const char* lastSlash = strrchr(info.path, '/');
                        if ( lastSlash == NULL )
                                lastSlash = info.path - 1;
                        const char* dot = strchr(&lastSlash[1], '.');
                        if ( dot == NULL )
                                dot = &lastSlash[strlen(lastSlash)];
                        if ( strncmp(&lastSlash[1], subLibrary, dot-lastSlash-1) == 0 ) {
                                info.options.fReExport = true;
                                found = true;
                                break;
                        }
                }
                if ( ! found && emitWarnings() )
                        fprintf(stderr, "ld64 warning: -sub_library %s does not match a supplied dylib\n", subLibrary);
        }

        // sync reader options
        if ( fNameSpace != kTwoLevelNameSpace )
                fReaderOptions.fFlatNamespace = true;

        // check -stack_addr
        if ( fStackAddr != 0 ) {
                switch (fArchitecture) {
                        case CPU_TYPE_I386:
                        case CPU_TYPE_POWERPC:
                                if ( fStackAddr > 0xFFFFFFFF )
                                        throw "-stack_addr must be < 4G for 32-bit processes";
                                break;
                        case CPU_TYPE_POWERPC64:
                        case CPU_TYPE_X86_64:
                                break;
                }
                if ( (fStackAddr & -4096) != fStackAddr )
                        throw "-stack_addr must be multiples of 4K";
                if ( fStackSize  == 0 )
                        throw "-stack_addr must be used with -stack_size";
        }

        // check -stack_size
        if ( fStackSize != 0 ) {
                switch (fArchitecture) {
                        case CPU_TYPE_I386:
                        case CPU_TYPE_POWERPC:
                                if ( fStackSize > 0xFFFFFFFF )
                                        throw "-stack_size must be < 4G for 32-bit processes";
                                if ( fStackAddr == 0 ) {
                                        fStackAddr = 0xC0000000;
                                }
                                if ( (fStackAddr > 0xB0000000) && ((fStackAddr-fStackSize) < 0xB0000000) && emitWarnings() )
                                        fprintf(stderr, "ld64 warning: custom stack placement overlaps and will disable shared region\n");
                                break;
                        case CPU_TYPE_POWERPC64:
                        case CPU_TYPE_X86_64:
                                if ( fStackAddr == 0 ) {
                                        fStackAddr = 0x00007FFF5C000000LL;
                                }
                                break;
                }
                if ( (fStackSize & -4096) != fStackSize )
                        throw "-stack_size must be multiples of 4K";
                switch ( fOutputKind ) {
                        case Options::kDynamicExecutable:
                        case Options::kStaticExecutable:
                                // custom stack size only legal when building main executable
                                break;
                        case Options::kDynamicLibrary:
                        case Options::kDynamicBundle:
                        case Options::kObjectFile:
                        case Options::kDyld:
                                throw "-stack_size option can only be used when linking a main executable";
                }
        }

        // check that -allow_stack_execute is only used with main executables
        if ( fExecutableStack ) {
                switch ( fOutputKind ) {
                        case Options::kDynamicExecutable:
                        case Options::kStaticExecutable:
                                // -allow_stack_execute size only legal when building main executable
                                break;
                        case Options::kDynamicLibrary:
                        case Options::kDynamicBundle:
                        case Options::kObjectFile:
                        case Options::kDyld:
                                throw "-allow_stack_execute option can only be used when linking a main executable";
                }
        }

        // check -client_name is only used when making a bundle or main executable
        if ( fClientName != NULL ) {
                switch ( fOutputKind ) {
                        case Options::kDynamicExecutable:
                        case Options::kDynamicBundle:
                                break;
                        case Options::kStaticExecutable:
                        case Options::kDynamicLibrary:
                        case Options::kObjectFile:
                        case Options::kDyld:
                                throw "-client_name can only be used with -bundle";
                }
        }
        
        // check -init is only used when building a dylib
        if ( (fInitFunctionName != NULL) && (fOutputKind != Options::kDynamicLibrary) )
                throw "-init can only be used with -dynamiclib";

        // check -bundle_loader only used with -bundle
        if ( (fBundleLoader != NULL) && (fOutputKind != Options::kDynamicBundle) )
                throw "-bundle_loader can only be used with -bundle";

        // check -dtrace not used with -r
        if ( (fDtraceScriptName != NULL) && (fOutputKind == Options::kObjectFile) )
                throw "-dtrace can only be used when creating final linked images";

        // check -d can only be used with -r
        if ( fReaderOptions.fMakeTentativeDefinitionsReal && (fOutputKind != Options::kObjectFile) )
                throw "-d can only be used with -r";

        // check that -root_safe is not used with -r
        if ( fReaderOptions.fRootSafe && (fOutputKind == Options::kObjectFile) )
                throw "-root_safe cannot be used with -r";

        // check that -setuid_safe is not used with -r
        if ( fReaderOptions.fSetuidSafe && (fOutputKind == Options::kObjectFile) )
                throw "-setuid_safe cannot be used with -r";

        // make sure all required exported symbols exist
        std::vector<const char*> impliedExports;
        for (NameSet::iterator it=fExportSymbols.regularBegin(); it != fExportSymbols.regularEnd(); it++) {
                const char* name = *it;
                // never export .eh symbols
                const int len = strlen(name);
                if ( (strcmp(&name[len-3], ".eh") == 0) || (strncmp(name, ".objc_category_name_", 20) == 0) ) 
                        fprintf(stderr, "ld64 warning: ignoring %s in export list\n", name);
                else
                        fInitialUndefines.push_back(name);
                if ( strncmp(name, ".objc_class_name_", 17) == 0 ) {
                        // rdar://problem/4718189 map ObjC class names to new runtime names
                        switch (fArchitecture) {
                                case CPU_TYPE_POWERPC64:
                                case CPU_TYPE_X86_64:
                                        char* temp;
                                        asprintf(&temp, "_OBJC_CLASS_$_%s", &name[17]);
                                        impliedExports.push_back(temp);
                                        asprintf(&temp, "_OBJC_METACLASS_$_%s", &name[17]);
                                        impliedExports.push_back(temp);
                                        break;
                        }
                }
        }
        for (std::vector<const char*>::iterator it=impliedExports.begin(); it != impliedExports.end(); it++) {
                const char* name = *it;
                fExportSymbols.insert(name);
                fInitialUndefines.push_back(name);
        }

        // make sure that -init symbol exist
        if ( fInitFunctionName != NULL )
                fInitialUndefines.push_back(fInitFunctionName);

        // check custom segments
        if ( fCustomSegmentAddresses.size() != 0 ) {
                // verify no segment is in zero page
                if ( fZeroPageSize != ULLONG_MAX ) {
                        for (std::vector<SegmentStart>::iterator it = fCustomSegmentAddresses.begin(); it != fCustomSegmentAddresses.end(); ++it) {
                                if ( (it->address >= 0) && (it->address < fZeroPageSize) )
                                        throwf("-segaddr %s 0x%X conflicts with -pagezero_size", it->name, it->address);
                        }
                }
                // verify no duplicates
                for (std::vector<SegmentStart>::iterator it = fCustomSegmentAddresses.begin(); it != fCustomSegmentAddresses.end(); ++it) {
                        for (std::vector<SegmentStart>::iterator it2 = fCustomSegmentAddresses.begin(); it2 != fCustomSegmentAddresses.end(); ++it2) {
                                if ( (it->address == it2->address) && (it != it2) )
                                        throwf("duplicate -segaddr addresses for %s and %s", it->name, it2->name);
                        }
                        // a custom segment address of zero will disable the use of a zero page
                        if ( it->address == 0 )
                                fZeroPageSize = 0;
                }
        }

        if ( fZeroPageSize == ULLONG_MAX ) {
                // zero page size not specified on command line, set default
                switch (fArchitecture) {
                        case CPU_TYPE_I386:
                        case CPU_TYPE_POWERPC:
                                // first 4KB for 32-bit architectures
                                fZeroPageSize = 0x1000;
                                break;
                        case CPU_TYPE_POWERPC64:
                                // first 4GB for ppc64 on 10.5
                                if ( fReaderOptions.fVersionMin >= ObjectFile::ReaderOptions::k10_5 )
                                        fZeroPageSize = 0x100000000ULL;
                                else
                                        fZeroPageSize = 0x1000; // 10.4 dyld may not be able to handle >4GB zero page
                                break;
                        case CPU_TYPE_X86_64:
                                // first 4GB for x86_64 on all OS's
                                fZeroPageSize = 0x100000000ULL;
                                break;
                        default:
                                // if -arch not used, default to 4K zero-page
                                fZeroPageSize = 0x1000;
                }
        }
        else {
                switch ( fOutputKind ) {
                        case Options::kDynamicExecutable:
                        case Options::kStaticExecutable:
                                // -pagezero_size size only legal when building main executable
                                break;
                        case Options::kDynamicLibrary:
                        case Options::kDynamicBundle:
                        case Options::kObjectFile:
                        case Options::kDyld:
                                if ( fZeroPageSize != 0 )
                                        throw "-pagezero_size option can only be used when linking a main executable";
                }
        }

        // -dead_strip and -r are incompatible
        if ( (fDeadStrip != kDeadStripOff) && (fOutputKind == Options::kObjectFile) )
                throw "-r and -dead_strip cannot be used together\n";

        // can't use -rpath unless targeting 10.5 or later
        if ( fRPaths.size() > 0 ) {
                if ( fReaderOptions.fVersionMin < ObjectFile::ReaderOptions::k10_5 ) 
                        throw "-rpath can only be used when targeting Mac OS X 10.5 or later\n";
                switch ( fOutputKind ) {
                        case Options::kDynamicExecutable:
                        case Options::kDynamicLibrary:
                        case Options::kDynamicBundle:
                                break;
                        case Options::kStaticExecutable:
                        case Options::kObjectFile:
                        case Options::kDyld:
                                throw "-rpath can only be used when creating a dynamic final linked image";
                }
        }
        
        // check -pie is only used when building a dynamic main executable for 10.5
        if ( fPositionIndependentExecutable ) {
                if ( fOutputKind != Options::kDynamicExecutable )
                        throw "-pie can only be used when linking a main executable";
                if ( fReaderOptions.fVersionMin < ObjectFile::ReaderOptions::k10_5 ) 
                        throw "-pie can only be used when targeting Mac OS X 10.5 or later";
        }
}



void Options::checkForClassic(int argc, const char* argv[])
{
        // scan options
        bool archFound = false;
        bool staticFound = false;
        bool dtraceFound = false;
        bool rFound = false;
        bool creatingMachKernel = false;
        bool newLinker = false;

        for(int i=0; i < argc; ++i) {
                const char* arg = argv[i];
                if ( arg[0] == '-' ) {
                        if ( strcmp(arg, "-arch") == 0 ) {
                                parseArch(argv[++i]);
                                archFound = true;
                        }
                        else if ( strcmp(arg, "-static") == 0 ) {
                                staticFound = true;
                        }
                        else if ( strcmp(arg, "-dtrace") == 0 ) {
                                dtraceFound = true;
                        }
                        else if ( strcmp(arg, "-r") == 0 ) {
                                rFound = true;
                        }
                        else if ( strcmp(arg, "-new_linker") == 0 ) {
                                newLinker = true;
                        }
                        else if ( strcmp(arg, "-classic_linker") == 0 ) {
                                // ld_classic does not understand this option, so remove it
                                for(int j=i; j < argc; ++j)
                                        argv[j] = argv[j+1];
                                this->gotoClassicLinker(argc-1, argv);
                        }
                        else if ( strcmp(arg, "-o") == 0 ) {
                                const char* outfile = argv[++i];
                                if ( (outfile != NULL) && (strstr(outfile, "/mach_kernel") != NULL) )
                                        creatingMachKernel = true;
                        }
                }
        }
        
        // -dtrace only supported by new linker
        if( dtraceFound )
                return;

        if( archFound ) {
                switch ( fArchitecture ) {
                case CPU_TYPE_POWERPC:
                case CPU_TYPE_I386:
//                      if ( staticFound && (rFound || !creatingMachKernel) ) {
                        if ( staticFound && !newLinker ) {
                                // this environment variable will disable use of ld_classic for -static links
                                if ( getenv("LD_NO_CLASSIC_LINKER_STATIC") == NULL )
                                        this->gotoClassicLinker(argc, argv);
                        }
                        break;
                }
        }
        else {
                // work around for VSPTool
                if ( staticFound )
                        this->gotoClassicLinker(argc, argv);
        }

}

void Options::gotoClassicLinker(int argc, const char* argv[])
{
        argv[0] = "ld_classic";
        execvp(argv[0], (char**)argv);
        fprintf(stderr, "can't exec ld_classic\n");
        exit(1);
}