1*2be1a816SJohn Birrell /* 2*2be1a816SJohn Birrell * CDDL HEADER START 3*2be1a816SJohn Birrell * 4*2be1a816SJohn Birrell * The contents of this file are subject to the terms of the 5*2be1a816SJohn Birrell * Common Development and Distribution License (the "License"). 6*2be1a816SJohn Birrell * You may not use this file except in compliance with the License. 7*2be1a816SJohn Birrell * 8*2be1a816SJohn Birrell * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 9*2be1a816SJohn Birrell * or http://www.opensolaris.org/os/licensing. 10*2be1a816SJohn Birrell * See the License for the specific language governing permissions 11*2be1a816SJohn Birrell * and limitations under the License. 12*2be1a816SJohn Birrell * 13*2be1a816SJohn Birrell * When distributing Covered Code, include this CDDL HEADER in each 14*2be1a816SJohn Birrell * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 15*2be1a816SJohn Birrell * If applicable, add the following below this CDDL HEADER, with the 16*2be1a816SJohn Birrell * fields enclosed by brackets "[]" replaced with your own identifying 17*2be1a816SJohn Birrell * information: Portions Copyright [yyyy] [name of copyright owner] 18*2be1a816SJohn Birrell * 19*2be1a816SJohn Birrell * CDDL HEADER END 20*2be1a816SJohn Birrell */ 21*2be1a816SJohn Birrell 22*2be1a816SJohn Birrell /* 23*2be1a816SJohn Birrell * Copyright 2006 Sun Microsystems, Inc. All rights reserved. 24*2be1a816SJohn Birrell * Use is subject to license terms. 25*2be1a816SJohn Birrell */ 26*2be1a816SJohn Birrell 27*2be1a816SJohn Birrell #pragma ident "%Z%%M% %I% %E% SMI" 28*2be1a816SJohn Birrell 29*2be1a816SJohn Birrell /* 30*2be1a816SJohn Birrell * ASSERTION: check that we prefer weak symbols to local ones 31*2be1a816SJohn Birrell * 32*2be1a816SJohn Birrell * SECTION: pid provider 33*2be1a816SJohn Birrell */ 34*2be1a816SJohn Birrell 35*2be1a816SJohn Birrell #pragma D option destructive 36*2be1a816SJohn Birrell 37*2be1a816SJohn Birrell BEGIN 38*2be1a816SJohn Birrell { 39*2be1a816SJohn Birrell /* 40*2be1a816SJohn Birrell * Wait no more than a second for the first call to getpid(2). 41*2be1a816SJohn Birrell */ 42*2be1a816SJohn Birrell timeout = timestamp + 1000000000; 43*2be1a816SJohn Birrell } 44*2be1a816SJohn Birrell 45*2be1a816SJohn Birrell syscall::getpid:return 46*2be1a816SJohn Birrell /pid == $1/ 47*2be1a816SJohn Birrell { 48*2be1a816SJohn Birrell i = 0; 49*2be1a816SJohn Birrell raise(SIGUSR1); 50*2be1a816SJohn Birrell /* 51*2be1a816SJohn Birrell * Wait half a second after raising the signal. 52*2be1a816SJohn Birrell */ 53*2be1a816SJohn Birrell timeout = timestamp + 500000000; 54*2be1a816SJohn Birrell } 55*2be1a816SJohn Birrell 56*2be1a816SJohn Birrell pid$1:a.out:go:entry, 57*2be1a816SJohn Birrell pid$1:a.out:_go:entry 58*2be1a816SJohn Birrell /probefunc == "_go"/ 59*2be1a816SJohn Birrell { 60*2be1a816SJohn Birrell i++; 61*2be1a816SJohn Birrell } 62*2be1a816SJohn Birrell 63*2be1a816SJohn Birrell pid$1:a.out:go:entry, 64*2be1a816SJohn Birrell pid$1:a.out:_go:entry 65*2be1a816SJohn Birrell /probefunc == "go"/ 66*2be1a816SJohn Birrell { 67*2be1a816SJohn Birrell trace("resolved to '_go' rather than 'go'"); 68*2be1a816SJohn Birrell exit(1); 69*2be1a816SJohn Birrell } 70*2be1a816SJohn Birrell 71*2be1a816SJohn Birrell pid$1:a.out:go:entry, 72*2be1a816SJohn Birrell pid$1:a.out:_go:entry 73*2be1a816SJohn Birrell /i == 2/ 74*2be1a816SJohn Birrell { 75*2be1a816SJohn Birrell exit(0); 76*2be1a816SJohn Birrell } 77*2be1a816SJohn Birrell 78*2be1a816SJohn Birrell profile:::tick-4 79*2be1a816SJohn Birrell /timestamp > timeout/ 80*2be1a816SJohn Birrell { 81*2be1a816SJohn Birrell trace("test timed out"); 82*2be1a816SJohn Birrell exit(1); 83*2be1a816SJohn Birrell } 84