1 /*
2 Copyright (C) 2004-2008 Grame
3 
4 This program is free software; you can redistribute it and/or modify
5 it under the terms of the GNU Lesser General Public License as published by
6 the Free Software Foundation; either version 2.1 of the License, or
7 (at your option) any later version.
8 
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12 GNU Lesser General Public License for more details.
13 
14 You should have received a copy of the GNU Lesser General Public License
15 along with this program; if not, write to the Free Software
16 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
17 
18 */
19 
20 #ifndef __JackAtomic_APPLE__
21 #define __JackAtomic_APPLE__
22 
23 #include "JackTypes.h"
24 
25 #if defined(__ppc__) || defined(__ppc64__)
26 
CAS(register UInt32 value,register UInt32 newvalue,register volatile void * addr)27 static inline int CAS(register UInt32 value, register UInt32 newvalue, register volatile void* addr)
28 {
29     register int result;
30     asm volatile (
31         "# CAS					\n"
32         "	lwarx	r0, 0, %1	\n"         // creates a reservation on addr
33         "	cmpw	r0, %2		\n"			//  test value at addr
34         "	bne-	1f          \n"
35         "	sync            	\n"         //  synchronize instructions
36         "	stwcx.	%3, 0, %1	\n"         //  if the reservation is not altered
37         //  stores the new value at addr
38         "	bne-	1f          \n"
39         "   li      %0, 1       \n"
40         "	b		2f          \n"
41         "1:                     \n"
42         "   li      %0, 0       \n"
43         "2:                     \n"
44         : "=r" (result)
45         : "r" (addr), "r" (value), "r" (newvalue)
46         : "r0"
47         );
48     return result;
49 }
50 
51 #endif
52 
53 #if defined(__i386__) || defined(__x86_64__)
54 
55 #define LOCK "lock ; "
56 
CAS(volatile UInt32 value,UInt32 newvalue,volatile void * addr)57 static inline char CAS(volatile UInt32 value, UInt32 newvalue, volatile void* addr)
58 {
59     register char ret;
60     __asm__ __volatile__ (
61         "# CAS \n\t"
62         LOCK "cmpxchg %2, (%1) \n\t"
63         "sete %0               \n\t"
64         : "=a" (ret)
65         : "c" (addr), "d" (newvalue), "a" (value)
66         );
67     return ret;
68 }
69 
70 #endif
71 
72 #endif
73 
74