da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin/*
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin * CDDL HEADER START
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin * The contents of this file are subject to the terms of the
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin * Common Development and Distribution License (the "License").
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin * You may not use this file except in compliance with the License.
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin * or http://www.opensolaris.org/os/licensing.
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin * See the License for the specific language governing permissions
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin * and limitations under the License.
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin * When distributing Covered Code, include this CDDL HEADER in each
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin * If applicable, add the following below this CDDL HEADER, with the
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin * fields enclosed by brackets "[]" replaced with your own identifying
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin * information: Portions Copyright [yyyy] [name of copyright owner]
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin * CDDL HEADER END
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin/*
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin * Copyright 2006 Sun Microsystems, Inc. All rights reserved.
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin * Use is subject to license terms.
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#pragma ident "%Z%%M% %I% %E% SMI"
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin/*
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin * ASSERTION:
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin * Declare a dynamic type and then use it to copyin the first 3 environment
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin * variable pointers from the current process.
*
* SECTION: Structs and Unions/Structs;
* Actions and Subroutines/copyin();
* Actions and Subroutines/copyinstr();
* Variables/External Variables
*
* NOTES:
* This test program declares a dynamic type and then uses it to copyin the
* first three environment variable pointers from the current process. We
* then use the dynamic type to access the result of our copyin(). The
* special "D" module type scope is also tested.
*/
#pragma D option quiet
struct env_vars_32 {
uint32_t e1;
uint32_t e2;
uint32_t e3;
};
struct env_vars_64 {
uint64_t e1;
uint64_t e2;
uint64_t e3;
};
BEGIN
/curpsinfo->pr_dmodel == PR_MODEL_ILP32/
{
e32 = (struct D`env_vars_32 *)
copyin(curpsinfo->pr_envp, sizeof (struct D`env_vars_32));
printf("e1 = \"%s\"\n", stringof(copyinstr(e32->e1)));
printf("e2 = \"%s\"\n", stringof(copyinstr(e32->e2)));
printf("e3 = \"%s\"\n", stringof(copyinstr(e32->e3)));
exit(0);
}
BEGIN
/curpsinfo->pr_dmodel == PR_MODEL_LP64/
{
e64 = (struct D`env_vars_64 *)
copyin(curpsinfo->pr_envp, sizeof (struct D`env_vars_64));
printf("e1 = \"%s\"\n", stringof(copyinstr(e64->e1)));
printf("e2 = \"%s\"\n", stringof(copyinstr(e64->e2)));
printf("e3 = \"%s\"\n", stringof(copyinstr(e64->e3)));
exit(0);
}