Line 17... |
Line 17... |
17 |
// | |
|
17 |
// | |
|
18 |
// | You should have received a copy of the GNU Lesser General Public |
|
18 |
// | You should have received a copy of the GNU Lesser General Public |
|
19 |
// | License along with this library; if not, write to the Free Software |
|
19 |
// | License along with this library; if not, write to the Free Software |
|
20 |
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
|
20 |
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
|
21 |
// +------------------------------------------------------------------------------------------------------+
|
21 |
// +------------------------------------------------------------------------------------------------------+
|
22 |
// CVS : $Id: pap_script.fonct.php,v 1.1 2004-06-15 15:13:07 jpm Exp $
|
22 |
// CVS : $Id: pap_script.fonct.php,v 1.2 2004-09-10 16:40:41 jpm Exp $
|
23 |
/**
|
23 |
/**
|
24 |
* Les fonctions permettant d'inclure des scripts.
|
24 |
* Les fonctions permettant d'inclure des scripts.
|
25 |
*
|
25 |
*
|
26 |
* Ces fonctions permettent d'inclure des scripts, éxécuté côté client, directement dans les pages
|
26 |
* Ces fonctions permettent d'inclure des scripts, éxécuté côté client, directement dans les pages
|
27 |
* des applications. Elles peuvent donc être appelées par les applications
|
27 |
* des applications. Elles peuvent donc être appelées par les applications
|
Line 33... |
Line 33... |
33 |
*@author Laurent COUDOUNEAU <lc@gsite.org>
|
33 |
*@author Laurent COUDOUNEAU <lc@gsite.org>
|
34 |
//Autres auteurs :
|
34 |
//Autres auteurs :
|
35 |
*@author Jean-Pascal MILCENT <jpm@tela-botanica.org>
|
35 |
*@author Jean-Pascal MILCENT <jpm@tela-botanica.org>
|
36 |
*@author Alexandre GRANIER <alexandre@tela-botanica.org>
|
36 |
*@author Alexandre GRANIER <alexandre@tela-botanica.org>
|
37 |
*@copyright Tela-Botanica 2000-2004
|
37 |
*@copyright Tela-Botanica 2000-2004
|
38 |
*@version $Revision: 1.1 $ $Date: 2004-06-15 15:13:07 $
|
38 |
*@version $Revision: 1.2 $ $Date: 2004-09-10 16:40:41 $
|
39 |
// +------------------------------------------------------------------------------------------------------+
|
39 |
// +------------------------------------------------------------------------------------------------------+
|
40 |
*/
|
40 |
*/
|
Line 41... |
Line 41... |
41 |
|
41 |
|
42 |
// +------------------------------------------------------------------------------------------------------+
|
42 |
// +------------------------------------------------------------------------------------------------------+
|
43 |
// | LISTE de FONCTIONS |
|
43 |
// | LISTE de FONCTIONS |
|
Line 44... |
Line 44... |
44 |
// +------------------------------------------------------------------------------------------------------+
|
44 |
// +------------------------------------------------------------------------------------------------------+
|
45 |
|
45 |
|
46 |
/** Fonction GEN_modifierTypeScript() - Permet de stocker le type des scripts.
|
46 |
/** Fonction GEN_modifierTypeScript() - Permet de stocker le type des scripts.
|
47 |
*
|
47 |
*
|
48 |
* Génésia permet à une application donnée d'intégrer du code de scripts, exécuté côté client,
|
48 |
* Papyrus permet à une application donnée d'intégrer du code de scripts, exécuté côté client,
|
49 |
* directement dans l'entête de la page. Cette fonction définit le type Mime du langage de script utilisé.
|
49 |
* directement dans l'entête de la page. Cette fonction définit le type Mime du langage de script utilisé.
|
50 |
* En XHTML strict, cette fonction ne devrait pas être utilisé car les scripts devraient être
|
50 |
* En XHTML strict, cette fonction ne devrait pas être utilisé car les scripts devraient être
|
51 |
* stocké dans des fichiers séparés.
|
51 |
* stocké dans des fichiers séparés.
|
Line 62... |
Line 62... |
62 |
$_GEN_commun['script_type'] .= $type;
|
62 |
$_GEN_commun['script_type'] .= $type;
|
63 |
}
|
63 |
}
|
Line 64... |
Line 64... |
64 |
|
64 |
|
65 |
/** Fonction GEN_stockerCodeScript() - Permet de stocker le code d'un script côté client utilisé par une application.
|
65 |
/** Fonction GEN_stockerCodeScript() - Permet de stocker le code d'un script côté client utilisé par une application.
|
66 |
*
|
66 |
*
|
67 |
* Génésia permet à une application donnée de stocker du code de script, exécuté côté client, qui sera
|
67 |
* Papyrus permet à une application donnée de stocker du code de script, exécuté côté client, qui sera
|
68 |
* envoyer directement dans l'entête de la page. En XHTML strict, l'utilisation de cette
|
68 |
* envoyer directement dans l'entête de la page. En XHTML strict, l'utilisation de cette
|
69 |
* fonction est déconseillée. Utiliser plutôt une fichier de scripts séparé qui
|
69 |
* fonction est déconseillée. Utiliser plutôt une fichier de scripts séparé qui
|
70 |
* sera appelé par l'entête. Cette fonction peut être appelé plusieurs fois. Elle ne
|
70 |
* sera appelé par l'entête. Cette fonction peut être appelé plusieurs fois. Elle ne
|
71 |
* fait que stocker le code dans une variable globale utilisée par Génésia.
|
71 |
* fait que stocker le code dans une variable globale utilisée par Génésia.
|
Line 101... |
Line 101... |
101 |
{
|
101 |
{
|
102 |
global $_GEN_commun;
|
102 |
global $_GEN_commun;
|
Line 103... |
Line 103... |
103 |
|
103 |
|
104 |
if (empty($_GEN_commun['script_fonction'][$id_fonction])) {
|
104 |
if (empty($_GEN_commun['script_fonction'][$id_fonction])) {
|
105 |
$_GEN_commun['script_fonction'][$id_fonction] = $code_fonction;
|
105 |
$_GEN_commun['script_fonction'][$id_fonction] = $code_fonction;
|
- |
|
106 |
} else {
|
- |
|
107 |
if (GEN_DEBOGAGE) {
|
106 |
} else {
|
108 |
$_GEN_commun['debogage_info'] .=
|
107 |
die('ERREUR Génésia : cet identifiant de fonction à déjà été enregistré par GEN_stockerFonctionJavascript(). <br />'.
|
109 |
'ERREUR Papyrus : cet identifiant de fonction à déjà été enregistré par GEN_stockerFonctionJavascript(). <br />'.
|
108 |
'Identifiant : '. $id_fonction .'<br />'.
|
110 |
'Identifiant : '. $id_fonction .'<br />'.
|
109 |
'Ligne n° : '. __LINE__ .'<br />'.
|
111 |
'Ligne n° : '. __LINE__ .'<br />'.
|
- |
|
112 |
'Fichier : '. __FILE__;
|
110 |
'Fichier : '. __FILE__);
|
113 |
}
|
111 |
}
|
114 |
}
|
Line 112... |
Line 115... |
112 |
}
|
115 |
}
|
113 |
|
116 |
|
114 |
/** Fonction GEN_stockerFichierScript() - Permet de stocker des fichiers de scripts.
|
117 |
/** Fonction GEN_stockerFichierScript() - Permet de stocker des fichiers de scripts.
|
115 |
*
|
118 |
*
|
116 |
* Papyrus permet à une application donnée de stocker des fichiers de script qui seront
|
119 |
* Papyrus permet à une application donnée de stocker des fichiers de script qui seront
|
117 |
* appelés depuis l'entête de la page. En XHTML strict, l'utilisation de cette
|
120 |
* appelés depuis l'entête de la page. En XHTML strict, l'utilisation de cette
|
118 |
* fonction est conseillée.
|
121 |
* fonction est conseillée.
|
119 |
* Cette fonction peut être appelé plusieurs fois. Elle ne fait que stocker les chemin des
|
122 |
* Cette fonction peut être appelé plusieurs fois. Elle ne fait que stocker les chemin des
|
120 |
* fichiers dans une variable (tableau associatif) globale utilisée par Génésia.
|
123 |
* fichiers dans une variable (tableau associatif) globale utilisée par Papyrus.
|
121 |
*
|
124 |
*
|
122 |
* @global array "script_fichier" : utilisé pour stocker les chemins des scripts.
|
125 |
* @global array "script_fichier" : utilisé pour stocker les chemins des scripts.
|
123 |
* @param string la clé du tableau de fichiers, par exemple le nom du fichier à insérer.
|
126 |
* @param string la clé du tableau de fichiers, par exemple le nom du fichier à insérer.
|
Line 130... |
Line 133... |
130 |
global $_GEN_commun;
|
133 |
global $_GEN_commun;
|
Line 131... |
Line 134... |
131 |
|
134 |
|
132 |
if (empty($_GEN_commun['script_fichier'][$id_fichier])) {
|
135 |
if (empty($_GEN_commun['script_fichier'][$id_fichier])) {
|
133 |
$_GEN_commun['script_fichier'][$id_fichier]['type'] = $type_fichier;
|
136 |
$_GEN_commun['script_fichier'][$id_fichier]['type'] = $type_fichier;
|
134 |
$_GEN_commun['script_fichier'][$id_fichier]['chemin'] = $chemin_fichier;
|
137 |
$_GEN_commun['script_fichier'][$id_fichier]['chemin'] = $chemin_fichier;
|
- |
|
138 |
} else {
|
- |
|
139 |
if (GEN_DEBOGAGE) {
|
135 |
} else {
|
140 |
$_GEN_commun['debogage_info'] .=
|
136 |
die('ERREUR Génésia : cet identifiant de fichier à déjà été enregistré par GEN_stockerFichierJavascript(). <br />'.
|
141 |
'ERREUR Papyrus : cet identifiant de fichier à déjà été enregistré par GEN_stockerFichierJavascript(). <br />'.
|
137 |
'Identifiant : '. $id_fichier .'<br />'.
|
142 |
'Identifiant : '. $id_fichier .'<br />'.
|
138 |
'Ligne n° : '. __LINE__ .'<br />'.
|
143 |
'Ligne n° : '. __LINE__ .'<br />'.
|
- |
|
144 |
'Fichier : '. __FILE__;
|
139 |
'Fichier : '. __FILE__);
|
145 |
}
|
140 |
}
|
146 |
}
|
Line 141... |
Line 147... |
141 |
}
|
147 |
}
|
142 |
|
148 |
|
Line 193... |
Line 199... |
193 |
|
199 |
|
194 |
|
200 |
|
195 |
/* +--Fin du code ----------------------------------------------------------------------------------------+
|
201 |
/* +--Fin du code ----------------------------------------------------------------------------------------+
|
- |
|
202 |
*
|
- |
|
203 |
* $Log: not supported by cvs2svn $
|
- |
|
204 |
* Revision 1.1 2004/06/15 15:13:07 jpm
|
196 |
*
|
205 |
* Changement de nom et d'arborescence de Genesia en Papyrus.
|
197 |
* $Log: not supported by cvs2svn $
|
206 |
*
|
198 |
* Revision 1.6 2004/04/30 16:18:56 jpm
|
207 |
* Revision 1.6 2004/04/30 16:18:56 jpm
|
199 |
* Correction d'un bogue dans les fonctions de gestion des scripts.
|
208 |
* Correction d'un bogue dans les fonctions de gestion des scripts.
|
200 |
*
|
209 |
*
|