csh-compat

UNIX下SH的实现源码

# C-shell compatabilty package.
# setenv VAR VALUE
function setenv ()
{
  export $1="$2"
}

function unsetenv ()
{
  unset $1
}

# Can't write foreach yet.  Need pattern matching, and a few extras.
function foreach () {
echo 'Can'\''t do `foreach'\'' yet.  Type "help for".'
}

# Make this work like csh's.  Special case "term" and "path".
#set () {
#}

chdir ()
{
  builtin cd "$@"
}

# alias - convert csh alias commands to bash functions
# from Mohit Aron <[e-mail]>
# posted to usenet as <4i5p17$[e-mail]>
function alias ()
{
	if [ "x$2" = "x" ] 
	then
		declare -f $1
	else
		echo $2 | egrep -s '(\!|#)' 2>/dev/null
		if [ $? -eq 0 ]
		then
			comm=$(echo $2 | sed  's/\\!\*/\"$\@\"/g
					       s/\\!:\([1-9]\)/\"$\1\"/g
				               s/#/\\#/g')
		else
			comm="$2 \"\$@\""
		fi
		eval function $1 \(\) "{" command "$comm"  "; }"
	fi
}