1*10e6dadfSbrendan#!/usr/bin/ksh
2*10e6dadfSbrendan#
3*10e6dadfSbrendan# CDDL HEADER START
4*10e6dadfSbrendan#
5*10e6dadfSbrendan# The contents of this file are subject to the terms of the
6*10e6dadfSbrendan# Common Development and Distribution License (the "License").
7*10e6dadfSbrendan# You may not use this file except in compliance with the License.
8*10e6dadfSbrendan#
9*10e6dadfSbrendan# You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10*10e6dadfSbrendan# or http://www.opensolaris.org/os/licensing.
11*10e6dadfSbrendan# See the License for the specific language governing permissions
12*10e6dadfSbrendan# and limitations under the License.
13*10e6dadfSbrendan#
14*10e6dadfSbrendan# When distributing Covered Code, include this CDDL HEADER in each
15*10e6dadfSbrendan# file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16*10e6dadfSbrendan# If applicable, add the following below this CDDL HEADER, with the
17*10e6dadfSbrendan# fields enclosed by brackets "[]" replaced with your own identifying
18*10e6dadfSbrendan# information: Portions Copyright [yyyy] [name of copyright owner]
19*10e6dadfSbrendan#
20*10e6dadfSbrendan# CDDL HEADER END
21*10e6dadfSbrendan#
22*10e6dadfSbrendan
23*10e6dadfSbrendan#
24*10e6dadfSbrendan# Copyright 2008 Sun Microsystems, Inc.  All rights reserved.
25*10e6dadfSbrendan# Use is subject to license terms.
26*10e6dadfSbrendan#
27*10e6dadfSbrendan#pragma ident	"%Z%%M%	%I%	%E% SMI"
28*10e6dadfSbrendan
29*10e6dadfSbrendan#
30*10e6dadfSbrendan# Test ip:::{send,receive} of IPv4 UDP to a local address.
31*10e6dadfSbrendan#
32*10e6dadfSbrendan# This may fail due to:
33*10e6dadfSbrendan#
34*10e6dadfSbrendan# 1. A change to the ip stack breaking expected probe behavior,
35*10e6dadfSbrendan#    which is the reason we are testing.
36*10e6dadfSbrendan# 2. No physical network interface is plumbed and up.
37*10e6dadfSbrendan# 3. No other hosts on this subnet are reachable and listening on rpcbind.
38*10e6dadfSbrendan# 4. An unlikely race causes the unlocked global send/receive
39*10e6dadfSbrendan#    variables to be corrupted.
40*10e6dadfSbrendan#
41*10e6dadfSbrendan# This test sends a UDP message using ping and checks that at least the
42*10e6dadfSbrendan# following counts were traced:
43*10e6dadfSbrendan#
44*10e6dadfSbrendan# 1 x ip:::send (UDP sent to ping's base UDP port)
45*10e6dadfSbrendan# 1 x ip:::receive (UDP received)
46*10e6dadfSbrendan#
47*10e6dadfSbrendan
48*10e6dadfSbrendanif (( $# != 1 )); then
49*10e6dadfSbrendan	print -u2 "expected one argument: <dtrace-path>"
50*10e6dadfSbrendan	exit 2
51*10e6dadfSbrendanfi
52*10e6dadfSbrendan
53*10e6dadfSbrendandtrace=$1
54*10e6dadfSbrendanlocal=127.0.0.1
55*10e6dadfSbrendan
56*10e6dadfSbrendan$dtrace -c "/usr/sbin/ping -U $local" -qs /dev/stdin <<EOF | grep -v 'is alive'
57*10e6dadfSbrendanBEGIN
58*10e6dadfSbrendan{
59*10e6dadfSbrendan	send = receive = 0;
60*10e6dadfSbrendan}
61*10e6dadfSbrendan
62*10e6dadfSbrendanip:::send
63*10e6dadfSbrendan/args[2]->ip_saddr == "$local" && args[2]->ip_daddr == "$local" &&
64*10e6dadfSbrendan    args[4]->ipv4_protocol == IPPROTO_UDP/
65*10e6dadfSbrendan{
66*10e6dadfSbrendan	send++;
67*10e6dadfSbrendan}
68*10e6dadfSbrendan
69*10e6dadfSbrendanip:::receive
70*10e6dadfSbrendan/args[2]->ip_saddr == "$local" && args[2]->ip_daddr == "$local" &&
71*10e6dadfSbrendan    args[4]->ipv4_protocol == IPPROTO_UDP/
72*10e6dadfSbrendan{
73*10e6dadfSbrendan	receive++;
74*10e6dadfSbrendan}
75*10e6dadfSbrendan
76*10e6dadfSbrendanEND
77*10e6dadfSbrendan{
78*10e6dadfSbrendan	printf("Minimum UDP events seen\n\n");
79*10e6dadfSbrendan	printf("ip:::send - %s\n", send >= 1 ? "yes" : "no");
80*10e6dadfSbrendan	printf("ip:::receive - %s\n", receive >= 1 ? "yes" : "no");
81*10e6dadfSbrendan}
82*10e6dadfSbrendanEOF
83