Home | History | Annotate | Line # | Download | only in atomic
atomic_cas.S revision 1.5.2.1
      1  1.5.2.1  yamt /*	$NetBSD: atomic_cas.S,v 1.5.2.1 2014/05/22 11:26:29 yamt 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.2.1  yamt 	movl	4(%sp), %a0
     38  1.5.2.1  yamt 	movl	8(%sp), %d0
     39  1.5.2.1  yamt 	movl	12(%sp), %d1
     40  1.5.2.1  yamt 	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.2.1  yamt 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.2.1  yamt 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.2.1  yamt 
     64  1.5.2.1  yamt ENTRY(__sync_bool_compare_and_swap_4)
     65  1.5.2.1  yamt 	movl	4(%sp), %a0
     66  1.5.2.1  yamt 	movl	8(%sp), %d3
     67  1.5.2.1  yamt 	movl	%d3, %d2
     68  1.5.2.1  yamt 	movl	12(%sp), %d1
     69  1.5.2.1  yamt 	casl	%d3, %d1, (%a0)
     70  1.5.2.1  yamt 	/* %d3 now contains the old value */
     71  1.5.2.1  yamt 	beq	1f
     72  1.5.2.1  yamt 	clrl	%d0	/* return false */
     73  1.5.2.1  yamt 	rts
     74  1.5.2.1  yamt 1:	movl	#1, %d0	/* return success */
     75  1.5.2.1  yamt 	rts
     76  1.5.2.1  yamt END(__sync_bool_compare_and_swap_4)
     77  1.5.2.1  yamt 
     78  1.5.2.1  yamt ENTRY(_atomic_cas_16)
     79  1.5.2.1  yamt 	movl	4(%sp), %a0
     80  1.5.2.1  yamt 	movw	8(%sp), %d0
     81  1.5.2.1  yamt 	movw	10(%sp), %d1
     82  1.5.2.1  yamt 	casw	%d0, %d1, (%a0)
     83  1.5.2.1  yamt 	/* %d0 now contains the old value */
     84  1.5.2.1  yamt 	rts
     85  1.5.2.1  yamt END(_atomic_cas_16)
     86  1.5.2.1  yamt 
     87  1.5.2.1  yamt ATOMIC_OP_ALIAS(atomic_cas_16,_atomic_cas_16)
     88  1.5.2.1  yamt CRT_ALIAS(__sync_val_compare_and_swap_2,_atomic_cas_16)
     89  1.5.2.1  yamt 
     90  1.5.2.1  yamt ENTRY(__sync_bool_compare_and_swap_2)
     91  1.5.2.1  yamt 	movl	4(%sp), %a0
     92  1.5.2.1  yamt 	movw	8(%sp), %d3
     93  1.5.2.1  yamt 	movw	%d3, %d2
     94  1.5.2.1  yamt 	movw	10(%sp), %d1
     95  1.5.2.1  yamt 	casw	%d3, %d1, (%a0)
     96  1.5.2.1  yamt 	/* %d3 now contains the old value */
     97  1.5.2.1  yamt 	beq	1f
     98  1.5.2.1  yamt 	clrl	%d0	/* return failure */
     99  1.5.2.1  yamt 	rts
    100  1.5.2.1  yamt 1:	movl	#1, %d0	/* return success */
    101  1.5.2.1  yamt 	rts
    102  1.5.2.1  yamt END(__sync_bool_compare_and_swap_2)
    103  1.5.2.1  yamt 
    104  1.5.2.1  yamt ENTRY(_atomic_cas_8)
    105  1.5.2.1  yamt 	movl	4(%sp), %a0
    106  1.5.2.1  yamt 	movb	8(%sp), %d0
    107  1.5.2.1  yamt 	movb	9(%sp), %d1
    108  1.5.2.1  yamt 	casb	%d0, %d1, (%a0)
    109  1.5.2.1  yamt 	/* %d0 now contains the old value */
    110  1.5.2.1  yamt 	rts
    111  1.5.2.1  yamt END(_atomic_cas_8)
    112  1.5.2.1  yamt 
    113  1.5.2.1  yamt ATOMIC_OP_ALIAS(atomic_cas_8,_atomic_cas_8)
    114  1.5.2.1  yamt CRT_ALIAS(__sync_val_compare_and_swap_1,_atomic_cas_8)
    115  1.5.2.1  yamt 
    116  1.5.2.1  yamt 
    117  1.5.2.1  yamt ENTRY(__sync_bool_compare_and_swap_1)
    118  1.5.2.1  yamt 	movl	4(%sp), %a0
    119  1.5.2.1  yamt 	movb	8(%sp), %d3
    120  1.5.2.1  yamt 	movb	%d3, %d2
    121  1.5.2.1  yamt 	movb	9(%sp), %d1
    122  1.5.2.1  yamt 	casb	%d3, %d1, (%a0)
    123  1.5.2.1  yamt 	/* %d3 now contains the old value */
    124  1.5.2.1  yamt 	beq	1f
    125  1.5.2.1  yamt 	clrl	%d0	/* return failure */
    126  1.5.2.1  yamt 	rts
    127  1.5.2.1  yamt 1:	movl	#1, %d0	/* return success */
    128  1.5.2.1  yamt 	rts
    129  1.5.2.1  yamt END(__sync_bool_compare_and_swap_1)
    130  1.5.2.1  yamt 
    131