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#include <stdint.h>
30178476Sjb#include <stdlib.h>
31178476Sjb#include <strings.h>
32178476Sjb
33178476Sjbint
34178476Sjbbaz(void)
35178476Sjb{
36178476Sjb	return (8);
37178476Sjb}
38178476Sjb
39178476Sjbstatic int
40178476Sjbfoo(void)
41178476Sjb{
42178476Sjb	/*
43178476Sjb	 * In order to assure that our helper is properly employed to identify
44178476Sjb	 * the frame, we're going to trampoline through data.
45178476Sjb	 */
46178476Sjb	uint8_t instr[] = {
47178476Sjb	    0x55,			/* pushl %ebp		*/
48178476Sjb	    0x8b, 0xec,			/* movl  %esp, %ebp	*/
49178476Sjb	    0xe8, 0x0, 0x0, 0x0, 0x0,	/* call  baz		*/
50178476Sjb	    0x8b, 0xe5,			/* movl  %ebp, %esp	*/
51178476Sjb	    0x5d,			/* popl  %ebp		*/
52178476Sjb	    0xc3			/* ret			*/
53178476Sjb	};
54178476Sjb	uint8_t *fp = malloc(sizeof (instr));
55178476Sjb
56178476Sjb	/*
57178476Sjb	 * Do our little relocation dance.
58178476Sjb	 */
59178476Sjb	*((int *)&instr[4]) = (uintptr_t)baz - (uintptr_t)&fp[8];
60178476Sjb
61178476Sjb	/*
62178476Sjb	 * Copy the code to the heap (it's a pain to build in ON with an
63178476Sjb	 * executable stack).
64178476Sjb	 */
65178476Sjb	bcopy(instr, fp, sizeof (instr));
66178476Sjb
67178476Sjb	(*(int (*)(void))fp)();
68178476Sjb
69178476Sjb	free(fp);
70178476Sjb
71178476Sjb	return (0);
72178476Sjb}
73178476Sjb
74178476Sjbint
75178476Sjbmain(int argc, char **argv)
76178476Sjb{
77178476Sjb	for (;;) {
78178476Sjb		foo();
79178476Sjb	}
80178476Sjb
81178476Sjb	return (0);
82178476Sjb}
83