granicus.if.org Git - strace/blob - alpha.c

   1 /*
   2  * Copyright (c) 2016 Dmitry V. Levin <ldv@altlinux.org>
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  * 3. The name of the author may not be used to endorse or promote products
  14  *    derived from this software without specific prior written permission.
  15  *
  16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  17  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  18  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  19  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  20  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  21  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  22  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  23  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  24  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  25  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  26  */
  27
  28 #include "defs.h"
  29
  30 #ifdef ALPHA
  31
  32 # include "xstring.h"
  33
  34 static int
  35 decode_getxxid(struct tcb *tcp, const char *what)
  36 {
  37         if (entering(tcp))
  38                 return 0;
  39
  40         long rval = getrval2(tcp);
  41         if (rval == -1)
  42                 return 0;
  43         static const char const fmt[] = "%s %ld";
  44         static char outstr[sizeof(fmt) + 3 * sizeof(rval)];
  45         xsprintf(outstr, fmt, what, rval);
  46         tcp->auxstr = outstr;
  47         return RVAL_STR;
  48 }
  49
  50 SYS_FUNC(getxpid)
  51 {
  52         return decode_getxxid(tcp, "ppid");
  53 }
  54
  55 SYS_FUNC(getxuid)
  56 {
  57         return decode_getxxid(tcp, "euid");
  58 }
  59
  60 SYS_FUNC(getxgid)
  61 {
  62         return decode_getxxid(tcp, "egid");
  63 }
  64
  65 SYS_FUNC(osf_statfs)
  66 {
  67         printpath(tcp, tcp->u_arg[0]);
  68         tprints(", ");
  69         printaddr(tcp->u_arg[1]);
  70         tprints(", ");
  71         tprintf("%lu", tcp->u_arg[2]);
  72         return RVAL_DECODED;
  73 }
  74
  75 SYS_FUNC(osf_fstatfs)
  76 {
  77         printfd(tcp, tcp->u_arg[0]);
  78         tprints(", ");
  79         printaddr(tcp->u_arg[1]);
  80         tprints(", ");
  81         tprintf("%lu", tcp->u_arg[2]);
  82         return RVAL_DECODED;
  83 }
  84
  85 #endif /* ALPHA */