reference.php

<?php
include_once 'sparqlQuery.php';

/**
 * 
 */
class reference 
{
	private $url = null;
	private $publisherQID = null;
	private $lang  = 'en';
	private $langQID = 'Q1860'; //English
	private $authors = "";
	private $title   = null;
	private $pubdate = null;
	private $today = null;	
	function __construct($url='', $lang='', $authors = '', $title = '', $pubdate = ''){
		self::setURL($url);
		self::setLanguage($lang);
		self::setAuthors($authors);
		self::setTitle($title);
		self::setPubDate($pubdate);
	}
	public function setURL($value){
  		if(filter_var($value, FILTER_VALIDATE_URL)){
			$this->url = $value;
			$this->publisherQID = null;
			$this->lang  = 'en';
			$this->langQID = 'Q1860'; //English
			$this->authors = "";
			$this->title   = null;
			$this->pubdate = null;
		}
		$this->today   = new DateTime();
	}
	public function getURL(){
		return $this->url;
	}
	public function setPubDate($value){
		if (trim($value) != ''){
			$this->pubdate =  DateTime::createFromFormat("Y-m-d",date('Y-m-d',  strtotime($value)));
		}
	}
	public function getPubDate(){
		return $this->pubdate;
	}
	public function setTitle($value){
		$this->title = strip_tags($value);
		//whatevere's after the pipe is probably "| Local Newspaper"
		$this->title = preg_replace("/^(.+?)\|.+/", "$1", $this->title);
		$this->title = trim($this->title);
	}
	public function getTitle(){
		return $this->title;
	}
	public function setLanguage($value){
		$value = trim(strtolower(strip_tags($value)));
		$value = preg_replace('/^(\w{2,3}).+/', "$1", $value);
		if ( $value != '' && !in_array($value, array("en", "eng"))){
			$this->lang = $value;
			$query = 'SELECT DISTINCT ?qid  WHERE {
                ?language wdt:P424 "'.$this->lang.'" . 
       			?language wdt:P31 ?subclass_language.
       			?subclass_language wdt:P279 * wd:Q34770 .
       			hint:Query hint:optimizer "None".
       			BIND( REPLACE( str(?language), \'http://www.wikidata.org/entity/\', \'\') as ?qid)
      			}LIMIT 1';
			$data = sparqlQuery($query);
			foreach ($data['results']['bindings'] as $result){
				$this->langQID = $result['qid']['value'];
			}
		}

	}
	public function getLanguage(){
		return $this->lang;
	}
	public function setAuthors($value){
		if (is_array($value)){
			$value = array_unique($value);
			$this->authors = implode("|", $value);
		}
		else{
			$this->authors = trim(strip_tags($value));
		}

		$this->authors = str_replace(" and ", "|" ,$this->authors);
		$this->authors = preg_replace('/\bCNN\b/', "", $this->authors);
		if (preg_match('/^[\p{Lu} \W]+$/', $this->authors)) {
			$this->authors = ucwords(strtolower($this->authors));
		}
	}
	public function getAuthors(){
		return $this->authors;
	}
	public function getDescribedAtUrlQS(){
		if ($this->url != null){
			$qs = "P973|\"".$this->url."\"";
			if ($this->title != null){
				$qs .= '|P1476|'.$this->lang.':"'.$this->title.'"';
			}
			if (self::getPublisherQID() != null){
				$qs .= '|P123|'.$this->publisherQID;
			}
			$qs .= "|P407|".$this->langQID;
			foreach (explode("|", $this->authors) as $author) {
				//P2093 author name string
				if($author != ""){
					$qs .= '|P2093|"'.$author.'"';
				}
			}
			if ($this->pubdate != null){
				//P577 = publication date
				$qs .= '|P577|+'.$this->pubdate->format( 'Y-m-d' ).'T00:00:00Z/11';
			}
			//P813 = retrieved
			$qs .= '|P813|+'.$this->today->format( 'Y-m-d' ).'T00:00:00Z/11'; 

			return $qs;
		}
		return null;
	}

	public function getQS(){
		if ($this->url != null){
			$qs = "";
			if ($this->title != null){
				$qs .= '|S1476|'.$this->lang.':"'.$this->title.'"';
			}
			if (self::getPublisherQID() != null){
				//P123 = publisher
				$qs .= '|S123|'.$this->publisherQID;
			}
			$qs .= "|S407|".$this->langQID;
			foreach (explode("|", $this->authors) as $author) {
				//P2093 author name string
				if($author != ""){
					$qs .= '|S2093|"'.$author.'"';
				}
			}
			if ($this->pubdate != null){
				//P577 = publication date
				$qs .= '|S577|+'.$this->pubdate->format( "Y-m-d" ).'T00:00:00Z/11';
			}
			//P813 = retrieved
			$qs .= '|S813|+'.$this->today->format( "Y-m-d" ).'T00:00:00Z/11'; 
			$qs .= '|S854|"'.$this->url.'"';

			return $qs;
		}
		return null;
	}
	public function getPublisherQID(){
		if ($this->publisherQID == null && $this->url != null){
			$urls = self::getHostVariations();
				
			$query = 'SELECT ?qid WHERE {';
			foreach ($urls as $url) {
				$query .= "{?item wdt:P856 <".$url."> }\n union";
			}
			$query = preg_replace("/union$/", "", $query);

			$query .= 'BIND(REPLACE(STR(?item), "http://www.wikidata.org/entity/", "") AS ?qid)	}LIMIT 1';
			$data = sparqlQuery($query);
			foreach ($data['results']['bindings'] as $item) {
				$this->publisherQID =  $item['qid']['value'];
			}
		}
		return $this->publisherQID;
	}
	
	private function getHostVariations(){
		$hosts = array();
		$hosts[] = parse_url($this->url)['host'];
		//host2: name without the "www."
		$host_parts = explode(".", $hosts[0]);
		array_shift($host_parts);
		if (count($host_parts) > 1){
			$hosts[]  = implode(".", $host_parts);
		}
		$combos = combos(array(array("http://", "https://"), 
							   array("www.", ""), 
							   $hosts, 
							   array("/", "")));
		$urls = array();
		foreach ($combos as $combo) {
			$url = implode("", $combo);
			if (!strpos($url, "www.www.")){
				$urls[] = $url;
			}
		}
		$urls = array_unique($urls);
		return $urls;
	}
}

/**
 * Generate all the possible combinations among a set of nested arrays.
 *
 * @param array $data  The entrypoint array container.
 * @param array $all   The final container (used internally).
 * @param array $group The sub container (used internally).
 * @param mixed $val   The value to append (used internally).
 * @param int   $i     The key index (used internally).
 *
 * creator: Fabio Cicerchia
 *
 * https://gist.github.com/fabiocicerchia/4556892
 */
function combos(array $data, array &$all = array(), array $group = array(), $value = null, $i = 0){
    $keys = array_keys($data);
    if (isset($value) === true) {
        array_push($group, $value);
    }

    if ($i >= count($data)) {
        array_push($all, $group);
    } else {
        $currentKey     = $keys[$i];
        $currentElement = $data[$currentKey];
        foreach ($currentElement as $val) {
            combos($data, $all, $group, $val, $i + 1);
        }
    }

    return $all;
}

?>