Blame src/lib/libast/misc/astintercept.c
|
Packit Service |
a8c26c |
/***********************************************************************
|
|
Packit Service |
a8c26c |
* *
|
|
Packit Service |
a8c26c |
* This software is part of the ast package *
|
|
Packit Service |
a8c26c |
* Copyright (c) 1985-2011 AT&T Intellectual Property *
|
|
Packit Service |
a8c26c |
* and is licensed under the *
|
|
Packit Service |
a8c26c |
* Eclipse Public License, Version 1.0 *
|
|
Packit Service |
a8c26c |
* by AT&T Intellectual Property *
|
|
Packit Service |
a8c26c |
* *
|
|
Packit Service |
a8c26c |
* A copy of the License is available at *
|
|
Packit Service |
a8c26c |
* http://www.eclipse.org/org/documents/epl-v10.html *
|
|
Packit Service |
a8c26c |
* (with md5 checksum b35adb5213ca9657e911e9befb180842) *
|
|
Packit Service |
a8c26c |
* *
|
|
Packit Service |
a8c26c |
* Information and Software Systems Research *
|
|
Packit Service |
a8c26c |
* AT&T Research *
|
|
Packit Service |
a8c26c |
* Florham Park NJ *
|
|
Packit Service |
a8c26c |
* *
|
|
Packit Service |
a8c26c |
* Glenn Fowler <gsf@research.att.com> *
|
|
Packit Service |
a8c26c |
* David Korn <dgk@research.att.com> *
|
|
Packit Service |
a8c26c |
* Phong Vo <kpv@research.att.com> *
|
|
Packit Service |
a8c26c |
* *
|
|
Packit Service |
a8c26c |
***********************************************************************/
|
|
Packit Service |
a8c26c |
#pragma prototyped
|
|
Packit Service |
a8c26c |
|
|
Packit Service |
a8c26c |
#include "intercepts.h"
|
|
Packit Service |
a8c26c |
|
|
Packit Service |
a8c26c |
/*
|
|
Packit Service |
a8c26c |
* NOTE: the "intercepts" definition is in getenv.c because some static linkers
|
|
Packit Service |
a8c26c |
* miss lone references to "intercepts" without "astintercept()"
|
|
Packit Service |
a8c26c |
*/
|
|
Packit Service |
a8c26c |
|
|
Packit Service |
a8c26c |
/*
|
|
Packit Service |
a8c26c |
* set/clear ast intercept callouts
|
|
Packit Service |
a8c26c |
*/
|
|
Packit Service |
a8c26c |
|
|
Packit Service |
a8c26c |
int
|
|
Packit Service |
a8c26c |
astintercept(Shbltin_t* call, int set)
|
|
Packit Service |
a8c26c |
{
|
|
Packit Service |
a8c26c |
if (call->shgetenv)
|
|
Packit Service |
a8c26c |
{
|
|
Packit Service |
a8c26c |
if (set)
|
|
Packit Service |
a8c26c |
intercepts.intercept_getenv = call->shgetenv;
|
|
Packit Service |
a8c26c |
else
|
|
Packit Service |
a8c26c |
intercepts.intercept_getenv = 0;
|
|
Packit Service |
a8c26c |
}
|
|
Packit Service |
a8c26c |
if (call->shsetenv)
|
|
Packit Service |
a8c26c |
{
|
|
Packit Service |
a8c26c |
if (set)
|
|
Packit Service |
a8c26c |
intercepts.intercept_setenviron = call->shsetenv;
|
|
Packit Service |
a8c26c |
else
|
|
Packit Service |
a8c26c |
intercepts.intercept_setenviron = 0;
|
|
Packit Service |
a8c26c |
}
|
|
Packit Service |
a8c26c |
return 0;
|
|
Packit Service |
a8c26c |
}
|