source: LMDZ5/trunk/create_make_gcm @ 1962

Last change on this file since 1962 was 1962, checked in by fhourdin, 11 years ago

Le create_make_gcm manquait beaucoup de dépendances.

  • Property copyright set to
    Name of program: LMDZ
    Creation date: 1984
    Version: LMDZ5
    License: CeCILL version 2
    Holder: Laboratoire de m\'et\'eorologie dynamique, CNRS, UMR 8539
    See the license file in the root directory
  • Property svn:eol-style set to native
  • Property svn:executable set to *
  • Property svn:keywords set to Author Date Id Revision
File size: 8.3 KB
Line 
1#!/bin/sh
2#
3# $Id: create_make_gcm 1962 2014-02-08 00:38:55Z fhourdin $
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 'DYN3D_COMMON   = $(LIBF)/dyn3d_common'
51echo "FILTRE   = filtre"
52echo "PHYS  = "
53echo "DYN  = dyn "
54echo 'LIBPHY = $(LIBO)/libphy$(PHYS).a'
55echo 'DIRMAIN=dyn$(DIM)d$(FLAG_PARA)'
56echo 'RM=rm'
57echo
58echo "OPLINK = "
59echo
60echo '# Les differentes librairies pour l"edition des liens:'
61echo
62echo 'dyn3d            = $(LIBO)/libdyn3d.a $(LIBO)/lib$(FILTRE).a'
63echo 'dyn3dpar      = $(LIBO)/libdyn3dpar.a $(LIBO)/lib$(FILTRE).a'
64echo 'dyn2d            = $(LIBO)/libdyn2d.a'
65echo 'dyn1d            = $(LIBO)/libdyn1d.a'
66echo 'L_DYN      = -ldyn$(DIM)d$(FLAG_PARA)'
67echo 'L_FILTRE   = -l$(FILTRE)'
68echo 'L_PHY = -lphy$(PHYS) '
69echo 'L_BIBIO    = -lbibio'
70echo 'L_DYN3D_COMMON    = -ldyn3d_common'
71echo 'L_ADJNT    ='
72echo 'L_COSP     = -lcosp'
73
74echo
75echo "#%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%"
76echo "# Option de compilation FORTRAN"
77echo "#%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%"
78echo
79   echo 'COMPILE = $(F77) $(OPTIM) $(INCLUDE) -c'
80   echo 'COMPILE90 = $(F90) $(OPTIM90) $(INCLUDE) -c'
81   echo 'COMPTRU90 = $(F90) $(OPTIMTRU90) $(INCLUDE) -c'
82   echo "LINK    = $LINK"
83   echo "AR      = $AR"
84echo
85echo
86echo "#%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%"
87echo "# Creation des differents executables"
88echo "#%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%"
89echo
90echo "# Executables:"
91echo "# ------------"
92echo
93echo "PROG = code"
94echo
95#echo 'main : chimie $(DYN) bibio phys $(OPTION_DEP) '
96echo 'main : $(DYN) bibio dyn3d_common phys $(OPTION_DEP) '
97echo '  cd $(LIBO) ; $(RANLIB) lib*.a ; cd $(GCM) ;\'
98echo '  cd $(LOCAL_DIR); \'
99echo '  $(COMPILE90) $(LIBF)/$(DIRMAIN)/$(SOURCE) -o $(PROG).o ; \'
100echo '  $(LINK) $(PROG).o -L$(LIBO) $(L_DYN) $(L_ADJNT) $(L_COSP) $(L_PHY) $(L_DYN) $(L_DYN3D_COMMON) $(L_BIBIO) $(L_DYN3D_COMMON) $(L_PHY) $(L_DYN) $(L_FILTRE) $(OPLINK) $(OPTION_LINK) -o $(LOCAL_DIR)/$(PROG).e ; $(RM) $(PROG).o '
101echo
102echo 'dyn : $(LIBO)/libdyn$(DIM)d$(FLAG_PARA).a $(FILTRE)$(DIM)d'
103echo
104echo 'phys : $(LIBPHY)'
105echo
106#echo 'chimie : $(LIBO)/libchimie.a'
107echo
108echo 'bibio : $(LIBO)/libbibio.a'
109echo
110echo 'dyn3d_common : $(LIBO)/libdyn3d_common.a'
111echo
112echo 'adjnt : $(LIBO)/libadjnt.a'
113echo
114echo 'cosp : $(LIBO)/libcosp.a'
115echo
116echo '$(FILTRE)3d : $(LIBO)/lib$(FILTRE).a'
117echo
118echo '$(FILTRE)2d :'
119echo
120echo '$(FILTRE)1d :'
121echo
122echo "#%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%"
123echo "# Contenu des differentes bibliotheques"
124echo "#%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%"
125echo
126echo
127cd $libf >/dev/null 2>&1
128
129for diri in ` ls ` ; do
130
131   if [ -d $diri ] ; then
132   if [ "`ls $diri/*.F $diri/*/*.F`" != "" ] || [ "`ls $diri/*.F90 $diri/*/*.F90`" != "" ]  ; then 
133#      cd $diri >/dev/null 2>&1
134      echo
135      listlib=""
136# Liste des fichiers .F et .F90 n'etant pas des programmes principaux
137      for fili in `ls $diri/*.F $diri/*/*.F` ; do
138         test=` (  head $fili | grep '      PROGRAM' ) `
139         if [ "$test" = "" ] ; then listlib=$listlib" "$fili ; fi
140      done
141      for fili in `ls $diri/*.F90 $diri/*/*.F90` ; do
142         test=` (  head $fili | grep 'PROGRAM' ) `
143         if [ "$test" = "" ] ; then listlib=$listlib" "$fili ; fi 
144      done
145      echo
146      echo $listlib >> create_makeg_gcm.log
147      echo
148      echo "#=================================================================="
149      echo "# Contenu de la bibliotheque correspondant au Directory "$diri
150      echo "#=================================================================="
151      echo
152      for trufile in $listlib ; do
153         fili=`echo $trufile | awk -F/ ' { print $NF } ' | cut -d. -f1`
154         echo '$(LIBO)/lib'$diri".a : " '$(LIBO)/lib'$diri".a("$fili".o)"
155         echo
156      done
157      echo '.PRECIOUS   : $(LIBO)/lib'$diri'.a'
158      echo
159      echo
160      echo "# Compilation des membres de la bibliotheque lib"$diri".a"
161      echo
162      for trufile in $listlib ; do
163         fili=`echo $trufile | awk -F/ ' { print $NF } ' | cut -d. -f1`
164         F90=0 ; egrep -i '^ *use ' $trufile > /dev/null 2>&1 && F90=1
165                 egrep -i '^ *module ' $trufile > /dev/null 2>&1 && F90=1
166                 egrep -i '#include*.inc ' $trufile > /dev/null 2>&1 && F90=1
167         str1='$(LIBO)/lib'$diri'.a('$fili'.o) : $(LIBF)/'$trufile
168         [ "$fili" = "$diri/chem.subs" ] && str1=$str1' $(LIBF)/'$diri/chem.mods.F
169
170##########################################################################
171# TRAITEMENT DES DEPENDANCES
172# Differents cas de dependance correspondant a des include ou des
173# use module.
174# soit dans le repertoire local soit dans un autre.
175# Pour dyn3d, il faudrait remplacer la chaine de caractere par $DYN
176# ou quelque chose du genre.
177##########################################################################
178
179         for stri in ` ( sed -e '/^[cC\!]/d' $trufile | sed -e "/\#include /s/\#include /XXnclude /" -e "/include /s/include /XXnclude /" -e "/INCLUDE /s/INCLUDE /XXnclude /" | sed -n "/XXnclude /s/XXnclude//p" | sed 's/\"//g' | sort | uniq ; sed -e '/^[cC\!]/d' $trufile | egrep -i '^ *use ' | sed -e 's/,/ /' | awk ' { print $2 } ' | sort | uniq ) ` ; do
180            echo $trufile $fili $stri >> create_make_gcm.log
181            strj=`echo $stri | tr [A-Z] [a-z]`
182            str2=""
183            for dirinc in filtrez bibio dyn3d_common grid dyn3d phydev $diri $diri/*/ ; do
184# Recherche dans l'ordre hierarchique inverse car seule la derniere
185# ligne est conservee
186               if [ $dirinc = phydev ] ; then
187                   dirstr='$(PHYS)'
188                   libstr='phy$(PHYS)'
189               else
190                   dirstr=$dirinc
191                   libstr=$dirinc
192               fi
193               if [ -f $dirinc/$stri ] ; then
194                  str2='$(LIBF)/'$dirstr/$stri
195               elif [ -f $dirinc/$strj ] ; then
196                  str2='$(LIBF)/'$dirstr/$stri
197               elif [ -f $dirinc/$strj.F90 ]  || [ -f $dirinc/$strj.F ]  ; then 
198                  strlib=`echo $libstr | awk -F/ ' { print $1 } '`
199                  str2='$(LIBO)/lib'$strlib'.a('$strj'.o)'
200               elif [ -f $dirinc/$stri.F90 ]  || [ -f $dirinc/$stri.F ]  ; then 
201                  strlib=`echo $libstr | awk -F/ ' { print $1 } '`
202                  str2='$(LIBO)/lib'$strlib'.a('$stri'.o)'
203               fi
204            done
205            if [ "$str2" = "" ] ; then
206               echo Warn: Include $diri $trufile $fili $stri pas trouve >> $gcm/create_make_gcm.log
207            elif [ "$str2" = "$str1" ] ; then
208               echo Warn: Include $diri $trufile $fili $stri $str1 trouve 2x >> $gcm/create_make_gcm.log
209            else
210               echo $str1 \\
211               str1=$str2
212            fi
213         done # Fin de la boucle sur les dependances et ecriture de la derniere
214         echo $str1
215         # Compile in LIBO directory; and before compiling, remove
216         # object from library
217         echo ' cd $(LIBO); \'
218         echo ' $(AR) d $(LIBO)/lib'$diri'.a '$fili'.o ; \'
219         if [ "$F90" -eq '0' ] ; then
220         ## Fixed Form Fortran 77
221           echo '       $(COMPILE) $(LIBF)/'$trufile' ; \'
222         else
223         ## Fortran 90
224           if [ `echo $trufile | cut -d. -f2` = F90 ] ; then
225              ## Free Form
226              echo '    $(COMPTRU90) $(LIBF)/'$trufile' ; \'
227           else
228              echo '    $(COMPILE90) $(LIBF)/'$trufile' ; \'
229           fi
230         fi
231         # Put generated object in library
232         echo ' $(AR) r $(LIBO)/lib'$diri'.a '$fili'.o ; $(RM) '$fili'.o ; \'
233         echo
234      done
235#       
236      echo
237   cd $libf
238   fi
239   fi
240done
Note: See TracBrowser for help on using the repository browser.