atomic_cas.S revision 1.5.24.1
1 1.5.24.1 tls /* $NetBSD: atomic_cas.S,v 1.5.24.1 2014/08/19 23:45:13 tls Exp $ */ 2 1.2 ad 3 1.2 ad /*- 4 1.3 ad * Copyright (c) 2007, 2008 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.2 ad * 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.5 chs ENTRY(_atomic_cas_32) 37 1.5.24.1 tls movl 4(%sp), %a0 38 1.5.24.1 tls movl 8(%sp), %d0 39 1.5.24.1 tls movl 12(%sp), %d1 40 1.5.24.1 tls casl %d0, %d1, (%a0) 41 1.2 ad /* %d0 now contains the old value */ 42 1.2 ad movl %d0, %a0 /* pointers return also in %a0 */ 43 1.2 ad rts 44 1.5.24.1 tls END(_atomic_cas_32) 45 1.3 ad 46 1.2 ad ATOMIC_OP_ALIAS(atomic_cas_32,_atomic_cas_32) 47 1.2 ad ATOMIC_OP_ALIAS(atomic_cas_uint,_atomic_cas_32) 48 1.2 ad STRONG_ALIAS(_atomic_cas_uint,_atomic_cas_32) 49 1.2 ad ATOMIC_OP_ALIAS(atomic_cas_ulong,_atomic_cas_32) 50 1.2 ad STRONG_ALIAS(_atomic_cas_ulong,_atomic_cas_32) 51 1.2 ad ATOMIC_OP_ALIAS(atomic_cas_ptr,_atomic_cas_32) 52 1.2 ad STRONG_ALIAS(_atomic_cas_ptr,_atomic_cas_32) 53 1.5.24.1 tls CRT_ALIAS(__sync_val_compare_and_swap_4,_atomic_cas_32) 54 1.3 ad 55 1.3 ad ATOMIC_OP_ALIAS(atomic_cas_32_ni,_atomic_cas_32) 56 1.3 ad STRONG_ALIAS(_atomic_cas_32_ni,_atomic_cas_32) 57 1.3 ad ATOMIC_OP_ALIAS(atomic_cas_uint_ni,_atomic_cas_32) 58 1.3 ad STRONG_ALIAS(_atomic_cas_uint_ni,_atomic_cas_32) 59 1.3 ad ATOMIC_OP_ALIAS(atomic_cas_ulong_ni,_atomic_cas_32) 60 1.3 ad STRONG_ALIAS(_atomic_cas_ulong_ni,_atomic_cas_32) 61 1.3 ad ATOMIC_OP_ALIAS(atomic_cas_ptr_ni,_atomic_cas_32) 62 1.3 ad STRONG_ALIAS(_atomic_cas_ptr_ni,_atomic_cas_32) 63 1.5.24.1 tls 64 1.5.24.1 tls ENTRY(__sync_bool_compare_and_swap_4) 65 1.5.24.1 tls movl 4(%sp), %a0 66 1.5.24.1 tls movl 8(%sp), %d3 67 1.5.24.1 tls movl %d3, %d2 68 1.5.24.1 tls movl 12(%sp), %d1 69 1.5.24.1 tls casl %d3, %d1, (%a0) 70 1.5.24.1 tls /* %d3 now contains the old value */ 71 1.5.24.1 tls beq 1f 72 1.5.24.1 tls clrl %d0 /* return false */ 73 1.5.24.1 tls rts 74 1.5.24.1 tls 1: movl #1, %d0 /* return success */ 75 1.5.24.1 tls rts 76 1.5.24.1 tls END(__sync_bool_compare_and_swap_4) 77 1.5.24.1 tls 78 1.5.24.1 tls ENTRY(_atomic_cas_16) 79 1.5.24.1 tls movl 4(%sp), %a0 80 1.5.24.1 tls movw 8(%sp), %d0 81 1.5.24.1 tls movw 10(%sp), %d1 82 1.5.24.1 tls casw %d0, %d1, (%a0) 83 1.5.24.1 tls /* %d0 now contains the old value */ 84 1.5.24.1 tls rts 85 1.5.24.1 tls END(_atomic_cas_16) 86 1.5.24.1 tls 87 1.5.24.1 tls ATOMIC_OP_ALIAS(atomic_cas_16,_atomic_cas_16) 88 1.5.24.1 tls CRT_ALIAS(__sync_val_compare_and_swap_2,_atomic_cas_16) 89 1.5.24.1 tls 90 1.5.24.1 tls ENTRY(__sync_bool_compare_and_swap_2) 91 1.5.24.1 tls movl 4(%sp), %a0 92 1.5.24.1 tls movw 8(%sp), %d3 93 1.5.24.1 tls movw %d3, %d2 94 1.5.24.1 tls movw 10(%sp), %d1 95 1.5.24.1 tls casw %d3, %d1, (%a0) 96 1.5.24.1 tls /* %d3 now contains the old value */ 97 1.5.24.1 tls beq 1f 98 1.5.24.1 tls clrl %d0 /* return failure */ 99 1.5.24.1 tls rts 100 1.5.24.1 tls 1: movl #1, %d0 /* return success */ 101 1.5.24.1 tls rts 102 1.5.24.1 tls END(__sync_bool_compare_and_swap_2) 103 1.5.24.1 tls 104 1.5.24.1 tls ENTRY(_atomic_cas_8) 105 1.5.24.1 tls movl 4(%sp), %a0 106 1.5.24.1 tls movb 8(%sp), %d0 107 1.5.24.1 tls movb 9(%sp), %d1 108 1.5.24.1 tls casb %d0, %d1, (%a0) 109 1.5.24.1 tls /* %d0 now contains the old value */ 110 1.5.24.1 tls rts 111 1.5.24.1 tls END(_atomic_cas_8) 112 1.5.24.1 tls 113 1.5.24.1 tls ATOMIC_OP_ALIAS(atomic_cas_8,_atomic_cas_8) 114 1.5.24.1 tls CRT_ALIAS(__sync_val_compare_and_swap_1,_atomic_cas_8) 115 1.5.24.1 tls 116 1.5.24.1 tls 117 1.5.24.1 tls ENTRY(__sync_bool_compare_and_swap_1) 118 1.5.24.1 tls movl 4(%sp), %a0 119 1.5.24.1 tls movb 8(%sp), %d3 120 1.5.24.1 tls movb %d3, %d2 121 1.5.24.1 tls movb 9(%sp), %d1 122 1.5.24.1 tls casb %d3, %d1, (%a0) 123 1.5.24.1 tls /* %d3 now contains the old value */ 124 1.5.24.1 tls beq 1f 125 1.5.24.1 tls clrl %d0 /* return failure */ 126 1.5.24.1 tls rts 127 1.5.24.1 tls 1: movl #1, %d0 /* return success */ 128 1.5.24.1 tls rts 129 1.5.24.1 tls END(__sync_bool_compare_and_swap_1) 130 1.5.24.1 tls 131
Indexes created Thu Oct 02 01:09:59 GMT 2025