User: ben Date: 05/12/19 03:57:09 Modified: xemacs-builds/ben bash-functions Log: use grep -P if possible, grep -E otherwise; rearrange order of some funs Revision Changes Path 1.3 +51 -35 XEmacs/xemacs-builds/ben/bash-functions Index: bash-functions =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs-builds/ben/bash-functions,v retrieving revision 1.2 retrieving revision 1.3 diff -u -p -r1.2 -r1.3 --- bash-functions 2005/10/14 00:53:42 1.2 +++ bash-functions 2005/12/19 02:57:08 1.3 ＠＠ -99,6 +99,17 ＠＠ function dorec() find . | xargs "$＠" } +# $1 is a variable representing a directory, $2 its value +# This sets $1 to $2 and makes $1 a command that cd's to the value of $1 +function make-dir-alias() +{ + eval "$1=\"$2\"" + # no need to clutter up things with lots of aliases under zsh -- + # auto_cd + cdable_vars + auto_name_dirs does the equivalent, but + # better (also handles pd/pop, etc.) + [ -n "$ZSH_NAME" ] || eval "alias $1='cd \"\$$1\"'" +} + # This generates text that can be pasted to easily generate functions # such as rg(), below. function makefind() ＠＠ -110,6 +121,8 ＠＠ temacs.bsc *.elc *.exe *.obj +*.class +*.pyc TAGS temacs.pdb *.a ＠＠ -123,6 +136,13 ＠＠ EOF ##### Grepping +# see if grep -P is supported +if echo foo | grep -P foo > /dev/null 2>&1 ; then + grepopt="-P" +else + grepopt="-E" +fi + # Recursive grep, excluding annoying files. function rg() { ＠＠ -134,6 +154,8 ＠＠ function rg() -name "*.elc" -o \ -name "*.exe" -o \ -name "*.obj" -o \ + -name "*.class" -o \ + -name "*.pyc" -o \ -name "TAGS" -o \ -name "*.pdb" -o \ -name "*.a" -o \ ＠＠ -143,7 +165,7 ＠＠ function rg() -name "image.0*" -o \ -name "*.xpm" -o \ -name ".\#*" -o \ - -type f -print0 | xargs -0 grep -P "$＠" | more + -type f -print0 | xargs -0 grep $grepopt "$＠" | more } # Print out non-binary files ＠＠ -156,6 +178,8 ＠＠ function printtext() -name "*.elc" -o \ -name "*.exe" -o \ -name "*.obj" -o \ + -name "*.class" -o \ + -name "*.pyc" -o \ -name "*.pdb" -o \ -name "*.a" -o \ -name "*.dll" -o \ ＠＠ -187,6 +211,8 ＠＠ function nrg() -name "*.elc" -o \ -name "*.exe" -o \ -name "*.obj" -o \ + -name "*.class" -o \ + -name "*.pyc" -o \ -name "TAGS" -o \ -name "*.pdb" -o \ -name "*.a" -o \ ＠＠ -196,26 +222,26 ＠＠ function nrg() -name "image.0*" -o \ -name "*.xpm" -o \ -name ".\#*" -o \ - -type f -print0 | xargs -0 grep -P "$＠" | more + -type f -print0 | xargs -0 grep $grepopt "$＠" | more } # For use in XEmacs src directory. Grep all important files. For me # (under Cygwin), this is much faster than `rg'. function gx() { - egrep "$＠" *.[chCH] s/*.[hH] m/*.[hH] *.in.in *.h.in | more + grep $grepopt "$＠" *.[chCH] s/*.[hH] m/*.[hH] *.in.in *.h.in | more } # Grep .c and .h files in the current directory. function gc() { - egrep "$＠" *.[chCH] | more + grep $grepopt "$＠" *.[chCH] | more } # Grep .h files in the current directory. function gh() { - egrep "$＠" *.[hH] | more + grep $grepopt "$＠" *.[hH] | more } ##### Global Search/Replace ＠＠ -460,7 +486,7 ＠＠ function nmgrep() { for x in * ; do echo $x; - nm $x | egrep "$＠" + nm $x | grep $grepopt "$＠" done } ＠＠ -539,17 +565,6 ＠＠ for y in $conf_all_config_names ; do eval "dir$y=`config_options $y | sed 's/ /-/'g`" done -# $1 is a variable representing a directory, $2 its value -# This sets $1 to $2 and makes $1 a command that cd's to the value of $1 -function make-dir-alias() -{ - eval "$1=\"$2\"" - # no need to clutter up things with lots of aliases under zsh -- - # auto_cd + cdable_vars + auto_name_dirs does the equivalent, but - # better (also handles pd/pop, etc.) - [ -n "$ZSH_NAME" ] || eval "alias $1='cd \"\$$1\"'" -} - function make-ws-aliases() { make-dir-alias x$1 "$x/$2" ＠＠ -639,6 +654,25 ＠＠ function xps2() fi } + +# basic function to build a package workspace from scratch. arguments are +# workspace name. +function bup() +{ + ws="$1" + shift + build --packages --keep-going $ws scratch "$＠" +} + +# basic function to rebuild an existing package workspace. arguments are +# workspace name and configuration(s). +function rebup() +{ + ws="$1" + shift + build --packages --keep-going $ws rebuild "$＠" +} + # Basic function to build a workspace from scratch. Arguments are # workspace name and configuration(s). function bu() ＠＠ -673,24 +707,6 ＠＠ function rebunf() ws="$1" shift build --keep-going --no-filter $ws rebuild "$＠" -} - -# basic function to build a package workspace from scratch. arguments are -# workspace name. -function bup() -{ - ws="$1" - shift - build --packages --keep-going $ws scratch "$＠" -} - -# basic function to rebuild an existing package workspace. arguments are -# workspace name and configuration(s). -function rebup() -{ - ws="$1" - shift - build --packages --keep-going $ws rebuild "$＠" } # basic function to build a workspace from scratch for workspaces