usr/src/cmd/dtrace/test/tst/common/translators/tst.TestTransStability1.ksh
changeset 13758 23432da34147
equal deleted inserted replaced
13757:2e70a48f5fe2 13758:23432da34147
       
     1 #
       
     2 # CDDL HEADER START
       
     3 #
       
     4 # The contents of this file are subject to the terms of the
       
     5 # Common Development and Distribution License (the "License").
       
     6 # You may not use this file except in compliance with the License.
       
     7 #
       
     8 # You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
       
     9 # or http://www.opensolaris.org/os/licensing.
       
    10 # See the License for the specific language governing permissions
       
    11 # and limitations under the License.
       
    12 #
       
    13 # When distributing Covered Code, include this CDDL HEADER in each
       
    14 # file and include the License file at usr/src/OPENSOLARIS.LICENSE.
       
    15 # If applicable, add the following below this CDDL HEADER, with the
       
    16 # fields enclosed by brackets "[]" replaced with your own identifying
       
    17 # information: Portions Copyright [yyyy] [name of copyright owner]
       
    18 #
       
    19 # CDDL HEADER END
       
    20 #
       
    21 
       
    22 #
       
    23 # Copyright 2006 Sun Microsystems, Inc.  All rights reserved.
       
    24 # Use is subject to license terms.
       
    25 #
       
    26 
       
    27 #
       
    28 # Copyright (c) 2012 by Delphix. All rights reserved.
       
    29 #
       
    30 
       
    31 #
       
    32 # Test the output for stable translations.
       
    33 #
       
    34 
       
    35 if [ $# != 1 ]; then
       
    36 	echo expected one argument: '<'dtrace-path'>'
       
    37 	exit 2
       
    38 fi
       
    39 
       
    40 dtrace=$1
       
    41 
       
    42 $dtrace -v -s /dev/stdin <<EOF
       
    43 
       
    44 #pragma D option quiet
       
    45 
       
    46 inline lwpsinfo_t *myinfo = xlate < lwpsinfo_t *> (curthread);
       
    47 
       
    48 #pragma D attributes Stable/Stable/Common myinfo
       
    49 
       
    50 BEGIN
       
    51 {
       
    52 	this->a = myinfo->pr_flag;
       
    53 	exit(0);
       
    54 }
       
    55 
       
    56 BEGIN
       
    57 {
       
    58 	exit(1);
       
    59 }
       
    60 EOF
       
    61 
       
    62 exit $?