<?php
/*Todo:
 * Wrapper
 */
header('Content-type: text/javascript');
class PMIDLookup {

	private $id;
	
	public function __construct( $id ) {
		$this->id = $id;
	}
	
	public function getResult() {
		$url = 'http://eutils.ncbi.nlm.nih.gov/entrez/eutils/esummary.fcgi?';
		$url .= "&db=pubmed";
		$url .= '&tool=WikipediaRefToolbar2';
		$url .= '&email=alexz@toolserver.org';
		$url .= "&id={$this->id}";
		$url .= '&retmode=xml';
		
		$ch = curl_init($url); 
		curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1); 
		$xml = curl_exec($ch);
		curl_close($ch);
		$data = simplexml_load_string($xml);
		$result = array();
		foreach($data->DocSum->Item as $i) {
			switch ($i['Name']) {
				case 'PubDate':
					$result['date'] = (string)$i;
					break;
				case 'FullJournalName':
					$result['journal'] = (string)$i;
					break;
				case 'Title':
					$result['title'] = (string)$i;
					break;
				case 'Volume':
					$result['volume'] = (string)$i;
					break;
				case 'Issue':
					$result['issue'] = (string)$i;
					break;
				case 'Pages':
					$result['pages'] = (string)$i;
					break;
				case 'AuthorList':
					foreach($i->Item as $a) {
						$r = preg_match('/^(.*?) (\S*)$/', (string)$a, $match);
						if ($r) {
							$result['authors'][] = array( $match[1], $match[2] );
						} else {
							$result['authors'][] = array( (string)$a, '' );
						}
					}
					break;			
			}
		}
		return $result;
	}
}

class ISBNLookup {

	private $id;
	
	public function __construct( $id ) {
		$this->id = $id;
	}
	
	public function getResult() {
		$url = "http://xisbn.worldcat.org/webservices/xid/isbn/{$this->id}?method=getMetadata&format=json&fl=year,ed,title,author,publisher,city";
		$ch = curl_init($url); 
		curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1); 
		$json = curl_exec($ch);
		curl_close($ch);
		$data = json_decode($json, true);
		$result = array();
		if ($data['stat'] == 'ok') {
			$result['title'] = $data['list'][0]['title'];
			$result['publisher'] = $data['list'][0]['publisher'];
			$result['location'] = $data['list'][0]['city'];
			$result['year'] = $data['list'][0]['year'];
			$result['edition'] = $data['list'][0]['ed'];
			$authors = $data['list'][0]['author'];
			$authors = rtrim($authors, '.');
			if (strpos($authors, 'by ') === 0) {
				$authors = substr($authors, 3);
			}
			$result['authors'] = array();
			$a = explode(' and ', $authors);
			$alist = array();
			if (count($a) == 2) {
				$alist = explode(', ', $a[0]);
				$alist[] = $a[1];
			} else {
				$alist[] = $authors;
			}
			foreach($alist as $a) {
				$r = preg_match('/^(.*?) (\S*)$/', $a, $match);
				if ($r) {
					$result['authors'][] = array( $match[2], $match[1] );
				} else {
					$result['authors'][] = array( $a, '');
				}
			}
		}
		return $result;		
	}
	
}

class DOILookup {

	private $id;
	
	public function __construct( $id ) {
		$this->id = $id;
	}
	
	public function getResult() {
		require_once('crossref.php');
		$url = "http://www.crossref.org/openurl/?id={$this->id}&noredirect=true&pid=$crPID&format=unixref";
		$ch = curl_init($url); 
		curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1); 
		$xml = curl_exec($ch);
		curl_close($ch);
		$data = simplexml_load_string($xml);
		$result = array();
		if (!$data->doi_record->crossref->error) {
			$res = $data->doi_record->crossref->journal;

			$result['title'] = (string)$res->journal_article->titles->title[0];
			$result['journal'] = (string)$res->journal_metadata->full_title;
			$result['volume'] = (string)$res->journal_issue->journal_volume->volume;
			$result['issue'] = (string)$res->journal_issue->issue;
			if ($res->journal_article->pages) {
				$result['pages'] = (string)$res->journal_article->pages->first_page;
				$res->journal_article->pages->last_page ? $result['pages'].='â€“'.$res->journal_article->pages->last_page : 0;
			}
			$result['date'] = (string)$res->journal_article->publication_date->year;
			$res->journal_article->publication_date->month ? (string)$result['date'].='-'.$res->journal_article->publication_date->month : 0;
			$res->journal_article->publication_date->day ? (string)$result['date'].='-'.$res->journal_article->publication_date->day : 0;
			$result['authors'] = array();

			foreach($res->journal_article->contributors->person_name as $a) {
				$result['authors'][] = array((string)$a->surname, (string)$a->given_name);
			}		
		}
		return $result;
	}	
}

$k = array_keys($_GET);
switch($k[0]) {
	case 'pmid':
		$class = PMIDLookup;
		break;
	case 'isbn':
		$class = ISBNLookup;
		break;
	case 'doi':
		$class = DOILookup;
		break;
	default:
		die(1);
}
$idval = trim($_GET[$k[0]]);
$look = new $class($idval);
$res = $look->getResult();
$tem = $_GET['template'];
echo 'CiteTB.autoFill('.json_encode($res).", '$tem', '{$k[0]}')";