Subversion Repositories Applications.papyrus

Rev

Rev 676 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
545 ddelon 1
<?php
581 ddelon 2
/*vim: set expandtab tabstop=4 shiftwidth=4: */
545 ddelon 3
// +------------------------------------------------------------------------------------------------------+
4
// | PHP version 4.1                                                                                      |
5
// +------------------------------------------------------------------------------------------------------+
6
// | Copyright (C) 2005 Tela Botanica (accueil@tela-botanica.org)                                         |
7
// +------------------------------------------------------------------------------------------------------+
8
// | This file is part of Integrateur Wikini.                                                             |
9
// |                                                                                                      |
10
// | Foobar is free software; you can redistribute it and/or modify                                       |
11
// | it under the terms of the GNU General Public License as published by                                 |
12
// | the Free Software Foundation; either version 2 of the License, or                                    |
13
// | (at your option) any later version.                                                                  |
14
// |                                                                                                      |
15
// | Foobar is distributed in the hope that it will be useful,                                            |
16
// | but WITHOUT ANY WARRANTY; without even the implied warranty of                                       |
17
// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the                                        |
18
// | GNU General Public License for more details.                                                         |
19
// |                                                                                                      |
20
// | You should have received a copy of the GNU General Public License                                    |
21
// | along with Foobar; if not, write to the Free Software                                                |
22
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
23
// +------------------------------------------------------------------------------------------------------+
677 ddelon 24
// CVS : $Id: iw_integrateur.fonct.php,v 1.13 2005-12-27 17:25:23 ddelon Exp $
545 ddelon 25
/**
26
* Fonctions de l'integrateur de page Wikini
27
*
28
* Application permettant d'intégrer des pages wikini dans Papyrus.
29
*
30
*@package IntegrateurWikini
31
//Auteur original :
32
*@author        David Delon <david.delon@clapas.net>
33
//Autres auteurs :
34
*@author        Aucun
35
*@copyright     Tela-Botanica 2000-2004
677 ddelon 36
*@version       $Revision: 1.13 $ $Date: 2005-12-27 17:25:23 $
545 ddelon 37
*
38
// +------------------------------------------------------------------------------------------------------+
39
// |                                            ENTETE du PROGRAMME                                       |
40
// +------------------------------------------------------------------------------------------------------+
41
 
42
 
43
 
44
 
45
/** Inclusion de la classe PEAR de gestion des URL. */
46
 
47
$GLOBALS['_PAPYRUS_']['erreur']->setActive(0);
48
 
49
require_once 'Net/URL.php';
50
 
51
// TODO : un seul fichier de configuration ?
52
/** Inclusion du fichier de configuration de cette application.*/
53
require_once 'client/integrateur_wikini/configuration/adwi_configuration.inc.php';
54
 
55
require_once ADWI_CHEMIN_BIBLIOTHEQUE.'adwi_wikini.fonct.php';
56
 
57
/** Inclusion du fichier de configuration général de IntegrateurWikini.*/
58
require_once 'client'.GEN_SEP.'integrateur_wikini'.GEN_SEP.'configuration'.GEN_SEP.'iw_config.inc.php';
59
 
60
/** Inclusion du fichier permettant d'encoder du texte mais pas les balises XHTML.*/
61
require_once IW_CHEMIN_BIBLIO.'iw_encodage.fonct.php';
62
/** Inclusion du fichier permettant d'inclure les données dans du XHTML.*/
63
require_once IW_CHEMIN_BIBLIO.'iw_affichage_xhtml.fonct.php';
64
 
65
global $wikini_config_defaut;
66
global $wiki;
67
global $wiki_p;
68
 
69
// $_REQUEST['wiki'] est obligatoire, car wakka.php envoie un redirect si non detecté, avec perte de tout l'environnement !
70
 
71
if ( ! isset( $_REQUEST['wiki'] ) ) {
72
	    $_REQUEST['wiki'] = $wikini_config_defaut['root_page'];
73
}
74
 
75
$server=$_SERVER['PHP_SELF'];
76
$_SERVER['PHP_SELF']="wakka.php";
77
 
78
// Utilise le wakkaconfig de la racine ...
79
// TODO : un wiki par défaut pour chaque papyrus à l'installation de Papyrus
80
// TODO : verifier bon dimensionnement des champs et clef de la table papyrus_wiki
81
// TODO : creation des tables par defaut à l'installation d'un wikini
82
// TODO : Fusion des fichiers de configuration ?
83
 
84
 
