2 /**********************************************************************
3 Copyright (C) FrontAccounting, LLC.
4 Released under the terms of the GNU General Public License, GPL,
5 as published by the Free Software Foundation, either version 3
6 of the License, or (at your option) any later version.
7 This program is distributed in the hope that it will be useful,
8 but WITHOUT ANY WARRANTY; without even the implied warranty of
9 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
10 See the License here <http://www.gnu.org/licenses/gpl-3.0.html>.
11 ***********************************************************************/
12 include_once($path_to_root . "/includes/prefs/userprefs.inc");
14 //--------------------------------------------------------------------------
27 var $role_set = false;
34 function current_user()
38 $this->loginname = $this->username = $this->name = "";
39 $this->company = isset($def_coy)? $def_coy : 0;
40 $this->logged = false;
42 $this->prefs = new user_prefs();
50 function set_company($company)
52 $this->company = $company;
55 function login($company, $loginname, $password)
57 global $security_areas, $security_groups, $security_headings, $path_to_root;
59 $this->set_company($company);
60 $this->logged = false;
62 $Auth_Result = get_user_for_login($loginname, $password);
64 if (db_num_rows($Auth_Result) > 0)
66 $myrow = db_fetch($Auth_Result);
67 $this->old_db = isset($myrow["full_access"]);
68 if (! @$myrow["inactive"]) {
71 // db was not yet upgraded after source update to v.2.2
72 // give enough access for admin user to continue upgrade
73 if (!isset($security_groups) || !isset($security_headings)) {
74 echo "<center><br><br><font size='5' color='red'><b>";
75 echo _('Before software upgrade you have to include old $security_groups and $security_headings arrays from old config.php file to the new one.');
76 echo '<br>'."<a href=$path_to_root/index.php>"._("Back")."</a>";
77 echo "</b></font><br><br></center>";
80 $this->access = $myrow["full_access"];
81 if (in_array(20, $security_groups[$this->access]))
82 // temporary access for admin users
83 $this->role_set[] = $security_areas['SA_SOFTWAREUPGRADE'][0];
85 echo "<center><br><br><font size='5' color='red'><b>";
86 echo _('System is available for site admin only until full database upgrade');
87 echo "</b></font><br><br></center>";
91 $this->role_set = array();
92 $this->access = $myrow["role_id"];
93 // store area codes available for current user role
94 $role = get_security_role($this->access);
97 foreach( $role['areas'] as $code )
98 // filter only area codes for enabled security sections
99 if (in_array($code&~0xff, $role['sections']))
100 $this->role_set[] = $code;
102 $this->name = $myrow["real_name"];
103 $this->pos = $myrow["pos"];
104 $this->loginname = $loginname;
105 $this->username = $this->loginname;
106 $this->prefs = new user_prefs($myrow);
107 $this->user = @$myrow["id"];
108 update_user_visitdate($this->username);
109 $this->logged = true;
110 $this->last_act = time();
111 $this->timeout = session_timeout();
114 return $this->logged;
117 function check_user_access()
119 global $security_groups;
121 // notification after upgrade from pre-2.2 version
122 return isset($security_groups) && is_array(@$security_groups[$this->access]);
124 return !isset($security_groups) && is_array($this->role_set);
127 function can_access($page_level)
129 global $security_groups, $security_areas;
130 if (isset($security_groups)) {
131 return $this->company == 0 &&
132 in_array(20, $security_groups[$this->access]);
135 if ($page_level === 'SA_OPEN')
137 if ($page_level === 'SA_DENIED' || $page_level === '')
140 $code = $security_areas[$page_level][0];
142 // only first registered company has site admin privileges
143 return $code && in_array($code, $this->role_set)
144 && ($this->company == 0 || (($code&~0xff) != SS_SADMIN));
147 function can_access_page($page_level)
149 return $this->can_access($page_level);
152 function get_db_connection($id=-1)
154 global $db_connections;
156 $connection = $db_connections[$id == -1 ? $this->company : $id];
158 //print_r($connection);
160 $db = mysql_connect($connection["host"] ,
161 $connection["dbuser"], $connection["dbpassword"]);
162 mysql_select_db($connection["dbname"],$db);
164 if (!defined('TB_PREF'))
165 define('TB_PREF', $connection["tbpref"]);
170 function update_prefs($prefs)
172 global $allow_demo_mode;
174 if(!$allow_demo_mode) {
175 update_user_prefs($this->user, $prefs);
178 $this->prefs = new user_prefs(get_user($this->user));
182 //--------------------------------------------------------------------------
184 function round2($number, $decimals=0)
186 $delta = ($number < 0 ? -.0000000001 : .0000000001);
187 return round($number+$delta, $decimals);
191 Returns number formatted according to user setup and using $decimals digits after dot
192 (defualt is 0). When $decimals is set to 'max' maximum available precision is used
193 (decimals depend on value) and trailing zeros are trimmed.
195 function number_format2($number, $decimals=0)
197 global $thoseps, $decseps;
198 $tsep = $thoseps[$_SESSION["wa_current_user"]->prefs->tho_sep()];
199 $dsep = $decseps[$_SESSION["wa_current_user"]->prefs->dec_sep()];
200 //return number_format($number, $decimals, $dsep, $tsep);
201 if($decimals==='max')
202 $dec = 15 - floor(log10(abs($number)));
204 $delta = ($number < 0 ? -.0000000001 : .0000000001);
209 $num = number_format($number, $dec, $dsep, $tsep);
211 return $decimals==='max' ? rtrim($num, '0') : $num;
217 function fallback_mode() {
218 return $_SESSION["wa_current_user"]->ui_mode==0;
221 function price_format($number) {
222 return number_format2($number,
223 $_SESSION["wa_current_user"]->prefs->price_dec());
226 function price_decimal_format($number, &$dec)
228 $dec = user_price_dec();
229 $str = strval($number);
230 $pos = strpos($str, '.');
233 $len = strlen(substr($str, $pos + 1));
237 return number_format2($number, $dec);
239 // function money_format doesn't exist in OS Win.
240 if (!function_exists('money_format'))
242 function money_format($format, $number)
244 return price_format($number);
248 // 2008-06-15. Added extra parameter $stock_id and reference for $dec
249 //--------------------------------------------------------------------
250 function qty_format($number, $stock_id=null, &$dec) {
251 $dec = get_qty_dec($stock_id);
252 return number_format2($number, $dec);
256 function get_qty_dec($stock_id=null)
258 global $path_to_root;
259 include_once($path_to_root."/inventory/includes/db/items_units_db.inc");
260 if ($stock_id != null)
261 $dec = get_unit_dec($stock_id);
262 if ($stock_id == null || $dec == -1 || $dec == null)
263 $dec = $_SESSION["wa_current_user"]->prefs->qty_dec();
266 //-------------------------------------------------------------------
268 // Maximum precision format. Strips trailing unsignificant digits.
270 function maxprec_format($number) {
271 return number_format2($number, 'max');
274 function exrate_format($number) {
275 return number_format2($number,
276 $_SESSION["wa_current_user"]->prefs->exrate_dec());
279 function percent_format($number) {
280 return number_format2($number,
281 $_SESSION["wa_current_user"]->prefs->percent_dec());
284 function user_numeric($input) {
285 global $decseps, $thoseps;
288 $sep = $thoseps[user_tho_sep()];
290 $num = str_replace( $sep, '', $num);
292 $sep = $decseps[user_dec_sep()];
294 $num = str_replace( $sep, '.', $num);
296 if (!is_numeric($num))
299 if ($num == (int)$num)
305 function user_company()
309 return isset($_SESSION["wa_current_user"]) ? $_SESSION["wa_current_user"]->company : $def_coy;
314 return $_SESSION["wa_current_user"]->pos;
317 function user_language()
319 return $_SESSION["wa_current_user"]->prefs->language();
322 function user_qty_dec()
324 return $_SESSION["wa_current_user"]->prefs->qty_dec();
327 function user_price_dec()
329 return $_SESSION["wa_current_user"]->prefs->price_dec();
332 function user_exrate_dec()
334 return $_SESSION["wa_current_user"]->prefs->exrate_dec();
337 function user_percent_dec()
339 return $_SESSION["wa_current_user"]->prefs->percent_dec();
342 function user_show_gl_info()
344 return $_SESSION["wa_current_user"]->prefs->show_gl_info();
347 function user_show_codes()
349 return $_SESSION["wa_current_user"]->prefs->show_codes();
352 function user_date_format()
354 return $_SESSION["wa_current_user"]->prefs->date_format();
357 function user_date_display()
359 return $_SESSION["wa_current_user"]->prefs->date_display();
362 function user_date_sep()
364 return $_SESSION["wa_current_user"]->prefs->date_sep();
367 function user_tho_sep()
369 return $_SESSION["wa_current_user"]->prefs->tho_sep();
372 function user_dec_sep()
374 return $_SESSION["wa_current_user"]->prefs->dec_sep();
377 function user_theme()
379 return isset($_SESSION["wa_current_user"]) ?
380 $_SESSION["wa_current_user"]->prefs->get_theme() : 'default';
383 function user_pagesize()
385 return $_SESSION["wa_current_user"]->prefs->get_pagesize();
388 function user_hints()
390 return $_SESSION["wa_current_user"]->prefs->show_hints();
393 function user_print_profile()
395 return $_SESSION["wa_current_user"]->prefs->print_profile();
398 function user_rep_popup()
400 return $_SESSION["wa_current_user"]->prefs->rep_popup();
403 function user_query_size()
405 return $_SESSION["wa_current_user"]->prefs->query_size();
408 function user_graphic_links()
410 return $_SESSION["wa_current_user"]->prefs->graphic_links();
413 function sticky_doc_date()
415 return $_SESSION["wa_current_user"]->prefs->sticky_date();
418 function user_startup_tab()
420 return $_SESSION["wa_current_user"]->prefs->start_up_tab();
423 function set_user_prefs($prefs)
425 $_SESSION["wa_current_user"]->update_prefs($prefs);
428 function add_user_js_data() {
429 global $path_to_root, $thoseps, $decseps, $date_system, $dateseps;
431 $ts = $thoseps[user_tho_sep()];
432 $ds = $decseps[user_dec_sep()];
436 . "theme: '". $path_to_root . '/themes/'. user_theme().'/'."',\n"
437 . "loadtxt: '"._('Requesting data...')."',\n"
438 . "date: '".Today()."',\n" // server date
439 . "datesys: ".$date_system.",\n"
440 . "datefmt: ".user_date_format().",\n"
441 . "datesep: '".$dateseps[user_date_sep()]."',\n"
444 . "pdec : " . user_price_dec() . "}\n";
449 //--------------------------------------------------------------------------
451 function session_timeout()
453 $tout = @get_company_pref('login_tout'); // mask warning for db ver. 2.2
454 return $tout ? $tout : ini_get('session.gc_maxlifetime');
457 //-----------------------------------------------------------------------------
458 // Inserts $elements into $array at position $index.
459 // $elements is list of any objects
461 function array_insert(&$array, $index, $elements)
463 if (!is_array($elements)) $elements = array($elements);
465 $head = array_splice($array, 0, $index);
466 $array = array_merge($head, $elements, $array);
469 function array_remove(&$array, $index, $len=1)
471 array_splice($array, $index, $len);
474 function array_substitute(&$array, $index, $len, $elements)
476 array_splice($array, $index, $len);
477 array_insert($array, $index, $elements);
480 function array_append(&$array, $elements)
482 foreach($elements as $key => $el) {
490 // Search $needle in $haystack or in $haystack[][$valuekey]
491 // returns $needle found or null.
493 function array_search_value($needle, $haystack, $valuekey=null)
495 foreach($haystack as $key => $value) {
496 $val = isset($valuekey) ? @$value[$valuekey] : $value;
497 if ($needle == $val){
504 // Search $needle in $haystack or in $haystack[][$valuekey]
505 // returns array of keys of $haystack elements found
507 function array_search_keys($needle, $haystack, $valuekey=null)
511 foreach($haystack as $key => $value) {
512 $val = isset($valuekey) ? @$value[$valuekey] : $value;
513 if ($needle == $val){
520 // Find first (single) $needle in $haystack or in $haystack[][$valuekey]
521 // returns $haystack element found or null
523 function array_search_key($needle, $haystack, $valuekey=null)
525 $keys = array_search_keys($needle, $haystack, $valuekey);
529 function flush_dir($path, $wipe = false)
531 $dir = opendir($path);
532 while(false !== ($fname = readdir($dir))) {
533 if($fname=='.' || $fname=='..' || $fname=='CVS' || (!$wipe && $fname=='index.php')) continue;
534 if(is_dir($path.'/'.$fname)) {
535 flush_dir($path.'/'.$fname, $wipe);
536 if ($wipe) @rmdir($path.'/'.$fname);
538 @unlink($path.'/'.$fname);
542 Returns current path to company private folder.
543 (Current path can change after chdir).
545 function company_path($comp=null)
547 global $path_to_root, $comp_path;
550 $comp = user_company();
552 // if path is relative, set current path_to_root
553 return ($comp_path[0]=='.' ? $path_to_root.'/'.basename($comp_path) : $comp_path)