Dmitry V. Levin | 47b0dcc | 2013-05-07 23:32:01 +0000 | [diff] [blame] | 1 | #!/bin/sh |
| 2 | |
| 3 | # Check how network syscalls are traced. |
| 4 | |
| 5 | . "${srcdir=.}/init.sh" |
| 6 | |
Dmitry V. Levin | 47b0dcc | 2013-05-07 23:32:01 +0000 | [diff] [blame] | 7 | check_prog grep |
Dmitry V. Levin | 47b0dcc | 2013-05-07 23:32:01 +0000 | [diff] [blame] | 8 | |
Dmitry V. Levin | 107ceb9 | 2013-06-18 13:35:29 +0000 | [diff] [blame] | 9 | rm -f $LOG.* |
Dmitry V. Levin | 47b0dcc | 2013-05-07 23:32:01 +0000 | [diff] [blame] | 10 | |
Dmitry V. Levin | c9cc4cb | 2015-01-07 20:14:19 +0000 | [diff] [blame] | 11 | addr=net-local-stream |
| 12 | ./net-accept-connect $addr || |
Dmitry V. Levin | 47b0dcc | 2013-05-07 23:32:01 +0000 | [diff] [blame] | 13 | fail_ 'net-accept-connect failed' |
| 14 | |
Dmitry V. Levin | c9cc4cb | 2015-01-07 20:14:19 +0000 | [diff] [blame] | 15 | args="-tt -ff -enetwork ./net-accept-connect $addr" |
| 16 | $STRACE -o "$LOG" $args || |
| 17 | fail_ "$STRACE $args failed" |
Dmitry V. Levin | 47b0dcc | 2013-05-07 23:32:01 +0000 | [diff] [blame] | 18 | |
Dmitry V. Levin | 107ceb9 | 2013-06-18 13:35:29 +0000 | [diff] [blame] | 19 | "$srcdir"/../strace-log-merge $LOG > $LOG || { |
| 20 | cat $LOG |
Dmitry V. Levin | 47b0dcc | 2013-05-07 23:32:01 +0000 | [diff] [blame] | 21 | fail_ 'strace-log-merge failed' |
| 22 | } |
| 23 | |
Dmitry V. Levin | 107ceb9 | 2013-06-18 13:35:29 +0000 | [diff] [blame] | 24 | rm -f $LOG.* |
Dmitry V. Levin | 47b0dcc | 2013-05-07 23:32:01 +0000 | [diff] [blame] | 25 | |
| 26 | grep_log() |
| 27 | { |
| 28 | local syscall="$1"; shift |
| 29 | local prefix='[1-9][0-9]* +[0-9]+:[0-9]+:[0-9]+\.[0-9]+ +' |
| 30 | |
Dmitry V. Levin | ed7ada2 | 2015-01-13 00:06:09 +0000 | [diff] [blame] | 31 | LC_ALL=C grep -E -x "$prefix$syscall$*" $LOG > /dev/null || { |
Dmitry V. Levin | 107ceb9 | 2013-06-18 13:35:29 +0000 | [diff] [blame] | 32 | cat $LOG |
Dmitry V. Levin | 47b0dcc | 2013-05-07 23:32:01 +0000 | [diff] [blame] | 33 | fail_ "strace -enetwork failed to trace \"$syscall\" properly" |
| 34 | } |
| 35 | } |
| 36 | |
| 37 | grep_log socket '\(PF_(LOCAL|UNIX|FILE), SOCK_STREAM, 0\) += 0' |
| 38 | grep_log socket '\(PF_(LOCAL|UNIX|FILE), SOCK_STREAM, 0\) += 1' |
Dmitry V. Levin | c9cc4cb | 2015-01-07 20:14:19 +0000 | [diff] [blame] | 39 | grep_log bind '\(0, \{sa_family=AF_(LOCAL|UNIX|FILE), sun_path="'$addr'"\}, 19\) += 0' |
Dmitry V. Levin | 47b0dcc | 2013-05-07 23:32:01 +0000 | [diff] [blame] | 40 | grep_log listen '\(0, 5\) += 0' |
Dmitry V. Levin | c9cc4cb | 2015-01-07 20:14:19 +0000 | [diff] [blame] | 41 | grep_log getsockname '\(0, \{sa_family=AF_(LOCAL|UNIX|FILE), sun_path="'$addr'"\}, \[19\]\) += 0' |
Dmitry V. Levin | 47b0dcc | 2013-05-07 23:32:01 +0000 | [diff] [blame] | 42 | grep_log accept '\(0, \{sa_family=AF_(LOCAL|UNIX|FILE), NULL\}, \[2\]\) += 1' |
Dmitry V. Levin | c9cc4cb | 2015-01-07 20:14:19 +0000 | [diff] [blame] | 43 | grep_log connect '\(1, \{sa_family=AF_(LOCAL|UNIX|FILE), sun_path="'$addr'"\}, 19\) += 0' |
Dmitry V. Levin | 47b0dcc | 2013-05-07 23:32:01 +0000 | [diff] [blame] | 44 | |
| 45 | exit 0 |