source: trunk/spip/esqueleto-redcta/plugins/spip-listes_1_9_2/inc/formater_auteur_liste.php @ 90

Last change on this file since 90 was 90, checked in by guille, 15 years ago

importacion de spip-listes-1_9_2

File size: 3.8 KB
Line 
1<?php
2
3/***************************************************************************\
4 *  SPIP, Systeme de publication pour l'internet                           *
5 *                                                                         *
6 *  Copyright (c) 2001-2007                                                *
7 *  Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James  *
8 *                                                                         *
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\***************************************************************************/
12
13if (!defined("_ECRIRE_INC_VERSION")) return;
14
15
16//
17// Construit un tableau des 5 informations principales sur un auteur,
18// avec des liens vers les scripts associes:
19// 1. l'icone du statut, avec lien vers la page de tous ceux ayant ce statut
20// 2. l'icone du mail avec un lien mailto ou a defaut la messagerie de Spip
21// 3. le nom, avec lien vers la page complete des informations
22// 4. le mot "site" avec le lien vers le site Web personnelle
23// 5. le nombre d'articles publies
24//
25
26// http://doc.spip.org/@inc_formater_auteur_dist
27function inc_formater_auteur_liste_dist($id_auteur, $script_edition = 'abonne_edit') {
28
29  global $connect_id_auteur, $spip_lang_rtl, $connect_statut;
30
31        $id_auteur = intval($id_auteur);
32
33        $row = spip_fetch_array(spip_query("SELECT *, (en_ligne<DATE_SUB(NOW(),INTERVAL 15 DAY)) AS parti FROM spip_auteurs where id_auteur=$id_auteur"));
34
35        $vals = array();
36
37        $href = generer_url_ecrire("auteurs","statut=" . $row['statut']);
38        $vals[] = "<a href='$href'>" . bonhomme_statut($row) . '</a>';
39
40        if (($id_auteur == $connect_id_auteur) OR $row['parti'])
41                $vals[]= '&nbsp;';
42        else    $vals[]= formater_auteur_listes_mail($row['email'], $id_auteur);
43
44        if ($bio_auteur = attribut_html(propre(couper($row["bio"], 100))))
45                $bio_auteur = " title=\"$bio_auteur\"";
46
47        if (!$nom = typo($row['nom']))
48                $nom = "<span style='color: red'>" . _T('texte_vide') . '</span>';
49
50        $vals[] = "<a href='"
51        . generer_url_ecrire($script_edition, "id_auteur=$id_auteur&initial=-1")
52        . "' $bio_auteur>$nom</a>";
53
54        if ($url_site_auteur = $row["url_site"]) $vals[] =  "<a href='$url_site_auteur'>"._T('info_site_min')."</a>";
55        else $vals[] =  "&nbsp;";
56
57        $cpt = spip_fetch_array(spip_query("SELECT COUNT(listes.id_liste) AS n FROM spip_auteurs_listes AS lien, spip_listes AS listes WHERE lien.id_auteur=$id_auteur AND listes.id_liste=lien.id_liste AND (listes.statut='liste' OR listes.statut='inact') GROUP BY lien.id_auteur"));
58
59        $nombre_listes = intval($cpt['n']);
60
61        if ($nombre_listes > 1) $vals[] =  $nombre_listes.' '._T('spiplistes:info_liste_2');
62        elseif ($nombre_listes == 1) $vals[] =  _T('spiplistes:info_1_liste');
63        else $vals[] =  "&nbsp;";
64
65        return $vals;
66}
67
68// http://doc.spip.org/@formater_auteur_mail
69function formater_auteur_listes_mail($email, $id_auteur)
70{
71        global $spip_lang_rtl;
72
73//      if ($email) $href='mailto:' . $email;
74//      else $href = generer_action_auteur("editer_message","normal/$id_auteur");
75        $href = generer_action_auteur("editer_message","normal/$id_auteur");
76
77        return "<a href='$href' title=\""
78                  . _T('email')
79                  . '">'
80                . http_img_pack("m_envoi$spip_lang_rtl.gif", "m&gt;", " width='14' height='7'", _T('info_envoyer_message_prive'))
81                  . '</a>';
82}
83
84function inc_determiner_non_auteurs_liste($type, $id, $cond_les_auteurs, $order)
85{
86        $cond = '';
87        $res = determiner_auteurs_objet($type, $id, $cond_les_auteurs);
88        if (spip_num_rows($res)<200){ // probleme de performance au dela, on ne filtre plus
89                while ($row = spip_fetch_array($res))
90                        $cond .= ",".$row['id_auteur'];
91        }
92        if (strlen($cond))
93                $cond = "id_auteur NOT IN (" . substr($cond,1) . ') AND ';
94
95        return spip_query("SELECT * FROM spip_auteurs WHERE $cond" . "statut!='5poubelle' AND statut!='nouveau' ORDER BY $order");
96}
97
98?>
Note: See TracBrowser for help on using the repository browser.