3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
6 * Copyright (c) 2001-2014 *
7 * Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James *
9 * Ce programme est un logiciel libre distribue sous licence GNU/GPL. *
10 * Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne. *
11 \***************************************************************************/
13 if (!defined("_ECRIRE_INC_VERSION")) return;
15 include_spip('inc/presentation');
16 include_spip('inc/actions');
17 include_spip('base/abstract_sql');
19 function filtre_objets_associes_mot_dist($id_mot,$id_groupe) {
20 static $occurrences = array();
22 // calculer tous les liens du groupe d'un coup
23 if (!isset ($occurrences[$id_groupe]))
24 $occurrences[$id_groupe] = calculer_utilisations_mots($id_groupe);
27 $tables = lister_tables_objets_sql();
28 foreach ($tables as $table_objet_sql=>$infos) {
29 $nb = (isset($occurrences[$id_groupe][$table_objet_sql][$id_mot]) ?
$occurrences[$id_groupe][$table_objet_sql][$id_mot] : 0);
31 $associes[] = objet_afficher_nb($nb,$infos['type']);
34 $associes = pipeline('afficher_nombre_objets_associes_a',array('args'=>array('objet'=>'mot','id_objet'=>$id_mot),'data'=>$associes));
40 * Calculer les nombres d'elements (articles, etc.) lies a chaque mot
42 * @param int $id_groupe
45 function calculer_utilisations_mots($id_groupe)
48 $objets = sql_allfetsel('DISTINCT objet', array('spip_mots_liens AS L', 'spip_mots AS M'), array('L.id_mot=M.id_mot', 'M.id_groupe='.intval($id_groupe)));
50 foreach($objets as $o) {
52 $_id_objet = id_table_objet($objet);
53 $table_objet_sql = table_objet_sql($objet);
54 $infos = lister_tables_objets_sql($table_objet_sql);
55 if (isset($infos['field']) AND $infos['field']){
56 // uniquement certains statut d'objet,
57 // et uniquement si la table dispose du champ statut.
59 if (isset($infos['field']['statut']) OR isset($infos['statut'][0]['champ'])) {
60 // on s'approche au mieux de la declaration de l'objet.
61 // il faudrait ameliorer ce point.
62 $c_statut = isset($infos['statut'][0]['champ']) ?
$infos['statut'][0]['champ'] : 'statut';
64 // bricoler les statuts d'apres la declaration de l'objet (champ previsu a defaut de mieux)
65 if (array_key_exists('previsu', $infos['statut'][0]) AND strlen($infos['statut'][0]['previsu'])>1) {
66 $str_statuts = $infos['statut'][0]['previsu'];
67 if ($GLOBALS['connect_statut'] !="0minirezo")
68 $str_statuts = str_replace('prepa','',$str_statuts);
69 $not = (substr($str_statuts, 0, 1) == '!'?
'NOT' : '');
70 $str_statuts = str_replace('!','',$str_statuts);
71 $Tstatuts = array_filter(explode(',', $str_statuts));
72 $statuts = " AND " . sql_in("O.$c_statut", $Tstatuts, $not);
74 // objets sans champ previsu ou avec un previsu == '!' (par ex les rubriques)
76 $statuts = " AND " . sql_in("O.$c_statut", ($GLOBALS['connect_statut'] =="0minirezo") ?
array('prepa','prop','publie') : array('prop','publie'));
79 "COUNT(*) AS cnt, L.id_mot",
81 LEFT JOIN spip_mots AS M ON L.id_mot=M.id_mot
82 AND L.objet=" . sql_quote($objet) . "
83 LEFT JOIN " . $table_objet_sql . " AS O ON L.id_objet=O.$_id_objet" ,
84 "M.id_groupe=$id_groupe$statuts",
86 foreach($res as $row) {
87 $retour[$table_objet_sql][$row['id_mot']] = $row['cnt'];