dolibarr 22.0.5
fckeditor.php
Go to the documentation of this file.
1<?php
2/* Copyright (C) 2004-2011 Laurent Destailleur <eldy@users.sourceforge.net>
3 * Copyright (C) 2005-2012 Regis Houssin <regis.houssin@inodbox.com>
4 * Copyright (C) 2012-2013 Juanjo Menent <jmenent@2byte.es>
5 * Copyright (C) 2019 Christophe Battarel <christophe@altairis.fr>
6 * Copyright (C) 2024 Frédéric France <frederic.france@free.fr>
7 * Copyright (C) 2024 MDW <mdeweerd@users.noreply.github.com>
8 *
9 * This program is free software; you can redistribute it and/or modify
10 * it under the terms of the GNU General Public License as published by
11 * the Free Software Foundation; either version 3 of the License, or
12 * (at your option) any later version.
13 *
14 * This program is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 * GNU General Public License for more details.
18 *
19 * You should have received a copy of the GNU General Public License
20 * along with this program. If not, see <https://www.gnu.org/licenses/>.
21 */
22
29// Load Dolibarr environment
30require '../main.inc.php';
31require_once DOL_DOCUMENT_ROOT.'/core/lib/admin.lib.php';
32require_once DOL_DOCUMENT_ROOT.'/core/lib/doleditor.lib.php';
33require_once DOL_DOCUMENT_ROOT.'/core/class/doleditor.class.php';
34
44// Load translation files required by the page
45$langs->loadLangs(array('admin', 'fckeditor', 'errors'));
46
47$action = GETPOST('action', 'aZ09');
48// Possible modes are:
49// dolibarr_details
50// dolibarr_notes
51// dolibarr_readonly
52// dolibarr_mailings
53// Full (not sure this one is used)
54$mode = GETPOST('mode') ? GETPOST('mode', 'alpha') : 'dolibarr_notes';
55
56if (!$user->admin) {
58}
59
60// Constant and translation of the module description
61$modules = array(
62 'NOTE_PUBLIC' => 'FCKeditorForNotePublic',
63 'NOTE_PRIVATE' => 'FCKeditorForNotePrivate',
64 'SOCIETE' => 'FCKeditorForCompany',
65 'DETAILS' => 'FCKeditorForProductDetails',
66 'USERSIGN' => 'FCKeditorForUserSignature',
67 'MAILING' => 'FCKeditorForMailing',
68 'MAIL' => 'FCKeditorForMail',
69 'TICKET' => 'FCKeditorForTicket',
70 //'SPECIALCHAR' => 'SpecialCharActivation',
71);
72// Conditions for the option to be offered
73$conditions = array(
74 'NOTE_PUBLIC' => 1,
75 'NOTE_PRIVATE' => 1,
76 'SOCIETE' => 1,
77 'PRODUCTDESC' => (isModEnabled("product") || isModEnabled("service")),
78 'DETAILS' => (isModEnabled('invoice') || isModEnabled("propal") || isModEnabled('order') || isModEnabled('supplier_proposal') || isModEnabled("supplier_order") || isModEnabled("supplier_invoice")),
79 'USERSIGN' => 1,
80 'MAILING' => isModEnabled('mailing'),
81 'MAIL' => (isModEnabled('invoice') || isModEnabled("propal") || isModEnabled('order')),
82 'TICKET' => isModEnabled('ticket'),
83 //'SPECIALCHAR' => 1,
84);
85// Picto
86$picto = array(
87 'NOTE_PUBLIC' => 'generic',
88 'NOTE_PRIVATE' => 'generic',
89 'SOCIETE' => 'generic',
90 'PRODUCTDESC' => 'product',
91 'DETAILS' => 'product',
92 'USERSIGN' => 'user',
93 'MAILING' => 'email',
94 'MAIL' => 'email',
95 'TICKET' => 'ticket',
96 //'SPECIALCHAR' => 'generic'
97);
98
99
100
101/*
102 * Actions
103 */
104
105foreach ($modules as $const => $desc) {
106 if ($action == 'enable_'.strtolower($const)) {
107 dolibarr_set_const($db, "FCKEDITOR_ENABLE_".$const, "1", 'chaine', 0, '', $conf->entity);
108
109 // If fckeditor is active in the product/service description, it is activated in the forms
110 if ($const == 'PRODUCTDESC' && getDolGlobalInt('PRODUIT_DESC_IN_FORM_ACCORDING_TO_DEVICE')) {
111 dolibarr_set_const($db, "FCKEDITOR_ENABLE_DETAILS", "1", 'chaine', 0, '', $conf->entity);
112 }
113 }
114 if ($action == 'disable_'.strtolower($const)) {
115 dolibarr_set_const($db, "FCKEDITOR_ENABLE_".$const, "0", 'chaine', 0, '', $conf->entity);
116 }
117}
118
119if (GETPOST('action') == 'enable_specialchar') {
120 dolibarr_set_const($db, "FCKEDITOR_ENABLE_SPECIALCHAR", "1", 'chaine', 0, '', $conf->entity);
121}
122if (GETPOST('action') == 'disable_specialchar') {
123 dolibarr_del_const($db, "FCKEDITOR_ENABLE_SPECIALCHAR", $conf->entity);
124}
125
126if (GETPOST('save', 'alpha')) {
127 $error = 0;
128
129 $fckeditor_test = GETPOST('formtestfield', 'restricthtml');
130 if (!empty($fckeditor_test)) {
131 $result = dolibarr_set_const($db, 'FCKEDITOR_TEST', $fckeditor_test, 'chaine', 0, '', $conf->entity);
132 if ($result <= 0) {
133 $error++;
134 }
135 } else {
136 $error = -1; // -1 means a warning message
137 }
138
139 if ($error == 0) {
140 setEventMessages($langs->trans("SetupSaved"), null, 'mesgs');
141 } elseif ($error == -1) {
142 setEventMessages($langs->trans("EmptyMessageNotAllowedError"), null, 'warnings');
143 } else {
144 setEventMessages($langs->trans("Error").' '.$db->lasterror(), null, 'errors');
145 }
146}
147
148
149/*
150 * View
151 */
152
153llxHeader('', '', '', '', 0, 0, '', '', '', 'mod-admin page-fckeditor');
154
155$linkback = '<a href="'.DOL_URL_ROOT.'/admin/modules.php?restore_lastsearch_values=1">'.$langs->trans("BackToModuleList").'</a>';
156print load_fiche_titre($langs->trans("AdvancedEditor"), $linkback, 'title_setup');
157print '<br>';
158
159if (empty($conf->use_javascript_ajax)) {
160 setEventMessages(null, array($langs->trans("NotAvailable"), $langs->trans("JavascriptDisabled")), 'errors');
161} else {
162 print '<table class="noborder centpercent">';
163 print '<tr class="liste_titre">';
164 print '<td colspan="2">'.$langs->trans("ActivateFCKeditor").'</td>';
165 print '<td class="center width100"></td>';
166 print "</tr>\n";
167
168 // Modules
169 foreach ($modules as $const => $desc) {
170 // If this condition is not met, the option is not offered
171 if (!$conditions[$const]) {
172 continue;
173 }
174
175 $constante = 'FCKEDITOR_ENABLE_'.$const;
176 print '<!-- constant = '.$constante.' -->'."\n";
177 print '<tr class="oddeven">';
178 print '<td class="width20">'.img_object("", $picto[$const]).'</td>';
179 print '<td>';
180 print $langs->trans($desc);
181 if ($const == 'DETAILS') {
182 print $form->textwithpicto('', '<span class="warning">'.$langs->trans("FCKeditorForProductDetails2").'</span>');
183 }
184 print '</td>';
185 print '<td class="center centpercent width100">';
186 $value = getDolGlobalInt($constante, 0);
187 if ($value == 0) {
188 print '<a class="reposition" href="'.$_SERVER['PHP_SELF'].'?action=enable_'.strtolower($const).'&token='.newToken().'">'.img_picto($langs->trans("Disabled"), 'switch_off').'</a>';
189 } elseif ($value == 1) {
190 if ($const == 'DETAILS') {
191 print '<a class="reposition" href="'.$_SERVER['PHP_SELF'].'?action=disable_'.strtolower($const).'&token='.newToken().'">'.img_picto($langs->trans("Enabled").' - '.$langs->trans("FCKeditorForProductDetails2"), 'switch_on', '', 0, 0, 0, '', 'warning').'</a>';
192 } else {
193 print '<a class="reposition" href="'.$_SERVER['PHP_SELF'].'?action=disable_'.strtolower($const).'&token='.newToken().'">'.img_picto($langs->trans("Enabled"), 'switch_on').'</a>';
194 }
195 }
196
197 print "</td>";
198 print '</tr>';
199 }
200
201 print '</table>'."\n";
202
203 print '<br>'."\n";
204
205
206 // Other options
207 print '<table class="noborder centpercent">';
208 print '<tr class="liste_titre">';
209 print '<td>'.$langs->trans("Other").'</td>';
210 print '<td class="center"></td>';
211 print "</tr>\n";
212
213 $constante = 'FCKEDITOR_ENABLE_SPECIALCHAR';
214 print '<!-- constant = '.$constante.' -->'."\n";
215 print '<tr class="oddeven">';
216 print '<td>';
217 print $langs->trans('SpecialCharActivation');
218 print '</td>';
219 print '<td class="center width100">';
220 $value = getDolGlobalInt($constante, 0);
221 if ($value == 0) {
222 print '<a class="reposition" href="'.$_SERVER['PHP_SELF'].'?action=enable_specialchar&token='.newToken().'">'.img_picto($langs->trans("Disabled"), 'switch_off').'</a>';
223 } elseif ($value == 1) {
224 print '<a class="reposition" href="'.$_SERVER['PHP_SELF'].'?action=disable_specialchar&token='.newToken().'">'.img_picto($langs->trans("Enabled"), 'switch_on').'</a>';
225 }
226
227 print "</td>";
228 print '</tr>';
229
230 print '</table>'."\n";
231
232 print '<br>'."\n";
233
234
235 print '<form name="formtest" method="POST" action="'.$_SERVER["PHP_SELF"].'">'."\n";
236 print '<input type="hidden" name="token" value="'.newToken().'">';
237 print '<input type="hidden" name="page_y" value="">';
238
239 // Skins
240 //show_skin(null, 1);
241 //print '<br>'."\n";
242
243 $listofmodes = array('dolibarr_readonly', 'dolibarr_details', 'dolibarr_notes', 'dolibarr_mailings', 'Full', 'Full_inline');
244 $linkstomode = '';
245 foreach ($listofmodes as $newmode) {
246 if ($linkstomode) {
247 $linkstomode .= ' - ';
248 }
249 $linkstomode .= '<a class="reposition" href="'.$_SERVER["PHP_SELF"].'?mode='.$newmode.'">';
250 if ($mode == $newmode) {
251 $linkstomode .= '<strong>';
252 }
253 $linkstomode .= $newmode;
254 if ($mode == $newmode) {
255 $linkstomode .= '</strong>';
256 }
257 $linkstomode .= '</a>';
258 }
259 $linkstomode .= '';
260 print load_fiche_titre($langs->trans("TestSubmitForm"), $linkstomode, '');
261 print '<input type="hidden" name="mode" value="'.dol_escape_htmltag($mode).'">';
262 if ($mode != 'Full_inline') {
263 $uselocalbrowser = true;
264 $readonly = ($mode == 'dolibarr_readonly' ? 1 : 0);
265 $editor = new DolEditor('formtestfield', getDolGlobalString('FCKEDITOR_TEST', 'Test'), '', 200, $mode, 'In', true, $uselocalbrowser, 1, 120, '8', $readonly);
266 $editor->Create();
267 } else {
268 // CKEditor inline enabled with the contenteditable="true"
269 print '<div style="border: 1px solid #888;" contenteditable="true">';
270 print getDolGlobalString('FCKEDITOR_TEST');
271 print '</div>';
272 }
273 print $form->buttonsSaveCancel("Save", '', array(), 0, 'reposition');
274 print '<div id="divforlog"></div>';
275 print '</form>'."\n";
276
277 // Add env of ckeditor
278 // This is to show how CKEditor detect browser to understand why editor is disabled or not. To help debug.
279 /*
280 print '<br><script type="text/javascript">
281 function jsdump(obj, id) {
282 var out = \'\';
283 for (var i in obj) {
284 out += i + ": " + obj[i] + "<br>\n";
285 }
286
287 jQuery("#"+id).html(out);
288 }
289
290 jsdump(CKEDITOR.env, "divforlog");
291 </script>';
292 }
293 */
294}
295
296// End of page
297llxFooter();
298$db->close();
dolibarr_set_const($db, $name, $value, $type='chaine', $visible=0, $note='', $entity=1)
Insert a parameter (key,value) into database (delete old key then insert it again).
dolibarr_del_const($db, $name, $entity=1)
Delete a constant.
llxFooter($comment='', $zone='private', $disabledoutputofmessages=0)
Empty footer.
Definition wrapper.php:91
if(!defined('NOREQUIRESOC')) if(!defined( 'NOREQUIRETRAN')) if(!defined('NOTOKENRENEWAL')) if(!defined( 'NOREQUIREMENU')) if(!defined('NOREQUIREHTML')) if(!defined( 'NOREQUIREAJAX')) llxHeader($head='', $title='', $help_url='', $target='', $disablejs=0, $disablehead=0, $arrayofjs='', $arrayofcss='', $morequerystring='', $morecssonbody='', $replacemainareaby='', $disablenofollow=0, $disablenoindex=0)
Empty header.
Definition wrapper.php:73
Class to manage a WYSIWYG editor.
load_fiche_titre($title, $morehtmlright='', $picto='generic', $pictoisfullpath=0, $id='', $morecssontable='', $morehtmlcenter='')
Load a title with picto.
setEventMessages($mesg, $mesgs, $style='mesgs', $messagekey='', $noduplicate=0, $attop=0)
Set event messages in dol_events session object.
img_picto($titlealt, $picto, $moreatt='', $pictoisfullpath=0, $srconly=0, $notitle=0, $alt='', $morecss='', $marginleftonlyshort=2, $allowothertags=array())
Show picto whatever it's its name (generic function)
getDolGlobalInt($key, $default=0)
Return a Dolibarr global constant int value.
newToken()
Return the value of token currently saved into session with name 'newtoken'.
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
getDolGlobalString($key, $default='')
Return a Dolibarr global constant string value.
global $conf
The following vars must be defined: $type2label $form $conf, $lang, The following vars may also be de...
Definition member.php:79
accessforbidden($message='', $printheader=1, $printfooter=1, $showonlymessage=0, $params=null)
Show a message to say access is forbidden and stop program.