MOD mise à jour mineur sur la présentation du code

[euphorik.git] / modules / erl / old / euphorik_deamon.erl

diff --git a/modules/erl/old/euphorik_deamon.erl b/modules/erl/old/euphorik_deamon.erl
new file mode 100755 (executable)
index 0000000..a957475
--- /dev/null
+++ b/modules/erl/old/euphorik_deamon.erl
@@ -0,0 +1,25 @@
+% Module tournant en background s'occupant periodiquement de certaines tâches.\r
+% Auteur : G.Burri\r
+% Date : 05.11.2007\r
+\r
+-module(euphorik_deamon).
+-export([start/1]).\r
+\r
+% L'age max que peut avoir les fichier se trouvant dans le dossier 'tmp' (en second)\r
+-define(AGE_MAX_TMP, 86400). % 24 heures\r
+
+% Démarre le démon
+start(A) ->\r
+   loop(A).
+\r
+\r
+loop(A) ->\r
+   verifier_tmp_captcha(),\r
+   timer:sleep(100000), %  attend 100 secondes\r
+   loop(A).
+\r
+
+% Vérifie le repertoire tmp où se trouve les captcha et efface les plus vieux.
+verifier_tmp_captcha() ->
+   ok.
+   
\ No newline at end of file