View difference between Paste ID: wgPjdcX1 and uyiP1wAE

 <?php
 /**
 *
 * @package Kleeja
 * @copyright (c) 2007 Kleeja.com
 * @license ./docs/license.txt
 *
 */
 
 
 //no for directly open
 if (!defined('IN_COMMON'))
 {
 	exit();
 }
 
 
 
 
 /**
  *  Detect a bot activity an record it
 */
 function kleeja_detecting_bots()
 {
 	global $SQL, $usrcp, $dbprefix, $config, $klj_session;
 
 	// get information ..
 	$agent	= $SQL->escape($_SERVER['HTTP_USER_AGENT']);
 	$time	= time();
 
 	//for stats
 	if (strpos($agent, 'Google') !== false)
 	{
 		$update_query = array(
 								'UPDATE'	=> "{$dbprefix}stats",
 								'SET'		=> "last_google=$time, google_num=google_num+1"
 							);
         is_array($plugin_run_result = Plugins::getInstance()->run('qr_update_google_lst_num', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 		$SQL->build($update_query);
 	}
 	elseif (strpos($agent, 'Bing') !== false)
 	{
 		$update_query = array(
 								'UPDATE'	=> "{$dbprefix}stats",
 								'SET'		=> "last_bing=$time, bing_num=bing_num+1"
 							);
         is_array($plugin_run_result = Plugins::getInstance()->run('qr_update_bing_lst_num', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 		$SQL->build($update_query);
 	}
 
 	//put another bots as a hook if you want !
     is_array($plugin_run_result = Plugins::getInstance()->run('anotherbots_onlline_func', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 
 	//clean online table
 	if((time() - $config['last_online_time_update']) >= 3600)
 	{
 		#what to add here ?
 		//update last_online_time_update
 		update_config('last_online_time_update', time());
 	}
 
     is_array($plugin_run_result = Plugins::getInstance()->run('KleejaOnline_func', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 }
 
 
 /**
  * Ban system
 */
 function get_ban()
 {
 	global $banss, $lang, $tpl, $text, $SQL;
 
 	//visitor ip now
 	$ip	= get_ip();
 
 	//now .. loop for banned ips
 	if (is_array($banss) && !empty($ip))
 	{
 		foreach ($banss as $ip2)
 		{
 			$ip2 = trim($ip2);
 
 			if(empty($ip2))
 			{
 				continue;
 			}
 
 			//first .. replace all * with something good .
 			$replace_it = str_replace("*", '([0-9]{1,3})', $ip2);
 			$replace_it = str_replace(".", '\.', $replace_it);
 
 			if ($ip == $ip2 || @preg_match('/' . preg_quote($replace_it, '/') . '/i', $ip))
 			{
                 is_array($plugin_run_result = Plugins::getInstance()->run('banned_get_ban_func', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 
                 //
                 // if the request is an image
                 //
                 if(
                     ( defined('IN_DOWNLOAD') && (ig('img') || ig('thmb') || ig('thmbf') || ig('imgf')) )
                     || g('go', 'str', '') == 'queue'
                 )
                 {
 
                     @$SQL->close();
                     $fullname = "images/banned_user.jpg";
                     $filesize = filesize($fullname);
                     header("Content-length: $filesize");
                     header("Content-type: image/jpg");
                     readfile($fullname);
                     exit;
                 }
                 else
                 {
                     kleeja_info($lang['U_R_BANNED'], $lang['U_R_BANNED'], true);
                 }
 			}
 		}
 	}
 
     is_array($plugin_run_result = Plugins::getInstance()->run('get_ban_func', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 }
 
 
 /**
  * Check if the given plugin installed ?
  * @param $plugin_name
  * @return bool
  */
 function kleeja_plugin_exists($plugin_name)
 {
 	global $SQL, $dbprefix;
 
     $query = array(
 					'SELECT'	=> 'p.plg_id',
 					'FROM'		=> "{$dbprefix}plugins p",
 					'WHERE'		=> "p.plg_name = '" . $SQL->escape($plugin_name) . "'",
 				);
 
 		$result	= $SQL->build($query);
 		$num = $SQL->num_rows($result);
 		if($num)
 		{
 			$d = $SQL->fetch($result);
 			$SQL->freeresult();
 			return $d['plg_id'];
 		}
 
 		return false;
 }
 
 /**
 * Return current page url
 */
 function kleeja_get_page()
 {
 	if(isset($_SERVER['REQUEST_URI']))
 	{
 		$location = $_SERVER['REQUEST_URI'];
     } elseif (isset($_ENV['REQUEST_URI'])) {
         $location = $_ENV['REQUEST_URI'];
 	}
 	else
 	{
 		if(isset($_SERVER['PATH_INFO']))
 		{
 			$location = $_SERVER['PATH_INFO'];
 		}
 		elseif(isset($_ENV['PATH_INFO']))
 		{
 			$location = $_SERVER['PATH_INFO'];
 		}
 		elseif(isset($_ENV['PHP_SELF']))
 		{
 			$location = $_ENV['PHP_SELF'];
 		}
 		else
 		{
 			$location = $_SERVER['PHP_SELF'];
 		}
 		if(isset($_SERVER['QUERY_STRING']))
 		{
 			$location .= "?" . $_SERVER['QUERY_STRING'];
 		}
 		elseif(isset($_ENV['QUERY_STRING']))
 		{
 			$location = "?" . $_ENV['QUERY_STRING'];
 		}
 	}
 
 	$return = str_replace(array('&amp;'), array('&'), htmlspecialchars($location));
 	return $return;
 }
 
 /**
  * Fix email string to be UTF8
  * @param $text
  * @return string
  */
 function _sm_mk_utf8($text)
 {
 	return "=?UTF-8?B?" . kleeja_base64_encode($text) . "?=";
 }
 
 /**
  * Send an email message
  * @param string $to
  * @param string $body
  * @param string $subject
  * @param string $fromAddress
  * @param string $fromName
  * @param string $bcc
  * @return bool
  */
 function send_mail($to, $body, $subject, $fromAddress, $fromName, $bcc = '')
 {
 	$eol = "\r\n";
 	$headers = '';
     $headers .= 'From: ' . _sm_mk_utf8(trim(preg_replace('#[\n\r:]+#s', '', $fromName))) . ' <' . trim(preg_replace('#[\n\r:]+#s', '', $fromAddress)) . '>' . $eol;
 	$headers .= 'MIME-Version: 1.0' . $eol;
 	$headers .= 'Content-transfer-encoding: 8bit' . $eol; // 7bit
 	$headers .= 'Content-Type: text/plain; charset=utf-8' . $eol; // format=flowed
 	$headers .= 'X-Mailer: Kleeja Mailer' . $eol;
     $headers .= 'Reply-To: ' . _sm_mk_utf8(trim(preg_replace('#[\n\r:]+#s', '', $fromName))) . ' <' . trim(preg_replace('#[\n\r:]+#s', '', $fromAddress)) . '>' . $eol;
     if (!empty($bcc)) {
         $headers .= 'Bcc: ' . trim(preg_replace('#[\n\r:]+#s', '', $bcc)) . $eol;
     }
 
     is_array($plugin_run_result = Plugins::getInstance()->run('kleeja_send_mail', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 
 	$body = str_replace(array("\n", "\0"), array("\r\n", ''), $body);
 
     // Change the line breaks used in the headers according to OS
 	if (strtoupper(substr(PHP_OS, 0, 3)) == 'MAC')
 	{
 		$headers = str_replace("\r\n", "\r", $headers);
 	}
 	else if (strtoupper(substr(PHP_OS, 0, 3)) != 'WIN')
 	{
 		$headers = str_replace("\r\n", "\n", $headers);
 	}
 
 	$mail_sent = @mail(trim(preg_replace('#[\n\r]+#s', '', $to)), _sm_mk_utf8(trim(preg_replace('#[\n\r]+#s', '', $subject))), $body, $headers);
 
 	return $mail_sent;
 }
 
 
 /**
  * Get remote files
  * (c) punbb + Kleeja team
  * @param $url
  * @param bool $save_in
  * @param int $timeout
  * @param bool $head_only
  * @param int $max_redirects
  * @param bool $binary
  * @return bool|string|array
  */
 function fetch_remote_file($url, $save_in = false, $timeout = 20, $head_only = false, $max_redirects = 10, $binary = false)
 {
     is_array($plugin_run_result = Plugins::getInstance()->run('kleeja_fetch_remote_file_func', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 
 	// Quite unlikely that this will be allowed on a shared host, but it can't hurt
 	if (function_exists('ini_set'))
 	{
 		@ini_set('default_socket_timeout', $timeout);
 	}
 	$allow_url_fopen = function_exists('ini_get') ? strtolower(@ini_get('allow_url_fopen')) : strtolower(@get_cfg_var('allow_url_fopen'));
 
 	if(function_exists('curl_init') && !$save_in)
 	{
 		$ch = curl_init();
 		curl_setopt($ch, CURLOPT_URL, $url);
 //		curl_setopt($ch, CURLOPT_HTTP_VERSION, CURL_HTTP_VERSION_1_0);
         curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, false);
         @curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
 		curl_setopt($ch, CURLOPT_HEADER, true);
 		curl_setopt($ch, CURLOPT_NOBODY, $head_only);
 		curl_setopt($ch, CURLOPT_TIMEOUT, $timeout);
 		curl_setopt($ch, CURLOPT_USERAGENT, 'Mozilla/4.0 (compatible; MSIE 5.01; Windows NT 5.0; Kleeja)');
 
 		// Grab the page
 		$data = @curl_exec($ch);
         $response_code = curl_getinfo($ch, CURLINFO_HTTP_CODE);
 		curl_close($ch);
 
 		// Process 301/302 redirect
         if ($data !== false && ($response_code == '301' || $response_code == '302') && $max_redirects > 0)
 		{
 			$headers = explode("\r\n", trim($data));
 			foreach ($headers as $header)
 			{
 				if (substr($header, 0, 10) == 'Location: ')
 				{
                     $response = fetch_remote_file(substr($header, 10), $save_in, $timeout, $head_only, $max_redirects - 1);
 					if ($head_only)
 					{
                         if ($response != false)
 						{
                             $headers[] = $response;
 						}
 						return $headers;
 					}
 					else
 					{
 						return false;
 					}
 				}
 			}
 		}
 
 		// Ignore everything except a 200 response code
         if ($data !== false && $response_code == '200')
 		{
 			if ($head_only)
 			{
 				return explode("\r\n", str_replace("\r\n\r\n", "\r\n", trim($data)));
 			}
 			else
 			{
 				preg_match('#HTTP/1.[01] 200 OK#', $data, $match, PREG_OFFSET_CAPTURE);
 				$last_content = substr($data, $match[0][1]);
 				$content_start = strpos($last_content, "\r\n\r\n");
 				if ($content_start !== false)
 				{
 					return substr($last_content, $content_start + 4);
 				}
 			}
 		}
 
 	}
 	// fsockopen() is the second best thing
 	else if(function_exists('fsockopen'))
 	{
 	    $url_parsed = parse_url($url);
 	    $host = $url_parsed['host'];
 	    $port = empty($url_parsed['port']) || $url_parsed['port'] == 0 ? 80 : $url_parsed['port'];
 		$path = $url_parsed['path'];
 
 		if (isset($url_parsed["query"]) && $url_parsed["query"] != '')
 		{
 			$path .= '?' . $url_parsed['query'];
 		}
 
 	    if(!$fp = @fsockopen($host, $port, $errno, $errstr, $timeout))
 		{
 			return false;
 		}
 
 		// Send a standard HTTP 1.0 request for the page
 		fwrite($fp, ($head_only ? 'HEAD' : 'GET') . " $path HTTP/1.0\r\n");
 		fwrite($fp, "Host: $host\r\n");
 		fwrite($fp, 'User-Agent: Mozilla/4.0 (compatible; MSIE 5.01; Windows NT 5.0; Kleeja)' . "\r\n");
 		fwrite($fp, 'Connection: Close'."\r\n\r\n");
 
 		stream_set_timeout($fp, $timeout);
 		$stream_meta = stream_get_meta_data($fp);
 
         $fp2 = null;
 
 		//let's open new file to save it in.
 		if($save_in)
 		{
 			$fp2 = @fopen($save_in, 'w' . ($binary ? '' : ''));
 		}
 
 		// Fetch the response 1024 bytes at a time and watch out for a timeout
 		$in = false;
 		$h = false;
 
 		while (!feof($fp) && !$stream_meta['timed_out'])
 		{
 			$s = fgets($fp, 1024);
 			if($save_in)
 			{
 					if($s == "\r\n") //|| $s == "\n")
 					{
 						$h = true;
 						continue;
 					}
 
 					if($h)
 					{
 						@fwrite($fp2, $s);
 					}
 			}
 
 			$in .= $s;
 			$stream_meta = stream_get_meta_data($fp);
 		}
 
 		fclose($fp);
 
 		if($save_in)
 		{
 			unset($in);
 			@fclose($fp2);
 			return true;
 		}
 
 		// Process 301/302 redirect
 		if ($in !== false && $max_redirects > 0 && preg_match('#^HTTP/1.[01] 30[12]#', $in))
 		{
 			$headers = explode("\r\n", trim($in));
 			foreach ($headers as $header)
 			{
 				if (substr($header, 0, 10) == 'Location: ')
 				{
                     $response = fetch_remote_file(substr($header, 10), $save_in, $timeout, $head_only, $max_redirects - 1);
                     if ($response != false)
 					{
                         $headers[] = $response;
 					}
 					return $headers;
 				}
 			}
 		}
 
 		// Ignore everything except a 200 response code
 		if ($in !== false && preg_match('#^HTTP/1.[01] 200 OK#', $in))
 		{
 			if ($head_only)
 			{
 				return explode("\r\n", trim($in));
 			}
 			else
 			{
 				$content_start = strpos($in, "\r\n\r\n");
 				if ($content_start !== false)
 				{
 					return substr($in, $content_start + 4);
 				}
 			}
 		}
 		return $in;
 	}
 	// Last case scenario, we use file_get_contents provided allow_url_fopen is enabled (any non 200 response results in a failure)
 	else if (in_array($allow_url_fopen, array('on', 'true', '1')))
 	{
 		// PHP5's version of file_get_contents() supports stream options
 		if (version_compare(PHP_VERSION, '5.0.0', '>='))
 		{
 			// Setup a stream context
 			$stream_context = stream_context_create(
 				array(
 					'http' => array(
 						'method'		=> $head_only ? 'HEAD' : 'GET',
 						'user_agent'	=> 'Mozilla/4.0 (compatible; MSIE 5.01; Windows NT 5.0; Kleeja)',
 						'max_redirects'	=> $max_redirects + 1,	// PHP >=5.1.0 only
 						'timeout'		=> $timeout	// PHP >=5.2.1 only
 					)
 				)
 			);
 
 			$content = @file_get_contents($url, false, $stream_context);
 		}
 		else
 		{
 			$content = @file_get_contents($url);
 		}
 
 		// Did we get anything?
 		if ($content !== false)
 		{
 			// Gotta love the fact that $http_response_header just appears in the global scope (*cough* hack! *cough*)
 			if ($head_only)
 			{
 				return $http_response_header;
 			}
 
 			if($save_in)
 			{
 				$fp2 = fopen($save_in, 'w' . ($binary ? 'b' : ''));
 				@fwrite($fp2, $content);
 				@fclose($fp2);
 				unset($content);
 				return true;
 			}
 
 			return $content;
 		}
 	}
 
 	return false;
 }
 
 
 /**
  * Delete cache
  * @param string $name
  * @param bool $all if true, all cache in cache folder will be deleted
  * @return bool
  */
 function delete_cache($name, $all=false)
 {
 
 	#Those files are exceptions and not for deletion
 	$exceptions = array('.htaccess', 'index.html', 'php.ini', 'web.config');
 
 	#ignore kleeja_log in dev stage.
 	if(defined('DEV_STAGE'))
 	{
 		array_push($exceptions, 'kleeja_log.log');
 	}
 
 	is_array($plugin_run_result = Plugins::getInstance()->run('delete_cache_func', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 
 	//handle array of cached files
 	if(is_array($name))
 	{
 		foreach($name as $n)
 		{
 			delete_cache($n, false);
 		}
 		return true;
 	}
 
 	$path_to_cache = PATH . 'cache';
 
 	if($all)
 	{
         $del = true;
 
 		if($dh = @opendir($path_to_cache))
 		{
 			while (($file = @readdir($dh)) !== false)
 			{
 				if($file != '.' && $file != '..' && !in_array($file, $exceptions))
 				{
                     kleeja_unlink($path_to_cache . '/' . $file, true);
 				}
 			}
 			@closedir($dh);
 		}
 	}
 	else
 	{
 		if(strpos($name, 'tpl_') !== false && strpos($name, '.html') !== false)
 		{
 			$name = str_replace('.html', '', $name);
 		}
 
 		$del = true;
 		$name = str_replace('.php', '', $name) . '.php';
 		if (file_exists($path_to_cache . '/' . $name))
 		{
 			$del = kleeja_unlink ($path_to_cache . "/" . $name, true);
 		}
 	}
 
 	return $del;
 }
 
 /**
  * Try delete files or at least change its name.
  * for those who have dirty hosting
  * @param string $filePath
  * @param bool $cache_file
  * @return bool
  */
 function kleeja_unlink($filePath, $cache_file = false)
 {
 
     $return = false;
 
     is_array($plugin_run_result = Plugins::getInstance()->run('kleeja_unlink_func', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 
 
     if($return)
     {
         return true;
     }
 
     //99.9% who use this
 	if(function_exists('unlink'))
 	{
         return unlink($filePath);
 	}
 	//5% only who use this
 	//else if (function_exists('exec'))
 	//{
 	//	$out = array();
 	//	$return = null;
 	//	exec('del ' . escapeshellarg(realpath($filepath)) . ' /q', $out, $return);
 	//	return $return;
 	//}
 	//5% only who use this
 	//else if (function_exists('system'))
 	//{
 	//	$return = null;
 	//	system ('del ' . escapeshellarg(realpath($filepath)) . ' /q', $return);
 	//	return $return;
 	//}
 	//just rename cache file if there is new thing
 	else if (function_exists('rename') && $cache_file)
 	{
         $new_name = substr($filePath, 0, strrpos($filePath, '/') + 1) . 'old_' . md5($filePath . time()) . '.php';
         return rename($filePath, $new_name);
 	}
 
 	return false;
 }
 
 /**
  * Get mime header
  * @param string $ext file extension
  * @return string mime
  */
 function get_mime_for_header($ext)
 {
 	$mime_types = array(
 		"323" => "text/h323",
 		"rar"=> "application/x-rar-compressed",
         "aac" => "audio/aac",
 		"acx" => "application/internet-property-stream",
 		"ai" => "application/postscript",
 		"aif" => "audio/x-aiff",
 		"aifc" => "audio/x-aiff",
 		"aiff" => "audio/x-aiff",
 		"asf" => "video/x-ms-asf",
 		"asr" => "video/x-ms-asf",
 		"asx" => "video/x-ms-asf",
 		"au" => "audio/basic",
 		"avi" => "video/x-msvideo",
 		"axs" => "application/olescript",
 		"bas" => "text/plain",
 		"bcpio" => "application/x-bcpio",
 		"bin" => "application/octet-stream",
 		"bmp" => "image/bmp", # this is not a good mime, but it work anyway
 		//"bmp"	=> "image/x-ms-bmp", # @see bugs.php.net/47359
 		"c" => "text/plain",
 		"cat" => "application/vnd.ms-pkiseccat",
 		"cdf" => "application/x-cdf",
 		"cer" => "application/x-x509-ca-cert",
 		"class" => "application/octet-stream",
 		"clp" => "application/x-msclip",
 		"cmx" => "image/x-cmx",
 		"cod" => "image/cis-cod",
 		"psd" => "image/psd",
 		"cpio" => "application/x-cpio",
 		"crd" => "application/x-mscardfile",
 		"crl" => "application/pkix-crl",
 		"crt" => "application/x-x509-ca-cert",
 		"csh" => "application/x-csh",
         "webm" => "video/webm",
 		"css" => "text/css",
 		"dcr" => "application/x-director",
 		"der" => "application/x-x509-ca-cert",
 		"dir" => "application/x-director",
 		"dll" => "application/x-msdownload",
 		"dms" => "application/octet-stream",
 		"doc" => "application/msword",
 		"dot" => "application/msword",
 		"dvi" => "application/x-dvi",
 		"dxr" => "application/x-director",
 		"eps" => "application/postscript",
 		"etx" => "text/x-setext",
 		"evy" => "application/envoy",
 		"exe" => "application/octet-stream",
 		"fif" => "application/fractals",
 		"flr" => "x-world/x-vrml",
 		"gif" => "image/gif",
 		"gtar" => "application/x-gtar",
 		"gz" => "application/x-gzip",
 		"h" => "text/plain",
 		"hdf" => "application/x-hdf",
 		"hlp" => "application/winhlp",
 		"hqx" => "application/mac-binhex40",
 		"hta" => "application/hta",
 		"htc" => "text/x-component",
 		"htm" => "text/html",
 		"html" => "text/html",
 		"htt" => "text/webviewhtml",
 		"ico" => "image/x-icon",
 		"ief" => "image/ief",
 		"iii" => "application/x-iphone",
 		"ins" => "application/x-internet-signup",
 		"isp" => "application/x-internet-signup",
 		"jfif" => "image/pipeg",
 		"jpe" => "image/jpeg",
 		"jpeg" => "image/jpeg",
 		"jpg" => "image/jpeg",
 		"png" => "image/png",
 		"js" => "application/x-javascript",
 		"latex" => "application/x-latex",
 		"lha" => "application/octet-stream",
 		"lsf" => "video/x-la-asf",
 		"lsx" => "video/x-la-asf",
 		"lzh" => "application/octet-stream",
 		"m13" => "application/x-msmediaview",
 		"m14" => "application/x-msmediaview",
 		"m3u" => "audio/x-mpegurl",
 		"man" => "application/x-troff-man",
 		"mdb" => "application/x-msaccess",
 		"me" => "application/x-troff-me",
 		"mht" => "message/rfc822",
 		"mhtml" => "message/rfc822",
 		"mid" => "audio/mid",
 		"mny" => "application/x-msmoney",
 		"mov" => "video/quicktime",
 		"movie" => "video/x-sgi-movie",
 		"mp2" => "video/mpeg",
 		"mp3" => "audio/mpeg",
 		"mp4" => "video/mp4",
 		"m4a" => "audio/mp4",
 		"mpa" => "video/mpeg",
 		"mpe" => "video/mpeg",
 		"mpeg" => "video/mpeg",
 		"mpg" => "video/mpeg",
 		"amr" => "audio/3gpp",
 		"mpp" => "application/vnd.ms-project",
 		"mpv2" => "video/mpeg",
 		"ms" => "application/x-troff-ms",
 		"mvb" => "application/x-msmediaview",
 		"nws" => "message/rfc822",
 		"oda" => "application/oda",
 		"p10" => "application/pkcs10",
 		"p12" => "application/x-pkcs12",
 		"p7b" => "application/x-pkcs7-certificates",
 		"p7c" => "application/x-pkcs7-mime",
 		"p7m" => "application/x-pkcs7-mime",
 		"p7r" => "application/x-pkcs7-certreqresp",
 		"p7s" => "application/x-pkcs7-signature",
 		"pbm" => "image/x-portable-bitmap",
 		"pdf" => "application/pdf",
 		"pfx" => "application/x-pkcs12",
 		"pgm" => "image/x-portable-graymap",
 		"pko" => "application/ynd.ms-pkipko",
 		"pma" => "application/x-perfmon",
 		"pmc" => "application/x-perfmon",
 		"pml" => "application/x-perfmon",
 		"pmr" => "application/x-perfmon",
 		"pmw" => "application/x-perfmon",
 		"pnm" => "image/x-portable-anymap",
 		"pot" => "application/vnd.ms-powerpoint",
 		"ppm" => "image/x-portable-pixmap",
 		"pps" => "application/vnd.ms-powerpoint",
 		"ppt" => "application/vnd.ms-powerpoint",
 		"prf" => "application/pics-rules",
 		"ps" => "application/postscript",
 		"pub" => "application/x-mspublisher",
 		"qt" => "video/quicktime",
 		"ra" => "audio/x-pn-realaudio",
 		"ram" => "audio/x-pn-realaudio",
 		"ras" => "image/x-cmu-raster",
 		"rgb" => "image/x-rgb",
 		"rmi" => "audio/mid",
 		"roff" => "application/x-troff",
 		"rtf" => "application/rtf",
 		"rtx" => "text/richtext",
 		"swf" => "application/x-shockwave-flash",
 		"scd" => "application/x-msschedule",
 		"sct" => "text/scriptlet",
 		"setpay" => "application/set-payment-initiation",
 		"setreg" => "application/set-registration-initiation",
 		"sh" => "application/x-sh",
 		"shar" => "application/x-shar",
 		"sit" => "application/x-stuffit",
 		"snd" => "audio/basic",
 		"spc" => "application/x-pkcs7-certificates",
 		"spl" => "application/futuresplash",
 		"src" => "application/x-wais-source",
 		"sst" => "application/vnd.ms-pkicertstore",
 		"stl" => "application/vnd.ms-pkistl",
 		"stm" => "text/html",
 		"svg" => "image/svg+xml",
 		"sv4cpio" => "application/x-sv4cpio",
 		"sv4crc" => "application/x-sv4crc",
 		"t" => "application/x-troff",
 		"tar" => "application/x-tar",
 		"tcl" => "application/x-tcl",
 		"tex" => "application/x-tex",
 		"texi" => "application/x-texinfo",
 		"texinfo" => "application/x-texinfo",
 		"tgz" => "application/x-compressed",
 		"tif" => "image/tiff",
 		"tiff" => "image/tiff",
 		"tr" => "application/x-troff",
 		"trm" => "application/x-msterminal",
 		"tsv" => "text/tab-separated-values",
 		"txt" => "text/plain",
 		"uls" => "text/iuls",
 		"ustar" => "application/x-ustar",
 		"vcf" => "text/x-vcard",
 		"vrml" => "x-world/x-vrml",
 		"wav" => "audio/x-wav",
 		"wcm" => "application/vnd.ms-works",
 		"wdb" => "application/vnd.ms-works",
         "webm" => "video/mp4",
 		"wks" => "application/vnd.ms-works",
 		"wmf" => "application/x-msmetafile",
 		"wps" => "application/vnd.ms-works",
 		"wri" => "application/x-mswrite",
 		"wrl" => "x-world/x-vrml",
 		"wrz" => "x-world/x-vrml",
         "aac" => "aac/audio",
 		"xaf" => "x-world/x-vrml",
 		"xbm" => "image/x-xbitmap",
 		"xla" => "application/vnd.ms-excel",
 		"xlc" => "application/vnd.ms-excel",
 		"xlm" => "application/vnd.ms-excel",
 		"xls" => "application/vnd.ms-excel",
 		"xlt" => "application/vnd.ms-excel",
 		"xlw" => "application/vnd.ms-excel",
 		"xof" => "x-world/x-vrml",
 		"xpm" => "image/x-xpixmap",
 		"xwd" => "image/x-xwindowdump",
 		"z" => "application/x-compress",
 		"zip" => "application/zip",
 		"3gpp"=> "video/3gpp",
 		"3gp" => "video/3gpp",
 		"3gpp2" => "video/3gpp2",
 		"3g2" => "video/3gpp2",
 		"midi" => "audio/midi",
 		"pmd" => "application/x-pmd",
 		"jar" => "application/java-archive",
 		"jad" => "text/vnd.sun.j2me.app-descriptor",
 		'apk' => 'application/vnd.android.package-archive',
 		//add more mime here
 	);
 
 	//return mime
 	$ext = strtolower($ext);
     if(in_array($ext, array_keys($mime_types)))
     {
 		$return = $mime_types[$ext];
 	}
 	else
 	{
     	$return = 'application/force-download';
 	}
 
     is_array($plugin_run_result = Plugins::getInstance()->run('get_mime_for_header_func', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 	return $return;
 }
 
 
 /**
  * Include language file
  * @param string $name language filename, 'acp, common..'
  * @param string $folder
  * @return bool
  */
 function get_lang($name, $folder = '')
 {
 	global $config, $lang;
 
 	if(is_null($lang) || !is_array($lang))
     {
         $lang = array();
     }
 
     is_array($plugin_run_result = Plugins::getInstance()->run('get_lang_func', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 
 	$name = str_replace('..', '', $name);
 	if($folder != '')
 	{
         $folder = str_replace(array('..', '/'), '', $folder);
 		$name = $folder . '/' . $name;
 	}
 
 	$path = PATH . 'lang/' . $config['language'] . '/' . str_replace('.php', '', $name) . '.php';
 
     $lang_to_add = @include_once($path);
 
 	if($lang_to_add === false)
 	{
         //fallback to English
         $path_en = PATH . 'lang/en/' . str_replace('.php', '', $name) . '.php';
         $lang_to_add = @include_once($path_en);
         if ($lang_to_add === false) {
 			big_error('There is no language file in the current path', 'lang/' . $config['language'] . '/' . str_replace('.php', '', $name) . '.php  not found');
         }
 	}
 
 	if(is_array($lang_to_add))
 	{
         $lang = array_merge($lang, $lang_to_add);
     }
 
 
 	return true;
 }
 
 
 /*
 * Get fresh config value
 * some time cache doesn't not work as well, so some important
 * events need fresh version of config values ...
 */
 function get_config($name)
 {
 	global $dbprefix, $SQL, $d_groups, $userinfo;
 
 	$table = "{$dbprefix}config c";
 
 	#what if this config is a group-configs related ?
 	$group_id_sql = '';
 	if(array_key_exists($name, $d_groups[$userinfo['group_id']]['configs']))
 	{
 		$table = "{$dbprefix}groups_data c";
 		$group_id_sql = " AND c.group_id=" . $userinfo['group_id'];
 	}
 
 	$query = array(
 					'SELECT'	=> 'c.value',
 					'FROM'		=> $table,
 					'WHERE'		=> "c.name = '" . $SQL->escape($name) . "'" . $group_id_sql
 				);
 
 	$result	= $SQL->build($query);
 	$v		= $SQL->fetch($result);
 	$return	= $v['value'];
 
     is_array($plugin_run_result = Plugins::getInstance()->run('get_config_func', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 	return $return;
 }
 
 /*
 * Add new config option
 * type: where does your config belone, 0 = system, genetal = has no specifc cat., other = other items.
 * html: the input or radio to let the user type or choose from them, see the database:configs to understand.
 * dynamic: every refresh of the page, the config data will be brought from db, not from the cache !
 * plg_id: if this config belong to plugin .. see devKit.
 */
 function add_config($name, $value, $order = '0', $html = '', $type = '0', $plg_id = '0', $dynamic = false)
 {
 	global $dbprefix, $SQL, $config, $d_groups;
 
 	if(get_config($name))
 	{
 		return true;
 	}
 
 	if($html != '' && $type == '0')
 	{
 		$type = 'other';
 	}
 
 	if($type == 'groups')
 	{
 		#add this option to all groups
 		$group_ids = array_keys($d_groups);
 		foreach($group_ids as $g_id)
 		{
 			$insert_query	= array(
 									'INSERT'	=> '`name`, `value`, `group_id`',
 									'INTO'		=> "{$dbprefix}groups_data",
                 'VALUES' => "'" . $SQL->escape($name) . "','" . $SQL->escape($value) . "', " . $g_id,
 								);
 
             is_array($plugin_run_result = Plugins::getInstance()->run('insert_sql_add_config_func_groups_data', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 
 			$SQL->build($insert_query);
 		}
 	}
 
 	$insert_query	= array(
 							'INSERT'	=> '`name` ,`value` ,`option` ,`display_order`, `type`, `plg_id`, `dynamic`',
 							'INTO'		=> "{$dbprefix}config",
 							'VALUES'	=> "'" . $SQL->escape($name) . "','" . $SQL->escape($value) . "', '" . $SQL->real_escape($html) . "','" . intval($order) . "','" . $SQL->escape($type) . "','" . intval($plg_id) . "','"  . ($dynamic ? '1' : '0') . "'",
 						);
 
     is_array($plugin_run_result = Plugins::getInstance()->run('insert_sql_add_config_func', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 
 	$SQL->build($insert_query);
 
 	if($SQL->affected())
 	{
 		delete_cache('data_config');
 		$config[$name] = $value;
 		return true;
 	}
 
 	return false;
 }
 
 /**
  * add an array of new configs
  * @param $configs
  * @return bool
  */
 function add_config_r($configs)
 {
 	if(!is_array($configs))
 	{
 		return false;
 	}
 
 	//array(name=>array(value=>,order=>,html=>),...);
 	foreach($configs as $n=>$m)
 	{
         add_config(
             $n,
             empty($m['value']) ? '' : $m['value'],
             empty($m['order']) ? 0 : $m['order'],
             empty($m['html']) ? '' : $m['html'],
             empty($m['type']) ? 'other' : $m['type'],
             empty($m['plg_id']) ? 0 : $m['plg_id'],
             empty($m['dynamic']) ? false : $m['dynamic']
         );
     }
 
     return true;
 }
 
 function update_config($name, $value, $escape = true, $group = false)
 {
 	global $SQL, $dbprefix, $d_groups, $userinfo;
 
 	$value = ($escape) ? $SQL->escape($value) : $value;
 	$table = "{$dbprefix}config";
 
 	#what if this config is a group-configs related ?
 	$group_id_sql = '';
     if (array_key_exists($name, $d_groups[$userinfo['group_id']]['configs']) && $group != false)
 	{
 		$table = "{$dbprefix}groups_data";
 		if($group == -1)
 		{
 			$group_id_sql = ' AND group_id=' . $userinfo['group_id'];
 		}
 		else if($group)
 		{
 			$group_id_sql = ' AND group_id=' . intval($group);
 		}
 	}
 
 	$update_query	= array(
 							'UPDATE'	=> $table,
 							'SET'		=> "value='" . ($escape ? $SQL->escape($value) : $value) . "'",
 							'WHERE'		=> 'name = "' . $SQL->escape($name) . '"' . $group_id_sql
 					);
 
     is_array($plugin_run_result = Plugins::getInstance()->run('update_sql_update_config_func', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 
 	$SQL->build($update_query);
 	if($SQL->affected())
 	{
 		if($table == "{$dbprefix}groups_data")
 		{
 			$d_groups[$userinfo['group_id']]['configs'][$name] = $value;
 			delete_cache('data_groups');
 			return true;
 		}
 
 		$config[$name] = $value;
 		delete_cache('data_config');
 		return true;
 	}
 
 	return false;
 }
 
 /*
 * Delete config
 */
 function delete_config($name)
 {
 	if(is_array($name))
 	{
 		foreach($name as $n)
 		{
 			delete_config($n);
 		}
 
 	}
 
 	global $dbprefix, $SQL, $d_groups, $userinfo;
 
 	//
 	// 'IN' doesnt work here with delete, i dont know why ?
 	//
 	$delete_query	= array(
 								'DELETE'	=> "{$dbprefix}config",
 								'WHERE'		=>  "name  = '" . $SQL->escape($name) . "'"
 						);
     is_array($plugin_run_result = Plugins::getInstance()->run('del_sql_delete_config_func', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 
 	$SQL->build($delete_query);
 
 	if(array_key_exists($name, $d_groups[$userinfo['group_id']]['configs']))
 	{
 		$delete_query	= array(
 									'DELETE'	=> "{$dbprefix}groups_data",
 									'WHERE'		=>  "name  = '" . $SQL->escape($name) . "'"
 							);
         is_array($plugin_run_result = Plugins::getInstance()->run('del_sql_delete_config_func2', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 
 		$SQL->build($delete_query);
 	}
 
 	if($SQL->affected())
 	{
 		return true;
 	}
 
 	return false;
 }
 
 //
 //update words to lang
 //
 function update_olang($name, $lang = 'en', $value)
 {
 	global $SQL, $dbprefix;
 
 
 	$update_query	= array(
 							'UPDATE'	=> "{$dbprefix}lang",
 							'SET'		=> "trans='" . $SQL->escape($value) . "'",
 							'WHERE'		=> 'word = "' . $SQL->escape($name) . '", lang_id = "' .  $SQL->escape($lang) . '"'
 					);
     is_array($plugin_run_result = Plugins::getInstance()->run('update_sql_update_olang_func', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 
 	$SQL->build($update_query);
 	if($SQL->affected())
 	{
         delete_cache('data_lang' . $lang);
         $olang[$name] = htmlspecialchars($value);
 		return true;
 	}
 
 	return false;
 }
 
 //
 //add words to lang
 //
 function add_olang($words = array(), $lang = 'en', $plg_id = '0')
 {
 	global $dbprefix, $SQL;
 
 	foreach($words as $w=>$t)
 	{
 		$insert_query = array(
 								'INSERT'	=> 'word ,trans ,lang_id, plg_id',
 								'INTO'		=> "{$dbprefix}lang",
 								'VALUES'	=> "'" . $SQL->escape($w) . "','" . $SQL->real_escape($t) . "', '" . $SQL->escape($lang) . "','" . intval($plg_id) . "'",
 						);
         is_array($plugin_run_result = Plugins::getInstance()->run('insert_sql_add_olang_func', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 		$SQL->build($insert_query);
 	}
 
     delete_cache('data_lang' . $lang);
 	return;
 }
 
 //
 //delete words from lang
 //
 /**
  * @param string|array $words language terms to use a in $olang[word] or olang.word
  * @param string $lang langauge of given word
  * @param string $plg_id plugin id associated with these words, optional
  * @return bool
  */
 function delete_olang($words = '', $lang = 'en', $plg_id = 0)
 {
 	global $dbprefix, $SQL;
 
 	if(is_array($words))
 	{
 		foreach($words as $w)
 		{
             delete_olang($w, $lang);
 		}
 
         return true;
 	}
 
 	$delete_query	= array(
 							'DELETE'	=> "{$dbprefix}lang",
 							'WHERE'		=> "word = '" . $SQL->escape($words) . "' AND lang_id = '" . $SQL->escape($lang) . "'"
 						);
 
 	if(!empty($plg_id))
 	{
 		$delete_query['WHERE'] = "plg_id = " . intval($plg_id);
 	}
 
     is_array($plugin_run_result = Plugins::getInstance()->run('del_sql_delete_olang_func', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 
 	$SQL->build($delete_query);
 
     return $SQL->affected();
 }
 
 
 /**
  *  Administrator sometime needs some files and delete other ..
  *  we do that for him .. because he has no time .. :)
  * last_down - $config[del_f_day]
  * @param int $from
  */
 function klj_clean_old_files($from = 0)
 {
 	global $config, $SQL, $stat_last_f_del, $dbprefix;
 
 	$return = false;
     is_array($plugin_run_result = Plugins::getInstance()->run('klj_clean_old_files_func', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 
 	if((int) $config['del_f_day'] <= 0 || $return)
 	{
 		return;
 	}
 
 	if(!$stat_last_f_del || empty($stat_last_f_del))
 	{
 		$stat_last_f_del = time();
 	}
 
 	if ((time() - $stat_last_f_del) >= 86400)
 	{
 		$totaldays	= (time() - ($config['del_f_day']*86400));
 		$not_today	= time() - 86400;
 
 		#This feature will work only if id_form is not empty or direct !
 		$query = array(
 					'SELECT'	=> 'f.id, f.last_down, f.name, f.type, f.folder, f.time, f.size, f.id_form',
 					'FROM'		=> "{$dbprefix}files f",
 					'WHERE'		=> "f.last_down < $totaldays AND f.time < $not_today AND f.id > $from AND f.id_form <> '' AND f.id_form <> 'direct'",
 					'ORDER BY'	=> 'f.id ASC',
 					'LIMIT'		=> '20',
 					);
 
         is_array($plugin_run_result = Plugins::getInstance()->run('qr_select_klj_clean_old_files_func', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 
 		$result	= $SQL->build($query);
 
 		$num_of_files_to_delete = $SQL->num_rows($result);
 		if($num_of_files_to_delete == 0)
 		{
 		   	 //update $stat_last_f_del !!
 			$update_query = array(
 								'UPDATE'	=> "{$dbprefix}stats",
 								'SET'		=> "last_f_del ='" . time() . "'",
 							);
 
             is_array($plugin_run_result = Plugins::getInstance()->run('qr_update_lstf_del_date_kcof', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 
 			$SQL->build($update_query);
 			//delete stats cache
 			delete_cache("data_stats");
 			update_config('klj_clean_files_from', '0');
 			$SQL->freeresult($result);
 			return;
 		}
 
 		$last_id_from = $files_num = $imgs_num = $real_num = $sizes = 0;
 		$ids = array();
 		$ex_ids =  array();
 		//$ex_types = explode(',', $config['livexts']);
 
 
         is_array($plugin_run_result = Plugins::getInstance()->run('beforewhile_klj_clean_old_files_func', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 
 
         //phpfalcon plugin
         $exlive_types = explode(',', $config['imagefolderexts']);
 
 		//delete files
 		while($row=$SQL->fetch_array($result))
 		{
 			$continue = true;
 			$real_num++;
 			$last_id_from = $row['id'];
 			$is_image = in_array(strtolower(trim($row['type'])), array('gif', 'jpg', 'jpeg', 'bmp', 'png')) ? true : false;
 
 			/*
 			//exceptions
 			if(in_array($row['type'], $ex_types) || $config['id_form'] == 'direct')
 			{
 				$ex_ids[] = $row['id'];
 				continue;
 			}
 			*/
 
             //exceptions
 			//if($config['id_form'] == 'direct')
 			//{
 				//$ex_ids[] = $row['id'];
 				//move on
 				//continue;
 			//}
 
 			//your exepctions
             is_array($plugin_run_result = Plugins::getInstance()->run('while_klj_clean_old_files_func', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 
 
 
 			if($continue)
 			{
 				//delete from folder ..
 				if (file_exists($row['folder'] . "/" . $row['name']))
 				{
 					@kleeja_unlink ($row['folder'] . "/" . $row['name']);
 				}
 				//delete thumb
 				if (file_exists($row['folder'] . "/thumbs/" . $row['name'] ))
 				{
 					@kleeja_unlink ($row['folder'] . "/thumbs/" . $row['name'] );
 				}
 
 				$ids[] = $row['id'];
 				if($is_image)
 				{
 					$imgs_num++;
 				}
 				else
 				{
 					$files_num++;
 				}
 				$sizes += $row['size'];
 			}
 	    }#END WHILE
 
 		$SQL->freeresult($result);
 
 		if(sizeof($ex_ids))
 		{
 			$update_query	= array(
 									'UPDATE'	=> "{$dbprefix}files",
 									'SET'		=> "last_down = '" . (time() + 2*86400) . "'",
 									'WHERE'		=> "id IN (" . implode(',', $ex_ids) . ")"
 									);
             is_array($plugin_run_result = Plugins::getInstance()->run('qr_update_lstdown_old_files', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 			$SQL->build($update_query);
 		}
 
 		if(sizeof($ids))
 		{
 			$query_del	= array(
 								'DELETE'	=> "{$dbprefix}files",
 								'WHERE'	=> "id IN (" . implode(',', $ids) . ")"
 								);
 
 			//update number of stats
 			$update_query	= array(
 									'UPDATE'	=> "{$dbprefix}stats",
 									'SET'		=> "sizes=sizes-$sizes,files=files-$files_num, imgs=imgs-$imgs_num",
 									);
 
             is_array($plugin_run_result = Plugins::getInstance()->run('qr_del_delf_old_files', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 
 			$SQL->build($query_del);
 			$SQL->build($update_query);
 		}
 
 		update_config('klj_clean_files_from', $last_id_from);
     } //stat_del
 }
 
 /**
  * klj_clean_old
  * @param string $table database table
  * @param string|integer $for can be 'all, or a number of days like 30'
  */
 function klj_clean_old($table, $for = 'all')
 {
 	global $SQL, $config, $dbprefix;
 
 	$days = time() - (3600 * 24 * intval($for));
 
 	$query = array(
 					'SELECT'	=> 'f.id, f.time',
 					'DELETE'		=> "`{$dbprefix}" . $table . "` f",
 					'ORDER BY'	=> 'f.id ASC',
 					'LIMIT'		=> '30',
 					);
 
 	if($for != 'all')
 	{
 		$query['WHERE']	= "f.time < $days";
 	}
 
     is_array($plugin_run_result = Plugins::getInstance()->run('qr_select_klj_clean_old_func', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 
 	$result	= $SQL->build($query);
 	$num_to_delete = $SQL->num_rows($result);
 	if($num_to_delete == 0)
 	{
 		$t = $table == 'call' ? 'calls' : $table;
 		update_config('queue', preg_match('/:del_' . $for . $t . ':/i', '', $config['queue']));
 		$SQL->freeresult($result);
 		return;
 	}
 
 	$ids = array();
 	while($row=$SQL->fetch_array($result))
 	{
 		$ids[] = $row['id'];
 	}
 
 	$SQL->freeresult($result);
 
 	$query_del	= array(
 							'DELETE'	=> "`" . $dbprefix . $table . "`",
 							'WHERE'	=> "id IN (" . implode(',', $ids) . ")"
 						);
 
     is_array($plugin_run_result = Plugins::getInstance()->run('qr_del_delf_old_table', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 
 	$SQL->build($query_del);
 
 	return;
 }
 
 /**
 * get_ip() for the user
 */
 function get_ip()
 {
 
 	$ip = '';
     if (!empty($_SERVER["HTTP_CF_CONNECTING_IP"])) {
         $ip = $_SERVER["HTTP_CF_CONNECTING_IP"];
     } else if (!empty($_SERVER['REMOTE_ADDR']))
 	{
 		$ip = $_SERVER['REMOTE_ADDR'];
 	}
 
     #if IP chain
     if (strpos($ip, ',') !== false) {
         $ip = explode(',', $ip);
         $ip = trim($ip[0]);
     }
 
     #is it IPv6?
     $ip_v6 = preg_match("/^[0-9a-f]{1,4}:([0-9a-f]{0,4}:){1,6}[0-9a-f]{1,4}$/", $ip);
     if ($ip_v6) {
         #does it IPv4 hide in a IPv6 style
         if (stripos($ip, '::ffff:') === 0) {
             $ip = substr($ip, 7);
         }
     }
 
 
     $return = preg_replace('/[^0-9a-z.:]/i', '', $ip);
     is_array($plugin_run_result = Plugins::getInstance()->run('kleeja_get_ip_func', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 	return $return;
 }
 
 
 /**
  * Check and verify captcha field after submit
  * @return bool
  */
 function kleeja_check_captcha()
 {
 	global $config;
 	if((int) $config['enable_captcha'] == 0 && !defined('IN_REAL_INDEX') && !defined('IN_ADMIN'))
 	{
 		return true;
 	}
 
 
 	$return = false;
 	if(!empty($_SESSION['klj_sec_code']) && ip('kleeja_code_answer'))
 	{
 		if($_SESSION['klj_sec_code'] == trim(p('kleeja_code_answer')))
 		{
 			unset($_SESSION['klj_sec_code']);
 			$return = true;
 		}
 	}
 
     is_array($plugin_run_result = Plugins::getInstance()->run('kleeja_check_captcha_func', get_defined_vars())) ? extract($plugin_run_result) : null; //run hook
 	return $return;
 }
 
 
 /**
  * For logging and testing, enabled only for DEV_STAGE!
  * @param string $text a string to log
  */
 function kleeja_log($text)
 {
 	if(!defined('DEV_STAGE'))
 	{
 		return;
 	}
 
 	$log_file = PATH . 'cache/kleeja_log.log';
     $l_c = @file_get_contents($log_file);
 	$fp = @fopen($log_file, 'w');
 	@fwrite($fp, $text . " [time : " . date('H:i a, d-m-Y') . "] \r\n" . $l_c);
 	@fclose($fp);
 	return;
 }
 
 
 /**
  * Return the first and last seek of range to be flushed.
  * @param string $range
  * @param $fileSize
  * @return array
  */
 function kleeja_set_range($range, $fileSize)
 {
 	$dash	= strpos($range, '-');
 	$first	= trim(substr($range, 0, $dash));
 	$last	= trim(substr($range, $dash+1));
 	if (!$first)
 	{
 		$suffix	= $last;
         $last = $fileSize - 1;
         $first = $fileSize - $suffix;
 		if($first < 0)
 		{
 			$first = 0;
 		}
 	}
 	else
 	{
         if (!$last || $last > $fileSize - 1) {
             $last = $fileSize - 1;
 		}
 	}
 
 	if($first > $last)
 	{
 		//unsatisfiable range
 		header("Status: 416 Requested range not satisfiable");
         header("Content-Range: */$fileSize");
 		exit;
 	}
 
 	return array($first, $last);
 }
 
 /**
  * Outputs up to $bytes from the file $file to standard output,
  * $buffer_size bytes at a time.
  * @param resource $file
  * @param integer $bytes
  * @param integer $buffer_size
  */
 function kleeja_buffered_range($file, $bytes, $buffer_size = 1024)
 {
 	$bytes_left = $bytes;
 	while($bytes_left > 0 && !feof($file))
 	{
 		if($bytes_left > $buffer_size)
 		{
 			$bytes_to_read = $buffer_size;
 		}
 		else
 		{
 			$bytes_to_read = $bytes_left;
 		}
 
 		$bytes_left	-= $bytes_to_read;
 		$contents	= fread($file, $bytes_to_read);
 		echo $contents;
 		@flush();
 		@ob_flush();
 	}
 }
 
 /**
  * user_can, used for checking the acl for the current user
  * @param string $acl_name
  * @param int $group_id
  * @return bool
  */
 function user_can($acl_name, $group_id = 0)
 {
 	global $d_groups, $userinfo;
 
 	if($group_id == 0)
 	{
 		$group_id = $userinfo['group_id'];
 	}
 
 	return (bool) $d_groups[$group_id]['acls'][$acl_name];
 }
 
 
 function ig($name)
 {
     return isset($_GET[$name]) ? true : false;
 }
 
 function ip($name)
 {
     return isset($_POST[$name]) ? true : false;
 }
 
 function g($name, $type = 'str', $default = '')
 {
     if (isset($_GET[$name]))
     {
         return $type == 'str' ? htmlspecialchars($_GET[$name]) : intval($_GET[$name]);
     }
 
     return $type == 'str' ? htmlspecialchars($default) : intval($default);
 }
 
 function p($name, $type = 'str', $default = '')
 {
     if (isset($_POST[$name]))
     {
         return $type == 'str'
             ? str_replace(array("\r\n", "\r", "\0"), array("\n", "\n", ''), htmlspecialchars(trim($_POST[$name])))
             : intval($_POST[$name]);
     }
 
 
     return $type == 'str' ? htmlspecialchars($default) : intval($default);
 }
 
 /**
  * add htaccess rule to the .htaccess file
  * @param array|string $rules
  * @param string $unique_id useful for the deletion later
  * @return bool
  */
 function add_to_htaccess($rules, $unique_id = '')
 {
     if(!file_exists(PATH . '.htaccess') && file_exists(PATH . 'htaccess.txt') && function_exists('rename'))
     {
         rename(PATH . 'htaccess.txt', PATH . '.htaccess');
     }
 
     #still not exists ?
     if(!file_exists(PATH . '.htaccess'))
     {
         $original_htaccess_content = '<IfModule mod_rewrite.c>' . PHP_EOL . 'RewriteEngine on' . PHP_EOL . '</IfModule>';
         file_put_contents(PATH . '.htaccess', $original_htaccess_content);
     }
 
     if(!file_exists(PATH . '.htaccess'))
     {
         return false;
     }
 
 
     $current_htaccess_content = file_get_contents(PATH . '.htaccess');
 
 
     $rules = is_array($rules) ? implode(PHP_EOL, $rules) : $rules;
 
     if(!empty($unique_id))
     {
         $rules = '#start_' . $unique_id  . PHP_EOL . $rules . PHP_EOL . '#end_' .$unique_id;
     }
 
 
     if(strpos($current_htaccess_content, '</IfModule>') !== false)
     {
         $current_htaccess_content = str_replace('</IfModule>', $rules . PHP_EOL .'</IfModule>', $current_htaccess_content);
     }
     else
     {
         $current_htaccess_content .= PHP_EOL . $rules;
     }
 
 
     file_put_contents(PATH . '.htaccess', $current_htaccess_content);
 
     return true;
 }
 
 
 /**
  * remove htaccess rules using previously used unique id
  * @param string $unique_id
  * @return bool
  */
 function remove_from_htaccess($unique_id)
 {
 
 	$file = PATH . '.htaccess';
 
     if(!file_exists($file))
     {
 		$file = PATH . 'htaccess.txt';
 
 		if(!file_exists($file))
 		{
 			return true;
 		}
     }
 
 
     $current_htaccess_content = file_get_contents($file);
 
     $new_htaccess_content = preg_replace(
         '/^#start_' . preg_quote($unique_id) . '.*' . '#end_' . preg_quote($unique_id) . '$/sm',
         '',
         $current_htaccess_content
         );
 
 
     if($new_htaccess_content === $current_htaccess_content)
     {
         return false;
     }
 
     file_put_contents($file, $new_htaccess_content);
 
     return true;
 
 }