Your IP : 216.73.216.42
home/bourgleram/www/plugins-dist/forum/base/forum.php 0000705 00000012607 15252630245 0017014 0 ustar 00 <?php
/***************************************************************************\
* SPIP, Systeme de publication pour l'internet *
* *
* Copyright (c) 2001-2016 *
* 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;
/**
* Interfaces de la table forum pour le compilateur
*
* @param array $interfaces
* @return array $interfaces
*/
function forum_declarer_tables_interfaces($interfaces){
$interfaces['table_des_tables']['forums']='forum';
$interfaces['exceptions_des_tables']['forums']['date']='date_heure';
$interfaces['exceptions_des_tables']['forums']['nom']='auteur';
$interfaces['exceptions_des_tables']['forums']['email']='email_auteur';
// il ne faut pas essayer de chercher le forum du mot cle, mais bien le mot cle associe au forum
$interfaces['exceptions_des_jointures']['spip_forum']['id_secteur'] = array('spip_articles','id_secteur');
$interfaces['exceptions_des_jointures']['spip_forum']['id_mot'] = array('spip_mots','id_mot');
$interfaces['exceptions_des_jointures']['spip_forum']['titre_mot'] = array('spip_mots','titre');
$interfaces['exceptions_des_jointures']['spip_forum']['type_mot'] = array('spip_mots','type');
$interfaces['exceptions_des_jointures']['spip_forum']['id_groupe'] = array('spip_mots','id_groupe');
#$interfaces['table_titre']['forums']= "titre, '' AS lang";
#$interfaces['table_date']['forums']='date_heure';
$interfaces['table_statut']['spip_forum'][] = array('champ'=>'statut','publie'=>'publie','previsu'=>'publie,prop','exception'=>'statut');
$interfaces['table_des_traitements']['PARAMETRES_FORUM'][]= 'spip_htmlspecialchars(%s)';
$interfaces['table_des_traitements']['TEXTE']['forums']= "liens_nofollow(safehtml(".str_replace("%s","interdit_html(%s)",_TRAITEMENT_RACCOURCIS)."))";
$interfaces['table_des_traitements']['TITRE']['forums']= "liens_nofollow(safehtml(".str_replace("%s","interdit_html(%s)",_TRAITEMENT_TYPO)."))";
$interfaces['table_des_traitements']['NOTES']['forums']= "liens_nofollow(safehtml(".str_replace("%s","interdit_html(%s)",_TRAITEMENT_RACCOURCIS)."))";
$interfaces['table_des_traitements']['NOM_SITE']['forums']= "liens_nofollow(safehtml(".str_replace("%s","interdit_html(%s)",_TRAITEMENT_TYPO)."))";
$interfaces['table_des_traitements']['URL_SITE']['forums']= 'safehtml(vider_url(%s))';
$interfaces['table_des_traitements']['AUTEUR']['forums']= 'liens_nofollow(safehtml(vider_url(%s)))';
$interfaces['table_des_traitements']['EMAIL_AUTEUR']['forums']= 'safehtml(vider_url(%s))';
return $interfaces;
}
/**
* Déclaration de la table spip_forum et de l'objet forum
*
* @param array $tables Tableau des objets déclarés
* @return array $tables Tableau des objets complété
*/
function forum_declarer_tables_objets_sql($tables){
$tables['spip_forum'] = array(
'table_objet'=>'forums', # ??? hum hum redevient spip_forum par table_objet_sql mais casse par un bete "spip_".table_objet()
'type'=>'forum',
'url_voir'=>'controler_forum',
'url_edit'=>'controler_forum',
'editable'=>'non',
'principale' => 'oui',
'page'=>'', // pas de page editoriale pour un forum
'texte_retour' => 'icone_retour',
'texte_objets' => 'forum:forum',
'texte_objet' => 'forum:forum',
'info_aucun_objet'=> 'forum:aucun_message_forum',
'info_1_objet' => 'forum:info_1_message_forum',
'info_nb_objets' => 'forum:info_nb_messages_forum',
'titre' => "titre, '' AS lang",
'date' => 'date_heure',
'champs_editables' => array('titre', 'texte', 'nom_site', 'url_site'),
'field'=> array(
"id_forum" => "bigint(21) NOT NULL",
"id_objet" => "bigint(21) DEFAULT '0' NOT NULL",
"objet" => "VARCHAR (25) DEFAULT '' NOT NULL",
"id_parent" => "bigint(21) DEFAULT '0' NOT NULL",
"id_thread" => "bigint(21) DEFAULT '0' NOT NULL",
"date_heure" => "datetime DEFAULT '0000-00-00 00:00:00' NOT NULL",
"date_thread" => "datetime DEFAULT '0000-00-00 00:00:00' NOT NULL",
"titre" => "text DEFAULT '' NOT NULL",
"texte" => "mediumtext DEFAULT '' NOT NULL",
"auteur" => "text DEFAULT '' NOT NULL",
"email_auteur" => "text DEFAULT '' NOT NULL",
"nom_site" => "text DEFAULT '' NOT NULL",
"url_site" => "text DEFAULT '' NOT NULL",
"statut" => "varchar(8) DEFAULT '0' NOT NULL",
"ip" => "varchar(40) DEFAULT '' NOT NULL",
"maj" => "TIMESTAMP",
"id_auteur" => "bigint DEFAULT '0' NOT NULL"
),
'key' => array(
"PRIMARY KEY" => "id_forum",
"KEY id_auteur" => "id_auteur",
"KEY id_parent" => "id_parent",
"KEY id_thread" => "id_thread",
"KEY optimal" => "statut,id_parent,id_objet,objet,date_heure"
),
'join' => array(
"id_forum"=>"id_forum",
"id_parent"=>"id_parent",
"id_objet"=>"id_objet",
"objet"=>"objet",
"id_auteur"=>"id_auteur",
),
'rechercher_champs' => array(
'titre' => 3, 'texte' => 1, 'auteur' => 2, 'email_auteur' => 2, 'nom_site' => 1, 'url_site' => 1
),
);
// jointures sur les forum pour tous les objets
$tables[]['tables_jointures'][]= 'forums';
return $tables;
}
?>
home/bourgleram/www/plugins-dist/porte_plume/barre_outils/forum.php 0000705 00000001546 15252671424 0022003 0 ustar 00 <?php
/**
* Déclaration de la barre d'outil de forum de SPIP
*
* @plugin Porte Plume pour SPIP
* @license GPL
* @package SPIP\PortePlume\BarreOutils
*/
if (!defined("_ECRIRE_INC_VERSION")) return;
/**
* Définition de la barre 'forum' pour markitup
*
* @return Barre_outils La barre d'outil
*/
function barre_outils_forum(){
// on modifie simplement la barre d'edition
$edition = charger_fonction('edition','barre_outils');
$barre = $edition();
$barre->nameSpace = 'forum';
$barre->cacherTout();
$barre->afficher(array(
'bold','italic',
'sepLink','link',
'sepGuillemets', 'quote',
'sepCaracteres','guillemets', 'guillemets_simples',
'guillemets_de', 'guillemets_de_simples',
'guillemets_autres', 'guillemets_autres_simples',
'A_grave', 'E_aigu', 'E_grave', 'aelig', 'AElig', 'oe', 'OE', 'Ccedil',
));
return $barre;
}
?>
home/bourgleram/www/plugins-dist/forum/inc/forum.php 0000705 00000022727 15252723773 0016670 0 ustar 00 <?php
/***************************************************************************\
* SPIP, Systeme de publication pour l'internet *
* *
* Copyright (c) 2001-2016 *
* 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/actions');
/**
* recuperer le critere SQL qui selectionne nos forums
* http://code.spip.net/@critere_statut_controle_forum
*
* @param string $type
* @param int|array $id_secteur
* @param string $recherche
* @return array
*/
function critere_statut_controle_forum($type, $id_secteur=0, $recherche='') {
if (!$id_secteur) {
$from = 'spip_forum AS F';
$where = "";
$and = "";
} else {
if (!is_array($id_secteur)){
$id_secteur = explode(',',$id_secteur);
}
$from = 'spip_forum AS F, spip_articles AS A';
$where = sql_in("A.id_secteur",$id_secteur)." AND F.objet='article' AND F.id_objet=A.id_article";
$and = ' AND ';
}
switch ($type) {
case 'public':
$and .= "F.statut IN ('publie', 'off', 'prop', 'spam') AND F.texte!=''";
break;
case 'prop':
$and .= "F.statut='prop'";
break;
case 'spam':
$and .= "F.statut='spam'";
break;
case 'interne':
$and .= "F.statut IN ('prive', 'privrac', 'privoff', 'privadm') AND F.texte!=''";
break;
case 'vide':
$and .= "F.statut IN ('publie', 'off', 'prive', 'privrac', 'privoff', 'privadm') AND F.texte=''";
break;
default:
$where = '0=1';
$and ='';
break;
}
if ($recherche) {
# recherche par IP
if (preg_match(',^\d+\.\d+\.(\*|\d+\.(\*|\d+))$,', $recherche)) {
$and .= " AND ip LIKE ".sql_quote(str_replace('*', '%', $recherche));
} else {
include_spip('inc/rechercher');
if ($a = recherche_en_base($recherche, 'forum'))
$and .= " AND ".sql_in('id_forum',
array_keys(array_pop($a)));
else
$and .= " AND 0=1";
}
}
return array($from, "$where$and");
}
// Index d'invalidation des forums
// obsolete, remplace par l'appel systematique a 2 invalideurs :
// - forum/id_forum
// - objet/id_objet
// http://code.spip.net/@calcul_index_forum
function calcul_index_forum($objet,$id_objet) {
return substr($objet,0,1).$id_objet;
}
//
// Recalculer tous les threads
//
// http://code.spip.net/@calculer_threads
function calculer_threads() {
// fixer les id_thread des debuts de discussion
sql_update('spip_forum', array('id_thread'=>'id_forum'), "id_parent=0");
// reparer les messages qui n'ont pas l'id_secteur de leur parent
do {
$discussion = "0";
$precedent = 0;
$r = sql_select("fille.id_forum AS id, maman.id_thread AS thread", 'spip_forum AS fille, spip_forum AS maman', "fille.id_parent = maman.id_forum AND fille.id_thread <> maman.id_thread",'', "thread");
while ($row = sql_fetch($r)) {
if ($row['thread'] == $precedent)
$discussion .= "," . $row['id'];
else {
if ($precedent)
sql_updateq("spip_forum", array("id_thread" => $precedent), "id_forum IN ($discussion)");
$precedent = $row['thread'];
$discussion = $row['id'];
}
}
sql_updateq("spip_forum", array("id_thread" => $precedent), "id_forum IN ($discussion)");
} while ($discussion != "0");
}
// Calculs des URLs des forums (pour l'espace public)
// http://code.spip.net/@racine_forum
function racine_forum($id_forum){
if (!$id_forum = intval($id_forum)) return false;
$row = sql_fetsel("id_parent, objet, id_objet, id_thread", "spip_forum", "id_forum=".$id_forum);
if (!$row) return false;
if ($row['id_parent']
AND $row['id_thread'] != $id_forum) // eviter boucle infinie
return racine_forum($row['id_thread']);
return array($row['objet'], $row['id_objet'], $id_forum);
}
// http://code.spip.net/@parent_forum
function parent_forum($id_forum) {
if (!$id_forum = intval($id_forum)) return;
$row = sql_fetsel("id_parent, objet, id_objet", "spip_forum", "id_forum=".$id_forum);
if(!$row) return array();
if ($row['id_parent'])
return array('forum', $row['id_parent']);
else
return array($row['objet'], $row['id_objet']);
}
/**
* Pour compatibilite : remplacer les appels par son contenu
*
* @param unknown_type $id_forum
* @param unknown_type $args
* @param unknown_type $ancre
* @return unknown
*/
function generer_url_forum_dist($id_forum, $args='', $ancre='') {
$generer_url_forum = charger_fonction('generer_url_forum','urls');
return $generer_url_forum($id_forum, $args, $ancre);
}
// http://code.spip.net/@generer_url_forum_parent
function generer_url_forum_parent($id_forum) {
if ($id_forum = intval($id_forum)) {
list($type, $id) = parent_forum($id_forum);
if ($type)
return generer_url_entite($id, $type);
}
return '';
}
// Quand on edite un forum, on tient a conserver l'original
// sous forme d'un forum en reponse, de statut 'original'
// http://code.spip.net/@conserver_original
function conserver_original($id_forum) {
$s = sql_fetsel("id_forum", "spip_forum", "id_parent=".intval($id_forum)." AND statut='original'");
if ($s) return ''; // pas d'erreur
// recopier le forum
$t = sql_fetsel("*", "spip_forum", "id_forum=".intval($id_forum));
if ($t) {
unset($t['id_forum']);
$id_copie = sql_insertq('spip_forum', $t);
if ($id_copie) {
sql_updateq('spip_forum', array('id_parent'=> $id_forum, 'statut'=>'original'), "id_forum=$id_copie");
return ''; // pas d'erreur
}
}
return '&erreur';
}
// appelle conserver_original(), puis modifie le contenu via l'API inc/modifier
// http://code.spip.net/@enregistre_et_modifie_forum
function enregistre_et_modifie_forum($id_forum, $c=false) {
if ($err = conserver_original($id_forum)) {
spip_log("erreur de sauvegarde de l'original, $err");
return;
}
include_spip('action/editer_forum');
return revision_forum($id_forum, $c);
}
/**
* Trouver le titre d'un objet publie
* @param string $objet
* @param int $id_objet
* @param int $id_forum
* @param bool $publie
* @return bool|string
*/
function forum_recuperer_titre_dist($objet, $id_objet, $id_forum=0, $publie = true) {
include_spip('inc/filtres');
$titre = "";
if ($f = charger_fonction($objet.'_forum_extraire_titre', 'inc', true)){
$titre = $f($id_objet);
}
else {
include_spip('base/objets');
if ($publie AND !objet_test_si_publie($objet, $id_objet))
return false;
$titre = generer_info_entite($id_objet, $objet,'titre','*');
}
if ($titre AND $id_forum){
$titre_m = sql_getfetsel('titre', 'spip_forum', "id_forum = " . intval($id_forum));
if (!$titre_m) {
return false; // URL fabriquee
}
$titre = $titre_m;
}
$titre = supprimer_numero($titre);
$titre = str_replace('~', ' ', extraire_multi($titre));
return $titre;
}
/**
* Retourne pour un couple objet/id_objet donne
* de quelle maniere les forums sont acceptes dessus
* non: pas de forum
* pos: a posteriori, acceptes et eventuellements moderes ensuite
* pri: a priori, doivent etre valides par un admin
* abo: les personnes doivent au prealable etre identifiees
*
* http://code.spip.net/@controler_forum
*
* @param string $objet
* objet a tester
* @param int $id_objet
* identifiant de l'objet
* @return string
* chaine de 3 caractere parmi 'non','pos','pri','abo'
*/
function controler_forum($objet, $id_objet) {
// Valeur par defaut
$accepter_forum = $GLOBALS['meta']["forums_publics"];
// il y a un cas particulier pour l'acceptation de forum d'article...
if ($f = charger_fonction($objet . '_accepter_forums_publics', 'inc', true)){
$accepter_forum = $f($id_objet);
}
return substr($accepter_forum, 0, 3);
}
/**
* Verifier la presence du jeton de secu post previsu
* http://code.spip.net/@forum_insert_noprevisu
* @return bool
*/
function forum_insert_noprevisu(){
// simuler une action venant de l'espace public
// pour se conformer au cas general.
set_request('action', 'ajout_forum');
// Creer une session s'il n'y en a pas (cas du postage sans cookie)
$securiser_action = charger_fonction('securiser_action', 'inc');
$arg = $securiser_action();
$file = _DIR_TMP ."forum_" . preg_replace('/[^0-9]/', '', $arg) .".lck";
if (!file_exists($file)) {
# ne pas tracer cette erreur, peut etre due a un double POST
# tracer_erreur_forum('session absente');
return true;
}
unlink($file);
// antispam : si le champ au nom aleatoire verif_$hash n'est pas 'ok'
// on meurt
if (_request('verif_'._request('hash')) != 'ok') {
tracer_erreur_forum('champ verif manquant');
return true;
}
return false;
}
/**
* recuperer tous les objets dont on veut pouvoir obtenir l'identifiant
* directement dans l'environnement
*
* @return array
*/
function forum_get_objets_depuis_env() {
static $objets = null;
if ($objets === null) {
// on met une cle (le type d'objet) pour qu'un appel du pipeline
// puisse facilement soustraire un objet qu'il ne veut pas avec
// unset($objets['rubrique']) par exemple.
$objets = pipeline('forum_objets_depuis_env', array(
'article' => id_table_objet('article'),
'rubrique' => id_table_objet('rubrique'),
'site' => id_table_objet('site'),
'breve' => id_table_objet('breve')
));
asort($objets);
}
return $objets;
}
// http://code.spip.net/@reduce_strlen
function reduce_strlen($n, $c)
{
return $n - (is_string($c) ? strlen($c) : 0);
}
?>