/*
* Copyright (c) 1999-2007 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@
*/
#include "SYS.h"
#if defined(__ppc__) || defined(__ppc64__)
.data
.globl __current_pid
.align 2
__current_pid:
.long 0
MI_ENTRY_POINT(___getpid)
#if defined(__DYNAMIC__)
mflr r0 // note we cannot use MI_GET_ADDRESS...
bcl 20,31,1f // ...because we define __current_pid
1:
mflr r5
mtlr r0
addis r5, r5, ha16(__current_pid - 1b)
addi r5, r5, lo16(__current_pid - 1b)
#else
lis r5,hi16(__current_pid)
ori r5,r5,lo16(__current_pid)
#endif
lwz r3,0(r5) // get the cached pid
cmpwi r3,0 // if positive,
bgtlr++ // return it
SYSCALL_NONAME(getpid, 0)
lwarx r4,0,r5 // see if we can cache it
cmpwi r4,0 // we can't if there are any...
blt-- 1f // ...vforks in progress
stwcx. r3,0,r5 // ignore cache conflicts
blr
1:
li r6,-4 // on 970, cancel the reservation using red zone...
stwcx. r3,r6,r1 // ...to avoid an errata
blr
#elif defined(__i386__)
.data
.private_extern __current_pid
__current_pid:
.long 0
L__current_pid_addr = __current_pid
#if defined(__DYNAMIC__)
#define GET_CURRENT_PID \
call 0f popl %ecx
#define __current_pid (%ecx)
#else
#define GET_CURRENT_PID
#endif
/*
* If __current_pid is > 0, return it, else make syscall.
* If __current_pid is 0, cache result of syscall.
*/
TEXT
LEAF(___getpid, 0)
GET_CURRENT_PID
movl __current_pid, %eax
testl %eax, %eax
jle 1f
ret
1:
UNIX_SYSCALL_NONAME(getpid, 0)
movl %eax, %edx
xorl %eax, %eax
GET_CURRENT_PID
lock
cmpxchgl %edx, __current_pid
movl %edx, %eax
ret
#elif defined(__x86_64__)
.data
.private_extern __current_pid
__current_pid:
.long 0
/*
* If __current_pid is > 0, return it, else make syscall.
* If __current_pid is 0, cache result of syscall.
*/
TEXT
LEAF(___getpid, 0)
movl __current_pid(%rip), %eax
testl %eax, %eax
jle 1f
ret
1:
UNIX_SYSCALL_NONAME(getpid, 0)
movl %eax, %edx
xorl %eax, %eax
leaq __current_pid(%rip), %rcx
lock
cmpxchgl %edx, (%rcx)
movl %edx, %eax
ret
#else
#error Unsupported architecture
#endif