spip_nursit/ecrire/action/editer_objet.php
2023-06-01 17:30:12 +02:00

500 lines
14 KiB
PHP

<?php
/***************************************************************************\
* SPIP, Systeme de publication pour l'internet *
* *
* Copyright (c) 2001-2019 *
* 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. *
\***************************************************************************/
/**
* Gestion générique de modification des objets éditoriaux
*
* @package SPIP\Core\Edition
*/
if (!defined('_ECRIRE_INC_VERSION')) {
return;
}
/**
* Point d'entrée d'édition d'un objet
*
* On ne peut entrer que par un appel en fournissant $id et $objet
* ou avec un argument d'action sécurisée de type "objet/id"
*
* @param int $id
* @param string $objet
* @param array $set
* @return array
*/
function action_editer_objet_dist($id = null, $objet = null, $set = null) {
// appel direct depuis une url avec arg = "objet/id"
if (is_null($id) or is_null($objet)) {
$securiser_action = charger_fonction('securiser_action', 'inc');
$arg = $securiser_action();
list($objet, $id) = array_pad(explode("/", $arg, 2), 2, null);
}
// appel incorrect ou depuis une url erronnée interdit
if (is_null($id) or is_null($objet)) {
include_spip('inc/minipres');
echo minipres(_T('info_acces_interdit'));
die();
}
// si id n'est pas un nombre, c'est une creation
// mais on verifie qu'on a toutes les donnees qu'il faut.
if (!$id = intval($id)) {
// on ne sait pas si un parent existe mais on essaye
$id_parent = _request('id_parent');
$id = objet_inserer($objet, $id_parent);
}
if (!($id = intval($id)) > 0) {
return array($id, _L('echec enregistrement en base'));
}
// Enregistre l'envoi dans la BD
$err = objet_modifier($objet, $id, $set);
return array($id, $err);
}
/**
* Appelle toutes les fonctions de modification d'un objet
* $err est un message d'erreur eventuelle
*
* @param string $objet
* @param int $id
* @param array|null $set
* @return mixed|string
*/
function objet_modifier($objet, $id, $set = null) {
if (include_spip('action/editer_' . $objet)
and function_exists($modifier = $objet . "_modifier")
) {
return $modifier($id, $set);
}
$table_sql = table_objet_sql($objet);
$trouver_table = charger_fonction('trouver_table', 'base');
$desc = $trouver_table($table_sql);
if (!$desc or !isset($desc['field'])) {
spip_log("Objet $objet inconnu dans objet_modifier", _LOG_ERREUR);
return _L("Erreur objet $objet inconnu");
}
include_spip('inc/modifier');
$champ_date = '';
if (isset($desc['date']) and $desc['date']) {
$champ_date = $desc['date'];
} elseif (isset($desc['field']['date'])) {
$champ_date = 'date';
}
$white = array_keys($desc['field']);
// on ne traite pas la cle primaire par defaut, notamment car
// sur une creation, id_x vaut 'oui', et serait enregistre en id_x=0 dans la base
$white = array_diff($white, array($desc['key']['PRIMARY KEY']));
if (isset($desc['champs_editables']) and is_array($desc['champs_editables'])) {
$white = $desc['champs_editables'];
}
$c = collecter_requests(
// white list
$white,
// black list
array($champ_date, 'statut', 'id_parent', 'id_secteur'),
// donnees eventuellement fournies
$set
);
// Si l'objet est publie, invalider les caches et demander sa reindexation
if (objet_test_si_publie($objet, $id)) {
$invalideur = "id='$objet/$id'";
$indexation = true;
} else {
$invalideur = "";
$indexation = false;
}
if ($err = objet_modifier_champs($objet, $id,
array(
'data' => $set,
'nonvide' => '',
'invalideur' => $invalideur,
'indexation' => $indexation,
// champ a mettre a date('Y-m-d H:i:s') s'il y a modif
'date_modif' => (isset($desc['field']['date_modif']) ? 'date_modif' : '')
),
$c)
) {
return $err;
}
// Modification de statut, changement de rubrique ?
// FIXME: Ici lorsqu'un $set est passé, la fonction collecter_requests() retourne tout
// le tableau $set hors black liste, mais du coup on a possiblement des champs en trop.
$c = collecter_requests(array($champ_date, 'statut', 'id_parent'), array(), $set);
$err = objet_instituer($objet, $id, $c);
return $err;
}
/**
* Insere en base un objet generique
*
* @param string $objet
* @param int $id_parent
* @param array|null $set
* @global array $GLOBALS ['visiteur_session']
* @global array $GLOBALS ['meta']
* @global string $GLOBALS ['spip_lang']
* @return bool|int
*/
function objet_inserer($objet, $id_parent = null, $set = null) {
if (include_spip('action/editer_' . $objet)
and function_exists($inserer = $objet . "_inserer")
) {
return $inserer($id_parent, $set);
}
$table_sql = table_objet_sql($objet);
$trouver_table = charger_fonction('trouver_table', 'base');
$desc = $trouver_table($table_sql);
if (!$desc or !isset($desc['field'])) {
return 0;
}
$lang_rub = "";
$champs = array();
if (isset($desc['field']['id_rubrique'])) {
// Si id_rubrique vaut 0 ou n'est pas definie, creer l'objet
// dans la premiere rubrique racine
if (!$id_rubrique = intval($id_parent)) {
$row = sql_fetsel("id_rubrique, id_secteur, lang", "spip_rubriques", "id_parent=0", '', '0+titre,titre', "1");
$id_rubrique = $row['id_rubrique'];
} else {
$row = sql_fetsel("lang, id_secteur", "spip_rubriques", "id_rubrique=" . intval($id_rubrique));
}
$champs['id_rubrique'] = $id_rubrique;
if (isset($desc['field']['id_secteur'])) {
$champs['id_secteur'] = $row['id_secteur'];
}
$lang_rub = $row['lang'];
}
// La langue a la creation : si les liens de traduction sont autorises
// dans les rubriques, on essaie avec la langue de l'auteur,
// ou a defaut celle de la rubrique
// Sinon c'est la langue de la rubrique qui est choisie + heritee
if (isset($desc['field']['lang']) and !empty($GLOBALS['meta']['multi_objets']) and in_array($table_sql,
explode(',', $GLOBALS['meta']['multi_objets']))
) {
lang_select($GLOBALS['visiteur_session']['lang']);
if (in_array($GLOBALS['spip_lang'],
explode(',', $GLOBALS['meta']['langues_multilingue']))) {
$champs['lang'] = $GLOBALS['spip_lang'];
if (isset($desc['field']['langue_choisie'])) {
$champs['langue_choisie'] = 'oui';
}
}
} elseif (isset($desc['field']['lang']) and isset($desc['field']['langue_choisie'])) {
$champs['lang'] = ($lang_rub ? $lang_rub : $GLOBALS['meta']['langue_site']);
$champs['langue_choisie'] = 'non';
}
if (isset($desc['field']['statut'])) {
if (isset($desc['statut_textes_instituer'])) {
$cles_statut = array_keys($desc['statut_textes_instituer']);
$champs['statut'] = reset($cles_statut);
} else {
$champs['statut'] = 'prepa';
}
}
if ((isset($desc['date']) and $d = $desc['date']) or isset($desc['field'][$d = 'date'])) {
$champs[$d] = date('Y-m-d H:i:s');
}
if ($set) {
$champs = array_merge($champs, $set);
}
// Envoyer aux plugins
$champs = pipeline('pre_insertion',
array(
'args' => array(
'table' => $table_sql,
'id_parent' => $id_parent,
),
'data' => $champs
)
);
$id = sql_insertq($table_sql, $champs);
if ($id) {
// controler si le serveur n'a pas renvoye une erreur
// et associer l'auteur sinon
// si la table n'a pas deja un champ id_auteur
// et si le form n'a pas poste un id_auteur (meme vide, ce qui sert a annuler cette auto association)
if ($id > 0
and !isset($desc['field']['id_auteur'])
) {
$id_auteur = ((is_null(_request('id_auteur')) and isset($GLOBALS['visiteur_session']['id_auteur'])) ?
$GLOBALS['visiteur_session']['id_auteur']
: _request('id_auteur'));
if ($id_auteur) {
include_spip('action/editer_auteur');
auteur_associer($id_auteur, array($objet => $id));
}
}
pipeline('post_insertion',
array(
'args' => array(
'table' => $table_sql,
'id_parent' => $id_parent,
'id_objet' => $id,
),
'data' => $champs
)
);
}
return $id;
}
/**
* Modifie le statut et/ou la date d'un objet
*
* @param string $objet
* @param int $id
* @param array $c
* $c est un array ('statut', 'id_parent' = changement de rubrique)
* statut et rubrique sont lies, car un admin restreint peut deplacer
* un objet publie vers une rubrique qu'il n'administre pas
* @param bool $calcul_rub
* @return string
*/
function objet_instituer($objet, $id, $c, $calcul_rub = true) {
if (include_spip('action/editer_' . $objet)
and function_exists($instituer = $objet . "_instituer")
) {
return $instituer($id, $c, $calcul_rub);
}
$table_sql = table_objet_sql($objet);
$trouver_table = charger_fonction('trouver_table', 'base');
$desc = $trouver_table($table_sql);
if (!$desc or !isset($desc['field'])) {
return _L("Impossible d'instituer $objet : non connu en base");
}
include_spip('inc/autoriser');
include_spip('inc/rubriques');
include_spip('inc/modifier');
$sel = array();
$sel[] = (isset($desc['field']['statut']) ? "statut" : "'' as statut");
$champ_date = '';
if (isset($desc['date']) and $desc['date']) {
$champ_date = $desc['date'];
} elseif (isset($desc['field']['date'])) {
$champ_date = 'date';
}
$sel[] = ($champ_date ? "$champ_date as date" : "'' as date");
$sel[] = (isset($desc['field']['id_rubrique']) ? 'id_rubrique' : "0 as id_rubrique");
$row = sql_fetsel($sel, $table_sql, id_table_objet($objet) . '=' . intval($id));
$id_rubrique = $row['id_rubrique'];
$statut_ancien = $statut = $row['statut'];
$date_ancienne = $date = $row['date'];
$champs = array();
$d = ($date and isset($c[$champ_date])) ? $c[$champ_date] : null;
$s = (isset($desc['field']['statut']) and isset($c['statut'])) ? $c['statut'] : $statut;
// cf autorisations dans inc/instituer_objet
if ($s != $statut or ($d and $d != $date)) {
if ($id_rubrique ?
autoriser('publierdans', 'rubrique', $id_rubrique)
:
autoriser('instituer', $objet, $id, null, array('statut' => $s))
) {
$statut = $champs['statut'] = $s;
} else {
if ($s != 'publie' and autoriser('modifier', $objet, $id)) {
$statut = $champs['statut'] = $s;
} else {
spip_log("editer_objet $id refus " . join(' ', $c));
}
}
// En cas de publication, fixer la date a "maintenant"
// sauf si $c commande autre chose
// ou si l'objet est deja date dans le futur
// En cas de proposition d'un objet (mais pas depublication), idem
if ($champ_date) {
if ($champs['statut'] == 'publie'
or ($champs['statut'] == 'prop' and !in_array($statut_ancien, array('publie', 'prop')))
or $d
) {
if ($d or strtotime($d = $date) > time()) {
$champs[$champ_date] = $date = $d;
} else {
$champs[$champ_date] = $date = date('Y-m-d H:i:s');
}
}
}
}
// Verifier que la rubrique demandee existe et est differente
// de la rubrique actuelle
if ($id_rubrique
and isset($c['id_parent'])
and $id_parent = $c['id_parent']
and $id_parent != $id_rubrique
and (sql_fetsel('1', "spip_rubriques", "id_rubrique=" . intval($id_parent)))
) {
$champs['id_rubrique'] = $id_parent;
// si l'objet etait publie
// et que le demandeur n'est pas admin de la rubrique
// repasser l'objet en statut 'propose'.
if ($statut == 'publie'
and !autoriser('publierdans', 'rubrique', $id_rubrique)
) {
$champs['statut'] = 'prop';
}
}
// Envoyer aux plugins
$champs = pipeline('pre_edition',
array(
'args' => array(
'table' => $table_sql,
'id_objet' => $id,
'action' => 'instituer',
'statut_ancien' => $statut_ancien,
'date_ancienne' => $date_ancienne,
'id_parent_ancien' => $id_rubrique,
),
'data' => $champs
)
);
if (!count($champs)) {
return '';
}
// Envoyer les modifs.
objet_editer_heritage($objet, $id, $id_rubrique, $statut_ancien, $champs, $calcul_rub);
// Invalider les caches
include_spip('inc/invalideur');
suivre_invalideur("id='$objet/$id'");
/*
if ($date) {
$t = strtotime($date);
$p = @$GLOBALS['meta']['date_prochain_postdate'];
if ($t > time() AND (!$p OR ($t < $p))) {
ecrire_meta('date_prochain_postdate', $t);
}
}*/
// Pipeline
pipeline('post_edition',
array(
'args' => array(
'table' => $table_sql,
'id_objet' => $id,
'action' => 'instituer',
'statut_ancien' => $statut_ancien,
'date_ancienne' => $date_ancienne,
'id_parent_ancien' => $id_rubrique,
),
'data' => $champs
)
);
// Notifications
if ($notifications = charger_fonction('notifications', 'inc')) {
$notifications("instituer$objet", $id,
array('statut' => $statut, 'statut_ancien' => $statut_ancien, 'date' => $date, 'date_ancienne' => $date_ancienne)
);
}
return ''; // pas d'erreur
}
/**
* Fabrique la requete d'institution de l'objet, avec champs herites
*
* @param string $objet
* @param int $id
* @param int $id_rubrique
* @param string $statut
* @param array $champs
* @param bool $cond
* @return void
*/
function objet_editer_heritage($objet, $id, $id_rubrique, $statut, $champs, $cond = true) {
$table_sql = table_objet_sql($objet);
$trouver_table = charger_fonction('trouver_table', 'base');
$desc = $trouver_table($table_sql);
// Si on deplace l'objet
// changer aussi son secteur et sa langue (si heritee)
if (isset($champs['id_rubrique'])) {
$row_rub = sql_fetsel("id_secteur, lang", "spip_rubriques", "id_rubrique=" . sql_quote($champs['id_rubrique']));
$langue = $row_rub['lang'];
if (isset($desc['field']['id_secteur'])) {
$champs['id_secteur'] = $row_rub['id_secteur'];
}
if (isset($desc['field']['lang']) and isset($desc['field']['langue_choisie'])) {
if (sql_fetsel('1', $table_sql,
id_table_objet($objet) . "=" . intval($id) . " AND langue_choisie<>'oui' AND lang<>" . sql_quote($langue))) {
$champs['lang'] = $langue;
}
}
}
if (!$champs) {
return;
}
sql_updateq($table_sql, $champs, id_table_objet($objet) . '=' . intval($id));
// Changer le statut des rubriques concernees
if ($cond) {
include_spip('inc/rubriques');
//$postdate = ($GLOBALS['meta']["post_dates"] == "non" AND isset($champs['date']) AND (strtotime($champs['date']) < time()))?$champs['date']:false;
$postdate = false;
// On rajoute les infos de l'objet
$infos = array(
'objet' => $objet,
'id_objet' => $id,
'statut_ancien' => $statut,
);
calculer_rubriques_if($id_rubrique, $champs, $infos, $postdate);
}
}