Philippe 02/05/2016: moved all LIBTOOLS files in LIBTOOLS directory
[MNH-git_open_source-lfs.git] / LIBTOOLS / tools / lfi2cdf / scripts / lfi2cdfregex.sh
1 #!/bin/sh
2 #
3 #
4 usage(){
5     cat >&2 <<EOF
6 Usage : 
7
8   ${0##*/} '~/pattern/'  infile.lfi : select articles that match regex 'pattern'.
9   ${0##*/} '!~/pattern/' infile.lfi : select articles that doesn't match regex 'pattern'.
10     
11 Example :
12   - Select all COVER articles :
13       ${0##*/} '~/^COVER/' infile.lfi 
14
15 EOF
16     exit 1
17 }
18
19 [ -z "$2" ] && usage  
20
21 REGEXP=$1
22 INFILE=$2
23
24
25 VARLIST=$(lfi2cdf -l $INFILE | awk -F\" '$2 && gsub("[[:space:]]+","",$2)+1 && $2 '$REGEXP' {printf("%s,",$2)}')
26 [ -n "$VARLIST" ] && VARLIST="-v$VARLIST" 
27 CMD="lfi2cdf $VARLIST $INFILE"
28 echo $CMD
29 #$CMD
30
31