Loading...
--- dyld/dyld-97.1/src/dyldAPIs.cpp
+++ /dev/null
@@ -1,1741 +0,0 @@
-/* -*- mode: C++; c-basic-offset: 4; tab-width: 4 -*-
- *
- * Copyright (c) 2004-2006 Apple Computer, 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@
- */
-
-//
-// This file implements that API's in <mach-o/dyld.h>
-//
-//
-
-#define __STDC_LIMIT_MACROS
-#include <stddef.h>
-#include <stdint.h>
-#include <string.h>
-#include <sys/param.h>
-#include <sys/mount.h>
-
-
-#include <vector>
-#include <map>
-#include <algorithm>
-
-#include <mach/mach.h>
-#include <sys/time.h>
-#include <sys/sysctl.h>
-
-extern "C" mach_port_name_t task_self_trap(void); // can't include <System/mach/mach_traps.h> because it is missing extern C
-
-#include "mach-o/dyld_images.h"
-#include "mach-o/dyld.h"
-#include "mach-o/dyld_priv.h"
-#include "mach-o/dyld-update-prebinding.h"
-
-#include "ImageLoader.h"
-#include "dyld.h"
-#include "dyldLibSystemInterface.h"
-
-#undef _POSIX_C_SOURCE
-#include "dlfcn.h"
-
-
-#ifndef RTLD_DLL
- #define RTLD_DLL 0x200 /* Mac OS X 10.5 and later */
-#endif
-
-static char sLastErrorFilePath[1024];
-static NSLinkEditErrors sLastErrorFileCode;
-static int sLastErrorNo;
-
-
-// In 10.3.x and earlier all the NSObjectFileImage API's were implemeneted in libSystem.dylib
-// Beginning in 10.4 the NSObjectFileImage API's are implemented in dyld and libSystem just forwards
-// This conditional keeps support for old libSystem's which needed some help implementing the API's
-#define OLD_LIBSYSTEM_SUPPORT (__ppc__ || __i386__)
-
-
-// The following functions have no prototype in any header. They are special cases
-// where _dyld_func_lookup() is used directly.
-static void _dyld_install_handlers(void* undefined, void* multiple, void* linkEdit);
-#if OLD_LIBSYSTEM_SUPPORT
-static NSModule _dyld_link_module(NSObjectFileImage object_addr, size_t object_size, const char* moduleName, uint32_t options);
-#endif
-static void _dyld_register_binding_handler(void * (*)(const char *, const char *, void *), ImageLoader::BindingOptions);
-static void _dyld_fork_child();
-static void _dyld_make_delayed_module_initializer_calls();
-static bool NSMakePrivateModulePublic(NSModule module);
-static void _dyld_call_module_initializers_for_dylib(const struct mach_header* mh_dylib_header);
-static void registerThreadHelpers(const dyld::LibSystemHelpers*);
-static const struct dyld_all_image_infos* _dyld_get_all_image_infos();
-
-// The following functions are dyld API's, but since dyld links with a static copy of libc.a
-// the public name cannot be used.
-static void client_dyld_lookup_and_bind(const char* symbolName, void** address, NSModule* module);
-static bool client_NSIsSymbolNameDefined(const char* symbolName);
-
-
-static void unimplemented()
-{
- dyld::halt("unimplemented dyld function\n");
-}
-
-struct dyld_func {
- const char* name;
- void* implementation;
-};
-
-static struct dyld_func dyld_funcs[] = {
- {"__dyld_register_thread_helpers", (void*)registerThreadHelpers },
- {"__dyld_register_func_for_add_image", (void*)_dyld_register_func_for_add_image },
- {"__dyld_register_func_for_remove_image", (void*)_dyld_register_func_for_remove_image },
- {"__dyld_make_delayed_module_initializer_calls", (void*)_dyld_make_delayed_module_initializer_calls },
- {"__dyld_fork_child", (void*)_dyld_fork_child },
- {"__dyld_dyld_register_image_state_change_handler", (void*)dyld_register_image_state_change_handler },
- {"__dyld_dladdr", (void*)dladdr },
- {"__dyld_dlclose", (void*)dlclose },
- {"__dyld_dlerror", (void*)dlerror },
- {"__dyld_dlopen", (void*)dlopen },
- {"__dyld_dlsym", (void*)dlsym },
- {"__dyld_dlopen_preflight", (void*)dlopen_preflight },
- {"__dyld_get_image_header_containing_address", (void*)_dyld_get_image_header_containing_address },
- {"__dyld_image_count", (void*)_dyld_image_count },
- {"__dyld_get_image_header", (void*)_dyld_get_image_header },
- {"__dyld_get_image_vmaddr_slide", (void*)_dyld_get_image_vmaddr_slide },
- {"__dyld_get_image_name", (void*)_dyld_get_image_name },
- {"__dyld__NSGetExecutablePath", (void*)_NSGetExecutablePath },
-
- // the rest of these are either deprecated or SPIs
- {"__dyld_lookup_and_bind", (void*)client_dyld_lookup_and_bind },
- {"__dyld_lookup_and_bind_with_hint", (void*)_dyld_lookup_and_bind_with_hint },
- {"__dyld_lookup_and_bind_fully", (void*)_dyld_lookup_and_bind_fully },
- {"__dyld_install_handlers", (void*)_dyld_install_handlers },
- {"__dyld_link_edit_error", (void*)NSLinkEditError },
- {"__dyld_unlink_module", (void*)NSUnLinkModule },
- {"__dyld_bind_objc_module", (void*)_dyld_bind_objc_module },
- {"__dyld_bind_fully_image_containing_address", (void*)_dyld_bind_fully_image_containing_address },
- {"__dyld_image_containing_address", (void*)_dyld_image_containing_address },
- {"__dyld_moninit", (void*)_dyld_moninit },
- {"__dyld_register_binding_handler", (void*)_dyld_register_binding_handler },
- {"__dyld_NSNameOfSymbol", (void*)NSNameOfSymbol },
- {"__dyld_NSAddressOfSymbol", (void*)NSAddressOfSymbol },
- {"__dyld_NSModuleForSymbol", (void*)NSModuleForSymbol },
- {"__dyld_NSLookupAndBindSymbol", (void*)NSLookupAndBindSymbol },
- {"__dyld_NSLookupAndBindSymbolWithHint", (void*)NSLookupAndBindSymbolWithHint },
- {"__dyld_NSLookupSymbolInModule", (void*)NSLookupSymbolInModule},
- {"__dyld_NSLookupSymbolInImage", (void*)NSLookupSymbolInImage},
- {"__dyld_NSMakePrivateModulePublic", (void*)NSMakePrivateModulePublic},
- {"__dyld_NSIsSymbolNameDefined", (void*)client_NSIsSymbolNameDefined},
- {"__dyld_NSIsSymbolNameDefinedWithHint", (void*)NSIsSymbolNameDefinedWithHint },
- {"__dyld_NSIsSymbolNameDefinedInImage", (void*)NSIsSymbolNameDefinedInImage},
- {"__dyld_NSNameOfModule", (void*)NSNameOfModule },
- {"__dyld_NSLibraryNameForModule", (void*)NSLibraryNameForModule },
- {"__dyld_NSAddLibrary", (void*)NSAddLibrary },
- {"__dyld_NSAddLibraryWithSearching", (void*)NSAddLibraryWithSearching },
- {"__dyld_NSAddImage", (void*)NSAddImage },
- {"__dyld_launched_prebound", (void*)_dyld_launched_prebound },
- {"__dyld_all_twolevel_modules_prebound", (void*)_dyld_all_twolevel_modules_prebound },
- {"__dyld_call_module_initializers_for_dylib", (void*)_dyld_call_module_initializers_for_dylib },
- {"__dyld_install_link_edit_symbol_handlers", (void*)dyld::registerZeroLinkHandlers },
- {"__dyld_NSCreateObjectFileImageFromFile", (void*)NSCreateObjectFileImageFromFile },
- {"__dyld_NSCreateObjectFileImageFromMemory", (void*)NSCreateObjectFileImageFromMemory },
- {"__dyld_NSDestroyObjectFileImage", (void*)NSDestroyObjectFileImage },
- {"__dyld_NSLinkModule", (void*)NSLinkModule },
- {"__dyld_NSHasModInitObjectFileImage", (void*)NSHasModInitObjectFileImage },
- {"__dyld_NSSymbolDefinitionCountInObjectFileImage", (void*)NSSymbolDefinitionCountInObjectFileImage },
- {"__dyld_NSSymbolDefinitionNameInObjectFileImage", (void*)NSSymbolDefinitionNameInObjectFileImage },
- {"__dyld_NSIsSymbolDefinedInObjectFileImage", (void*)NSIsSymbolDefinedInObjectFileImage },
- {"__dyld_NSSymbolReferenceNameInObjectFileImage", (void*)NSSymbolReferenceNameInObjectFileImage },
- {"__dyld_NSSymbolReferenceCountInObjectFileImage", (void*)NSSymbolReferenceCountInObjectFileImage },
- {"__dyld_NSGetSectionDataInObjectFileImage", (void*)NSGetSectionDataInObjectFileImage },
- {"__dyld_NSFindSectionAndOffsetInObjectFileImage", (void*)NSFindSectionAndOffsetInObjectFileImage },
-#if OLD_LIBSYSTEM_SUPPORT
- {"__dyld_link_module", (void*)_dyld_link_module },
-#endif
- {"__dyld_dlord", (void*)dlord },
- {"__dyld_get_all_image_infos", (void*)_dyld_get_all_image_infos },
- {NULL, 0}
-};
-
-
-
-// dyld's abstract type NSSymbol is implemented as const ImageLoader::Symbol*
-inline NSSymbol SymbolToNSSymbol(const ImageLoader::Symbol* sym)
-{
- return (NSSymbol)sym;
-}
-inline const ImageLoader::Symbol* NSSymbolToSymbol(NSSymbol sym)
-{
- return (const ImageLoader::Symbol*)sym;
-}
-
-// dyld's abstract type NSModule is implemented as ImageLoader*
-inline NSModule ImageLoaderToNSModule(const ImageLoader* image)
-{
- return (NSModule)image;
-}
-inline ImageLoader* NSModuleToImageLoader(NSModule module)
-{
- ImageLoader* image = (ImageLoader*)module;
- if ( dyld::validImage(image) )
- return image;
- return NULL;
-}
-
-// actual definition for opaque type
-struct __NSObjectFileImage
-{
- ImageLoader* image;
- const void* imageBaseAddress; // not used with OFI created from files
- size_t imageLength; // not used with OFI created from files
-};
-static std::vector<NSObjectFileImage> sObjectFileImages;
-
-
-
-//
-// __NSObjectFileImage are deleted in NSDestroyObjectFileImage()
-// The contained image is delete in one of two places:
-// NSUnLinkModule deletes the image if there is no __NSObjectFileImage with a reference to it
-// NSDestroyObjectFileImage deletes the image if image is not in list of valid images
-//
-
-
-static void dyldAPIhalt(const char* apiName, const char* errorMsg)
-{
- dyld::log("dyld: %s() error\n", apiName);
- dyld::halt(errorMsg);
-}
-
-
-
-static void setLastError(NSLinkEditErrors code, int errnum, const char* file, const char* message)
-{
- dyld::setErrorMessage(message);
- strncpy(sLastErrorFilePath, file, 1024);
- sLastErrorFilePath[1023] = '\0';
- sLastErrorFileCode = code;
- sLastErrorNo = errnum;
-}
-
-
-/*
- *_dyld_NSGetExecutablePath is the dyld side of _NSGetExecutablePath which
- * copies the path of the executable into the buffer and returns 0 if the path
- * was successfully copied in the provided buffer. If the buffer is not large
- * enough, -1 is returned and the expected buffer size is copied in *bufsize.
- * Note that _NSGetExecutablePath will return "a path" to the executable not a
- * "real path" to the executable. That is the path may be a symbolic link and
- * not the real file. And with deep directories the total bufsize needed could
- * be more than MAXPATHLEN.
- */
-int _NSGetExecutablePath(char* buf, uint32_t *bufsize)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(...)\n", __func__);
- const char* exePath = dyld::getExecutablePath();
- if(*bufsize < strlen(exePath) + 1){
- *bufsize = strlen(exePath) + 1;
- return -1;
- }
- strcpy(buf, exePath);
- return 0;
-}
-
-
-//
-// _dyld_call_module_initializers_for_dylib() is the dyld side of
-// __initialize_Cplusplus() which is in dylib1.o.
-// It is intended to only be called inside -init rouintes.
-// -init routines are called before module initializers (what C++
-// initializers use). Calling __initialize_Cplusplus() in a -init
-// routine causes the module initializers for an image to be called
-// which then allows C++ to be used inside a -init routine
-//
-static void _dyld_call_module_initializers_for_dylib(const struct mach_header* mh_dylib_header)
-{
- if ( dyld::gLogAPIs )
- dyld::log("__initialize_Cplusplus()\n");
-
- // for now, do nothing...
-}
-
-
-void _dyld_lookup_and_bind_fully(const char* symbolName, void** address, NSModule* module)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(\"%s\", %p, %p)\n", __func__, symbolName, address, module);
- ImageLoader* image;
- const ImageLoader::Symbol* sym;
- dyld::clearErrorMessage();
- if ( dyld::flatFindExportedSymbol(symbolName, &sym, (const ImageLoader**)&image) ) {
- try {
- image->bindAllLazyPointers(dyld::gLinkContext, true);
- if ( address != NULL)
- *address = (void*)image->getExportedSymbolAddress(sym, dyld::gLinkContext);
- if ( module != NULL)
- *module = ImageLoaderToNSModule(image);
- }
- catch (const char* msg) {
- dyldAPIhalt(__func__, msg);
- }
- }
- else {
- // on failure to find symbol return NULLs
- if ( address != NULL)
- *address = NULL;
- if ( module != NULL)
- *module = NULL;
- }
-}
-
-// Note: This cannot have public name because dyld is built with a static copy of libc.a
-// which calls dyld_lookup_and_bind() and expects to find dyld's symbols not host process
-static void client_dyld_lookup_and_bind(const char* symbolName, void** address, NSModule* module)
-{
- if ( dyld::gLogAPIs )
- dyld::log("_dyld_lookup_and_bind(\"%s\", %p, %p)\n", symbolName, address, module);
- const ImageLoader* image;
- const ImageLoader::Symbol* sym;
- if ( dyld::flatFindExportedSymbol(symbolName, &sym, &image) ) {
- if ( address != NULL)
- *address = (void*)image->getExportedSymbolAddress(sym, dyld::gLinkContext);
- if ( module != NULL)
- *module = ImageLoaderToNSModule(image);
- }
- else {
- // on failure to find symbol return NULLs
- if ( address != NULL)
- *address = NULL;
- if ( module != NULL)
- *module = NULL;
- }
-}
-
-void _dyld_lookup_and_bind_with_hint(const char* symbolName, const char* library_name_hint, void** address, NSModule* module)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(\"%s\", \"%s\", %p, %p)\n", __func__, symbolName, library_name_hint, address, module);
- const ImageLoader* image;
- const ImageLoader::Symbol* sym;
- // Look for library whose path contains the hint. If that fails search everywhere
- if ( dyld::flatFindExportedSymbolWithHint(symbolName, library_name_hint, &sym, &image)
- || dyld::flatFindExportedSymbol(symbolName, &sym, &image) ) {
- if ( address != NULL)
- *address = (void*)image->getExportedSymbolAddress(sym, dyld::gLinkContext);
- if ( module != NULL)
- *module = ImageLoaderToNSModule(image);
- }
- else {
- // on failure to find symbol return NULLs
- if ( address != NULL)
- *address = NULL;
- if ( module != NULL)
- *module = NULL;
- }
-}
-
-
-NSSymbol NSLookupAndBindSymbol(const char *symbolName)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(\"%s\")\n", __func__, symbolName);
- const ImageLoader* image;
- const ImageLoader::Symbol* sym;
- if ( dyld::flatFindExportedSymbol(symbolName, &sym, &image) ) {
- return SymbolToNSSymbol(sym);
- }
- // return NULL on failure
- return NULL;
-}
-
-NSSymbol NSLookupAndBindSymbolWithHint(const char* symbolName, const char* libraryNameHint)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(\"%s\", \"%s\")\n", __func__, symbolName, libraryNameHint);
- const ImageLoader* image;
- const ImageLoader::Symbol* sym;
- bool found = dyld::flatFindExportedSymbolWithHint(symbolName, libraryNameHint, &sym, &image);
- if ( ! found ) {
- // hint failed, do slow search of all images
- found = dyld::flatFindExportedSymbol(symbolName, &sym, &image);
- }
- if ( found )
- return SymbolToNSSymbol(sym);
-
- // return NULL on failure and log
- if ( dyld::gLogAPIs )
- dyld::log("%s(\"%s\", \"%s\") => NULL \n", __func__, symbolName, libraryNameHint);
- return NULL;
-}
-
-uint32_t _dyld_image_count(void)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s()\n", __func__);
- return dyld::getImageCount();
-}
-
-const struct mach_header* _dyld_get_image_header(uint32_t image_index)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%u)\n", __func__, image_index);
- ImageLoader* image = dyld::getIndexedImage(image_index);
- if ( image != NULL )
- return (struct mach_header*)image->machHeader();
- else
- return NULL;
-}
-
-
-static __attribute__((noinline))
-const struct mach_header* addImage(void* callerAddress, const char* path, bool search, bool dontLoad, bool matchInstallName, bool abortOnError)
-{
- ImageLoader* image = NULL;
- std::vector<const char*> rpathsFromCallerImage;
- try {
- dyld::clearErrorMessage();
- ImageLoader* callerImage = dyld::findImageContainingAddress(callerAddress);
- // like dlopen, use rpath from caller image and from main executable
- if ( callerImage != NULL )
- callerImage->getRPaths(dyld::gLinkContext, rpathsFromCallerImage);
- ImageLoader::RPathChain callersRPaths(NULL, &rpathsFromCallerImage);
- if ( callerImage != dyld::mainExecutable() ) {
- dyld::mainExecutable()->getRPaths(dyld::gLinkContext, rpathsFromCallerImage);
- }
- dyld::LoadContext context;
- context.useSearchPaths = search;
- context.useLdLibraryPath = false;
- context.implicitRPath = false;
- context.matchByInstallName = matchInstallName;
- context.dontLoad = dontLoad;
- context.mustBeBundle = false;
- context.mustBeDylib = true;
- context.findDLL = false;
- context.origin = callerImage != NULL ? callerImage->getPath() : NULL; // caller's image's path
- context.rpath = &callersRPaths; // rpaths from caller and main executable
-
- image = load(path, context);
- if ( image != NULL ) {
- if ( context.matchByInstallName )
- image->setMatchInstallPath(true);
- dyld::link(image, false, callersRPaths);
- dyld::runInitializers(image);
- // images added with NSAddImage() can never be unloaded
- image->setNeverUnload();
- }
- }
- catch (const char* msg) {
- dyld::garbageCollectImages();
- if ( abortOnError) {
- char pathMsg[strlen(msg)+strlen(path)+4];
- strcpy(pathMsg, msg);
- strcat(pathMsg, " ");
- strcat(pathMsg, path);
- dyldAPIhalt("NSAddImage", pathMsg);
- }
- // not halting, so set error state for NSLinkEditError to find
- setLastError(NSLinkEditOtherError, 0, path, msg);
- free((void*)msg); // our free() will do nothing if msg is a string literal
- image = NULL;
- }
- // free rpaths (getRPaths() malloc'ed each string)
- for(std::vector<const char*>::iterator it=rpathsFromCallerImage.begin(); it != rpathsFromCallerImage.end(); ++it) {
- const char* str = *it;
- free((void*)str);
- }
- if ( image == NULL )
- return NULL;
- else
- return image->machHeader();
-}
-
-
-const struct mach_header* NSAddImage(const char* path, uint32_t options)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(\"%s\", 0x%08X)\n", __func__, path, options);
- const bool dontLoad = ( (options & NSADDIMAGE_OPTION_RETURN_ONLY_IF_LOADED) != 0 );
- const bool search = ( (options & NSADDIMAGE_OPTION_WITH_SEARCHING) != 0 );
- const bool matchInstallName = ( (options & NSADDIMAGE_OPTION_MATCH_FILENAME_BY_INSTALLNAME) != 0 );
- const bool abortOnError = ( (options & NSADDIMAGE_OPTION_RETURN_ON_ERROR|NSADDIMAGE_OPTION_RETURN_ONLY_IF_LOADED) == 0 );
- void* callerAddress = __builtin_return_address(1); // note layers: 1: real client, 0: libSystem glue
- return addImage(callerAddress, path, search, dontLoad, matchInstallName, abortOnError);
-}
-
-bool NSAddLibrary(const char* path)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(\"%s\")\n", __func__, path);
- void* callerAddress = __builtin_return_address(1); // note layers: 1: real client, 0: libSystem glue
- return (addImage(callerAddress, path, false, false, false, false) != NULL);
-}
-
-bool NSAddLibraryWithSearching(const char* path)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(\"%s\")\n", __func__, path);
- void* callerAddress = __builtin_return_address(1); // note layers: 1: real client, 0: libSystem glue
- return (addImage(callerAddress, path, true, false, false, false) != NULL);
-}
-
-
-
-//#define NSADDIMAGE_OPTION_NONE 0x0
-//#define NSADDIMAGE_OPTION_RETURN_ON_ERROR 0x1
-//#define NSADDIMAGE_OPTION_MATCH_FILENAME_BY_INSTALLNAME 0x8
-
-bool NSIsSymbolNameDefinedInImage(const struct mach_header* mh, const char* symbolName)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p, \"%s\")\n", __func__, (void *)mh, symbolName);
- ImageLoader* image = dyld::findImageByMachHeader(mh);
- if ( image != NULL ) {
- if ( image->findExportedSymbol(symbolName, NULL, true, NULL) != NULL)
- return true;
- }
- return false;
-}
-
-NSSymbol NSLookupSymbolInImage(const struct mach_header* mh, const char* symbolName, uint32_t options)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p, \"%s\", 0x%08X)\n", __func__, mh, symbolName, options);
- const ImageLoader::Symbol* symbol = NULL;
- dyld::clearErrorMessage();
- ImageLoader* image = dyld::findImageByMachHeader(mh);
- if ( image != NULL ) {
- try {
- if ( options & NSLOOKUPSYMBOLINIMAGE_OPTION_BIND_FULLY ) {
- image->bindAllLazyPointers(dyld::gLinkContext, true);
- }
- else if ( options & NSLOOKUPSYMBOLINIMAGE_OPTION_BIND_NOW ) {
- image->bindAllLazyPointers(dyld::gLinkContext, false);
- }
- }
- catch (const char* msg) {
- if ( (options & NSLOOKUPSYMBOLINIMAGE_OPTION_RETURN_ON_ERROR) == 0 ) {
- dyldAPIhalt(__func__, msg);
- }
- }
- symbol = image->findExportedSymbol(symbolName, NULL, true, NULL);
- }
- if ( dyld::gLogAPIs && (symbol == NULL) )
- dyld::log("%s(%p, \"%s\", 0x%08X) ==> NULL\n", __func__, mh, symbolName, options);
- return SymbolToNSSymbol(symbol);
-}
-
-
-// Note: This cannot have public name because dyld is built with a static copy of libc.a
-// which calls NSIsSymbolNameDefined() and expects to find dyld's symbols not host process
-static bool client_NSIsSymbolNameDefined(const char* symbolName)
-{
- if ( dyld::gLogAPIs )
- dyld::log("NSIsSymbolNameDefined(\"%s\")\n", symbolName);
- const ImageLoader* image;
- const ImageLoader::Symbol* sym;
- return dyld::flatFindExportedSymbol(symbolName, &sym, &image);
-}
-
-bool NSIsSymbolNameDefinedWithHint(const char* symbolName, const char* libraryNameHint)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(\"%s\", \"%s\")\n", __func__, symbolName, libraryNameHint);
- const ImageLoader* image;
- const ImageLoader::Symbol* sym;
- bool found = dyld::flatFindExportedSymbolWithHint(symbolName, libraryNameHint, &sym, &image);
- if ( ! found ) {
- // hint failed, do slow search of all images
- found = dyld::flatFindExportedSymbol(symbolName, &sym, &image);
- }
- if ( !found && dyld::gLogAPIs )
- dyld::log("%s(\"%s\", \"%s\") => false \n", __func__, symbolName, libraryNameHint);
- return found;
-}
-
-const char* NSNameOfSymbol(NSSymbol symbol)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p)\n", __func__, (void *)symbol);
- const char* result = NULL;
- ImageLoader* image = dyld::findImageContainingAddress(symbol);
- if ( image != NULL )
- result = image->getExportedSymbolName(NSSymbolToSymbol(symbol));
- return result;
-}
-
-void* NSAddressOfSymbol(NSSymbol symbol)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p)\n", __func__, (void *)symbol);
- void* result = NULL;
- ImageLoader* image = dyld::findImageContainingAddress(symbol);
- if ( image != NULL )
- result = (void*)image->getExportedSymbolAddress(NSSymbolToSymbol(symbol), dyld::gLinkContext);
- return result;
-}
-
-NSModule NSModuleForSymbol(NSSymbol symbol)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p)\n", __func__, (void *)symbol);
- NSModule result = NULL;
- ImageLoader* image = dyld::findImageContainingAddress(symbol);
- if ( image != NULL )
- result = ImageLoaderToNSModule(image);
- return result;
-}
-
-
-intptr_t _dyld_get_image_vmaddr_slide(uint32_t image_index)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%u)\n", __func__, image_index);
- ImageLoader* image = dyld::getIndexedImage(image_index);
- if ( image != NULL )
- return image->getSlide();
- else
- return 0;
-}
-
-const char* _dyld_get_image_name(uint32_t image_index)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%u)\n", __func__, image_index);
- ImageLoader* image = dyld::getIndexedImage(image_index);
- if ( image != NULL )
- return image->getLogicalPath();
- else
- return NULL;
-}
-
-
-
-bool _dyld_all_twolevel_modules_prebound(void)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s()\n", __func__);
- return FALSE; // fixme
-}
-
-void _dyld_bind_objc_module(const void *objc_module)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p)\n", __func__, objc_module);
- // do nothing, with new dyld everything already bound
-}
-
-
-bool _dyld_bind_fully_image_containing_address(const void* address)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p)\n", __func__, address);
- dyld::clearErrorMessage();
- ImageLoader* image = dyld::findImageContainingAddress(address);
- if ( image != NULL ) {
- try {
- image->bindAllLazyPointers(dyld::gLinkContext, true);
- return true;
- }
- catch (const char* msg) {
- dyldAPIhalt(__func__, msg);
- }
- }
- return false;
-}
-
-bool _dyld_image_containing_address(const void* address)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p)\n", __func__, address);
- ImageLoader *imageLoader = dyld::findImageContainingAddress(address);
- return (NULL != imageLoader);
-}
-
-static NSObjectFileImage createObjectImageFile(ImageLoader* image, const void* address = NULL, size_t len=0)
-{
- NSObjectFileImage result = new __NSObjectFileImage();
- result->image = image;
- result->imageBaseAddress = address;
- result->imageLength = len;
- sObjectFileImages.push_back(result);
- return result;
-}
-
-NSObjectFileImageReturnCode NSCreateObjectFileImageFromFile(const char* pathName, NSObjectFileImage *objectFileImage)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(\"%s\", ...)\n", __func__, pathName);
- try {
- void* callerAddress = __builtin_return_address(1); // note layers: 1: real client, 0: libSystem glue
- ImageLoader* callerImage = dyld::findImageContainingAddress(callerAddress);
-
- dyld::LoadContext context;
- context.useSearchPaths = false;
- context.useLdLibraryPath = false;
- context.implicitRPath = false;
- context.matchByInstallName = false;
- context.dontLoad = false;
- context.mustBeBundle = true;
- context.mustBeDylib = false;
- context.findDLL = false;
- context.origin = callerImage != NULL ? callerImage->getPath() : NULL; // caller's image's path
- context.rpath = NULL; // support not yet implemented
-
- ImageLoader* image = dyld::load(pathName, context);
- // Note: We DO NOT link the image! NSLinkModule will do that
- if ( image != NULL ) {
- if ( !image->isBundle() ) {
- // the image must have been already loaded (since context.mustBeBundle will prevent it from being loaded)
- return NSObjectFileImageInappropriateFile;
- }
- *objectFileImage = createObjectImageFile(image);
- return NSObjectFileImageSuccess;
- }
- }
- catch (const char* msg) {
- //dyld::log("dyld: NSCreateObjectFileImageFromFile() error: %s\n", msg);
- dyld::garbageCollectImages();
- free((void*)msg);
- return NSObjectFileImageInappropriateFile;
- }
- return NSObjectFileImageFailure;
-}
-
-
-NSObjectFileImageReturnCode NSCreateObjectFileImageFromMemory(const void* address, size_t size, NSObjectFileImage *objectFileImage)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p, %lu, %p)\n", __func__, address, size, objectFileImage);
-
- try {
- ImageLoader* image = dyld::loadFromMemory((const uint8_t*)address, size, NULL);
- if ( ! image->isBundle() ) {
- // this API can only be used with bundles...
- dyld::garbageCollectImages();
- return NSObjectFileImageInappropriateFile;
- }
- // Note: We DO NOT link the image! NSLinkModule will do that
- if ( image != NULL ) {
- *objectFileImage = createObjectImageFile(image, address, size);
- return NSObjectFileImageSuccess;
- }
- }
- catch (const char* msg) {
- free((void*)msg);
- dyld::garbageCollectImages();
- //dyld::log("dyld: NSCreateObjectFileImageFromMemory() error: %s\n", msg);
- }
- return NSObjectFileImageFailure;
-}
-
-static bool validOFI(NSObjectFileImage objectFileImage)
-{
- const int ofiCount = sObjectFileImages.size();
- for (int i=0; i < ofiCount; ++i) {
- if ( sObjectFileImages[i] == objectFileImage )
- return true;
- }
- return false;
-}
-
-bool NSDestroyObjectFileImage(NSObjectFileImage objectFileImage)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p)\n", __func__, objectFileImage);
-
- if ( validOFI(objectFileImage) ) {
- // a failure during NSLinkModule will delete the image
- if ( objectFileImage->image != NULL ) {
- // if the image has never been linked or has been unlinked, the image is not in the list of valid images
- // and we should delete it
- bool linkedImage = dyld::validImage(objectFileImage->image);
- if ( ! linkedImage ) {
- delete objectFileImage->image;
- objectFileImage->image = NULL;
- }
- }
-
- // remove from list of ofi's
- for (std::vector<NSObjectFileImage>::iterator it=sObjectFileImages.begin(); it != sObjectFileImages.end(); it++) {
- if ( *it == objectFileImage ) {
- sObjectFileImages.erase(it);
- break;
- }
- }
-
- // if object was created from a memory, release that memory
- // NOTE: this is the way dyld has always done this. NSCreateObjectFileImageFromMemory() hands over ownership of the memory to dyld
- if ( objectFileImage->imageBaseAddress != NULL ) {
- vm_deallocate(mach_task_self(), (vm_address_t)objectFileImage->imageBaseAddress, objectFileImage->imageLength);
- }
-
- // free ofi object
- delete objectFileImage;
-
- return true;
- }
- return false;
-}
-
-bool NSHasModInitObjectFileImage(NSObjectFileImage objectFileImage)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p)\n", __func__, objectFileImage);
- return objectFileImage->image->needsInitialization();
-}
-
-uint32_t NSSymbolDefinitionCountInObjectFileImage(NSObjectFileImage objectFileImage)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p)\n", __func__, objectFileImage);
- return objectFileImage->image->getExportedSymbolCount();
-}
-
-const char* NSSymbolDefinitionNameInObjectFileImage(NSObjectFileImage objectFileImage, uint32_t ordinal)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p,%d)\n", __func__, objectFileImage, ordinal);
- const ImageLoader::Symbol* sym = objectFileImage->image->getIndexedExportedSymbol(ordinal);
- return objectFileImage->image->getExportedSymbolName(sym);
-}
-
-uint32_t NSSymbolReferenceCountInObjectFileImage(NSObjectFileImage objectFileImage)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p)\n", __func__, objectFileImage);
- return objectFileImage->image->getImportedSymbolCount();
-}
-
-const char * NSSymbolReferenceNameInObjectFileImage(NSObjectFileImage objectFileImage, uint32_t ordinal,
- bool* tentative_definition)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p,%d)\n", __func__, objectFileImage, ordinal);
- const ImageLoader::Symbol* sym = objectFileImage->image->getIndexedImportedSymbol(ordinal);
- if ( tentative_definition != NULL ) {
- ImageLoader::ReferenceFlags flags = objectFileImage->image->geImportedSymbolInfo(sym);
- if ( (flags & ImageLoader::kTentativeDefinition) != 0 )
- *tentative_definition = true;
- else
- *tentative_definition = false;
- }
- return objectFileImage->image->getImportedSymbolName(sym);
-}
-
-void* NSGetSectionDataInObjectFileImage(NSObjectFileImage objectFileImage,
- const char* segmentName, const char* sectionName, unsigned long* size)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p,%s, %s)\n", __func__, objectFileImage, segmentName, sectionName);
-
- void* start;
- size_t length;
- if ( objectFileImage->image->getSectionContent(segmentName, sectionName, &start, &length) ) {
- if ( size != NULL )
- *size = length;
- return start;
- }
- return NULL;
-}
-
-
-
-bool NSIsSymbolDefinedInObjectFileImage(NSObjectFileImage objectFileImage, const char* symbolName)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p,%s)\n", __func__, objectFileImage, symbolName);
- const ImageLoader::Symbol* sym = objectFileImage->image->findExportedSymbol(symbolName, NULL, true, NULL);
- return ( sym != NULL );
-}
-
-/*
- * Given an imageOffset into an ObjectFileImage, returns
- * the segment/section name and offset into that section of
- * that imageOffset. Returns FALSE if the imageOffset is not
- * in any section. You can used the resulting sectionOffset to
- * index into the data returned by NSGetSectionDataInObjectFileImage.
- *
- * First appeared in Mac OS X 10.3
- *
- * SPI: currently only used by ZeroLink to detect +load methods
- */
-bool
-NSFindSectionAndOffsetInObjectFileImage(NSObjectFileImage objectFileImage,
- unsigned long imageOffset,
- const char** segmentName, /* can be NULL */
- const char** sectionName, /* can be NULL */
- unsigned long* sectionOffset) /* can be NULL */
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p)\n", __func__, objectFileImage);
-
- return objectFileImage->image->findSection(((char*)(objectFileImage->image->machHeader()))+imageOffset, segmentName, sectionName, sectionOffset);
-}
-
-
-
-NSModule NSLinkModule(NSObjectFileImage objectFileImage, const char* moduleName, uint32_t options)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p, \"%s\", 0x%08X)\n", __func__, objectFileImage, moduleName, options);
-
- dyld::clearErrorMessage();
- try {
- // NSLinkModule allows a bundle to be link multpile times
- // each link causes the bundle to be copied to a new address
- if ( objectFileImage->image->isLinked() ) {
- // already linked, so clone a new one and link it
-#if 0
- dyld::warn("%s(0x%08X, \"%s\", 0x%08X) called more than once for 0x%08X\n",
- __func__, objectFileImage, moduleName, options, objectFileImage);
-#endif
- objectFileImage->image = dyld::cloneImage(objectFileImage->image);
- }
-
- // if this ofi was made with NSCreateObjectFileImageFromFile() then physical path is already set
- // if this ofi was create with NSCreateObjectFileImageFromMemory() then the phyiscal path should be set if supplied
- if ( (options & NSLINKMODULE_OPTION_TRAILING_PHYS_NAME) != 0 ) {
- if ( objectFileImage->imageBaseAddress != NULL ) {
- const char* physEnd = &moduleName[strlen(moduleName)+1];
- objectFileImage->image->setPath(physEnd);
- }
- }
-
- // set moduleName as the name anyone calling _dyld_get_image_name() will see
- objectFileImage->image->setLogicalPath(moduleName);
-
- // support private bundles
- if ( (options & NSLINKMODULE_OPTION_PRIVATE) != 0 )
- objectFileImage->image->setHideExports();
-
- // set up linking options
- bool forceLazysBound = ( (options & NSLINKMODULE_OPTION_BINDNOW) != 0 );
-
- // load libraries, rebase, bind, to make this image usable
- dyld::link(objectFileImage->image, forceLazysBound, ImageLoader::RPathChain(NULL,NULL));
-
- // run initializers unless magic flag says not to
- if ( (options & NSLINKMODULE_OPTION_DONT_CALL_MOD_INIT_ROUTINES) == 0 )
- dyld::runInitializers(objectFileImage->image);
-
- // bump reference count to keep this bundle from being garbage collected
- objectFileImage->image->incrementDlopenReferenceCount();
-
- return ImageLoaderToNSModule(objectFileImage->image);
- }
- catch (const char* msg) {
- dyld::garbageCollectImages();
- if ( (options & NSLINKMODULE_OPTION_RETURN_ON_ERROR) == 0 )
- dyldAPIhalt(__func__, msg);
- // not halting, so set error state for NSLinkEditError to find
- setLastError(NSLinkEditOtherError, 0, moduleName, msg);
- // dyld::link() deleted the image so lose our reference
- objectFileImage->image = NULL;
- free((void*)msg);
- return NULL;
- }
-}
-
-
-#if OLD_LIBSYSTEM_SUPPORT
-// This is for compatibility with old libSystems (libdyld.a) which process ObjectFileImages outside dyld
-static NSModule _dyld_link_module(NSObjectFileImage object_addr, size_t object_size, const char* moduleName, uint32_t options)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p, \"%s\", 0x%08X)\n", "NSLinkModule", object_addr, moduleName, options); // note name/args translation
- ImageLoader* image = NULL;
- dyld::clearErrorMessage();
- try {
- const char* imageName = moduleName;
- if ( (options & NSLINKMODULE_OPTION_TRAILING_PHYS_NAME) != 0 )
- imageName = &moduleName[strlen(moduleName)+1];
-
- image = dyld::loadFromMemory((const uint8_t*)object_addr, object_size, imageName);
-
- if ( (options & NSLINKMODULE_OPTION_TRAILING_PHYS_NAME) != 0 )
- image->setLogicalPath(moduleName);
-
- if ( image != NULL ) {
- // support private bundles
- if ( (options & NSLINKMODULE_OPTION_PRIVATE) != 0 )
- image->setHideExports();
-
- // set up linking options
- bool forceLazysBound = ( (options & NSLINKMODULE_OPTION_BINDNOW) != 0 );
-
- // load libraries, rebase, bind, to make this image usable
- dyld::link(image, forceLazysBound, ImageLoader::RPathChain(NULL,NULL));
-
- // run initializers unless magic flag says not to
- if ( (options & NSLINKMODULE_OPTION_DONT_CALL_MOD_INIT_ROUTINES) == 0 )
- dyld::runInitializers(image);
- }
- }
- catch (const char* msg) {
- if ( (options & NSLINKMODULE_OPTION_RETURN_ON_ERROR) == 0 )
- dyldAPIhalt("NSLinkModule", msg);
- // not halting, so set error state for NSLinkEditError to find
- setLastError(NSLinkEditOtherError, 0, moduleName, msg);
- // if image was created for this bundle, destroy it
- if ( image != NULL ) {
- dyld::removeImage(image);
- delete image;
- }
- image = NULL;
- free((void*)msg);
- }
- return ImageLoaderToNSModule(image);
-}
-#endif
-
-NSSymbol NSLookupSymbolInModule(NSModule module, const char* symbolName)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p, \"%s\")\n", __func__, (void *)module, symbolName);
- ImageLoader* image = NSModuleToImageLoader(module);
- if ( image == NULL )
- return NULL;
- return SymbolToNSSymbol(image->findExportedSymbol(symbolName, NULL, false, NULL));
-}
-
-const char* NSNameOfModule(NSModule module)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p)\n", __func__, module);
- ImageLoader* image = NSModuleToImageLoader(module);
- if ( image == NULL )
- return NULL;
- return image->getPath();
-}
-
-const char* NSLibraryNameForModule(NSModule module)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p)\n", __func__, module);
- ImageLoader* image = NSModuleToImageLoader(module);
- if ( image == NULL )
- return NULL;
- return image->getPath();
-}
-
-bool NSUnLinkModule(NSModule module, uint32_t options)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p, 0x%08X)\n", __func__, module, options);
- if ( module == NULL )
- return false;
- ImageLoader* image = NSModuleToImageLoader(module);
- if ( image == NULL )
- return false;
- dyld::removeImage(image);
-
- if ( (options & NSUNLINKMODULE_OPTION_KEEP_MEMORY_MAPPED) != 0 )
- image->setLeaveMapped();
-
- // TODO: NSUNLINKMODULE_OPTION_RESET_LAZY_REFERENCES
-
- // Only delete image if there is no ofi referencing it
- // That means the ofi was destroyed after linking, so no one is left to delete this image
- const int ofiCount = sObjectFileImages.size();
- bool found = false;
- for (int i=0; i < ofiCount; ++i) {
- NSObjectFileImage ofi = sObjectFileImages[i];
- if ( ofi->image == image )
- found = true;
- }
- if ( !found )
- delete image;
-
- return true;
-}
-
-// internal name and parameters do not match public name and parameters...
-static void _dyld_install_handlers(void* undefined, void* multiple, void* linkEdit)
-{
- if ( dyld::gLogAPIs )
- dyld::log("NSLinkEditErrorHandlers()\n");
-
- dyld::registerUndefinedHandler((dyld::UndefinedHandler)undefined);
- // no support for multiple or linkedit handlers
-}
-
-const struct mach_header * _dyld_get_image_header_containing_address(const void* address)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p)\n", __func__, address);
- ImageLoader* image = dyld::findImageContainingAddress(address);
- if ( image != NULL )
- return image->machHeader();
- return NULL;
-}
-
-
-void _dyld_register_func_for_add_image(void (*func)(const struct mach_header *mh, intptr_t vmaddr_slide))
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p)\n", __func__, (void *)func);
- dyld::registerAddCallback(func);
-}
-
-void _dyld_register_func_for_remove_image(void (*func)(const struct mach_header *mh, intptr_t vmaddr_slide))
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p)\n", __func__, (void *)func);
- dyld::registerRemoveCallback(func);
-}
-
-
-// called by crt before main
-static void _dyld_make_delayed_module_initializer_calls()
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s()\n", __func__);
-
-#if SUPPORT_OLD_CRT_INITIALIZATION
- if ( dyld::gRunInitializersOldWay )
- dyld::initializeMainExecutable();
-#endif
-}
-
-
-void NSLinkEditError(NSLinkEditErrors* c, int* errorNumber, const char** fileName, const char** errorString)
-{
- // FIXME FIXME
- *c = sLastErrorFileCode;
- *errorNumber = sLastErrorNo;
- *fileName = sLastErrorFilePath;
- *errorString = dyld::getErrorMessage();
-}
-
-static void _dyld_register_binding_handler(void * (*bindingHandler)(const char *, const char *, void *), ImageLoader::BindingOptions bindingOptions)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s()\n", __func__);
- dyld::gLinkContext.bindingHandler = bindingHandler;
- dyld::gLinkContext.bindingOptions = bindingOptions;
-}
-
-
-// Call by fork() in libSystem after the kernel trap is done on the child side
-static void _dyld_fork_child()
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s()\n", __func__);
- // The implementation of fork() in libSystem knows to reset the variable mach_task_self_
- // in libSystem for the child of a fork. But dyld is built with a static copy
- // of libc.a and has its own copy of mach_task_self_ which we reset here.
- //
- // In mach_init.h mach_task_self() is #defined to mach_task_self_ and
- // in mach_init() mach_task_self_ is initialized to task_self_trap().
- //
- extern mach_port_t mach_task_self_;
- mach_task_self_ = task_self_trap();
-}
-
-
-
-typedef void (*MonitorProc)(char *lowpc, char *highpc);
-
-static void monInitCallback(ImageLoader* image, void* userData)
-{
- MonitorProc proc = (MonitorProc)userData;
- void* start;
- size_t length;
- if ( image->getSectionContent("__TEXT", "__text", &start, &length) ) {
- proc((char*)start, (char*)start+length);
- }
-}
-
-//
-// _dyld_moninit is called from profiling runtime routine moninit().
-// dyld calls back with the range of each __TEXT/__text section in every
-// linked image.
-//
-void _dyld_moninit(MonitorProc proc)
-{
- dyld::forEachImageDo(&monInitCallback, (void*)proc);
-}
-
-// returns true if prebinding was used in main executable
-bool _dyld_launched_prebound()
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s()\n", __func__);
-
- // ¥¥¥Êif we deprecate prebinding, we may want to consider always returning true or false here
- return dyld::mainExecutablePrebound();
-}
-
-
-//
-// _dyld_NSMakePrivateModulePublic() is the dyld side of the hack
-// NSMakePrivateModulePublic() needed for the dlopen() to turn it's
-// RTLD_LOCAL handles into RTLD_GLOBAL. It just simply turns off the private
-// flag on the image for this module. If the module was found and it was
-// private then everything worked and TRUE is returned else FALSE is returned.
-//
-static bool NSMakePrivateModulePublic(NSModule module)
-{
- ImageLoader* image = NSModuleToImageLoader(module);
- if ( image != NULL ) {
- if ( image->hasHiddenExports() ) {
- image->setHideExports(false);
- return true;
- }
- }
- return false;
-}
-
-
-
-bool lookupDyldFunction(const char* name, uintptr_t* address)
-{
- for (const dyld_func* p = dyld_funcs; p->name != NULL; ++p) {
- if ( strcmp(p->name, name) == 0 ) {
- if( p->implementation == unimplemented )
- dyld::log("unimplemented dyld function: %s\n", p->name);
- *address = (uintptr_t)p->implementation;
- return true;
- }
- }
- *address = 0;
- return false;
-}
-
-static bool readOnlyBootVolume()
-{
- struct statfs sfs;
- if ( statfs("/", &sfs) == 0 ) {
- return ( sfs.f_flags & MNT_RDONLY );
- }
- // if statfs() fails, something is wrong, so don't rebuild dyld cache
- return true;
-}
-
-
-static void registerThreadHelpers(const dyld::LibSystemHelpers* helpers)
-{
- dyld::gLibSystemHelpers = helpers;
-
-#if DYLD_SHARED_CACHE_SUPPORT
- // notify dyld server if something is wrong with the shared cache
- //dyld::log("helpers->version=%lu, gSharedCacheDontNotify=%d, gSharedCacheNotFound=%d, gSharedCacheNeedsUpdating=%d, readOnlyBootVolume()=%d\n",
- // helpers->version, dyld::gSharedCacheDontNotify, dyld::gSharedCacheNotFound, dyld::gSharedCacheNeedsUpdating, readOnlyBootVolume());
- if ( (helpers != NULL) && (helpers->version >= 3) && !dyld::gSharedCacheDontNotify ) {
- if ( dyld::gSharedCacheNotFound || dyld::gSharedCacheNeedsUpdating ) {
- if ( ! readOnlyBootVolume() ) {
- if ( dyld::gSharedCacheNotFound )
- (*helpers->dyld_shared_cache_missing)();
- else if ( dyld::imMemorySharedCacheHeader() == NULL ) {
- // since shared cache is not mapped and not missing, it must be
- // corrupt. Don't need to test contents, just
- // ping launchd to start update_dyld_shared_cache
- // rdar://problem/5694507
- (*helpers->dyld_shared_cache_out_of_date)();
- }
- else if ( dyld::gSharedCacheNeedsUpdating ) {
- // To reduce the storm of messages to update_dyld_shared_cache
- // don't message if the cache file is missing (which means the cache is in
- // the process of being regenerated) or if the contents of the cache file
- // don't match what is already in memory (which means the cache has
- // already be regenerated).
- int fd = dyld::openSharedCacheFile();
- if ( fd != -1 ) {
- uint8_t onDiskCache[4096];
- if ( ::read(fd, onDiskCache, 4096) == 4096 ) {
- if ( ::memcmp(onDiskCache, dyld::imMemorySharedCacheHeader(), 4096) == 0 ) {
- // ping launchd to start update_dyld_shared_cache
- (*helpers->dyld_shared_cache_out_of_date)();
- }
- }
- ::close(fd);
- }
- }
- }
- }
- }
-#endif
-}
-
-
-static void dlerrorClear()
-{
- if ( dyld::gLibSystemHelpers != NULL ) {
- // first char of buffer is flag whether string (starting at second char) is valid
- char* buffer = (*dyld::gLibSystemHelpers->getThreadBufferFor_dlerror)(2);
- buffer[0] = '\0';
- buffer[1] = '\0';
- }
-}
-
-static void dlerrorSet(const char* msg)
-{
- if ( dyld::gLibSystemHelpers != NULL ) {
- // first char of buffer is flag whether string (starting at second char) is valid
- char* buffer = (*dyld::gLibSystemHelpers->getThreadBufferFor_dlerror)(strlen(msg)+2);
- buffer[0] = '\1';
- strcpy(&buffer[1], msg);
- }
-}
-
-
-bool dlopen_preflight(const char* path)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%s)\n", __func__, path);
-
- dlerrorClear();
-
- bool result = false;
- std::vector<const char*> rpathsFromCallerImage;
- try {
- void* callerAddress = __builtin_return_address(1); // note layers: 1: real client, 0: libSystem glue
- ImageLoader* callerImage = dyld::findImageContainingAddress(callerAddress);
- // for dlopen, use rpath from caller image and from main executable
- if ( callerImage != NULL )
- callerImage->getRPaths(dyld::gLinkContext, rpathsFromCallerImage);
- ImageLoader::RPathChain callersRPaths(NULL, &rpathsFromCallerImage);
- if ( callerImage != dyld::mainExecutable() ) {
- dyld::mainExecutable()->getRPaths(dyld::gLinkContext, rpathsFromCallerImage);
- }
-
- ImageLoader* image = NULL;
- dyld::LoadContext context;
- context.useSearchPaths = true;
- context.useLdLibraryPath= (strchr(path, '/') == NULL); // a leafname implies should search
- context.implicitRPath = (path[0] != '/'); // a non-absolute path implies try rpath searching
- context.matchByInstallName = true;
- context.dontLoad = false;
- context.mustBeBundle = false;
- context.mustBeDylib = false;
- context.findDLL = false;
- context.origin = callerImage != NULL ? callerImage->getPath() : NULL; // caller's image's path
- context.rpath = &callersRPaths; // rpaths from caller and main executable
-
- image = load(path, context);
- if ( image != NULL ) {
- dyld::preflight(image, callersRPaths); // image object deleted by dyld::preflight()
- result = true;
- }
- }
- catch (const char* msg) {
- const char* str = dyld::mkstringf("dlopen_preflight(%s): %s", path, msg);
- dlerrorSet(str);
- free((void*)str);
- free((void*)msg); // our free() will do nothing if msg is a string literal
- }
- // free rpaths (getRPaths() malloc'ed each string)
- for(std::vector<const char*>::iterator it=rpathsFromCallerImage.begin(); it != rpathsFromCallerImage.end(); ++it) {
- const char* str = *it;
- free((void*)str);
- }
- return result;
-}
-
-
-void* dlopen(const char* path, int mode)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%s, 0x%08X)\n", __func__, ((path==NULL) ? "NULL" : path), mode);
-
- dlerrorClear();
-
- // passing NULL for path means return magic object
- if ( path == NULL ) {
- // RTLD_FIRST means any dlsym() calls on the handle should only search that handle and not subsequent images
- if ( (mode & RTLD_FIRST) != 0 )
- return RTLD_MAIN_ONLY;
- else
- return RTLD_DEFAULT;
- }
-
- // acquire global dyld lock (dlopen is special - libSystem glue does not do locking)
- bool lockHeld = false;
- if ( (dyld::gLibSystemHelpers != NULL) && (dyld::gLibSystemHelpers->version >= 4) ) {
- dyld::gLibSystemHelpers->acquireGlobalDyldLock();
- lockHeld = true;
- }
-
- void* result = NULL;
- ImageLoader* image = NULL;
- std::vector<const char*> rpathsFromCallerImage;
- try {
- void* callerAddress = __builtin_return_address(1); // note layers: 1: real client, 0: libSystem glue
- ImageLoader* callerImage = dyld::findImageContainingAddress(callerAddress);
- // for dlopen, use rpath from caller image and from main executable
- if ( callerImage != NULL )
- callerImage->getRPaths(dyld::gLinkContext, rpathsFromCallerImage);
- ImageLoader::RPathChain callersRPaths(NULL, &rpathsFromCallerImage);
- if ( callerImage != dyld::mainExecutable() ) {
- dyld::mainExecutable()->getRPaths(dyld::gLinkContext, rpathsFromCallerImage);
- }
-
- dyld::LoadContext context;
- context.useSearchPaths = true;
- context.useLdLibraryPath= (strchr(path, '/') == NULL); // a leafname implies should search
- context.implicitRPath = (path[0] != '/'); // a non-absolute path implies try rpath searching
- context.matchByInstallName = true;
- context.dontLoad = ( (mode & RTLD_NOLOAD) != 0 );
- context.mustBeBundle = false;
- context.mustBeDylib = false;
- context.findDLL = ( (mode & RTLD_DLL) != 0 );
- context.origin = callerImage != NULL ? callerImage->getPath() : NULL; // caller's image's path
- context.rpath = &callersRPaths; // rpaths from caller and main executable
-
- image = load(path, context);
- if ( image != NULL ) {
- // bump reference count. Do this before link() so that if an initializer calls dlopen and fails
- // this image is not garbage collected
- image->incrementDlopenReferenceCount();
- // link in all dependents
- if ( (mode & RTLD_NOLOAD) == 0 ) {
- bool alreadyLinked = image->isLinked();
- bool forceLazysBound = ( (mode & RTLD_NOW) != 0 );
- dyld::link(image, forceLazysBound, callersRPaths);
- if ( ! alreadyLinked ) {
- // only hide exports if image is not already in use
- if ( (mode & RTLD_LOCAL) != 0 )
- image->setHideExports(true);
- }
- }
-
- // RTLD_NODELETE means don't unmap image even after dlclosed. This is what dlcompat did on Mac OS X 10.3
- // On other *nix OS's, it means dlclose() should do nothing, but the handle should be invalidated.
- // The subtle differences are:
- // 1) if the image has any termination routines, whether they are run during dlclose or when the process terminates
- // 2) If someone does a supsequent dlopen() on the same image, whether the same address should be used.
- if ( (mode & RTLD_NODELETE) != 0 )
- image->setLeaveMapped();
-
- // release global dyld lock early, this enables initializers to do threaded operations
- if ( lockHeld ) {
- dyld::gLibSystemHelpers->releaseGlobalDyldLock();
- lockHeld = false;
- }
-
- // RTLD_NOLOAD means dlopen should fail unless path is already loaded.
- // don't run initializers when RTLD_NOLOAD is set. This only matters if dlopen() is
- // called from within an initializer because it can cause initializers to run
- // out of order. Most uses of RTLD_NOLOAD are "probes". If they want initialzers
- // to run, then don't use RTLD_NOLOAD.
- if ( (mode & RTLD_NOLOAD) == 0 ) {
- // run initializers
- dyld::runInitializers(image);
- }
-
- // RTLD_FIRST means any dlsym() calls on the handle should only search that handle and not subsequent images
- // this is tracked by setting the low bit of the handle, which is usually zero by malloc alignment
- if ( (mode & RTLD_FIRST) != 0 )
- result = (void*)(((uintptr_t)image)|1);
- else
- result = image;
- }
- }
- catch (const char* msg) {
- if ( image != NULL ) {
- // load() succeeded but, link() failed
- // back down reference count and do GC
- image->decrementDlopenReferenceCount();
- dyld::garbageCollectImages();
- }
- const char* str = dyld::mkstringf("dlopen(%s, %d): %s", path, mode, msg);
- dlerrorSet(str);
- free((void*)str);
- free((void*)msg); // our free() will do nothing if msg is a string literal
- result = NULL;
- }
- // free rpaths (getRPaths() malloc'ed each string)
- for(std::vector<const char*>::iterator it=rpathsFromCallerImage.begin(); it != rpathsFromCallerImage.end(); ++it) {
- const char* str = *it;
- free((void*)str);
- }
-
- if ( lockHeld )
- dyld::gLibSystemHelpers->releaseGlobalDyldLock();
- return result;
-}
-
-
-
-int dlclose(void* handle)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p)\n", __func__, handle);
-
- // silently accept magic handles for main executable
- if ( handle == RTLD_MAIN_ONLY )
- return 0;
- if ( handle == RTLD_DEFAULT )
- return 0;
-
- ImageLoader* image = (ImageLoader*)(((uintptr_t)handle) & (-4)); // clear mode bits
- if ( dyld::validImage(image) ) {
- dlerrorClear();
- // decrement use count
- if ( image->decrementDlopenReferenceCount() ) {
- dlerrorSet("dlclose() called too many times");
- return -1;
- }
- // remove image if reference count went to zero
- dyld::garbageCollectImages();
- return 0;
- }
- else {
- dlerrorSet("invalid handle passed to dlclose()");
- return -1;
- }
-}
-
-
-
-int dladdr(const void* address, Dl_info* info)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p, %p)\n", __func__, address, info);
-
- ImageLoader* image = dyld::findImageContainingAddress(address);
- if ( image != NULL ) {
- info->dli_fname = image->getLogicalPath();
- info->dli_fbase = (void*)image->machHeader();
- // find closest exported symbol in the image
- const uint32_t exportCount = image->getExportedSymbolCount();
- const ImageLoader::Symbol* bestSym = NULL;
- const void* bestAddr = 0;
- for(uint32_t i=0; i < exportCount; ++i) {
- const ImageLoader::Symbol* sym = image->getIndexedExportedSymbol(i);
- const void* symAddr = (void*)image->getExportedSymbolAddress(sym, dyld::gLinkContext);
- if ( (symAddr <= address) && (bestAddr < symAddr) ) {
- bestSym = sym;
- bestAddr = symAddr;
- }
- }
- if ( bestSym != NULL ) {
- info->dli_sname = image->getExportedSymbolName(bestSym);
- if ( info->dli_sname[0] == '_' )
- info->dli_sname = info->dli_sname +1; // strip off leading underscore
- info->dli_saddr = (void*)bestAddr;
- }
- else {
- info->dli_sname = NULL;
- info->dli_saddr = NULL;
- }
- return 1; // success
- }
- return 0; // failure
-}
-
-
-char* dlerror()
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s()\n", __func__);
-
- if ( dyld::gLibSystemHelpers != NULL ) {
- // first char of buffer is flag whether string (starting at second char) is valid
- char* buffer = (*dyld::gLibSystemHelpers->getThreadBufferFor_dlerror)(2);
- if ( buffer[0] != '\0' ) { // if valid buffer
- buffer[0] = '\0'; // mark invalid, so next call to dlerror returns NULL
- return &buffer[1]; // return message
- }
- }
- return NULL;
-}
-
-void* dlsym(void* handle, const char* symbolName)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p, %s)\n", __func__, handle, symbolName);
-
- dlerrorClear();
-
- const ImageLoader* image;
- const ImageLoader::Symbol* sym;
-
- // dlsym() assumes symbolName passed in is same as in C source code
- // dyld assumes all symbol names have an underscore prefix
- char underscoredName[strlen(symbolName)+2];
- underscoredName[0] = '_';
- strcpy(&underscoredName[1], symbolName);
-
- // magic "search all" handle
- if ( handle == RTLD_DEFAULT ) {
- if ( dyld::flatFindExportedSymbol(underscoredName, &sym, &image) ) {
- return (void*)image->getExportedSymbolAddress(sym, dyld::gLinkContext);
- }
- const char* str = dyld::mkstringf("dlsym(RTLD_DEFAULT, %s): symbol not found", symbolName);
- dlerrorSet(str);
- free((void*)str);
- return NULL;
- }
-
- // magic "search only main executable" handle
- if ( handle == RTLD_MAIN_ONLY ) {
- image = dyld::mainExecutable();
- sym = image->findExportedSymbol(underscoredName, NULL, true, &image); // search RTLD_FIRST way
- if ( sym != NULL ) {
- return (void*)image->getExportedSymbolAddress(sym, dyld::gLinkContext);
- }
- const char* str = dyld::mkstringf("dlsym(RTLD_MAIN_ONLY, %s): symbol not found", symbolName);
- dlerrorSet(str);
- free((void*)str);
- return NULL;
- }
-
- // magic "search what I would see" handle
- if ( handle == RTLD_NEXT ) {
- void* callerAddress = __builtin_return_address(1); // note layers: 1: real client, 0: libSystem glue
- ImageLoader* callerImage = dyld::findImageContainingAddress(callerAddress);
- sym = callerImage->findExportedSymbolInDependentImages(underscoredName, dyld::gLinkContext, &image); // don't search image, but do search what it links against
- if ( sym != NULL ) {
- return (void*)image->getExportedSymbolAddress(sym, dyld::gLinkContext);
- }
- const char* str = dyld::mkstringf("dlsym(RTLD_NEXT, %s): symbol not found", symbolName);
- dlerrorSet(str);
- free((void*)str);
- return NULL;
- }
- // magic "search me, then what I would see" handle
- if ( handle == RTLD_SELF ) {
- void* callerAddress = __builtin_return_address(1); // note layers: 1: real client, 0: libSystem glue
- ImageLoader* callerImage = dyld::findImageContainingAddress(callerAddress);
- sym = callerImage->findExportedSymbolInImageOrDependentImages(underscoredName, dyld::gLinkContext, &image); // search image and what it links against
- if ( sym != NULL ) {
- return (void*)image->getExportedSymbolAddress(sym, dyld::gLinkContext);
- }
- const char* str = dyld::mkstringf("dlsym(RTLD_SELF, %s): symbol not found", symbolName);
- dlerrorSet(str);
- free((void*)str);
- return NULL;
- }
- // real handle
- image = (ImageLoader*)(((uintptr_t)handle) & (-4)); // clear mode bits
- if ( dyld::validImage(image) ) {
- if ( (((uintptr_t)handle) & 1) != 0 )
- sym = image->findExportedSymbol(underscoredName, NULL, true, &image); // search RTLD_FIRST way
- else
- sym = image->findExportedSymbolInImageOrDependentImages(underscoredName, dyld::gLinkContext, &image); // search image and what it links against
-
- if ( sym != NULL ) {
- return (void*)image->getExportedSymbolAddress(sym, dyld::gLinkContext);
- }
- const char* str = dyld::mkstringf("dlsym(%p, %s): symbol not found", handle, symbolName);
- dlerrorSet(str);
- free((void*)str);
- }
- else {
- dlerrorSet("invalid handle passed to dlsym()");
- }
- return NULL;
-}
-
-
-
-void* dlord(void* handle, uint32_t ordinal)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%p, %u)\n", __func__, handle, ordinal);
-
- dlerrorClear();
-
-
- // magic "search all" handle
- if ( handle == RTLD_DEFAULT ) {
- const char* str = dyld::mkstringf("dlord(RTLD_DEFAULT, %u): not supported", ordinal);
- dlerrorSet(str);
- free((void*)str);
- return NULL;
- }
- // magic "search only main executable" handle
- if ( handle == RTLD_MAIN_ONLY ) {
- const char* str = dyld::mkstringf("dlord(RTLD_MAIN_ONLY, %u): not supported", ordinal);
- dlerrorSet(str);
- free((void*)str);
- return NULL;
- }
- // magic "search what I would see" handle
- if ( handle == RTLD_NEXT ) {
- const char* str = dyld::mkstringf("dlord(RTLD_NEXT, %u): not supported", ordinal);
- dlerrorSet(str);
- free((void*)str);
- return NULL;
- }
- // magic "search me, then what I would see" handle
- if ( handle == RTLD_SELF ) {
- const char* str = dyld::mkstringf("dlord(RTLD_SELF, %u): not supported", ordinal);
- dlerrorSet(str);
- free((void*)str);
- return NULL;
- }
-
- // real handle
- const ImageLoader* image = (ImageLoader*)(((uintptr_t)handle) & (-4)); // clear mode bits
- if ( dyld::validImage(image) ) {
- const ImageLoader::Symbol* sym;
- sym = image->getIndexedExportedSymbol(ordinal-1); // map ordinals to mach-o zero based index
-
- if ( sym != NULL ) {
- return (void*)image->getExportedSymbolAddress(sym, dyld::gLinkContext);
- }
- const char* str = dyld::mkstringf("dlord(%p, %u): ordinal not found", handle, ordinal);
- dlerrorSet(str);
- free((void*)str);
- }
- else {
- dlerrorSet("invalid handle passed to dlord()");
- }
- return NULL;
-}
-
-
-
-
-
-
-
-
-
-
-static const struct dyld_all_image_infos* _dyld_get_all_image_infos()
-{
- return &dyld_all_image_infos;
-}
-
-
-
-void dyld_register_image_state_change_handler(dyld_image_states state, bool batch,
- dyld_image_state_change_handler handler)
-{
- if ( dyld::gLogAPIs )
- dyld::log("%s(%d, %d, %p)\n", __func__, state, batch, handler);
- if ( batch )
- dyld::registerImageStateBatchChangeHandler(state, handler);
- else
- dyld::registerImageStateSingleChangeHandler(state, handler);
-}
-
-
-
-
-
-
-
-