1 1.10 riastrad /* $NetBSD: atomic_swap.S,v 1.10 2022/04/06 22:47:56 riastradh Exp $ */ 2 1.2 ad 3 1.2 ad /*- 4 1.2 ad * Copyright (c) 2007 The NetBSD Foundation, Inc. 5 1.2 ad * All rights reserved. 6 1.2 ad * 7 1.2 ad * This code is derived from software contributed to The NetBSD Foundation 8 1.2 ad * by Jason R. Thorpe. 9 1.2 ad * 10 1.2 ad * Redistribution and use in source and binary forms, with or without 11 1.2 ad * modification, are permitted provided that the following conditions 12 1.2 ad * are met: 13 1.2 ad * 1. Redistributions of source code must retain the above copyright 14 1.2 ad * notice, this list of conditions and the following disclaimer. 15 1.2 ad * 2. Redistributions in binary form must reproduce the above copyright 16 1.2 ad * notice, this list of conditions and the following disclaimer in the 17 1.2 ad * documentation and/or other materials provided with the distribution. 18 1.10 riastrad * 19 1.2 ad * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 20 1.2 ad * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 21 1.2 ad * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 22 1.2 ad * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 23 1.2 ad * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 24 1.2 ad * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 25 1.2 ad * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 26 1.2 ad * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 27 1.2 ad * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 28 1.2 ad * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 29 1.2 ad * POSSIBILITY OF SUCH DAMAGE. 30 1.2 ad */ 31 1.2 ad 32 1.2 ad #include "atomic_op_asm.h" 33 1.2 ad 34 1.2 ad .text 35 1.2 ad 36 1.4 chs ENTRY(_atomic_swap_32) 37 1.5 matt movl 4(%sp), %a0 38 1.5 matt 1: movl (%a0), %d0 39 1.5 matt movl 8(%sp), %d1 40 1.6 matt casl %d0, %d1, (%a0) 41 1.2 ad bne 1b 42 1.2 ad /* %d0 now contains the old value */ 43 1.2 ad movl %d0, %a0 /* pointers return also in %a0 */ 44 1.2 ad rts 45 1.6 matt END(_atomic_swap_32) 46 1.2 ad ATOMIC_OP_ALIAS(atomic_swap_32,_atomic_swap_32) 47 1.2 ad ATOMIC_OP_ALIAS(atomic_swap_uint,_atomic_swap_32) 48 1.2 ad STRONG_ALIAS(_atomic_swap_uint,_atomic_swap_32) 49 1.2 ad ATOMIC_OP_ALIAS(atomic_swap_ulong,_atomic_swap_32) 50 1.2 ad STRONG_ALIAS(_atomic_swap_ulong,_atomic_swap_32) 51 1.2 ad ATOMIC_OP_ALIAS(atomic_swap_ptr,_atomic_swap_32) 52 1.2 ad STRONG_ALIAS(_atomic_swap_ptr,_atomic_swap_32) 53 1.8 martin CRT_ALIAS(__sync_lock_test_and_set_4,_atomic_swap_32) 54 1.9 joerg CRT_ALIAS(__atomic_exchange_4,_atomic_swap_32) 55 1.7 martin 56 1.7 martin 57 1.7 martin ENTRY(_atomic_swap_16) 58 1.7 martin movl 4(%sp), %a0 59 1.7 martin 1: movw (%a0), %d0 60 1.7 martin movw 8(%sp), %d1 61 1.7 martin casw %d0, %d1, (%a0) 62 1.7 martin bne 1b 63 1.7 martin /* %d0 now contains the old value */ 64 1.7 martin rts 65 1.7 martin END(_atomic_swap_16) 66 1.7 martin ATOMIC_OP_ALIAS(atomic_swap_16,_atomic_swap_16) 67 1.8 martin CRT_ALIAS(__sync_lock_test_and_set_2,_atomic_swap_16) 68 1.9 joerg CRT_ALIAS(__atomic_exchange_2,_atomic_swap_16) 69 1.7 martin 70 1.7 martin ENTRY(_atomic_swap_8) 71 1.7 martin movl 4(%sp), %a0 72 1.7 martin 1: movb (%a0), %d0 73 1.7 martin movb 8(%sp), %d1 74 1.7 martin casb %d0, %d1, (%a0) 75 1.7 martin bne 1b 76 1.7 martin /* %d0 now contains the old value */ 77 1.7 martin rts 78 1.7 martin END(_atomic_swap_8) 79 1.7 martin ATOMIC_OP_ALIAS(atomic_swap_8,_atomic_swap_8) 80 1.8 martin CRT_ALIAS(__sync_lock_test_and_set_1,_atomic_swap_8) 81 1.9 joerg CRT_ALIAS(__atomic_exchange_1,_atomic_swap_8) 82