MOD modification de jsmin.js pour traiter le js depuis stdin

diff --git a/tools/jsmin.js b/tools/jsmin.js
index 55ee654..95c275b 100644 (file)
--- a/tools/jsmin.js
+++ b/tools/jsmin.js
@@ -1,3 +1,5 @@
+#!/usr/bin/env rhino
+\r
 /* jsmin.js - 2006-08-31
 Author: Franck Marcia
 This work is an adaptation of jsminc.c published by Douglas Crockford.
@@ -324,16 +326,17 @@ function jsmin(comment, input, level) {
        return comment + ret;
 
 }
-
-(function (a) {
-    if (!a[0]) {
-        print("Usage: jsmin.js file.js");
-        quit(1);
-    }
-    var input = readFile(a[0]);
-    if (!input) {
-        print("jslint: Couldn't open file '" + a[0] + "'.");
-        quit(1);
-    }
-   print(jsmin(input));
+\r
+importPackage(java.io);
+(function (a) {\r
+   // in is a reserved javascript word, so we need to use [] for access\r
+   var readingIn = new BufferedReader(new InputStreamReader(java.lang.System["in"]));\r
+   var sInput = "";\r
+   var str = "";\r
+   while(str != null) {\r
+      sInput += str + '\n';
+      \r
+      str = readingIn.readLine();\r
+   }
+   print(jsmin(sInput));
 })(arguments);
\ No newline at end of file

diff --git a/tools/mise_en_prod.erl b/tools/mise_en_prod.erl
deleted file mode 100755 (executable)
index 933aceb..0000000
--- a/tools/mise_en_prod.erl
+++ /dev/null
@@ -1,43 +0,0 @@
-#!/usr/bin/env escript
-% coding: utf-8
-
-% Executé sur le serveur après la copie des fichiers lors de la mise en production.
-% Recharge les modules de euphorik et met à jour la BD.
-% TODO : construire le nom du noeud en fonction du nom de l'host
-
-hote() ->
-   '@overnux'.
-
-% le premier argument est le nom du noeud est peut valoir :
-% - yaws : noeud de production
-% - yaws_dev : noeud de pre-production
-main([Nom_node]) when Nom_node =:= "yaws"; Nom_node =:= "yaws_dev" -> 
-   Node = list_to_atom(Nom_node ++ atom_to_list(hote())),
-   net_kernel:start([flynux, shortnames]),
-   io:format("rechargement des modules..~n"),
-   rpc:call(Node, euphorik_daemon, reload_euphorik, []),
-   if Nom_node =:= "yaws_dev" -> copier_bd(Node);
-      true -> true
-   end,
-   io:format("mise à jour de la BD..~n"),
-   rpc:call(Node, euphorik_bd_admin, update, []);
-main(_) ->
-   io:format("Usage : mise_en_prod.erl <node>"),
-   halt(1).
-
-% Copie la bd du noeud de production
-copier_bd(Node) ->
-   io:format("Copie de la BD de production vers le noeude pre-production~n"),
-   Fichier = "/tmp/backup_ek_tmp",
-   Fichier2 = "/tmp/backup_ek_tmp2",
-   rpc:call(yaws@overnux, mnesia, backup, [Fichier]),
-   rpc:call(Node, euphorik_bd_admin, change_node_name, [yaws@overnux, yaws_dev@overnux, Fichier, Fichier2]),
-   rpc:call(Node, mnesia, restore, [Fichier2, [{default_op, recreate_tables}]]),
-   rpc:call(yaws@overnux, file, delete, [Fichier]),
-   rpc:call(Node, file, delete, [Fichier2]).
-   
-   
-   
-   
-   
-   

diff --git a/tools/update_server.erl b/tools/update_server.erl
new file mode 100755 (executable)
index 0000000..4211772
--- /dev/null
+++ b/tools/update_server.erl
@@ -0,0 +1,38 @@
+#!/usr/bin/env escript
+% coding: utf-8
+
+% Executé sur le serveur après la copie des fichiers lors de la mise en production.
+% Recharge les modules de euphorik et met à jour la BD.
+% TODO : construire le nom du noeud en fonction du nom de l'host
+
+hote() ->
+   '@overnux'.
+
+% le premier argument est le nom du noeud est peut valoir :
+% - yaws : noeud de production
+% - yaws_dev : noeud de pre-production
+main([Nom_node]) when Nom_node =:= "yaws"; Nom_node =:= "yaws_dev" -> 
+   Node = list_to_atom(Nom_node ++ atom_to_list(hote())),
+   net_kernel:start([flynux, shortnames]),
+   io:format("rechargement des modules..~n"),
+   rpc:call(Node, euphorik_daemon, reload_euphorik, []),
+   if Nom_node =:= "yaws_dev" -> copier_bd(Node);
+      true -> true
+   end,
+   io:format("mise à jour de la BD..~n"),
+   rpc:call(Node, euphorik_bd_admin, update, []);
+main(_) ->
+   io:format("Usage : mise_en_prod.erl <node>"),
+   halt(1).
+
+% Copie la bd du noeud de production
+copier_bd(Node) ->
+   io:format("Copie de la BD de production vers le noeude pre-production~n"),
+   Fichier = "/tmp/backup_ek_tmp",
+   Fichier2 = "/tmp/backup_ek_tmp2",
+   rpc:call(yaws@overnux, mnesia, backup, [Fichier]),
+   rpc:call(Node, euphorik_bd_admin, change_node_name, [yaws@overnux, yaws_dev@overnux, Fichier, Fichier2]),
+   rpc:call(Node, mnesia, restore, [Fichier2, [{default_op, recreate_tables}]]),
+   rpc:call(yaws@overnux, file, delete, [Fichier]),
+   rpc:call(Node, file, delete, [Fichier2]).
+   
\ No newline at end of file