X-Git-Url: http://git.jankratochvil.net/?a=blobdiff_plain;f=.bashrc;h=7cc89f91cf329807c76916bf3cf37c83517883dc;hb=c67aee3ca262299c60246e38069451502f8c5f43;hp=24121d4b7e86b5e9ce57173716b1b0f400d3f960;hpb=d731f44e42a0cfb8e1d9bc1575335ecdc834457a;p=nethome.git

diff --git a/.bashrc b/.bashrc
index 24121d4..7cc89f9 100644
--- a/.bashrc
+++ b/.bashrc
@@ -1,5 +1,17 @@
+if [ -n "$_home_short_dotbashrc_norc" -o "${TERM#norc-}" != "$TERM" ];then
+	# We could get executed twice:
+	_home_short_dotbashrc_norc=true
+	# Do not use $TZ as Solaris sshd(8) does not propagate it.
+	# Be aware you must use 'ssh -t' to propagate $TERM otherwise '=dumb'.
+	export TERM="${TERM#norc-}"
+	_home_short_dotbashrc=true
+fi
+
 if [ -z "$_home_short_dotbashrc" ];then
 	_home_short_dotbashrc=true
+	# $TERM gets restored to its 'norc-' state after ~/.bashrc
+	# alias norc='TERM="norc-$TERM" ssh -t $USER@localhost "cd $PWD; TERM=$TERM;"'
+	function norc { TERM="norc-$TERM" ssh -t $USER@localhost "cd $PWD; TERM=$TERM;" "$@"; }; export -f norc
 
 if [ -f /etc/bashrc ];then source /etc/bashrc;fi
 
@@ -10,7 +22,7 @@ function _bash_profile_addpath	# <variablename>,<dirpathname>
 	OPTIND=1;while getopts fs got;do
 		case "$got" in
 			[fs]) eval "_opt_$got=1" ;;
-			*) exit 1 ;;
+			*) return 1 ;;
 			esac
 		done
 	eval "_varname=\"\$$[$OPTIND+0]\""
@@ -27,18 +39,31 @@ function _bash_profile_addpath	# <variablename>,<dirpathname>
 	OPTIND="$_OPTIND";unset _OPTIND
 }
 
-_bash_profile_addpath -f PATH            "$HOME/bin"
-_bash_profile_addpath -f PATH            "/share/ProductivityTools/exe"
-_bash_profile_addpath -f PATH            "/opt/sfw/bin"
+# Use reverse order of preferred directories:
 # gid(1) dependency on: /opt/sfw/bin
-[ `id -u 2>/dev/null || gid -u` -eq 0 ] && _bash_profile_addpath -f PATH "$HOME/sbin"
+# EUID="`id -u 2>/dev/null || /usr/xpg4/bin/id -u 2>/dev/null || gid -u`"
+_bash_profile_addpath -f PATH            "/sbin"
+_bash_profile_addpath -f PATH            "/usr/sbin"
+_bash_profile_addpath -f PATH            "/usr/dist/exe"
+_bash_profile_addpath -f PATH            "/opt/sfw/bin"
+_bash_profile_addpath -f PATH            "/share/ProductivityTools/exe"
+_bash_profile_addpath -f PATH            "/usr/local/sbin"
 _bash_profile_addpath -f PATH            "/usr/local/bin"
-[ `id -u 2>/dev/null || gid -u` -eq 0 ] && _bash_profile_addpath -f PATH "/usr/local/sbin"
-_bash_profile_addpath -f LD_LIBRARY_PATH "$HOME/lib"
+[ $EUID -eq 0 ] && _bash_profile_addpath -f PATH "/usr/local/sbin"
 _bash_profile_addpath -f LD_LIBRARY_PATH "/opt/sfw/lib"
-_bash_profile_addpath -f MANPATH         "$HOME/man"
-_bash_profile_addpath -f MANPATH         "/usr/local/man"
+_bash_profile_addpath -f MANPATH         "/usr/X11R6/man"
 _bash_profile_addpath -f MANPATH         "/usr/share/man"
+_bash_profile_addpath -f MANPATH         "/usr/local/man"
+[ "`uname`" = "SunOS" ] && _bash_profile_addpath -f LD_LIBRARY_PATH "$HOME/Netscape/dist/lib"
+for family in "/net/jsc-nfs.czech.sun.com/export/jscqa-local" "$HOME";do
+	for arch in "$family" $family/`uname -p`;do
+		# Do not "-f": We use /net !
+		_bash_profile_addpath PATH            "$arch/bin"
+		[ $EUID -eq 0 ] && _bash_profile_addpath PATH "$arch/sbin"
+		_bash_profile_addpath LD_LIBRARY_PATH "$arch/lib"
+		_bash_profile_addpath MANPATH         "$arch/man"
+		done
+	done
 _bash_profile_addpath -f -s CVSROOT "short@vellum.cz:/home/short/pserver/cvs"	# default
 _bash_profile_addpath    -s CVSROOT "$HOME/pserver/cvs"
 _bash_profile_addpath    -s CVSROOT "$HOME/cvs"
@@ -67,7 +92,7 @@ _bash_profile_addpath -f CLASSPATH "/opt/SUNWhvmd/launcher/GUI/classes/launcher.
 unset -f _bash_profile_addpath
 
 for i in tar ls find cp mv ln md5sum du grep ar chown chmod tail;do
