dolibarr  20.0.0-beta
auguria.lib.php
Go to the documentation of this file.
1 <?php
2 /* Copyright (C) 2010-2022 Laurent Destailleur <eldy@users.sourceforge.net>
3  * Copyright (C) 2010-2012 Regis Houssin <regis.houssin@inodbox.com>
4  * Copyright (C) 2024 MDW <mdeweerd@users.noreply.github.com>
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 3 of the License, or
9  * (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program. If not, see <https://www.gnu.org/licenses/>.
18  * or see https://www.gnu.org/
19  */
20 
25 require_once DOL_DOCUMENT_ROOT.'/core/class/menubase.class.php';
26 
27 
28 
41 function print_auguria_menu($db, $atarget, $type_user, &$tabMenu, &$menu, $noout = 0, $mode = '')
42 {
43  global $user, $conf, $langs, $mysoc;
44  global $dolibarr_main_db_name;
45 
46  $mainmenu = (empty($_SESSION["mainmenu"]) ? '' : $_SESSION["mainmenu"]);
47  $leftmenu = (empty($_SESSION["leftmenu"]) ? '' : $_SESSION["leftmenu"]);
48 
49  $id = 'mainmenu';
50  $listofmodulesforexternal = explode(',', getDolGlobalString('MAIN_MODULES_FOR_EXTERNAL'));
51 
52  // Show personalized menus
53  $menuArbo = new Menubase($db, 'auguria');
54  $newTabMenu = $menuArbo->menuTopCharger('', '', $type_user, 'auguria', $tabMenu);
55  '@phan-var-force array<array{rowid:string,fk_menu:string,langs:string,enabled:int<0,2>,type:string,fk_mainmenu:string,fk_leftmenu:string,url:string,titre:string,perms:string,target:string,mainmenu:string,leftmenu:string,position:int,prefix:string}> $newTabMenu';
56 
57  $substitarray = getCommonSubstitutionArray($langs, 0, null, null);
58 
59  if (empty($noout)) {
61  }
62 
63  global $usemenuhider;
64  $usemenuhider = 1;
65 
66  // Show/Hide vertical menu. The hamburger icon for .menuhider action.
67  if ($mode != 'jmobile' && $mode != 'topnb' && $usemenuhider && !getDolGlobalString('MAIN_OPTIMIZEFORTEXTBROWSER')) {
68  $showmode = 1;
69  $classname = 'class="tmenu menuhider nohover"';
70  $idsel = 'menu';
71 
72  $menu->add('#', (getDolGlobalInt('THEME_TOPMENU_DISABLE_IMAGE') == 1 ? '<span class="fa fa-bars"></span>' : ''), 0, $showmode, $atarget, "xxx", '', 0, $id, $idsel, $classname);
73  }
74 
75  $num = count($newTabMenu);
76  for ($i = 0; $i < $num; $i++) {
77  //var_dump($type_user.' '.$newTabMenu[$i]['url'].' '.$showmode.' '.$newTabMenu[$i]['perms']);
78  $idsel = (empty($newTabMenu[$i]['mainmenu']) ? 'none' : $newTabMenu[$i]['mainmenu']);
79 
80  $shorturl = '';
81 
82  $showmode = dol_auguria_showmenu($type_user, $newTabMenu[$i], $listofmodulesforexternal);
83  if ($showmode == 1) {
84  $newTabMenu[$i]['url'] = make_substitutions($newTabMenu[$i]['url'], $substitarray);
85 
86  // url = url from host, shorturl = relative path into dolibarr sources
87  $url = $shorturl = $newTabMenu[$i]['url'];
88  if (!preg_match("/^(http:\/\/|https:\/\/)/i", $newTabMenu[$i]['url'])) { // Do not change url content for external links
89  $tmp = explode('?', $newTabMenu[$i]['url'], 2);
90  $url = $shorturl = $tmp[0];
91  $param = (isset($tmp[1]) ? $tmp[1] : '');
92 
93  // Complete param to force leftmenu to '' to close open menu when we click on a link with no leftmenu defined.
94  if ((!preg_match('/mainmenu/i', $param)) && (!preg_match('/leftmenu/i', $param)) && !empty($newTabMenu[$i]['url'])) {
95  // @phan-suppress-next-line PhanTypeSuspiciousStringExpression
96  $param .= ($param ? '&' : '').'mainmenu='.$newTabMenu[$i]['mainmenu'].'&leftmenu=';
97  }
98  if ((!preg_match('/mainmenu/i', $param)) && (!preg_match('/leftmenu/i', $param)) && empty($newTabMenu[$i]['url'])) {
99  $param .= ($param ? '&' : '').'leftmenu=';
100  }
101  //$url.="idmenu=".$newTabMenu[$i]['rowid']; // Already done by menuLoad
102  $url = dol_buildpath($url, 1).($param ? '?'.$param : '');
103  //$shorturl = $shorturl.($param?'?'.$param:'');
104  $shorturl = $url;
105 
106  if (DOL_URL_ROOT) {
107  $shorturl = preg_replace('/^'.preg_quote(DOL_URL_ROOT, '/').'/', '', $shorturl);
108  }
109  }
110 
111  // TODO Find a generic solution
112  if (preg_match('/search_project_user=__search_project_user__/', $shorturl)) {
113  $search_project_user = GETPOSTINT('search_project_user');
114  if ($search_project_user) {
115  $shorturl = preg_replace('/search_project_user=__search_project_user__/', 'search_project_user='.$search_project_user, $shorturl);
116  } else {
117  $shorturl = preg_replace('/search_project_user=__search_project_user__/', '', $shorturl);
118  }
119  }
120 
121  // Define the class (top menu selected or not)
122  if (!empty($_SESSION['idmenu']) && $newTabMenu[$i]['rowid'] == $_SESSION['idmenu']) {
123  $classname = 'class="tmenusel"';
124  } elseif (!empty($_SESSION["mainmenu"]) && $newTabMenu[$i]['mainmenu'] == $_SESSION["mainmenu"]) {
125  $classname = 'class="tmenusel"';
126  } else {
127  $classname = 'class="tmenu"';
128  }
129  } elseif ($showmode == 2) {
130  $classname = 'class="tmenu"';
131  } else {
132  $classname = '';
133  }
134 
135  $menu->add($shorturl, $newTabMenu[$i]['titre'], 0, $showmode, ($newTabMenu[$i]['target'] ? $newTabMenu[$i]['target'] : $atarget), ($newTabMenu[$i]['mainmenu'] ? $newTabMenu[$i]['mainmenu'] : $newTabMenu[$i]['rowid']), ($newTabMenu[$i]['leftmenu'] ? $newTabMenu[$i]['leftmenu'] : ''), $newTabMenu[$i]['position'], $id, $idsel, $classname, $newTabMenu[$i]['prefix']);
136  }
137 
138  // Sort on position
139  $menu->liste = dol_sort_array($menu->liste, 'position');
140 
141  // Output menu entries
142  // Show logo company
143  if (!getDolGlobalString('MAIN_MENU_INVERT') && empty($noout) && getDolGlobalString('MAIN_SHOW_LOGO') && !getDolGlobalString('MAIN_OPTIMIZEFORTEXTBROWSER')) {
144  //$mysoc->logo_mini=(empty($conf->global->MAIN_INFO_SOCIETE_LOGO_MINI)?'':$conf->global->MAIN_INFO_SOCIETE_LOGO_MINI);
145  $mysoc->logo_squarred_mini = (!getDolGlobalString('MAIN_INFO_SOCIETE_LOGO_SQUARRED_MINI') ? '' : $conf->global->MAIN_INFO_SOCIETE_LOGO_SQUARRED_MINI);
146 
147  $logoContainerAdditionalClass = 'backgroundforcompanylogo';
148  if (getDolGlobalString('MAIN_INFO_SOCIETE_LOGO_NO_BACKGROUND')) {
149  $logoContainerAdditionalClass = '';
150  }
151 
152  if (!empty($mysoc->logo_squarred_mini) && is_readable($conf->mycompany->dir_output.'/logos/thumbs/'.$mysoc->logo_squarred_mini)) {
153  $urllogo = DOL_URL_ROOT.'/viewimage.php?cache=1&amp;modulepart=mycompany&amp;file='.urlencode('logos/thumbs/'.$mysoc->logo_squarred_mini);
154  /*} elseif (!empty($mysoc->logo_mini) && is_readable($conf->mycompany->dir_output.'/logos/thumbs/'.$mysoc->logo_mini))
155  {
156  $urllogo=DOL_URL_ROOT.'/viewimage.php?cache=1&amp;modulepart=mycompany&amp;file='.urlencode('logos/thumbs/'.$mysoc->logo_mini);
157  }*/
158  } else {
159  $urllogo = DOL_URL_ROOT.'/theme/dolibarr_512x512_white.png';
160  $logoContainerAdditionalClass = '';
161  }
162 
163  $title = $langs->trans("GoIntoSetupToChangeLogo");
164 
165  print "\n".'<!-- Show logo on menu -->'."\n";
166  print_start_menu_entry_auguria('companylogo', 'class="tmenu tmenucompanylogo nohover"', 1);
167 
168  print '<div class="center '.$logoContainerAdditionalClass.' menulogocontainer"><img class="mycompany" title="'.dol_escape_htmltag($title).'" alt="" src="'.$urllogo.'" style="max-width: 100px"></div>'."\n";
169 
171  }
172 
173  if (empty($noout)) {
174  foreach ($menu->liste as $menuval) {
175  print_start_menu_entry_auguria($menuval['idsel'], $menuval['classname'], $menuval['enabled']);
176  print_text_menu_entry_auguria($menuval['titre'], $menuval['enabled'], ($menuval['url'] != '#' ? DOL_URL_ROOT : '').$menuval['url'], $menuval['id'], $menuval['idsel'], $menuval['classname'], ($menuval['target'] ? $menuval['target'] : $atarget), $menuval);
177  print_end_menu_entry_auguria($menuval['enabled']);
178  }
179  }
180 
181  $showmode = 1;
182  if (empty($noout) && !getDolGlobalString('MAIN_OPTIMIZEFORTEXTBROWSER')) {
183  print_start_menu_entry_auguria('', 'class="tmenuend"', $showmode);
184  print_end_menu_entry_auguria($showmode);
186  }
187 
188  return 0;
189 }
190 
191 
198 {
199  print '<div class="tmenudiv">';
200  print '<ul role="navigation" class="tmenu"'.(getDolGlobalString('MAIN_OPTIMIZEFORTEXTBROWSER') ? ' alt="Top menu"' : '').'>';
201 }
202 
211 function print_start_menu_entry_auguria($idsel, $classname, $showmode)
212 {
213  if ($showmode) {
214  print '<li '.$classname.' id="mainmenutd_'.$idsel.'">';
215  //print '<div class="tmenuleft tmenusep"></div>';
216  print '<div class="tmenucenter">';
217  }
218 }
219 
233 function print_text_menu_entry_auguria($text, $showmode, $url, $id, $idsel, $classname, $atarget, $menuval = array())
234 {
235  global $langs, $conf;
236 
237  $classnameimg = str_replace('class="', 'class="tmenuimage ', $classname);
238  $classnametxt = str_replace('class="', 'class="tmenulabel ', $classname);
239 
240  if ($showmode == 1) {
241  print '<a '.$classnameimg.' tabindex="-1" href="'.$url.'"'.($atarget ? ' target="'.$atarget.'"' : '').' title="'.dol_escape_htmltag($text).'">';
242  print '<div class="'.$id.' '.$idsel.' topmenuimage">';
243 
244  if (!empty($menuval['prefix']) && strpos($menuval['prefix'], '<span') === 0) {
245  print $menuval['prefix'];
246  } elseif (!empty($menuval['prefix']) && strpos($menuval['prefix'], 'fa-') === 0) {
247  print '<span class="'.$id.' '.$menuval['prefix'].'" id="mainmenuspan_'.$idsel.'"></span>';
248  } else {
249  print '<span class="'.$id.' tmenuimageforpng" id="mainmenuspan_'.$idsel.'"></span>';
250  }
251  print '</div>';
252  print '</a>';
253  if (!getDolGlobalString('THEME_TOPMENU_DISABLE_TEXT')) {
254  print '<a '.$classnametxt.' id="mainmenua_'.$idsel.'" href="'.$url.'"'.($atarget ? ' target="'.$atarget.'"' : '').' title="'.dol_escape_htmltag($text).'">';
255  print '<span class="mainmenuaspan">';
256  print $text;
257  print '</span>';
258  print '</a>';
259  }
260  } elseif ($showmode == 2) {
261  print '<div '.$classnameimg.' title="'.dol_escape_htmltag($text.' - '.$langs->trans("NotAllowed")).'">';
262  print '<div class="'.$id.' '.$idsel.' topmenuimage tmenudisabled">';
263  if (!empty($menuval['prefix']) && strpos($menuval['prefix'], '<span') === 0) {
264  print $menuval['prefix'];
265  } else {
266  print '<span class="'.$id.' tmenuimageforpng tmenudisabled" id="mainmenuspan_'.$idsel.'"></span>';
267  }
268  print '</div>';
269  print '</div>';
270  if (!getDolGlobalString('THEME_TOPMENU_DISABLE_TEXT')) {
271  print '<span '.$classnametxt.' id="mainmenua_'.$idsel.'" href="#" title="'.dol_escape_htmltag($text.' - '.$langs->trans("NotAllowed")).'">';
272  print '<span class="mainmenuaspan">';
273  print $text;
274  print '</span>';
275  print '</span>';
276  }
277  }
278 }
279 
286 function print_end_menu_entry_auguria($showmode)
287 {
288  if ($showmode) {
289  print '</div></li>';
290  }
291  print "\n";
292 }
293 
300 {
301  print '</ul>';
302  print '</div>';
303  print "\n";
304 }
305 
306 
307 
324 function print_left_auguria_menu($db, $menu_array_before, $menu_array_after, &$tabMenu, &$menu, $noout = 0, $forcemainmenu = '', $forceleftmenu = '', $moredata = null, $type_user = 0)
325 {
326  global $user, $conf, $langs, $hookmanager;
327  global $dolibarr_main_db_name, $mysoc;
328 
329  $newmenu = $menu;
330 
331  $mainmenu = ($forcemainmenu ? $forcemainmenu : $_SESSION["mainmenu"]);
332  $leftmenu = ($forceleftmenu ? '' : (empty($_SESSION["leftmenu"]) ? 'none' : $_SESSION["leftmenu"]));
333 
334  global $usemenuhider;
335  $usemenuhider = 0;
336 
337  if (is_array($moredata) && !empty($moredata['searchform'])) { // searchform can contains select2 code or link to show old search form or link to switch on search page
338  print "\n";
339  print "<!-- Begin SearchForm -->\n";
340  print '<div id="blockvmenusearch" class="blockvmenusearch">'."\n";
341  print $moredata['searchform'];
342  print '</div>'."\n";
343  print "<!-- End SearchForm -->\n";
344  }
345 
346  if (is_array($moredata) && !empty($moredata['bookmarks'])) {
347  print "\n";
348  print "<!-- Begin Bookmarks -->\n";
349  print '<div id="blockvmenubookmarks" class="blockvmenubookmarks">'."\n";
350  print $moredata['bookmarks'];
351  print '</div>'."\n";
352  print "<!-- End Bookmarks -->\n";
353  }
354 
355  $substitarray = getCommonSubstitutionArray($langs, 0, null, null);
356 
357  // We update newmenu with entries found into database
358  $menuArbo = new Menubase($db, 'auguria');
359  $newmenu = $menuArbo->menuLeftCharger($newmenu, $mainmenu, $leftmenu, ($user->socid ? 1 : 0), 'auguria', $tabMenu);
360 
361  // We update newmenu for special dynamic menus
362  if (isModEnabled('bank') && $user->hasRight('banque', 'lire') && $mainmenu == 'bank') { // Entry for each bank account
363  include_once DOL_DOCUMENT_ROOT.'/compta/bank/class/account.class.php'; // Required for to get Account::TYPE_CASH for example
364 
365  $sql = "SELECT rowid, label, courant, rappro, courant";
366  $sql .= " FROM ".MAIN_DB_PREFIX."bank_account";
367  $sql .= " WHERE entity = ".$conf->entity;
368  $sql .= " AND clos = 0";
369  $sql .= " ORDER BY label";
370 
371  $resql = $db->query($sql);
372  if ($resql) {
373  $numr = $db->num_rows($resql);
374  $i = 0;
375 
376  if ($numr > 0) {
377  $newmenu->add('/compta/bank/list.php?search_status=opened', $langs->trans("BankAccounts"), 0, $user->hasRight('banque', 'lire'));
378  }
379 
380  while ($i < $numr) {
381  $objp = $db->fetch_object($resql);
382  $newmenu->add('/compta/bank/card.php?id='.$objp->rowid, $objp->label, 1, $user->hasRight('banque', 'lire'));
383  if ($objp->rappro && $objp->courant != Account::TYPE_CASH && empty($objp->clos)) { // If not cash account and not closed and can be reconciliate
384  $newmenu->add('/compta/bank/bankentries_list.php?id='.$objp->rowid, $langs->trans("Conciliate"), 2, $user->hasRight('banque', 'consolidate'));
385  }
386  $i++;
387  }
388  } else {
389  dol_print_error($db);
390  }
391  $db->free($resql);
392  }
393 
394  if (isModEnabled('accounting') && $user->hasRight('accounting', 'comptarapport', 'lire') && $mainmenu == 'accountancy') { // Entry in accountancy journal for each bank account
395  $newmenu->add('', $langs->trans("RegistrationInAccounting"), 1, $user->hasRight('accounting', 'comptarapport', 'lire'), '', 'accountancy', 'accountancy_journal', 10);
396 
397  // Multi journal
398  $sql = "SELECT rowid, code, label, nature";
399  $sql .= " FROM ".MAIN_DB_PREFIX."accounting_journal";
400  $sql .= " WHERE entity = ".$conf->entity;
401  $sql .= " AND active = 1";
402  $sql .= " ORDER BY label DESC";
403 
404  $resql = $db->query($sql);
405  if ($resql) {
406  $numr = $db->num_rows($resql);
407  $i = 0;
408 
409  if ($numr > 0) {
410  while ($i < $numr) {
411  $objp = $db->fetch_object($resql);
412 
413  $nature = '';
414 
415  // Must match array $sourceList defined into journals_list.php
416  if ($objp->nature == 2 && isModEnabled('invoice') && !getDolGlobalString('ACCOUNTING_DISABLE_BINDING_ON_SALES')) {
417  $nature = "sells";
418  }
419  if ($objp->nature == 3
420  && isModEnabled('supplier_invoice')
421  && !getDolGlobalString('ACCOUNTING_DISABLE_BINDING_ON_PURCHASES')) {
422  $nature = "purchases";
423  }
424  if ($objp->nature == 4 && isModEnabled('bank')) {
425  $nature = "bank";
426  }
427  if ($objp->nature == 5 && isModEnabled('expensereport') && !getDolGlobalString('ACCOUNTING_DISABLE_BINDING_ON_EXPENSEREPORTS')) {
428  $nature = "expensereports";
429  }
430  if ($objp->nature == 1) {
431  $nature = "various";
432  }
433  if ($objp->nature == 8) {
434  $nature = "inventory";
435  }
436  if ($objp->nature == 9) {
437  $nature = "hasnew";
438  }
439 
440  // To enable when page exists
441  if (!getDolGlobalString('ACCOUNTANCY_SHOW_DEVELOP_JOURNAL')) {
442  if ($nature == 'hasnew' || $nature == 'inventory') {
443  $nature = '';
444  }
445  }
446 
447  if ($nature) {
448  $langs->load('accountancy');
449  $journallabel = $langs->transnoentities($objp->label); // Labels in this table are set by loading llx_accounting_abc.sql. Label can be 'ACCOUNTING_SELL_JOURNAL', 'InventoryJournal', ...
450  $newmenu->add('/accountancy/journal/'.$nature.'journal.php?mainmenu=accountancy&leftmenu=accountancy_journal&id_journal='.$objp->rowid, $journallabel, 2, $user->hasRight('accounting', 'comptarapport', 'lire'));
451  }
452  $i++;
453  }
454  } else {
455  // Should not happen. Entries are added
456  $newmenu->add('', $langs->trans("NoJournalDefined"), 2, $user->hasRight('accounting', 'comptarapport', 'lire'));
457  }
458  } else {
459  dol_print_error($db);
460  }
461  $db->free($resql);
462  }
463 
464  if (isModEnabled('ftp') && $mainmenu == 'ftp') { // Entry for FTP
465  $MAXFTP = 20;
466  $i = 1;
467  while ($i <= $MAXFTP) {
468  $paramkey = 'FTP_NAME_'.$i;
469  //print $paramkey;
470  if (!empty($conf->global->$paramkey)) {
471  $link = "/ftp/index.php?idmenu=".$_SESSION["idmenu"]."&numero_ftp=".$i;
472 
473  $newmenu->add($link, dol_trunc($conf->global->$paramkey, 24));
474  }
475  $i++;
476  }
477  }
478 
479 
480  // Build final $menu_array = $menu_array_before +$newmenu->liste + $menu_array_after
481  //var_dump($menu_array_before);exit;
482  //var_dump($menu_array_after);exit;
483  $menu_array = $newmenu->liste;
484  if (is_array($menu_array_before)) {
485  $menu_array = array_merge($menu_array_before, $menu_array);
486  }
487  if (is_array($menu_array_after)) {
488  $menu_array = array_merge($menu_array, $menu_array_after);
489  }
490  //var_dump($menu_array);exit;
491  if (!is_array($menu_array)) {
492  return 0;
493  }
494 
495  // Allow the $menu_array of the menu to be manipulated by modules
496  $parameters = array(
497  'mainmenu' => $mainmenu,
498  );
499  $hook_items = $menu_array;
500  $reshook = $hookmanager->executeHooks('menuLeftMenuItems', $parameters, $hook_items); // Note that $action and $object may have been modified by some hooks
501 
502  if (is_numeric($reshook)) {
503  if ($reshook == 0 && !empty($hookmanager->results)) {
504  $menu_array[] = $hookmanager->results; // add
505  } elseif ($reshook == 1) {
506  $menu_array = $hookmanager->results; // replace
507  }
508 
509  // @todo Sort menu items by 'position' value
510  // $position = array();
511  // foreach ($menu_array as $key => $row) {
512  // $position[$key] = $row['position'];
513  // }
514  // $array1_sort_order = SORT_ASC;
515  // array_multisort($position, $array1_sort_order, $menu_array);
516  }
517 
518  // Phan has a hard time tracking the type, for instance because it get hookmanager->results
519  // Force the typing at this point to get useful analysis below:
520  '@phan-var-force array<array{rowid:string,fk_menu:string,langs:string,enabled:int<0,2>,type:string,fk_mainmenu:string,fk_leftmenu:string,url:string,titre:string,perms:string,target:string,mainmenu:string,leftmenu:string,position:int,prefix:string,level:int}> $menu_array';
521 
522  // Show menu
523  $invert = !getDolGlobalString('MAIN_MENU_INVERT') ? "" : "invert";
524  if (empty($noout)) {
525  $altok = 0;
526  $blockvmenuopened = false;
527  $lastlevel0 = '';
528  $num = count($menu_array);
529  foreach (array_keys($menu_array) as $i) { // Loop on each menu entry (foreach better for static analysis)
530  $showmenu = true;
531  if (getDolGlobalString('MAIN_MENU_HIDE_UNAUTHORIZED') && empty($menu_array[$i]['enabled'])) {
532  $showmenu = false;
533  }
534 
535  // Begin of new left menu block
536  if (empty($menu_array[$i]['level']) && $showmenu) {
537  $altok++;
538  $blockvmenuopened = true;
539  $lastopened = true;
540  for ($j = ($i + 1); $j < $num; $j++) {
541  if (empty($menu_array[$j]['level'])) {
542  $lastopened = false;
543  }
544  }
545  if ($altok % 2 == 0) {
546  print '<div class="blockvmenu blockvmenuimpair'.$invert.($lastopened ? ' blockvmenulast' : '').($altok == 1 ? ' blockvmenufirst' : '').'">'."\n";
547  } else {
548  print '<div class="blockvmenu blockvmenupair'.$invert.($lastopened ? ' blockvmenulast' : '').($altok == 1 ? ' blockvmenufirst' : '').'">'."\n";
549  }
550  }
551 
552  // Add tabulation
553  $tabstring = '';
554  $tabul = ($menu_array[$i]['level'] - 1);
555  if ($tabul > 0) {
556  for ($j = 0; $j < $tabul; $j++) {
557  $tabstring .= '&nbsp;&nbsp;&nbsp;';
558  }
559  }
560 
561  // $menu_array[$i]['url'] can be a relative url, a full external url. We try substitution
562 
563  $menu_array[$i]['url'] = make_substitutions($menu_array[$i]['url'], $substitarray);
564 
565  $url = $shorturl = $shorturlwithoutparam = $menu_array[$i]['url'];
566  if (!preg_match("/^(http:\/\/|https:\/\/)/i", $menu_array[$i]['url'])) {
567  $tmp = explode('?', $menu_array[$i]['url'], 2);
568  $url = $shorturl = $tmp[0];
569  $param = (isset($tmp[1]) ? $tmp[1] : ''); // params in url of the menu link
570 
571  // Complete param to force leftmenu to '' to close open menu when we click on a link with no leftmenu defined.
572  if ((!preg_match('/mainmenu/i', $param)) && (!preg_match('/leftmenu/i', $param)) && !empty($menu_array[$i]['mainmenu'])) {
573  $param .= ($param ? '&' : '').'mainmenu='.$menu_array[$i]['mainmenu'].'&leftmenu=';
574  }
575  if ((!preg_match('/mainmenu/i', $param)) && (!preg_match('/leftmenu/i', $param)) && empty($menu_array[$i]['mainmenu'])) {
576  $param .= ($param ? '&' : '').'leftmenu=';
577  }
578  //$url.="idmenu=".$menu_array[$i]['rowid']; // Already done by menuLoad
579  $url = dol_buildpath($url, 1).($param ? '?'.$param : '');
580  $shorturlwithoutparam = $shorturl;
581  $shorturl = $shorturl.($param ? '?'.$param : '');
582  }
583 
584 
585  print '<!-- Process menu entry with mainmenu='.$menu_array[$i]['mainmenu'].', leftmenu='.$menu_array[$i]['leftmenu'].', level='.$menu_array[$i]['level'].' enabled='.$menu_array[$i]['enabled'].', position='.$menu_array[$i]['position'].' prefix='.$menu_array[$i]['prefix'].' -->'."\n";
586 
587  // Menu level 0
588  if ($menu_array[$i]['level'] == 0) {
589  if ($menu_array[$i]['enabled']) { // Enabled so visible
590  print '<div class="menu_titre">'.$tabstring;
591  if ($shorturlwithoutparam) {
592  print '<a class="vmenu" title="'.dol_escape_htmltag(dol_string_nohtmltag($menu_array[$i]['titre'])).'" href="'.$url.'"'.($menu_array[$i]['target'] ? ' target="'.$menu_array[$i]['target'].'"' : '').'>';
593  } else {
594  print '<span class="vmenu">';
595  }
596  if (!empty($menu_array[$i]['prefix'])) {
597  if (preg_match('/^fa\-[a-zA-Z0-9\-_]+$/', $menu_array[$i]['prefix'])) {
598  print '<span class="fas '.$menu_array[$i]['prefix'].' paddingright pictofixedwidth"></span>';
599  } else {
600  print $menu_array[$i]['prefix'];
601  }
602  }
603 
604  // print ($menu_array[$i]['prefix'] ? $menu_array[$i]['prefix'] : '');
605  print $menu_array[$i]['titre'];
606  if ($shorturlwithoutparam) {
607  print '</a>';
608  } else {
609  print '</span>';
610  }
611  print '</div>'."\n";
612  $lastlevel0 = 'enabled';
613  } elseif ($showmenu) { // Not enabled but visible (so greyed)
614  print '<div class="menu_titre">'.$tabstring;
615  print '<span class="vmenudisabled">';
616  if (!empty($menu_array[$i]['prefix'])) {
617  print $menu_array[$i]['prefix'];
618  }
619  print $menu_array[$i]['titre'];
620  print '</span>';
621  print '</div>'."\n";
622  $lastlevel0 = 'greyed';
623  } else {
624  $lastlevel0 = 'hidden';
625  }
626  if ($showmenu) {
627  print '<div class="menu_top"></div>'."\n";
628  }
629  }
630 
631  // Menu level > 0
632  if ($menu_array[$i]['level'] > 0) {
633  $cssmenu = '';
634  if ($menu_array[$i]['url']) {
635  $cssmenu = ' menu_contenu'.dol_string_nospecial(preg_replace('/\.php.*$/', '', $menu_array[$i]['url']));
636  }
637 
638  if ($menu_array[$i]['enabled'] && $lastlevel0 == 'enabled') {
639  // Enabled so visible, except if parent was not enabled.
640  print '<div class="menu_contenu'.$cssmenu.'">';
641  print $tabstring;
642  if ($shorturlwithoutparam) {
643  print '<a class="vsmenu" title="'.dol_escape_htmltag(dol_string_nohtmltag($menu_array[$i]['titre'])).'" href="'.$url.'"'.($menu_array[$i]['target'] ? ' target="'.$menu_array[$i]['target'].'"' : '').'>';
644  } else {
645  print '<span class="vsmenu" title="'.dol_escape_htmltag($menu_array[$i]['titre']).'">';
646  }
647  print $menu_array[$i]['titre'];
648  if ($shorturlwithoutparam) {
649  print '</a>';
650  } else {
651  print '</span>';
652  }
653  // If title is not pure text and contains a table, no carriage return added
654  if (!strstr($menu_array[$i]['titre'], '<table')) {
655  print '<br>';
656  }
657  print '</div>'."\n";
658  } elseif ($showmenu && $lastlevel0 == 'enabled') {
659  // Not enabled but visible (so greyed), except if parent was not enabled.
660  print '<div class="menu_contenu'.$cssmenu.'">';
661  print $tabstring;
662  print '<span class="spanlilevel0 vsmenudisabled vsmenudisabledmargin">'.$menu_array[$i]['titre'].'</span><br>';
663  print '</div>'."\n";
664  }
665  }
666 
667  // If next is a new block or if there is nothing after
668  if (empty($menu_array[$i + 1]['level'])) { // End menu block
669  if ($showmenu) {
670  print '<div class="menu_end"></div>'."\n";
671  }
672  if ($blockvmenuopened) {
673  print '</div>'."\n";
674  $blockvmenuopened = false;
675  }
676  }
677  }
678 
679  if ($altok) {
680  print '<div class="blockvmenuend"></div>'; // End menu block
681  }
682  }
683 
684  return count($menu_array);
685 }
686 
687 
696 function dol_auguria_showmenu($type_user, &$menuentry, &$listofmodulesforexternal)
697 {
698  global $conf;
699 
700  //print 'type_user='.$type_user.' module='.$menuentry['module'].' enabled='.$menuentry['enabled'].' perms='.$menuentry['perms'];
701  //print 'ok='.in_array($menuentry['module'], $listofmodulesforexternal);
702  if (empty($menuentry['enabled'])) {
703  return 0; // Entry disabled by condition
704  }
705  if ($type_user && $menuentry['module']) {
706  $tmploops = explode('|', $menuentry['module']);
707  $found = 0;
708  foreach ($tmploops as $tmploop) {
709  if (in_array($tmploop, $listofmodulesforexternal)) {
710  $found++;
711  break;
712  }
713  }
714  if (!$found) {
715  return 0; // Entry is for menus all excluded to external users
716  }
717  }
718  if (!$menuentry['perms'] && $type_user) {
719  return 0; // No permissions and user is external
720  }
721  if (!$menuentry['perms'] && getDolGlobalString('MAIN_MENU_HIDE_UNAUTHORIZED')) {
722  return 0; // No permissions and option to hide when not allowed, even for internal user, is on
723  }
724  if (!$menuentry['perms']) {
725  return 2; // No permissions and user is external
726  }
727  return 1;
728 }
print_text_menu_entry_auguria($text, $showmode, $url, $id, $idsel, $classname, $atarget, $menuval=array())
Output menu entry.
print_start_menu_entry_auguria($idsel, $classname, $showmode)
Output start menu entry.
print_end_menu_array_auguria()
Output menu array.
print_end_menu_entry_auguria($showmode)
Output end menu entry.
print_left_auguria_menu($db, $menu_array_before, $menu_array_after, &$tabMenu, &$menu, $noout=0, $forcemainmenu='', $forceleftmenu='', $moredata=null, $type_user=0)
Core function to output left menu auguria Fill &$menu (example with $forcemainmenu='home' $forceleftm...
print_auguria_menu($db, $atarget, $type_user, &$tabMenu, &$menu, $noout=0, $mode='')
Core function to output top menu auguria.
Definition: auguria.lib.php:41
print_start_menu_array_auguria()
Output start menu array.
dol_auguria_showmenu($type_user, &$menuentry, &$listofmodulesforexternal)
Function to test if an entry is enabled or not.
const TYPE_CASH
Cash account.
Class to manage menu entries.
if(isModEnabled('invoice') && $user->hasRight('facture', 'lire')) if((isModEnabled('fournisseur') &&!getDolGlobalString('MAIN_USE_NEW_SUPPLIERMOD') && $user->hasRight("fournisseur", "facture", "lire"))||(isModEnabled('supplier_invoice') && $user->hasRight("supplier_invoice", "lire"))) if(isModEnabled('don') && $user->hasRight('don', 'lire')) if(isModEnabled('tax') && $user->hasRight('tax', 'charges', 'lire')) if(isModEnabled('invoice') &&isModEnabled('order') && $user->hasRight("commande", "lire") &&!getDolGlobalString('WORKFLOW_DISABLE_CREATE_INVOICE_FROM_ORDER')) $sql
Social contributions to pay.
Definition: index.php:745
GETPOSTINT($paramname, $method=0)
Return the value of a $_GET or $_POST supervariable, converted into integer.
dol_string_nohtmltag($stringtoclean, $removelinefeed=1, $pagecodeto='UTF-8', $strip_tags=0, $removedoublespaces=1)
Clean a string from all HTML tags and entities.
getDolGlobalInt($key, $default=0)
Return a Dolibarr global constant int value.
dol_sort_array(&$array, $index, $order='asc', $natsort=0, $case_sensitive=0, $keepindex=0)
Advanced sort array by the value of a given key, which produces ascending (default) or descending out...
make_substitutions($text, $substitutionarray, $outputlangs=null, $converttextinhtmlifnecessary=0)
Make substitution into a text string, replacing keys with vals from $substitutionarray (oldval=>newva...
dol_buildpath($path, $type=0, $returnemptyifnotfound=0)
Return path of url or filesystem.
dol_print_error($db=null, $error='', $errors=null)
Displays error message system with all the information to facilitate the diagnosis and the escalation...
dol_trunc($string, $size=40, $trunc='right', $stringencoding='UTF-8', $nodot=0, $display=0)
Truncate a string to a particular length adding '…' if string larger than length.
getCommonSubstitutionArray($outputlangs, $onlykey=0, $exclude=null, $object=null, $include=null)
Return array of possible common substitutions.
getDolGlobalString($key, $default='')
Return dolibarr global constant string value.
isModEnabled($module)
Is Dolibarr module enabled.
dol_escape_htmltag($stringtoescape, $keepb=0, $keepn=0, $noescapetags='', $escapeonlyhtmltags=0, $cleanalsojavascript=0)
Returns text escaped for inclusion in HTML alt or title or value tags, or into values of HTML input f...