3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
6 * Copyright (c) 2001-2019 *
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 \***************************************************************************/
14 * Fonctions spécifiques au squelette
16 * @package SPIP\Core\Fonctions
18 if (!defined('_ECRIRE_INC_VERSION')) {
23 * Compter les articles publies lies a un auteur, dans une boucle auteurs
24 * pour la vue prive/liste/auteurs.html
27 * @param <type> $boucles
31 function critere_compteur_articles_filtres_dist($idb, &$boucles, $crit, $left = false) {
32 $boucle = &$boucles[$idb];
34 $_statut = calculer_liste($crit->param
[0], array(), $boucles, $boucle->id_parent
);
40 $boucle->from
['LAA'] = 'spip_auteurs_liens';
41 $boucle->from_type
['LAA'] = 'left';
42 $boucle->join
['LAA'] = array("'auteurs'", "'id_auteur'", "'id_auteur'", "'LAA.objet=\'article\''");
44 $boucle->from
['articles'] = 'spip_articles';
45 $boucle->from_type
['articles'] = 'left';
46 $boucle->join
['articles'] = array(
50 "'(articles.statut IS NULL OR '.sql_in('articles.statut',_q($_statut)$not).')'"
53 $boucle->select
[] = 'COUNT(articles.id_article) AS compteur_articles';
54 $boucle->group
[] = 'auteurs.id_auteur';
58 * Compter les articles publiés liés à un auteur, dans une boucle auteurs
59 * pour la vue `prive/liste/auteurs.html`
61 * Nécessite le critère `compteur_articles_filtres`
64 * @see critere_compteur_articles_filtres_dist()
67 * Pile au niveau de la balise
69 * Pile complétée par le code à générer
71 function balise_COMPTEUR_ARTICLES_dist($p) {
72 return rindex_pile($p, 'compteur_articles', 'compteur_articles_filtres');
77 * Afficher l'initiale pour la navigation par lettres
79 * @staticvar string $memo
81 * @param <type> $initiale
82 * @param <type> $compteur
83 * @param <type> $debut
87 function afficher_initiale($url, $initiale, $compteur, $debut, $pas) {
89 static $res = array();
92 or (!$initiale and !$url)
93 or ($initiale !== $memo['initiale'])
95 $newcompt = intval(floor(($compteur - 1) / $pas) * $pas);
96 // si fin de la pagination et une seule entree, ne pas l'afficher, ca ne sert a rien
97 if (!$initiale and !$url and !$memo['compteur']) {
101 $on = (($memo['compteur'] <= $debut)
103 $newcompt > $debut or ($newcompt == $debut and $newcompt == $memo['compteur'])
105 $res[] = lien_ou_expose($memo['url'], $memo['initiale'], $on, 'lien_pagination');
109 'entree' => isset($memo['entree']) ?
$memo['entree'] +
1 : 0,
110 'initiale' => $initiale,
111 'url' => parametre_url($url, 'i', $initiale),
112 'compteur' => $newcompt
116 if (!$initiale and !$url) {
117 if (count($res) > 1) {
118 $out = implode(' ', $res);
128 * Calculer l'url vers la messagerie :
129 * - si l'auteur accepte les messages internes et que la messagerie est activee
130 * et qu'il est en ligne, on propose le lien vers la messagerie interne
131 * - sinon on propose un lien vers un email si possible
134 * @staticvar string $time
135 * @param int $id_auteur
136 * @param date $en_ligne
137 * @param string $statut
138 * @param string $imessage
139 * @param string $email
142 function auteur_lien_messagerie($id_auteur, $en_ligne, $statut, $imessage, $email = '') {
144 if (!in_array($statut, array('0minirezo', '1comite'))) {
148 if (is_null($time)) {
151 $parti = (($time - strtotime($en_ligne)) > 15 * 60);
153 if ($imessage != 'non' and !$parti // historique : est-ce que ca a encore un sens de limiter vu qu'on a la notification par email ?
154 and $GLOBALS['meta']['messagerie_agenda'] != 'non'
156 return parametre_url(parametre_url(generer_url_ecrire('message_edit', 'new=oui'), 'to', $id_auteur), 'redirect', self());
157 } elseif (strlen($email) and autoriser('voir', 'auteur', $id_auteur)) {
158 return 'mailto:' . $email;