-	which g$i >/dev/null && alias $i=g$i
+	which g$i 2>/dev/null | grep '^/' >/dev/null && alias $i=g$i
 	done
 
 alias ls='ls -bF'
@@ -92,13 +117,16 @@ if [ -f "$weblog" ];then alias weblog='tail -n 20000 "$weblog"|grep "\\(~\\|%7[e
 export IGNOREEOF=10
 export TMOUT=900
 export EDITOR='vim'
-export PAGER='/bin/less -MMh5cis'
+[ -x /bin/less ] && export PAGER='/bin/less -MMh5cis'
 [ "`uname`" = "SunOS" ] || export LC_CTYPE=cs_CZ.ISO-8859-2
 export PERL_MM_OPT="PERL=$HOME/bin/perlilib PREFIX=$HOME"
-export WWW_HOME="file:///home/short/.bookmarks.html"
+for file in $HOME/.bookmarks.html;do
+	export WWW_HOME="file://$HOME/"
+	[ -r $file ] && export WWW_HOME="file://$file"
+	done
 export GREP_OPTIONS="--binary-files=without-match --directories=skip"
 if [ -n "$PS1" ];then	# set only in interactive sessions
-	export PS1="${USER}[bash]@`/usr/bin/uname -n`# "
+	export PS1='[bash]${USER}@${HOSTNAME}:${PWD}# '
 	# kbd_mode -u	# utf-8
 	# export PS1='\[\017\033%G\]'"$PS1"	# \017=std charmap, \033%G=utf-8
 	export PS1='\[\017\]'"$PS1"	# \017=std charmap
@@ -107,7 +135,10 @@ export MINICOM="-m -c on"	# metakeys+color
 export HISTSIZE=100000
 export HISTFILESIZE="$HISTSIZE"
 export CVS_RSH="ssh"
-grep -qw "$TERM" /etc/termcap || export TERM=vt220
+grep -w "$TERM" /etc/termcap >/dev/null || export TERM=vt220
+uname_p="`uname -p`"; [ "$TERM" = vt220 -a "${uname_p%86}" != "$uname_p" ] && export TERM=linux
+
+export SOCKS5_SERVER=icsocks.holland.sun.com
 
 # Force strcoll() to sort case-sensitively! (empty/undef doesn't work)
 export LC_COLLATE=C
@@ -121,7 +152,7 @@ function wclines { awk '{x[$0]++}END{for (i in x) print x[i]"\t"i}'; }; export -
 # SunOS does not support "-m"
 export ULIMITME_OPTS=""
 for i in "-m 100000" "-d 150000" "-v 200000";do
-	ulimit $i 2>/dev/null && ULIMITME_OPTS="$ULIMITME_OPTS $i"
+	(ulimit $i 2>/dev/null) && ULIMITME_OPTS="$ULIMITME_OPTS $i"
 	done
 function ulimitme { ulimit $ULIMITME_OPTS; }; export -f ulimitme
 function grep {(unset grep; ( ulimitme; grep "$@"; ); );}; export -f grep
@@ -155,6 +186,48 @@ function cpan {(unset cpan; if [ $# = 0 ];then cpan;else perl -MCPAN -e "install
 function exx { cd "`unset exx;exx "$@"|tee /proc/self/fd/2|tail -n1|sed -n 's/^extdir=//p'`"; };export -f exx
 function revlines { perl -e 'my @r=();push @r,$_ while (<>);print pop @r while @r;'; }; export -f revlines
 
+[ "`uname`" = "SunOS" ] && function rpm
+{
+	_OPTIND="$OPTIND"
+	_opt_q=0;_opt_a=0;_opt_l=0;_opt_f=0
+	OPTIND=1;while getopts qalfv got;do
+		case "$got" in
+			[qalf]) eval "_opt_$got=1" ;;
+			v) ;;
+			*) return 1 ;;
+			esac
+		done
+	shift $[$OPTIND-1]
+	if [ $_opt_q = 0 ];then echo >&2 "rpm: No -q!";return 1;fi
+	if [ $_opt_a = 1 -a $# != 0 ];then echo >&2 "rpm: -a but some arguments!";return 1;fi
+	if [ $_opt_a = 0 -a $#  = 0 ];then echo >&2 "rpm: -a but no arguments!";return 1;fi
+	if [ $_opt_l = 1 -a $_opt_f  = 1 ];then echo >&2 "rpm: Both -l and -f given!";return 1;fi
+	if [ $_opt_f = 1 ];then
+		for file in "$@";do
+			if [ "$file" = "${file#/}" ];then
+				file="$PWD/$file"
+			fi
+			_out="`pkgchk -l -p "$file"`"
+			if [ -z "$_out" ];then
+				echo >&2 "file $file is not owned by any package!"
+			else
+				echo -n "$_out"|awk '
+						/^[^\t]/{p=0}
+						/^Referenced by the following packages:$/{p=1}
+						/^\t/{if (p) { print; } }
+						'
+			fi
+			unset _out
+		done
+	elif [ $_opt_l = 1 ];then
+		pkgchk -l `pkginfo "$@"|awk '{print $2}'`|sed -n 's/^Pathname: //p'
+	else
+		pkginfo "$@"|awk '{print $2}'
+	fi
+	unset _opt_q _opt_a _opt_l _opt_f
+	OPTIND="$_OPTIND";unset _OPTIND
+} && export -f rpm
+
 ulimit -c 0
 set +H
 shopt -s mailwarn