usr/src/cmd/dtrace/test/tst/common/pid/tst.newprobes.ksh

   1 #!/bin/ksh -p
   2 #
   3 # CDDL HEADER START
   4 #
   5 # The contents of this file are subject to the terms of the
   6 # Common Development and Distribution License (the "License").
   7 # You may not use this file except in compliance with the License.
   8 #
   9 # You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
  10 # or http://www.opensolaris.org/os/licensing.
  11 # See the License for the specific language governing permissions
  12 # and limitations under the License.
  13 #
  14 # When distributing Covered Code, include this CDDL HEADER in each
  15 # file and include the License file at usr/src/OPENSOLARIS.LICENSE.
  16 # If applicable, add the following below this CDDL HEADER, with the
  17 # fields enclosed by brackets "[]" replaced with your own identifying
  18 # information: Portions Copyright [yyyy] [name of copyright owner]
  19 #
  20 # CDDL HEADER END
  21 #
  22
  23 #
  24 # Copyright 2008 Sun Microsystems, Inc.  All rights reserved.
  25 # Use is subject to license terms.
  26 #
  27
  28 #
  29 # Copyright (c) 2012 by Delphix. All rights reserved.
  30 #
  31
  32 if [ $# != 1 ]; then
  33         echo expected one argument: '<'dtrace-path'>'
  34         exit 2
  35 fi
  36
  37 dtrace=$1
  38
  39 $dtrace -wZq -x switchrate=100ms -s /dev/stdin <<EOF
  40 pid*:date::
  41 {
  42         printf("%s:%s\n", probefunc, probename);
  43 }
  44
  45 tick-1s
  46 /i++ > 5/
  47 {
  48         exit(0);
  49 }
  50
  51 tick-1s
  52 /(i % 2) == 0/
  53 {
  54         system("dtrace -c date -n 'pid\$target::main:entry' >/dev/null");
  55 }
  56
  57 tick-1s
  58 /(i % 2) == 1/
  59 {
  60         system("dtrace -c date -n 'pid\$target::main:return' >/dev/null");
  61 }
  62 EOF
  63
  64 exit $status