1178476Sjb#!/bin/ksh -p
2178476Sjb#
3178476Sjb# CDDL HEADER START
4178476Sjb#
5178476Sjb# The contents of this file are subject to the terms of the
6178476Sjb# Common Development and Distribution License (the "License").
7178476Sjb# You may not use this file except in compliance with the License.
8178476Sjb#
9178476Sjb# You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10178476Sjb# or http://www.opensolaris.org/os/licensing.
11178476Sjb# See the License for the specific language governing permissions
12178476Sjb# and limitations under the License.
13178476Sjb#
14178476Sjb# When distributing Covered Code, include this CDDL HEADER in each
15178476Sjb# file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16178476Sjb# If applicable, add the following below this CDDL HEADER, with the
17178476Sjb# fields enclosed by brackets "[]" replaced with your own identifying
18178476Sjb# information: Portions Copyright [yyyy] [name of copyright owner]
19178476Sjb#
20178476Sjb# CDDL HEADER END
21178476Sjb#
22178476Sjb
23178476Sjb#
24178476Sjb# Copyright 2008 Sun Microsystems, Inc.  All rights reserved.
25178476Sjb# Use is subject to license terms.
26178476Sjb#
27249573Spfg# ident	"%Z%%M%	%I%	%E% SMI"
28178476Sjb#
29178476Sjb
30178476Sjbif [ $# != 1 ]; then
31178476Sjb	echo expected one argument: '<'dtrace-path'>'
32178476Sjb	exit 2
33178476Sjbfi
34178476Sjb
35178476Sjbdtrace=$1
36178476Sjb
37178476Sjb$dtrace -wZq -x switchrate=100ms -s /dev/stdin <<EOF
38178476Sjbpid*:date::
39178476Sjb{
40178476Sjb	printf("%s:%s\n", probefunc, probename);
41178476Sjb}
42178476Sjb
43178476Sjbtick-1s
44178476Sjb/i++ > 5/
45178476Sjb{
46178476Sjb	exit(0);
47178476Sjb}
48178476Sjb
49178476Sjbtick-1s
50178476Sjb/(i % 2) == 0/
51178476Sjb{
52249573Spfg	system("dtrace -c date -ln 'pid\$target::main:entry' >/dev/null");
53178476Sjb}
54178476Sjb
55178476Sjbtick-1s
56178476Sjb/(i % 2) == 1/
57178476Sjb{
58249573Spfg	system("dtrace -c date -ln 'pid\$target::main:return' >/dev/null");
59178476Sjb}
60178476SjbEOF
61178476Sjb
62178476Sjbexit $status
63