atomic_cas.S revision 1.9 1 /* $NetBSD: atomic_cas.S,v 1.9 2020/03/01 23:23:36 rin Exp $ */
2
3 /*-
4 * Copyright (c) 2007, 2008 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Jason R. Thorpe.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29 * POSSIBILITY OF SUCH DAMAGE.
30 */
31
32 #include "atomic_op_asm.h"
33
34 __RCSID("$NetBSD: atomic_cas.S,v 1.9 2020/03/01 23:23:36 rin Exp $")
35
36 .text
37 ENTRY(_atomic_cas_32)
38 mr %r10,%r3
39 1: lwarx %r3,0,%r10
40 cmpw %r3,%r4
41 bnelr-
42 IBM405_ERRATA77_DCBT(0,%r10)
43 stwcx. %r5,0,%r10
44 beqlr+
45 b 1b
46 END(_atomic_cas_32)
47
48 ATOMIC_OP_ALIAS(atomic_cas_32,_atomic_cas_32)
49 ATOMIC_OP_ALIAS(atomic_cas_32_ni,_atomic_cas_32)
50 STRONG_ALIAS(_atomic_cas_32_ni,_atomic_cas_32)
51
52 ATOMIC_OP_ALIAS(atomic_cas_uint,_atomic_cas_32)
53 ATOMIC_OP_ALIAS(atomic_cas_uint_ni,_atomic_cas_32)
54
55 STRONG_ALIAS(_atomic_cas_uint,_atomic_cas_32)
56 STRONG_ALIAS(_atomic_cas_uint_ni,_atomic_cas_32)
57
58 #if defined(_LP64)
59 ENTRY(_atomic_cas_64)
60 mr %r10,%r3
61 1: ldarx %r3,0,%r10
62 cmpd %r3,%r4
63 bnelr-
64 stdcx. %r5,0,%r10
65 beqlr+
66 b 1b
67 END(_atomic_cas_64)
68
69 ATOMIC_OP_ALIAS(atomic_cas_64,_atomic_cas_64)
70 ATOMIC_OP_ALIAS(atomic_cas_64_ni,_atomic_cas_64)
71 STRONG_ALIAS(_atomic_cas_64_ni,_atomic_cas_64)
72
73 ATOMIC_OP_ALIAS(atomic_cas_ulong,_atomic_cas_64)
74 ATOMIC_OP_ALIAS(atomic_cas_ulong_ni,_atomic_cas_64)
75
76 ATOMIC_OP_ALIAS(atomic_cas_ptr,_atomic_cas_64)
77 ATOMIC_OP_ALIAS(atomic_cas_ptr_ni,_atomic_cas_64)
78
79 STRONG_ALIAS(_atomic_cas_ulong,_atomic_cas_64)
80 STRONG_ALIAS(_atomic_cas_ulong_ni,_atomic_cas_64)
81
82 STRONG_ALIAS(_atomic_cas_ptr,_atomic_cas_64)
83 STRONG_ALIAS(_atomic_cas_ptr_ni,_atomic_cas_64)
84 #else
85 ATOMIC_OP_ALIAS(atomic_cas_ulong,_atomic_cas_32)
86 ATOMIC_OP_ALIAS(atomic_cas_ulong_ni,_atomic_cas_32)
87
88 ATOMIC_OP_ALIAS(atomic_cas_ptr,_atomic_cas_32)
89 ATOMIC_OP_ALIAS(atomic_cas_ptr_ni,_atomic_cas_32)
90
91 STRONG_ALIAS(_atomic_cas_ulong,_atomic_cas_32)
92 STRONG_ALIAS(_atomic_cas_ulong_ni,_atomic_cas_32)
93
94 STRONG_ALIAS(_atomic_cas_ptr,_atomic_cas_32)
95 STRONG_ALIAS(_atomic_cas_ptr_ni,_atomic_cas_32)
96 #endif
97