Loading...
dyld3/PathOverrides.cpp /dev/null dyld-852
--- /dev/null
+++ dyld/dyld-852/dyld3/PathOverrides.cpp
@@ -0,0 +1,588 @@
+/*
+ * Copyright (c) 2017 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 <stdint.h>
+#include <string.h>
+#include <assert.h>
+#include <uuid/uuid.h>
+#include <mach/mach.h>
+#include <sys/stat.h> 
+#include <fcntl.h>
+#include <limits.h>
+#include <sys/errno.h>
+#include <unistd.h>
+#include <TargetConditionals.h>
+
+#include <initializer_list>
+
+#include "PathOverrides.h"
+
+
+namespace dyld3 {
+namespace closure {
+
+#if BUILDING_LIBDYLD
+PathOverrides   gPathOverrides;
+#endif
+
+
+// based on ANSI-C strstr()
+static const char* strrstr(const char* str, const char* sub) 
+{
+    const size_t sublen = strlen(sub);
+    for(const char* p = &str[strlen(str)]; p != str; --p) {
+        if ( strncmp(p, sub, sublen) == 0 )
+            return p;
+    }
+    return NULL;
+}
+
+    
+void PathOverrides::setFallbackPathHandling(FallbackPathMode mode)
+{
+    _fallbackPathMode = mode;
+}
+
+void PathOverrides::setEnvVars(const char* envp[], const MachOFile* mainExe, const char* mainExePath)
+{
+    for (const char** p = envp; *p != NULL; p++) {
+        addEnvVar(*p, false);
+    }
+    if ( mainExe != nullptr )
+        setMainExecutable(mainExe, mainExePath);
+}
+
+void PathOverrides::setMainExecutable(const dyld3::MachOFile* mainExe, const char* mainExePath)
+{
+    assert(mainExe != nullptr);
+    assert(mainExe->isMainExecutable());
+    // process any LC_DYLD_ENVIRONMENT load commands in main executable
+	mainExe->forDyldEnv(^(const char* envVar, bool& stop) {
+        addEnvVar(envVar, true);
+	});
+}
+
+
+#if !BUILDING_LIBDYLD
+// libdyld is never unloaded
+PathOverrides::~PathOverrides()
+{
+}
+#endif
+
+void PathOverrides::forEachInsertedDylib(void (^handler)(const char* dylibPath, bool &stop)) const
+{
+    if ( _insertedDylibs != nullptr && _insertedDylibs[0] != '\0' ) {
+        forEachInColonList(_insertedDylibs, nullptr, ^(const char* path, bool &stop) {
+            handler(path, stop);
+        });
+    }
+}
+
+void PathOverrides::handleEnvVar(const char* key, const char* value, void (^handler)(const char* envVar)) const
+{
+    if ( value == nullptr )
+        return;
+    size_t allocSize = strlen(key) + strlen(value) + 2;
+    char buffer[allocSize];
+    strlcpy(buffer, key, allocSize);
+    strlcat(buffer, "=", allocSize);
+    strlcat(buffer, value, allocSize);
+    handler(buffer);
+}
+
+// Note, this method only returns variables set on the environment, not those from the load command
+void PathOverrides::forEachEnvVar(void (^handler)(const char* envVar)) const
+{
+    handleEnvVar("DYLD_LIBRARY_PATH",            _dylibPathOverridesEnv,        handler);
+    handleEnvVar("DYLD_FRAMEWORK_PATH",          _frameworkPathOverridesEnv,    handler);
+    handleEnvVar("DYLD_FALLBACK_FRAMEWORK_PATH", _frameworkPathFallbacksEnv,    handler);
+    handleEnvVar("DYLD_FALLBACK_LIBRARY_PATH",   _dylibPathFallbacksEnv,        handler);
+    handleEnvVar("DYLD_INSERT_LIBRARIES",        _insertedDylibs,               handler);
+    handleEnvVar("DYLD_IMAGE_SUFFIX",            _imageSuffix,                  handler);
+    handleEnvVar("DYLD_ROOT_PATH",               _rootPath,                     handler);
+}
+
+// Note, this method only returns variables set on the executable load command, not those from the environment
+void PathOverrides::forEachExecutableEnvVar(void (^handler)(const char* envVar)) const
+{
+    handleEnvVar("DYLD_LIBRARY_PATH",            _dylibPathOverridesExeLC,        handler);
+    handleEnvVar("DYLD_FRAMEWORK_PATH",          _frameworkPathOverridesExeLC,    handler);
+    handleEnvVar("DYLD_FALLBACK_FRAMEWORK_PATH", _frameworkPathFallbacksExeLC,    handler);
+    handleEnvVar("DYLD_FALLBACK_LIBRARY_PATH",   _dylibPathFallbacksExeLC,        handler);
+}
+
+const char* PathOverrides::addString(const char* str)
+{
+    if ( _pathPool == nullptr )
+        _pathPool = PathPool::allocate();
+    return _pathPool->add(str);
+}
+
+void PathOverrides::setString(const char*& var, const char* value)
+{
+    if ( var == nullptr ) {
+        var = addString(value);
+        return;
+    }
+    // string already in use, build new appended string
+    char tmp[strlen(var)+strlen(value)+2];
+    strcpy(tmp, var);
+    strcat(tmp, ":");
+    strcat(tmp, value);
+    var = addString(tmp);
+}
+
+void PathOverrides::addEnvVar(const char* keyEqualsValue, bool forExecutable)
+{
+    // We have to make a copy of the env vars because the dyld
+    // semantics is that the env vars are only looked at once
+    // at launch (using setenv() at runtime does not change dyld behavior).
+    const char* equals = strchr(keyEqualsValue, '=');
+    if ( equals != NULL ) {
+        if ( strncmp(keyEqualsValue, "DYLD_LIBRARY_PATH", 17) == 0 ) {
+            setString(forExecutable ? _dylibPathOverridesExeLC : _dylibPathOverridesEnv, &keyEqualsValue[18]);
+        }
+        else if ( strncmp(keyEqualsValue, "DYLD_FRAMEWORK_PATH", 19) == 0 ) {
+            setString(forExecutable ? _frameworkPathOverridesExeLC : _frameworkPathOverridesEnv, &keyEqualsValue[20]);
+        }
+        else if ( strncmp(keyEqualsValue, "DYLD_FALLBACK_FRAMEWORK_PATH", 28) == 0 ) {
+            setString(forExecutable ? _frameworkPathFallbacksExeLC : _frameworkPathFallbacksEnv, &keyEqualsValue[29]);
+        }
+        else if ( strncmp(keyEqualsValue, "DYLD_FALLBACK_LIBRARY_PATH", 26) == 0 ) {
+            setString(forExecutable ? _dylibPathFallbacksExeLC : _dylibPathFallbacksEnv, &keyEqualsValue[27]);
+        }
+        else if ( strncmp(keyEqualsValue, "DYLD_INSERT_LIBRARIES", 21) == 0 ) {
+            setString(_insertedDylibs, &keyEqualsValue[22]);
+        }
+        else if ( strncmp(keyEqualsValue, "DYLD_IMAGE_SUFFIX", 17) == 0 ) {
+            setString(_imageSuffix, &keyEqualsValue[18]);
+        }
+        else if ( strncmp(keyEqualsValue, "DYLD_ROOT_PATH", 14) == 0 ) {
+            setString(_rootPath, &keyEqualsValue[15]);
+        }
+    }
+}
+
+void PathOverrides::forEachInColonList(const char* list1, const char* list2, void (^handler)(const char* path, bool& stop))
+{
+    for (const char* list : { list1, list2 }) {
+        if (list == nullptr)
+            continue;
+        char buffer[strlen(list)+1];
+        const char* t = list;
+        bool stop = false;
+        for (const char* s=list; *s != '\0'; ++s) {
+            if (*s != ':')
+                continue;
+            size_t len = s - t;
+            memcpy(buffer, t, len);
+            buffer[len] = '\0';
+            handler(buffer, stop);
+            if ( stop )
+                return;
+            t = s+1;
+        }
+        handler(t, stop);
+        if (stop)
+            return;
+    }
+}
+
+void PathOverrides::forEachDylibFallback(Platform platform, void (^handler)(const char* fallbackDir, bool& stop)) const
+{
+    __block bool stop = false;
+    if ( (_dylibPathFallbacksEnv != nullptr) || (_dylibPathFallbacksExeLC != nullptr) ) {
+        forEachInColonList(_dylibPathFallbacksEnv, _dylibPathFallbacksExeLC, ^(const char* pth, bool& innerStop) {
+            handler(pth, innerStop);
+            if ( innerStop )
+                stop = true;
+        });
+    }
+    else {
+        switch ( platform ) {
+            case Platform::macOS:
+                switch ( _fallbackPathMode ) {
+                    case FallbackPathMode::classic:
+                        // "$HOME/lib"
+                        handler("/usr/local/lib", stop);
+                        if ( stop )
+                            break;
+                        [[clang::fallthrough]];
+                    case FallbackPathMode::restricted:
+                        handler("/usr/lib", stop);
+                        break;
+                    case FallbackPathMode::none:
+                        break;
+                }
+                break;
+            case Platform::iOS:
+            case Platform::watchOS:
+            case Platform::tvOS:
+            case Platform::bridgeOS:
+            case Platform::driverKit:
+            case Platform::unknown:
+                if ( _fallbackPathMode != FallbackPathMode::none ) {
+                    handler("/usr/local/lib", stop);
+                    if ( stop )
+                        break;
+                }
+                // fall into /usr/lib case
+                [[clang::fallthrough]];
+            case Platform::iOSMac:
+            case Platform::iOS_simulator:
+            case Platform::watchOS_simulator:
+            case Platform::tvOS_simulator:
+                if ( _fallbackPathMode != FallbackPathMode::none )
+                    handler("/usr/lib", stop);
+                break;
+        }
+    }
+}
+
+void PathOverrides::forEachFrameworkFallback(Platform platform, void (^handler)(const char* fallbackDir, bool& stop)) const
+{
+    __block bool stop = false;
+    if ( (_frameworkPathFallbacksEnv != nullptr) || (_frameworkPathFallbacksExeLC != nullptr) ) {
+        forEachInColonList(_frameworkPathFallbacksEnv, _frameworkPathFallbacksExeLC, ^(const char* pth, bool& innerStop) {
+            handler(pth, innerStop);
+            if ( innerStop )
+                stop = true;
+        });
+    }
+    else {
+        switch ( platform ) {
+            case Platform::macOS:
+                switch ( _fallbackPathMode ) {
+                    case FallbackPathMode::classic:
+                        // "$HOME/Library/Frameworks"
+                        handler("/Library/Frameworks", stop);
+                        if ( stop )
+                            break;
+                        // "/Network/Library/Frameworks"
+                        // fall thru
+                        [[clang::fallthrough]];
+                    case FallbackPathMode::restricted:
+                        handler("/System/Library/Frameworks", stop);
+                        break;
+                    case FallbackPathMode::none:
+                        break;
+                }
+                break;
+            case Platform::iOS:
+            case Platform::watchOS:
+            case Platform::tvOS:
+            case Platform::bridgeOS:
+            case Platform::iOSMac:
+            case Platform::iOS_simulator:
+            case Platform::watchOS_simulator:
+            case Platform::tvOS_simulator:
+            case Platform::driverKit:
+            case Platform::unknown:
+                if ( _fallbackPathMode != FallbackPathMode::none )
+                    handler("/System/Library/Frameworks", stop);
+                break;
+        }
+    }
+}
+
+
+//
+// copy path and add suffix to result
+//
+//  /path/foo.dylib      _debug   =>   /path/foo_debug.dylib
+//  foo.dylib            _debug   =>   foo_debug.dylib
+//  foo                  _debug   =>   foo_debug
+//  /path/bar            _debug   =>   /path/bar_debug
+//  /path/bar.A.dylib    _debug   =>   /path/bar.A_debug.dylib
+//
+void PathOverrides::addSuffix(const char* path, const char* suffix, char* result) const
+{
+    strcpy(result, path);
+
+    // find last slash
+    char* start = strrchr(result, '/');
+    if ( start != NULL )
+        start++;
+    else
+        start = result;
+
+    // find last dot after last slash
+    char* dot = strrchr(start, '.');
+    if ( dot != NULL ) {
+        strcpy(dot, suffix);
+        strcat(&dot[strlen(suffix)], &path[dot-result]);
+    }
+    else {
+        strcat(result, suffix);
+    }
+}
+
+void PathOverrides::forEachImageSuffix(const char* path, bool isFallbackPath, bool pathIsInDyldCacheWhichCannotBeOverridden, bool& stop, void (^handler)(const char* possiblePath, bool isFallbackPath, bool& stop)) const
+{
+    if ( (_imageSuffix == nullptr) || pathIsInDyldCacheWhichCannotBeOverridden ) {
+        handler(path, isFallbackPath, stop);
+    }
+    else {
+        forEachInColonList(_imageSuffix, nullptr, ^(const char* suffix, bool& innerStop) {
+            char npath[strlen(path)+strlen(suffix)+8];
+            addSuffix(path, suffix, npath);
+            handler(npath, isFallbackPath, innerStop);
+            if ( innerStop )
+                stop = true;
+        });
+        if ( !stop )
+            handler(path, isFallbackPath, stop);
+    }
+}
+
+void PathOverrides::forEachPathVariant(const char* initialPath, bool pathIsInDyldCacheWhichCannotBeOverridden, void (^handler)(const char* possiblePath, bool isFallbackPath, bool& stop), Platform platform) const
+{
+    __block bool stop = false;
+
+
+    if ( !pathIsInDyldCacheWhichCannotBeOverridden ) {
+        // check for overrides
+        const char* frameworkPartialPath = getFrameworkPartialPath(initialPath);
+        if ( frameworkPartialPath != nullptr ) {
+            const size_t frameworkPartialPathLen = strlen(frameworkPartialPath);
+            // look at each DYLD_FRAMEWORK_PATH directory
+            if ( (_frameworkPathOverridesEnv != nullptr) || (_frameworkPathOverridesExeLC != nullptr) ) {
+                forEachInColonList(_frameworkPathOverridesEnv, _frameworkPathOverridesExeLC, ^(const char* frDir, bool &innerStop) {
+                    char npath[strlen(frDir)+frameworkPartialPathLen+8];
+                    strcpy(npath, frDir);
+                    strcat(npath, "/");
+                    strcat(npath, frameworkPartialPath);
+                    forEachImageSuffix(npath, false, pathIsInDyldCacheWhichCannotBeOverridden, innerStop, handler);
+                    if ( innerStop )
+                        stop = true;
+                });
+            }
+        }
+        else {
+            const char* libraryLeafName = getLibraryLeafName(initialPath);
+            const size_t libraryLeafNameLen = strlen(libraryLeafName);
+            // look at each DYLD_LIBRARY_PATH directory
+            if ( (_dylibPathOverridesEnv != nullptr) || (_dylibPathOverridesExeLC != nullptr) ) {
+                forEachInColonList(_dylibPathOverridesEnv, _dylibPathOverridesExeLC, ^(const char* libDir, bool &innerStop) {
+                    char npath[strlen(libDir)+libraryLeafNameLen+8];
+                    strcpy(npath, libDir);
+                    strcat(npath, "/");
+                    strcat(npath, libraryLeafName);
+                    forEachImageSuffix(npath, false, pathIsInDyldCacheWhichCannotBeOverridden, innerStop, handler);
+                    if ( innerStop )
+                        stop = true;
+                });
+            }
+        }
+        if ( stop )
+            return;
+    }
+
+    // try rootpath
+    bool searchiOSSupport = (platform == Platform::iOSMac);
+#if (TARGET_OS_OSX && TARGET_CPU_ARM64)
+    if ( platform == Platform::iOS ) {
+        searchiOSSupport = true;
+        // <rdar://problem/58959974> some old Almond apps reference old WebKit location
+        if ( strcmp(initialPath, "/System/Library/PrivateFrameworks/WebKit.framework/WebKit") == 0 )
+            initialPath = "/System/Library/Frameworks/WebKit.framework/WebKit";
+    }
+#endif
+    if ( searchiOSSupport ) {
+        char rtpath[strlen("/System/iOSSupport")+strlen(initialPath)+8];
+        strcpy(rtpath, "/System/iOSSupport");
+        strcat(rtpath, initialPath);
+        forEachImageSuffix(rtpath, false, pathIsInDyldCacheWhichCannotBeOverridden, stop, handler);
+        if ( stop )
+            return;
+    }
+
+    // try original path
+    forEachImageSuffix(initialPath, false, pathIsInDyldCacheWhichCannotBeOverridden, stop, handler);
+    if ( stop )
+        return;
+
+    // check fallback paths
+    if ( const char* frameworkPartialPath = getFrameworkPartialPath(initialPath) ) {
+        const size_t frameworkPartialPathLen = strlen(frameworkPartialPath);
+        // look at each DYLD_FALLBACK_FRAMEWORK_PATH directory
+        bool usesDefaultFallbackPaths = (_frameworkPathFallbacksEnv == nullptr) && (_frameworkPathFallbacksExeLC == nullptr);
+        forEachFrameworkFallback(platform, ^(const char* dir, bool& innerStop) {
+            char npath[strlen(dir)+frameworkPartialPathLen+8];
+            strcpy(npath, dir);
+            strcat(npath, "/");
+            strcat(npath, frameworkPartialPath);
+            forEachImageSuffix(npath, usesDefaultFallbackPaths, pathIsInDyldCacheWhichCannotBeOverridden, innerStop, handler);
+            if ( innerStop )
+                stop = true;
+        });
+
+    }
+   else {
+        const char* libraryLeafName = getLibraryLeafName(initialPath);
+        const size_t libraryLeafNameLen = strlen(libraryLeafName);
+        // look at each DYLD_FALLBACK_LIBRARY_PATH directory
+        bool usesDefaultFallbackPaths = (_dylibPathFallbacksEnv == nullptr) && (_dylibPathFallbacksExeLC == nullptr);
+        forEachDylibFallback(platform, ^(const char* dir, bool& innerStop) {
+            char libpath[strlen(dir)+libraryLeafNameLen+8];
+            strcpy(libpath, dir);
+            strcat(libpath, "/");
+            strcat(libpath, libraryLeafName);
+            forEachImageSuffix(libpath, usesDefaultFallbackPaths, pathIsInDyldCacheWhichCannotBeOverridden, innerStop, handler);
+            if ( innerStop )
+                stop = true;
+        });
+    }
+}
+
+
+//
+// Find framework path
+//
+//  /path/foo.framework/foo                             =>   foo.framework/foo    
+//  /path/foo.framework/Versions/A/foo                  =>   foo.framework/Versions/A/foo
+//  /path/foo.framework/Frameworks/bar.framework/bar    =>   bar.framework/bar
+//  /path/foo.framework/Libraries/bar.dylb              =>   NULL
+//  /path/foo.framework/bar                             =>   NULL
+//
+// Returns nullptr if not a framework path
+//
+const char* PathOverrides::getFrameworkPartialPath(const char* path) const
+{
+    const char* dirDot = strrstr(path, ".framework/");
+    if ( dirDot != nullptr ) {
+        const char* dirStart = dirDot;
+        for ( ; dirStart >= path; --dirStart) {
+            if ( (*dirStart == '/') || (dirStart == path) ) {
+                const char* frameworkStart = &dirStart[1];
+                if ( dirStart == path )
+                    --frameworkStart;
+                size_t len = dirDot - frameworkStart;
+                char framework[len+1];
+                strncpy(framework, frameworkStart, len);
+                framework[len] = '\0';
+                const char* leaf = strrchr(path, '/');
+                if ( leaf != nullptr ) {
+                    if ( strcmp(framework, &leaf[1]) == 0 ) {
+                        return frameworkStart;
+                    }
+                    if (  _imageSuffix != nullptr ) {
+                        // some debug frameworks have install names that end in _debug
+                        if ( strncmp(framework, &leaf[1], len) == 0 ) {
+                            if ( strcmp( _imageSuffix, &leaf[len+1]) == 0 )
+                                return frameworkStart;
+                        }
+                    }
+                }
+            }
+        }
+    }
+    return nullptr;
+}
+
+
+const char* PathOverrides::getLibraryLeafName(const char* path)
+{
+    const char* start = strrchr(path, '/');
+    if ( start != nullptr )
+        return &start[1];
+    else
+        return path;
+}
+
+
+
+////////////////////////////  PathPool ////////////////////////////////////////
+
+
+PathPool* PathPool::allocate()
+{
+    vm_address_t addr;
+    ::vm_allocate(mach_task_self(), &addr, kAllocationSize, VM_FLAGS_ANYWHERE);
+    PathPool* p = (PathPool*)addr;
+    p->_next      = nullptr;
+    p->_current   = &(p->_buffer[0]);
+    p->_bytesFree = kAllocationSize - sizeof(PathPool);
+    return p;
+}
+
+void PathPool::deallocate(PathPool* pool) {
+    do {
+        PathPool* next = pool->_next;
+        ::vm_deallocate(mach_task_self(), (vm_address_t)pool, kAllocationSize);
+        pool = next;
+    } while (pool);
+}
+
+const char* PathPool::add(const char* path)
+{
+    size_t len = strlen(path) + 1;
+    if ( len < _bytesFree ) {
+        char* result = _current;
+        strcpy(_current, path);
+        _current += len;
+        _bytesFree -= len;
+        return result;
+    }
+    if ( _next == nullptr )
+        _next = allocate();
+    return _next->add(path);
+}
+
+void PathPool::forEachPath(void (^handler)(const char* path)) const
+{
+    for (const char* s = _buffer; s < _current; ++s) {
+        handler(s);
+        s += strlen(s);
+    }
+
+    if ( _next != nullptr )
+        _next->forEachPath(handler);
+}
+
+bool PathPool::contains(const char* path) const
+{
+    for (const char* s = _buffer; s < _current; ++s) {
+        if ( strcmp(s, path) == 0 )
+            return true;
+        s += strlen(s);
+    }
+
+    if ( _next != nullptr )
+        return _next->contains(path);
+
+    return false;
+}
+
+
+
+} // namespace closure
+} // namespace dyld3
+
+
+
+
+