Loading...
mach/mach_init.c Libc-391.2.6 /dev/null
--- Libc/Libc-391.2.6/mach/mach_init.c
+++ /dev/null
@@ -1,265 +0,0 @@
-/*
- * Copyright (c) 1999 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@
- */
-/* 
- * Mach Operating System
- * Copyright (c) 1991,1990,1989,1988,1987 Carnegie Mellon University
- * All Rights Reserved.
- * 
- * Permission to use, copy, modify and distribute this software and its
- * documentation is hereby granted, provided that both the copyright
- * notice and this permission notice appear in all copies of the
- * software, derivative works or modified versions, and any portions
- * thereof, and that both notices appear in supporting documentation.
- * 
- * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
- * CONDITION.  CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND FOR
- * ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
- * 
- * Carnegie Mellon requests users of this software to return to
- * 
- *  Software Distribution Coordinator  or  Software.Distribution@CS.CMU.EDU
- *  School of Computer Science
- *  Carnegie Mellon University
- *  Pittsburgh PA 15213-3890
- * 
- * any improvements or extensions that they make and grant Carnegie Mellon
- * the rights to redistribute these changes.
- */
-
-#include <mach/mach.h>
-#include <mach/boolean.h>
-#include <mach/machine/ndr_def.h>
-#include <mach/mach_traps.h>
-#include <mach/mach_host.h>
-#include <mach/mach_init.h>
-#include "externs.h"
-
-mach_port_t	mach_task_self_ = MACH_PORT_NULL;
-mach_port_t     mach_host_self_ = MACH_PORT_NULL;
-
-__private_extern__ kern_return_t _host_mach_msg_trap_return_;
-
-vm_size_t	vm_page_size;
-vm_size_t	vm_page_mask;
-int		vm_page_shift;
-
-/*
- * Forward internal declarations for automatic mach_init during
- * fork() implementation.
- */
-/* fork() calls through atfork_child_routine */
-void (*_atfork_child_routine)(void);
-
-static void mach_atfork_child_routine(void);
-static boolean_t first = TRUE;
-static void (*previous_atfork_child_routine)(void);
-static boolean_t mach_init_inited = FALSE;
-extern int mach_init(void);
-extern void _pthread_set_self(void *);
-extern void cthread_set_self(void *);
-extern void other_libc_init(void);
-
-
-static void mach_atfork_child_routine(void)
-{
-	/*
-	 * If an (*_atfork_child_routine)() was registered when
-	 * mach_init was first called, then call that routine
-	 * prior to performing our re-initialization. This ensures
-	 * that the post-fork handlers are called in exactly the
-	 * same order as the crt0 (exec) handlers. Any library 
-	 * that makes use of the _atfork_child_routine must follow
-	 * the same technique.
-	 */
-	if (previous_atfork_child_routine) {
-		(*previous_atfork_child_routine)();
-	}
-	mach_init_inited = FALSE;
-	mach_init();
-}
-
-mach_port_t
-mach_host_self()
-{
-        return(host_self_trap());
-}
-
-int mach_init_doit(int forkchild)
-{
-	host_t host;
-
-	/*
-	 *	Get the important ports into the cached values,
-	 *	as required by "mach_init.h".
-	 */
-	 
-	mach_task_self_ = task_self_trap();
-	host = host_self_trap();
-
-
-	if (!forkchild) {
-		/*
-		 * Set up the post-fork child handler in the libc stub
-		 * to invoke this routine if this process forks. Save the
-		 * previous value in order that we can call that handler
-		 * prior to performing our postfork work.
-		 */
-            
-		first = FALSE;
-		previous_atfork_child_routine = _atfork_child_routine;
-		_atfork_child_routine = mach_atfork_child_routine;
-                _pthread_set_self(0);
-                cthread_set_self(0);
-	}
-
-	/*
-	 *	Initialize the single mig reply port
-	 */
-
-	mig_init(0);
-
-	/*
-	 *	Cache some other valuable system constants
-	 */
-
-#if defined(__ppc64__) /* NGK hack for now */
-	vm_page_size = 4096;
-#else
-	(void)host_page_size(host, &vm_page_size);
-#endif
-	vm_page_mask = vm_page_size - 1;
-	if (vm_page_size == 0) {
-		/* guard against unlikely craziness */
-		vm_page_shift = 0;
-	} else {
-		/*
-		 * Unfortunately there's no kernel interface to get the
-		 * vm_page_shift, but it's easy enough to calculate.
-		 */
-		for (vm_page_shift = 0;
-		     (vm_page_size & (1 << vm_page_shift)) == 0;
-		     vm_page_shift++)
-			continue;
-	}
-
-	mach_port_deallocate(mach_task_self_, host);
-
-	mach_init_ports();
-
-#if WE_REALLY_NEED_THIS_GDB_HACK
-	/*
-	 * Check to see if GDB wants us to stop
-	 */
-	{
-	  task_user_data_data_t	user_data;
-	  mach_msg_type_number_t	user_data_count = TASK_USER_DATA_COUNT;
-	  
-	user_data.user_data = 0;
-	(void)task_info(mach_task_self_, TASK_USER_DATA,
-		(task_info_t)&user_data, &user_data_count);
-#define MACH_GDB_RUN_MAGIC_NUMBER 1
-#ifdef	MACH_GDB_RUN_MAGIC_NUMBER	
-	  /* This magic number is set in mach-aware gdb 
-	   *  for RUN command to allow us to suspend user's
-	   *  executable (linked with this libmach!) 
-	   *  with the code below.
-	* This hack should disappear when gdb improves.
-	*/
-	if ((int)user_data.user_data == MACH_GDB_RUN_MAGIC_NUMBER) {
-	    kern_return_t ret;
-	    user_data.user_data = 0;
-	    
-	    ret = task_suspend (mach_task_self_);
-	    if (ret != KERN_SUCCESS) {
-		while(1) (void)task_terminate(mach_task_self_);
-	    }
-	}
-#undef MACH_GDB_RUN_MAGIC_NUMBER  
-#endif /* MACH_GDB_RUN_MAGIC_NUMBER */
-	}
-#endif /* WE_REALLY_NEED_THIS_GDB_HACK */
-
-	/*
-         * Reserve page 0 so that the program doesn't get it as
-	 * the result of a vm_allocate() or whatever.
-	 */
-	{
-		vm_offset_t zero_page_start;
-
-		zero_page_start = 0;
-		(void)vm_map(mach_task_self_, &zero_page_start, vm_page_size,
-			     0, FALSE, MEMORY_OBJECT_NULL, 0, TRUE,
-			     VM_PROT_NONE, VM_PROT_NONE, VM_INHERIT_COPY);
-		/* ignore result, we don't care if it failed */
-	}
-
-	return(0);
-}
-
-#ifdef __DYNAMIC__
-/* libc_initializer is the dyld initializer for libc (3760827) */
-static void libc_initializer() __attribute__((constructor));
-static void
-libc_initializer()
-{
-	mach_init();
-}
-#endif /* __DYNAMIC__ */
-
-/* mach_init may get called from the initializer and from crt.c, but only
- * call mach_init_doit() once */
-int mach_init(void)
-{
-	int ret;
-
-	if (mach_init_inited)
-		return(0);
-	mach_init_inited = TRUE;
-	ret = mach_init_doit(0);
-
-	/* Do other Libc initialization */
-	other_libc_init();
-
-	return ret;
-}
-
-int	(*mach_init_routine)(void) = mach_init;
-int fork_mach_init()
-{
-	/* called only from child */
-	return(mach_init_doit(1));
-}
-
-#undef	mach_task_self
-
-mach_port_t
-mach_task_self()
-{
-	return(task_self_trap());
-}
-
-mach_port_t
-mach_thread_self()
-{
-	return(thread_self_trap());
-}