xref: /onnv-gate/usr/src/cmd/dtrace/test/tst/common/pid/tst.vfork.d (revision 3944:75371f172291)
12633Sahl /*
22633Sahl  * CDDL HEADER START
32633Sahl  *
42633Sahl  * The contents of this file are subject to the terms of the
52633Sahl  * Common Development and Distribution License (the "License").
62633Sahl  * You may not use this file except in compliance with the License.
72633Sahl  *
82633Sahl  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
92633Sahl  * or http://www.opensolaris.org/os/licensing.
102633Sahl  * See the License for the specific language governing permissions
112633Sahl  * and limitations under the License.
122633Sahl  *
132633Sahl  * When distributing Covered Code, include this CDDL HEADER in each
142633Sahl  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
152633Sahl  * If applicable, add the following below this CDDL HEADER, with the
162633Sahl  * fields enclosed by brackets "[]" replaced with your own identifying
172633Sahl  * information: Portions Copyright [yyyy] [name of copyright owner]
182633Sahl  *
192633Sahl  * CDDL HEADER END
202633Sahl  */
212633Sahl 
222633Sahl /*
23*3944Sahl  * Copyright 2007 Sun Microsystems, Inc.  All rights reserved.
242633Sahl  * Use is subject to license terms.
252633Sahl  */
262633Sahl 
272633Sahl #pragma ident	"%Z%%M%	%I%	%E% SMI"
282633Sahl 
292633Sahl /*
302633Sahl  * ASSERTION: make sure probes called from a vfork(2) child fire in the parent
312633Sahl  *
322633Sahl  * SECTION: pid provider
332633Sahl  */
342633Sahl 
352633Sahl #pragma D option destructive
362633Sahl 
372633Sahl pid$1:a.out:waiting:entry
382633Sahl {
392633Sahl 	this->value = (int *)alloca(sizeof (int));
402633Sahl 	*this->value = 1;
412633Sahl 	copyout(this->value, arg0, sizeof (int));
422633Sahl }
432633Sahl 
44*3944Sahl proc:::create
45*3944Sahl /pid == $1/
462633Sahl {
47*3944Sahl 	child = args[0]->pr_pid;
482633Sahl }
492633Sahl 
502633Sahl pid$1:a.out:go:
51*3944Sahl /child != pid/
522633Sahl {
53*3944Sahl 	printf("wrong pid (%d %d)", pid, child);
542633Sahl 	exit(1);
552633Sahl }
562633Sahl 
572633Sahl syscall::rexit:entry
582633Sahl /pid == $1/
592633Sahl {
602633Sahl 	exit(0);
612633Sahl }
62