2ab21fb91aff8ea941ceb13ec1a6de42ab1b8001
3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
6 * Copyright (c) 2001-2011 *
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;
16 // http://doc.spip.org/@action_editer_auteurs_dist
17 function action_editer_auteurs_dist() {
19 $securiser_action = charger_fonction('securiser_action', 'inc');
20 $arg = $securiser_action();
21 $redirect = urldecode(_request('redirect'));
22 if ($script = _request('script'))
23 $redirect = parametre_url($redirect,'script',$script,'&');
24 if ($titre = _request('titre'))
25 $redirect = parametre_url($redirect,'titre',$titre,'&');
27 if (preg_match(",^\W*(\d+)\W(\w*)\W-(\d+)$,", $arg, $r)) {
28 supprimer_auteur_et_rediriger($r[2], $r[1], $r[3], parametre_url($redirect,'type',$r[2],'&'));
30 elseif (preg_match(",^\W*(\d+)\W(\w*)\W(\d+)$,", $arg, $r)) {
31 ajouter_auteur_et_rediriger($r[2], $r[1], $r[3], parametre_url($redirect,'type',$r[2],'&'));
33 elseif (preg_match(",^\W*(\d+)\W(\w*)$,", $arg, $r)) {
34 list(,$id, $type) = $r;
35 $idom = "auteur_$type" . "_$id" . '_new';
36 $nouv_auteur = intval(_request($idom));
38 ajouter_auteur_et_rediriger($type, $id, $nouv_auteur, parametre_url($redirect,'type',$type,'&'));
39 } else if ($cherche = _request('cherche_auteur')) {
40 if ($p = strpos($redirect, '#')) {
41 $ancre = substr($redirect,$p);
42 $redirect = substr($redirect,0,$p);
44 $redirect = parametre_url($redirect,'type',$type,'&');
45 $res = rechercher_auteurs($cherche);
49 # Bingo. Signaler le choix fait.
50 ajouter_auteur_et_rediriger($type, $id, $res[0], "$redirect&ids=" . $res[0] . "&cherche_auteur=" . rawurlencode($cherche) . $ancre);
51 # Trop vague. Le signaler.
53 redirige_par_entete("$redirect&cherche_auteur=$cherche&ids=-1" . $ancre);
55 # Recherche vide (mais faite). Le signaler
56 redirige_par_entete("$redirect&cherche_auteur=$cherche&ids=" . $ancre);
58 # renvoyer un formulaire de choix
59 redirige_par_entete("$redirect&cherche_auteur=$cherche&ids=" . join(',',$res) . $ancre);
62 include_spip('inc/actions');
63 ajax_retour("action_editer_auteur: $arg faux");exit;
65 } else spip_log("action_editer_auteur: $arg pas compris");
68 // http://doc.spip.org/@supprimer_auteur_et_rediriger
69 function supprimer_auteur_et_rediriger($type, $id, $id_auteur, $redirect)
71 $jointure = table_jointure('auteur', $type);
72 if (preg_match(',^[a-z]*$,',$type)){
73 sql_delete("spip_{$jointure}", "id_auteur=".sql_quote($id_auteur)." AND id_{$type}=".sql_quote($id));
75 // Notifications, gestion des revisions, reindexation...
76 pipeline('post_edition',
79 'operation' => 'supprimer_auteur',
80 'table' => table_objet_sql($type),
88 if ($redirect) redirige_par_entete($redirect);
91 // http://doc.spip.org/@ajouter_auteur_et_rediriger
92 function ajouter_auteur_et_rediriger($type, $id, $id_auteur, $redirect)
94 $jointure = table_jointure('auteur', $type);
95 if (preg_match(',^[a-z]*$,',$type)){
96 $res = sql_fetsel("id_$type", "spip_{$jointure}", "id_auteur=" . sql_quote($id_auteur) . " AND id_{$type}=" . $id);
98 sql_insertq("spip_{$jointure}",
99 array('id_auteur' => $id_auteur,
102 // Notifications, gestion des revisions, reindexation...
103 pipeline('post_edition',
106 'operation' => 'ajouter_auteur',
107 'table' => table_objet_sql($type),
115 if ($redirect) redirige_par_entete($redirect);
118 // http://doc.spip.org/@rechercher_auteurs
119 function rechercher_auteurs($cherche_auteur)
121 include_spip('inc/mots');
122 include_spip('inc/charsets'); // pour tranlitteration
123 $result = sql_select("id_auteur, nom", "spip_auteurs");
124 $table_auteurs = array();
125 $table_ids = array();
126 while ($row = sql_fetch($result)) {
127 $table_auteurs[] = $row["nom"];
128 $table_ids[] = $row["id_auteur"];
130 return mots_ressemblants($cherche_auteur, $table_auteurs, $table_ids);