mitgcm.org/front_content/parse_emails

#! /usr/bin/env bash

# $Header: /u/gcmpack/mitgcm.org/front_content/parse_emails,v 1.14 2008/02/26 21:34:00 jmc Exp $
#
#  The purpose of this script is to parse the emails produced by the
#  MITgcm/verificaton/testreport script and store the data in a
#  reasonable location.


usage()
{
    echo
    echo "Usage:  $0 [OPTIONS]"
    echo 
    echo "where possible OPTIONS are:"
    echo "  (-h|-help)           print usage"
    echo "  (-s|-silent)         silent mode"
    echo "  (-v|-verbose)        verbose mode"
    echo "  (-i |-ind )DIR       get mpack-created emails from DIR"
    echo "                         [def=\"$INDIR\"]"
    echo "  (-o |-outd )DIR      write the data to DIR"
    echo "                         [def=\"$OUTDIR\"]"
    echo "  (-t |-tempd )DIR     use temporary directory DIR"
    echo "                         [def=\"$TEMPDIR\"]"
    echo "  (-u |-unpack )EXE    use executable EXE to unpack e-mails"
    echo "                         [def=\"$MUNPACK\"]"
    echo "  (-a |-addr )ADDR     send e-mail to ADDR if Error"
    echo "                         [def='"$ADDRERR"']"
    echo 
    exit 1
}

# defaults
INDIR="/u/u2/jmc/Mail/MITgcm-test"
OUTDIR="/u/u0/httpd/html/testing/results/"`date +%Y`"_"`date +%m`
TEMPDIR=./ptmp
MUNPACK=munpack
ADDRERR=
PRT=1

#  Parse options
ac_prev=
for ac_option ; do

    # If the previous option needs an argument, assign it.
    if test -n "$ac_prev"; then
        eval "$ac_prev=\$ac_option"
        ac_prev=
        continue
    fi

    ac_optarg=`expr "x$ac_option" : 'x[^=]*=\(.*\)'`
    
    case $ac_option in
	
	-help | --help | -h | --h)
	    usage ;;
	-s | --s | -silent | --silent)
            PRT=0 ;;
	-v | --v | -verbose | --verbose)
            PRT=2 ;;
	
        -ind | --ind | -i | --i)
            ac_prev=INDIR ;;
        --ind=* | -ind=* | --i=* | -i=*)
            INDIR=$ac_optarg ;;
        
        -outd | --outd | -o | --o)
            ac_prev=OUTDIR ;;
        --outd=* | -outd=* | --o=* | -o=*)
            OUTDIR=$ac_optarg ;;
        
        -tempd | --tempd | -t | --t)
            ac_prev=TEMPDIR ;;
        --tempd=* | -tempd=* | --t=* | -t=*)
            TEMPDIR=$ac_optarg ;;

        -u | --u | -unpack | --unpack)
            ac_prev=MUNPACK ;;
        -u=* | --u=* | -unpack=* | --unpack=*)
            MUNPACK=$ac_optarg ;;
        
        -a | --a | -addr | --addr)
            ac_prev=ADDRERR ;;
        -a=* | --a=* | -addr=* | --addr=*)
            ADDRERR=$ac_optarg ;;

        *)
	    # copy the file list to FL_#
	    echo "Error: don't understand argument \"$ac_option\""
	    usage
            ;;
        
     esac
     
done

if test ! -x $MUNPACK ; then
	echo "ERROR: \"$MUNPACK\" is not executable"
	exit 2
fi
if test ! -e $OUTDIR ; then
    mkdir $OUTDIR
    RETVAL=$?
    if test "x$RETVAL" != x0 ; then
	echo "ERROR: directory \"$OUTDIR\" doesn't exist and can't be created"
	exit 3
    fi
    chgrp gcmpack $OUTDIR
    chmod 775 $OUTDIR
fi

all_files=`ls -1 $INDIR`
nb_files=`echo "$all_files" | grep -c '^msg\.'`

if test $PRT = 1 ; then
  echo "Using OUTDIR=\"$OUTDIR\""
  echo "Using INDIR=\"$INDIR\""
  echo -n "Unpacking the emails ..."
