--- /dev/null
+<?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;
+
+include_spip('inc/lien');
+
+//
+// Construit un tableau des 5 informations principales sur un auteur,
+// avec des liens vers les scripts associes:
+// 1. l'icone du statut, avec lien vers la page de tous ceux ayant ce statut
+// 2. l'icone du mail avec un lien mailto ou a defaut la messagerie de Spip
+// 3. le nom, avec lien vers la page complete des informations
+// 4. le mot "site" avec le lien vers le site Web personnelle
+// 5. le nombre d'objets publies
+//
+
+// Un auteur sans autorisation de modification de soi est un visiteur;
+// il n'a pas de messagerie interne, et n'a publie que des messages de forum
+
+// http://doc.spip.org/@inc_formater_auteur_dist
+function inc_formater_auteur_dist($id_auteur, $row=NULL) {
+
+ global $connect_id_auteur, $connect_statut;
+
+ $id_auteur = intval($id_auteur);
+
+ if ($row===NULL)
+ $row = sql_fetsel("*, (en_ligne<DATE_SUB(NOW(),INTERVAL 15 DAY)) AS parti", "spip_auteurs", "id_auteur=$id_auteur");
+
+ $vals = array();
+ $statut = $row['statut'];
+ $href = generer_url_ecrire("auteurs","statut=$statut");
+ $vals[] = "<a href='$href'>" . bonhomme_statut($row) . '</a>';
+
+ if (($id_auteur == $connect_id_auteur) OR $row['parti'])
+ $vals[]= ' ';
+ else $vals[]= formater_auteur_mail($row, $id_auteur);
+
+ if (!$nom = typo($row['nom']))
+ $nom = "<span style='color: red'>" . _T('texte_vide') . '</span>';
+
+ $vals[] = "<a href='"
+ . generer_url_ecrire('auteur_infos', "id_auteur=$id_auteur")
+ . "'"
+ . (!$row['bio'] ? '' : (" title=\"" . attribut_html(couper(textebrut($row["bio"]), 200)) ."\""))
+ . ">$nom</a>";
+
+ $url = traiter_lien_explicite($row["url_site"]);
+
+ $vals[] = !$url ? " "
+ : "<a href='$url'>".couper(sinon(typo($row['nom_site']), $row["url_site"]),30)."</a>";
+
+ $contributions = array();
+ if (autoriser('modifier', 'auteur', $id_auteur, $row)) {
+ $in = sql_in('statut',
+ ($connect_statut == "0minirezo"
+ ? array('prepa', 'prop', 'publie', 'refuse')
+ : array('prop', 'publie')));
+ if ($cpt = sql_countsel("spip_auteurs_articles AS L LEFT JOIN spip_articles AS A ON A.id_article=L.id_article", "L.id_auteur=$id_auteur AND $in"))
+ $contributions[] = ($cpt>1?$cpt.' '._T('info_article_2'):_T('info_1_article'));
+ } else {
+ if ($cpt = sql_countsel("spip_forum AS F", "F.id_auteur=$id_auteur"))
+ $contributions[] = ($cpt>1?$cpt.' '._T('public:messages_forum'):('1 ' . _T('public:message')));
+ }
+
+ $contributions = pipeline('compter_contributions_auteur',array('args'=>array('id_auteur'=>$id_auteur,'row'=>$row),'data'=>$contributions));
+
+ $vals[] = count($contributions)?implode('<br />',$contributions):" ";
+
+ return $vals;
+}
+
+// http://doc.spip.org/@formater_auteur_mail
+function formater_auteur_mail($row, $id_auteur)
+{
+ if (!in_array($row['statut'], array('0minirezo', '1comite')))
+ return '';
+
+ if ($row['imessage'] != 'non'
+ AND $GLOBALS['meta']['messagerie_agenda'] != 'non')
+ $href = generer_action_auteur("editer_message","normal/$id_auteur");
+ else if (strlen($row['email'])
+ AND autoriser('voir', 'auteur', $id_auteur))
+ $href = 'mailto:' . $row['email'];
+ else return '';
+
+ return "<a href='$href' title=\""
+ . _T('info_envoyer_message_prive')
+ . "\" class='message'> </a>";
+}
+?>