original_string: protected function visitorCheckReferrer($vid)
  	{
  		if ($this->_HitCounted === true) 
  		{
  			if ($this->_PF === false) 
  			{
  				$ModuleVisitorReferrer = new ModuleVisitorReferrer();
  				$ModuleVisitorReferrer->checkReferrer();
  				$ReferrerDNS = $ModuleVisitorReferrer->getReferrerDNS();
  				$ReferrerFull= $ModuleVisitorReferrer->getReferrerFull();
  				//Debug log_message('visitorCheckReferrer $ReferrerDNS:'.print_r($ReferrerDNS,true), 'debug.log');
  				//Debug log_message('visitorCheckReferrer Host:'.print_r($this->ModuleVisitorReferrer->getHost(),true), 'debug.log');
  				if ($ReferrerDNS != 'o' && $ReferrerDNS != 'w') 
  				{ 	// not the own, not wrong
  					// Insert
  			        $arrSet = array
  			        (
  			            'vid'                   => $vid,
  			            'tstamp'                => time(),
  			            'visitors_referrer_dns' => $ReferrerDNS,
  			            'visitors_referrer_full'=> $ReferrerFull
  			        );
  			        //Referrer setzen
  			    	//Debug log_message('visitorCheckReferrer Referrer setzen', 'debug.log');
  			        \Database::getInstance()
  			                ->prepare("INSERT INTO tl_visitors_referrer %s")
                              ->set($arrSet)
                              ->execute();
  				    // Delete old entries
  				    $CleanTime = mktime(0, 0, 0, date("m")-4, date("d"), date("Y")); // Einträge >= 120 Tage werden gelöscht
  				    \Database::getInstance()
                              ->prepare("DELETE FROM tl_visitors_referrer WHERE tstamp < ? AND vid = ?")
                              ->execute($CleanTime, $vid);
  		    	}
  		    } //if PF
  	    } //if VB
  	}
code: protected function visitorCheckReferrer($vid)
  	{
  		if ($this->_HitCounted === true) 
  		{
  			if ($this->_PF === false) 
  			{
  				$ModuleVisitorReferrer = new ModuleVisitorReferrer();
  				$ModuleVisitorReferrer->checkReferrer();
  				$ReferrerDNS = $ModuleVisitorReferrer->getReferrerDNS();
  				$ReferrerFull= $ModuleVisitorReferrer->getReferrerFull();
  				//Debug log_message('visitorCheckReferrer $ReferrerDNS:'.print_r($ReferrerDNS,true), 'debug.log');
  				//Debug log_message('visitorCheckReferrer Host:'.print_r($this->ModuleVisitorReferrer->getHost(),true), 'debug.log');
  				if ($ReferrerDNS != 'o' && $ReferrerDNS != 'w') 
  				{ 	// not the own, not wrong
  					// Insert
  			        $arrSet = array
  			        (
  			            'vid'                   => $vid,
  			            'tstamp'                => time(),
  			            'visitors_referrer_dns' => $ReferrerDNS,
  			            'visitors_referrer_full'=> $ReferrerFull
  			        );
  			        //Referrer setzen
  			    	//Debug log_message('visitorCheckReferrer Referrer setzen', 'debug.log');
  			        \Database::getInstance()
  			                ->prepare("INSERT INTO tl_visitors_referrer %s")
                              ->set($arrSet)
                              ->execute();
  				    // Delete old entries
  				    $CleanTime = mktime(0, 0, 0, date("m")-4, date("d"), date("Y")); // Einträge >= 120 Tage werden gelöscht
  				    \Database::getInstance()
                              ->prepare("DELETE FROM tl_visitors_referrer WHERE tstamp < ? AND vid = ?")
                              ->execute($CleanTime, $vid);
  		    	}
  		    } //if PF
  	    } //if VB
  	}
code_tokens: protected function visitorCheckReferrer ( $ vid ) { if ( $ this -> _HitCounted === true ) { if ( $ this -> _PF === false ) { $ ModuleVisitorReferrer = new ModuleVisitorReferrer ( ) ; $ ModuleVisitorReferrer -> checkReferrer ( ) ; $ ReferrerDNS = $ ModuleVisitorReferrer -> getReferrerDNS ( ) ; $ ReferrerFull = $ ModuleVisitorReferrer -> getReferrerFull ( ) ; //Debug log_message('visitorCheckReferrer $ReferrerDNS:'.print_r($ReferrerDNS,true), 'debug.log'); //Debug log_message('visitorCheckReferrer Host:'.print_r($this->ModuleVisitorReferrer->getHost(),true), 'debug.log'); if ( $ ReferrerDNS != 'o' && $ ReferrerDNS != 'w' ) { // not the own, not wrong // Insert $ arrSet = array ( 'vid' => $ vid , 'tstamp' => time ( ) , 'visitors_referrer_dns' => $ ReferrerDNS , 'visitors_referrer_full' => $ ReferrerFull ) ; //Referrer setzen //Debug log_message('visitorCheckReferrer Referrer setzen', 'debug.log'); \ Database :: getInstance ( ) -> prepare ( "INSERT INTO tl_visitors_referrer %s" ) -> set ( $ arrSet ) -> execute ( ) ; // Delete old entries $ CleanTime = mktime ( 0 , 0 , 0 , date ( "m" ) - 4 , date ( "d" ) , date ( "Y" ) ) ; // Einträge >= 120 Tage werden gelöscht \ Database :: getInstance ( ) -> prepare ( "DELETE FROM tl_visitors_referrer WHERE tstamp < ? AND vid = ?" ) -> execute ( $ CleanTime , $ vid ) ; } } //if PF } //if VB }
docstring: Check for Referrer
  
  @param integer $vid	Visitors ID
docstring_tokens: Check for Referrer