elif test $nb_files != 0 ; then
  echo "Unpacking $nb_files emails from '$INDIR' to '$OUTDIR'"
  if test "x$ADDRERR" != x ; then
     echo " (send msg to '$ADDRERR' if Error)"
  fi
  if test $PRT = 2 ; then echo -n " dir:" ; fi
fi

for file in $all_files ; do

    #  create local copy
    test -e $TEMPDIR  &&  rm -rf $TEMPDIR
    mkdir $TEMPDIR
    RETVAL=$?
    if test "x$RETVAL" = x0 ; then
      cp $INDIR"/"$file $TEMPDIR
      RETVAL=$?
    fi
    if test "x$RETVAL" != x0 ; then
      if test "x$ADDRERR" != x ; then
        echo "parsing email error" > tmp.$$
        echo " processing file: '$INDIR/$file'" >> tmp.$$
        echo -n "'mkdir $TEMPDIR' or 'cp $INDIR/$file $TEMPDIR'" >> tmp.$$
        echo " returns error $RETVAL" >> tmp.$$
        mail -s 'parse_emails err_0' $ADDRERR < tmp.$$
        rm -f tmp.$$
      fi
      mv -f $INDIR"/"$file $INDIR"/../fail2process/"$file
      continue
    fi

    #  ignore multi-part messages
    grep "Content-Type: message/partial" $INDIR"/"$file > /dev/null 2>&1
    RETVAL=$?
    if test "x$RETVAL" = x0 ; then
      if test "x$ADDRERR" != x ; then
        echo "parsing email error" > tmp.$$
        echo 'grep "Content-Type: message/partial" returns error:' $RETVAL >> tmp.$$
        ls -l $INDIR"/"$file >> tmp.$$
        mail -s 'parse_emails err_1' $ADDRERR < tmp.$$
        rm -f tmp.$$
      fi
      mv -f $INDIR"/"$file $INDIR"/../fail2process/"$file
      continue
    fi

    #  munpack
    mun=`( cd $TEMPDIR ; $MUNPACK $file | cut -d ' ' -f 1 | head -1 )`
    RETVAL=$?
    if test "x$RETVAL" != x0 ; then
      if test "x$ADDRERR" != x ; then
        echo "parsing email error" > tmp.$$
        echo "$MUNPACK $file returns error: $RETVAL" >> tmp.$$
        ls -l $INDIR"/"$file >> tmp.$$
        mail -s 'parse_emails err_2' $ADDRERR < tmp.$$
        rm -f tmp.$$
      fi
      mv -f $INDIR"/"$file $INDIR"/../fail2process/"$file
      continue
    fi

    #  un-tar
    ( cd $TEMPDIR ; tar -xzvf $mun > out )
    RETVAL=$?
    if test "x$RETVAL" != x0 ; then
      if test "x$ADDRERR" != x ; then
        echo "parsing email error" > tmp.$$
        echo "tar -xzvf $mun returns error:" $RETVAL >> tmp.$$
        ls -l $INDIR"/"$file >> tmp.$$
        ls -l $mun >> tmp.$$
        mail -s 'parse_emails err_3' $ADDRERR < tmp.$$
        rm -f tmp.$$
      fi
      mv -f $INDIR"/"$file $INDIR"/../fail2process/"$file
      continue
    fi
    tdir=`cat $TEMPDIR"/out" | head -1 | sed -e 's|^./||g' | cut -d '/' -f 1`
    rm -f $TEMPDIR"/out"

    #  copy to $OUTDIR and rename if necessary
    sdir=$tdir
    if test -e $OUTDIR"/"$tdir ; then
	ad=0
	while test -e $OUTDIR"/"$tdir"_"$ad ; do
	    ad=$(( $ad + 1 ))
	done
        sdir=$tdir"_"$ad
    fi
    if test $PRT = 2 ; then echo -n " '$sdir'" ; fi
    mv $TEMPDIR"/"$tdir $OUTDIR"/"$sdir > /dev/null 2>&1
    RETVAL=$?
    if test "x$RETVAL" != x0 ; then
      if test "x$ADDRERR" != x ; then
        echo "parsing email error" > tmp.$$
        echo "mv $TEMPDIR/$tdir $OUTDIR/$sdir returns error:" $RETVAL >> tmp.$$
        echo -n "in dir: $TEMPDIR : " ; ls -l $TEMPDIR  >> tmp.$$
        echo -n "in dir: $OUTDIR : " ; ls -l $OUTDIR  >> tmp.$$
        mail -s 'parse_emails err_4' $ADDRERR < tmp.$$
        rm -f tmp.$$
      fi
      mv -f $INDIR"/"$file $INDIR"/../fail2process/"$file
      continue
    fi
    chmod -R a+rx $OUTDIR"/"$sdir > /dev/null 2>&1
