1178476Sjb/* 2178476Sjb * CDDL HEADER START 3178476Sjb * 4178476Sjb * The contents of this file are subject to the terms of the 5178476Sjb * Common Development and Distribution License (the "License"). 6178476Sjb * You may not use this file except in compliance with the License. 7178476Sjb * 8178476Sjb * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 9178476Sjb * or http://www.opensolaris.org/os/licensing. 10178476Sjb * See the License for the specific language governing permissions 11178476Sjb * and limitations under the License. 12178476Sjb * 13178476Sjb * When distributing Covered Code, include this CDDL HEADER in each 14178476Sjb * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 15178476Sjb * If applicable, add the following below this CDDL HEADER, with the 16178476Sjb * fields enclosed by brackets "[]" replaced with your own identifying 17178476Sjb * information: Portions Copyright [yyyy] [name of copyright owner] 18178476Sjb * 19178476Sjb * CDDL HEADER END 20178476Sjb */ 21178476Sjb 22178476Sjb/* 23178476Sjb * Copyright 2007 Sun Microsystems, Inc. All rights reserved. 24178476Sjb * Use is subject to license terms. 25178476Sjb */ 26178476Sjb 27178476Sjb#pragma ident "%Z%%M% %I% %E% SMI" 28178476Sjb 29178476Sjb/* 30178476Sjb * ASSERTION: make sure fork(2) is okay 31178476Sjb * 32178476Sjb * SECTION: pid provider 33178476Sjb */ 34178476Sjb 35178476Sjb#pragma D option destructive 36178476Sjb 37178476Sjbpid$1:a.out:waiting:entry 38178476Sjb{ 39178476Sjb this->value = (int *)alloca(sizeof (int)); 40178476Sjb *this->value = 1; 41178476Sjb copyout(this->value, arg0, sizeof (int)); 42178476Sjb} 43178476Sjb 44178476Sjbproc:::create 45178476Sjb/pid == $1/ 46178476Sjb{ 47178476Sjb child = args[0]->pr_pid; 48178476Sjb trace(pid); 49178476Sjb} 50178476Sjb 51178476Sjbpid$1:a.out:go: 52178476Sjb/pid == child/ 53178476Sjb{ 54178476Sjb trace("wrong pid"); 55178476Sjb exit(1); 56178476Sjb} 57178476Sjb 58178476Sjbproc:::exit 59178476Sjb/pid == $1 || pid == child/ 60178476Sjb{ 61178476Sjb out++; 62178476Sjb trace(pid); 63178476Sjb} 64178476Sjb 65178476Sjbproc:::exit 66178476Sjb/out == 2/ 67178476Sjb{ 68178476Sjb exit(0); 69178476Sjb} 70178476Sjb 71178476Sjb 72178476SjbBEGIN 73178476Sjb{ 74178476Sjb /* 75178476Sjb * Let's just do this for 5 seconds. 76178476Sjb */ 77178476Sjb timeout = timestamp + 5000000000; 78178476Sjb} 79178476Sjb 80178476Sjbprofile:::tick-4 81178476Sjb/timestamp > timeout/ 82178476Sjb{ 83178476Sjb trace("test timed out"); 84178476Sjb exit(1); 85178476Sjb} 86178476Sjb 87