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.
67 lines
1.1 KiB
C
67 lines
1.1 KiB
C
/*
|
|
* Copyright (c) 2016 Dmitry V. Levin <ldv@altlinux.org>
|
|
* Copyright (c) 2016-2018 The strace developers.
|
|
* All rights reserved.
|
|
*
|
|
* SPDX-License-Identifier: LGPL-2.1-or-later
|
|
*/
|
|
|
|
#include "defs.h"
|
|
|
|
#ifdef ALPHA
|
|
|
|
# include "xstring.h"
|
|
|
|
static int
|
|
decode_getxxid(struct tcb *tcp, const char *what)
|
|
{
|
|
if (entering(tcp))
|
|
return 0;
|
|
|
|
long rval = getrval2(tcp);
|
|
if (rval == -1)
|
|
return 0;
|
|
static const char const fmt[] = "%s %ld";
|
|
static char outstr[sizeof(fmt) + 3 * sizeof(rval)];
|
|
xsprintf(outstr, fmt, what, rval);
|
|
tcp->auxstr = outstr;
|
|
return RVAL_STR;
|
|
}
|
|
|
|
SYS_FUNC(getxpid)
|
|
{
|
|
return decode_getxxid(tcp, "ppid");
|
|
}
|
|
|
|
SYS_FUNC(getxuid)
|
|
{
|
|
return decode_getxxid(tcp, "euid");
|
|
}
|
|
|
|
SYS_FUNC(getxgid)
|
|
{
|
|
return decode_getxxid(tcp, "egid");
|
|
}
|
|
|
|
SYS_FUNC(osf_statfs)
|
|
{
|
|
printpath(tcp, tcp->u_arg[0]);
|
|
tprints(", ");
|
|
printaddr(tcp->u_arg[1]);
|
|
tprints(", ");
|
|
tprintf("%lu", tcp->u_arg[2]);
|
|
return RVAL_DECODED;
|
|
}
|
|
|
|
SYS_FUNC(osf_fstatfs)
|
|
{
|
|
printfd(tcp, tcp->u_arg[0]);
|
|
tprints(", ");
|
|
printaddr(tcp->u_arg[1]);
|
|
tprints(", ");
|
|
tprintf("%lu", tcp->u_arg[2]);
|
|
return RVAL_DECODED;
|
|
}
|
|
|
|
#endif /* ALPHA */
|