www/plugins/gis/genie/gis_nettoyer_base.php

   1 <?php
   2
   3 if (!defined('_ECRIRE_INC_VERSION')) return;
   4
   5 function genie_gis_nettoyer_base_dist($t){
   6
   7         $liens = array();
   8
   9         # liens vers un article inexistant
  10         if ($articles = sql_allfetsel("A.id_article,L.id_gis,L.objet,L.id_objet","spip_gis_liens AS L
  11                         INNER JOIN spip_articles AS A
  12                         ON (A.id_article = L.id_objet AND L.objet='article')",
  13                         "A.id_article IS NULL")) {
  14                 $liens = array_merge($liens, $articles);
  15         }
  16
  17         # liens vers une breve inexistante
  18         if ($breves = sql_allfetsel("B.id_breve,L.id_gis,L.objet,L.id_objet","spip_gis_liens AS L
  19                         INNER JOIN spip_breves AS B
  20                         ON (B.id_breve = L.id_objet AND L.objet='breve')",
  21                         "B.id_breve IS NULL")) {
  22                 $liens = array_merge($liens, $breves);
  23         }
  24
  25         foreach ($liens as $row) {
  26                 sql_delete("spip_gis_liens","id_gis=".$row['id_gis']." AND objet=".$row['objet']." AND id_objet=".$row['id_objet']);
  27                 spip_log("GIS GENIE : Suppression du lien gis ". $row['id_gis'] ." => ". $row['objet'] ." ". $row['id_objet'],"gis");
  28         }
  29
  30         return 1;
  31 }
  32
  33 ?>