85
ob_start();
86
 
87
include_once IW_CHEMIN_WIKINI_COURANT.'wakka.php';
556 ddelon 88
include_once(IW_CHEMIN_WIKINI_COURANT."/formatters/tableaux.php");
89
include_once(IW_CHEMIN_WIKINI_COURANT."/actions/attach.class.php");
545 ddelon 90
 
91
ob_end_clean();
92
$_SERVER['PHP_SELF']=$server;
93
 
94
 
95
// On surcharge la classe Wiki pour en faire ce qu'on en veut
96
Class Wiki_Papyrus extends Wiki {
581 ddelon 97
 
98
 
545 ddelon 99
	function Header() {
581 ddelon 100
 
545 ddelon 101
		return;
581 ddelon 102
	}
103
 
545 ddelon 104
 	function Footer() {
580 ddelon 105
 		echo  "<div class=\"footer\">";
106
		echo  $this->HasAccess("write") ? "<a href=\"".$this->href("edit")."\" title=\"Cliquez pour modifier cette page.\">Modifier cette page</a> ::\n" : "";
107
		echo  $this->GetPageTime() ? "<a href=\"".$this->href("revisions")."\" title=\"Cliquez pour voir les derni&egrave;res modifications sur cette page.\">".$this->GetPageTime()."</a> ::\n" : "";
108
		// 	if this page exists
109
		if ($this->page)
110
		{
111
		// if owner is current user
112
			if ($this->UserIsOwner())
113
			{
581 ddelon 114
				echo
580 ddelon 115
				"Propri&eacute;taire&nbsp;: vous :: \n",
116
				"<a href=\"",$this->href("acls")."\" title=\"Cliquez pour modifer les permissions de cette page.\">&Eacute;diter permissions</a> :: \n",
117
				"<a href=\"",$this->href("deletepage")."\">Supprimer</a> :: \n";
118
			}
119
			else
120
			{
121
				if ($owner = $this->GetPageOwner())
122
				{
123
					echo "Propri&eacute;taire : ",$this->Format($owner);
124
				}
125
				else
126
				{
127
					echo "Pas de propri&eacute;taire ";
128
					echo ($this->GetUser() ? "(<a href=\"".$this->href("claim")."\">Appropriation</a>)" : "");
129
				}
130
				echo " :: \n";
131
			}
132
		}
133
		echo "Vous &ecirc;tes ";
134
		echo $this->Format($this->GetUserName());
135
		echo "</div>";
581 ddelon 136
 
545 ddelon 137
 	}
581 ddelon 138
 
545 ddelon 139
	function FormOpen($method = "", $tag = "", $formMethod = "post") {
581 ddelon 140
 
141
	// Le diff ne fonctionne pas avec la methode get dans papyrus. On surcharge avec du post.
142
 
545 ddelon 143
		if (($method=="diff") && $formMethod=="get") {
581 ddelon 144
			$formMethod="post";
545 ddelon 145
		}
581 ddelon 146
 
545 ddelon 147
		if ($method=="edit") {
148
            $result = "<form id=\"ACEditor\" name=\"ACEditor\" action=\"".$this->href($method, $tag)."\" method=\"".$formMethod."\">\n";
149
            return $result;
150
		}
581 ddelon 151
 
545 ddelon 152
		return parent::FormOpen($method,$tag, $formMethod);
581 ddelon 153
 
545 ddelon 154
	}
155
	// Detournement des handlers : comme ca on peut faire ce que l'on veut ....
156
	function Method($method) {
581 ddelon 157
 
545 ddelon 158
		if ($method=="edit") {
581 ddelon 159
 
545 ddelon 160
			$result='';
581 ddelon 161
 
545 ddelon 162
			if ($_POST) {
163
				if ($_POST["submit"] == "Sauver")	{
164
				// check for overwriting
165
					if ($this->page) {
166
						if ($this->page["id"] != $_POST["previous"]) {
167
							$error = "ALERTE : ".
168
							"Cette page a &eacute;t&eacute; modifi&eacute;e par quelqu'un d'autre pendant que vous l'&eacute;ditiez.<br />\n".
169
							"Veuillez copier vos changements et r&eacute;&eacute;diter cette page.\n";
170
						}
171
					}
172
					// store
173
					if (!$error) {
174
						$body = str_replace("\r", "", $_POST["body"]);
175
						// test si la nouvelle page est differente de la précédente
176
						if(rtrim($body)==rtrim($this->page["body"])) {
177
							$this->SetMessage("Cette page n\'a pas &eacute;t&eacute; enregistr&eacute;e car elle n\'a subi aucune modification.");
178
							$this->Redirect($this->href());
179
						}
581 ddelon 180
 
545 ddelon 181
						// add page (revisions)
182
						$this->SavePage($this->tag, $body);
581 ddelon 183
 
545 ddelon 184
						// now we render it internally so we can write the updated link table.
185
						$this->ClearLinkTable();
186
						$this->StartLinkTracking();
187
						$dummy = $this->Header();
188
						$dummy .= $this->Format($body);
189
						$dummy .= $this->Footer();
190
						$this->StopLinkTracking();
191
						$this->WriteLinkTable();
192
						$this->ClearLinkTable();
581 ddelon 193
 
545 ddelon 194
						// forward
195
						$this->Redirect($this->href());
196
					}
197
				}
198
			}
199
 
200
			// fetch fields
201
			if (!$previous = $_POST["previous"]) $previous = $this->page["id"];
202
			if (!$body = $_POST["body"]) $body = $this->page["body"];
581 ddelon 203
 
545 ddelon 204
			// preview?
205
			if ($_POST["submit"] == "Aperçu")
206
			{
207
				$result .=
208
					"<div class=\"prev_alert\"><strong>Aper&ccedil;u</strong></div>\n".
209
					$this->Format($body)."\n\n".
210
					$this->FormOpen("edit").
211
					"<input type=\"hidden\" name=\"previous\" value=\"".$previous."\" />\n".
212
					"<input type=\"hidden\" name=\"body\" value=\"".htmlentities($body)."\" />\n".
213
					"<br />\n".
214
					"<input name=\"submit\" type=\"submit\" value=\"Sauver\" accesskey=\"s\" />\n".
215
					"<input name=\"submit\" type=\"submit\" value=\"R&eacute;&eacute;diter \" accesskey=\"p\" />\n".
216
					"<input type=\"button\" value=\"Annulation\" onclick=\"document.location='".$this->href("")."';\" />\n".
217
					$this->FormClose()."\n";
218
				return $result;
219
			}
220
			else
221
			{
581 ddelon 222
 
545 ddelon 223
			    require_once(IW_CHEMIN_BIBLIO_ACEDITOR."ACeditor.buttonsBar.php");
581 ddelon 224
 
545 ddelon 225
				$result .=
226
				$this->FormOpen("edit").
227
				"<input type=\"hidden\" name=\"previous\" value=\"".$previous."\" />\n".$ACbuttonsBar.
228
				"<textarea onkeydown=\"fKeyDown()\" name=\"body\" cols=\"60\" rows=\"40\" wrap=\"soft\" class=\"edit\">\n".
229
				htmlspecialchars($body).
658 florian 230
				"\n</textarea><br />\n".'<div class="boutons_wiki">'.
545 ddelon 231
				($this->config["preview_before_save"] ? "" : "<input name=\"submit\" type=\"submit\" value=\"Sauver\" accesskey=\"s\" />\n").
232
				"<input name=\"submit\" type=\"submit\" value=\"Aper&ccedil;u\" accesskey=\"p\" />\n".
658 florian 233
				"<input type=\"button\" value=\"Annulation\" onclick=\"document.location='".$this->href("")."';\" /></div>\n".
545 ddelon 234
				$this->FormClose();
581 ddelon 235
 
545 ddelon 236
				return $result;
237
			}
581 ddelon 238
 
545 ddelon 239
		}
240
		else {
241
			return parent::Method($method);
242
		}
243
	}
581 ddelon 244
 
245
 
246
	// Surcharge Format a cause probleme de chemin.
247
 
545 ddelon 248
	function Format($text, $formatter = "wakka") {
581 ddelon 249
		return $this->IncludeBuffered(IW_CHEMIN_WIKINI_COURANT_FORMATTER.$formatter.".php", "<i>Impossible de trouver le formateur \"$formatter\"</i>", compact("text"));
545 ddelon 250
	}
581 ddelon 251
 
252
 
253
	// Identification
254
 
584 ddelon 255
	function SetUser($user, $remember) {
256
			// Appel à partir de Papyrus
257
				if ($user=='') {
258
					$remember=1;
596 ddelon 259
					$wiki_prenom=$this->versChatMot($GLOBALS['_GEN_commun']['pear_auth']->getAuthData($GLOBALS['_GEN_commun']['info_auth_bdd']->chp_personne_prenom));
260
					$wiki_nom=$this->versChatMot($GLOBALS['_GEN_commun']['pear_auth']->getAuthData($GLOBALS['_GEN_commun']['info_auth_bdd']->chp_personne_nom));
261
 
586 ddelon 262
					$_SESSION["user"]["name"] = $wiki_prenom.$wiki_nom;
584 ddelon 263
					$_SESSION["user"]["password"] = "wikini";
264
					$_SESSION["user"]["changescount"] = 100;
265
					$this->SetPersistentCookie("name", $user["name"], $remember);
266
					$this->SetPersistentCookie("password", $user["password"], $remember);
267
					$this->SetPersistentCookie("remember", $remember, $remember);
268
				}
269
				else {
270
					parent::Setuser($user,$remember);
271
				}
272
 
580 ddelon 273
	}
581 ddelon 274
 
677 ddelon 275
	function LoadUser($name, $password = 0) {
276
		 return true;
277
	}
278
 
596 ddelon 279
	function LogoutUser() {
280
		$_SESSION["user"]="";
281
		$this->DeleteCookie("remember");
282
		parent::LogoutUser();
283
	}
677 ddelon 284
 
285
 
581 ddelon 286
 
596 ddelon 287
	function versChatMot($entree) {
288
		$sortie = strtolower(trim(strtr($entree, "àâéêèëîïôöùûüç-", "aaeeeeiioouuuc ")));
289
		$sortie = ucwords($sortie);
290
		$sortie = str_replace(" ", "",$sortie);
291
		return $sortie;
292
	}
293
 
545 ddelon 294
}
295
 
