1N/A/*********************************************************************** 1N/A* This software is part of the ast package * 1N/A* Copyright (c) 1985-2011 AT&T Intellectual Property * 1N/A* and is licensed under the * 1N/A* Common Public License, Version 1.0 * 1N/A* by AT&T Intellectual Property * 1N/A* A copy of the License is available at * 1N/A* (with md5 checksum 059e8cd6165cb4c31e351f2b69388fd9) * 1N/A* Information and Software Systems Research * 1N/A* Glenn Fowler <gsf@research.att.com> * 1N/A* David Korn <dgk@research.att.com> * 1N/A* Phong Vo <kpv@research.att.com> * 1N/A***********************************************************************/ 1N/A * AT&T Bell Laboratories 1N/A * shell library support 1N/A * return pointer to the full path name of the shell 1N/A * SHELL is read from the environment and must start with / 1N/A * if set-uid or set-gid then the executable and its containing 1N/A * astconf("SH",NiL,NiL) is returned by default 1N/A * NOTE: csh is rejected because the bsh/csh differentiation is 1N/A * not done for `csh script arg ...' 1N/A if ((
sh =
getenv(
"SHELL")) && *
sh ==
'/' &&
strmatch(
sh,
"*/(sh|*[!cC]sh)*([[:digit:]])?(-+([.[:alnum:]]))?(.exe)"))