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# This test verifies that probes will be picked up after a dlopen(3C) 30# when the pid provider is specified as a glob (e.g., p*d$target.) 31# 32 33if [ $# != 1 ]; then 34 echo expected one argument: '<'dtrace-path'>' 35 exit 2 36fi 37 38dtrace=$1 39DIR=${TMPDIR:-/tmp}/dtest.$$ 40 41mkdir $DIR 42cd $DIR 43 44cat > Makefile <<EOF 45all: main altlib.so 46 47main: main.o 48 gcc -m32 -o main main.o 49 50main.o: main.c 51 gcc -m32 -c main.c 52 53altlib.so: altlib.o 54 gcc -m32 -shared -o altlib.so altlib.o -lc 55 56altlib.o: altlib.c 57 gcc -m32 -fPIC -c altlib.c 58EOF 59 60cat > altlib.c <<EOF 61void 62go(void) 63{ 64} 65EOF 66 67cat > main.c <<EOF 68#include <dlfcn.h> 69#include <unistd.h> 70#include <stdio.h> 71 72void 73go(void) 74{ 75} 76 77int 78main(int argc, char **argv) 79{ 80 void *alt; 81 void *alt_go; 82 83 go(); 84 85 if ((alt = dlopen("./altlib.so", RTLD_LAZY | RTLD_LOCAL)) 86 == NULL) { 87 printf("dlopen of altlib.so failed: %s\n", dlerror()); 88 return (1); 89 } 90 91 if ((alt_go = dlsym(alt, "go")) == NULL) { 92 printf("failed to lookup 'go' in altlib.so\n"); 93 return (1); 94 } 95 96 ((void (*)(void))alt_go)(); 97 98 return (0); 99} 100EOF 101 102make > /dev/null 103if [ $? -ne 0 ]; then 104 print -u2 "failed to build" 105 exit 1 106fi 107 108cat > main.d <<'EOF' 109p*d$target::go:entry 110{ 111 @foo[probemod, probefunc, probename] = count(); 112} 113 114END 115{ 116 printa("%s:%s:%s %@u\n",@foo); 117} 118EOF 119 120script() { 121 $dtrace -q -s ./main.d -c ./main 122} 123 124script 125status=$? 126 127cd /tmp 128/usr/bin/rm -rf $DIR 129 130exit $status 131