PR157: ARM memory barrier
[cacao.git] / src / vm / jit / arm / md-atomic.hpp
1 /* src/vm/jit/arm/atomic.hpp - ARM atomic instructions
2
3    Copyright (C) 2008
4    CACAOVM - Verein zur Foerderung der freien virtuellen Maschine CACAO
5
6    This file is part of CACAO.
7
8    This program is free software; you can redistribute it and/or
9    modify it under the terms of the GNU General Public License as
10    published by the Free Software Foundation; either version 2, or (at
11    your option) any later version.
12
13    This program is distributed in the hope that it will be useful, but
14    WITHOUT ANY WARRANTY; without even the implied warranty of
15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
16    General Public License for more details.
17
18    You should have received a copy of the GNU General Public License
19    along with this program; if not, write to the Free Software
20    Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
21    02110-1301, USA.
22
23 */
24
25
26 #ifndef _MD_ATOMIC_HPP
27 #define _MD_ATOMIC_HPP
28
29 #include "config.h"
30
31 #include <stdint.h>
32
33 #include "threads/atomic.hpp"
34
35 /* Apparently, this is the best way to define a memory barrier on Linux.
36  * See for example: http://icedtea.classpath.org/hg/icedtea6/file/7c7835fceadc/ports/hotspot/src/os_cpu/linux_zero/vm/orderAccess_linux_zero.inline.hpp#l29
37  */
38 typedef void (__kernel_dmb_t)(void);
39 #define __kernel_dmb (*(__kernel_dmb_t *)0xffff0fa0)
40
41 namespace Atomic_md {
42
43 /**
44  * An atomic compare and swap for 32-bit integer values.
45  *
46  * @param p      Pointer to memory address.
47  * @param oldval Old value to be expected.
48  * @param newval New value to be stored.
49  *
50  * @return value of the memory location before the store
51  */
52 inline uint32_t compare_and_swap(volatile uint32_t *p, uint32_t oldval, uint32_t newval)
53 {
54         return __sync_val_compare_and_swap(p, oldval, newval);
55 }
56
57
58 /**
59  * An atomic compare and swap for 64-bit integer values.
60  *
61  * @param p      Pointer to memory address.
62  * @param oldval Old value to be expected.
63  * @param newval New value to be stored.
64  *
65  * @return value of the memory location before the store
66  */
67 inline uint64_t compare_and_swap(volatile uint64_t *p, uint64_t oldval, uint64_t newval)
68 {
69         return Atomic::generic_compare_and_swap(p, oldval, newval);
70 }
71
72
73 /**
74  * A memory barrier.
75  */
76 inline void memory_barrier(void)
77 {
78         __kernel_dmb();
79 }
80
81
82 /**
83  * A write memory barrier.
84  */
85 inline void write_memory_barrier(void)
86 {
87         __kernel_dmb();
88 }
89
90
91 /**
92  * An instruction barrier.
93  */
94 inline void instruction_barrier(void)
95 {
96         __asm__ __volatile__ ("" : : : "memory");
97 }
98
99 }
100
101 #endif // _MD_ATOMIC_HPP
102
103
104 /*
105  * These are local overrides for various environment variables in Emacs.
106  * Please do not remove this and leave it at the end of the file, where
107  * Emacs will automagically detect them.
108  * ---------------------------------------------------------------------
109  * Local variables:
110  * mode: c++
111  * indent-tabs-mode: t
112  * c-basic-offset: 4
113  * tab-width: 4
114  * End:
115  * vim:noexpandtab:sw=4:ts=4:
116  */