dolibarr 20.0.2
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 *
8 * This program is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation; either version 3 of the License, or
11 * (at your option) any later version.
12 *
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
17 *
18 * You should have received a copy of the GNU General Public License
19 * along with this program. If not, see <https://www.gnu.org/licenses/>.
20 */
21
28// Load Dolibarr environment
29require '../main.inc.php';
30require_once DOL_DOCUMENT_ROOT.'/core/lib/admin.lib.php';
31require_once DOL_DOCUMENT_ROOT.'/core/lib/doleditor.lib.php';
32require_once DOL_DOCUMENT_ROOT.'/core/class/doleditor.class.php';
33
34// Load translation files required by the page
35$langs->loadLangs(array('admin', 'fckeditor', 'errors'));
36
37$action = GETPOST('action', 'aZ09');
38// Possible modes are:
39// dolibarr_details
40// dolibarr_notes
41// dolibarr_readonly
42// dolibarr_mailings
43// Full (not sure this one is used)
44$mode = GETPOST('mode') ? GETPOST('mode', 'alpha') : 'dolibarr_notes';
45
46if (!$user->admin) {
48}
49
50// Constant and translation of the module description
51$modules = array(
52 'NOTE_PUBLIC' => 'FCKeditorForNotePublic',
53 'NOTE_PRIVATE' => 'FCKeditorForNotePrivate',
54 'SOCIETE' => 'FCKeditorForCompany',
55 //'PRODUCTDESC' => 'FCKeditorForProduct',
56 'DETAILS' => 'FCKeditorForProductDetails',
57 'USERSIGN' => 'FCKeditorForUserSignature',
58 'MAILING' => 'FCKeditorForMailing',
59 'MAIL' => 'FCKeditorForMail',
60 'TICKET' => 'FCKeditorForTicket',
61 'SPECIALCHAR' => 'SpecialCharActivation',
62);
63// Conditions for the option to be offered
64$conditions = array(
65 'NOTE_PUBLIC' => 1,
66 'NOTE_PRIVATE' => 1,
67 'SOCIETE' => 1,
68 'PRODUCTDESC' => (isModEnabled("product") || isModEnabled("service")),
69 'DETAILS' => (isModEnabled('invoice') || isModEnabled("propal") || isModEnabled('order') || isModEnabled('supplier_proposal') || isModEnabled("supplier_order") || isModEnabled("supplier_invoice")),
70 'USERSIGN' => 1,
71 'MAILING' => isModEnabled('mailing'),
72 'MAIL' => (isModEnabled('invoice') || isModEnabled("propal") || isModEnabled('order')),
73 'TICKET' => isModEnabled('ticket'),
74 'SPECIALCHAR' => 1,
75);
76// Picto
77$picto = array(
78 'NOTE_PUBLIC' => 'generic',
79 'NOTE_PRIVATE' => 'generic',
80 'SOCIETE' => 'generic',
81 'PRODUCTDESC' => 'product',
82 'DETAILS' => 'product',
83 'USERSIGN' => 'user',
84 'MAILING' => 'email',
85 'MAIL' => 'email',
86 'TICKET' => 'ticket',
87 'SPECIALCHAR' => 'generic'
88);
89
90
91
92/*
93 * Actions
94 */
95
96foreach ($modules as $const => $desc) {
97 if ($action == 'enable_'.strtolower($const)) {
98 dolibarr_set_const($db, "FCKEDITOR_ENABLE_".$const, "1", 'chaine', 0, '', $conf->entity);
99
100 // If fckeditor is active in the product/service description, it is activated in the forms
101 if ($const == 'PRODUCTDESC' && getDolGlobalInt('PRODUIT_DESC_IN_FORM_ACCORDING_TO_DEVICE')) {
102 dolibarr_set_const($db, "FCKEDITOR_ENABLE_DETAILS", "1", 'chaine', 0, '', $conf->entity);
103 }
104 }
105 if ($action == 'disable_'.strtolower($const)) {
106 dolibarr_set_const($db, "FCKEDITOR_ENABLE_".$const, "0", 'chaine', 0, '', $conf->entity);
107 }
108}
109
110if (GETPOST('save', 'alpha')) {
111 $error = 0;
112
113 $fckeditor_skin = GETPOST('fckeditor_skin', 'alpha');
114 if (!empty($fckeditor_skin)) {
115 $result = dolibarr_set_const($db, 'FCKEDITOR_SKIN', $fckeditor_skin, 'chaine', 0, '', $conf->entity);
116 if ($result <= 0) {
117 $error++;
118 }
119 } else {
120 $error++;
121 }
122
123 $fckeditor_test = GETPOST('formtestfield', 'restricthtml');
124 if (!empty($fckeditor_test)) {
125 $result = dolibarr_set_const($db, 'FCKEDITOR_TEST', $fckeditor_test, 'chaine', 0, '', $conf->entity);
126 if ($result <= 0) {
127 $error++;
128 }
129 } else {
130 $error = -1; // -1 means a warning message
131 }
132
133 if ($error == 0) {
134 setEventMessages($langs->trans("SetupSaved"), null, 'mesgs');
135 } elseif ($error == -1) {
136 setEventMessages($langs->trans("EmptyMessageNotAllowedError"), null, 'warnings');
137 } else {
138 setEventMessages($langs->trans("Error").' '.$db->lasterror(), null, 'errors');
139 }
140}
141
142
143/*
144 * View
145 */
146
147llxHeader('', '', '', '', 0, 0, '', '', '', 'mod-admin page-fckeditor');
148
149$linkback = '<a href="'.DOL_URL_ROOT.'/admin/modules.php?restore_lastsearch_values=1">'.$langs->trans("BackToModuleList").'</a>';
150print load_fiche_titre($langs->trans("AdvancedEditor"), $linkback, 'title_setup');
151print '<br>';
152
153if (empty($conf->use_javascript_ajax)) {
154 setEventMessages(array($langs->trans("NotAvailable"), $langs->trans("JavascriptDisabled")), null, 'errors');
155} else {
156 print '<table class="noborder centpercent">';
157 print '<tr class="liste_titre">';
158 print '<td colspan="2">'.$langs->trans("ActivateFCKeditor").'</td>';
159 print '<td class="center" width="100">'.$langs->trans("Action").'</td>';
160 print "</tr>\n";
161
162 // Modules
163 foreach ($modules as $const => $desc) {
164 // If this condition is not met, the option is not offered
165 if (!$conditions[$const]) {
166 continue;
167 }
168
169 $constante = 'FCKEDITOR_ENABLE_'.$const;
170 print '<!-- constant = '.$constante.' -->'."\n";
171 print '<tr class="oddeven">';
172 print '<td class="width20">'.img_object("", $picto[$const]).'</td>';
173 print '<td>';
174 print $langs->trans($desc);
175 if ($const == 'DETAILS') {
176 print '<br><span class="warning">'.$langs->trans("FCKeditorForProductDetails2").'</span>';
177 }
178 print '</td>';
179 print '<td class="center centpercent width100">';
180 $value = getDolGlobalInt($constante, 0);
181 if ($value == 0) {
182 print '<a class="reposition" href="'.$_SERVER['PHP_SELF'].'?action=enable_'.strtolower($const).'&token='.newToken().'">'.img_picto($langs->trans("Disabled"), 'switch_off').'</a>';
183 } elseif ($value == 1) {
184 print '<a class="reposition" href="'.$_SERVER['PHP_SELF'].'?action=disable_'.strtolower($const).'&token='.newToken().'">'.img_picto($langs->trans("Enabled"), 'switch_on').'</a>';
185 }
186
187 print "</td>";
188 print '</tr>';
189 }
190
191 print '</table>'."\n";
192
193 print '<br>'."\n";
194
195 print '<form name="formtest" method="POST" action="'.$_SERVER["PHP_SELF"].'">'."\n";
196 print '<input type="hidden" name="token" value="'.newToken().'">';
197 print '<input type="hidden" name="page_y" value="">';
198
199 // Skins
200 show_skin(null, 1);
201 print '<br>'."\n";
202
203 $listofmodes = array('dolibarr_mailings', 'dolibarr_notes', 'dolibarr_details', 'dolibarr_readonly', 'Full', 'Full_inline');
204 $linkstomode = '';
205 foreach ($listofmodes as $newmode) {
206 if ($linkstomode) {
207 $linkstomode .= ' - ';
208 }
209 $linkstomode .= '<a class="reposition" href="'.$_SERVER["PHP_SELF"].'?mode='.$newmode.'">';
210 if ($mode == $newmode) {
211 $linkstomode .= '<strong>';
212 }
213 $linkstomode .= $newmode;
214 if ($mode == $newmode) {
215 $linkstomode .= '</strong>';
216 }
217 $linkstomode .= '</a>';
218 }
219 $linkstomode .= '';
220 print load_fiche_titre($langs->trans("TestSubmitForm"), $linkstomode, '');
221 print '<input type="hidden" name="mode" value="'.dol_escape_htmltag($mode).'">';
222 if ($mode != 'Full_inline') {
223 $uselocalbrowser = true;
224 $readonly = ($mode == 'dolibarr_readonly' ? 1 : 0);
225 $editor = new DolEditor('formtestfield', getDolGlobalString('FCKEDITOR_TEST', 'Test'), '', 200, $mode, 'In', true, $uselocalbrowser, 1, 120, 8, $readonly);
226 $editor->Create();
227 } else {
228 // CKEditor inline enabled with the contenteditable="true"
229 print '<div style="border: 1px solid #888;" contenteditable="true">';
230 print getDolGlobalString('FCKEDITOR_TEST');
231 print '</div>';
232 }
233 print $form->buttonsSaveCancel("Save", '', null, 0, 'reposition');
234 print '<div id="divforlog"></div>';
235 print '</form>'."\n";
236
237 // Add env of ckeditor
238 // This is to show how CKEditor detect browser to understand why editor is disabled or not. To help debug.
239 /*
240 print '<br><script type="text/javascript">
241 function jsdump(obj, id) {
242 var out = \'\';
243 for (var i in obj) {
244 out += i + ": " + obj[i] + "<br>\n";
245 }
246
247 jQuery("#"+id).html(out);
248 }
249
250 jsdump(CKEDITOR.env, "divforlog");
251 </script>';
252 }
253 */
254}
255
256// End of page
257llxFooter();
258$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).
if(!defined('NOREQUIRESOC')) if(!defined( 'NOREQUIRETRAN')) if(!defined('NOTOKENRENEWAL')) if(!defined( 'NOREQUIREMENU')) if(!defined('NOREQUIREHTML')) if(!defined( 'NOREQUIREAJAX')) llxHeader()
Empty header.
Definition wrapper.php:55
llxFooter()
Empty footer.
Definition wrapper.php:69
Class to manage a WYSIWYG editor.
show_skin($fuser, $edit=0)
Show list of ckeditor's themes.
load_fiche_titre($title, $morehtmlright='', $picto='generic', $pictoisfullpath=0, $id='', $morecssontable='', $morehtmlcenter='')
Load a title with picto.
img_picto($titlealt, $picto, $moreatt='', $pictoisfullpath=0, $srconly=0, $notitle=0, $alt='', $morecss='', $marginleftonlyshort=2)
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.
setEventMessages($mesg, $mesgs, $style='mesgs', $messagekey='', $noduplicate=0)
Set event messages in dol_events session object.
getDolGlobalString($key, $default='')
Return dolibarr global constant string value.
accessforbidden($message='', $printheader=1, $printfooter=1, $showonlymessage=0, $params=null)
Show a message to say access is forbidden and stop program.