X-Git-Url: https://git.jankratochvil.net/?p=nethome.git;a=blobdiff_plain;f=.bashrc;h=65f8e40d1dc8e5ca04d39156a908741d892fad34;hp=36326aa9dce70241276ecbf8971937c2866035ca;hb=7c9b10d7f5e3e34a6372699e6bc057c53c0d00e7;hpb=d00018120bc66179cad7722f2585a8ac2744439e diff --git a/.bashrc b/.bashrc index 36326aa..65f8e40 100644 --- a/.bashrc +++ b/.bashrc @@ -1,47 +1,114 @@ +if [ -n "$_home_short_dotbashrc_norc" -o "${TERM#norc-}" != "$TERM" ];then + # We could get executed twice: + export _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-}" + export _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 -o 'NoHostAuthenticationForLocalhost yes' $USER@localhost "cd $PWD; TERM=$TERM;"' + function norc { TERM="norc-$TERM" ssh -t -o 'NoHostAuthenticationForLocalhost yes' $USER@localhost "cd $PWD; TERM=$TERM;" "$@"; }; export -f norc if [ -f /etc/bashrc ];then source /etc/bashrc;fi -function _bash_profile_addpath # variable,dirpathname +function _bash_profile_addpath # , { - if [ '!' -d "$2" ];then return;fi - if [ -n "$3" -o -z "`eval "echo \\${$1}"`" ];then - eval "$1='$2'" + local _varname _dirpathname _opt_f _opt_s + _opt_f=0;_opt_s=0 + unset OPTIND + while getopts fs got;do + case "$got" in + [fs]) eval "_opt_$got=1" ;; + *) return 1 ;; + esac + done + eval "_varname=\"\$$[$OPTIND+0]\"" + eval "_dirpathname=\"\$$[$OPTIND+1]\"" + if [ $_opt_f = 0 -a '!' -d "$_dirpathname" ];then return;fi + if [ $_opt_s = 1 -o -z "`eval "echo \\${$_varname}"`" ];then + eval "$_varname='$_dirpathname'" else # we want to override any original directories, place dirpathname first! - eval "$1=\"$2:\${$1}\"" + eval "$_varname=\"$_dirpathname:\${$_varname}\"" fi - export "$1" + export "$_varname" } -_bash_profile_addpath PATH "$HOME/bin" -_bash_profile_addpath PATH "$HOME/sbin" -_bash_profile_addpath LD_LIBRARY_PATH "$HOME/lib" -_bash_profile_addpath MANPATH "$HOME/man" - -_bash_profile_addpath CVSROOT "$HOME/cvs" single -_bash_profile_addpath CVSROOT "$HOME/pserver/cvs" single +# Use reverse order of preferred directories: +# gid(1) dependency on: /opt/sfw/bin +# EUID="`id -u 2>/dev/null || /usr/xpg4/bin/id -u 2>/dev/null || gid -u`" +_bash_profile_addpath -f PATH "/opt/SUNWspro/bin" +_bash_profile_addpath -f PATH "/usr/dist/exe" +_bash_profile_addpath -f PATH "/sbin" +_bash_profile_addpath -f PATH "/usr/sbin" +_bash_profile_addpath -f PATH "/opt/sfw/bin" +[ -x $HOME/bin/ProductivityTools-check ] && eval `$HOME/bin/ProductivityTools-check` +[ -n "$PATH_PRODUCTIVITY_TOOLS" ] && _bash_profile_addpath -f PATH "$PATH_PRODUCTIVITY_TOOLS" +[ $EUID -eq 0 ] && _bash_profile_addpath -f PATH "/usr/local/sbin" +_bash_profile_addpath -f PATH "/usr/local/bin" +_bash_profile_addpath -f LD_LIBRARY_PATH "/opt/sfw/lib" +_bash_profile_addpath -f MANPATH "/usr/X11R6/man" +_bash_profile_addpath -f MANPATH "/usr/share/man" +_bash_profile_addpath -f MANPATH "/usr/local/man" +_bash_profile_addpath -s JAVA_HOME "/usr/java" +_bash_profile_addpath -s JAVA_HOME "/usr/local/java" +[ "`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" + _bash_profile_addpath PATH "$arch/OpenOffice.org" + _bash_profile_addpath PATH "$arch/forte4j/extbin" + _bash_profile_addpath -s JAVA_HOME "$arch/java" + [ $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 +[ -n "$JAVA_HOME" ] && _bash_profile_addpath PATH "$JAVA_HOME/bin" +_bash_profile_addpath -s CVSROOT "$HOME/pserver/cvs" +_bash_profile_addpath -s CVSROOT "$HOME/cvs" +_bash_profile_addpath -s ANT_HOME "/usr/local/ant" -for _perldir in $(eval "echo $HOME/lib/perl5/site_perl$( +mkdir -p $HOME/lib/perl5 # otherwise CPAN will install to "$HOME/lib/site_perl" etc. +for _perldir in $(eval "echo {/usr,$HOME}/lib/perl5{,/site_perl}$( for perlvar in version archname;do echo -n '{,/' perl -V:"$perlvar"|cut -d "'" -f 2|tr -d '\n' echo -n '}' done )");do - _bash_profile_addpath PERLLIB "$_perldir" + _bash_profile_addpath -f PERLLIB "$_perldir" done unset _perldir unset -f _bash_profile_addpath +for i in tar ls find cp mv ln md5sum du grep ar chown chmod tail;do + # Prevent g$i from system directory overriding customized $i binary + which $i 2>/dev/null | grep /net/jsc-nfs.czech.sun.com/export/jscqa-local/ >/dev/null && continue + which g$i 2>/dev/null | grep '^/' >/dev/null && alias $i=g$i + done + alias ls='ls -bF' alias l='ls -lbF' alias maple="ssh -t vega.fjfi.cvut.cz maple" #alias cc='cc -I/home/short/include' alias vi='vim' alias grepb='grep --binary-files=binary' +alias L='lynx' +alias cvsfiles='cvsutil --files --print' +alias cvsignores='cvsutil --ignores --print' +alias cvsignoresall='cvsutil --ignores --workings --print' +alias cvsignoresrm='cvsutil --ignores --rm' +alias cvsignoresrmall='cvsutil --ignores --workings --rm' +alias cvsignoresallrm='cvsutil --ignores --workings --rm' +[ "`uname`" = "SunOS" -a -x $HOME/bin/rpm-by-pkg ] && alias rpm='rpm-by-pkg' weberr="/var/log/httpd/error/klokan.error_log" if [ -f "$weberr" ];then alias weberr='tail "$weberr"';fi @@ -51,41 +118,54 @@ if [ -f "$weblog" ];then alias weblog='tail -n 20000 "$weblog"|grep "\\(~\\|%7[e export IGNOREEOF=10 export TMOUT=900 export EDITOR='vim' -export LC_CTYPE=cs_CZ.ISO-8859-2 -export PERL_MM_OPT="PREFIX=$HOME" -export WWW_HOME="file:///home/short/.bookmarks.html" +[ -x /bin/less ] && export PAGER='/bin/less -MMh5cis' +export PERL_MM_OPT="PERL=$HOME/bin/perlilib" +[ "$UID" -ne 0 ] && export PERL_MM_OPT="$PERL_MM_OPT PREFIX=$HOME" +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='[bash]${LOGNAME}@${HOSTNAME}:${PWD}# ' + export PS1='\[\017\]'"$PS1" # \017=std charmap + export PS1='\[\033%G\]'"$PS1" # \033%G=utf-8 + # Do not: kbd_mode -u # utf-8 + # as it breaks keyboard state in X and it is not permitted for non-root. + fi +export MINICOM="-m -c on" # metakeys+color +export HISTSIZE=100000 +export HISTFILESIZE="$HISTSIZE" +export CVS_RSH="ssh" +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 -# even when LANG is set to "en_US" it is lethal - strcoll() starts to sort case-insensitively! -unset LANG +# Force strcoll() to sort case-sensitively! (empty/undef doesn't work) +export LC_COLLATE=C function cvsdiff { cvs diff "$@" 2>&1|pipebuf -q| less; }; export -f cvsdiff function cvsdiffi { cvs diff "$@" 2>&1|pipebuf -q|grep -v '^?'|less; }; export -f cvsdiffi function cvsupdate { cvs update "$@" 2>&1|pipebuf -q| less; }; export -f cvsupdate function cvsupdatei { cvs update "$@" 2>&1|pipebuf -q|grep -v '^?'|less; }; export -f cvsupdatei -function cvsfiles { - for i in `find . -name Entries|grep '/CVS/Entries$'`;do - j="`echo "$i"|sed 's,CVS/Entries$,,'`" - sed -n 's,^/\([^/]*\)/[^-].*$,'"$j"'\1,p' <$i - done \ - | sed 's%^\./%%' - }; export -f cvsfiles -function cvsignore { - for i in `find . -name .cvsignore`;do - j="`echo "$i"|sed 's,\.cvsignore$,,'`" - sed -n 's,^.*$,'"$j"'&,p' <$i - done - }; export -f cvsignore -function cvsignorerm { cvsignore | xargs rm -f; }; export -f cvsignorerm -function cvsignoreall { - (find -type f|sed -e '\#/CVS/[^/]*$#d' -e 's#^\./##';cvsfiles)|sort|uniq -c|sed -n "s/^ *1`echo -e '\t'`//p" - }; export -f cvsignoreall -function cvsignoreallrm { cvsignoreall | xargs rm -f; }; export -f cvsignoreallrm function wclines { awk '{x[$0]++}END{for (i in x) print x[i]"\t"i}'; }; export -f wclines -function ulimitme { ulimit -m 100000 -d 150000 -v 200000; }; export -f ulimitme -function grep { ( ulimitme; `which grep` "$@"; ); }; export -f grep -function rsync { `which rsync` -v -e ssh --progress --stats --partial "$@"; }; export -f rsync +# 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" + done +# Prevent: ulimit: -m 100000 -d 150000 -v 200000: invalid number +# by forcing our known $IFS value; eval(1) is needed to take $IFS to effect: +function ulimitme { IFS=" " eval "ulimit $ULIMITME_OPTS"; }; export -f ulimitme +function grep {(unset grep; ( ulimitme; grep "$@"; ); );}; export -f grep +function finame { find . -false ` + awk );print pop @r while @r;'; }; export -f revlines ulimit -c 0 +set +H +shopt -s mailwarn +unset OPTIND if [ -f "$HOME/.bashrc.local" ];then source "$HOME/.bashrc.local";fi unset _home_short_dotbashrc # permit later reinitializations fi # _home_short_dotbashrc + +true # Prevent crash in '-e' mode