#   gzip $OUTDIR"/"$sdir"/output.txt"

    #  remove the original file
    rm -f $INDIR"/"$file

done
if test $PRT = 1 ; then echo "  done" ; fi
if test $PRT = 2 -a $nb_files != 0 ; then echo "" ; fi

1	edhill	1.1	#! /usr/bin/env bash
2
3	jmc	1.15	# $Header: /u/gcmpack/mitgcm.org/front_content/parse_emails,v 1.14 2008/02/26 21:34:00 jmc Exp $
4	edhill	1.1	#
5			# The purpose of this script is to parse the emails produced by the
6			# MITgcm/verificaton/testreport script and store the data in a
7			# reasonable location.
8
9
10			usage()
11			{
12			echo
13			echo "Usage: $0 [OPTIONS]"
14			echo
15			echo "where possible OPTIONS are:"
16	jmc	1.10	echo " (-h\|-help) print usage"
17			echo " (-s\|-silent) silent mode"
18			echo " (-v\|-verbose) verbose mode"
19			echo " (-i \|-ind )DIR get mpack-created emails from DIR"
20	edhill	1.1	echo " [def=\"$INDIR\"]"
21	jmc	1.10	echo " (-o \|-outd )DIR write the data to DIR"
22	edhill	1.1	echo " [def=\"$OUTDIR\"]"
23	jmc	1.10	echo " (-t \|-tempd )DIR use temporary directory DIR"
24	edhill	1.1	echo " [def=\"$TEMPDIR\"]"
25	jmc	1.14	echo " (-u \|-unpack )EXE use executable EXE to unpack e-mails"
26			echo " [def=\"$MUNPACK\"]"
27	jmc	1.12	echo " (-a \|-addr )ADDR send e-mail to ADDR if Error"
28			echo " [def='"$ADDRERR"']"
29	edhill	1.1	echo
30			exit 1
31			}
32
33			# defaults
34	jmc	1.12	INDIR="/u/u2/jmc/Mail/MITgcm-test"
35			OUTDIR="/u/u0/httpd/html/testing/results/"`date +%Y`"_"`date +%m`
36	edhill	1.1	TEMPDIR=./ptmp
37	jmc	1.14	MUNPACK=munpack
38	jmc	1.12	ADDRERR=
39	jmc	1.10	PRT=1
40	edhill	1.1
41			# Parse options
42			ac_prev=
43			for ac_option ; do
44
45			# If the previous option needs an argument, assign it.
46			if test -n "$ac_prev"; then
47			eval "$ac_prev=\$ac_option"
48			ac_prev=
49			continue
50			fi
51
52			ac_optarg=`expr "x$ac_option" : 'x[^=]=\(.\)'`
53
54			case $ac_option in
55
56			-help \| --help \| -h \| --h)
57			usage ;;
58	jmc	1.10	-s \| --s \| -silent \| --silent)
59			PRT=0 ;;
60			-v \| --v \| -verbose \| --verbose)
61			PRT=2 ;;
62	edhill	1.1
63			-ind \| --ind \| -i \| --i)
64			ac_prev=INDIR ;;
65			--ind=* \| -ind=* \| --i=* \| -i=*)
66			INDIR=$ac_optarg ;;
67
68			-outd \| --outd \| -o \| --o)
69			ac_prev=OUTDIR ;;
70			--outd=* \| -outd=* \| --o=* \| -o=*)
71			OUTDIR=$ac_optarg ;;
72
73			-tempd \| --tempd \| -t \| --t)
74			ac_prev=TEMPDIR ;;
75			--tempd=* \| -tempd=* \| --t=* \| -t=*)
76			TEMPDIR=$ac_optarg ;;
77	jmc	1.14
78			-u \| --u \| -unpack \| --unpack)
79			ac_prev=MUNPACK ;;
80			-u=* \| --u=* \| -unpack=* \| --unpack=*)
81			MUNPACK=$ac_optarg ;;
82
83			-a \| --a \| -addr \| --addr)
84	jmc	1.12	ac_prev=ADDRERR ;;
85	jmc	1.14	-a=* \| --a=* \| -addr=* \| --addr=*)
86	jmc	1.12	ADDRERR=$ac_optarg ;;
87	jmc	1.14
88	edhill	1.1	*)
89			# copy the file list to FL_#
90			echo "Error: don't understand argument \"$ac_option\""
91			usage
92			;;
93
94			esac
95
96			done
97
98	jmc	1.14	if test ! -x $MUNPACK ; then
99			echo "ERROR: \"$MUNPACK\" is not executable"
100			exit 2
101			fi
102	edhill	1.1	if test ! -e $OUTDIR ; then
103			mkdir $OUTDIR
104			RETVAL=$?
105	jmc	1.15	if test "x$RETVAL" != x0 ; then
106	edhill	1.1	echo "ERROR: directory \"$OUTDIR\" doesn't exist and can't be created"
107	jmc	1.14	exit 3
108	edhill	1.1	fi
109	jmc	1.8	chgrp gcmpack $OUTDIR
110			chmod 775 $OUTDIR
111	edhill	1.1	fi
112
113	jmc	1.10	all_files=`ls -1 $INDIR`
114	jmc	1.11	nb_files=`echo "$all_files" \| grep -c '^msg\.'`
115	edhill	1.1
116	jmc	1.10	if test $PRT = 1 ; then
117			echo "Using OUTDIR=\"$OUTDIR\""
118			echo "Using INDIR=\"$INDIR\""
119			echo -n "Unpacking the emails ..."
120			elif test $nb_files != 0 ; then
121			echo "Unpacking $nb_files emails from '$INDIR' to '$OUTDIR'"
122	jmc	1.12	if test "x$ADDRERR" != x ; then
123			echo " (send msg to '$ADDRERR' if Error)"
124			fi
125	jmc	1.10	if test $PRT = 2 ; then echo -n " dir:" ; fi
126			fi
127	edhill	1.1
128			for file in $all_files ; do
129
130			# create local copy
131	edhill	1.2	test -e $TEMPDIR && rm -rf $TEMPDIR
132	edhill	1.1	mkdir $TEMPDIR
133	jmc	1.15	RETVAL=$?
134			if test "x$RETVAL" = x0 ; then
135			cp $INDIR"/"$file $TEMPDIR
136			RETVAL=$?
137			fi
138			if test "x$RETVAL" != x0 ; then
139			if test "x$ADDRERR" != x ; then
140			echo "parsing email error" > tmp.$$
141			echo " processing file: '$INDIR/$file'" >> tmp.$$
142			echo -n "'mkdir $TEMPDIR' or 'cp $INDIR/$file $TEMPDIR'" >> tmp.$$
143			echo " returns error $RETVAL" >> tmp.$$
144			mail -s 'parse_emails err_0' $ADDRERR < tmp.$$
145			rm -f tmp.$$
146			fi
147			mv -f $INDIR"/"$file $INDIR"/../fail2process/"$file
148			continue
149			fi
150	edhill	1.1
151			# ignore multi-part messages
152			grep "Content-Type: message/partial" $INDIR"/"$file > /dev/null 2>&1
153			RETVAL=$?
154			if test "x$RETVAL" = x0 ; then
155	jmc	1.12	if test "x$ADDRERR" != x ; then
156			echo "parsing email error" > tmp.$$
157			echo 'grep "Content-Type: message/partial" returns error:' $RETVAL >> tmp.$$
158			ls -l $INDIR"/"$file >> tmp.$$
159			mail -s 'parse_emails err_1' $ADDRERR < tmp.$$
160			rm -f tmp.$$
161			fi
162			mv -f $INDIR"/"$file $INDIR"/../fail2process/"$file
163			continue
164	edhill	1.1	fi
165
166			# munpack
167			mun=`( cd $TEMPDIR ; $MUNPACK $file \| cut -d ' ' -f 1 \| head -1 )`
168			RETVAL=$?
169			if test "x$RETVAL" != x0 ; then
170	jmc	1.12	if test "x$ADDRERR" != x ; then
171			echo "parsing email error" > tmp.$$
172			echo "$MUNPACK $file returns error: $RETVAL" >> tmp.$$
173			ls -l $INDIR"/"$file >> tmp.$$
174			mail -s 'parse_emails err_2' $ADDRERR < tmp.$$
175			rm -f tmp.$$
176			fi
177			mv -f $INDIR"/"$file $INDIR"/../fail2process/"$file
178			continue
179	edhill	1.1	fi
180
181			# un-tar
182			( cd $TEMPDIR ; tar -xzvf $mun > out )
183			RETVAL=$?
184			if test "x$RETVAL" != x0 ; then
185	jmc	1.12	if test "x$ADDRERR" != x ; then
186			echo "parsing email error" > tmp.$$
187			echo "tar -xzvf $mun returns error:" $RETVAL >> tmp.$$
188			ls -l $INDIR"/"$file >> tmp.$$
189			ls -l $mun >> tmp.$$
190			mail -s 'parse_emails err_3' $ADDRERR < tmp.$$
191			rm -f tmp.$$
192			fi
193			mv -f $INDIR"/"$file $INDIR"/../fail2process/"$file
194			continue
195	edhill	1.1	fi
196	edhill	1.2	tdir=`cat $TEMPDIR"/out" \| head -1 \| sed -e 's\|^./\|\|g' \| cut -d '/' -f 1`
197	edhill	1.1	rm -f $TEMPDIR"/out"
198
199			# copy to $OUTDIR and rename if necessary
200	jmc	1.10	sdir=$tdir
201	edhill	1.1	if test -e $OUTDIR"/"$tdir ; then
202			ad=0
203			while test -e $OUTDIR"/"$tdir"_"$ad ; do
204			ad=$(( $ad + 1 ))
205			done
206	jmc	1.10	sdir=$tdir"_"$ad
207	edhill	1.1	fi
208	jmc	1.10	if test $PRT = 2 ; then echo -n " '$sdir'" ; fi
209			mv $TEMPDIR"/"$tdir $OUTDIR"/"$sdir > /dev/null 2>&1
210	jmc	1.15	RETVAL=$?
211			if test "x$RETVAL" != x0 ; then
212			if test "x$ADDRERR" != x ; then
213			echo "parsing email error" > tmp.$$
214			echo "mv $TEMPDIR/$tdir $OUTDIR/$sdir returns error:" $RETVAL >> tmp.$$
215			echo -n "in dir: $TEMPDIR : " ; ls -l $TEMPDIR >> tmp.$$
216			echo -n "in dir: $OUTDIR : " ; ls -l $OUTDIR >> tmp.$$
217			mail -s 'parse_emails err_4' $ADDRERR < tmp.$$
218			rm -f tmp.$$
219			fi
220			mv -f $INDIR"/"$file $INDIR"/../fail2process/"$file
221			continue
222			fi
223	jmc	1.10	chmod -R a+rx $OUTDIR"/"$sdir > /dev/null 2>&1
224			# gzip $OUTDIR"/"$sdir"/output.txt"
225	edhill	1.1
226			# remove the original file
227			rm -f $INDIR"/"$file
228
229			done
230	jmc	1.10	if test $PRT = 1 ; then echo " done" ; fi
231			if test $PRT = 2 -a $nb_files != 0 ; then echo "" ; fi
232	edhill	1.1