1 1.12 riastrad /* $NetBSD: atomic_or.S,v 1.12 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.12 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.6 chs ENTRY(_atomic_or_32) 37 1.7 matt movl 4(%sp), %a0 38 1.7 matt movl 8(%sp), %d0 39 1.8 matt orl %d0, (%a0) 40 1.2 ad rts 41 1.8 matt END(_atomic_or_32) 42 1.9 martin 43 1.2 ad ATOMIC_OP_ALIAS(atomic_or_32,_atomic_or_32) 44 1.2 ad ATOMIC_OP_ALIAS(atomic_or_uint,_atomic_or_32) 45 1.2 ad STRONG_ALIAS(_atomic_or_uint,_atomic_or_32) 46 1.2 ad ATOMIC_OP_ALIAS(atomic_or_ulong,_atomic_or_32) 47 1.2 ad STRONG_ALIAS(_atomic_or_ulong,_atomic_or_32) 48 1.3 ad ATOMIC_OP_ALIAS(atomic_or_ptr,_atomic_or_32) 49 1.3 ad STRONG_ALIAS(_atomic_or_ptr,_atomic_or_32) 50 1.2 ad 51 1.6 chs ENTRY(_atomic_or_32_nv) 52 1.7 matt movl 4(%sp), %a0 53 1.7 matt 1: movl (%a0), %d0 54 1.2 ad movl %d0, %d1 55 1.7 matt orl 8(%sp), %d0 56 1.8 matt casl %d1, %d0, (%a0) 57 1.2 ad bne 1b 58 1.9 martin movl %d0, %a0 59 1.2 ad rts 60 1.9 martin END(_atomic_or_32_nv) 61 1.9 martin 62 1.2 ad ATOMIC_OP_ALIAS(atomic_or_32_nv,_atomic_or_32_nv) 63 1.2 ad ATOMIC_OP_ALIAS(atomic_or_uint_nv,_atomic_or_32_nv) 64 1.2 ad STRONG_ALIAS(_atomic_or_uint_nv,_atomic_or_32_nv) 65 1.2 ad ATOMIC_OP_ALIAS(atomic_or_ulong_nv,_atomic_or_32_nv) 66 1.2 ad STRONG_ALIAS(_atomic_or_ulong_nv,_atomic_or_32_nv) 67 1.3 ad ATOMIC_OP_ALIAS(atomic_or_ptr_nv,_atomic_or_32_nv) 68 1.3 ad STRONG_ALIAS(_atomic_or_ptr_nv,_atomic_or_32_nv) 69 1.10 martin CRT_ALIAS(__sync_or_and_fetch_4, _atomic_or_32_nv) 70 1.9 martin 71 1.9 martin 72 1.9 martin ENTRY(__sync_fetch_and_or_4) 73 1.9 martin movl 4(%sp), %a0 74 1.9 martin 1: movl (%a0), %d0 75 1.9 martin movl %d0, %d1 76 1.9 martin orl 8(%sp), %d1 77 1.9 martin casl %d0, %d1, (%a0) 78 1.9 martin bne 1b 79 1.9 martin movl %d0, %a0 80 1.9 martin rts 81 1.9 martin END(__sync_fetch_and_or_4) 82 1.9 martin 83 1.9 martin 84 1.9 martin ENTRY(_atomic_or_16_nv) 85 1.9 martin movl 4(%sp), %a0 86 1.9 martin 1: movw (%a0), %d0 87 1.9 martin movw %d0, %d1 88 1.9 martin orw 8(%sp), %d0 89 1.9 martin casw %d1, %d0, (%a0) 90 1.9 martin bne 1b 91 1.9 martin rts 92 1.9 martin END(_atomic_or_16_nv) 93 1.10 martin CRT_ALIAS(__sync_or_and_fetch_2, _atomic_or_16_nv) 94 1.9 martin 95 1.9 martin ENTRY(__sync_fetch_and_or_2) 96 1.9 martin movl 4(%sp), %a0 97 1.9 martin 1: movw (%a0), %d0 98 1.9 martin movw %d0, %d1 99 1.9 martin orw 8(%sp), %d1 100 1.9 martin casw %d0, %d1, (%a0) 101 1.9 martin bne 1b 102 1.9 martin rts 103 1.9 martin END(__sync_fetch_and_or_2) 104 1.9 martin 105 1.9 martin 106 1.9 martin ENTRY(_atomic_or_8_nv) 107 1.9 martin movl 4(%sp), %a0 108 1.9 martin 1: movb (%a0), %d0 109 1.9 martin movb %d0, %d1 110 1.9 martin orb 8(%sp), %d0 111 1.9 martin casb %d1, %d0, (%a0) 112 1.9 martin bne 1b 113 1.9 martin rts 114 1.9 martin END(_atomic_or_8_nv) 115 1.10 martin CRT_ALIAS(__sync_or_and_fetch_1, _atomic_or_8_nv) 116 1.9 martin 117 1.9 martin ENTRY(__sync_fetch_and_or_1) 118 1.9 martin movl 4(%sp), %a0 119 1.9 martin 1: movb (%a0), %d0 120 1.9 martin movb %d0, %d1 121 1.9 martin orb 8(%sp), %d1 122 1.9 martin casb %d0, %d1, (%a0) 123 1.9 martin bne 1b 124 1.9 martin rts 125 1.9 martin END(__sync_fetch_and_or_1) 126 1.11 joerg 127 1.11 joerg CRT_ALIAS(__atomic_fetch_or_1,__sync_fetch_and_or_1) 128 1.11 joerg CRT_ALIAS(__atomic_fetch_or_2,__sync_fetch_and_or_2) 129 1.11 joerg CRT_ALIAS(__atomic_fetch_or_4,__sync_fetch_and_or_4) 130