GNU Linux-libre 4.19.286-gnu1
[releases.git] / tools / perf / util / syscalltbl.c
1 /*
2  * System call table mapper
3  *
4  * (C) 2016 Arnaldo Carvalho de Melo <acme@redhat.com>
5  *
6  * This program is free software; you can redistribute it and/or modify it
7  * under the terms and conditions of the GNU General Public License,
8  * version 2, as published by the Free Software Foundation.
9  *
10  * This program is distributed in the hope it will be useful, but WITHOUT
11  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
12  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
13  * more details.
14  */
15
16 #include "syscalltbl.h"
17 #include <stdlib.h>
18 #include <linux/compiler.h>
19
20 #ifdef HAVE_SYSCALL_TABLE_SUPPORT
21 #include <string.h>
22 #include "string2.h"
23 #include "util.h"
24
25 #if defined(__x86_64__)
26 #include <asm/syscalls_64.c>
27 const int syscalltbl_native_max_id = SYSCALLTBL_x86_64_MAX_ID;
28 static const char **syscalltbl_native = syscalltbl_x86_64;
29 #elif defined(__s390x__)
30 #include <asm/syscalls_64.c>
31 const int syscalltbl_native_max_id = SYSCALLTBL_S390_64_MAX_ID;
32 static const char **syscalltbl_native = syscalltbl_s390_64;
33 #elif defined(__powerpc64__)
34 #include <asm/syscalls_64.c>
35 const int syscalltbl_native_max_id = SYSCALLTBL_POWERPC_64_MAX_ID;
36 static const char **syscalltbl_native = syscalltbl_powerpc_64;
37 #elif defined(__powerpc__)
38 #include <asm/syscalls_32.c>
39 const int syscalltbl_native_max_id = SYSCALLTBL_POWERPC_32_MAX_ID;
40 static const char **syscalltbl_native = syscalltbl_powerpc_32;
41 #elif defined(__aarch64__)
42 #include <asm/syscalls.c>
43 const int syscalltbl_native_max_id = SYSCALLTBL_ARM64_MAX_ID;
44 static const char **syscalltbl_native = syscalltbl_arm64;
45 #endif
46
47 struct syscall {
48         int id;
49         const char *name;
50 };
51
52 static int syscallcmpname(const void *vkey, const void *ventry)
53 {
54         const char *key = vkey;
55         const struct syscall *entry = ventry;
56
57         return strcmp(key, entry->name);
58 }
59
60 static int syscallcmp(const void *va, const void *vb)
61 {
62         const struct syscall *a = va, *b = vb;
63
64         return strcmp(a->name, b->name);
65 }
66
67 static int syscalltbl__init_native(struct syscalltbl *tbl)
68 {
69         int nr_entries = 0, i, j;
70         struct syscall *entries;
71
72         for (i = 0; i <= syscalltbl_native_max_id; ++i)
73                 if (syscalltbl_native[i])
74                         ++nr_entries;
75
76         entries = tbl->syscalls.entries = malloc(sizeof(struct syscall) * nr_entries);
77         if (tbl->syscalls.entries == NULL)
78                 return -1;
79
80         for (i = 0, j = 0; i <= syscalltbl_native_max_id; ++i) {
81                 if (syscalltbl_native[i]) {
82                         entries[j].name = syscalltbl_native[i];
83                         entries[j].id = i;
84                         ++j;
85                 }
86         }
87
88         qsort(tbl->syscalls.entries, nr_entries, sizeof(struct syscall), syscallcmp);
89         tbl->syscalls.nr_entries = nr_entries;
90         return 0;
91 }
92
93 struct syscalltbl *syscalltbl__new(void)
94 {
95         struct syscalltbl *tbl = malloc(sizeof(*tbl));
96         if (tbl) {
97                 if (syscalltbl__init_native(tbl)) {
98                         free(tbl);
99                         return NULL;
100                 }
101         }
102         return tbl;
103 }
104
105 void syscalltbl__delete(struct syscalltbl *tbl)
106 {
107         zfree(&tbl->syscalls.entries);
108         free(tbl);
109 }
110
111 const char *syscalltbl__name(const struct syscalltbl *tbl __maybe_unused, int id)
112 {
113         return id <= syscalltbl_native_max_id ? syscalltbl_native[id]: NULL;
114 }
115
116 int syscalltbl__id(struct syscalltbl *tbl, const char *name)
117 {
118         struct syscall *sc = bsearch(name, tbl->syscalls.entries,
119                                      tbl->syscalls.nr_entries, sizeof(*sc),
120                                      syscallcmpname);
121
122         return sc ? sc->id : -1;
123 }
124
125 int syscalltbl__strglobmatch_next(struct syscalltbl *tbl, const char *syscall_glob, int *idx)
126 {
127         int i;
128         struct syscall *syscalls = tbl->syscalls.entries;
129
130         for (i = *idx + 1; i < tbl->syscalls.nr_entries; ++i) {
131                 if (strglobmatch(syscalls[i].name, syscall_glob)) {
132                         *idx = i;
133                         return syscalls[i].id;
134                 }
135         }
136
137         return -1;
138 }
139
140 int syscalltbl__strglobmatch_first(struct syscalltbl *tbl, const char *syscall_glob, int *idx)
141 {
142         *idx = -1;
143         return syscalltbl__strglobmatch_next(tbl, syscall_glob, idx);
144 }
145
146 #else /* HAVE_SYSCALL_TABLE_SUPPORT */
147
148 #include <libaudit.h>
149
150 struct syscalltbl *syscalltbl__new(void)
151 {
152         struct syscalltbl *tbl = malloc(sizeof(*tbl));
153         if (tbl)
154                 tbl->audit_machine = audit_detect_machine();
155         return tbl;
156 }
157
158 void syscalltbl__delete(struct syscalltbl *tbl)
159 {
160         free(tbl);
161 }
162
163 const char *syscalltbl__name(const struct syscalltbl *tbl, int id)
164 {
165         return audit_syscall_to_name(id, tbl->audit_machine);
166 }
167
168 int syscalltbl__id(struct syscalltbl *tbl, const char *name)
169 {
170         return audit_name_to_syscall(name, tbl->audit_machine);
171 }
172
173 int syscalltbl__strglobmatch_next(struct syscalltbl *tbl __maybe_unused,
174                                   const char *syscall_glob __maybe_unused, int *idx __maybe_unused)
175 {
176         return -1;
177 }
178
179 int syscalltbl__strglobmatch_first(struct syscalltbl *tbl, const char *syscall_glob, int *idx)
180 {
181         return syscalltbl__strglobmatch_next(tbl, syscall_glob, idx);
182 }
183 #endif /* HAVE_SYSCALL_TABLE_SUPPORT */