dolibarr  20.0.0-beta
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
29 require '../main.inc.php';
30 require_once DOL_DOCUMENT_ROOT.'/core/lib/admin.lib.php';
31 require_once DOL_DOCUMENT_ROOT.'/core/lib/doleditor.lib.php';
32 require_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 
46 if (!$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 
96 foreach ($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 
110 if (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 
147 llxHeader();
148 
149 $linkback = '<a href="'.DOL_URL_ROOT.'/admin/modules.php?restore_lastsearch_values=1">'.$langs->trans("BackToModuleList").'</a>';
150 print load_fiche_titre($langs->trans("AdvancedEditor"), $linkback, 'title_setup');
151 print '<br>';
152 
153 if (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
257 llxFooter();
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).
Definition: admin.lib.php:656
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.
isModEnabled($module)
Is Dolibarr module enabled.
accessforbidden($message='', $printheader=1, $printfooter=1, $showonlymessage=0, $params=null)
Show a message to say access is forbidden and stop program.