1 #include <stdlib.h>
2 #include <linux/types.h>
3 #include <sys/stat.h>
4 #include <fcntl.h>
5 #include <string.h>
6 #include <sys/time.h>
7 #include <sys/resource.h>
8 #include <api/fs/fs.h>
9 #include "util.h"
10 #include "machine.h"
11 #include "symbol.h"
12 #include "tests.h"
13 #include "debug.h"
14
test_file(int size)15 static char *test_file(int size)
16 {
17 #define TEMPL "/tmp/perf-test-XXXXXX"
18 static char buf_templ[sizeof(TEMPL)];
19 char *templ = buf_templ;
20 int fd, i;
21 unsigned char *buf;
22
23 strcpy(buf_templ, TEMPL);
24 #undef TEMPL
25
26 fd = mkstemp(templ);
27 if (fd < 0) {
28 perror("mkstemp failed");
29 return NULL;
30 }
31
32 buf = malloc(size);
33 if (!buf) {
34 close(fd);
35 return NULL;
36 }
37
38 for (i = 0; i < size; i++)
39 buf[i] = (unsigned char) ((int) i % 10);
40
41 if (size != write(fd, buf, size))
42 templ = NULL;
43
44 free(buf);
45 close(fd);
46 return templ;
47 }
48
49 #define TEST_FILE_SIZE (DSO__DATA_CACHE_SIZE * 20)
50
51 struct test_data_offset {
52 off_t offset;
53 u8 data[10];
54 int size;
55 };
56
57 struct test_data_offset offsets[] = {
58 /* Fill first cache page. */
59 {
60 .offset = 10,
61 .data = { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9 },
62 .size = 10,
63 },
64 /* Read first cache page. */
65 {
66 .offset = 10,
67 .data = { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9 },
68 .size = 10,
69 },
70 /* Fill cache boundary pages. */
71 {
72 .offset = DSO__DATA_CACHE_SIZE - DSO__DATA_CACHE_SIZE % 10,
73 .data = { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9 },
74 .size = 10,
75 },
76 /* Read cache boundary pages. */
77 {
78 .offset = DSO__DATA_CACHE_SIZE - DSO__DATA_CACHE_SIZE % 10,
79 .data = { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9 },
80 .size = 10,
81 },
82 /* Fill final cache page. */
83 {
84 .offset = TEST_FILE_SIZE - 10,
85 .data = { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9 },
86 .size = 10,
87 },
88 /* Read final cache page. */
89 {
90 .offset = TEST_FILE_SIZE - 10,
91 .data = { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9 },
92 .size = 10,
93 },
94 /* Read final cache page. */
95 {
96 .offset = TEST_FILE_SIZE - 3,
97 .data = { 7, 8, 9, 0, 0, 0, 0, 0, 0, 0 },
98 .size = 3,
99 },
100 };
101
102 /* move it from util/dso.c for compatibility */
dso__data_fd(struct dso * dso,struct machine * machine)103 static int dso__data_fd(struct dso *dso, struct machine *machine)
104 {
105 int fd = dso__data_get_fd(dso, machine);
106
107 if (fd >= 0)
108 dso__data_put_fd(dso);
109
110 return fd;
111 }
112
test__dso_data(int subtest __maybe_unused)113 int test__dso_data(int subtest __maybe_unused)
114 {
115 struct machine machine;
116 struct dso *dso;
117 char *file = test_file(TEST_FILE_SIZE);
118 size_t i;
119
120 TEST_ASSERT_VAL("No test file", file);
121
122 memset(&machine, 0, sizeof(machine));
123
124 dso = dso__new((const char *)file);
125
126 TEST_ASSERT_VAL("Failed to access to dso",
127 dso__data_fd(dso, &machine) >= 0);
128
129 /* Basic 10 bytes tests. */
130 for (i = 0; i < ARRAY_SIZE(offsets); i++) {
131 struct test_data_offset *data = &offsets[i];
132 ssize_t size;
133 u8 buf[10];
134
135 memset(buf, 0, 10);
136 size = dso__data_read_offset(dso, &machine, data->offset,
137 buf, 10);
138
139 TEST_ASSERT_VAL("Wrong size", size == data->size);
140 TEST_ASSERT_VAL("Wrong data", !memcmp(buf, data->data, 10));
141 }
142
143 /* Read cross multiple cache pages. */
144 {
145 ssize_t size;
146 int c;
147 u8 *buf;
148
149 buf = malloc(TEST_FILE_SIZE);
150 TEST_ASSERT_VAL("ENOMEM\n", buf);
151
152 /* First iteration to fill caches, second one to read them. */
153 for (c = 0; c < 2; c++) {
154 memset(buf, 0, TEST_FILE_SIZE);
155 size = dso__data_read_offset(dso, &machine, 10,
156 buf, TEST_FILE_SIZE);
157
158 TEST_ASSERT_VAL("Wrong size",
159 size == (TEST_FILE_SIZE - 10));
160
161 for (i = 0; i < (size_t)size; i++)
162 TEST_ASSERT_VAL("Wrong data",
163 buf[i] == (i % 10));
164 }
165
166 free(buf);
167 }
168
169 dso__put(dso);
170 unlink(file);
171 return 0;
172 }
173
open_files_cnt(void)174 static long open_files_cnt(void)
175 {
176 char path[PATH_MAX];
177 struct dirent *dent;
178 DIR *dir;
179 long nr = 0;
180
181 scnprintf(path, PATH_MAX, "%s/self/fd", procfs__mountpoint());
182 pr_debug("fd path: %s\n", path);
183
184 dir = opendir(path);
185 TEST_ASSERT_VAL("failed to open fd directory", dir);
186
187 while ((dent = readdir(dir)) != NULL) {
188 if (!strcmp(dent->d_name, ".") ||
189 !strcmp(dent->d_name, ".."))
190 continue;
191
192 nr++;
193 }
194
195 closedir(dir);
196 return nr - 1;
197 }
198
199 static struct dso **dsos;
200
dsos__create(int cnt,int size)201 static int dsos__create(int cnt, int size)
202 {
203 int i;
204
205 dsos = malloc(sizeof(*dsos) * cnt);
206 TEST_ASSERT_VAL("failed to alloc dsos array", dsos);
207
208 for (i = 0; i < cnt; i++) {
209 char *file;
210
211 file = test_file(size);
212 TEST_ASSERT_VAL("failed to get dso file", file);
213
214 dsos[i] = dso__new(file);
215 TEST_ASSERT_VAL("failed to get dso", dsos[i]);
216 }
217
218 return 0;
219 }
220
dsos__delete(int cnt)221 static void dsos__delete(int cnt)
222 {
223 int i;
224
225 for (i = 0; i < cnt; i++) {
226 struct dso *dso = dsos[i];
227
228 unlink(dso->name);
229 dso__put(dso);
230 }
231
232 free(dsos);
233 }
234
set_fd_limit(int n)235 static int set_fd_limit(int n)
236 {
237 struct rlimit rlim;
238
239 if (getrlimit(RLIMIT_NOFILE, &rlim))
240 return -1;
241
242 pr_debug("file limit %ld, new %d\n", (long) rlim.rlim_cur, n);
243
244 rlim.rlim_cur = n;
245 return setrlimit(RLIMIT_NOFILE, &rlim);
246 }
247
test__dso_data_cache(int subtest __maybe_unused)248 int test__dso_data_cache(int subtest __maybe_unused)
249 {
250 struct machine machine;
251 long nr_end, nr = open_files_cnt();
252 int dso_cnt, limit, i, fd;
253
254 /* Rest the internal dso open counter limit. */
255 reset_fd_limit();
256
257 memset(&machine, 0, sizeof(machine));
258
259 /* set as system limit */
260 limit = nr * 4;
261 TEST_ASSERT_VAL("failed to set file limit", !set_fd_limit(limit));
262
263 /* and this is now our dso open FDs limit */
264 dso_cnt = limit / 2;
265 TEST_ASSERT_VAL("failed to create dsos\n",
266 !dsos__create(dso_cnt, TEST_FILE_SIZE));
267
268 for (i = 0; i < (dso_cnt - 1); i++) {
269 struct dso *dso = dsos[i];
270
271 /*
272 * Open dsos via dso__data_fd(), it opens the data
273 * file and keep it open (unless open file limit).
274 */
275 fd = dso__data_fd(dso, &machine);
276 TEST_ASSERT_VAL("failed to get fd", fd > 0);
277
278 if (i % 2) {
279 #define BUFSIZE 10
280 u8 buf[BUFSIZE];
281 ssize_t n;
282
283 n = dso__data_read_offset(dso, &machine, 0, buf, BUFSIZE);
284 TEST_ASSERT_VAL("failed to read dso", n == BUFSIZE);
285 }
286 }
287
288 /* verify the first one is already open */
289 TEST_ASSERT_VAL("dsos[0] is not open", dsos[0]->data.fd != -1);
290
291 /* open +1 dso to reach the allowed limit */
292 fd = dso__data_fd(dsos[i], &machine);
293 TEST_ASSERT_VAL("failed to get fd", fd > 0);
294
295 /* should force the first one to be closed */
296 TEST_ASSERT_VAL("failed to close dsos[0]", dsos[0]->data.fd == -1);
297
298 /* cleanup everything */
299 dsos__delete(dso_cnt);
300
301 /* Make sure we did not leak any file descriptor. */
302 nr_end = open_files_cnt();
303 pr_debug("nr start %ld, nr stop %ld\n", nr, nr_end);
304 TEST_ASSERT_VAL("failed leadking files", nr == nr_end);
305 return 0;
306 }
307
test__dso_data_reopen(int subtest __maybe_unused)308 int test__dso_data_reopen(int subtest __maybe_unused)
309 {
310 struct machine machine;
311 long nr_end, nr = open_files_cnt();
312 int fd, fd_extra;
313
314 #define dso_0 (dsos[0])
315 #define dso_1 (dsos[1])
316 #define dso_2 (dsos[2])
317
318 /* Rest the internal dso open counter limit. */
319 reset_fd_limit();
320
321 memset(&machine, 0, sizeof(machine));
322
323 /*
324 * Test scenario:
325 * - create 3 dso objects
326 * - set process file descriptor limit to current
327 * files count + 3
328 * - test that the first dso gets closed when we
329 * reach the files count limit
330 */
331
332 /* Make sure we are able to open 3 fds anyway */
333 TEST_ASSERT_VAL("failed to set file limit",
334 !set_fd_limit((nr + 3)));
335
336 TEST_ASSERT_VAL("failed to create dsos\n", !dsos__create(3, TEST_FILE_SIZE));
337
338 /* open dso_0 */
339 fd = dso__data_fd(dso_0, &machine);
340 TEST_ASSERT_VAL("failed to get fd", fd > 0);
341
342 /* open dso_1 */
343 fd = dso__data_fd(dso_1, &machine);
344 TEST_ASSERT_VAL("failed to get fd", fd > 0);
345
346 /*
347 * open extra file descriptor and we just
348 * reached the files count limit
349 */
350 fd_extra = open("/dev/null", O_RDONLY);
351 TEST_ASSERT_VAL("failed to open extra fd", fd_extra > 0);
352
353 /* open dso_2 */
354 fd = dso__data_fd(dso_2, &machine);
355 TEST_ASSERT_VAL("failed to get fd", fd > 0);
356
357 /*
358 * dso_0 should get closed, because we reached
359 * the file descriptor limit
360 */
361 TEST_ASSERT_VAL("failed to close dso_0", dso_0->data.fd == -1);
362
363 /* open dso_0 */
364 fd = dso__data_fd(dso_0, &machine);
365 TEST_ASSERT_VAL("failed to get fd", fd > 0);
366
367 /*
368 * dso_1 should get closed, because we reached
369 * the file descriptor limit
370 */
371 TEST_ASSERT_VAL("failed to close dso_1", dso_1->data.fd == -1);
372
373 /* cleanup everything */
374 close(fd_extra);
375 dsos__delete(3);
376
377 /* Make sure we did not leak any file descriptor. */
378 nr_end = open_files_cnt();
379 pr_debug("nr start %ld, nr stop %ld\n", nr, nr_end);
380 TEST_ASSERT_VAL("failed leadking files", nr == nr_end);
381 return 0;
382 }
383