Subversion Repositories HelenOS

Rev

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

Rev 2411 Rev 2464
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 arm32  
29
/** @addtogroup arm32  
30
 * @{
30
 * @{
31
 */
31
 */
32
/** @file
32
/** @file
33
 *  @brief Atomic operations.
33
 *  @brief Atomic operations.
34
 */
34
 */
35
 
35
 
36
#ifndef KERN_arm32_ATOMIC_H_
36
#ifndef KERN_arm32_ATOMIC_H_
37
#define KERN_arm32_ATOMIC_H_
37
#define KERN_arm32_ATOMIC_H_
38
 
38
 
39
/** Atomic addition.
39
/** Atomic addition.
40
 *
40
 *
41
 * @param val Where to add.
41
 * @param val Where to add.
42
 * @param i   Value to be added.
42
 * @param i   Value to be added.
43
 *
43
 *
44
 * @return Value after addition.
44
 * @return Value after addition.
45
 */
45
 */
46
static inline long atomic_add(atomic_t *val, int i)
46
static inline long atomic_add(atomic_t *val, int i)
47
{
47
{
48
    int ret;
48
    int ret;
49
    volatile long * mem = &(val->count);
49
    volatile long *mem = &(val->count);
50
 
50
 
51
    asm volatile (
51
    asm volatile (
52
        "1:                 \n"
52
    "1:\n"
53
        "ldr r2, [%1]       \n"
53
        "ldr r2, [%1]       \n"
54
        "add r3, r2, %2     \n"
54
        "add r3, r2, %2     \n"
55
        "str r3, %0         \n"
55
        "str r3, %0         \n"
56
        "swp r3, r3, [%1]   \n"
56
        "swp r3, r3, [%1]   \n"
57
        "cmp r3, r2         \n"
57
        "cmp r3, r2         \n"
58
        "bne 1b             \n"
58
        "bne 1b             \n"
59
 
59
 
60
        : "=m" (ret)
60
        : "=m" (ret)
61
        : "r" (mem), "r" (i)
61
        : "r" (mem), "r" (i)
62
        : "r3", "r2"
62
        : "r3", "r2"
63
    );
63
    );
64
 
64
 
65
    return ret;
65
    return ret;
66
}
66
}
67
 
67
 
68
 
-
 
69
/** Atomic increment.
68
/** Atomic increment.
70
 *
69
 *
71
 * @param val Variable to be incremented.
70
 * @param val Variable to be incremented.
72
 */
71
 */
73
static inline void atomic_inc(atomic_t *val) { atomic_add(val, 1); }
72
static inline void atomic_inc(atomic_t *val)
74
 
73
{
-
 
74
    atomic_add(val, 1);
-
 
75
}
75
 
76
 
76
/** Atomic decrement.
77
/** Atomic decrement.
77
 *
78
 *
78
 * @param val Variable to be decremented.
79
 * @param val Variable to be decremented.
79
 */
80
 */
80
static inline void atomic_dec(atomic_t *val) { atomic_add(val, -1); }
81
static inline void atomic_dec(atomic_t *val) {
-
 
82
    atomic_add(val, -1);
81
 
83
}
82
 
84
 
83
/** Atomic pre-increment.
85
/** Atomic pre-increment.
84
 *
86
 *
85
 * @param val Variable to be incremented.
87
 * @param val Variable to be incremented.
86
 * @return    Value after incrementation.
88
 * @return    Value after incrementation.
87
 */
89
 */
88
static inline long atomic_preinc(atomic_t *val) { return atomic_add(val, 1); }
90
static inline long atomic_preinc(atomic_t *val)
89
 
91
{
-
 
92
    return atomic_add(val, 1);
-
 
93
}
90
 
94
 
91
/** Atomic pre-decrement.
95
/** Atomic pre-decrement.
92
 *
96
 *
93
 * @param val Variable to be decremented.
97
 * @param val Variable to be decremented.
94
 * @return    Value after decrementation.
98
 * @return    Value after decrementation.
95
 */
99
 */
96
static inline long atomic_predec(atomic_t *val) { return atomic_add(val, -1); }
100
static inline long atomic_predec(atomic_t *val)
97
 
101
{
-
 
102
    return atomic_add(val, -1);
-
 
103
}
98
 
104
 
99
/** Atomic post-increment.
105
/** Atomic post-increment.
100
 *
106
 *
101
 * @param val Variable to be incremented.
107
 * @param val Variable to be incremented.
102
 * @return    Value before incrementation.
108
 * @return    Value before incrementation.
103
 */
109
 */
104
static inline long atomic_postinc(atomic_t *val) { return atomic_add(val, 1) - 1; }
110
static inline long atomic_postinc(atomic_t *val)
105
 
111
{
-
 
112
    return atomic_add(val, 1) - 1;
-
 
113
}
106
 
114
 
107
/** Atomic post-decrement.
115
/** Atomic post-decrement.
108
 *
116
 *
109
 * @param val Variable to be decremented.
117
 * @param val Variable to be decremented.
110
 * @return    Value before decrementation.
118
 * @return    Value before decrementation.
111
 */
119
 */
112
static inline long atomic_postdec(atomic_t *val) { return atomic_add(val, -1) + 1; }
120
static inline long atomic_postdec(atomic_t *val)
113
 
121
{
-
 
122
    return atomic_add(val, -1) + 1;
-
 
123
}
114
 
124
 
115
#endif
125
#endif
116
 
126
 
117
/** @}
127
/** @}
118
 */
128
 */
119
 
129