Changeset 460 for trunk/includes

Timestamp:

Apr 13, 2010, 5:22:25 PM (15 years ago)

Author:

george

Message:

• Opraveno: Na konce řádků při generování exportů se vkládaly nulové znaky.
• Upraveno: Místo zaznamenávání odkazujících webů na bannery se budou zaznamenávat veškeré cizí přístup včetně přístup přes bannery.

Location:

trunk/includes

Files:

• FileStream.php (modified) (2 diffs)
• MemoryStream.php (modified) (3 diffs)
• global.php (modified) (1 diff)
• global_function.php (modified) (1 diff)

trunk/includes/FileStream.php

@@ -74 +74 @@
   }
 
-  public function ReadString()
+  public function ReadLine()
+  {
+    return(fgets($this->Handle));
+  }    
+
+  public function ReadTextLine()
   {
     return(fgets($this->Handle));
@@ -111 +116 @@
   public function WriteString($Value)
   {
-    fwrite($this->Handle, $Value."\0");
+    fwrite($this->Handle, $Value);
+  }
+
+  public function WriteLine($Value)
+  {
+    fputs($this->Handle, $Value);
   }
 

trunk/includes/MemoryStream.php

@@ -58 +58 @@
   }
 
-  public function ReadString()
+  public function ReadLine($EndSymbol = "\r")
   {
     $Length = 0;
@@ -65 +65 @@
     {
       $Char = $this->ReadChar();
-      if($Char == "\0") break;
+      if($Char == $EndSymbol) break;
     }
     $Result = substr($this->Data, $StartPosition, $this->Position - $StartPosition);
@@ -104 +104 @@
   }    
   
-  public function WriteString($Value)
+  public function WriteLine($Value)
   {
-    $this->WriteBlock($Value."\0", strlen($Value) + 1);
+    $this->WriteBlock($Value."\r\n", strlen($Value) + 2);
   }
 

trunk/includes/global.php

@@ -29 +29 @@
 $TranslationTree = GetTranslationTree();
 $LanguageList = GetLanguageList();
+
+LogReferal();
 
 function GetMicrotime()

trunk/includes/global_function.php

@@ -536 +536 @@
 }
 
+function LogReferal()
+{
+  global $System;
+
+  if(array_key_exists('HTTP_REFERER', $_SERVER)) $Referer = addslashes($_SERVER['HTTP_REFERER']);
+    else $Referer = '';
+  $Referer = substr($Referer, strpos($Referer, '/') + 2);
+  $HostName = substr($Referer, 0, strpos($Referer, '/'));
+  if(substr($HostName, -1) == '.') $HostName = substr($HostName, 0, -1);
+  //if($HostName != gethostbyname($HostName))
+  {
+    $Referer = 'http://'.$HostName.'/';
+    $System->Database->query('REPLACE INTO `Referal` (`Web`, `DateFirst`, `DateLast`, `LastURL`) VALUES ("'.$Referer.'", NOW(), NOW( ), "'.addslashes($_SERVER['HTTP_REFERER']).'")');
+  }
+}
+
 ?>