source: LMDZ5/branches/LF-private/create_make_gcm @ 2395

Last change on this file since 2395 was 1865, checked in by Laurent Fairhead, 11 years ago

Inclusion de la bibliothèque SISVAT/MAR à LMDZ pour le traitement des surfaces
"land ice"

  1. Menegoz

Integration of the SISVAT/MAR library to LMDZ to model the land ice surfaces

  1. Menegoz
  • Property svn:eol-style set to native
  • Property svn:executable set to *
  • Property svn:keywords set to Author Date Id Revision
File size: 7.9 KB
Line 
1#!/bin/sh
2#
3# $Id: create_make_gcm 1865 2013-09-13 08:26:46Z emillour $
4#
5#set -xv
6
7rm -f create_make_gcm.log
8
9machine=`hostname`
10os=`uname`
11gcm=`pwd`
12libf=$gcm/libf
13libo=$gcm/libo
14CRAY=0
15if [ "$machine" = "atlas" -o "$machine" = "etoile" -o "$machine" = "axis" ] ; then
16  CRAY=1
17fi
18XNEC=0
19if [ "$machine" = "rhodes" ] ; then
20  XNEC=1
21fi
22X6NEC=0
23if [ "$machine" = "mercure" ] ; then
24  X6NEC=1
25fi
26X8BRODIE=0
27if [ "$machine" = "brodie" ] ; then
28  X8BRODIE=1
29fi
30VPP=0
31if [ "$machine" = "nymphea0" ] ; then
32  VPP=1
33fi
34#
35echo "#%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%"
36echo "# Definitions de Macros pour Make"
37echo "#%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%"
38echo
39echo "# Repertoires :"
40echo
41echo "GCM     = "$gcm
42echo 'LIBF    = $(GCM)/libf'
43if [ "$CRAY" = '0' ] ; then
44   echo 'LIBO    = $(LIBOGCM)/$(MACHINE)'
45else
46   echo 'LIBO    = $(GCM)/libo'
47fi
48echo "LOCAL_DIR=`echo $localdir`"
49echo 'BIBIO    = $(LIBF)/bibio'
50echo "FILTRE   = filtre"
51echo "PHYS  = "
52echo "DYN  = dyn "
53echo 'LIBPHY = $(LIBO)/libphy$(PHYS).a'
54echo 'DIRMAIN=dyn$(DIM)d$(FLAG_PARA)'
55echo 'RM=rm'
56echo
57echo "OPLINK = "
58echo
59echo '# Les differentes librairies pour l"edition des liens:'
60echo
61echo 'dyn3d            = $(LIBO)/libdyn3d.a $(LIBO)/lib$(FILTRE).a'
62echo 'dyn3dpar      = $(LIBO)/libdyn3dpar.a $(LIBO)/lib$(FILTRE).a'
63echo 'dyn2d            = $(LIBO)/libdyn2d.a'
64echo 'dyn1d            = $(LIBO)/libdyn1d.a'
65echo 'L_DYN      = -ldyn$(DIM)d$(FLAG_PARA)'
66echo 'L_FILTRE   = -l$(FILTRE)'
67echo 'L_PHY = -lphy$(PHYS) '
68echo 'L_BIBIO    = -lbibio'
69echo 'L_ADJNT    ='
70echo 'L_COSP     = -lcosp'
71
72echo
73echo "#%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%"
74echo "# Option de compilation FORTRAN"
75echo "#%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%"
76echo
77   echo 'COMPILE = $(F77) $(OPTIM) $(INCLUDE) -c'
78   echo 'COMPILE90 = $(F90) $(OPTIM90) $(INCLUDE) -c'
79   echo 'COMPTRU90 = $(F90) $(OPTIMTRU90) $(INCLUDE) -c'
80   echo "LINK    = $LINK"
81   echo "AR      = $AR"
82echo
83echo
84echo "#%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%"
85echo "# Creation des differents executables"
86echo "#%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%"
87echo
88echo "# Executables:"
89echo "# ------------"
90echo
91echo "PROG = code"
92echo
93#echo 'main : chimie $(DYN) bibio phys $(OPTION_DEP) '
94echo 'main : $(DYN) bibio phys $(OPTION_DEP) '
95echo '  cd $(LIBO) ; $(RANLIB) lib*.a ; cd $(GCM) ;\'
96echo '  cd $(LOCAL_DIR); \'
97echo '  $(COMPILE90) $(LIBF)/$(DIRMAIN)/$(SOURCE) -o $(PROG).o ; \'
98echo '  $(LINK) $(PROG).o -L$(LIBO) $(L_DYN) $(L_ADJNT) $(L_COSP) $(L_PHY) $(L_DYN) $(L_BIBIO) $(L_DYN) $(L_FILTRE) $(OPLINK) $(OPTION_LINK) -o $(LOCAL_DIR)/$(PROG).e ; $(RM) $(PROG).o '
99echo
100echo 'dyn : $(LIBO)/libdyn$(DIM)d$(FLAG_PARA).a $(FILTRE)$(DIM)d'
101echo
102echo 'phys : $(LIBPHY)'
103echo
104#echo 'chimie : $(LIBO)/libchimie.a'
105echo
106echo 'bibio : $(LIBO)/libbibio.a'
107echo
108echo 'adjnt : $(LIBO)/libadjnt.a'
109echo
110echo 'cosp : $(LIBO)/libcosp.a'
111echo
112echo '$(FILTRE)3d : $(LIBO)/lib$(FILTRE).a'
113echo
114echo '$(FILTRE)2d :'
115echo
116echo '$(FILTRE)1d :'
117echo
118echo "#%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%"
119echo "# Contenu des differentes bibliotheques"
120echo "#%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%"
121echo
122echo
123cd $libf >/dev/null 2>&1
124
125for diri in ` ls ` ; do
126
127   if [ -d $diri ] ; then
128   if [ "`ls $diri/*.F $diri/*/*.F`" != "" ] || [ "`ls $diri/*.F90 $diri/*/*.F90`" != "" ]  ; then 
129#      cd $diri >/dev/null 2>&1
130      echo
131      listlib=""
132# Liste des fichiers .F et .F90 n'etant pas des programmes principaux
133      for fili in `ls $diri/*.F $diri/*/*.F` ; do
134         test=` (  head $fili | grep '      PROGRAM' ) `
135         if [ "$test" = "" ] ; then listlib=$listlib" "$fili ; fi
136      done
137      for fili in `ls $diri/*.F90 $diri/*/*.F90` ; do
138         test=` (  head $fili | grep 'PROGRAM' ) `
139         if [ "$test" = "" ] ; then listlib=$listlib" "$fili ; fi 
140      done
141      echo
142      echo $listlib >> create_makeg_gcm.log
143      echo
144      echo "#=================================================================="
145      echo "# Contenu de la bibliotheque correspondant au Directory "$diri
146      echo "#=================================================================="
147      echo
148      for trufile in $listlib ; do
149         fili=`echo $trufile | awk -F/ ' { print $NF } ' | cut -d. -f1`
150         echo '$(LIBO)/lib'$diri".a : " '$(LIBO)/lib'$diri".a("$fili".o)"
151         echo
152      done
153      echo '.PRECIOUS   : $(LIBO)/lib'$diri'.a'
154      echo
155      echo
156      echo "# Compilation des membres de la bibliotheque lib"$diri".a"
157      echo
158      for trufile in $listlib ; do
159         fili=`echo $trufile | awk -F/ ' { print $NF } ' | cut -d. -f1`
160         F90=0 ; egrep -i '^ *use ' $trufile > /dev/null 2>&1 && F90=1
161                 egrep -i '^ *module ' $trufile > /dev/null 2>&1 && F90=1
162                 egrep -i '#include*.inc ' $trufile > /dev/null 2>&1 && F90=1
163         str1='$(LIBO)/lib'$diri'.a('$fili'.o) : $(LIBF)/'$trufile
164         [ "$fili" = "$diri/chem.subs" ] && str1=$str1' $(LIBF)/'$diri/chem.mods.F
165
166##########################################################################
167# TRAITEMENT DES DEPENDANCES
168# Differents cas de dependance correspondant a des include ou des
169# use module.
170# soit dans le repertoire local soit dans un autre.
171# Pour dyn3d, il faudrait remplacer la chaine de caractere par $DYN
172# ou quelque chose du genre.
173##########################################################################
174
175         for stri in ` ( sed -e '/^[cC\!]/d' $trufile | sed -n "/\#include/s/\#include//p" | sed 's/\"//g' ; sed -e '/^[cC\!]/d' $trufile | egrep -i '^ *use ' | sed -e 's/,/ /' | awk ' { print $2 } ' ) ` ; do
176            echo $trufile $fili $stri >> create_make_gcm.log
177            strj=`echo $stri | tr [A-Z] [a-z]`
178            str2=""
179            for dirinc in filtrez bibio grid dyn3d phydev $diri $diri/*/ ; do
180# Recherche dans l'ordre hierarchique inverse car seule la derniere
181# ligne est conservee
182               if [ $dirinc = phydev ] ; then
183                   dirstr='$(PHYS)'
184                   libstr='phy$(PHYS)'
185               else
186                   dirstr=$dirinc
187                   libstr=$dirinc
188               fi
189               if [ -f $dirinc/$stri ] ; then
190                  str2='$(LIBF)/'$dirstr/$stri
191               elif [ -f $dirinc/$strj ] ; then
192                  str2='$(LIBF)/'$dirstr/$stri
193               elif [ -f $dirinc/$strj.F90 ]  || [ -f $dirinc/$strj.F ]  ; then 
194                  strlib=`echo $libstr | awk -F/ ' { print $1 } '`
195                  str2='$(LIBO)/lib'$strlib'.a('$strj'.o)'
196               elif [ -f $dirinc/$stri.F90 ]  || [ -f $dirinc/$stri.F ]  ; then 
197                  strlib=`echo $libstr | awk -F/ ' { print $1 } '`
198                  str2='$(LIBO)/lib'$strlib'.a('$stri'.o)'
199               fi
200            done
201            if [ "$str2" = "" ] ; then
202               echo Warn: Include $diri $trufile $fili $stri pas trouve >> $gcm/create_make_gcm.log
203            elif [ "$str2" = "$str1" ] ; then
204               echo Warn: Include $diri $trufile $fili $stri $str1 trouve 2x >> $gcm/create_make_gcm.log
205            else
206               echo $str1 \\
207               str1=$str2
208            fi
209         done # Fin de la boucle sur les dependances et ecriture de la derniere
210         echo $str1
211         # Compile in LIBO directory; and before compiling, remove
212         # object from library
213         echo ' cd $(LIBO); \'
214         echo ' $(AR) d $(LIBO)/lib'$diri'.a '$fili'.o ; \'
215         if [ "$F90" -eq '0' ] ; then
216         ## Fixed Form Fortran 77
217           echo '       $(COMPILE) $(LIBF)/'$trufile' ; \'
218         else
219         ## Fortran 90
220           if [ `echo $trufile | cut -d. -f2` = F90 ] ; then
221              ## Free Form
222              echo '    $(COMPTRU90) $(LIBF)/'$trufile' ; \'
223           else
224              echo '    $(COMPILE90) $(LIBF)/'$trufile' ; \'
225           fi
226         fi
227         # Put generated object in library
228         echo ' $(AR) r $(LIBO)/lib'$diri'.a '$fili'.o ; $(RM) '$fili'.o ; \'
229         echo
230      done
231#       
232      echo
233   cd $libf
234   fi
235   fi
236done
Note: See TracBrowser for help on using the repository browser.