6846a68073
atomic_fetchadd_32. Without it gcc would use it as input
register for v and sometimes generate following code for
function call like atomic_fetchadd_32(&(fp)->f_count, -1):
801238b4: 2402ffff li v0,-1
801238b8: c2230018 ll v1,24(s1)
801238bc: 00431021 addu v0,v0,v1
801238c0: e2220018 sc v0,24(s1)
801238c4: 1040fffc beqz v0,801238b8 <dupfdopen+0x2e8>
801238c8: 00000000 nop
Which is definitly wrong because if sc fails v0 is set to 0
and previous value of -1 is overriden hence whole operation
turns to bogus
448 lines
14 KiB
C
448 lines
14 KiB
C
/*-
|
|
* Copyright (c) 1998 Doug Rabson
|
|
* All rights reserved.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
|
|
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
|
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
|
* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
|
|
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
|
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
|
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
|
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
|
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
|
|
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
|
|
* SUCH DAMAGE.
|
|
*
|
|
* from: src/sys/alpha/include/atomic.h,v 1.21.2.3 2005/10/06 18:12:05 jhb
|
|
* $FreeBSD$
|
|
*/
|
|
|
|
#ifndef _MACHINE_ATOMIC_H_
|
|
#define _MACHINE_ATOMIC_H_
|
|
|
|
#ifndef _SYS_CDEFS_H_
|
|
#error this file needs sys/cdefs.h as a prerequisite
|
|
#endif
|
|
|
|
static __inline void
|
|
mips_sync(void)
|
|
{
|
|
__asm __volatile (".set noreorder\n\t"
|
|
"sync\n\t"
|
|
"nop\n\t"
|
|
"nop\n\t"
|
|
"nop\n\t"
|
|
"nop\n\t"
|
|
"nop\n\t"
|
|
"nop\n\t"
|
|
"nop\n\t"
|
|
"nop\n\t"
|
|
".set reorder\n"
|
|
: : : "memory");
|
|
}
|
|
|
|
#define mb() mips_sync()
|
|
#define wmb() mips_sync()
|
|
#define rmb() mips_sync()
|
|
|
|
/*
|
|
* Various simple arithmetic on memory which is atomic in the presence
|
|
* of interrupts and SMP safe.
|
|
*/
|
|
|
|
void atomic_set_8(__volatile uint8_t *, uint8_t);
|
|
void atomic_clear_8(__volatile uint8_t *, uint8_t);
|
|
void atomic_add_8(__volatile uint8_t *, uint8_t);
|
|
void atomic_subtract_8(__volatile uint8_t *, uint8_t);
|
|
|
|
void atomic_set_16(__volatile uint16_t *, uint16_t);
|
|
void atomic_clear_16(__volatile uint16_t *, uint16_t);
|
|
void atomic_add_16(__volatile uint16_t *, uint16_t);
|
|
void atomic_subtract_16(__volatile uint16_t *, uint16_t);
|
|
|
|
static __inline void
|
|
atomic_set_32(__volatile uint32_t *p, uint32_t v)
|
|
{
|
|
uint32_t temp;
|
|
|
|
__asm __volatile (
|
|
"1:\tll %0, %3\n\t" /* load old value */
|
|
"or %0, %2, %0\n\t" /* calculate new value */
|
|
"sc %0, %1\n\t" /* attempt to store */
|
|
"beqz %0, 1b\n\t" /* spin if failed */
|
|
: "=&r" (temp), "=m" (*p)
|
|
: "r" (v), "m" (*p)
|
|
: "memory");
|
|
|
|
}
|
|
|
|
static __inline void
|
|
atomic_clear_32(__volatile uint32_t *p, uint32_t v)
|
|
{
|
|
uint32_t temp;
|
|
v = ~v;
|
|
|
|
__asm __volatile (
|
|
"1:\tll %0, %3\n\t" /* load old value */
|
|
"and %0, %2, %0\n\t" /* calculate new value */
|
|
"sc %0, %1\n\t" /* attempt to store */
|
|
"beqz %0, 1b\n\t" /* spin if failed */
|
|
: "=&r" (temp), "=m" (*p)
|
|
: "r" (v), "m" (*p)
|
|
: "memory");
|
|
}
|
|
|
|
static __inline void
|
|
atomic_add_32(__volatile uint32_t *p, uint32_t v)
|
|
{
|
|
uint32_t temp;
|
|
|
|
__asm __volatile (
|
|
"1:\tll %0, %3\n\t" /* load old value */
|
|
"addu %0, %2, %0\n\t" /* calculate new value */
|
|
"sc %0, %1\n\t" /* attempt to store */
|
|
"beqz %0, 1b\n\t" /* spin if failed */
|
|
: "=&r" (temp), "=m" (*p)
|
|
: "r" (v), "m" (*p)
|
|
: "memory");
|
|
}
|
|
|
|
static __inline void
|
|
atomic_subtract_32(__volatile uint32_t *p, uint32_t v)
|
|
{
|
|
uint32_t temp;
|
|
|
|
__asm __volatile (
|
|
"1:\tll %0, %3\n\t" /* load old value */
|
|
"subu %0, %2\n\t" /* calculate new value */
|
|
"sc %0, %1\n\t" /* attempt to store */
|
|
"beqz %0, 1b\n\t" /* spin if failed */
|
|
: "=&r" (temp), "=m" (*p)
|
|
: "r" (v), "m" (*p)
|
|
: "memory");
|
|
}
|
|
|
|
static __inline uint32_t
|
|
atomic_readandclear_32(__volatile uint32_t *addr)
|
|
{
|
|
uint32_t result,temp;
|
|
|
|
__asm __volatile (
|
|
"1:\tll %0,%3\n\t" /* load current value, asserting lock */
|
|
"li %1,0\n\t" /* value to store */
|
|
"sc %1,%2\n\t" /* attempt to store */
|
|
"beqz %1, 1b\n\t" /* if the store failed, spin */
|
|
: "=&r"(result), "=&r"(temp), "=m" (*addr)
|
|
: "m" (*addr)
|
|
: "memory");
|
|
|
|
return result;
|
|
}
|
|
|
|
static __inline uint32_t
|
|
atomic_readandset_32(__volatile uint32_t *addr, uint32_t value)
|
|
{
|
|
uint32_t result,temp;
|
|
|
|
__asm __volatile (
|
|
"1:\tll %0,%3\n\t" /* load current value, asserting lock */
|
|
"or %1,$0,%4\n\t"
|
|
"sc %1,%2\n\t" /* attempt to store */
|
|
"beqz %1, 1b\n\t" /* if the store failed, spin */
|
|
: "=&r"(result), "=&r"(temp), "=m" (*addr)
|
|
: "m" (*addr), "r" (value)
|
|
: "memory");
|
|
|
|
return result;
|
|
}
|
|
|
|
#define ATOMIC_ACQ_REL(NAME, WIDTH) \
|
|
static __inline void \
|
|
atomic_##NAME##_acq_##WIDTH(__volatile uint##WIDTH##_t *p, uint##WIDTH##_t v)\
|
|
{ \
|
|
atomic_##NAME##_##WIDTH(p, v); \
|
|
mips_sync(); \
|
|
} \
|
|
\
|
|
static __inline void \
|
|
atomic_##NAME##_rel_##WIDTH(__volatile uint##WIDTH##_t *p, uint##WIDTH##_t v)\
|
|
{ \
|
|
mips_sync(); \
|
|
atomic_##NAME##_##WIDTH(p, v); \
|
|
}
|
|
|
|
/* Variants of simple arithmetic with memory barriers. */
|
|
ATOMIC_ACQ_REL(set, 8)
|
|
ATOMIC_ACQ_REL(clear, 8)
|
|
ATOMIC_ACQ_REL(add, 8)
|
|
ATOMIC_ACQ_REL(subtract, 8)
|
|
ATOMIC_ACQ_REL(set, 16)
|
|
ATOMIC_ACQ_REL(clear, 16)
|
|
ATOMIC_ACQ_REL(add, 16)
|
|
ATOMIC_ACQ_REL(subtract, 16)
|
|
ATOMIC_ACQ_REL(set, 32)
|
|
ATOMIC_ACQ_REL(clear, 32)
|
|
ATOMIC_ACQ_REL(add, 32)
|
|
ATOMIC_ACQ_REL(subtract, 32)
|
|
#if 0
|
|
ATOMIC_ACQ_REL(set, 64)
|
|
ATOMIC_ACQ_REL(clear, 64)
|
|
ATOMIC_ACQ_REL(add, 64)
|
|
ATOMIC_ACQ_REL(subtract, 64)
|
|
#endif
|
|
|
|
#undef ATOMIC_ACQ_REL
|
|
|
|
/*
|
|
* We assume that a = b will do atomic loads and stores.
|
|
*/
|
|
#define ATOMIC_STORE_LOAD(WIDTH) \
|
|
static __inline uint##WIDTH##_t \
|
|
atomic_load_acq_##WIDTH(__volatile uint##WIDTH##_t *p) \
|
|
{ \
|
|
uint##WIDTH##_t v; \
|
|
\
|
|
v = *p; \
|
|
mips_sync(); \
|
|
return (v); \
|
|
} \
|
|
\
|
|
static __inline void \
|
|
atomic_store_rel_##WIDTH(__volatile uint##WIDTH##_t *p, uint##WIDTH##_t v)\
|
|
{ \
|
|
mips_sync(); \
|
|
*p = v; \
|
|
}
|
|
|
|
ATOMIC_STORE_LOAD(32)
|
|
ATOMIC_STORE_LOAD(64)
|
|
void atomic_store_64 (__volatile uint64_t *, uint64_t *);
|
|
void atomic_load_64 (__volatile uint64_t *, uint64_t *);
|
|
|
|
#undef ATOMIC_STORE_LOAD
|
|
|
|
/*
|
|
* Atomically compare the value stored at *p with cmpval and if the
|
|
* two values are equal, update the value of *p with newval. Returns
|
|
* zero if the compare failed, nonzero otherwise.
|
|
*/
|
|
static __inline uint32_t
|
|
atomic_cmpset_32(__volatile uint32_t* p, uint32_t cmpval, uint32_t newval)
|
|
{
|
|
uint32_t ret;
|
|
|
|
__asm __volatile (
|
|
"1:\tll %0, %4\n\t" /* load old value */
|
|
"bne %0, %2, 2f\n\t" /* compare */
|
|
"move %0, %3\n\t" /* value to store */
|
|
"sc %0, %1\n\t" /* attempt to store */
|
|
"beqz %0, 1b\n\t" /* if it failed, spin */
|
|
"j 3f\n\t"
|
|
"2:\n\t"
|
|
"li %0, 0\n\t"
|
|
"3:\n"
|
|
: "=&r" (ret), "=m" (*p)
|
|
: "r" (cmpval), "r" (newval), "m" (*p)
|
|
: "memory");
|
|
|
|
return ret;
|
|
}
|
|
|
|
/*
|
|
* Atomically compare the value stored at *p with cmpval and if the
|
|
* two values are equal, update the value of *p with newval. Returns
|
|
* zero if the compare failed, nonzero otherwise.
|
|
*/
|
|
static __inline uint32_t
|
|
atomic_cmpset_acq_32(__volatile uint32_t *p, uint32_t cmpval, uint32_t newval)
|
|
{
|
|
int retval;
|
|
|
|
retval = atomic_cmpset_32(p, cmpval, newval);
|
|
mips_sync();
|
|
return (retval);
|
|
}
|
|
|
|
static __inline uint32_t
|
|
atomic_cmpset_rel_32(__volatile uint32_t *p, uint32_t cmpval, uint32_t newval)
|
|
{
|
|
mips_sync();
|
|
return (atomic_cmpset_32(p, cmpval, newval));
|
|
}
|
|
|
|
/*
|
|
* Atomically add the value of v to the integer pointed to by p and return
|
|
* the previous value of *p.
|
|
*/
|
|
static __inline uint32_t
|
|
atomic_fetchadd_32(__volatile uint32_t *p, uint32_t v)
|
|
{
|
|
uint32_t value, temp;
|
|
|
|
__asm __volatile (
|
|
"1:\tll %0, %1\n\t" /* load old value */
|
|
"addu %2, %3, %0\n\t" /* calculate new value */
|
|
"sc %2, %1\n\t" /* attempt to store */
|
|
"beqz %2, 1b\n\t" /* spin if failed */
|
|
: "=&r" (value), "=m" (*p), "=&r" (temp)
|
|
: "r" (v), "m" (*p));
|
|
return (value);
|
|
}
|
|
|
|
/* Operations on chars. */
|
|
#define atomic_set_char atomic_set_8
|
|
#define atomic_set_acq_char atomic_set_acq_8
|
|
#define atomic_set_rel_char atomic_set_rel_8
|
|
#define atomic_clear_char atomic_clear_8
|
|
#define atomic_clear_acq_char atomic_clear_acq_8
|
|
#define atomic_clear_rel_char atomic_clear_rel_8
|
|
#define atomic_add_char atomic_add_8
|
|
#define atomic_add_acq_char atomic_add_acq_8
|
|
#define atomic_add_rel_char atomic_add_rel_8
|
|
#define atomic_subtract_char atomic_subtract_8
|
|
#define atomic_subtract_acq_char atomic_subtract_acq_8
|
|
#define atomic_subtract_rel_char atomic_subtract_rel_8
|
|
|
|
/* Operations on shorts. */
|
|
#define atomic_set_short atomic_set_16
|
|
#define atomic_set_acq_short atomic_set_acq_16
|
|
#define atomic_set_rel_short atomic_set_rel_16
|
|
#define atomic_clear_short atomic_clear_16
|
|
#define atomic_clear_acq_short atomic_clear_acq_16
|
|
#define atomic_clear_rel_short atomic_clear_rel_16
|
|
#define atomic_add_short atomic_add_16
|
|
#define atomic_add_acq_short atomic_add_acq_16
|
|
#define atomic_add_rel_short atomic_add_rel_16
|
|
#define atomic_subtract_short atomic_subtract_16
|
|
#define atomic_subtract_acq_short atomic_subtract_acq_16
|
|
#define atomic_subtract_rel_short atomic_subtract_rel_16
|
|
|
|
/* Operations on ints. */
|
|
#define atomic_set_int atomic_set_32
|
|
#define atomic_set_acq_int atomic_set_acq_32
|
|
#define atomic_set_rel_int atomic_set_rel_32
|
|
#define atomic_clear_int atomic_clear_32
|
|
#define atomic_clear_acq_int atomic_clear_acq_32
|
|
#define atomic_clear_rel_int atomic_clear_rel_32
|
|
#define atomic_add_int atomic_add_32
|
|
#define atomic_add_acq_int atomic_add_acq_32
|
|
#define atomic_add_rel_int atomic_add_rel_32
|
|
#define atomic_subtract_int atomic_subtract_32
|
|
#define atomic_subtract_acq_int atomic_subtract_acq_32
|
|
#define atomic_subtract_rel_int atomic_subtract_rel_32
|
|
#define atomic_cmpset_int atomic_cmpset_32
|
|
#define atomic_cmpset_acq_int atomic_cmpset_acq_32
|
|
#define atomic_cmpset_rel_int atomic_cmpset_rel_32
|
|
#define atomic_load_acq_int atomic_load_acq_32
|
|
#define atomic_store_rel_int atomic_store_rel_32
|
|
#define atomic_readandclear_int atomic_readandclear_32
|
|
#define atomic_readandset_int atomic_readandset_32
|
|
#define atomic_fetchadd_int atomic_fetchadd_32
|
|
|
|
#ifdef __mips64
|
|
/* Operations on longs. */
|
|
#define atomic_set_long atomic_set_64
|
|
#define atomic_set_acq_long atomic_set_acq_64
|
|
#define atomic_set_rel_long atomic_set_rel_64
|
|
#define atomic_clear_long atomic_clear_64
|
|
#define atomic_clear_acq_long atomic_clear_acq_64
|
|
#define atomic_clear_rel_long atomic_clear_rel_64
|
|
#define atomic_add_long atomic_add_64
|
|
#define atomic_add_acq_long atomic_add_acq_64
|
|
#define atomic_add_rel_long atomic_add_rel_64
|
|
#define atomic_subtract_long atomic_subtract_64
|
|
#define atomic_subtract_acq_long atomic_subtract_acq_64
|
|
#define atomic_subtract_rel_long atomic_subtract_rel_64
|
|
#define atomic_cmpset_long atomic_cmpset_64
|
|
#define atomic_cmpset_acq_long atomic_cmpset_acq_64
|
|
#define atomic_cmpset_rel_long atomic_cmpset_rel_64
|
|
#define atomic_load_acq_long atomic_load_acq_64
|
|
#define atomic_store_rel_long atomic_store_rel_64
|
|
#define atomic_fetchadd_long atomic_fetchadd_64
|
|
#define atomic_readandclear_long atomic_readandclear_64
|
|
|
|
/* Operations on pointers. */
|
|
#define atomic_set_ptr atomic_set_64
|
|
#define atomic_set_acq_ptr atomic_set_acq_64
|
|
#define atomic_set_rel_ptr atomic_set_rel_64
|
|
#define atomic_clear_ptr atomic_clear_64
|
|
#define atomic_clear_acq_ptr atomic_clear_acq_64
|
|
#define atomic_clear_rel_ptr atomic_clear_rel_64
|
|
#define atomic_add_ptr atomic_add_64
|
|
#define atomic_add_acq_ptr atomic_add_acq_64
|
|
#define atomic_add_rel_ptr atomic_add_rel_64
|
|
#define atomic_subtract_ptr atomic_subtract_64
|
|
#define atomic_subtract_acq_ptr atomic_subtract_acq_64
|
|
#define atomic_subtract_rel_ptr atomic_subtract_rel_64
|
|
#define atomic_cmpset_ptr atomic_cmpset_64
|
|
#define atomic_cmpset_acq_ptr atomic_cmpset_acq_64
|
|
#define atomic_cmpset_rel_ptr atomic_cmpset_rel_64
|
|
#define atomic_load_acq_ptr atomic_load_acq_64
|
|
#define atomic_store_rel_ptr atomic_store_rel_64
|
|
#define atomic_readandclear_ptr atomic_readandclear_64
|
|
|
|
#else /* __mips64 */
|
|
|
|
/* Operations on longs. */
|
|
#define atomic_set_long atomic_set_32
|
|
#define atomic_set_acq_long atomic_set_acq_32
|
|
#define atomic_set_rel_long atomic_set_rel_32
|
|
#define atomic_clear_long atomic_clear_32
|
|
#define atomic_clear_acq_long atomic_clear_acq_32
|
|
#define atomic_clear_rel_long atomic_clear_rel_32
|
|
#define atomic_add_long(p, v) \
|
|
atomic_add_32((volatile u_int *)(p), (u_int)(v))
|
|
#define atomic_add_acq_long atomic_add_acq_32
|
|
#define atomic_add_rel_long atomic_add_rel_32
|
|
#define atomic_subtract_long(p, v) \
|
|
atomic_subtract_32((volatile u_int *)(p), (u_int)(v))
|
|
#define atomic_subtract_acq_long atomic_subtract_acq_32
|
|
#define atomic_subtract_rel_long atomic_subtract_rel_32
|
|
#define atomic_cmpset_long atomic_cmpset_32
|
|
#define atomic_cmpset_acq_long(p, cmpval, newval) \
|
|
atomic_cmpset_acq_32((volatile u_int *)(p), \
|
|
(u_int)(cmpval), (u_int)(newval))
|
|
#define atomic_cmpset_rel_long(p, cmpval, newval) \
|
|
atomic_cmpset_rel_32((volatile u_int *)(p), \
|
|
(u_int)(cmpval), (u_int)(newval))
|
|
#define atomic_load_acq_long atomic_load_acq_32
|
|
#define atomic_store_rel_long atomic_store_rel_32
|
|
#define atomic_fetchadd_long(p, v) \
|
|
atomic_fetchadd_32((volatile u_int *)(p), (u_int)(v))
|
|
#define atomic_readandclear_long atomic_readandclear_32
|
|
|
|
/* Operations on pointers. */
|
|
#define atomic_set_ptr atomic_set_32
|
|
#define atomic_set_acq_ptr atomic_set_acq_32
|
|
#define atomic_set_rel_ptr atomic_set_rel_32
|
|
#define atomic_clear_ptr atomic_clear_32
|
|
#define atomic_clear_acq_ptr atomic_clear_acq_32
|
|
#define atomic_clear_rel_ptr atomic_clear_rel_32
|
|
#define atomic_add_ptr atomic_add_32
|
|
#define atomic_add_acq_ptr atomic_add_acq_32
|
|
#define atomic_add_rel_ptr atomic_add_rel_32
|
|
#define atomic_subtract_ptr atomic_subtract_32
|
|
#define atomic_subtract_acq_ptr atomic_subtract_acq_32
|
|
#define atomic_subtract_rel_ptr atomic_subtract_rel_32
|
|
#define atomic_cmpset_ptr atomic_cmpset_32
|
|
#define atomic_cmpset_acq_ptr(dst, old, new) \
|
|
atomic_cmpset_acq_32((volatile u_int *)(dst), \
|
|
(u_int)(old), (u_int)(new))
|
|
#define atomic_cmpset_rel_ptr atomic_cmpset_rel_32
|
|
#define atomic_load_acq_ptr atomic_load_acq_32
|
|
#define atomic_store_rel_ptr atomic_store_rel_32
|
|
#define atomic_readandclear_ptr atomic_readandclear_32
|
|
#endif /* __mips64 */
|
|
|
|
#endif /* ! _MACHINE_ATOMIC_H_ */
|