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