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