Cider Isn't Darwin Emulation, Really
Something went wrong. Try again.
3.4 kB · 117 lines
at newperm
123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118// Modified by Lubos Dolezel for Darling/* * Copyright (c) 1999-2010 Apple Inc. All rights reserved. * * @APPLE_OSREFERENCE_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. The rights granted to you under the License * may not be used to create, or enable the creation or redistribution of, * unlawful or unlicensed copies of an Apple operating system, or to * circumvent, violate, or enable the circumvention or violation of, any * terms of an Apple operating system software license agreement. * * 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_OSREFERENCE_LICENSE_HEADER_END@ *//* Copyright (c) 1992 NeXT Computer, Inc. All rights reserved. * * File: libc/ppc/sys/fork.s * * HISTORY * 18-Nov-92 Ben Fathi (benf@next.com) * Created from M88K sources * * 11-Jan-92 Peter King (king@next.com) * Created from M68K sources */ /* * All of the asm stubs in this file have been adjusted so the pre/post * fork handlers and dyld fixup are done in C inside Libc. As such, Libc * expects the __fork asm to fix up the return code to be -1, 0 or pid * and errno if needed. */#include "SYS.h"#if defined(__i386__)LEAF(___fork, 0) subl $28, %esp // Align the stack, with 16 bytes of extra padding that we'll need movl $ SYS_fork,%eax; // code for fork -> eax UNIX_SYSCALL_TRAP // do the system call jnc L1 // jump if CF==0 CALL_EXTERN(tramp_cerror) movl $-1,%eax addl $28, %esp // restore the stack ret L1: orl %edx,%edx // CF=OF=0, ZF set if zero result jz L2 // parent, since r1 == 0 in parent, 1 in child //child here... xorl %eax,%eax // zero eax REG_TO_EXTERN(%eax, __current_pid);L2: addl $28, %esp // restore the stack // parent ends up here skipping child portion ret#elif defined(__x86_64__)LEAF(___fork, 0) subq $24, %rsp // Align the stack, plus room for local storage#ifndef DARLING movl $ SYSCALL_CONSTRUCT_UNIX(SYS_fork),%eax; // code for fork -> rax UNIX_SYSCALL_TRAP // do the system call jnc L1 // jump if CF==0#else movl $ SYS_fork, %eax call __darling_bsd_syscall cmpq $0, %rax jnb L1#endif movq %rax, %rdi CALL_EXTERN(_cerror) movq $-1, %rax addq $24, %rsp // restore the stack ret L1:#ifndef DARLING orl %edx,%edx // CF=OF=0, ZF set if zero result jz L2 // parent, since r1 == 0 in parent, 1 in child#else testl %eax, %eax jnz L2#endif //child here... xorq %rax, %rax PICIFY(__current_pid) movl %eax,(%r11)L2: // parent ends up here skipping child portion addq $24, %rsp // restore the stack ret#else#error Unsupported architecture#endif