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 29script() { 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 } 62EOF 63} 64 65if [ $# != 1 ]; then 66 echo expected one argument: '<'dtrace-path'>' 67 exit 2 68fi 69 70dtrace=$1 71 72script 73status=$? 74 75exit $status 76