blob: 6fa84b7065cd05a948d402f1cd547043c7225f35 [file] [log] [blame]
Jiri Olsa52502bf2012-10-31 15:52:47 +01001
2/*
3 * The struct perf_event_attr test support.
4 *
5 * This test is embedded inside into perf directly and is governed
6 * by the PERF_TEST_ATTR environment variable and hook inside
7 * sys_perf_event_open function.
8 *
9 * The general idea is to store 'struct perf_event_attr' details for
10 * each event created within single perf command. Each event details
11 * are stored into separate text file. Once perf command is finished
12 * these files can be checked for values we expect for command.
13 *
14 * Besides 'struct perf_event_attr' values we also store 'fd' and
15 * 'group_fd' values to allow checking for groups created.
16 *
17 * This all is triggered by setting PERF_TEST_ATTR environment variable.
18 * It must contain name of existing directory with access and write
19 * permissions. All the event text files are stored there.
20 */
21
22#include <stdlib.h>
23#include <stdio.h>
24#include <inttypes.h>
25#include <linux/types.h>
26#include <linux/kernel.h>
27#include "../perf.h"
28#include "util.h"
Jiri Olsad898b242012-10-30 23:02:05 +010029#include "exec_cmd.h"
Jiri Olsa52502bf2012-10-31 15:52:47 +010030
31#define ENV "PERF_TEST_ATTR"
32
Jiri Olsad898b242012-10-30 23:02:05 +010033extern int verbose;
34
Jiri Olsa52502bf2012-10-31 15:52:47 +010035bool test_attr__enabled;
36
37static char *dir;
38
39void test_attr__init(void)
40{
41 dir = getenv(ENV);
42 test_attr__enabled = (dir != NULL);
43}
44
45#define BUFSIZE 1024
46
Jiri Olsa89f552d2012-11-05 16:49:37 +010047#define __WRITE_ASS(str, fmt, data) \
Jiri Olsa52502bf2012-10-31 15:52:47 +010048do { \
49 char buf[BUFSIZE]; \
50 size_t size; \
51 \
52 size = snprintf(buf, BUFSIZE, #str "=%"fmt "\n", data); \
53 if (1 != fwrite(buf, size, 1, file)) { \
54 perror("test attr - failed to write event file"); \
55 fclose(file); \
56 return -1; \
57 } \
58 \
59} while (0)
60
Jiri Olsa89f552d2012-11-05 16:49:37 +010061#define WRITE_ASS(field, fmt) __WRITE_ASS(field, fmt, attr->field)
62
Jiri Olsa52502bf2012-10-31 15:52:47 +010063static int store_event(struct perf_event_attr *attr, pid_t pid, int cpu,
64 int fd, int group_fd, unsigned long flags)
65{
66 FILE *file;
67 char path[PATH_MAX];
68
69 snprintf(path, PATH_MAX, "%s/event-%d-%llu-%d", dir,
70 attr->type, attr->config, fd);
71
72 file = fopen(path, "w+");
73 if (!file) {
74 perror("test attr - failed to open event file");
75 return -1;
76 }
77
78 if (fprintf(file, "[event-%d-%llu-%d]\n",
79 attr->type, attr->config, fd) < 0) {
80 perror("test attr - failed to write event file");
81 fclose(file);
82 return -1;
83 }
84
85 /* syscall arguments */
Jiri Olsa89f552d2012-11-05 16:49:37 +010086 __WRITE_ASS(fd, "d", fd);
87 __WRITE_ASS(group_fd, "d", group_fd);
88 __WRITE_ASS(cpu, "d", cpu);
89 __WRITE_ASS(pid, "d", pid);
90 __WRITE_ASS(flags, "lu", flags);
Jiri Olsa52502bf2012-10-31 15:52:47 +010091
92 /* struct perf_event_attr */
Jiri Olsa89f552d2012-11-05 16:49:37 +010093 WRITE_ASS(type, PRIu32);
94 WRITE_ASS(size, PRIu32);
95 WRITE_ASS(config, "llu");
96 WRITE_ASS(sample_period, "llu");
97 WRITE_ASS(sample_type, "llu");
98 WRITE_ASS(read_format, "llu");
99 WRITE_ASS(disabled, "d");
100 WRITE_ASS(inherit, "d");
101 WRITE_ASS(pinned, "d");
102 WRITE_ASS(exclusive, "d");
103 WRITE_ASS(exclude_user, "d");
104 WRITE_ASS(exclude_kernel, "d");
105 WRITE_ASS(exclude_hv, "d");
106 WRITE_ASS(exclude_idle, "d");
107 WRITE_ASS(mmap, "d");
108 WRITE_ASS(comm, "d");
109 WRITE_ASS(freq, "d");
110 WRITE_ASS(inherit_stat, "d");
111 WRITE_ASS(enable_on_exec, "d");
112 WRITE_ASS(task, "d");
Jiri Olsa45e40892012-11-05 16:49:38 +0100113 WRITE_ASS(watermark, "d");
Jiri Olsa89f552d2012-11-05 16:49:37 +0100114 WRITE_ASS(precise_ip, "d");
115 WRITE_ASS(mmap_data, "d");
116 WRITE_ASS(sample_id_all, "d");
117 WRITE_ASS(exclude_host, "d");
118 WRITE_ASS(exclude_guest, "d");
119 WRITE_ASS(exclude_callchain_kernel, "d");
120 WRITE_ASS(exclude_callchain_user, "d");
121 WRITE_ASS(wakeup_events, PRIu32);
122 WRITE_ASS(bp_type, PRIu32);
123 WRITE_ASS(config1, "llu");
124 WRITE_ASS(config2, "llu");
125 WRITE_ASS(branch_sample_type, "llu");
126 WRITE_ASS(sample_regs_user, "llu");
127 WRITE_ASS(sample_stack_user, PRIu32);
128
129 __WRITE_ASS(optional, "d", 0);
Jiri Olsa52502bf2012-10-31 15:52:47 +0100130
131 fclose(file);
132 return 0;
133}
134
135void test_attr__open(struct perf_event_attr *attr, pid_t pid, int cpu,
136 int fd, int group_fd, unsigned long flags)
137{
138 int errno_saved = errno;
139
140 if (store_event(attr, pid, cpu, fd, group_fd, flags))
141 die("test attr FAILED");
142
143 errno = errno_saved;
144}
Jiri Olsad898b242012-10-30 23:02:05 +0100145
146static int run_dir(const char *d, const char *perf)
147{
148 char cmd[3*PATH_MAX];
149
150 snprintf(cmd, 3*PATH_MAX, "python %s/attr.py -d %s/attr/ -p %s %s",
151 d, d, perf, verbose ? "-v" : "");
152
153 return system(cmd);
154}
155
156int test_attr__run(void)
157{
158 struct stat st;
159 char path_perf[PATH_MAX];
160 char path_dir[PATH_MAX];
161
162 /* First try developement tree tests. */
163 if (!lstat("./tests", &st))
164 return run_dir("./tests", "./perf");
165
166 /* Then installed path. */
167 snprintf(path_dir, PATH_MAX, "%s/tests", perf_exec_path());
168 snprintf(path_perf, PATH_MAX, "%s/perf", BINDIR);
169
170 if (!lstat(path_dir, &st) &&
171 !lstat(path_perf, &st))
172 return run_dir(path_dir, path_perf);
173
174 fprintf(stderr, " (ommitted)");
175 return 0;
176}