Dmitry V. Levin
b93d52fe3d
strace is now provided under the terms of the GNU Lesser General Public License version 2.1 or later, see COPYING for more details. strace test suite is now provided under the terms of the GNU General Public License version 2 or later, see tests/COPYING for more details.
59 lines
1.2 KiB
C
59 lines
1.2 KiB
C
/*
|
|
* Copyright (c) 2013 Christian Svensson <blue@cmd.nu>
|
|
* Copyright (c) 2014-2015 Dmitry V. Levin <ldv@altlinux.org>
|
|
* Copyright (c) 2014-2017 The strace developers.
|
|
* All rights reserved.
|
|
*
|
|
* SPDX-License-Identifier: LGPL-2.1-or-later
|
|
*/
|
|
|
|
#include "defs.h"
|
|
|
|
#ifdef OR1K
|
|
|
|
#define OR1K_ATOMIC_SWAP 1
|
|
#define OR1K_ATOMIC_CMPXCHG 2
|
|
#define OR1K_ATOMIC_XCHG 3
|
|
#define OR1K_ATOMIC_ADD 4
|
|
#define OR1K_ATOMIC_DECPOS 5
|
|
#define OR1K_ATOMIC_AND 6
|
|
#define OR1K_ATOMIC_OR 7
|
|
#define OR1K_ATOMIC_UMAX 8
|
|
#define OR1K_ATOMIC_UMIN 9
|
|
|
|
#include "xlat/atomic_ops.h"
|
|
|
|
SYS_FUNC(or1k_atomic)
|
|
{
|
|
printxval64(atomic_ops, tcp->u_arg[0], "???");
|
|
switch (tcp->u_arg[0]) {
|
|
case OR1K_ATOMIC_SWAP:
|
|
tprintf(", 0x%lx, 0x%lx", tcp->u_arg[1], tcp->u_arg[2]);
|
|
break;
|
|
case OR1K_ATOMIC_CMPXCHG:
|
|
tprintf(", 0x%lx, %#lx, %#lx", tcp->u_arg[1], tcp->u_arg[2],
|
|
tcp->u_arg[3]);
|
|
break;
|
|
|
|
case OR1K_ATOMIC_XCHG:
|
|
case OR1K_ATOMIC_ADD:
|
|
case OR1K_ATOMIC_AND:
|
|
case OR1K_ATOMIC_OR:
|
|
case OR1K_ATOMIC_UMAX:
|
|
case OR1K_ATOMIC_UMIN:
|
|
tprintf(", 0x%lx, %#lx", tcp->u_arg[1], tcp->u_arg[2]);
|
|
break;
|
|
|
|
case OR1K_ATOMIC_DECPOS:
|
|
tprintf(", 0x%lx", tcp->u_arg[1]);
|
|
break;
|
|
|
|
default:
|
|
break;
|
|
}
|
|
|
|
return RVAL_DECODED | RVAL_HEX;
|
|
}
|
|
|
|
#endif /* OR1K */
|