| 1 | #!/bin/ksh |
|---|
| 2 | #set -xv |
|---|
| 3 | #- |
|---|
| 4 | echo "This script must be run while in the modipsl/modeles/OPA directory" |
|---|
| 5 | cd WORK |
|---|
| 6 | pwd |
|---|
| 7 | #MODEL_LIB=../../../lib/libopa.a |
|---|
| 8 | #MODEL_LIB=`grep MODEL_LIB AA_make.ldef | sed 's/ //g' | sed 's/MODEL_LIB=//g' ` |
|---|
| 9 | liste_cle=$(egrep '^# *if[!( &]*def|^# *elif' *.[Fh] *.[Fh]90 | grep key_ | sed 's/||/\ |
|---|
| 10 | /' | sed 's/\&\&/\ |
|---|
| 11 | /' | sed 's/^.*key_/key_/' | sed 's/ *[) ] *$//' | sort -u ) |
|---|
| 12 | #- |
|---|
| 13 | #- |
|---|
| 14 | #- 3) Ecriture du AA_make |
|---|
| 15 | #- |
|---|
| 16 | #- enteteFait_AA_make |
|---|
| 17 | #- |
|---|
| 18 | cat > tampon <<end |
|---|
| 19 | # |
|---|
| 20 | .SUFFIXES: .f90 .F90 .F |
|---|
| 21 | # |
|---|
| 22 | # Target |
|---|
| 23 | all: diroce \$(EXEC_BIN) |
|---|
| 24 | @cp SRC_FILE_LIST.temp SRC_FILE_LIST |
|---|
| 25 | @echo OPA model is OK |
|---|
| 26 | # cleaning objects, libraries and executables |
|---|
| 27 | clean: |
|---|
| 28 | \$(RM) model.o \$(MODDIR)/oce/*.mod \$(MODEL_LIB) \$(SXMODEL_LIB) \$(EXEC_BIN) |
|---|
| 29 | @echo OPA model \(.o .mod libraries and executables are removed\) |
|---|
| 30 | # dependancies |
|---|
| 31 | diroce: |
|---|
| 32 | @if [ ! -d ../../../lib/oce ] ; then mkdir ../../../lib/oce ; fi |
|---|
| 33 | |
|---|
| 34 | \$(EXEC_BIN) : libioipsl key keyverif src_file_list \$(MODEL_LIB) \$(IOIPSL_LIB) model.o |
|---|
| 35 | \$(F_L) \$(L_X) -o \$(EXEC_BIN) model.o \$(SXMODEL_LIB) \$(OASISMPI2_LIB) \$(IOIPSL_LIB) \$(NCDF_LIB) \$(LIBMPI) \$(LIBMP) |
|---|
| 36 | |
|---|
| 37 | libioipsl : |
|---|
| 38 | (cd ../../IOIPSL/src ; \$(M_K) -f Makefile ) |
|---|
| 39 | |
|---|
| 40 | # main program |
|---|
| 41 | model.o : model.f90 |
|---|
| 42 | @\$(F_C) \$(F_O) -c model.f90 |
|---|
| 43 | |
|---|
| 44 | # if the make script is stopped, one doesn't destroy library |
|---|
| 45 | .PRECIOUS : \$(MODEL_LIB) |
|---|
| 46 | #-Q- sxnec .PRECIOUS : \$(SXMODEL_LIB) |
|---|
| 47 | #-Q- sx6nec .PRECIOUS : \$(SXMODEL_LIB) |
|---|
| 48 | #-Q- sxdkrz .PRECIOUS : \$(SXMODEL_LIB) |
|---|
| 49 | #-Q- hpux .PRECIOUS : \$(SXMODEL_LIB) |
|---|
| 50 | |
|---|
| 51 | # library dependancies |
|---|
| 52 | \$(MODEL_LIB): \$(LIB_OBJ) |
|---|
| 53 | @echo |
|---|
| 54 | @echo La bibliotheque est a jour |
|---|
| 55 | @echo |
|---|
| 56 | |
|---|
| 57 | # Rules |
|---|
| 58 | .DEFAULTS: |
|---|
| 59 | |
|---|
| 60 | # rules for the .f90 files |
|---|
| 61 | .f90.a : |
|---|
| 62 | @\$(F_C) \$(P_P) \$(F_O) \\ |
|---|
| 63 | #-Q- fjvpp -Z \$*.L \\ |
|---|
| 64 | #-Q- sxnec -R2 \\ |
|---|
| 65 | #-Q- sx6nec -R2 \\ |
|---|
| 66 | #-Q- sxdkrz -R2 \\ |
|---|
| 67 | #-Q- hpux -R2 \\ |
|---|
| 68 | #-Q- aix -qsource \\ |
|---|
| 69 | \$*.f90 || { [ -f \$(PREF)\$*.L ] && mv \$(PREF)\$*.L \$(TMP) ; false ; exit ; } |
|---|
| 70 | #-Q- sxnec @\$(A_X) \$(SXMODEL_LIB) \$*.o > /dev/null |
|---|
| 71 | #-Q- sx6nec @\$(A_X) \$(SXMODEL_LIB) \$*.o > /dev/null |
|---|
| 72 | #-Q- sxdkrz @\$(A_X) \$(SXMODEL_LIB) \$*.o > /dev/null |
|---|
| 73 | #-Q- hpux @\$(A_X) \$(SXMODEL_LIB) \$*.o > /dev/null |
|---|
| 74 | @\$(A_C) \$(MODEL_LIB) \$*.o > /dev/null |
|---|
| 75 | @\$(RM) \$*.[of] |
|---|
| 76 | @if [ -f \$*.mod ] ; then mv \$*.mod \$(MODDIR)/oce ; fi |
|---|
| 77 | #-Q- aix @mv \$(PREF)\$*.lst \$(PREF)\$*.L |
|---|
| 78 | #-Q- linux @mv \$(PREF)\$*.lst \$(PREF)\$*.L |
|---|
| 79 | #-Q- osxxlf @mv \$(PREF)\$*.lst \$(PREF)\$*.L |
|---|
| 80 | @[ -f \$(PREF)\$*.L ] && mv \$(PREF)\$*.L \$(TMP) |
|---|
| 81 | |
|---|
| 82 | # rules for the .F90 files |
|---|
| 83 | .F90.a : |
|---|
| 84 | @\$(F_C) \$(P_P) \$(F_O) \\ |
|---|
| 85 | #-Q- fjvpp -Z \$*.L \\ |
|---|
| 86 | #-Q- sxnec -R2 \\ |
|---|
| 87 | #-Q- sx6nec -R2 \\ |
|---|
| 88 | #-Q- sxdkrz -R2 \\ |
|---|
| 89 | #-Q- hpux -R2 \\ |
|---|
| 90 | #-Q- aix -qsource \\ |
|---|
| 91 | \$*.F90 || { [ -f \$(PREF)\$*.L ] && mv \$(PREF)\$*.L \$(TMP) ; false ; exit ; } |
|---|
| 92 | #-Q- sxnec @\$(A_X) \$(SXMODEL_LIB) \$*.o > /dev/null |
|---|
| 93 | #-Q- sx6nec @\$(A_X) \$(SXMODEL_LIB) \$*.o > /dev/null |
|---|
| 94 | #-Q- sxdkrz @\$(A_X) \$(SXMODEL_LIB) \$*.o > /dev/null |
|---|
| 95 | #-Q- hpux @\$(A_X) \$(SXMODEL_LIB) \$*.o > /dev/null |
|---|
| 96 | @\$(A_C) \$(MODEL_LIB) \$*.o > /dev/null |
|---|
| 97 | @\$(RM) \$*.[of] |
|---|
| 98 | @if [ -f \$*.mod ] ; then mv \$*.mod \$(MODDIR)/oce ; fi |
|---|
| 99 | #-Q- aix @mv \$(PREF)\$*.lst \$(PREF)\$*.L |
|---|
| 100 | #-Q- linux @mv \$(PREF)\$*.lst \$(PREF)\$*.L |
|---|
| 101 | #-Q- osxxlf @mv \$(PREF)\$*.lst \$(PREF)\$*.L |
|---|
| 102 | @[ -f \$(PREF)\$*.L ] && mv \$(PREF)\$*.L \$(TMP) |
|---|
| 103 | |
|---|
| 104 | # rules for the .F files |
|---|
| 105 | .F.a : |
|---|
| 106 | @\$(F_C) \$(P_P) \$(F_O) \\ |
|---|
| 107 | #-Q- fjvpp -Z \$*.L \\ |
|---|
| 108 | #-Q- sxnec -R2 \\ |
|---|
| 109 | #-Q- sx6nec -R2 \\ |
|---|
| 110 | #-Q- sxdkrz -R2 \\ |
|---|
| 111 | #-Q- hpux -R2 \\ |
|---|
| 112 | #-Q- aix -qsource \\ |
|---|
| 113 | \$*.F || { [ -f \$(PREF)\$*.L ] && mv \$(PREF)\$*.L \$(TMP) ; false ; exit ; } |
|---|
| 114 | #-Q- sxnec @\$(A_X) \$(SXMODEL_LIB) \$*.o > /dev/null |
|---|
| 115 | #-Q- sx6nec @\$(A_X) \$(SXMODEL_LIB) \$*.o > /dev/null |
|---|
| 116 | #-Q- sxdkrz @\$(A_X) \$(SXMODEL_LIB) \$*.o > /dev/null |
|---|
| 117 | #-Q- hpux @\$(A_X) \$(SXMODEL_LIB) \$*.o > /dev/null |
|---|
| 118 | @\$(A_C) \$(MODEL_LIB) \$*.o > /dev/null |
|---|
| 119 | @\$(RM) \$*.[of] |
|---|
| 120 | @if [ -f \$*.mod ] ; then mv \$*.mod \$(MODDIR)/oce ; fi |
|---|
| 121 | #-Q- aix @mv \$(PREF)\$*.lst \$(PREF)\$*.L |
|---|
| 122 | #-Q- linux @mv \$(PREF)\$*.lst \$(PREF)\$*.L |
|---|
| 123 | #-Q- osxxlf @mv \$(PREF)\$*.lst \$(PREF)\$*.L |
|---|
| 124 | @[ -f \$(PREF)\$*.L ] && mv \$(PREF)\$*.L \$(TMP) |
|---|
| 125 | |
|---|
| 126 | # rules for the library from the .f files |
|---|
| 127 | .f.a : |
|---|
| 128 | @\$(F_C) \$(F_O) \\ |
|---|
| 129 | #-Q- fjvpp -Z \$*.L \\ |
|---|
| 130 | #-Q- sxnec -R2 \\ |
|---|
| 131 | #-Q- sx6nec -R2 \\ |
|---|
| 132 | #-Q- sxdkrz -R2 \\ |
|---|
| 133 | #-Q- hpux -R2 \\ |
|---|
| 134 | #-Q- aix -qsource \\ |
|---|
| 135 | \$*.f|| { [ -f \$*.L ] && mv \$*.L \$(TMP) ; false ; exit ; } |
|---|
| 136 | #-Q- sxnec @\$(A_X) \$(SXMODEL_LIB) \$*.o > /dev/null |
|---|
| 137 | #-Q- sx6nec @\$(A_X) \$(SXMODEL_LIB) \$*.o > /dev/null |
|---|
| 138 | #-Q- sxdkrz @\$(A_X) \$(SXMODEL_LIB) \$*.o > /dev/null |
|---|
| 139 | #-Q- hpux @\$(A_X) \$(SXMODEL_LIB) \$*.o > /dev/null |
|---|
| 140 | @\$(A_C) \$(MODEL_LIB) \$*.o > /dev/null |
|---|
| 141 | @\$(RM) -f \$*.o |
|---|
| 142 | #-Q- aix @mv \$(PREF)\$*.lst \$(PREF)\$*.L |
|---|
| 143 | #-Q- linux @mv \$(PREF)\$*.lst \$(PREF)\$*.L |
|---|
| 144 | #-Q- osxxlf @mv \$(PREF)\$*.lst \$(PREF)\$*.L |
|---|
| 145 | @[ -f \$(PREF)\$*.L ] && mv \$*.L \$(TMP) |
|---|
| 146 | # |
|---|
| 147 | end |
|---|
| 148 | #- |
|---|
| 149 | #- dependances |
|---|
| 150 | #- |
|---|
| 151 | exec 1> AA_make |
|---|
| 152 | MAIN="model" |
|---|
| 153 | echo '# $Header$' |
|---|
| 154 | echo '# some variables' |
|---|
| 155 | echo 'TMP = ../../../tmp' |
|---|
| 156 | echo '#-Q- sxnec # Compiler options for the ORCA model - std' |
|---|
| 157 | echo '#-Q- sxnec F_O = -dw -Wf\"-A idbl4\" -sx5 -ftrace -C vopt -Wf"-init stack=nan" -Wl"-f nan" -Wf"-P nh" -Wf,-pvctl noassume loopcnt=10000 -L transform -I $(MODDIR) -I $(MODDIR)/oce' |
|---|
| 158 | echo '#-Q- sxnec L_X = $(L_O) $(L_C) -ftrace' |
|---|
| 159 | echo '#-Q- sx6nec # Compiler options for the ORCA model - std' |
|---|
| 160 | echo '#-Q- sx6nec F_O = -size_t64 -dw -Wf\"-A dbl4\" -sx6 -C vopt -Wf"-P nh" -Wf',-pvctl noassume loopcnt=10000 -L transform' -I $(MODDIR) -I $(MODDIR)/oce' |
|---|
| 161 | echo '#-Q- sx6nec F_O = -size_t64 -dw -Wf\"-A dbl4\" -sx6 -ftrace -C vopt -Wf"-init stack=nan" -Wl"-f nan" -Wf"-P nh" -Wf,-pvctl noassume loopcnt=10000 -L transform -I $(MODDIR) -I $(MODDIR)/oce' |
|---|
| 162 | echo '#-Q- sx6nec L_X = $(L_O) $(L_C) -ftrace' |
|---|
| 163 | echo '#-Q- sxdkrz # Compiler options for the ORCA model for the DKRZ SX6-NEC ' |
|---|
| 164 | echo '#-Q- sxdkrz F_O = -ew -sx6 -ftrace -C vopt -Wf"-init stack=nan" -Wl"-f nan" -Wf"-P nh" -Wf"-pvctl noassume loopcnt=10000" -L transform -I $(MODDIR) -I $(MODDIR)/oce' |
|---|
| 165 | echo '#-Q- sxdkrz L_X = $(L_O) $(L_C) -ftrace' |
|---|
| 166 | echo '#-Q- hpux # Compiler options for the ORCA model for the ES' |
|---|
| 167 | echo '#-Q- hpux # for super perfs!' |
|---|
| 168 | echo '#-Q- hpux # F_O = $(FTRACE) -pi nest=5 line=10000 expin=Fmpplib.F -Wf,-A idbl4 -C hopt -Wf"-P nh" -Wf,-pvctl noassume loopcnt=10000 -L transform -I $(MODDIR) -I $(MODDIR)/oce' |
|---|
| 169 | echo '#-Q- hpux # regular options!' |
|---|
| 170 | echo '#-Q- hpux F_O = $(FTRACE) -Wf,-A idbl4 -C vopt -Wf"-P nh" -Wf,-pvctl noassume loopcnt=10000 -L transform -I $(MODDIR) -I $(MODDIR)/oce' |
|---|
| 171 | echo '#-Q- linux # Compiler options for the ORCA model (pgf version)' |
|---|
| 172 | echo '#-Q- linux F_O = -Mlist -O3 -byteswapio -r8 -I $(MODDIR) -I$(MODDIR)/oce' |
|---|
| 173 | echo '#-Q- linux L_X = -r8 -O3' |
|---|
| 174 | echo '#-Q- lxiv8 # Compiler options for the ORCA model (ifort version)' |
|---|
| 175 | echo '#-Q- lxiv8 F_O = -O3 -r8 -I $(MODDIR) -I$(MODDIR)/oce' |
|---|
| 176 | echo '#-Q- lxiv8 L_X = -r8 -O3' |
|---|
| 177 | echo '#-Q- g95 # Compiler options for the ORCA model (g95 version)' |
|---|
| 178 | echo '#-Q- g95 F_O = -O3 -fno-second-underscore -r8 -funroll-all-loops -I $(MODDIR) -I $(MODDIR)/oce' |
|---|
| 179 | echo '#-Q- g95 L_X = -r8 -O3' |
|---|
| 180 | echo '#-Q- aix # Compiler options for the ORCA model (aix version)' |
|---|
| 181 | echo '#-Q- aix F_O = -O3 -qsave -qautodbl=dbl4 -qsuffix=f=f90 -qsuffix=cpp=F90 -qextname -qsource -q64 -qlargepage -qmaxmem=-1 -I $(MODDIR) -I $(MODDIR)/oce' |
|---|
| 182 | echo '#-Q- aix L_O = $(F_P) -q64 -bmaxdata:2000000000 -O3' |
|---|
| 183 | echo '#-Q- aix L_X = $(L_O) $(L_C) ' |
|---|
| 184 | echo '#-Q- osxxlf # Compiler options for the ORCA model (osxxlf version)' |
|---|
| 185 | echo '#-Q- osxxlf F_O = -O3 -qsave -qrealsize=8 -qsuffix=f=f90 -qsuffix=cpp=F90 -qsource -qmaxmem=-1 -I $(MODDIR) -I $(MODDIR)/oce' |
|---|
| 186 | echo '#-Q- osxxlf L_O = -qrealsize=8 -O3' |
|---|
| 187 | |
|---|
| 188 | echo 'PREF=' |
|---|
| 189 | echo '#-Q- sxnec PREF=i.' |
|---|
| 190 | echo '#-Q- sx6nec PREF=i.' |
|---|
| 191 | echo '#-Q- sxdkrz PREF=i.' |
|---|
| 192 | echo '#-Q- hpux PREF=i.' |
|---|
| 193 | echo '' |
|---|
| 194 | # Write the cpp key list with one key by line |
|---|
| 195 | echo 'KEY_LIST = \c' |
|---|
| 196 | for i in ${liste_cle} |
|---|
| 197 | do |
|---|
| 198 | echo "\\" |
|---|
| 199 | echo " $i \c" |
|---|
| 200 | done |
|---|
| 201 | |
|---|
| 202 | echo '' |
|---|
| 203 | echo '# .o file list in the library' |
|---|
| 204 | echo 'LIB_OBJ = \c' |
|---|
| 205 | # |
|---|
| 206 | # allons chercher tous les .f du repertoire courant |
|---|
| 207 | # construction de la liste des objets LIB_OBJ |
|---|
| 208 | |
|---|
| 209 | for i in `ls *.f` |
|---|
| 210 | do |
|---|
| 211 | bn=`basename $i .f` |
|---|
| 212 | if [ "${bn}" != "${MAIN}" ] |
|---|
| 213 | then |
|---|
| 214 | echo "\\" |
|---|
| 215 | echo " \$(MODEL_LIB)($bn.o)\c" |
|---|
| 216 | fi |
|---|
| 217 | done |
|---|
| 218 | |
|---|
| 219 | # allons chercher tous les .f90 du repertoire courant |
|---|
| 220 | # construction de la liste des objets LIB_OBJ |
|---|
| 221 | # one dependancy by line |
|---|
| 222 | for i in `ls *.f90` |
|---|
| 223 | do |
|---|
| 224 | bn=`basename $i .f90` |
|---|
| 225 | if [ "${bn}" != "${MAIN}" ] |
|---|
| 226 | then |
|---|
| 227 | echo "\\" |
|---|
| 228 | echo " \$(MODEL_LIB)($bn.o)\c" |
|---|
| 229 | fi |
|---|
| 230 | done |
|---|
| 231 | |
|---|
| 232 | # allons chercher tous les .F90 du repertoire courant |
|---|
| 233 | # construction de la liste des objets LIB_OBJ |
|---|
| 234 | |
|---|
| 235 | for i in `ls *.F90` |
|---|
| 236 | do |
|---|
| 237 | bn=`basename $i .F90` |
|---|
| 238 | if [ "${bn}" != "${MAIN}" ] |
|---|
| 239 | then |
|---|
| 240 | echo "\\" |
|---|
| 241 | echo " \$(MODEL_LIB)($bn.o)\c" |
|---|
| 242 | fi |
|---|
| 243 | done |
|---|
| 244 | |
|---|
| 245 | # allons chercher tous les .F du repertoire courant |
|---|
| 246 | # construction de la liste des objets LIB_OBJ |
|---|
| 247 | |
|---|
| 248 | for i in `ls *.F` |
|---|
| 249 | do |
|---|
| 250 | bn=`basename $i .F` |
|---|
| 251 | if [ "${bn}" != "${MAIN}" ] |
|---|
| 252 | then |
|---|
| 253 | echo "\\" |
|---|
| 254 | echo " \$(MODEL_LIB)($bn.o)\c" |
|---|
| 255 | fi |
|---|
| 256 | done |
|---|
| 257 | |
|---|
| 258 | echo "" |
|---|
| 259 | |
|---|
| 260 | cat tampon |
|---|
| 261 | rm tampon |
|---|
| 262 | |
|---|
| 263 | # |
|---|
| 264 | for fic in `ls *.f90 *.F90 *.F ` |
|---|
| 265 | do |
|---|
| 266 | if [ "${fic}" != "${MAIN}.[Ff]" ] |
|---|
| 267 | then |
|---|
| 268 | i=0 |
|---|
| 269 | j=0 |
|---|
| 270 | dep="" |
|---|
| 271 | inc="" |
|---|
| 272 | inc2="" |
|---|
| 273 | inc3="" |
|---|
| 274 | luse0="" |
|---|
| 275 | luse1="" |
|---|
| 276 | luse2="" |
|---|
| 277 | luse3="" |
|---|
| 278 | # on cherche les includes type modele de glace LLN |
|---|
| 279 | for inc in `sed -n 's/^[ ]*[iI][nN][cC][lL][uU][dD][eE][ ]*\(['\''"]\)\([^'\''"]*\)\1.*/\2/p' $fic | sort -u` |
|---|
| 280 | do |
|---|
| 281 | dep="$dep\n$inc" |
|---|
| 282 | done |
|---|
| 283 | |
|---|
| 284 | # on cherche les includes (et les includes des includes et ainsi de suite pour 3 niveaux max) |
|---|
| 285 | for inc in `sed -n 's/^#[ ]*[iI][nN][cC][lL][uU][dD][eE][ ]*\(['\''"]\)\([^'\''"]*\)\1.*/\2/p' $fic | sort -u` |
|---|
| 286 | do |
|---|
| 287 | j=1 |
|---|
| 288 | dep="$dep\n$inc" |
|---|
| 289 | for inc2 in `sed -n 's/^#[ ]*[iI][nN][cC][lL][uU][dD][eE][ ]*\(['\''"]\)\([^'\''"]*\)\1.*/\2/p' $inc | sort -u` |
|---|
| 290 | do |
|---|
| 291 | dep="$dep\n$inc2" |
|---|
| 292 | # on cherche les include dans le fichier deja include (3eme niveau! balaise!) |
|---|
| 293 | for inc3 in `sed -n 's/^#[ ]*[iI][nN][cC][lL][uU][dD][eE][ ]*\(['\''"]\)\([^'\''"]*\)\1.*/\2/p' $inc2 | sort -u` |
|---|
| 294 | do |
|---|
| 295 | dep="$dep\n$inc3" |
|---|
| 296 | done |
|---|
| 297 | done |
|---|
| 298 | done |
|---|
| 299 | |
|---|
| 300 | # on cherche les USE dans les include |
|---|
| 301 | for inc in `sed -n 's/^#[ ]*[iI][nN][cC][lL][uU][dD][eE][ ]*\(['\''"]\)\([^'\''"]*\)\1.*/\2/p' $fic | sort -u` |
|---|
| 302 | do |
|---|
| 303 | for fuse0 in `sed -n 's/^[ ]*[uU][sS][eE] [ ]*\([^!,;]*\).*/\1/p' $inc | sort -u` |
|---|
| 304 | do |
|---|
| 305 | if [ $fuse0 != "ioipsl" ] |
|---|
| 306 | then |
|---|
| 307 | lfuse0=$fuse0.f90 |
|---|
| 308 | [ -f $fuse0.F90 ] && lfuse0=$fuse0.F90 |
|---|
| 309 | luse0="$luse0\n$lfuse0\n\$(MODEL_LIB)($fuse0.o)" |
|---|
| 310 | fi |
|---|
| 311 | done |
|---|
| 312 | |
|---|
| 313 | # on cherche aussi les USE dans les include des include on les ajoute a luse0 |
|---|
| 314 | |
|---|
| 315 | for inc2 in `sed -n 's/^#[ ]*[iI][nN][cC][lL][uU][dD][eE][ ]*\(['\''"]\)\([^'\''"]*\)\1.*/\2/p' $inc | sort -u` |
|---|
| 316 | do |
|---|
| 317 | for fuse0 in `sed -n 's/^[ ]*[uU][sS][eE] [ ]*\([^!,;]*\).*/\1/p' $inc2 | sort -u` |
|---|
| 318 | do |
|---|
| 319 | if [ $fuse0 != "ioipsl" ] |
|---|
| 320 | then |
|---|
| 321 | lfuse0=$fuse0.f90 |
|---|
| 322 | [ -f $fuse0.F90 ] && lfuse0=$fuse0.F90 |
|---|
| 323 | luse0="$luse0\n$lfuse0\n\$(MODEL_LIB)($fuse0.o)" |
|---|
| 324 | fi |
|---|
| 325 | done |
|---|
| 326 | done |
|---|
| 327 | done |
|---|
| 328 | |
|---|
| 329 | # on cherche les USE (et les USE des USE et ainsi de suite pour 3 niveaux max) |
|---|
| 330 | for fuse1 in `sed -n 's/^[ ]*[uU][sS][eE] [ ]*\([^!,;]*\).*/\1/p' $fic | sort -u` |
|---|
| 331 | do |
|---|
| 332 | if [ $fuse1 != "ioipsl" ] |
|---|
| 333 | then |
|---|
| 334 | lfuse1=$fuse1.f90 |
|---|
| 335 | [ -f $fuse1.F90 ] && lfuse1=$fuse1.F90 |
|---|
| 336 | luse1="$luse1\n$lfuse1\n\$(MODEL_LIB)($fuse1.o)" |
|---|
| 337 | for fuse2 in `sed -n 's/^[ ]*[uU][sS][eE] [ ]*\([^!,;]*\).*/\1/p' $lfuse1 | sort -u` |
|---|
| 338 | do |
|---|
| 339 | if [ $fuse2 != "ioipsl" ] |
|---|
| 340 | then |
|---|
| 341 | lfuse2=$fuse2.f90 |
|---|
| 342 | [ -f $fuse2.F90 ] && lfuse2=$fuse2.F90 |
|---|
| 343 | luse2="$luse2\n$lfuse2\n\$(MODEL_LIB)($fuse2.o)" |
|---|
| 344 | # on cherche les USE dans le fichier deja USE (3eme niveau! balaise!) |
|---|
| 345 | for fuse3 in `sed -n 's/^#[ ]*[uU][sS][eE] [ ]*\([^!,;]*\).*/\1/p' $lfuse2 | sort -u` |
|---|
| 346 | do |
|---|
| 347 | if [ $fuse3 != "ioipsl" ] |
|---|
| 348 | then |
|---|
| 349 | luse3="$luse3\n$lfuse3\n\$(MODEL_LIB)($fuse3.o)" |
|---|
| 350 | fi |
|---|
| 351 | done |
|---|
| 352 | fi |
|---|
| 353 | done |
|---|
| 354 | fi |
|---|
| 355 | done |
|---|
| 356 | #- la variable dep contient l'ensemble des dependances mais peut-etre en double ou plus |
|---|
| 357 | #- |
|---|
| 358 | for depele in `echo $luse3 | sort -u` `echo $luse2 | sort -u` `echo $luse1 | sort -u` `echo $luse0 | sort -u` `echo $dep | sort -u` |
|---|
| 359 | do |
|---|
| 360 | [ ${i} = "0" ] && echo "\$(MODEL_LIB)(`echo $fic|awk -F. '{print $1}'`.o) : \c" |
|---|
| 361 | echo "\\" |
|---|
| 362 | echo " $depele \c" |
|---|
| 363 | let i=i+1 # pour signaler le premier |
|---|
| 364 | done |
|---|
| 365 | |
|---|
| 366 | #- |
|---|
| 367 | #- on ajoute la dependance avec la librairie ioipsl si besoin cad si le source contient use ioipsl |
|---|
| 368 | grep -i 'use *ioipsl' ${fic} >/dev/null && ( echo "\\" ; echo " ../../../lib/libioipsl.a \c") |
|---|
| 369 | |
|---|
| 370 | #- on ajoute la dependance avec KEY_CPP si il y a des include cpp |
|---|
| 371 | if [ ${j} != "0" ] |
|---|
| 372 | then |
|---|
| 373 | echo "\\" |
|---|
| 374 | echo " KEY_CPP \c" |
|---|
| 375 | fi |
|---|
| 376 | #- on finit la dependance avec le fichier lui-meme et on ecrit les regles de creation |
|---|
| 377 | if [ ${i} != "0" ] |
|---|
| 378 | then |
|---|
| 379 | echo "\\" |
|---|
| 380 | echo " $fic" |
|---|
| 381 | fi |
|---|
| 382 | fi |
|---|
| 383 | echo $fic done >/dev/tty |
|---|
| 384 | done |
|---|
| 385 | echo '# key changing control' |
|---|
| 386 | echo "key: " |
|---|
| 387 | echo " @echo CHANGEMENT de CLES CPP oui/non ?" |
|---|
| 388 | echo " -@if [ \"\`cat KEY_CPP\`\" != \"\$(P_P)\" ] ; then \\" |
|---|
| 389 | echo " echo CPP options changed ; echo \"\$(P_P)\" > KEY_CPP ; fi " |
|---|
| 390 | #- |
|---|
| 391 | # |
|---|
| 392 | # regle pour verifier les cles |
|---|
| 393 | # EK novembre 2000 |
|---|
| 394 | # adaptation : ED + MAF decembre 2000 |
|---|
| 395 | # |
|---|
| 396 | echo |
|---|
| 397 | echo "keyverif:" |
|---|
| 398 | echo ' @echo VERIFICATION DES CLES' |
|---|
| 399 | echo ' @echo CLES UTILISEES : ' |
|---|
| 400 | echo ' @for v in ` echo $(P_P) | sed -e s/-Wp,-D//g` ; \' |
|---|
| 401 | echo ' do \' |
|---|
| 402 | echo ' echo $$v ;\' |
|---|
| 403 | echo ' w=`echo $$v | cut -c1-3` ; \' |
|---|
| 404 | echo ' if [ $$w = `echo "key"` ] ; then \' |
|---|
| 405 | echo ' r=n ; \' |
|---|
| 406 | echo ' echo " $(KEY_LIST) " | (grep $$v >/dev/null 2>&1) || r=o ; \' |
|---|
| 407 | echo ' if [ $$r != "n" ] ; then \' |
|---|
| 408 | echo ' echo "UNKNOWN KEY" ;\' |
|---|
| 409 | echo ' false ; \' |
|---|
| 410 | echo ' exit ; \' |
|---|
| 411 | echo ' fi \' |
|---|
| 412 | echo ' fi \' |
|---|
| 413 | echo ' done' |
|---|
| 414 | # Checking if the number of routines have been changed |
|---|
| 415 | echo '# Checking the number of routines' |
|---|
| 416 | echo "src_file_list: " |
|---|
| 417 | echo ' @echo CHECKING THE NUMBER AND NAMES OF SOURCE FILES ' |
|---|
| 418 | echo ' @\$(RM) `ls | fgrep -v -f .patron` ' |
|---|
| 419 | echo ' @check=`grep OPA_SRC .config` ; \' |
|---|
| 420 | echo ' if [ -n "$$check" ] ; then \' |
|---|
| 421 | echo ' echo " use OPA_SRC files" ; \' |
|---|
| 422 | echo ' ln -sf ../OPA_SRC/*.[Ffh]90 . ; \' |
|---|
| 423 | echo ' ln -sf ../OPA_SRC/DYN/*.[Ffh]90 . ; \' |
|---|
| 424 | echo ' ln -sf ../OPA_SRC/TRA/*.[Ffh]90 . ; \' |
|---|
| 425 | echo ' ln -sf ../OPA_SRC/TRD/*.[Ffh]90 . ; \' |
|---|
| 426 | echo ' ln -sf ../OPA_SRC/DIA/*.[Ffh]90 . ; \' |
|---|
| 427 | echo ' ln -sf ../OPA_SRC/DOM/*.[Ffh]90 . ; \' |
|---|
| 428 | echo ' ln -sf ../OPA_SRC/OBC/*.[Ffh]90 . ; \' |
|---|
| 429 | echo ' ln -sf ../OPA_SRC/FLO/*.[Ffh]90 . ; \' |
|---|
| 430 | echo ' ln -sf ../OPA_SRC/LDF/*.[Ffh]90 . ; \' |
|---|
| 431 | echo ' ln -sf ../OPA_SRC/ZDF/*.[Ffh]90 . ; \' |
|---|
| 432 | echo ' ln -sf ../OPA_SRC/SOL/*.[Ffh]90 . ; \' |
|---|
| 433 | echo ' ln -sf ../OPA_SRC/DTA/*.[Ffh]90 . ; \' |
|---|
| 434 | echo ' ln -sf ../OPA_SRC/SBC/*.[Ffh]90 . ; \' |
|---|
| 435 | echo ' fi ' |
|---|
| 436 | echo ' @check=`grep LIM_SRC .config` ; \' |
|---|
| 437 | echo ' if [ -n "$$check" ] ; then \' |
|---|
| 438 | echo ' echo " use LIM_SRC files" ; \' |
|---|
| 439 | echo ' ln -sf ../LIM_SRC/*.[Ffh]90 . ; \' |
|---|
| 440 | echo ' fi ' |
|---|
| 441 | echo ' @check=`grep C1D_SRC .config` ; \' |
|---|
| 442 | echo ' if [ -n "$$check" ] ; then \' |
|---|
| 443 | echo ' echo " use C1D_SRC files" ; \' |
|---|
| 444 | echo ' ln -sf ../C1D_SRC/*.[Ffh]90 . ; \' |
|---|
| 445 | echo ' fi ' |
|---|
| 446 | echo ' @check=`grep TOP_SRC .config` ; \' |
|---|
| 447 | echo ' if [ -n "$$check" ] ; then \' |
|---|
| 448 | echo ' echo " use TOP_SRC files" ; \' |
|---|
| 449 | echo ' \$(RM) trcstp.F90 ; \' |
|---|
| 450 | echo ' \$(RM) sms.F90 ; \' |
|---|
| 451 | echo ' \$(RM) initrc.F90 ; \' |
|---|
| 452 | echo ' ln -sf ../TOP_SRC/*.[Ffh]90 . ; \' |
|---|
| 453 | echo ' ln -sf ../TOP_SRC/SMS/*.[Ffh] . ; \' |
|---|
| 454 | echo ' ln -sf ../TOP_SRC/SMS/*.[Ffh]90 . ; \' |
|---|
| 455 | echo ' ln -sf ../TOP_SRC/TRP/*.[Ffh]90 . ; \' |
|---|
| 456 | echo ' fi ' |
|---|
| 457 | echo ' @check=`grep OFF_SRC .config` ; \' |
|---|
| 458 | echo ' if [ -n "$$check" ] ; then \' |
|---|
| 459 | echo ' echo " use OFF_SRC files" ; \' |
|---|
| 460 | echo ' ln -sf ../OFF_SRC/*.[Ffh]90 . ; \' |
|---|
| 461 | echo ' ln -sf ../OFF_SRC/*/*.[Ffh]90 . ; \' |
|---|
| 462 | echo ' fi ' |
|---|
| 463 | echo ' @\$(RM) tmplist' |
|---|
| 464 | echo ' @ls -1 | fgrep -v -f .patron >tmplist' |
|---|
| 465 | echo ' @cmp tmplist SRC_FILE_LIST.temp || { echo some routines have been added or suppressed ; \' |
|---|
| 466 | echo ' sdiff -s tmplist SRC_FILE_LIST.temp ; cp tmplist SRC_FILE_LIST.temp ; \' |
|---|
| 467 | echo ' \$(RM) model.o \$(MODEL_LIB) \$(SXMODEL_LIB) \$(EXEC_BIN) ; \' |
|---|
| 468 | echo ' echo "Rebuilding the AA_make files" ; \' |
|---|
| 469 | echo ' cd .. ; ../UTIL/fait_AA_make ; echo " " ; \' |
|---|
| 470 | echo ' echo "THE ins_make COMMAND in modipsl/util MUST BE RERUN PLEASE DO SO BEFORE gmake" ; \' |
|---|
| 471 | echo ' echo "========================================== " ; \' |
|---|
| 472 | echo ' ../../util/ins_make ; echo " " ; false ; exit ; }' |
|---|
| 473 | |
|---|
