/* -*- mode: C++; c-basic-offset: 4; tab-width: 4 -*- * * Copyright (c) 2004-2005 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@ */ #include <stddef.h> #include <stdlib.h> #include <string.h> #include <stdio.h> #include <notify.h> #include <time.h> // // Stub functions needed for dyld to link with libc.a instead of libSystem.dylib // // static char* dyld_progname = "dyld"; // // libc has calls to _dyld_lookup_and_bind to find args and environment. Since // dyld links with a staic copy of libc, those calls need to find dyld's args and env // not the host process. We implement a special _dyld_lookup_and_bind() that // just knows how to bind the few symbols needed by dyld. // void _dyld_lookup_and_bind(const char* symbolName, void** address, void* module) { if ( strcmp(symbolName, "_environ") == 0 ) { // dummy up empty environment list static char *p = NULL; static char **pp = &p; *address = &pp; return; } else if ( strcmp(symbolName, "___progname") == 0 ) { *address = &dyld_progname; return; } fprintf(stderr, "dyld: internal error: unknown symbol '%s'\n", symbolName); } int NSIsSymbolNameDefined(const char* symbolName) { if ( strcmp(symbolName, "___progname") == 0 ) { return 1; } fprintf(stderr, "dyld: internal error: unknown symbol '%s'\n", symbolName); return 0; } /* * To avoid linking in libm. These variables are defined as they are used in * pthread_init() to put in place a fast sqrt(). */ size_t hw_sqrt_len = 0; double sqrt(double x) { return(0.0); } double hw_sqrt(double x) { return(0.0); } /* * More stubs to avoid linking in libm. This works as along as we don't use * long doubles. */ long __fpclassifyd(double x) { return(0); } long __fpclassify(long double x) { return(0); } char* __hdtoa(double d, const char *xdigs, int ndigits, int *decpt, int *sign, char **rve) { return NULL; } char* __hldtoa(/*long*/ double e, const char *xdigs, int ndigits, int *decpt, int *sign, char **rve) { return NULL; } int __fegetfltrounds(void) { return 1; /* FE_NEAREST */ } int fegetround(void) { return 1; } /* * We have our own localtime() to avoid needing the notify API which is used * by the code in libc.a for localtime() but is in libnotify. */ struct tm* localtime(const time_t* t) { return (struct tm*)NULL; } /* * On ppc64, the C++ runtime references strftime & wcsftime, but they * never actually get called, and they try to use all the localtime() * machinery, so stub them out. */ size_t strftime(char * __restrict p1, size_t p2, const char * __restrict p3, const struct tm * __restrict p4) { return 0; } size_t wcsftime(wchar_t * __restrict p1, size_t p2, const wchar_t * __restrict p3, const struct tm * __restrict p4) { return 0; } int __strtopdd (const char* p1, char** p2, double* p3) { return 0; } char* __ldtoa(long double *ld, int mode, int ndigits, int *decpt, int *sign, char **rve) { return "__ldtoa"; } int __hexnan_D2A(const char **sp, void *fpi, unsigned long *x0) { return 0; }