<?php

/* inserer le css et le js externes pour Crayons dans le <head>
 *
 *  Crayons plugin for spip (c) Fil, toggg 2006-2007 -- licence GPL
 */

# mettre a true dans mes_options pour avoir les crayons non compresses
@define('_DEBUG_CRAYONS', false);

// Dire rapidement si ca vaut le coup de chercher des droits
function analyse_droits_rapide_dist() {
    return isset($GLOBALS['auteur_session']['statut']);
}

// Le pipeline header_prive (pour y tester les crayons)
function Crayons_insert_head($head) {
    include_spip('cfg_options');

    //par défaut, pas de traitement sur les entetes
    $res = $head;
    
    //vérifie la présence de cfg, si pas de cfg on cherche meme pas à faire de l'espace privé
    if (!function_exists('lire_config')) {
        return $res;
    }
    
    
    //vérifie que l'éditiojn de l'espace privé est autorisé
    if (lire_config('crayons/espaceprive') == 'on') {
        //determine les pages (exec) crayonnables
        if (in_array(_request('exec'), explode(',',lire_config('crayons/exec_autorise')))) {
            //Calcul des droits
            include_spip('inc/crayons');
            $res = Crayons_preparer_page($head, '*', wdgcfg(), 'head');
        } 
    }
    
    //retourne l'entete modifiée
    return $res;
        
    /*
    // Est-on autorise ?
    include_spip('inc/autoriser');
    switch (_request('exec')) {
        case 'articles':
            $droits = autoriser('modifier', 'article', _request('id_article'));
            break;

        default:
            $droits=false;
    }

    if (!$droits)
        return $head;
    */

}

// Le pipeline affichage_final, execute a chaque hit sur toute la page
function &Crayons_affichage_final(&$page) {

    // ne pas se fatiguer si le visiteur n'a aucun droit
    if (!(function_exists('analyse_droits_rapide')?analyse_droits_rapide():analyse_droits_rapide_dist()))
        return $page;

    // sinon regarder rapidement si la page a des classes crayon
    if (strpos($page, 'crayon')===FALSE)
        return $page;

    // voir un peu plus precisement lesquelles
    include_spip('inc/crayons');
    if (!preg_match_all(_PREG_CRAYON, $page, $regs, PREG_SET_ORDER))
        return $page;
    $wdgcfg = wdgcfg();

    // calculer les droits sur ces crayons
    include_spip('inc/autoriser');
    $droits = array();
    $droits_accordes = 0;
    foreach ($regs as $reg) {
        list(,$crayon,$type,$champ,$id) = $reg;
        if (autoriser('modifier', $type, $id, NULL, array('champ'=>$champ))) {
            $droits['.' . $crayon]++;
            $droits_accordes ++;
        }
    }
    // et les signaler dans la page
    if ($droits_accordes == count($regs)) // tous les droits
        $page = Crayons_preparer_page($page, '*', $wdgcfg);
    else if ($droits) // seulement certains droits, preciser lesquels
        $page = Crayons_preparer_page($page, join(',',array_keys($droits)), $wdgcfg);

    return $page;
}

function &Crayons_preparer_page(&$page, $droits, $wdgcfg = array(), $mode='page') {
	lang_select($GLOBALS['auteur_session']['lang']);

	$jsFile = generer_url_public('crayons.js');
	if (_DEBUG_CRAYONS)
		$jsFile = parametre_url($jsFile,'debug_crayons',1);
	include_spip('inc/filtres'); // rien que pour direction_css() :(
	$cssFile = direction_css(find_in_path('crayons.css'));

	$config = var2js(array(
		'imgPath' => dirname(find_in_path('images/crayon.png')),
		'droits' => $droits,
		'dir_racine' => _DIR_RACINE,
		'self' => self('&'),
		'txt' => array(
			'error' => _U('crayons:svp_copier_coller'),
			'sauvegarder' => $wdgcfg['msgAbandon'] ? _U('crayons:sauvegarder') : ''
		),
		'img' => array(
			'searching' => array(
				'txt' => _U('crayons:veuillez_patienter')
			),
			'crayon' => array(
				'txt' => _U('crayons:editer')
			),
			'edit' => array(
				'txt' => _U('crayons:editer_tout')
			),
			'img-changed' => array(
				'txt' => _U('crayons:deja_modifie')
			)
		),
		'cfg' => $wdgcfg
	));


	$incHead = <<<EOH

<link rel="stylesheet" href="{$cssFile}" type="text/css" media="all" />
<script src="{$jsFile}" type="text/javascript"></script>
<script type="text/javascript"><!--
    var configCrayons = new cQuery.prototype.cfgCrayons({$config});
    ( window.jQuery ? jQuery : cQuery )(document).ready(cQuery.fn.crayonsstart);
    // cQuery.ready() plante le jQuery.ready() sous MSIE
//-->
</script>
EOH;

	if ($mode == 'head')
		return $page . $incHead;

	$pos_head = strpos($page, '</head>');
	if ($pos_head === false)
		return $page;

	return substr_replace($page, $incHead, $pos_head, 0);

}

