[SPIP] +2.1.12

[velocampus/web/www.git] / www / ecrire / action / purger.php

diff --git a/www/ecrire/action/purger.php b/www/ecrire/action/purger.php
new file mode 100644 (file)
index 0000000..81eeb38
--- /dev/null
+++ b/www/ecrire/action/purger.php
@@ -0,0 +1,55 @@
+<?php
+
+/***************************************************************************\
+ *  SPIP, Systeme de publication pour l'internet                           *
+ *                                                                         *
+ *  Copyright (c) 2001-2011                                                *
+ *  Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James  *
+ *                                                                         *
+ *  Ce programme est un logiciel libre distribue sous licence GNU/GPL.     *
+ *  Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne.   *
+\***************************************************************************/
+
+if (!defined('_ECRIRE_INC_VERSION')) return;
+
+// http://doc.spip.org/@action_purger_dist
+function action_purger_dist()
+{
+       $securiser_action = charger_fonction('securiser_action', 'inc');
+       $arg = $securiser_action();
+
+       include_spip('inc/invalideur');
+
+       spip_log("purger $arg");
+
+       switch ($arg) {
+
+       case 'cache': 
+               supprime_invalideurs();
+               @spip_unlink(_CACHE_RUBRIQUES);
+               @spip_unlink(_CACHE_PIPELINES);
+               @spip_unlink(_CACHE_PLUGINS_PATH);
+               @spip_unlink(_CACHE_PLUGINS_OPT);
+               @spip_unlink(_CACHE_PLUGINS_FCT);
+               @spip_unlink(_CACHE_PLUGINS_VERIF);
+               @spip_unlink(_CACHE_CHEMIN);
+               purger_repertoire(_DIR_CACHE,array('subdir'=>true));
+               purger_repertoire(_DIR_AIDE);
+               purger_repertoire(_DIR_VAR.'cache-css');
+               purger_repertoire(_DIR_VAR.'cache-js');
+               break;
+
+       case 'squelettes':
+               purger_repertoire(_DIR_SKELS);
+               break;
+
+       case 'vignettes':
+               purger_repertoire(_DIR_VAR,array('subdir'=>true));
+               supprime_invalideurs();
+               purger_repertoire(_DIR_CACHE);
+               break;
+       }
+
+}
+
+?>