xref: /freebsd-src/cddl/contrib/opensolaris/cmd/dtrace/test/tst/sparc/ustack/tst.helper.c (revision 2be1a816b9ff69588e55be0a84cbe2a31efc0f2f)
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 2007 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 #include <stdint.h>
30*2be1a816SJohn Birrell #include <stdlib.h>
31*2be1a816SJohn Birrell #include <strings.h>
32*2be1a816SJohn Birrell 
33*2be1a816SJohn Birrell int
baz(void)34*2be1a816SJohn Birrell baz(void)
35*2be1a816SJohn Birrell {
36*2be1a816SJohn Birrell 	return (8);
37*2be1a816SJohn Birrell }
38*2be1a816SJohn Birrell 
39*2be1a816SJohn Birrell static int
foo(void)40*2be1a816SJohn Birrell foo(void)
41*2be1a816SJohn Birrell {
42*2be1a816SJohn Birrell 	/*
43*2be1a816SJohn Birrell 	 * In order to assure that our helper is properly employed to identify
44*2be1a816SJohn Birrell 	 * the frame, we're going to trampoline through data.
45*2be1a816SJohn Birrell 	 */
46*2be1a816SJohn Birrell 	uint32_t instr[] = {
47*2be1a816SJohn Birrell 	    0x9de3bfa0,		/* save %sp, -0x60, %sp	*/
48*2be1a816SJohn Birrell 	    0x40000000,		/* call baz		*/
49*2be1a816SJohn Birrell 	    0x01000000,		/* nop			*/
50*2be1a816SJohn Birrell 	    0x81c7e008,		/* ret			*/
51*2be1a816SJohn Birrell 	    0x81e80000		/* restore		*/
52*2be1a816SJohn Birrell 	};
53*2be1a816SJohn Birrell 	uint32_t *fp = malloc(sizeof (instr));
54*2be1a816SJohn Birrell 
55*2be1a816SJohn Birrell 	/*
56*2be1a816SJohn Birrell 	 * Do our little relocation dance.
57*2be1a816SJohn Birrell 	 */
58*2be1a816SJohn Birrell 	instr[1] |= ((uintptr_t)baz - (uintptr_t)&fp[1]) >> 2;
59*2be1a816SJohn Birrell 
60*2be1a816SJohn Birrell 	/*
61*2be1a816SJohn Birrell 	 * Copy the code to the heap (it's a pain to build in ON with an
62*2be1a816SJohn Birrell 	 * executable stack).
63*2be1a816SJohn Birrell 	 */
64*2be1a816SJohn Birrell 	bcopy(instr, fp, sizeof (instr));
65*2be1a816SJohn Birrell 
66*2be1a816SJohn Birrell 	(*(int (*)(void))fp)();
67*2be1a816SJohn Birrell 
68*2be1a816SJohn Birrell 	free(fp);
69*2be1a816SJohn Birrell 
70*2be1a816SJohn Birrell 	return (0);
71*2be1a816SJohn Birrell }
72*2be1a816SJohn Birrell 
73*2be1a816SJohn Birrell int
main(int argc,char ** argv)74*2be1a816SJohn Birrell main(int argc, char **argv)
75*2be1a816SJohn Birrell {
76*2be1a816SJohn Birrell 	for (;;) {
77*2be1a816SJohn Birrell 		foo();
78*2be1a816SJohn Birrell 	}
79*2be1a816SJohn Birrell 
80*2be1a816SJohn Birrell 	return (0);
81*2be1a816SJohn Birrell }
82