1*8462SApril.Chin@Sun.COM /***********************************************************************
2*8462SApril.Chin@Sun.COM *                                                                      *
3*8462SApril.Chin@Sun.COM *               This software is part of the ast package               *
4*8462SApril.Chin@Sun.COM *          Copyright (c) 1985-2008 AT&T Intellectual Property          *
5*8462SApril.Chin@Sun.COM *                      and is licensed under the                       *
6*8462SApril.Chin@Sun.COM *                  Common Public License, Version 1.0                  *
7*8462SApril.Chin@Sun.COM *                    by AT&T Intellectual Property                     *
8*8462SApril.Chin@Sun.COM *                                                                      *
9*8462SApril.Chin@Sun.COM *                A copy of the License is available at                 *
10*8462SApril.Chin@Sun.COM *            http://www.opensource.org/licenses/cpl1.0.txt             *
11*8462SApril.Chin@Sun.COM *         (with md5 checksum 059e8cd6165cb4c31e351f2b69388fd9)         *
12*8462SApril.Chin@Sun.COM *                                                                      *
13*8462SApril.Chin@Sun.COM *              Information and Software Systems Research               *
14*8462SApril.Chin@Sun.COM *                            AT&T Research                             *
15*8462SApril.Chin@Sun.COM *                           Florham Park NJ                            *
16*8462SApril.Chin@Sun.COM *                                                                      *
17*8462SApril.Chin@Sun.COM *                 Glenn Fowler <gsf@research.att.com>                  *
18*8462SApril.Chin@Sun.COM *                  David Korn <dgk@research.att.com>                   *
19*8462SApril.Chin@Sun.COM *                   Phong Vo <kpv@research.att.com>                    *
20*8462SApril.Chin@Sun.COM *                                                                      *
21*8462SApril.Chin@Sun.COM ***********************************************************************/
22*8462SApril.Chin@Sun.COM #pragma prototyped
23*8462SApril.Chin@Sun.COM 
24*8462SApril.Chin@Sun.COM #include "intercepts.h"
25*8462SApril.Chin@Sun.COM 
26*8462SApril.Chin@Sun.COM /*
27*8462SApril.Chin@Sun.COM  * NOTE: the "intercepts" definition is in getenv.c because some static linkers
28*8462SApril.Chin@Sun.COM  *	 miss lone references to "intercepts" without "astintercept()"
29*8462SApril.Chin@Sun.COM  */
30*8462SApril.Chin@Sun.COM 
31*8462SApril.Chin@Sun.COM /*
32*8462SApril.Chin@Sun.COM  * set/clear ast intercept callouts
33*8462SApril.Chin@Sun.COM  */
34*8462SApril.Chin@Sun.COM 
35*8462SApril.Chin@Sun.COM int
36*8462SApril.Chin@Sun.COM astintercept(Shbltin_t* call, int set)
37*8462SApril.Chin@Sun.COM {
38*8462SApril.Chin@Sun.COM 	if (call->shgetenv)
39*8462SApril.Chin@Sun.COM 	{
40*8462SApril.Chin@Sun.COM 		if (set)
41*8462SApril.Chin@Sun.COM 			intercepts.intercept_getenv = call->shgetenv;
42*8462SApril.Chin@Sun.COM 		else
43*8462SApril.Chin@Sun.COM 			intercepts.intercept_getenv = 0;
44*8462SApril.Chin@Sun.COM 	}
45*8462SApril.Chin@Sun.COM 	if (call->shsetenv)
46*8462SApril.Chin@Sun.COM 	{
47*8462SApril.Chin@Sun.COM 		if (set)
48*8462SApril.Chin@Sun.COM 			intercepts.intercept_setenviron = call->shsetenv;
49*8462SApril.Chin@Sun.COM 		else
50*8462SApril.Chin@Sun.COM 			intercepts.intercept_setenviron = 0;
51*8462SApril.Chin@Sun.COM 	}
52*8462SApril.Chin@Sun.COM 	return 0;
53*8462SApril.Chin@Sun.COM }
54