Corrected handling for FORTRAN data blocks 3 and 4: added endblock capability.
[h316.git] / lib / iolib / buildlib.sh
1 #!/bin/bash
2
3 if [ ! "$MAKE" ]; then
4 echo "Not run from within Makefile!"
5 exit 4
6 fi
7
8
9 # The suffix for library files (in and out)
10 LIB_SUFFIX=.lib
11 #######################################################################
12 IFS="
13 "
14
15 # Clean everything up
16 clean() {
17 rm -rf $LIB_DIR $ORG_OBJDIR
18 }
19
20 # Generate org directory containing the original library objects
21 make_org() {
22 if [ ! -d "$ORG_OBJDIR" ]; then
23 mkdir $ORG_OBJDIR
24 fi
25 tdir=$PWD
26 cd $ORG_OBJDIR
27 cat $tdir/$ORG_LIBDIR/*$LIB_SUFFIX | ldc -s -l
28 cd $tdir
29 }
30
31 genlib(){
32 echo "Library Builder start."
33 if [ ! -d "$LIB_DIR" ]; then
34 echo -n "Creating $LIB_DIR:"
35 mkdir $LIB_DIR && echo "Ok." || echo "FAILED!"
36 fi
37
38 # RECIPE_LIST=`ls $RECIPE_DIR/*$RECIPE_SUFFIX`
39 # for recipe in $RECIPE_LIST; do
40 recipe=$1
41 lib=$LIB_DIR/`basename $recipe $RECIPE_SUFFIX`$LIB_SUFFIX
42 echo "Building $lib:"
43 rm -f $lib
44 for item in `cat $recipe| egrep -v '^[[:space:]]*(#.*)*$'`; do
45 echo "appending $item."
46 cat $item >> $lib || (echo "Error! could not find:$item")
47 done
48 cat $ENDBLOCK >> $lib
49 #done
50 }
51
52
53 case $1 in
54 clean)
55 echo "Clean!"
56 clean
57 ;;
58 makeorg)
59 echo "Make org!"
60 make_org
61 ;;
62 genlib)
63 echo "Build Lib!"
64 genlib $2
65 ;;
66 *)
67 clean
68 make_org
69 genlib
70 ;;
71 esac
72