/* $NetBSD: atomic_or_16.S,v 1.3.28.1 2021/08/11 17:05:42 martin Exp $ */ /*- * Copyright (c) 2013 The NetBSD Foundation, Inc. * All rights reserved. * * This code is derived from software contributed to The NetBSD Foundation * by Matt Thomas * * 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 NETBSD FOUNDATION, INC. 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 FOUNDATION 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. */ #include "atomic_op_asm.h" #if defined(_ARM_ARCH_6) ENTRY_NP(_atomic_or_16) mov ip, r0 1: ldrexh r0, [ip] /* load old value (to be returned) */ orrs r3, r0, r1 /* calculate new value */ strexh r2, r3, [ip] /* try to store */ cmp r2, #0 /* succeed? */ bne 1b /* no, try again */ RET /* return old value */ END(_atomic_or_16) ATOMIC_OP_ALIAS(atomic_or_16,_atomic_or_16) ATOMIC_OP_ALIAS(atomic_or_ushort,_atomic_or_16) CRT_ALIAS(__atomic_fetch_or_2,_atomic_or_16) STRONG_ALIAS(_atomic_or_ushort,_atomic_or_16) ENTRY_NP(__sync_fetch_and_or_2) push {r4, lr} DMB bl _atomic_or_16 DMB pop {r4, pc} END(__sync_fetch_and_or_2) ENTRY_NP(_atomic_or_16_nv) mov ip, r0 /* need r0 for return value */ 1: ldrexh r0, [ip] /* load old value */ orrs r0, r0, r1 /* calculate new value (return value) */ strexh r2, r0, [ip] /* try to store */ cmp r2, #0 /* succeed? */ bne 1b /* no, try again? */ RET /* return new value */ END(_atomic_or_16_nv) ATOMIC_OP_ALIAS(atomic_or_16_nv,_atomic_or_16_nv) ATOMIC_OP_ALIAS(atomic_or_ushort_nv,_atomic_or_16_nv) STRONG_ALIAS(_atomic_or_ushort_nv,_atomic_or_16_nv) ENTRY_NP(__sync_or_and_fetch_2) push {r4, lr} DMB bl _atomic_or_16_nv DMB pop {r4, pc} END(__sync_or_and_fetch_2) #endif /* _ARM_ARCH_6 */