]> CyberLeo.Net >> Repos - FreeBSD/releng/10.0.git/blob - cddl/contrib/opensolaris/cmd/dtrace/test/tst/common/syscall/tst.openret.ksh
- Copy stable/10 (r259064) to releng/10.0 as part of the
[FreeBSD/releng/10.0.git] / cddl / contrib / opensolaris / cmd / dtrace / test / tst / common / syscall / tst.openret.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 2006 Sun Microsystems, Inc.  All rights reserved.
25 # Use is subject to license terms.
26 #
27 #ident  "%Z%%M% %I%     %E% SMI"
28
29 script() {
30         $dtrace -c 'cat shajirosan' -qs /dev/stdin <<EOF
31         syscall::open*:entry
32         /pid == \$target/
33         {
34                 self->p = arg0;
35         }
36
37         syscall::open*:return
38         /self->p && copyinstr(self->p) == "shajirosan"/
39         {
40                 self->err = 1;
41                 self->p = 0;
42         }
43
44         syscall::open*:return
45         /self->err && (int)arg0 == -1 && (int)arg1 == -1/
46         {
47                 exit(0);
48         }
49
50         syscall::open*:return
51         /self->err/
52         {
53                 printf("a failed open(2) returned %d\n", (int)arg0);
54                 exit(1);
55         }
56
57         syscall::open*:return
58         /self->p/
59         {
60                 self->p = 0;
61         }
62 EOF
63 }
64
65 if [ $# != 1 ]; then
66         echo expected one argument: '<'dtrace-path'>'
67         exit 2
68 fi
69
70 dtrace=$1
71
72 script
73 status=$?
74
75 exit $status