Subversion Repositories HelenOS

Rev

Rev 2313 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 2313 Rev 2350
1
/*
1
/*
2
 * Copyright (c) 2007 Michal Kebrt
2
 * Copyright (c) 2007 Michal Kebrt
3
 * All rights reserved.
3
 * All rights reserved.
4
 *
4
 *
5
 * Redistribution and use in source and binary forms, with or without
5
 * Redistribution and use in source and binary forms, with or without
6
 * modification, are permitted provided that the following conditions
6
 * modification, are permitted provided that the following conditions
7
 * are met:
7
 * are met:
8
 *
8
 *
9
 * - Redistributions of source code must retain the above copyright
9
 * - Redistributions of source code must retain the above copyright
10
 *   notice, this list of conditions and the following disclaimer.
10
 *   notice, this list of conditions and the following disclaimer.
11
 * - Redistributions in binary form must reproduce the above copyright
11
 * - Redistributions in binary form must reproduce the above copyright
12
 *   notice, this list of conditions and the following disclaimer in the
12
 *   notice, this list of conditions and the following disclaimer in the
13
 *   documentation and/or other materials provided with the distribution.
13
 *   documentation and/or other materials provided with the distribution.
14
 * - The name of the author may not be used to endorse or promote products
14
 * - The name of the author may not be used to endorse or promote products
15
 *   derived from this software without specific prior written permission.
15
 *   derived from this software without specific prior written permission.
16
 *
16
 *
17
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
17
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
18
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
21
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
22
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
23
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
24
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
25
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27
 */
27
 */
28
 
28
 
29
/** @addtogroup libcarm32  
29
/** @addtogroup libcarm32  
30
 * @{
30
 * @{
31
 */
31
 */
32
/** @file
32
/** @file
-
 
33
 *  @brief Atomic operations.
33
 */
34
 */
34
 
35
 
35
#ifndef LIBC_arm32_ATOMIC_H_
36
#ifndef LIBC_arm32_ATOMIC_H_
36
#define LIBC_arm32_ATOMIC_H_
37
#define LIBC_arm32_ATOMIC_H_
37
 
38
 
38
/** Atomic addition.
39
/** Atomic addition.
39
 *
40
 *
40
 * @param val "Atomic variable".
41
 * @param val Where to add.
41
 * @param i Value to add.
42
 * @param i   Value to be added.
42
 *
43
 *
43
 * @return Value after addition.
44
 * @return Value after addition.
44
 */
45
 */
45
static inline long atomic_add(atomic_t *val, int i)
46
static inline long atomic_add(atomic_t *val, int i)
46
{
47
{
47
    int ret;
48
    int ret;
48
    volatile long * mem = &(val->count);
49
    volatile long * mem = &(val->count);
49
 
50
 
50
    asm volatile (
51
    asm volatile (
51
        "1:                 \n"
52
        "1:                 \n"
52
        "ldr r2, [%1]       \n"
53
        "ldr r2, [%1]       \n"
53
        "add r3, r2, %2     \n"
54
        "add r3, r2, %2     \n"
54
        "str r3, %0         \n"
55
        "str r3, %0         \n"
55
        "swp r3, r3, [%1]   \n"
56
        "swp r3, r3, [%1]   \n"
56
        "cmp r3, r2         \n"
57
        "cmp r3, r2         \n"
57
        "bne 1b             \n"
58
        "bne 1b             \n"
58
 
59
 
59
        : "=m" (ret)
60
        : "=m" (ret)
60
        : "r" (mem), "r" (i)
61
        : "r" (mem), "r" (i)
61
        : "r3", "r2"
62
        : "r3", "r2"
62
    );
63
    );
63
 
64
 
64
    return ret;
65
    return ret;
65
}
66
}
66
 
67
 
-
 
68
 
-
 
69
/** Atomic increment.
-
 
70
 *
-
 
71
 * @param val Variable to be incremented.
-
 
72
 */
67
static inline void atomic_inc(atomic_t *val) { atomic_add(val, 1); }
73
static inline void atomic_inc(atomic_t *val) { atomic_add(val, 1); }
-
 
74
 
-
 
75
/** Atomic decrement.
-
 
76
 *
-
 
77
 * @param val Variable to be decremented.
-
 
78
 */
68
static inline void atomic_dec(atomic_t *val) { atomic_add(val, -1); }
79
static inline void atomic_dec(atomic_t *val) { atomic_add(val, -1); }
69
 
80
 
-
 
81
/** Atomic pre-increment.
-
 
82
 *
-
 
83
 * @param val Variable to be incremented.
-
 
84
 * @return    Value after incrementation.
-
 
85
 */
70
static inline long atomic_preinc(atomic_t *val) { return atomic_add(val, 1); }
86
static inline long atomic_preinc(atomic_t *val) { return atomic_add(val, 1); }
-
 
87
 
-
 
88
/** Atomic pre-decrement.
-
 
89
 *
-
 
90
 * @param val Variable to be decremented.
-
 
91
 * @return    Value after decrementation.
-
 
92
 */
71
static inline long atomic_predec(atomic_t *val) { return atomic_add(val, -1); }
93
static inline long atomic_predec(atomic_t *val) { return atomic_add(val, -1); }
72
 
94
 
-
 
95
/** Atomic post-increment.
-
 
96
 *
-
 
97
 * @param val Variable to be incremented.
-
 
98
 * @return    Value before incrementation.
-
 
99
 */
73
static inline long atomic_postinc(atomic_t *val) { return atomic_add(val, 1) - 1; }
100
static inline long atomic_postinc(atomic_t *val) { return atomic_add(val, 1) - 1; }
-
 
101
 
-
 
102
/** Atomic post-decrement.
-
 
103
 *
-
 
104
 * @param val Variable to be decremented.
-
 
105
 * @return    Value before decrementation.
-
 
106
 */
74
static inline long atomic_postdec(atomic_t *val) { return atomic_add(val, -1) + 1; }
107
static inline long atomic_postdec(atomic_t *val) { return atomic_add(val, -1) + 1; }
75
 
108
 
-
 
109
 
76
#endif
110
#endif
77
 
111
 
78
/** @}
112
/** @}
79
 */
113
 */
80
 
114