581 ddelon 296
 
297
 
545 ddelon 298
// Appel du fichier de traduction des textes de l'application Integrateur Wikini
299
if (file_exists(IW_CHEMIN_LANGUES.'iw_langue_'.IW_I18N.'.inc.php')) {
300
    /** Inclusion du fichier de traduction de l'application Integrateur Wikini. */
301
    include_once IW_CHEMIN_LANGUES.'iw_langue_'.IW_I18N.'.inc.php';
302
} else {
303
    /** Inclusion du fichier de traduction fr par défaut. */
304
    include_once IW_CHEMIN_LANGUES.'iw_langue_fr.inc.php';
305
}
306
 
307
$GLOBALS['_PAPYRUS_']['erreur']->setActive(1);
308
/**
581 ddelon 309
 *
545 ddelon 310
 * Fonction afficherPageMenuWikini()
581 ddelon 311
 *
545 ddelon 312
 * Renvoie le contenu de la page Menu de Wikini
313
 *
314
 * @return string
315
 * @access public
316
 */
581 ddelon 317
 
545 ddelon 318
function afficherPageMenuWikini()
319
{
581 ddelon 320
 
545 ddelon 321
	$GLOBALS['_PAPYRUS_']['erreur']->setActive(0);
322
 
581 ddelon 323
 
324
 
545 ddelon 325
	global $wiki;
326
	global $wikini_config_defaut;
327
	$sortie='';
328
    $wakkaConfig = $GLOBALS['wikini_config_defaut'];
329
    $wiki  = new Wiki_Papyrus($wakkaConfig);
330
 
331
    // Suppression des slash.
332
    $_REQUEST['wiki'] = preg_replace("/^\//", '',  $_REQUEST['wiki']);
333
 
334
    // split into page/method
335
    if ( preg_match( "#^(.+?)/(.*)$#",  $_REQUEST['wiki'], $matches ) ) {
336
        list(, $page, $method) = $matches;
337
    } else if ( preg_match( "#^(.*)$#",  $_REQUEST['wiki'], $matches ) ) {
338
        list(, $page) = $matches;
339
    }
340
 
341
    $server=$_SERVER['PHP_SELF'];
342
	$_SERVER['PHP_SELF']="wakka.php";
581 ddelon 343
 
545 ddelon 344
    $contenu=$wiki->LoadPage("PageMenu");
581 ddelon 345
 
585 ddelon 346
    $sortie.="<div id=\"menu_wikini\">";
581 ddelon 347
	$sortie.=$wiki->Format($contenu['body']);
585 ddelon 348
	$sortie.="</div>";
545 ddelon 349
 
350
	$_SERVER['PHP_SELF']=$server;
581 ddelon 351
 
545 ddelon 352
	$GLOBALS['_PAPYRUS_']['erreur']->setActive(1);
581 ddelon 353
 
545 ddelon 354
	return $sortie;
581 ddelon 355
 
356
}
357
 
