xref: /linux/tools/perf/trace/beauty/fcntl.c (revision b2128290c29902315e632ea59e0504d6bc9e9b42)
1 // SPDX-License-Identifier: LGPL-2.1
2 /*
3  * trace/beauty/fcntl.c
4  *
5  *  Copyright (C) 2017, Red Hat Inc, Arnaldo Carvalho de Melo <acme@redhat.com>
6  */
7 
8 #include "trace/beauty/beauty.h"
9 #include <linux/kernel.h>
10 #include <linux/fcntl.h>
11 
12 #ifndef F_GET_RW_HINT
13 #define F_GET_RW_HINT		(F_LINUX_SPECIFIC_BASE + 11)
14 #endif
15 
16 #ifndef F_SET_RW_HINT
17 #define F_SET_RW_HINT		(F_LINUX_SPECIFIC_BASE + 12)
18 #endif
19 
20 #ifndef F_GET_FILE_RW_HINT
21 #define F_GET_FILE_RW_HINT	(F_LINUX_SPECIFIC_BASE + 13)
22 #endif
23 
24 #ifndef F_SET_FILE_RW_HINT
25 #define F_SET_FILE_RW_HINT	(F_LINUX_SPECIFIC_BASE + 14)
26 #endif
27 
28 static size_t fcntl__scnprintf_getfd(unsigned long val, char *bf, size_t size, bool show_prefix)
29 {
30 	return val ? scnprintf(bf, size, "%s", "0") :
31 		     scnprintf(bf, size, "%s%s", show_prefix ? "FD_" : "", "CLOEXEC");
32 }
33 
34 static size_t syscall_arg__scnprintf_fcntl_getfd(char *bf, size_t size, struct syscall_arg *arg)
35 {
36 	return fcntl__scnprintf_getfd(arg->val, bf, size, arg->show_string_prefix);
37 }
38 
39 static size_t fcntl__scnprintf_getlease(unsigned long val, char *bf, size_t size, bool show_prefix)
40 {
41 	static const char *fcntl_setlease[] = { "RDLCK", "WRLCK", "UNLCK", };
42 	static DEFINE_STRARRAY(fcntl_setlease, "F_");
43 
44 	return strarray__scnprintf(&strarray__fcntl_setlease, bf, size, "%x", show_prefix, val);
45 }
46 
47 static size_t syscall_arg__scnprintf_fcntl_getlease(char *bf, size_t size, struct syscall_arg *arg)
48 {
49 	return fcntl__scnprintf_getlease(arg->val, bf, size, arg->show_string_prefix);
50 }
51 
52 size_t syscall_arg__scnprintf_fcntl_cmd(char *bf, size_t size, struct syscall_arg *arg)
53 {
54 	if (arg->val == F_GETFL) {
55 		syscall_arg__set_ret_scnprintf(arg, syscall_arg__scnprintf_open_flags);
56 		goto mask_arg;
57 	}
58 	if (arg->val == F_GETFD) {
59 		syscall_arg__set_ret_scnprintf(arg, syscall_arg__scnprintf_fcntl_getfd);
60 		goto mask_arg;
61 	}
62 	if (arg->val == F_DUPFD_CLOEXEC || arg->val == F_DUPFD) {
63 		syscall_arg__set_ret_scnprintf(arg, syscall_arg__scnprintf_fd);
64 		goto out;
65 	}
66 	if (arg->val == F_GETOWN) {
67 		syscall_arg__set_ret_scnprintf(arg, syscall_arg__scnprintf_pid);
68 		goto mask_arg;
69 	}
70 	if (arg->val == F_GETLEASE) {
71 		syscall_arg__set_ret_scnprintf(arg, syscall_arg__scnprintf_fcntl_getlease);
72 		goto mask_arg;
73 	}
74 	/*
75 	 * Some commands ignore the third fcntl argument, "arg", so mask it
76 	 */
77 	if (arg->val == F_GET_SEALS ||
78 	    arg->val == F_GETSIG) {
79 mask_arg:
80 		arg->mask |= (1 << 2);
81 	}
82 out:
83 	return syscall_arg__scnprintf_strarrays(bf, size, arg);
84 }
85 
86 size_t syscall_arg__scnprintf_fcntl_arg(char *bf, size_t size, struct syscall_arg *arg)
87 {
88 	bool show_prefix = arg->show_string_prefix;
89 	int cmd = syscall_arg__val(arg, 1);
90 
91 	if (cmd == F_DUPFD)
92 		return syscall_arg__scnprintf_fd(bf, size, arg);
93 
94 	if (cmd == F_SETFD)
95 		return fcntl__scnprintf_getfd(arg->val, bf, size, show_prefix);
96 
97 	if (cmd == F_SETFL)
98 		return open__scnprintf_flags(arg->val, bf, size, show_prefix);
99 
100 	if (cmd == F_SETOWN)
101 		return syscall_arg__scnprintf_pid(bf, size, arg);
102 
103 	if (cmd == F_SETLEASE)
104 		return fcntl__scnprintf_getlease(arg->val, bf, size, show_prefix);
105 	/*
106 	 * We still don't grab the contents of pointers on entry or exit,
107 	 * so just print them as hex numbers
108 	 */
109 	if (cmd == F_SETLK || cmd == F_SETLKW || cmd == F_GETLK ||
110 	    cmd == F_OFD_SETLK || cmd == F_OFD_SETLKW || cmd == F_OFD_GETLK ||
111 	    cmd == F_GETOWN_EX || cmd == F_SETOWN_EX ||
112 	    cmd == F_GET_RW_HINT || cmd == F_SET_RW_HINT ||
113 	    cmd == F_GET_FILE_RW_HINT || cmd == F_SET_FILE_RW_HINT)
114 		return syscall_arg__scnprintf_hex(bf, size, arg);
115 
116 	return syscall_arg__scnprintf_long(bf, size, arg);
117 }
118