// #EDIT{ps} pour appeler le crayon ps ;
// si cette fonction est absente, balise_EDIT_dist() met a vide
function balise_EDIT($p) {

	$i_boucle = $p->nom_boucle ? $p->nom_boucle : $p->id_boucle;
	// #EDIT hors boucle ? ne rien faire
	if (!$type = $p->boucles[$i_boucle]->type_requete) {
		$p->code = "''";
		$p->interdire_scripts = false;
		return $p;
	}

	// crayon sur une base distante 'nua:article-intro-5'
	// on ne sait pas encore les gerer, mais au moins on les detecte
	if ($distant = $p->boucles[$i_boucle]->sql_serveur)
		$type = "$distant:$type";

	// le compilateur 1.9.2 ne calcule pas primary pour les tables secondaires
	if (!($primary = $p->boucles[$i_boucle]->primary)) {
		list($nom, $desc) = trouver_def_table(
			$p->boucles[$i_boucle]->type_requete, $p->boucles[$i_boucle]);
		$primary = $desc['key']['PRIMARY KEY'];
	}
	$primary = explode(',',$primary);
	$id = array();
	foreach($primary as $key)
		$id[] = champ_sql(trim($key),$p);
	$primary = implode(".'-'.",$id);
	$p->code = "classe_boucle_crayon('"
		. $type
		."',"
		.sinon(interprete_argument_balise(1,$p),"''")
		.","
		. $primary
		.").' '";
	$p->interdire_scripts = false;
	return $p;
}

function creer_le_crayon($type, $champ, $id) {
	include_spip('inc/crayons');
	include_spip('action/crayons_html');
	$a = affiche_controleur("crayon $type-$champ-$id",
		array('w' => 485, 'h' => 300, 'wh' => 500)
	);
	return $a['$erreur'] ? $a['$erreur'] : $a['$html'];
}

// #CRAYON{ps} pour creer le crayon ps SI ?edit=1;
function balise_CRAYON($p) {

	$i_boucle = $p->nom_boucle ? $p->nom_boucle : $p->id_boucle;
	// #CRAYON hors boucle ? ne rien faire
	if (!$type = $p->boucles[$i_boucle]->type_requete) {
		$p->code = "''";
		$p->interdire_scripts = false;
		return $p;
	}

	// crayon sur une base distante 'nua:article-intro-5'
	// on ne sait pas encore les gerer, mais au moins on les detecte
	if ($distant = $p->boucles[$i_boucle]->sql_serveur)
		$type = "$distant:$type";

	// le compilateur 1.9.2 ne calcule pas primary pour les tables secondaires
	if (!($primary = $p->boucles[$i_boucle]->primary)) {
		list($nom, $desc) = trouver_def_table(
			$p->boucles[$i_boucle]->type_requete, $p->boucles[$i_boucle]);
		$primary = $desc['key']['PRIMARY KEY'];
	}
	$primary = explode(',',$primary);
	$id = array();
	foreach($primary as $key)
		$id[] = champ_sql(trim($key),$p);
	$primary = implode(".'-'.",$id);
	$p->code = "creer_le_crayon('"
		. $type
		."',"
		.sinon(interprete_argument_balise(1,$p),"''")
		.","
		. $primary
		.").' '";
	$p->interdire_scripts = false;
	return $p;
}


// Donne la classe crayon en fonction
// - du type de la boucle
// (attention aux exceptions pour #EDIT dans les boucles HIERARCHIE et SITES)
// - du champ demande (vide, + ou se terminant par + : (+)classe type--id)
// - de l'id courant
function classe_boucle_crayon($type, $champ, $id) {
	$type = $type[strlen($type) - 1] == 's' ?
			substr($type, 0, -1) : 
			str_replace(
				array('hierarchie', 'syndication'),
				array('rubrique',   'site'),
				$type);

	$plus = (substr($champ, -1) == '+' AND $champ = substr($champ, 0, -1))
		? " $type--$id"
		: '';

	return 'crayon ' . $type . '-' . $champ . '-' . $id . $plus;
}

?>