X-Git-Url: http://git.euphorik.ch/?p=euphorik.git;a=blobdiff_plain;f=tools%2Ftools.rb;h=d9f6547ba37991580cef597d1558002aec9dbf98;hp=e2ed15341b134ff8cdd74bb974192fe5449cfe30;hb=6e20d759c95708c74084dc82dadab2167ed8ef80;hpb=20a70fc1818d9a4a369c53a7b4ba02519e7b98a6

diff --git a/tools/tools.rb b/tools/tools.rb
index e2ed153..d9f6547 100644
--- a/tools/tools.rb
+++ b/tools/tools.rb
@@ -117,14 +117,14 @@ class MiseEnProd
    # Effectue la mise en production.
    def miseEnProd
       copierFichiers()
-      maj()
+      maj('yaws')
    end
    
    # Effectue la mise en préproduction.
    def miseEnPreProd
       copierFichiers()
-      copierBD()
       lancerYaws()
+      maj('yaws_dev')
    end
    
    def copierFichiers
@@ -136,14 +136,11 @@ class MiseEnProd
       set_droits_fichiers()
    end
   
-   # TODO 
-   def copierBD
-   end
-   
    def lancerYaws
       creer_rep("tools")
       system("rsync tools/yaws.conf #{@uri}:#{@rep}/tools")
       system("rsync tools/start_yaws.sh #{@uri}:#{@rep}/tools")
+      system("ssh #{@uri} \"cd #{@rep}/tools; screen -d -m -S yaws_dev ./start_yaws.sh\"")
    end
    
    def exec(commande)
@@ -158,6 +155,7 @@ class MiseEnProd
    end
    
    def compiler_partie_serveuse
+      log "compilation des modules serveur"
       Dir.chdir('modules')
       system("make")
       if $?.exitstatus != 0
@@ -167,7 +165,8 @@ class MiseEnProd
       Dir.chdir('..')
    end
    
-   def creer_repertoire_bd      
+   def creer_repertoire_bd     
+      log "création du répertoire de la base de données"      
       # création du repertoire BD
       creer_rep('BD')
       creer_rep('BD/backups')
@@ -176,6 +175,7 @@ class MiseEnProd
    
    # css, images, html, etc..
    def copier_partie_statique
+      log "copie de la partie statique"      
       uri = "#{@uri}:#{@rep}"
       system("awk '$0 !~ /prod=\"delete\"/' index.yaws | ssh #{@uri} \" cat > #{@rep}/index.yaws\"")
       system("rsync favicon.ico #{uri}")
@@ -186,6 +186,7 @@ class MiseEnProd
    
    # minification et package des fichiers js dans euphorik.js
    def pack_js
+      log "minification, assemblage et copie du javascript" 
       rep_js = 'js'
       creer_rep(rep_js)
       # jquery.js et euphorik.js doivent se trouve en premier
@@ -215,6 +216,7 @@ class MiseEnProd
    end
    
    def copie_modules_serveurs      
+      log "copie des modules du serveur" 
       # copie des modules erlang
       creer_rep('modules')
       system("rsync -r --exclude 'euphorik_test.beam' modules/ebin #{@uri}:#{@rep}/modules")
@@ -222,14 +224,24 @@ class MiseEnProd
    end
    
    def set_droits_fichiers
+      log "attribution des droits sur les fichiers" 
       # attribution des droits
       exec("chmod -R g+rx .")
    end
    
-   def maj
+   # noeud :  le nom du noeud sur lequel le script de mise en prod est exécuté
+   # Execute le script 'mise_en_prod.erl' sur le serveur afin de :
+   # - Recharger les modules
+   # - Mettre à jour la base de données
+   def maj(noeud)
+      log "rechargement des modules serveur et mise à jour de la base de données" 
       # execution du script de mise à jour
       system("cat tools/mise_en_prod.erl | ssh #{@uri} \"cat > /tmp/mise_en_prod.erl\"")
-      system("ssh #{@uri} \"chmod u+x /tmp/mise_en_prod.erl; /tmp/mise_en_prod.erl; rm /tmp/mise_en_prod.erl\"")
+      system("ssh #{@uri} \"chmod u+x /tmp/mise_en_prod.erl; /tmp/mise_en_prod.erl #{noeud}; rm /tmp/mise_en_prod.erl\"")
+   end
+      
+   def log(message)
+      puts "----- #{message} -----"
    end
 end
 
@@ -262,18 +274,7 @@ class Commande
             @verifJS.verifier()
          when 'version'
             @version.maj()
-      end
-      
-=begin
-      Net::SSH.start('euphorik.ch', 'gburri') {|ssh|
-         output = ssh.exec!("hostname")
-         stdout = ""
-         ssh.exec!("ls -l /tmp"){|channel, stream, data|
-            stdout << data if stream == :stdout
-         }
-         puts stdout
-      }
-=end
+         end
    end
    
    def afficherUsage