263 lines
9.6 KiB
PHP
263 lines
9.6 KiB
PHP
|
<?php
|
||
|
|
/*
|
||
|
|
* Plugin Couteau Kiss
|
||
|
|
* (c) 2010 Cedric Morin
|
||
|
|
* Distribue sous licence GPL
|
||
|
|
*
|
||
|
|
*/
|
||
|
|
|
||
|
|
if (!defined("_ECRIRE_INC_VERSION")) return;
|
||
|
|
|
||
|
|
include_spip('public/interfaces');
|
||
|
|
include_spip('inc/presenter_liste');
|
||
|
|
|
||
|
|
function ck_rtrim_dir($d){
|
||
|
|
return rtrim($d,'/');
|
||
|
|
}
|
||
|
|
function ck_recupere_dossier_squelette($d,$raw=false){
|
||
|
|
$squelettes = $d;
|
||
|
|
$squelettes = explode(':',$squelettes);
|
||
|
|
$squelettes = array_map('ck_rtrim_dir',$squelettes);
|
||
|
|
$squelettes = array_diff($squelettes,array('squelettes',''));
|
||
|
|
$squelettes = array_unique($squelettes);
|
||
|
|
if (isset($GLOBALS['dossier_squelettes_sav'])){
|
||
|
|
$squelettes = array_diff($squelettes,explode(":",$GLOBALS['dossier_squelettes_sav']));
|
||
|
|
}
|
||
|
|
if ($raw)
|
||
|
|
return implode(':',$squelettes);
|
||
|
|
array_push($squelettes, 'squelettes');
|
||
|
|
$squelettes = implode(':',$squelettes);
|
||
|
|
return $squelettes;
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* Produire le fichier PHP et une copie en meta
|
||
|
|
*
|
||
|
|
* @param string $code
|
||
|
|
* @return string
|
||
|
|
*/
|
||
|
|
function ck_produire_options($code){
|
||
|
|
// appliquer et verifier que ca ne plante pas !
|
||
|
|
eval($code);
|
||
|
|
|
||
|
|
// et enregistrer dans le fichier le cas echeant
|
||
|
|
$file = _DIR_TMP."ck_options.php";
|
||
|
|
ecrire_fichier($file, "<"."?php\n$code\n");
|
||
|
|
|
||
|
|
// sauvegarder dans une meta pour recuperer les options apres vidage de tmp/
|
||
|
|
include_spip('inc/meta');
|
||
|
|
ecrire_meta('ck_options',$code);
|
||
|
|
return $file;
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* Verifier l'existence du fichier PHP, et sinon le restaurer avec la copie en meta
|
||
|
|
*/
|
||
|
|
function ck_verifier_options($init = false){
|
||
|
|
if (!file_exists($f=((defined('_ROOT_CWD')?_ROOT_CWD:'')._DIR_TMP."ck_options.php"))
|
||
|
|
AND
|
||
|
|
($init OR isset($GLOBALS['meta']['ck_options']))) {
|
||
|
|
// vider la meta auparavant, au cas ou le code php serait corrompu
|
||
|
|
// si le code est valide, il sera remis dans la meta
|
||
|
|
if (isset($GLOBALS['meta']['ck_options'])){
|
||
|
|
$code = $GLOBALS['meta']['ck_options'];
|
||
|
|
include_spip('inc/meta');
|
||
|
|
effacer_meta('ck_options');
|
||
|
|
}
|
||
|
|
elseif($init){
|
||
|
|
$c = formulaires_configurer_ck_charger_dist();
|
||
|
|
$code = ck_produire_code($c);
|
||
|
|
}
|
||
|
|
ck_produire_options($code);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* Produire le code a partir d'un tableau ou des requests
|
||
|
|
* @param array|null $c
|
||
|
|
* @return string
|
||
|
|
*/
|
||
|
|
function ck_produire_code($c=null){
|
||
|
|
$code = "";
|
||
|
|
// backuper un eventuel dossier_squelettes en dur pour ne pas le doublonner dans la config
|
||
|
|
$code .= "if (isset(\$GLOBALS['dossier_squelettes'])) \$GLOBALS['dossier_squelettes_sav']=\$GLOBALS['dossier_squelettes'];\n";
|
||
|
|
if ($d = _request('dossier_squelettes',$c)){
|
||
|
|
$d = ck_recupere_dossier_squelette($d,true);
|
||
|
|
// ne pas ecraser la globale avec une valeur vide, ca ne sert a rien
|
||
|
|
// de plus on concatene
|
||
|
|
if ($d){
|
||
|
|
$value = addslashes($d);
|
||
|
|
$code .= "\$GLOBALS['dossier_squelettes'] = (isset(\$GLOBALS['dossier_squelettes'])?rtrim(\$GLOBALS['dossier_squelettes'],':').':':'').'$value';\n";
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
// pas la peine en SPIP 3 : c'est pas defaut
|
||
|
|
if (intval($GLOBALS['spip_version_branche'])<3
|
||
|
|
AND _request('supprimer_numero',$c)){
|
||
|
|
$code .= "\$GLOBALS['table_des_traitements']['TITRE'][]= 'typo(supprimer_numero(%s), \"TYPO\", \$connect)';\n";
|
||
|
|
$code .= "\$GLOBALS['table_des_traitements']['NOM'][]= 'typo(supprimer_numero(%s), \"TYPO\", \$connect)';\n";
|
||
|
|
}
|
||
|
|
|
||
|
|
$code .= ck_code_globale('toujours_paragrapher',_request('toujours_paragrapher',$c)?'true':'false');
|
||
|
|
|
||
|
|
// on ne surcharge autobr uniquement si inhibe
|
||
|
|
if(_request('no_autobr',$c))
|
||
|
|
$code .= ck_code_constante('_AUTOBR',"''");
|
||
|
|
|
||
|
|
$code .= ck_code_globale('forcer_lang',_request('forcer_lang',$c)?'true':'false');
|
||
|
|
if ($v = _request('no_set_html_base',$c) OR (defined('_SET_HTML_BASE') and ($v=!_SET_HTML_BASE))){
|
||
|
|
$code .= ck_code_constante('_SET_HTML_BASE',$v?'false':'true');
|
||
|
|
}
|
||
|
|
if (_request($s=_request('introduction_suite',$c)))
|
||
|
|
$code .= ck_code_constante('_INTRODUCTION_SUITE',"'".addslashes($s)."'");
|
||
|
|
|
||
|
|
|
||
|
|
// cache
|
||
|
|
if (strlen($cs = _request('cache_strategie',$c))){
|
||
|
|
if ($cs==-1) $code .= "if (\$_SERVER['REQUEST_TIME']<".(time()+24*3600).") ";
|
||
|
|
$code .= ck_code_constante('_NO_CACHE',intval($cs));
|
||
|
|
}
|
||
|
|
|
||
|
|
$code .= ck_code_globale('derniere_modif_invalide',_request('derniere_modif_invalide',$c)?'true':'false');
|
||
|
|
$code .= ck_code_constante('_DUREE_CACHE_DEFAUT',intval(_request('cache_duree',$c)));
|
||
|
|
$code .= ck_code_constante('_DELAI_CACHE_resultats',intval(_request('cache_duree_recherche',$c)));
|
||
|
|
|
||
|
|
// quota_cache disparait a partir de SPIP 3.3
|
||
|
|
if (!defined('_SPIP_VERSION_ID') or _SPIP_VERSION_ID<30300) {
|
||
|
|
$code .= ck_code_globale('quota_cache',intval(_request('cache_taille',$c)));
|
||
|
|
}
|
||
|
|
|
||
|
|
// taille des logo et images
|
||
|
|
if ($t = _request('image_seuil_document',$c) and $t!=='_LARGEUR_MODE_IMAGE')
|
||
|
|
$code .= ck_code_constante('_LARGEUR_MODE_IMAGE',intval($t));
|
||
|
|
if ($t = _request('logo_max_size',$c) and $t!=='_LOGO_MAX_SIZE')
|
||
|
|
$code .= ck_code_constante('_LOGO_MAX_SIZE',intval($t));
|
||
|
|
if ($t = _request('logo_max_width',$c) and $t!=='_LOGO_MAX_WIDTH')
|
||
|
|
$code .= ck_code_constante('_LOGO_MAX_WIDTH',intval($t));
|
||
|
|
if ($t = _request('logo_max_height',$c) and $t!=='_LOGO_MAX_HEIGHT')
|
||
|
|
$code .= ck_code_constante('_LOGO_MAX_HEIGHT',intval($t));
|
||
|
|
if ($t = _request('docs_max_size',$c) and $t!=='_DOC_MAX_SIZE')
|
||
|
|
$code .= ck_code_constante('_DOC_MAX_SIZE',intval($t));
|
||
|
|
if ($t = _request('imgs_max_size',$c) and $t!=='_IMG_MAX_SIZE')
|
||
|
|
$code .= ck_code_constante('_IMG_MAX_SIZE',intval($t));
|
||
|
|
if ($t = _request('imgs_max_width',$c) and $t!=='_IMG_MAX_WIDTH')
|
||
|
|
$code .= ck_code_constante('_IMG_MAX_WIDTH',intval($t));
|
||
|
|
if ($t = _request('imgs_max_height',$c) and $t!=='_IMG_MAX_HEIGHT')
|
||
|
|
$code .= ck_code_constante('_IMG_MAX_HEIGHT',intval($t));
|
||
|
|
|
||
|
|
|
||
|
|
// ecrire
|
||
|
|
if ($t = _request('longueur_login_mini',$c))
|
||
|
|
$code .= ck_code_constante('_LOGIN_TROP_COURT',intval($t)-1);
|
||
|
|
if ($t = _request('nb_objets_tranches',$c) and $t!=='_TRANCHES')
|
||
|
|
$code .= ck_code_constante('_TRANCHES',intval($t));
|
||
|
|
if (!$t = _request('compacte_head_ecrire',$c))
|
||
|
|
$code .= ck_code_constante('_INTERDIRE_COMPACTE_HEAD_ECRIRE','true');
|
||
|
|
if (!$t = _request('inhiber_javascript_ecrire',$c))
|
||
|
|
$code .= ck_code_globale('filtrer_javascript',1);
|
||
|
|
|
||
|
|
return $code;
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
*
|
||
|
|
* @return array
|
||
|
|
*/
|
||
|
|
function formulaires_configurer_ck_charger_dist(){
|
||
|
|
ck_verifier_options();
|
||
|
|
$valeurs = array(
|
||
|
|
'_dossier_squelettes_sav' => isset($GLOBALS['dossier_squelettes_sav'])?$GLOBALS['dossier_squelettes_sav']:'',
|
||
|
|
'dossier_squelettes' => ck_recupere_dossier_squelette($GLOBALS['dossier_squelettes']),
|
||
|
|
'supprimer_numero' => preg_match(",supprimer_numero,",reset($GLOBALS['table_des_traitements']['TITRE']))?1:0,
|
||
|
|
'toujours_paragrapher' => $GLOBALS['toujours_paragrapher']?1:0,
|
||
|
|
'no_set_html_base' => defined('_SET_HTML_BASE')?(_SET_HTML_BASE==false):0,
|
||
|
|
'introduction_suite' => defined('_INTRODUCTION_SUITE')?_INTRODUCTION_SUITE:'',
|
||
|
|
'no_autobr' => defined('_AUTOBR')?(_AUTOBR?false:true):false,
|
||
|
|
|
||
|
|
'cache_strategie' => (defined('_NO_CACHE') AND strlen(_NO_CACHE))?(_NO_CACHE==0?0:-1):'',
|
||
|
|
'derniere_modif_invalide' => $GLOBALS['derniere_modif_invalide'],
|
||
|
|
'cache_duree' => defined('_DUREE_CACHE_DEFAUT')?_DUREE_CACHE_DEFAUT:24*3600,
|
||
|
|
'cache_duree_recherche' => defined('_DELAI_CACHE_resultats')?_DELAI_CACHE_resultats:600,
|
||
|
|
'cache_taille' => isset($GLOBALS['quota_cache']) ? $GLOBALS['quota_cache'] : '',
|
||
|
|
|
||
|
|
'image_seuil_document' => defined('_LARGEUR_MODE_IMAGE')?_LARGEUR_MODE_IMAGE:'',
|
||
|
|
'logo_max_size' => defined('_LOGO_MAX_SIZE')?_LOGO_MAX_SIZE:'',
|
||
|
|
'logo_max_width' => defined('_LOGO_MAX_WIDTH')?_LOGO_MAX_WIDTH:'',
|
||
|
|
'logo_max_height' => defined('_LOGO_MAX_HEIGHT')?_LOGO_MAX_HEIGHT:'',
|
||
|
|
'docs_max_size' => defined('_DOC_MAX_SIZE')?_DOC_MAX_SIZE:'',
|
||
|
|
'imgs_max_size' => defined('_IMG_MAX_SIZE')?_IMG_MAX_SIZE:'',
|
||
|
|
'imgs_max_width' => defined('_IMG_MAX_WIDTH')?_IMG_MAX_WIDTH:'',
|
||
|
|
'imgs_max_height' => defined('_IMG_MAX_HEIGHT')?_IMG_MAX_HEIGHT:'',
|
||
|
|
|
||
|
|
'longueur_login_mini' => _LOGIN_TROP_COURT+1,
|
||
|
|
'nb_objets_tranches' => defined('_TRANCHES')?_TRANCHES:'',
|
||
|
|
'compacte_head_ecrire' => defined('_INTERDIRE_COMPACTE_HEAD_ECRIRE')?(_INTERDIRE_COMPACTE_HEAD_ECRIRE?0:1):1,
|
||
|
|
'inhiber_javascript_ecrire' => $GLOBALS['filtrer_javascript']==1?0:1,
|
||
|
|
|
||
|
|
);
|
||
|
|
if (defined('_SPIP_VERSION_ID') and _SPIP_VERSION_ID>=30300) {
|
||
|
|
$valeurs['_no_quota_cache'] = 1;
|
||
|
|
}
|
||
|
|
|
||
|
|
// forcer_lang est toujours true dans le prive donc on est oblige de reinclure le fichier ck_option pour savoir ce que ça vaut, et si le fichier n'existe pas on laisse decoche
|
||
|
|
if (file_exists($f=((defined('_ROOT_CWD')?_ROOT_CWD:'')._DIR_TMP."ck_options.php"))) {
|
||
|
|
include $f;
|
||
|
|
$valeurs['forcer_lang'] = (!empty($GLOBALS['forcer_lang']) and $GLOBALS['forcer_lang'] and $GLOBALS['forcer_lang']!=='non')?1:0;
|
||
|
|
}
|
||
|
|
else {
|
||
|
|
// si on ne sait pas on mets 0
|
||
|
|
$valeurs['forcer_lang'] = 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
return $valeurs;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
function formulaires_configurer_ck_verifier_dist(){
|
||
|
|
$erreurs = array();
|
||
|
|
$cache_strategie = _request('cache_strategie');
|
||
|
|
if ($cache_strategie!=-1){
|
||
|
|
// quota_cache disparait a partir de SPIP 3.3
|
||
|
|
if (!defined('_SPIP_VERSION_ID') or _SPIP_VERSION_ID<30300){
|
||
|
|
if (!$t = _request('cache_taille')
|
||
|
|
OR !$t = intval($t)
|
||
|
|
OR $t<10){
|
||
|
|
$erreurs['cache_taille'] = _T('ck:erreur_cache_taille_mini');
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
if ($d = _request('dossier_squelettes')){
|
||
|
|
$d = explode(":",$d);
|
||
|
|
foreach($d as $s){
|
||
|
|
$s = trim($s);
|
||
|
|
if (strncmp($s,"/",1)==0 OR strpos($s,"../")!==false)
|
||
|
|
$erreurs['dossier_squelettes'] = _T('ck:erreur_dossier_squelette_invalide');
|
||
|
|
}
|
||
|
|
}
|
||
|
|
return $erreurs;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
function ck_code_constante($name,$value){
|
||
|
|
return "if (!defined('$name')) define('$name',$value);\n";
|
||
|
|
}
|
||
|
|
function ck_code_globale($name,$value){
|
||
|
|
return "\$GLOBALS['$name']=$value;\n";
|
||
|
|
}
|
||
|
|
|
||
|
|
function formulaires_configurer_ck_traiter_dist(){
|
||
|
|
|
||
|
|
$code = ck_produire_code();
|
||
|
|
$file = ck_produire_options($code);
|
||
|
|
|
||
|
|
// on relance le hit via un refuser
|
||
|
|
refuser_traiter_formulaire_ajax();
|
||
|
|
|
||
|
|
// ne pas reinjecter dans la saisie
|
||
|
|
set_request('dossier_squelettes');
|
||
|
|
|
||
|
|
$res = array('editable'=>true,'message_ok'=>_T('ck:message_ok',array('file'=>joli_repertoire($file))));
|
||
|
|
return $res;
|
||
|
|
}
|
||
|
|
|