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 <uapi/linux/fcntl.h>
 11
 12static size_t fcntl__scnprintf_getfd(unsigned long val, char *bf, size_t size, bool show_prefix)
 13{
 14	return val ? scnprintf(bf, size, "%s", "0") :
 15		     scnprintf(bf, size, "%s%s", show_prefix ? "FD_" : "", "CLOEXEC");
 16}
 17
 18static size_t syscall_arg__scnprintf_fcntl_getfd(char *bf, size_t size, struct syscall_arg *arg)
 19{
 20	return fcntl__scnprintf_getfd(arg->val, bf, size, arg->show_string_prefix);
 21}
 22
 23static size_t fcntl__scnprintf_getlease(unsigned long val, char *bf, size_t size, bool show_prefix)
 24{
 25	static const char *fcntl_setlease[] = { "RDLCK", "WRLCK", "UNLCK", };
 26	static DEFINE_STRARRAY(fcntl_setlease, "F_");
 27
 28	return strarray__scnprintf(&strarray__fcntl_setlease, bf, size, "%x", show_prefix, val);
 29}
 30
 31static size_t syscall_arg__scnprintf_fcntl_getlease(char *bf, size_t size, struct syscall_arg *arg)
 32{
 33	return fcntl__scnprintf_getlease(arg->val, bf, size, arg->show_string_prefix);
 34}
 35
 36size_t syscall_arg__scnprintf_fcntl_cmd(char *bf, size_t size, struct syscall_arg *arg)
 37{
 38	if (arg->val == F_GETFL) {
 39		syscall_arg__set_ret_scnprintf(arg, syscall_arg__scnprintf_open_flags);
 40		goto mask_arg;
 41	}
 42	if (arg->val == F_GETFD) {
 43		syscall_arg__set_ret_scnprintf(arg, syscall_arg__scnprintf_fcntl_getfd);
 44		goto mask_arg;
 45	}
 46	if (arg->val == F_DUPFD_CLOEXEC || arg->val == F_DUPFD) {
 47		syscall_arg__set_ret_scnprintf(arg, syscall_arg__scnprintf_fd);
 48		goto out;
 49	}
 50	if (arg->val == F_GETOWN) {
 51		syscall_arg__set_ret_scnprintf(arg, syscall_arg__scnprintf_pid);
 52		goto mask_arg;
 53	}
 54	if (arg->val == F_GETLEASE) {
 55		syscall_arg__set_ret_scnprintf(arg, syscall_arg__scnprintf_fcntl_getlease);
 56		goto mask_arg;
 57	}
 58	/*
 59	 * Some commands ignore the third fcntl argument, "arg", so mask it
 60	 */
 61	if (arg->val == F_GET_SEALS ||
 62	    arg->val == F_GETSIG) {
 63mask_arg:
 64		arg->mask |= (1 << 2);
 65	}
 66out:
 67	return syscall_arg__scnprintf_strarrays(bf, size, arg);
 68}
 69
 70size_t syscall_arg__scnprintf_fcntl_arg(char *bf, size_t size, struct syscall_arg *arg)
 71{
 72	bool show_prefix = arg->show_string_prefix;
 73	int cmd = syscall_arg__val(arg, 1);
 74
 75	if (cmd == F_DUPFD)
 76		return syscall_arg__scnprintf_fd(bf, size, arg);
 77
 78	if (cmd == F_SETFD)
 79		return fcntl__scnprintf_getfd(arg->val, bf, size, show_prefix);
 80
 81	if (cmd == F_SETFL)
 82		return open__scnprintf_flags(arg->val, bf, size, show_prefix);
 83
 84	if (cmd == F_SETOWN)
 85		return syscall_arg__scnprintf_pid(bf, size, arg);
 86
 87	if (cmd == F_SETLEASE)
 88		return fcntl__scnprintf_getlease(arg->val, bf, size, show_prefix);
 89	/*
 90	 * We still don't grab the contents of pointers on entry or exit,
 91	 * so just print them as hex numbers
 92	 */
 93	if (cmd == F_SETLK || cmd == F_SETLKW || cmd == F_GETLK ||
 94	    cmd == F_OFD_SETLK || cmd == F_OFD_SETLKW || cmd == F_OFD_GETLK ||
 95	    cmd == F_GETOWN_EX || cmd == F_SETOWN_EX ||
 96	    cmd == F_GET_RW_HINT || cmd == F_SET_RW_HINT ||
 97	    cmd == F_GET_FILE_RW_HINT || cmd == F_SET_FILE_RW_HINT)
 98		return syscall_arg__scnprintf_hex(bf, size, arg);
 99
100	return syscall_arg__scnprintf_long(bf, size, arg);
101}