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
	}
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
	}
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 }
Check for Referrer

@param integer $vid	Visitors ID
Check for Referrer