Sql-injection functions and techniques for escaping(take 3):
[openemr.git] / interface / globals.php
blob2748ec6af76a22bf3b0caeed6ffe881c11db0a5b
1 <?php
2 /* $Id$ */
3 // ------------------------------------------------------------------------ //
4 // OpenEMR Electronic Medical Records System //
5 // Copyright (c) 2005-2010 oemr.org //
6 // <http://www.oemr.org/> //
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 2 of the License, or //
11 // (at your option) any later version. //
12 // //
13 // You may not change or alter any portion of this comment or credits //
14 // of supporting developers from this source code or any supporting //
15 // source code which is considered copyrighted (c) material of the //
16 // original comment or credit authors. //
17 // //
18 // This program is distributed in the hope that it will be useful, //
19 // but WITHOUT ANY WARRANTY; without even the implied warranty of //
20 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the //
21 // GNU General Public License for more details. //
22 // //
23 // You should have received a copy of the GNU General Public License //
24 // along with this program; if not, write to the Free Software //
25 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA //
26 // ------------------------------------------------------------------------ //
28 // Is this windows or non-windows? Create a boolean definition.
29 if (!defined('IS_WINDOWS'))
30 define('IS_WINDOWS', (stripos(PHP_OS,'WIN') === 0));
32 // Some important php.ini overrides. Defaults for these values are often
33 // too small. You might choose to adjust them further.
35 ini_set('memory_limit', '64M');
36 ini_set('session.gc_maxlifetime', '14400');
38 /* If the includer didn't specify, assume they want us to "fake" register_globals. */
39 if (!isset($fake_register_globals)) {
40 $fake_register_globals = TRUE;
43 /* Pages with "myadmin" in the URL don't need register_globals. */
44 $fake_register_globals =
45 $fake_register_globals && (strpos($_SERVER['REQUEST_URI'],"myadmin") === FALSE);
47 // Emulates register_globals = On. Moved to here from the bottom of this file
48 // to address security issues. Need to change everything requiring this!
49 if ($fake_register_globals) {
50 extract($_GET);
51 extract($_POST);
54 // This is for sanitization of all escapes.
55 // (ie. reversing magic quotes if it's set)
56 if (isset($sanitize_all_escapes) && $sanitize_all_escapes) {
57 if (get_magic_quotes_gpc()) {
58 function undoMagicQuotes($array, $topLevel=true) {
59 $newArray = array();
60 foreach($array as $key => $value) {
61 if (!$topLevel) {
62 $key = stripslashes($key);
64 if (is_array($value)) {
65 $newArray[$key] = undoMagicQuotes($value, false);
67 else {
68 $newArray[$key] = stripslashes($value);
71 return $newArray;
73 $_GET = undoMagicQuotes($_GET);
74 $_POST = undoMagicQuotes($_POST);
75 $_COOKIE = undoMagicQuotes($_COOKIE);
76 $_REQUEST = undoMagicQuotes($_REQUEST);
81 // The webserver_root and web_root are now automatically collected.
82 // If not working, can set manually below.
83 // Auto collect the full absolute directory path for openemr.
84 $webserver_root = dirname(dirname(__FILE__));
85 if (IS_WINDOWS) {
86 //convert windows path separators
87 $webserver_root = str_replace("\\","/",$webserver_root);
89 // Auto collect the relative html path, i.e. what you would type into the web
90 // browser after the server address to get to OpenEMR.
91 $web_root = substr($webserver_root, strlen($_SERVER['DOCUMENT_ROOT']));
92 // Ensure web_root starts with a path separator
93 if (preg_match("/^[^\/]/",$web_root)) {
94 $web_root = "/".$web_root;
96 // The webserver_root and web_root are now automatically collected in
97 // real time per above code. If above is not working, can uncomment and
98 // set manually here:
99 // $webserver_root = "/var/www/openemr";
100 // $web_root = "/openemr";
103 // This is the directory that contains site-specific data. Change this
104 // only if you have some reason to.
105 $GLOBALS['OE_SITES_BASE'] = "$webserver_root/sites";
107 // The session name names a cookie stored in the browser.
108 // If you modify session_name, then need to place the identical name in
109 // the phpmyadmin file here: openemr/phpmyadmin/libraries/session.inc.php
110 // at line 71. This was required after embedded new phpmyadmin version on
111 // 05-12-2009 by Brady. Hopefully will figure out a more appropriate fix.
112 // Now that restore_session() is implemented in javaScript, session IDs are
113 // effectively saved in the top level browser window and there is no longer
114 // any need to change the session name for different OpenEMR instances.
115 session_name("OpenEMR");
117 session_start();
119 // Set the site ID if required. This must be done before any database
120 // access is attempted.
121 if (empty($_SESSION['site_id']) || !empty($_GET['site'])) {
122 if (!empty($_GET['site'])) {
123 $tmp = $_GET['site'];
125 else {
126 if (!$ignoreAuth) die("Site ID is missing from session data!");
127 $tmp = $_SERVER['HTTP_HOST'];
128 if (!is_dir($GLOBALS['OE_SITES_BASE'] . "/$tmp")) $tmp = "default";
130 if (empty($tmp) || preg_match('/[^A-Za-z0-9\\-.]/', $tmp))
131 die("Site ID '". htmlspecialchars($tmp,ENT_NOQUOTES) . "' contains invalid characters.");
132 if (!isset($_SESSION['site_id']) || $_SESSION['site_id'] != $tmp) {
133 $_SESSION['site_id'] = $tmp;
134 //error_log("Session site ID has been set to '$tmp'"); // debugging
138 // Set the site-specific directory path.
139 $GLOBALS['OE_SITE_DIR'] = $GLOBALS['OE_SITES_BASE'] . "/" . $_SESSION['site_id'];
141 require_once($GLOBALS['OE_SITE_DIR'] . "/config.php");
143 // Collecting the utf8 disable flag from the sqlconf.php file in order
144 // to set the correct html encoding. utf8 vs iso-8859-1. If flag is set
145 // then set to iso-8859-1.
146 require_once(dirname(__FILE__) . "/../library/sqlconf.php");
147 if (!$disable_utf8_flag) {
148 ini_set('default_charset', 'utf-8');
149 $HTML_CHARSET = "UTF-8";
151 else {
152 ini_set('default_charset', 'iso-8859-1');
153 $HTML_CHARSET = "ISO-8859-1";
156 // Root directory, relative to the webserver root:
157 $GLOBALS['rootdir'] = "$web_root/interface";
158 $rootdir = $GLOBALS['rootdir'];
159 // Absolute path to the source code include and headers file directory (Full path):
160 $GLOBALS['srcdir'] = "$webserver_root/library";
161 // Absolute path to the location of documentroot directory for use with include statements:
162 $GLOBALS['fileroot'] = "$webserver_root";
163 // Absolute path to the location of interface directory for use with include statements:
164 $include_root = "$webserver_root/interface";
165 // Absolute path to the location of documentroot directory for use with include statements:
166 $GLOBALS['webroot'] = $web_root;
168 $GLOBALS['template_dir'] = $GLOBALS['fileroot'] . "/templates/";
169 $GLOBALS['incdir'] = $include_root;
170 // Location of the login screen file
171 $GLOBALS['login_screen'] = $GLOBALS['rootdir'] . "/login_screen.php";
173 // Variable set for Eligibility Verification [EDI-271] path
174 $GLOBALS['edi_271_file_path'] = $GLOBALS['OE_SITE_DIR'] . "/edi/";
176 // Include the translation engine. This will also call sql.inc to
177 // open the openemr mysql connection.
178 include_once (dirname(__FILE__) . "/../library/translation.inc.php");
180 // Include convenience functions with shorter names than "htmlspecialchars" (for security)
181 require_once (dirname(__FILE__) . "/../library/htmlspecialchars.inc.php");
183 // Include sanitization/checking functions (for security)
184 require_once (dirname(__FILE__) . "/../library/formdata.inc.php");
186 // Include sanitization/checking function (for security)
187 include_once (dirname(__FILE__) . "/../library/sanitize.inc.php");
189 // Includes functions for date internationalization
190 include_once (dirname(__FILE__) . "/../library/date_functions.php");
192 // Defaults for specific applications.
193 $GLOBALS['athletic_team'] = false;
194 $GLOBALS['weight_loss_clinic'] = false;
195 $GLOBALS['ippf_specific'] = false;
196 $GLOBALS['cene_specific'] = false;
198 // Defaults for drugs and products.
199 $GLOBALS['inhouse_pharmacy'] = false;
200 $GLOBALS['sell_non_drug_products'] = 0;
202 $glrow = sqlQuery("SHOW TABLES LIKE 'globals'");
203 if (!empty($glrow)) {
204 // Collect user specific settings from user_settings table.
206 $gl_user = array();
207 if (!empty($_SESSION['authUserID'])) {
208 $glres_user = sqlStatement("SELECT `setting_label`, `setting_value` " .
209 "FROM `user_settings` " .
210 "WHERE `setting_user` = ? " .
211 "AND `setting_label` LIKE 'global:%'", array($_SESSION['authUserID']) );
212 for($iter=0; $row=sqlFetchArray($glres_user); $iter++) {
213 //remove global_ prefix from label
214 $row['setting_label'] = substr($row['setting_label'],7);
215 $gl_user[$iter]=$row;
218 // Set global parameters from the database globals table.
219 // Some parameters require custom handling.
221 $GLOBALS['language_menu_show'] = array();
222 $glres = sqlStatement("SELECT gl_name, gl_index, gl_value FROM globals " .
223 "ORDER BY gl_name, gl_index");
224 while ($glrow = sqlFetchArray($glres)) {
225 $gl_name = $glrow['gl_name'];
226 $gl_value = $glrow['gl_value'];
227 // Adjust for user specific settings
228 if (!empty($gl_user)) {
229 foreach ($gl_user as $setting) {
230 if ($gl_name == $setting['setting_label']) {
231 $gl_value = $setting['setting_value'];
235 if ($gl_name == 'language_menu_other') {
236 $GLOBALS['language_menu_show'][] = $gl_value;
238 else if ($gl_name == 'css_header') {
239 $GLOBALS[$gl_name] = "$rootdir/themes/" . $gl_value;
241 else if ($gl_name == 'specific_application') {
242 if ($gl_value == '1') $GLOBALS['athletic_team'] = true;
243 else if ($gl_value == '2') $GLOBALS['ippf_specific'] = true;
244 else if ($gl_value == '3') $GLOBALS['weight_loss_clinic'] = true;
246 else if ($gl_name == 'inhouse_pharmacy') {
247 if ($gl_value) $GLOBALS['inhouse_pharmacy'] = true;
248 if ($gl_value == '2') $GLOBALS['sell_non_drug_products'] = 1;
249 else if ($gl_value == '3') $GLOBALS['sell_non_drug_products'] = 2;
251 else {
252 $GLOBALS[$gl_name] = $gl_value;
255 // Language cleanup stuff.
256 $GLOBALS['language_menu_login'] = false;
257 if ((count($GLOBALS['language_menu_show']) >= 1) || $GLOBALS['language_menu_showall']) {
258 $GLOBALS['language_menu_login'] = true;
261 // End of globals table processing.
263 else {
264 // Temporary stuff to handle the case where the globals table does not
265 // exist yet. This will happen in sql_upgrade.php on upgrading to the
266 // first release containing this table.
267 $GLOBALS['language_menu_login'] = true;
268 $GLOBALS['language_menu_showall'] = true;
269 $GLOBALS['language_menu_show'] = array('English (Standard)','Swedish');
270 $GLOBALS['language_default'] = "English (Standard)";
271 $GLOBALS['translate_layout'] = true;
272 $GLOBALS['translate_lists'] = true;
273 $GLOBALS['translate_gacl_groups'] = true;
274 $GLOBALS['translate_form_titles'] = true;
275 $GLOBALS['translate_document_categories'] = true;
276 $GLOBALS['translate_appt_categories'] = true;
277 $GLOBALS['concurrent_layout'] = 2;
278 $timeout = 7200;
279 $openemr_name = 'OpenEMR';
280 $css_header = "$rootdir/themes/style_default.css";
281 $GLOBALS['css_header'] = $css_header;
282 $GLOBALS['schedule_start'] = 8;
283 $GLOBALS['schedule_end'] = 17;
284 $GLOBALS['calendar_interval'] = 15;
285 $GLOBALS['phone_country_code'] = '1';
286 $GLOBALS['disable_non_default_groups'] = true;
287 $GLOBALS['ippf_specific'] = false;
290 // If >0 this will enforce a separate PHP session for each top-level
291 // browser window. You must log in separately for each. This is not
292 // thoroughly tested yet and some browsers might have trouble with it,
293 // so make it 0 if you must. Alternatively, you can set it to 2 to be
294 // notified when the session ID changes.
295 $GLOBALS['restore_sessions'] = 1; // 0=no, 1=yes, 2=yes+debug
297 // Theme definition. All this stuff should be moved to CSS.
299 if ($GLOBALS['concurrent_layout']) {
300 $top_bg_line = ' bgcolor="#dddddd" ';
301 $GLOBALS['style']['BGCOLOR2'] = "#dddddd";
302 $bottom_bg_line = $top_bg_line;
303 $title_bg_line = ' bgcolor="#bbbbbb" ';
304 $nav_bg_line = ' bgcolor="#94d6e7" ';
305 } else {
306 $top_bg_line = ' bgcolor="#94d6e7" ';
307 $GLOBALS['style']['BGCOLOR2'] = "#94d6e7";
308 $bottom_bg_line = ' background="'.$rootdir.'/pic/aquabg.gif" ';
309 $title_bg_line = ' bgcolor="#aaffff" ';
310 $nav_bg_line = ' bgcolor="#94d6e7" ';
312 $login_filler_line = ' bgcolor="#f7f0d5" ';
313 $logocode = "<img src='$web_root/sites/" . $_SESSION['site_id'] . "/images/login_logo.gif'>";
314 $linepic = "$rootdir/pic/repeat_vline9.gif";
315 $table_bg = ' bgcolor="#cccccc" ';
316 $GLOBALS['style']['BGCOLOR1'] = "#cccccc";
317 $GLOBALS['style']['TEXTCOLOR11'] = "#222222";
318 $GLOBALS['style']['HIGHLIGHTCOLOR'] = "#dddddd";
319 $GLOBALS['style']['BOTTOM_BG_LINE'] = $bottom_bg_line;
320 // The height in pixels of the Logo bar at the top of the login page:
321 $GLOBALS['logoBarHeight'] = 110;
322 // The height in pixels of the Navigation bar:
323 $GLOBALS['navBarHeight'] = 22;
324 // The height in pixels of the Title bar:
325 $GLOBALS['titleBarHeight'] = 40;
327 // The assistant word, MORE printed next to titles that can be clicked:
328 // Note this label gets translated here via the xl function
329 // -if you don't want it translated, then strip the xl function away
330 $tmore = xl('(More)');
331 // The assistant word, BACK printed next to titles that return to previous screens:
332 // Note this label gets translated here via the xl function
333 // -if you don't want it translated, then strip the xl function away
334 $tback = xl('(Back)');
336 // This is the idle logout function:
337 // if a page has not been refreshed within this many seconds, the interface
338 // will return to the login page
339 if (!empty($special_timeout)) {
340 $timeout = intval($special_timeout);
343 //Version tag
344 require_once(dirname(__FILE__) . "/../version.php");
345 $patch_appending = "";
346 if ( ($v_realpatch != '0') && (!(empty($v_realpatch))) ) {
347 $patch_appending = " (".$v_realpatch.")";
349 $openemr_version = "$v_major.$v_minor.$v_patch".$v_tag.$patch_appending;
351 $srcdir = $GLOBALS['srcdir'];
352 $login_screen = $GLOBALS['login_screen'];
353 $GLOBALS['css_header'] = $css_header;
354 $GLOBALS['backpic'] = $backpic;
356 // 1 = send email message to given id for Emergency Login user activation,
357 // else 0.
358 $GLOBALS['Emergency_Login_email'] = $GLOBALS['Emergency_Login_email_id'] ? 1 : 0;
360 //set include_de_identification to enable De-identification (currently de-identification works fine only with linux machines)
361 //Run de_identification_upgrade.php script to upgrade OpenEMR database to include procedures,
362 //functions, tables for de-identification(Mysql root user and password is required for successful
363 //execution of the de-identification upgrade script)
364 $GLOBALS['include_de_identification']=0;
365 // Include the authentication module code here, but the rule is
366 // if the file has the word "login" in the source code file name,
367 // don't include the authentication module - we do this to avoid
368 // include loops.
370 if (!isset($ignoreAuth) || !$ignoreAuth) {
371 include_once("$srcdir/auth.inc");
374 // If you do not want your accounting system to have a customer added to it
375 // for each insurance company, then set this to true. SQL-Ledger currently
376 // (2005-03-21) does nothing useful with insurance companies as customers.
377 $GLOBALS['insurance_companies_are_not_customers'] = true;
379 // This is the background color to apply to form fields that are searchable.
380 // Currently it is applicable only to the "Search or Add Patient" form.
381 $GLOBALS['layout_search_color'] = '#ffff55';
383 //EMAIL SETTINGS
384 $SMTP_Auth = !empty($GLOBALS['SMTP_USER']);
386 // Customize these if you are using SQL-Ledger with OpenEMR, or if you are
387 // going to run sl_convert.php to convert from SQL-Ledger.
389 $sl_cash_acc = '1060'; // sql-ledger account number for checking account
390 $sl_ar_acc = '1200'; // sql-ledger account number for accounts receivable
391 $sl_income_acc = '4320'; // sql-ledger account number for medical services income
392 $sl_services_id = 'MS'; // sql-ledger parts table id for medical services
393 $sl_dbname = 'sql-ledger'; // sql-ledger database name
394 $sl_dbuser = 'sql-ledger'; // sql-ledger database login name
395 $sl_dbpass = 'secret'; // sql-ledger database login password
396 //////////////////////////////////////////////////////////////////
398 // Don't change anything below this line. ////////////////////////////
400 $encounter = empty($_SESSION['encounter']) ? 0 : $_SESSION['encounter'];
402 if (!empty($_GET['pid']) && empty($_SESSION['pid'])) {
403 $_SESSION['pid'] = $_GET['pid'];
405 elseif (!empty($_POST['pid']) && empty($_SESSION['pid'])) {
406 $_SESSION['pid'] = $_POST['pid'];
408 $pid = empty($_SESSION['pid']) ? 0 : $_SESSION['pid'];
409 $userauthorized = empty($_SESSION['userauthorized']) ? 0 : $_SESSION['userauthorized'];
410 $groupname = empty($_SESSION['authProvider']) ? 0 : $_SESSION['authProvider'];
412 // global interface function to format text length using ellipses
413 function strterm($string,$length) {
414 if (strlen($string) >= ($length-3)) {
415 return substr($string,0,$length-3) . "...";
416 } else {
417 return $string;
421 // Override temporary_files_dir if PHP >= 5.2.1.
422 if (version_compare(phpversion(), "5.2.1", ">=")) {
423 $GLOBALS['temporary_files_dir'] = rtrim(sys_get_temp_dir(),'/');
426 // turn off PHP compatibility warnings
427 ini_set("session.bug_compat_warn","off");
429 //////////////////////////////////////////////////////////////////