libkern/x86_64/OSAtomic.s

   1 /*
   2  * Copyright (c) 2000 Apple Computer, Inc. All rights reserved.
   3  *
   4  * @APPLE_OSREFERENCE_LICENSE_HEADER_START@
   5  *
   6  * This file contains Original Code and/or Modifications of Original Code
   7  * as defined in and that are subject to the Apple Public Source License
   8  * Version 2.0 (the 'License'). You may not use this file except in
   9  * compliance with the License. The rights granted to you under the License
  10  * may not be used to create, or enable the creation or redistribution of,
  11  * unlawful or unlicensed copies of an Apple operating system, or to
  12  * circumvent, violate, or enable the circumvention or violation of, any
  13  * terms of an Apple operating system software license agreement.
  14  *
  15  * Please obtain a copy of the License at
  16  * http://www.opensource.apple.com/apsl/ and read it before using this file.
  17  *
  18  * The Original Code and all software distributed under the License are
  19  * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
  20  * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
  21  * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
  22  * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
  23  * Please see the License for the specific language governing rights and
  24  * limitations under the License.
  25  *
  26  * @APPLE_OSREFERENCE_LICENSE_HEADER_END@
  27  */
  28
  29 #;***************************************************************************
  30 #;* Boolean OSCompareAndSwap(SInt32 oldValue, SInt32 newValue, SInt32 *ptr) *
  31 #;***************************************************************************
  32
  33         .globl _OSCompareAndSwap
  34
  35 // TODO FIXME!!
  36 _OSCompareAndSwap: #;oldValue, newValue, ptr
  37         movl             %edi, %eax
  38         lock
  39         cmpxchgl        %esi, 0(%rdx)   #; CAS (eax is an implicit operand)
  40         sete            %al                             #; did CAS succeed? (TZ=1)
  41         movzbq          %al, %rax               #; clear out the high bytes
  42         ret
  43
  44 #;*****************************************************************************
  45 #;* Boolean OSCompareAndSwap64(SInt64 oldValue, SInt64 newValue, SInt64 *ptr) *
  46 #;*****************************************************************************
  47
  48         .globl _OSCompareAndSwap64
  49         .globl _OSCompareAndSwapPtr
  50
  51 _OSCompareAndSwap64:
  52 _OSCompareAndSwapPtr: #;oldValue, newValue, ptr
  53         movq             %rdi, %rax
  54         lock
  55         cmpxchgq        %rsi, 0(%rdx)   #; CAS (eax is an implicit operand)
  56         sete            %al                             #; did CAS succeed? (TZ=1)
  57         movzbq          %al, %rax               #; clear out the high bytes
  58         ret
  59
  60 #;*******************************************************
  61 #;* SInt64 OSAddAtomic64(SInt64 theAmount, SInt64 *ptr) *
  62 #;*******************************************************
  63
  64         .globl  _OSAddAtomicLong
  65         .globl  _OSAddAtomic64
  66 _OSAddAtomic64:
  67 _OSAddAtomicLong:
  68         lock
  69         xaddq   %rdi, 0(%rsi)           #; Atomic exchange and add
  70         movq    %rdi, %rax;
  71         ret
  72
  73
  74 #;*******************************************************
  75 #; SInt32 OSAddAtomic(SInt32 delta, SInt32 *address)
  76 #;*******************************************************
  77
  78         .globl  _OSAddAtomic
  79 _OSAddAtomic:
  80         lock
  81         xaddl   %edi, 0(%rsi)           #; Atomic exchange and add
  82         movl    %edi, %eax;
  83         ret