blob: 6ec7140613e60662894161620c4aaa0dc28b0dcb (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
|
# -*- tab-width: 4 -*- ;; Emacs
# vi: set filetype=sh tabstop=8 shiftwidth=8 noexpandtab :: Vi/ViM
############################################################ IDENT(1)
#
# $Title: dwatch(8) module for [l]chmod(2), fchmodat(2), or similar entry $
# $Copyright: 2014-2018 Devin Teske. All rights reserved. $
#
############################################################ DESCRIPTION
#
# Print mode/path being passed to chmod(2), lchmod(2), fchmodat(2), or similar
#
############################################################ PROBE
case "$PROFILE" in
chmod)
: ${PROBE:=$( echo \
syscall::chmod:entry, \
syscall::lchmod:entry, \
syscall::fchmodat:entry )}
;;
*)
: ${PROBE:=syscall::$PROFILE:entry}
esac
############################################################ ACTIONS
exec 9<<EOF
this mode_t mode;
this string path;
this u_char at;
$PROBE /* probe ID $ID */
{${TRACE:+
printf("<$ID>");
}
/*
* Should we expect the first argument to be a file descriptor?
* NB: Based on probefunc ending in "at" (e.g., fchmodat(2))
*/
this->at = strstr(probefunc, "at") ==
(probefunc + strlen(probefunc) - 2) ? 1 : 0;
this->mode = (mode_t)(this->at ? arg2 : arg1);
this->path = copyinstr(this->at ? arg1 : arg0);
}
EOF
ACTIONS=$( cat <&9 )
ID=$(( $ID + 1 ))
############################################################ EVENT DETAILS
if [ ! "$CUSTOM_DETAILS" ]; then
exec 9<<EOF
/*
* Print mode/path details
*/
printf("%04o %s", this->mode, this->path);
EOF
EVENT_DETAILS=$( cat <&9 )
fi
################################################################################
# END
################################################################################
|
