1 /*
2  * Copyright (c) 1991, 1992 Paul Kranenburg <pk@cs.few.eur.nl>
3  * Copyright (c) 1993 Branko Lankester <branko@hacktic.nl>
4  * Copyright (c) 1993, 1994, 1995, 1996 Rick Sladkey <jrs@world.std.com>
5  * Copyright (c) 1996-1999 Wichert Akkerman <wichert@cistron.nl>
6  * All rights reserved.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in the
15  *    documentation and/or other materials provided with the distribution.
16  * 3. The name of the author may not be used to endorse or promote products
17  *    derived from this software without specific prior written permission.
18  *
19  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
20  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
21  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
22  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
23  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
24  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
25  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
26  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
27  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
28  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
29  */
30 
31 #include "defs.h"
32 #include <sys/resource.h>
33 
34 #include "xlat/resources.h"
35 
36 static const char *
sprint_rlim64(uint64_t lim)37 sprint_rlim64(uint64_t lim)
38 {
39 	static char buf[sizeof(uint64_t)*3 + sizeof("*1024")];
40 
41 	if (lim == UINT64_MAX)
42 		return "RLIM64_INFINITY";
43 
44 	if (lim > 1024 && lim % 1024 == 0)
45 		sprintf(buf, "%" PRIu64 "*1024", lim / 1024);
46 	else
47 		sprintf(buf, "%" PRIu64, lim);
48 	return buf;
49 }
50 
51 static void
print_rlimit64(struct tcb * tcp,unsigned long addr)52 print_rlimit64(struct tcb *tcp, unsigned long addr)
53 {
54 	struct rlimit_64 {
55 		uint64_t rlim_cur;
56 		uint64_t rlim_max;
57 	} rlim;
58 
59 	if (!umove_or_printaddr(tcp, addr, &rlim)) {
60 		tprintf("{rlim_cur=%s,", sprint_rlim64(rlim.rlim_cur));
61 		tprintf(" rlim_max=%s}", sprint_rlim64(rlim.rlim_max));
62 	}
63 }
64 
65 #if !defined(current_wordsize) || current_wordsize == 4
66 
67 static const char *
sprint_rlim32(uint32_t lim)68 sprint_rlim32(uint32_t lim)
69 {
70 	static char buf[sizeof(uint32_t)*3 + sizeof("*1024")];
71 
72 	if (lim == UINT32_MAX)
73 		return "RLIM_INFINITY";
74 
75 	if (lim > 1024 && lim % 1024 == 0)
76 		sprintf(buf, "%" PRIu32 "*1024", lim / 1024);
77 	else
78 		sprintf(buf, "%" PRIu32, lim);
79 	return buf;
80 }
81 
82 static void
print_rlimit32(struct tcb * tcp,unsigned long addr)83 print_rlimit32(struct tcb *tcp, unsigned long addr)
84 {
85 	struct rlimit_32 {
86 		uint32_t rlim_cur;
87 		uint32_t rlim_max;
88 	} rlim;
89 
90 	if (!umove_or_printaddr(tcp, addr, &rlim)) {
91 		tprintf("{rlim_cur=%s,", sprint_rlim32(rlim.rlim_cur));
92 		tprintf(" rlim_max=%s}", sprint_rlim32(rlim.rlim_max));
93 	}
94 }
95 
96 static void
decode_rlimit(struct tcb * tcp,unsigned long addr)97 decode_rlimit(struct tcb *tcp, unsigned long addr)
98 {
99 # if defined(X86_64) || defined(X32)
100 	/*
101 	 * i386 is the only personality on X86_64 and X32
102 	 * with 32-bit rlim_t.
103 	 * When current_personality is X32, current_wordsize
104 	 * equals to 4 but rlim_t is 64-bit.
105 	 */
106 	if (current_personality == 1)
107 # else
108 	if (current_wordsize == 4)
109 # endif
110 		print_rlimit32(tcp, addr);
111 	else
112 		print_rlimit64(tcp, addr);
113 }
114 
115 #else /* defined(current_wordsize) && current_wordsize != 4 */
116 
117 # define decode_rlimit print_rlimit64
118 
119 #endif
120 
SYS_FUNC(getrlimit)121 SYS_FUNC(getrlimit)
122 {
123 	if (entering(tcp)) {
124 		printxval(resources, tcp->u_arg[0], "RLIMIT_???");
125 		tprints(", ");
126 	}
127 	else {
128 		decode_rlimit(tcp, tcp->u_arg[1]);
129 	}
130 	return 0;
131 }
132 
SYS_FUNC(setrlimit)133 SYS_FUNC(setrlimit)
134 {
135 	printxval(resources, tcp->u_arg[0], "RLIMIT_???");
136 	tprints(", ");
137 	decode_rlimit(tcp, tcp->u_arg[1]);
138 
139 	return RVAL_DECODED;
140 }
141 
SYS_FUNC(prlimit64)142 SYS_FUNC(prlimit64)
143 {
144 	if (entering(tcp)) {
145 		tprintf("%ld, ", tcp->u_arg[0]);
146 		printxval(resources, tcp->u_arg[1], "RLIMIT_???");
147 		tprints(", ");
148 		print_rlimit64(tcp, tcp->u_arg[2]);
149 		tprints(", ");
150 	} else {
151 		print_rlimit64(tcp, tcp->u_arg[3]);
152 	}
153 	return 0;
154 }
155 
156 #include "xlat/usagewho.h"
157 
SYS_FUNC(getrusage)158 SYS_FUNC(getrusage)
159 {
160 	if (entering(tcp)) {
161 		printxval(usagewho, tcp->u_arg[0], "RUSAGE_???");
162 		tprints(", ");
163 	}
164 	else
165 		printrusage(tcp, tcp->u_arg[1]);
166 	return 0;
167 }
168 
169 #ifdef ALPHA
SYS_FUNC(osf_getrusage)170 SYS_FUNC(osf_getrusage)
171 {
172 	if (entering(tcp)) {
173 		printxval(usagewho, tcp->u_arg[0], "RUSAGE_???");
174 		tprints(", ");
175 	}
176 	else
177 		printrusage32(tcp, tcp->u_arg[1]);
178 	return 0;
179 }
180 #endif /* ALPHA */
181 
182 #include "xlat/priorities.h"
183 
SYS_FUNC(getpriority)184 SYS_FUNC(getpriority)
185 {
186 	printxval(priorities, tcp->u_arg[0], "PRIO_???");
187 	tprintf(", %lu", tcp->u_arg[1]);
188 
189 	return RVAL_DECODED;
190 }
191 
SYS_FUNC(setpriority)192 SYS_FUNC(setpriority)
193 {
194 	printxval(priorities, tcp->u_arg[0], "PRIO_???");
195 	tprintf(", %lu, %d", tcp->u_arg[1], (int) tcp->u_arg[2]);
196 
197 	return RVAL_DECODED;
198 }
199