<?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]}')";