X-Git-Url: https://git.jankratochvil.net/?a=blobdiff_plain;f=.bashrc;h=289d2e301b5c448e6a45e89335f82de72b71c52e;hb=f86043f305e9877f64790c6a13664e47a8a1e3d7;hp=1111750d400bd12dbe9ed4726253f4f35e8547ae;hpb=163e8ae76a96ca35868a8e5abf39216d90bca20b;p=nethome.git diff --git a/.bashrc b/.bashrc index 1111750..289d2e3 100644 --- a/.bashrc +++ b/.bashrc @@ -1,3 +1,6 @@ +# $Id$ + + if [ -n "$_home_short_dotbashrc_norc" -o "${TERM#norc-}" != "$TERM" ];then # We could get executed twice: export _home_short_dotbashrc_norc=true @@ -17,9 +20,10 @@ if [ -f /etc/bashrc ];then source /etc/bashrc;fi function _bash_profile_addpath # , { - _OPTIND="$OPTIND" + local _varname _varval _varvalold _dirpathname _opt_f _opt_s _opt_f=0;_opt_s=0 - OPTIND=1;while getopts fs got;do + unset OPTIND + while getopts fs got;do case "$got" in [fs]) eval "_opt_$got=1" ;; *) return 1 ;; @@ -31,12 +35,16 @@ function _bash_profile_addpath # , 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 "$_varname=\"$_dirpathname:\${$_varname}\"" + # We want to override any original directories, place dirpathname first! + # We want to prevent duplicates due to .bashrc reentrancy across fork(2)s. + eval "_varval=\":\${$_varname}:\"" + until [ "$_varval" = "$_varvalold" ];do + _varvalold="$_varval" + eval "_varval=\"$(echo "$_varval"|sed "s#:$_dirpathname:#:#g")\"" + done + eval "$_varname=\"$_dirpathname$(echo "$_varval"|sed "s#:\$##g")\"" fi export "$_varname" - unset _varname _dirpathname _opt_f _opt_s - OPTIND="$_OPTIND";unset _OPTIND } # Use reverse order of preferred directories: @@ -57,9 +65,10 @@ _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_p="`uname -p 2>/dev/null || uname -m`" [ "`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 + 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" @@ -76,14 +85,12 @@ _bash_profile_addpath -s CVSROOT "$HOME/pserver/cvs" _bash_profile_addpath -s CVSROOT "$HOME/cvs" _bash_profile_addpath -s ANT_HOME "/usr/local/ant" +# /share/perl for Debian +# /lib/perl for Debian +# /lib/perl5 for Fedora Core 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 +_perlpatt="$(perl -MConfig -e 'print "{,/".$Config{$_}."}" for qw(version archname);')" +for _perldir in $(eval "echo {/usr,$HOME}{/lib/perl5,/share/perl,/lib/perl}{,/site_perl}$_perlpatt");do _bash_profile_addpath -f PERLLIB "$_perldir" done unset _perldir @@ -103,6 +110,7 @@ alias maple="ssh -t vega.fjfi.cvut.cz maple" alias vi='vim' alias grepb='grep --binary-files=binary' alias L='lynx' +alias cvs2cl='cvs2cl --window 3600 --separate-header --no-wrap' alias cvsfiles='cvsutil --files --print' alias cvsignores='cvsutil --ignores --print' alias cvsignoresall='cvsutil --ignores --workings --print' @@ -110,40 +118,54 @@ 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' +alias rpmdb='rpm --define "_dbpath `echo /usr/lib/rpmdb/*/*`"' -weberr="/var/log/httpd/error/klokan.error_log" -if [ -f "$weberr" ];then alias weberr='tail "$weberr"';fi -weblog="/var/log/httpd/klokan.access_log" -if [ -f "$weblog" ];then alias weblog='tail -n 20000 "$weblog"|grep "\\(~\\|%7[eE]\\)short"';fi +# '2>/dev/null' to prevent: unalias: x: not found +unalias 2>/dev/null cp # -i +unalias 2>/dev/null mv # -i +unalias 2>/dev/null rm # -i +unalias 2>/dev/null df # -h +unalias 2>/dev/null du # -h export IGNOREEOF=10 -export TMOUT=900 +# '2>/dev/null' to prevent: TMOUT: readonly variable +export TMOUT=900 2>/dev/null export EDITOR='vim' [ -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 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" +export GREP_OPTIONS="--binary-files=without-match --directories=skip --exclude=tags --exclude=TAGS --exclude=CVS" if [ -n "$PS1" ];then # set only in interactive sessions export PS1='[bash]${LOGNAME}@${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 + 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 +# Do not: grep -w "$TERM" /etc/termcap >/dev/null || export TERM=vt220 +# as Sun workaround as Debian misses: /etc/termcap +# expects: $uname_p +[ "$TERM" = vt220 -a "${uname_p%86}" != "$uname_p" ] && export TERM=linux export SOCKS5_SERVER=icsocks.holland.sun.com +# Force English. +unset LANG LANGUAGE `set|sed -n 's/^\(LC_[^=]*\)=.*$/\1/p'` +export LANG=en_US.UTF-8 # Force strcoll() to sort case-sensitively! (empty/undef doesn't work) export LC_COLLATE=C +# Do not: # Prevent: perl: warning: Setting locale failed. +# # due to LC_COLLATE=C and LC_ALL=(unset) +# export LC_ALL=C +# as it breaks Mutt "utf-8" and somehow it is no longer needed. 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 @@ -156,7 +178,9 @@ export ULIMITME_OPTS="" for i in "-m 100000" "-d 150000" "-v 200000";do (ulimit $i 2>/dev/null) && ULIMITME_OPTS="$ULIMITME_OPTS $i" done -function ulimitme { ulimit $ULIMITME_OPTS; }; export -f ulimitme +# 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 @ ulimit -c 0 set +H shopt -s mailwarn +unset OPTIND if [ -f "$HOME/.bashrc.local" ];then source "$HOME/.bashrc.local";fi