358
 
545 ddelon 359
// +------------------------------------------------------------------------------------------------------+
360
// |                                            CORPS du PROGRAMME                                        |
361
// +------------------------------------------------------------------------------------------------------+
362
/** Fonction afficherPageWikini() - Fonction appelé par le gestionnaire Papyrus.
363
*
364
* Elle retourne le contenu de l'application.
365
*
366
* @return  string  du code XHTML correspondant au contenu renvoyé par l'application.
367
*/
368
function afficherPageWikini()
369
{
370
 
371
	$GLOBALS['_PAPYRUS_']['erreur']->setActive(0);
581 ddelon 372
 
545 ddelon 373
	// Ajout d'une feuille de style externe
374
	GEN_stockerStyleExterne ('wikini', 'client/integrateur_wikini/presentations/styles/wikini.css') ;
581 ddelon 375
 
545 ddelon 376
  // TODO
377
  // Changement du niveau d'erreur pour éviter les Notices PHP dues à Wikini
581 ddelon 378
 
379
 
545 ddelon 380
	global $wiki;
381
	global $wikini_config_defaut;
382
	$sortie='';
383
    $wakkaConfig = $GLOBALS['wikini_config_defaut'];
384
    $wiki  = new Wiki_Papyrus($wakkaConfig);
385
 
386
 
581 ddelon 387
	if  ($GLOBALS['_GEN_commun']['pear_auth']->checkAuth()) {
388
		if (!isset($_SESSION["user"]) || ($_SESSION["user"]=="")) {
580 ddelon 389
			$wiki->SetUser('');
390
		}
391
	}
392
	else {
393
		$wiki->LogoutUser();
394
	}
581 ddelon 395
 
545 ddelon 396
	// Gestion de la variable de session "linktracking"
397
    if ( ! isset( $_SESSION['linktracking'] ) ) {
398
        $_SESSION['linktracking'] = 1;
399
    }
400
 
401
    // Suppression des slash.
402
    $_REQUEST['wiki'] = preg_replace("/^\//", '',  $_REQUEST['wiki']);
403
 
404
    // split into page/method
405
    if ( preg_match( "#^(.+?)/(.*)$#",  $_REQUEST['wiki'], $matches ) ) {
406
        list(, $page, $method) = $matches;
407
    } else if ( preg_match( "#^(.*)$#",  $_REQUEST['wiki'], $matches ) ) {
408
        list(, $page) = $matches;
409
    }
581 ddelon 410
 
545 ddelon 411
    // Vérification de la méthode d'affichage employée!
412
    if ( ! isset( $method ) ) {
413
        $method = '';
414
    }
581 ddelon 415
 
545 ddelon 416
    //Récupération du contenu de la page Wikini
581 ddelon 417
 
545 ddelon 418
    ob_start();
581 ddelon 419
 
545 ddelon 420
    $server=$_SERVER['PHP_SELF'];
421
	$_SERVER['PHP_SELF']="wakka.php";
581 ddelon 422
 
545 ddelon 423
	$wiki->Run($page, $method);
581 ddelon 424
 
545 ddelon 425
    $_SERVER['PHP_SELF']=$server;
581 ddelon 426
 
545 ddelon 427
    $sortie.= ob_get_contents();
428
    ob_end_clean();
429
 
430
	$GLOBALS['_PAPYRUS_']['erreur']->setActive(1);
431
 
676 ddelon 432
 
545 ddelon 433
	//return remplacerEntiteHTLM("<div id=\"wikini_page\" onLoad=\"thisForm=document.ACEditor;\" ondblclick=\"document.location='".$wiki->href("edit")."';"."\">"."\n".$sortie.'</div>'."\n");
676 ddelon 434
	if ($method!="edit") {
435
		return remplacerEntiteHTLM("<script type=\"text/javascript\" src=\"".IW_CHEMIN_BIBLIO_ACEDITOR."ACeditor.js\"></script><div id=\"wikini_page\"  ondblclick=\"document.location='".$wiki->href("edit")."';"."\">"."\n".$sortie.'</div>'."\n");
436
	}
437
	else {
438
		return remplacerEntiteHTLM("<script type=\"text/javascript\" src=\"".IW_CHEMIN_BIBLIO_ACEDITOR."ACeditor.js\"></script><div id=\"wikini_page\">"."\n".$sortie.'</div>'."\n");
439
	}
581 ddelon 440
 
545 ddelon 441
}
442
 
443
?>