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 static int
  33 decode_getxxid(struct tcb *tcp, const char *what)
  34 {
  35         if (entering(tcp))
  36                 return 0;
  37
  38         long rval = getrval2(tcp);
  39         if (rval == -1)
  40                 return 0;
  41         static const char const fmt[] = "%s %ld";
  42         static char outstr[sizeof(fmt) + 3 * sizeof(rval)];
  43         snprintf(outstr, sizeof(outstr), fmt, what, rval);
  44         tcp->auxstr = outstr;
  45         return RVAL_STR;
  46 }
  47
  48 SYS_FUNC(getxpid)
  49 {
  50         return decode_getxxid(tcp, "ppid");
  51 }
  52
  53 SYS_FUNC(getxuid)
  54 {
  55         return decode_getxxid(tcp, "euid");
  56 }
  57
  58 SYS_FUNC(getxgid)
  59 {
  60         return decode_getxxid(tcp, "egid");
  61 }
  62
  63 SYS_FUNC(osf_statfs)
  64 {
  65         printpath(tcp, tcp->u_arg[0]);
  66         tprints(", ");
  67         printaddr(tcp->u_arg[1]);
  68         tprints(", ");
  69         tprintf("%lu", tcp->u_arg[2]);
  70         return RVAL_DECODED;
  71 }
  72
  73 SYS_FUNC(osf_fstatfs)
  74 {
  75         printfd(tcp, tcp->u_arg[0]);
  76         tprints(", ");
  77         printaddr(tcp->u_arg[1]);
  78         tprints(", ");
  79         tprintf("%lu", tcp->u_arg[2]);
  80         return RVAL_DECODED;
  81 }
  82
  83 #endif /* ALPHA */