moving things into a class
This commit is contained in:
Daniel Neis
parent
41b005ae1a
commit
1b51e1ced6
|
|
@ -1,73 +0,0 @@
|
||||||
<?php
|
|
||||||
/**
|
|
||||||
* \file
|
|
||||||
* \brief Response to Verb GetRecord
|
|
||||||
*
|
|
||||||
* Retrieve a record based its identifier.
|
|
||||||
*
|
|
||||||
* Local variables <B>$metadataPrefix</B> and <B>$identifier</B> need to be provided through global array variable <B>$args</B>
|
|
||||||
* by their indexes 'metadataPrefix' and 'identifier'.
|
|
||||||
* The reset of information will be extracted from database based those two parameters.
|
|
||||||
*/
|
|
||||||
|
|
||||||
debug_message("\nI am debuging". __FILE__) ;
|
|
||||||
|
|
||||||
$metadataPrefix = $args['metadataPrefix'];
|
|
||||||
// myhandler is a php file which will be included to generate metadata node.
|
|
||||||
// $inc_record = $METADATAFORMATS[$metadataPrefix]['myhandler'];
|
|
||||||
|
|
||||||
if (is_array($METADATAFORMATS[$metadataPrefix]) && isset($METADATAFORMATS[$metadataPrefix]['myhandler'])) {
|
|
||||||
$inc_record = $METADATAFORMATS[$metadataPrefix]['myhandler'];
|
|
||||||
} else {
|
|
||||||
$errors[] = oai_error('cannotDisseminateFormat', 'metadataPrefix', $metadataPrefix);
|
|
||||||
}
|
|
||||||
|
|
||||||
$identifier = $args['identifier'];
|
|
||||||
$query = selectallQuery($metadataPrefix, $identifier);
|
|
||||||
|
|
||||||
debug_message("Query: $query") ;
|
|
||||||
|
|
||||||
$res = $db->query($query);
|
|
||||||
|
|
||||||
if ($res===false) {
|
|
||||||
if (SHOW_QUERY_ERROR) {
|
|
||||||
echo __FILE__.','.__LINE__."<br />";
|
|
||||||
echo "Query: $query<br />\n";
|
|
||||||
die($db->errorInfo());
|
|
||||||
} else {
|
|
||||||
$errors[] = oai_error('idDoesNotExist', '', $identifier);
|
|
||||||
}
|
|
||||||
} elseif (!$res->rowCount()) { // based on PHP manual, it might only work for some DBs
|
|
||||||
$errors[] = oai_error('idDoesNotExist', '', $identifier);
|
|
||||||
}
|
|
||||||
|
|
||||||
if (!empty($errors)) {
|
|
||||||
oai_exit();
|
|
||||||
}
|
|
||||||
|
|
||||||
$record = $res->fetch(PDO::FETCH_ASSOC);
|
|
||||||
if ($record===false) {
|
|
||||||
if (SHOW_QUERY_ERROR) {
|
|
||||||
echo __FILE__.','.__LINE__."<br />";
|
|
||||||
echo "Query: $query<br />\n";
|
|
||||||
}
|
|
||||||
$errors[] = oai_error('idDoesNotExist', '', $identifier);
|
|
||||||
}
|
|
||||||
|
|
||||||
$identifier = $record[$SQL['identifier']];;
|
|
||||||
|
|
||||||
$datestamp = formatDatestamp($record[$SQL['datestamp']]);
|
|
||||||
|
|
||||||
$status_deleted = (isset($record[$SQL['deleted']]) && ($record[$SQL['deleted']] == 'true') &&
|
|
||||||
($deletedRecord == 'transient' || $deletedRecord == 'persistent'));
|
|
||||||
|
|
||||||
$outputObj = new ANDS_Response_XML($args);
|
|
||||||
$cur_record = $outputObj->create_record();
|
|
||||||
$cur_header = $outputObj->create_header($identifier, $datestamp,$record[$SQL['set']],$cur_record);
|
|
||||||
// return the metadata record itself
|
|
||||||
if (!$status_deleted) {
|
|
||||||
include($inc_record); // where the metadata node is generated.
|
|
||||||
create_metadata($outputObj, $cur_record, $identifier, $record[$SQL['set']], $db);
|
|
||||||
} else {
|
|
||||||
$cur_header->setAttribute("status","deleted");
|
|
||||||
}
|
|
||||||
134
identify.php
134
identify.php
|
|
@ -1,134 +0,0 @@
|
||||||
<?php
|
|
||||||
/**
|
|
||||||
* Response to Verb Identify
|
|
||||||
*
|
|
||||||
* Tell the world what the data provider is. Usually it is static once the provider has been set up.
|
|
||||||
*
|
|
||||||
* \see http://www.openarchives.org/OAI/2.0/guidelines-oai-identifier.htm for details
|
|
||||||
*/
|
|
||||||
|
|
||||||
// The response to Identify is fixed
|
|
||||||
if (SHOW_QUERY_ERROR) {
|
|
||||||
echo "Here are some settings in raw format:\n";
|
|
||||||
print_r($identifyResponse);
|
|
||||||
echo 'MAXRECORDS ',MAXRECORDS, ', MAXIDS ', MAXIDS,"\n";
|
|
||||||
echo 'Token is valid for ',TOKEN_VALID," seconds\n";
|
|
||||||
echo 'Tokens have prefix: ',TOKEN_PREFIX,"\n";
|
|
||||||
echo 'XMLSCHEMA: ',XMLSCHEMA,"\n";
|
|
||||||
echo "\n";
|
|
||||||
}
|
|
||||||
|
|
||||||
$outputObj = new ANDS_Response_XML($args);
|
|
||||||
foreach($identifyResponse as $key => $val) {
|
|
||||||
$outputObj->add2_verbNode($key, $val);
|
|
||||||
}
|
|
||||||
|
|
||||||
if(isset($compression)) {
|
|
||||||
foreach($compression as $val) {
|
|
||||||
$outputObj->add2_verbNode("compression", $val);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
// A description MAY be included.
|
|
||||||
// Use this if you choose to comply with a specific format of unique identifiers
|
|
||||||
// for items.
|
|
||||||
// See http://www.openarchives.org/OAI/2.0/guidelines-oai-identifier.htm
|
|
||||||
// for details
|
|
||||||
|
|
||||||
// As they will not be changed, using string for simplicity.
|
|
||||||
$output = '';
|
|
||||||
if ($show_identifier && $repositoryIdentifier && $delimiter && $sampleIdentifier) {
|
|
||||||
$output .=
|
|
||||||
' <description>
|
|
||||||
<oai-identifier xmlns="http://www.openarchives.org/OAI/2.0/oai-identifier"
|
|
||||||
xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
|
|
||||||
xsi:schemaLocation="http://www.openarchives.org/OAI/2.0/oai-identifier
|
|
||||||
http://www.openarchives.org/OAI/2.0/oai-identifier.xsd">
|
|
||||||
<scheme>oai</scheme>
|
|
||||||
<repositoryIdentifier>'.$repositoryIdentifier.'</repositoryIdentifier>
|
|
||||||
<delimiter>'.$delimiter.'</delimiter>
|
|
||||||
<sampleIdentifier>'.$sampleIdentifier.'</sampleIdentifier>
|
|
||||||
</oai-identifier>
|
|
||||||
</description>'."\n";
|
|
||||||
}
|
|
||||||
|
|
||||||
// A description MAY be included.
|
|
||||||
// This example from arXiv.org is used by the e-prints community, please adjust
|
|
||||||
// see http://www.openarchives.org/OAI/2.0/guidelines-eprints.htm for details
|
|
||||||
|
|
||||||
// To include, change 'false' to 'true'.
|
|
||||||
if (false) {
|
|
||||||
$output .=
|
|
||||||
' <description>
|
|
||||||
<eprints xmlns="http://www.openarchives.org/OAI/1.1/eprints"
|
|
||||||
xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
|
|
||||||
xsi:schemaLocation="http://www.openarchives.org/OAI/1.1/eprints
|
|
||||||
http://www.openarchives.org/OAI/1.1/eprints.xsd">
|
|
||||||
<content>
|
|
||||||
<text>Author self-archived e-prints</text>
|
|
||||||
</content>
|
|
||||||
<metadataPolicy />
|
|
||||||
<dataPolicy />
|
|
||||||
<submissionPolicy />
|
|
||||||
</eprints>
|
|
||||||
</description>'."\n";
|
|
||||||
}
|
|
||||||
|
|
||||||
// If you want to point harvesters to other repositories, you can list their
|
|
||||||
// base URLs. Usage of friends container is RECOMMENDED.
|
|
||||||
// see http://www.openarchives.org/OAI/2.0/guidelines-friends.htm
|
|
||||||
// for details
|
|
||||||
|
|
||||||
// To include, change 'false' to 'true'.
|
|
||||||
if (false) {
|
|
||||||
$output .=
|
|
||||||
' <description>
|
|
||||||
<friends xmlns="http://www.openarchives.org/OAI/2.0/friends/"
|
|
||||||
xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
|
|
||||||
xsi:schemaLocation="http://www.openarchives.org/OAI/2.0/friends/
|
|
||||||
http://www.openarchives.org/OAI/2.0/friends.xsd">
|
|
||||||
<baseURL>http://naca.larc.nasa.gov/oai2.0/</baseURL>
|
|
||||||
<baseURL>http://techreports.larc.nasa.gov/ltrs/oai2.0/</baseURL>
|
|
||||||
<baseURL>http://physnet.uni-oldenburg.de/oai/oai2.php</baseURL>
|
|
||||||
<baseURL>http://cogprints.soton.ac.uk/perl/oai</baseURL>
|
|
||||||
<baseURL>http://ub.uni-duisburg.de:8080/cgi-oai/oai.pl</baseURL>
|
|
||||||
<baseURL>http://rocky.dlib.vt.edu/~jcdlpix/cgi-bin/OAI1.1/jcdlpix.pl</baseURL>
|
|
||||||
</friends>
|
|
||||||
</description>'."\n";
|
|
||||||
}
|
|
||||||
|
|
||||||
// If you want to provide branding information, adjust accordingly.
|
|
||||||
// Usage of friends container is OPTIONAL.
|
|
||||||
// see http://www.openarchives.org/OAI/2.0/guidelines-branding.htm
|
|
||||||
// for details
|
|
||||||
|
|
||||||
// To include, change 'false' to 'true'.
|
|
||||||
if (false) {
|
|
||||||
$output .=
|
|
||||||
' <description>
|
|
||||||
<branding xmlns="http://www.openarchives.org/OAI/2.0/branding/"
|
|
||||||
xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
|
|
||||||
xsi:schemaLocation="http://www.openarchives.org/OAI/2.0/branding/
|
|
||||||
http://www.openarchives.org/OAI/2.0/branding.xsd">
|
|
||||||
<collectionIcon>
|
|
||||||
<url>http://my.site/icon.png</url>
|
|
||||||
<link>http://my.site/homepage.html</link>
|
|
||||||
<title>MySite(tm)</title>
|
|
||||||
<width>88</width>
|
|
||||||
<height>31</height>
|
|
||||||
</collectionIcon>
|
|
||||||
<metadataRendering
|
|
||||||
metadataNamespace="http://www.openarchives.org/OAI/2.0/oai_dc/"
|
|
||||||
mimeType="text/xsl">http://some.where/DCrender.xsl</metadataRendering>
|
|
||||||
<metadataRendering
|
|
||||||
metadataNamespace="http://another.place/MARC"
|
|
||||||
mimeType="text/css">http://another.place/MARCrender.css</metadataRendering>
|
|
||||||
</branding>
|
|
||||||
</description>'."\n";
|
|
||||||
}
|
|
||||||
|
|
||||||
if(strlen($output)>10) {
|
|
||||||
$des = $outputObj->doc->createDocumentFragment();
|
|
||||||
$des->appendXML($output);
|
|
||||||
$outputObj->verbNode->appendChild($des);
|
|
||||||
}
|
|
||||||
|
|
@ -1,68 +0,0 @@
|
||||||
<?php
|
|
||||||
/**
|
|
||||||
* \file
|
|
||||||
* \brief Response to Verb ListMetadataFormats
|
|
||||||
*
|
|
||||||
* The information of supported metadata formats :
|
|
||||||
* try database table $SQL['table']
|
|
||||||
* else try $METADATAFORMATS array from config-metadataformats.php
|
|
||||||
*/
|
|
||||||
|
|
||||||
/**
|
|
||||||
* Add a metadata format node to an ANDS_Response_XML
|
|
||||||
* \param &$outputObj
|
|
||||||
* type: ANDS_Response_XML. The ANDS_Response_XML object for output.
|
|
||||||
* \param $key
|
|
||||||
* type string. The name of new node.
|
|
||||||
* \param $val
|
|
||||||
* type: array. Values accessable through keywords 'schema' and 'metadataNamespace'.
|
|
||||||
*
|
|
||||||
*/
|
|
||||||
function addMetedataFormat(&$outputObj,$key,$val) {
|
|
||||||
$cmf = $outputObj->add2_verbNode("metadataFormat");
|
|
||||||
$outputObj->addChild($cmf,'metadataPrefix',$key);
|
|
||||||
$outputObj->addChild($cmf,'schema',$val['schema']);
|
|
||||||
$outputObj->addChild($cmf,'metadataNamespace',$val['metadataNamespace']);
|
|
||||||
}
|
|
||||||
|
|
||||||
if (isset($args['identifier'])) {
|
|
||||||
$identifier = $args['identifier'];
|
|
||||||
$query = 'select '.$SQL['metadataPrefix'].' FROM '.$SQL['table']. " WHERE ".$SQL['identifier']." = '".$id."'";
|
|
||||||
$res = $db->query($query);
|
|
||||||
if ($res==false) {
|
|
||||||
if (SHOW_QUERY_ERROR) {
|
|
||||||
echo __FILE__.','.__LINE__."<br />";
|
|
||||||
echo "Query: $query<br />\n";
|
|
||||||
die($db->errorInfo());
|
|
||||||
} else {
|
|
||||||
$errors[] = oai_error('idDoesNotExist','', $identifier);
|
|
||||||
}
|
|
||||||
} else {
|
|
||||||
$record = $res->fetch();
|
|
||||||
if($record===false) {
|
|
||||||
$errors[] = oai_error('idDoesNotExist', '', $identifier);
|
|
||||||
} else {
|
|
||||||
$mf = explode(",",$record[$SQL['metadataPrefix']]);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
//break and clean up on error
|
|
||||||
if (!empty($errors)) {
|
|
||||||
oai_exit();
|
|
||||||
}
|
|
||||||
|
|
||||||
$outputObj = new ANDS_Response_XML($args);
|
|
||||||
if (isset($mf)) {
|
|
||||||
foreach($mf as $key) {
|
|
||||||
$val = $METADATAFORMATS[$key];
|
|
||||||
addMetedataFormat($outputObj,$key, $val);
|
|
||||||
}
|
|
||||||
} elseif (is_array($METADATAFORMATS)) {
|
|
||||||
foreach($METADATAFORMATS as $key=>$val) {
|
|
||||||
addMetedataFormat($outputObj,$key, $val);
|
|
||||||
}
|
|
||||||
} else { // a very unlikely event
|
|
||||||
$errors[] = oai_error('noMetadataFormats');
|
|
||||||
oai_exit();
|
|
||||||
}
|
|
||||||
176
listrecords.php
176
listrecords.php
|
|
@ -1,176 +0,0 @@
|
||||||
<?php
|
|
||||||
/**
|
|
||||||
* \file
|
|
||||||
* \brief Response to Verb ListRecords
|
|
||||||
*
|
|
||||||
* Lists records according to conditions. If there are too many, a resumptionToken is generated.
|
|
||||||
* - If a request comes with a resumptionToken and is still valid, read it and send back records.
|
|
||||||
* - Otherwise, set up a query with conditions such as: 'metadataPrefix', 'from', 'until', 'set'.
|
|
||||||
* Only 'metadataPrefix' is compulsory. All conditions are accessible through global array variable <B>$args</B> by keywords.
|
|
||||||
*/
|
|
||||||
|
|
||||||
debug_message("\nI am debuging". __FILE__) ;
|
|
||||||
|
|
||||||
// Resume previous session?
|
|
||||||
if (isset($args['resumptionToken'])) {
|
|
||||||
if (!file_exists(TOKEN_PREFIX.$args['resumptionToken'])) {
|
|
||||||
$errors[] = oai_error('badResumptionToken', '', $args['resumptionToken']);
|
|
||||||
} else {
|
|
||||||
$readings = readResumToken(TOKEN_PREFIX.$args['resumptionToken']);
|
|
||||||
if ($readings == false) {
|
|
||||||
$errors[] = oai_error('badResumptionToken', '', $args['resumptionToken']);
|
|
||||||
} else {
|
|
||||||
debug_var_dump('readings',$readings);
|
|
||||||
list($deliveredrecords, $extquery, $metadataPrefix) = $readings;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
} else { // no, we start a new session
|
|
||||||
$deliveredrecords = 0;
|
|
||||||
$extquery = '';
|
|
||||||
|
|
||||||
$metadataPrefix = $args['metadataPrefix'];
|
|
||||||
|
|
||||||
if (isset($args['from'])) {
|
|
||||||
$from = checkDateFormat($args['from']);
|
|
||||||
$extquery .= fromQuery($from);
|
|
||||||
}
|
|
||||||
|
|
||||||
if (isset($args['until'])) {
|
|
||||||
$until = checkDateFormat($args['until']);
|
|
||||||
$extquery .= untilQuery($until);
|
|
||||||
}
|
|
||||||
|
|
||||||
if (isset($args['set'])) {
|
|
||||||
if (is_array($SETS)) {
|
|
||||||
$extquery .= setQuery($args['set']);
|
|
||||||
} else {
|
|
||||||
$errors[] = oai_error('noSetHierarchy');
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
if (!empty($errors)) {
|
|
||||||
oai_exit();
|
|
||||||
}
|
|
||||||
|
|
||||||
// Load the handler
|
|
||||||
if (is_array($METADATAFORMATS[$metadataPrefix]) && isset($METADATAFORMATS[$metadataPrefix]['myhandler'])) {
|
|
||||||
$inc_record = $METADATAFORMATS[$metadataPrefix]['myhandler'];
|
|
||||||
include($inc_record);
|
|
||||||
} else {
|
|
||||||
$errors[] = oai_error('cannotDisseminateFormat', 'metadataPrefix', $metadataPrefix);
|
|
||||||
}
|
|
||||||
|
|
||||||
if (!empty($errors)) {
|
|
||||||
oai_exit();
|
|
||||||
}
|
|
||||||
|
|
||||||
if (empty($errors)) {
|
|
||||||
$query = selectallQuery($metadataPrefix) . $extquery;
|
|
||||||
debug_message("Query: $query") ;
|
|
||||||
|
|
||||||
$res = $db->prepare($query, array(PDO::ATTR_CURSOR => PDO::CURSOR_SCROLL));
|
|
||||||
$r = $res->execute();
|
|
||||||
if (($r===false) ) {
|
|
||||||
if ( (SHOW_QUERY_ERROR)) {
|
|
||||||
echo __FILE__.','.__LINE__."<br />";
|
|
||||||
echo "Query: $query<br />\n";
|
|
||||||
print_r($db->errorInfo());
|
|
||||||
exit();
|
|
||||||
} else {
|
|
||||||
$errors[] = oai_error('noRecordsMatch');
|
|
||||||
}
|
|
||||||
} else {
|
|
||||||
$r = $res->setFetchMode(PDO::FETCH_ASSOC);
|
|
||||||
if ($r===false) {
|
|
||||||
exit("FetchMode is not supported");
|
|
||||||
}
|
|
||||||
$num_rows = rowCount($metadataPrefix, $extquery, $db);
|
|
||||||
if ($num_rows==0) {
|
|
||||||
if (SHOW_QUERY_ERROR) {
|
|
||||||
echo "Cannot find records: $query\n";
|
|
||||||
}
|
|
||||||
$errors[] = oai_error('noRecordsMatch');
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
if (!empty($errors)) {
|
|
||||||
oai_exit();
|
|
||||||
}
|
|
||||||
|
|
||||||
// Will we need a new ResumptionToken?
|
|
||||||
if($args['verb']=='ListRecords') {
|
|
||||||
$maxItems = MAXRECORDS;
|
|
||||||
} elseif($args['verb']=='ListIdentifiers') {
|
|
||||||
$maxItems = MAXIDS;
|
|
||||||
} else {
|
|
||||||
exit("Check ".__FILE__." ".__LINE__.", there is something wrong.");
|
|
||||||
}
|
|
||||||
$maxrec = min($num_rows - $deliveredrecords, $maxItems);
|
|
||||||
|
|
||||||
if ($num_rows - $deliveredrecords > $maxItems) {
|
|
||||||
$cursor = (int)$deliveredrecords + $maxItems;
|
|
||||||
$restoken = createResumToken($cursor, $extquery, $metadataPrefix);
|
|
||||||
$expirationdatetime = gmstrftime('%Y-%m-%dT%TZ', time()+TOKEN_VALID);
|
|
||||||
} elseif (isset($args['resumptionToken'])) {
|
|
||||||
// Last delivery, return empty ResumptionToken
|
|
||||||
$restoken = $args['resumptionToken']; // just used as an indicator
|
|
||||||
unset($expirationdatetime);
|
|
||||||
}
|
|
||||||
|
|
||||||
if (isset($args['resumptionToken'])) {
|
|
||||||
debug_message("Try to resume because a resumptionToken supplied.") ;
|
|
||||||
$record = $res->fetch(PDO::FETCH_ASSOC, PDO::FETCH_ORI_ABS, $deliveredrecords);
|
|
||||||
}
|
|
||||||
// Record counter
|
|
||||||
$countrec = 0;
|
|
||||||
|
|
||||||
// Publish a batch to $maxrec number of records
|
|
||||||
$outputObj = new ANDS_Response_XML($args);
|
|
||||||
while ($countrec++ < $maxrec) {
|
|
||||||
$record = $res->fetch(PDO::FETCH_ASSOC);
|
|
||||||
if ($record===false) {
|
|
||||||
if (SHOW_QUERY_ERROR) {
|
|
||||||
echo __FILE__.",". __LINE__."<br />";
|
|
||||||
print_r($db->errorInfo());
|
|
||||||
exit();
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
$identifier = $oaiprefix.$record[$SQL['identifier']];
|
|
||||||
$datestamp = formatDatestamp($record[$SQL['datestamp']]);
|
|
||||||
$setspec = $record[$SQL['set']];
|
|
||||||
|
|
||||||
// debug_var_dump('record', $record);
|
|
||||||
$status_deleted = (isset($record[$SQL['deleted']]) && ($record[$SQL['deleted']] === true) &&
|
|
||||||
($deletedRecord == 'transient' || $deletedRecord == 'persistent'));
|
|
||||||
|
|
||||||
//debug_var_dump('status_deleted', $status_deleted);
|
|
||||||
if($args['verb']=='ListRecords') {
|
|
||||||
$cur_record = $outputObj->create_record();
|
|
||||||
$cur_header = $outputObj->create_header($identifier, $datestamp,$setspec,$cur_record);
|
|
||||||
// return the metadata record itself
|
|
||||||
if (!$status_deleted) {
|
|
||||||
debug_var_dump('inc_record',$inc_record);
|
|
||||||
create_metadata($outputObj, $cur_record, $identifier, $setspec, $db);
|
|
||||||
}
|
|
||||||
} else { // for ListIdentifiers, only identifiers will be returned.
|
|
||||||
$cur_header = $outputObj->create_header($identifier, $datestamp,$setspec);
|
|
||||||
}
|
|
||||||
if ($status_deleted) {
|
|
||||||
$cur_header->setAttribute("status","deleted");
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
// ResumptionToken
|
|
||||||
if (isset($restoken)) {
|
|
||||||
if(isset($expirationdatetime)) {
|
|
||||||
$outputObj->create_resumpToken($restoken,$expirationdatetime,$num_rows,$cursor);
|
|
||||||
} else {
|
|
||||||
$outputObj->create_resumpToken('',null,$num_rows,$deliveredrecords);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
// end ListRecords
|
|
||||||
if (SHOW_QUERY_ERROR) {echo "Debug listrecord.php reached to the end.\n\n";}
|
|
||||||
29
listsets.php
29
listsets.php
|
|
@ -1,29 +0,0 @@
|
||||||
<?php
|
|
||||||
/**
|
|
||||||
* \file
|
|
||||||
* \brief Response to Verb ListSets
|
|
||||||
*
|
|
||||||
* Lists what sets are available to records in the system.
|
|
||||||
* This variable is filled in config-sets.php
|
|
||||||
*/
|
|
||||||
|
|
||||||
// Here the size of sets is small, no resumptionToken is taken care.
|
|
||||||
if (is_array($SETS)) {
|
|
||||||
$outputObj = new ANDS_Response_XML($args);
|
|
||||||
foreach($SETS as $set) {
|
|
||||||
$setNode = $outputObj->add2_verbNode("set");
|
|
||||||
foreach($set as $key => $val) {
|
|
||||||
if($key=='setDescription') {
|
|
||||||
$desNode = $outputObj->addChild($setNode,$key);
|
|
||||||
$des = $outputObj->doc->createDocumentFragment();
|
|
||||||
$des->appendXML($val);
|
|
||||||
$desNode->appendChild($des);
|
|
||||||
} else {
|
|
||||||
$outputObj->addChild($setNode,$key,$val);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
} else {
|
|
||||||
$errors[] = oai_error('noSetHierarchy');
|
|
||||||
oai_exit();
|
|
||||||
}
|
|
||||||
36
oai2.php
36
oai2.php
|
|
@ -66,13 +66,6 @@ require_once('config/metadataformats.php');
|
||||||
require_once('config/sets.php');
|
require_once('config/sets.php');
|
||||||
require_once('config/database.php');
|
require_once('config/database.php');
|
||||||
|
|
||||||
// Create a PDO object
|
|
||||||
try {
|
|
||||||
$db = new PDO($DSN, $DB_USER, $DB_PASSWD);
|
|
||||||
} catch (PDOException $e) {
|
|
||||||
exit('Connection failed: ' . $e->getMessage());
|
|
||||||
}
|
|
||||||
|
|
||||||
// For generic usage or just trying:
|
// For generic usage or just trying:
|
||||||
// require_once('xml_creater.php');
|
// require_once('xml_creater.php');
|
||||||
// In common cases, you have to implement your own code to act fully and correctly.
|
// In common cases, you have to implement your own code to act fully and correctly.
|
||||||
|
|
@ -90,12 +83,19 @@ if (SHOW_QUERY_ERROR) {
|
||||||
echo "Args:\n"; print_r($args);
|
echo "Args:\n"; print_r($args);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
if (isset($args['verb'])) {
|
if (isset($args['verb'])) {
|
||||||
|
|
||||||
|
require_once('oai2server.php');
|
||||||
|
$oai2 = new OAI2Server($args);
|
||||||
|
|
||||||
switch ($args['verb']) {
|
switch ($args['verb']) {
|
||||||
|
|
||||||
case 'Identify':
|
case 'Identify':
|
||||||
|
|
||||||
// we never use compression in Identify
|
// we never use compression in Identify
|
||||||
$compress = FALSE;
|
$compress = FALSE;
|
||||||
|
|
||||||
if (count($args)>1) {
|
if (count($args)>1) {
|
||||||
foreach($args as $key => $val) {
|
foreach($args as $key => $val) {
|
||||||
if(strcmp($key,"verb")!=0) {
|
if(strcmp($key,"verb")!=0) {
|
||||||
|
|
@ -103,13 +103,19 @@ if (isset($args['verb'])) {
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
if (empty($errors)) include 'identify.php';
|
|
||||||
|
if (empty($errors)) {
|
||||||
|
$outputObj = $oai2->identify($show_identifier, $repositoryIdentifier, $delimiter, $sampleIdentifier);
|
||||||
|
}
|
||||||
break;
|
break;
|
||||||
|
|
||||||
case 'ListMetadataFormats':
|
case 'ListMetadataFormats':
|
||||||
|
|
||||||
$checkList = array("ops"=>array("identifier"));
|
$checkList = array("ops"=>array("identifier"));
|
||||||
checkArgs($args, $checkList);
|
checkArgs($args, $checkList);
|
||||||
if (empty($errors)) include 'listmetadataformats.php';
|
if (empty($errors)) {
|
||||||
|
$outputObj = $oai2->listMetadataFormats();
|
||||||
|
}
|
||||||
break;
|
break;
|
||||||
|
|
||||||
case 'ListSets':
|
case 'ListSets':
|
||||||
|
|
@ -118,13 +124,17 @@ if (isset($args['verb'])) {
|
||||||
}
|
}
|
||||||
$checkList = array("ops"=>array("resumptionToken"));
|
$checkList = array("ops"=>array("resumptionToken"));
|
||||||
checkArgs($args, $checkList);
|
checkArgs($args, $checkList);
|
||||||
if (empty($errors)) include 'listsets.php';
|
if (empty($errors)) {
|
||||||
|
$outputObj = $oai2->listSets($SETS);
|
||||||
|
}
|
||||||
break;
|
break;
|
||||||
|
|
||||||
case 'GetRecord':
|
case 'GetRecord':
|
||||||
$checkList = array("required"=>array("metadataPrefix","identifier"));
|
$checkList = array("required"=>array("metadataPrefix","identifier"));
|
||||||
checkArgs($args, $checkList);
|
checkArgs($args, $checkList);
|
||||||
if (empty($errors)) include 'getrecord.php';
|
if (empty($errors)) {
|
||||||
|
$outputObj = $oai2->getRecord();
|
||||||
|
}
|
||||||
break;
|
break;
|
||||||
|
|
||||||
case 'ListIdentifiers':
|
case 'ListIdentifiers':
|
||||||
|
|
@ -138,7 +148,9 @@ if (isset($args['verb'])) {
|
||||||
$checkList = array("required"=>array("metadataPrefix"),"ops"=>array("from","until","set"));
|
$checkList = array("required"=>array("metadataPrefix"),"ops"=>array("from","until","set"));
|
||||||
}
|
}
|
||||||
checkArgs($args, $checkList);
|
checkArgs($args, $checkList);
|
||||||
if (empty($errors)) include 'listrecords.php';
|
if (empty($errors)) {
|
||||||
|
$outputObj = $oai2->listRecords($SETS);
|
||||||
|
}
|
||||||
break;
|
break;
|
||||||
|
|
||||||
default:
|
default:
|
||||||
|
|
|
||||||
|
|
@ -0,0 +1,504 @@
|
||||||
|
<?php
|
||||||
|
class OAI2Server {
|
||||||
|
|
||||||
|
function __construct($args) {
|
||||||
|
$this->args = $args;
|
||||||
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* Response to Verb Identify
|
||||||
|
*
|
||||||
|
* Tell the world what the data provider is. Usually it is static once the provider has been set up.
|
||||||
|
*
|
||||||
|
* http://www.openarchives.org/OAI/2.0/guidelines-oai-identifier.htm for details
|
||||||
|
*/
|
||||||
|
public function identify($show_identifier, $repositoryIdentifier, $delimiter, $sampleIdentifier) {
|
||||||
|
global $identifyResponse;
|
||||||
|
|
||||||
|
$outputObj = new ANDS_Response_XML($this->args);
|
||||||
|
foreach($identifyResponse as $key => $val) {
|
||||||
|
$outputObj->add2_verbNode($key, $val);
|
||||||
|
}
|
||||||
|
|
||||||
|
// A description MAY be included.
|
||||||
|
// Use this if you choose to comply with a specific format of unique identifiers
|
||||||
|
// for items.
|
||||||
|
// See http://www.openarchives.org/OAI/2.0/guidelines-oai-identifier.htm
|
||||||
|
// for details
|
||||||
|
|
||||||
|
// As they will not be changed, using string for simplicity.
|
||||||
|
$output = '';
|
||||||
|
if ($show_identifier && $repositoryIdentifier && $delimiter && $sampleIdentifier) {
|
||||||
|
$output .=
|
||||||
|
' <description>
|
||||||
|
<oai-identifier xmlns="http://www.openarchives.org/OAI/2.0/oai-identifier"
|
||||||
|
xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
|
||||||
|
xsi:schemaLocation="http://www.openarchives.org/OAI/2.0/oai-identifier
|
||||||
|
http://www.openarchives.org/OAI/2.0/oai-identifier.xsd">
|
||||||
|
<scheme>oai</scheme>
|
||||||
|
<repositoryIdentifier>'.$repositoryIdentifier.'</repositoryIdentifier>
|
||||||
|
<delimiter>'.$delimiter.'</delimiter>
|
||||||
|
<sampleIdentifier>'.$sampleIdentifier.'</sampleIdentifier>
|
||||||
|
</oai-identifier>
|
||||||
|
</description>'."\n";
|
||||||
|
}
|
||||||
|
|
||||||
|
// A description MAY be included.
|
||||||
|
// This example from arXiv.org is used by the e-prints community, please adjust
|
||||||
|
// see http://www.openarchives.org/OAI/2.0/guidelines-eprints.htm for details
|
||||||
|
|
||||||
|
// To include, change 'false' to 'true'.
|
||||||
|
if (false) {
|
||||||
|
$output .=
|
||||||
|
' <description>
|
||||||
|
<eprints xmlns="http://www.openarchives.org/OAI/1.1/eprints"
|
||||||
|
xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
|
||||||
|
xsi:schemaLocation="http://www.openarchives.org/OAI/1.1/eprints
|
||||||
|
http://www.openarchives.org/OAI/1.1/eprints.xsd">
|
||||||
|
<content>
|
||||||
|
<text>Author self-archived e-prints</text>
|
||||||
|
</content>
|
||||||
|
<metadataPolicy />
|
||||||
|
<dataPolicy />
|
||||||
|
<submissionPolicy />
|
||||||
|
</eprints>
|
||||||
|
</description>'."\n";
|
||||||
|
}
|
||||||
|
|
||||||
|
// If you want to point harvesters to other repositories, you can list their
|
||||||
|
// base URLs. Usage of friends container is RECOMMENDED.
|
||||||
|
// see http://www.openarchives.org/OAI/2.0/guidelines-friends.htm
|
||||||
|
// for details
|
||||||
|
|
||||||
|
// To include, change 'false' to 'true'.
|
||||||
|
if (false) {
|
||||||
|
$output .=
|
||||||
|
' <description>
|
||||||
|
<friends xmlns="http://www.openarchives.org/OAI/2.0/friends/"
|
||||||
|
xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
|
||||||
|
xsi:schemaLocation="http://www.openarchives.org/OAI/2.0/friends/
|
||||||
|
http://www.openarchives.org/OAI/2.0/friends.xsd">
|
||||||
|
<baseURL>http://naca.larc.nasa.gov/oai2.0/</baseURL>
|
||||||
|
<baseURL>http://techreports.larc.nasa.gov/ltrs/oai2.0/</baseURL>
|
||||||
|
<baseURL>http://physnet.uni-oldenburg.de/oai/oai2.php</baseURL>
|
||||||
|
<baseURL>http://cogprints.soton.ac.uk/perl/oai</baseURL>
|
||||||
|
<baseURL>http://ub.uni-duisburg.de:8080/cgi-oai/oai.pl</baseURL>
|
||||||
|
<baseURL>http://rocky.dlib.vt.edu/~jcdlpix/cgi-bin/OAI1.1/jcdlpix.pl</baseURL>
|
||||||
|
</friends>
|
||||||
|
</description>'."\n";
|
||||||
|
}
|
||||||
|
|
||||||
|
// If you want to provide branding information, adjust accordingly.
|
||||||
|
// Usage of friends container is OPTIONAL.
|
||||||
|
// see http://www.openarchives.org/OAI/2.0/guidelines-branding.htm
|
||||||
|
// for details
|
||||||
|
|
||||||
|
// To include, change 'false' to 'true'.
|
||||||
|
if (false) {
|
||||||
|
$output .=
|
||||||
|
' <description>
|
||||||
|
<branding xmlns="http://www.openarchives.org/OAI/2.0/branding/"
|
||||||
|
xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
|
||||||
|
xsi:schemaLocation="http://www.openarchives.org/OAI/2.0/branding/
|
||||||
|
http://www.openarchives.org/OAI/2.0/branding.xsd">
|
||||||
|
<collectionIcon>
|
||||||
|
<url>http://my.site/icon.png</url>
|
||||||
|
<link>http://my.site/homepage.html</link>
|
||||||
|
<title>MySite(tm)</title>
|
||||||
|
<width>88</width>
|
||||||
|
<height>31</height>
|
||||||
|
</collectionIcon>
|
||||||
|
<metadataRendering
|
||||||
|
metadataNamespace="http://www.openarchives.org/OAI/2.0/oai_dc/"
|
||||||
|
mimeType="text/xsl">http://some.where/DCrender.xsl</metadataRendering>
|
||||||
|
<metadataRendering
|
||||||
|
metadataNamespace="http://another.place/MARC"
|
||||||
|
mimeType="text/css">http://another.place/MARCrender.css</metadataRendering>
|
||||||
|
</branding>
|
||||||
|
</description>'."\n";
|
||||||
|
}
|
||||||
|
|
||||||
|
if(strlen($output)>10) {
|
||||||
|
$des = $outputObj->doc->createDocumentFragment();
|
||||||
|
$des->appendXML($output);
|
||||||
|
$outputObj->verbNode->appendChild($des);
|
||||||
|
}
|
||||||
|
|
||||||
|
return $outputObj;
|
||||||
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* Response to Verb ListMetadataFormats
|
||||||
|
*
|
||||||
|
* The information of supported metadata formats :
|
||||||
|
* try database table $SQL['table']
|
||||||
|
* else try $METADATAFORMATS array from config-metadataformats.php
|
||||||
|
*/
|
||||||
|
public function listMetadataFormats() {
|
||||||
|
global $DSN, $DB_USER, $DB_PASSWD, $METADATAFORMATS, $SQL;
|
||||||
|
|
||||||
|
// Create a PDO object
|
||||||
|
try {
|
||||||
|
$db = new PDO($DSN, $DB_USER, $DB_PASSWD);
|
||||||
|
} catch (PDOException $e) {
|
||||||
|
exit('Connection failed: ' . $e->getMessage());
|
||||||
|
}
|
||||||
|
|
||||||
|
if (isset($this->args['identifier'])) {
|
||||||
|
|
||||||
|
$identifier = $this->args['identifier'];
|
||||||
|
$query = 'select '.$SQL['metadataPrefix'].' FROM '.$SQL['table']. " WHERE ".$SQL['identifier']." = '".$id."'";
|
||||||
|
$res = $db->query($query);
|
||||||
|
|
||||||
|
if ($res==false) {
|
||||||
|
if (SHOW_QUERY_ERROR) {
|
||||||
|
echo __FILE__.','.__LINE__."<br />";
|
||||||
|
echo "Query: $query<br />\n";
|
||||||
|
die($db->errorInfo());
|
||||||
|
} else {
|
||||||
|
$errors[] = oai_error('idDoesNotExist','', $identifier);
|
||||||
|
}
|
||||||
|
} else {
|
||||||
|
$record = $res->fetch();
|
||||||
|
if($record===false) {
|
||||||
|
$errors[] = oai_error('idDoesNotExist', '', $identifier);
|
||||||
|
} else {
|
||||||
|
$mf = explode(",",$record[$SQL['metadataPrefix']]);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
//break and clean up on error
|
||||||
|
if (!empty($errors)) {
|
||||||
|
oai_exit();
|
||||||
|
}
|
||||||
|
|
||||||
|
$outputObj = new ANDS_Response_XML($this->args);
|
||||||
|
if (isset($mf)) {
|
||||||
|
foreach($mf as $key) {
|
||||||
|
$val = $METADATAFORMATS[$key];
|
||||||
|
$this->addMetedataFormat($outputObj,$key, $val);
|
||||||
|
}
|
||||||
|
} elseif (is_array($METADATAFORMATS)) {
|
||||||
|
foreach($METADATAFORMATS as $key=>$val) {
|
||||||
|
$this->addMetedataFormat($outputObj,$key, $val);
|
||||||
|
}
|
||||||
|
} else { // a very unlikely event
|
||||||
|
$errors[] = oai_error('noMetadataFormats');
|
||||||
|
oai_exit();
|
||||||
|
}
|
||||||
|
|
||||||
|
return $outputObj;
|
||||||
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* Response to Verb ListSets
|
||||||
|
*
|
||||||
|
* Lists what sets are available to records in the system.
|
||||||
|
* This variable is filled in config-sets.php
|
||||||
|
*/
|
||||||
|
public function listSets($sets) {
|
||||||
|
|
||||||
|
if (is_array($sets)) {
|
||||||
|
$outputObj = new ANDS_Response_XML($this->args);
|
||||||
|
foreach($sets as $set) {
|
||||||
|
$setNode = $outputObj->add2_verbNode("set");
|
||||||
|
foreach($set as $key => $val) {
|
||||||
|
if($key=='setDescription') {
|
||||||
|
$desNode = $outputObj->addChild($setNode,$key);
|
||||||
|
$des = $outputObj->doc->createDocumentFragment();
|
||||||
|
$des->appendXML($val);
|
||||||
|
$desNode->appendChild($des);
|
||||||
|
} else {
|
||||||
|
$outputObj->addChild($setNode,$key,$val);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
} else {
|
||||||
|
$errors[] = oai_error('noSetHierarchy');
|
||||||
|
oai_exit();
|
||||||
|
}
|
||||||
|
return $outputObj;
|
||||||
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* Response to Verb GetRecord
|
||||||
|
*
|
||||||
|
* Retrieve a record based its identifier.
|
||||||
|
*
|
||||||
|
* Local variables <B>$metadataPrefix</B> and <B>$identifier</B> need to be provided through global array variable <B>$args</B>
|
||||||
|
* by their indexes 'metadataPrefix' and 'identifier'.
|
||||||
|
* The reset of information will be extracted from database based those two parameters.
|
||||||
|
*/
|
||||||
|
public function getRecord() {
|
||||||
|
global $METADATAFORMATS, $DSN, $DB_USER, $DB_PASSWD, $SQL;
|
||||||
|
|
||||||
|
$metadataPrefix = $this->args['metadataPrefix'];
|
||||||
|
// myhandler is a php file which will be included to generate metadata node.
|
||||||
|
// $inc_record = $METADATAFORMATS[$metadataPrefix]['myhandler'];
|
||||||
|
|
||||||
|
if (!isset($METADATAFORMATS[$metadataPrefix])) {
|
||||||
|
$errors[] = oai_error('cannotDisseminateFormat', 'metadataPrefix', $metadataPrefix);
|
||||||
|
}
|
||||||
|
|
||||||
|
// Create a PDO object
|
||||||
|
try {
|
||||||
|
$db = new PDO($DSN, $DB_USER, $DB_PASSWD);
|
||||||
|
} catch (PDOException $e) {
|
||||||
|
exit('Connection failed: ' . $e->getMessage());
|
||||||
|
}
|
||||||
|
|
||||||
|
$identifier = $this->args['identifier'];
|
||||||
|
$query = selectallQuery($metadataPrefix, $identifier);
|
||||||
|
|
||||||
|
$res = $db->query($query);
|
||||||
|
|
||||||
|
if ($res===false) {
|
||||||
|
$errors[] = oai_error('idDoesNotExist', '', $identifier);
|
||||||
|
} elseif (!$res->rowCount()) { // based on PHP manual, it might only work for some DBs
|
||||||
|
$errors[] = oai_error('idDoesNotExist', '', $identifier);
|
||||||
|
}
|
||||||
|
|
||||||
|
if (!empty($errors)) {
|
||||||
|
oai_exit();
|
||||||
|
}
|
||||||
|
|
||||||
|
$record = $res->fetch(PDO::FETCH_ASSOC);
|
||||||
|
if ($record===false) {
|
||||||
|
$errors[] = oai_error('idDoesNotExist', '', $identifier);
|
||||||
|
}
|
||||||
|
|
||||||
|
$identifier = $record[$SQL['identifier']];;
|
||||||
|
|
||||||
|
$datestamp = formatDatestamp($record[$SQL['datestamp']]);
|
||||||
|
|
||||||
|
$status_deleted = (isset($record[$SQL['deleted']]) && ($record[$SQL['deleted']] == 'true') &&
|
||||||
|
($deletedRecord == 'transient' || $deletedRecord == 'persistent'));
|
||||||
|
|
||||||
|
$outputObj = new ANDS_Response_XML($this->args);
|
||||||
|
$cur_record = $outputObj->create_record();
|
||||||
|
$cur_header = $outputObj->create_header($identifier, $datestamp,$record[$SQL['set']],$cur_record);
|
||||||
|
// return the metadata record itself
|
||||||
|
if ($status_deleted) {
|
||||||
|
$cur_header->setAttribute("status","deleted");
|
||||||
|
} else {
|
||||||
|
call_user_func(array($this, "{$metadataPrefix}_create_metadata"),
|
||||||
|
$outputObj, $cur_record, $identifier, $record[$SQL['set']], $db);
|
||||||
|
}
|
||||||
|
return $outputObj;
|
||||||
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* Response to Verb ListRecords
|
||||||
|
*
|
||||||
|
* Lists records according to conditions. If there are too many, a resumptionToken is generated.
|
||||||
|
* - If a request comes with a resumptionToken and is still valid, read it and send back records.
|
||||||
|
* - Otherwise, set up a query with conditions such as: 'metadataPrefix', 'from', 'until', 'set'.
|
||||||
|
* Only 'metadataPrefix' is compulsory. All conditions are accessible through global array variable <B>$args</B> by keywords.
|
||||||
|
*/
|
||||||
|
public function listRecords($sets) {
|
||||||
|
global $SQL, $METADATAFORMATS, $DSN, $DB_USER, $DB_PASSWD;
|
||||||
|
|
||||||
|
// Resume previous session?
|
||||||
|
if (isset($this->args['resumptionToken'])) {
|
||||||
|
if (!file_exists(TOKEN_PREFIX.$this->args['resumptionToken'])) {
|
||||||
|
$errors[] = oai_error('badResumptionToken', '', $this->args['resumptionToken']);
|
||||||
|
} else {
|
||||||
|
$readings = readResumToken(TOKEN_PREFIX.$this->args['resumptionToken']);
|
||||||
|
if ($readings == false) {
|
||||||
|
$errors[] = oai_error('badResumptionToken', '', $this->args['resumptionToken']);
|
||||||
|
} else {
|
||||||
|
list($deliveredrecords, $extquery, $metadataPrefix) = $readings;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
} else { // no, we start a new session
|
||||||
|
$deliveredrecords = 0;
|
||||||
|
$extquery = '';
|
||||||
|
|
||||||
|
$metadataPrefix = $this->args['metadataPrefix'];
|
||||||
|
|
||||||
|
if (isset($args['from'])) {
|
||||||
|
$from = checkDateFormat($this->args['from']);
|
||||||
|
$extquery .= fromQuery($from);
|
||||||
|
}
|
||||||
|
|
||||||
|
if (isset($args['until'])) {
|
||||||
|
$until = checkDateFormat($this->args['until']);
|
||||||
|
$extquery .= untilQuery($until);
|
||||||
|
}
|
||||||
|
|
||||||
|
if (isset($args['set'])) {
|
||||||
|
if (is_array($sets)) {
|
||||||
|
$extquery .= setQuery($this->args['set']);
|
||||||
|
} else {
|
||||||
|
$errors[] = oai_error('noSetHierarchy');
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
if (!isset($METADATAFORMATS[$metadataPrefix])) {
|
||||||
|
$errors[] = oai_error('cannotDisseminateFormat', 'metadataPrefix', $metadataPrefix);
|
||||||
|
}
|
||||||
|
|
||||||
|
if (!empty($errors)) {
|
||||||
|
oai_exit();
|
||||||
|
} else {
|
||||||
|
|
||||||
|
// Create a PDO object
|
||||||
|
try {
|
||||||
|
$db = new PDO($DSN, $DB_USER, $DB_PASSWD);
|
||||||
|
} catch (PDOException $e) {
|
||||||
|
exit('Connection failed: ' . $e->getMessage());
|
||||||
|
}
|
||||||
|
|
||||||
|
$query = selectallQuery($metadataPrefix) . $extquery;
|
||||||
|
|
||||||
|
$res = $db->prepare($query, array(PDO::ATTR_CURSOR => PDO::CURSOR_SCROLL));
|
||||||
|
$r = $res->execute();
|
||||||
|
if ($r===false) {
|
||||||
|
$errors[] = oai_error('noRecordsMatch');
|
||||||
|
} else {
|
||||||
|
$r = $res->setFetchMode(PDO::FETCH_ASSOC);
|
||||||
|
if ($r===false) {
|
||||||
|
exit("FetchMode is not supported");
|
||||||
|
}
|
||||||
|
$num_rows = rowCount($metadataPrefix, $extquery, $db);
|
||||||
|
if ($num_rows==0) {
|
||||||
|
$errors[] = oai_error('noRecordsMatch');
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
if (!empty($errors)) {
|
||||||
|
oai_exit();
|
||||||
|
}
|
||||||
|
|
||||||
|
// Will we need a new ResumptionToken?
|
||||||
|
if($this->args['verb']=='ListRecords') {
|
||||||
|
$maxItems = MAXRECORDS;
|
||||||
|
} elseif($this->args['verb']=='ListIdentifiers') {
|
||||||
|
$maxItems = MAXIDS;
|
||||||
|
} else {
|
||||||
|
exit("Check ".__FILE__." ".__LINE__.", there is something wrong.");
|
||||||
|
}
|
||||||
|
$maxrec = min($num_rows - $deliveredrecords, $maxItems);
|
||||||
|
|
||||||
|
if ($num_rows - $deliveredrecords > $maxItems) {
|
||||||
|
$cursor = (int)$deliveredrecords + $maxItems;
|
||||||
|
$restoken = createResumToken($cursor, $extquery, $metadataPrefix);
|
||||||
|
$expirationdatetime = gmstrftime('%Y-%m-%dT%TZ', time()+TOKEN_VALID);
|
||||||
|
} elseif (isset($args['resumptionToken'])) {
|
||||||
|
// Last delivery, return empty ResumptionToken
|
||||||
|
$restoken = $args['resumptionToken']; // just used as an indicator
|
||||||
|
unset($expirationdatetime);
|
||||||
|
}
|
||||||
|
|
||||||
|
if (isset($this->args['resumptionToken'])) {
|
||||||
|
$record = $res->fetch(PDO::FETCH_ASSOC, PDO::FETCH_ORI_ABS, $deliveredrecords);
|
||||||
|
}
|
||||||
|
// Record counter
|
||||||
|
$countrec = 0;
|
||||||
|
|
||||||
|
// Publish a batch to $maxrec number of records
|
||||||
|
$outputObj = new ANDS_Response_XML($this->args);
|
||||||
|
while ($countrec++ < $maxrec) {
|
||||||
|
$record = $res->fetch(PDO::FETCH_ASSOC);
|
||||||
|
if ($record===false) {
|
||||||
|
if (SHOW_QUERY_ERROR) {
|
||||||
|
echo __FILE__.",". __LINE__."<br />";
|
||||||
|
print_r($db->errorInfo());
|
||||||
|
exit();
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
$identifier = $oaiprefix.$record[$SQL['identifier']];
|
||||||
|
$datestamp = formatDatestamp($record[$SQL['datestamp']]);
|
||||||
|
$setspec = $record[$SQL['set']];
|
||||||
|
|
||||||
|
// debug_var_dump('record', $record);
|
||||||
|
$status_deleted = (isset($record[$SQL['deleted']]) && ($record[$SQL['deleted']] === true) &&
|
||||||
|
($deletedRecord == 'transient' || $deletedRecord == 'persistent'));
|
||||||
|
|
||||||
|
//debug_var_dump('status_deleted', $status_deleted);
|
||||||
|
if($this->args['verb']=='ListRecords') {
|
||||||
|
$cur_record = $outputObj->create_record();
|
||||||
|
$cur_header = $outputObj->create_header($identifier, $datestamp,$setspec,$cur_record);
|
||||||
|
// return the metadata record itself
|
||||||
|
if (!$status_deleted) {
|
||||||
|
call_user_func(array($this, "{$metadataPrefix}_create_metadata"),
|
||||||
|
$outputObj, $cur_record, $identifier, $setspec, $db);
|
||||||
|
}
|
||||||
|
} else { // for ListIdentifiers, only identifiers will be returned.
|
||||||
|
$cur_header = $outputObj->create_header($identifier, $datestamp,$setspec);
|
||||||
|
}
|
||||||
|
if ($status_deleted) {
|
||||||
|
$cur_header->setAttribute("status","deleted");
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
// ResumptionToken
|
||||||
|
if (isset($restoken)) {
|
||||||
|
if(isset($expirationdatetime)) {
|
||||||
|
$outputObj->create_resumpToken($restoken,$expirationdatetime,$num_rows,$cursor);
|
||||||
|
} else {
|
||||||
|
$outputObj->create_resumpToken('',null,$num_rows,$deliveredrecords);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
return $outputObj;
|
||||||
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
* Add a metadata format node to an ANDS_Response_XML
|
||||||
|
* \param &$outputObj
|
||||||
|
* type: ANDS_Response_XML. The ANDS_Response_XML object for output.
|
||||||
|
* \param $key
|
||||||
|
* type string. The name of new node.
|
||||||
|
* \param $val
|
||||||
|
* type: array. Values accessable through keywords 'schema' and 'metadataNamespace'.
|
||||||
|
*
|
||||||
|
*/
|
||||||
|
private function addMetedataFormat(&$outputObj,$key,$val) {
|
||||||
|
$cmf = $outputObj->add2_verbNode("metadataFormat");
|
||||||
|
$outputObj->addChild($cmf,'metadataPrefix',$key);
|
||||||
|
$outputObj->addChild($cmf,'schema',$val['schema']);
|
||||||
|
$outputObj->addChild($cmf,'metadataNamespace',$val['metadataNamespace']);
|
||||||
|
}
|
||||||
|
|
||||||
|
private function rif_create_metadata($outputObj, $cur_record, $identifier, $setspec, $db) {
|
||||||
|
|
||||||
|
$metadata_node = $outputObj->create_metadata($cur_record);
|
||||||
|
$obj_node = new ANDS_TPA($outputObj, $metadata_node, $db);
|
||||||
|
try {
|
||||||
|
$obj_node->create_obj_node($setspec, $identifier);
|
||||||
|
} catch (Exception $e) {
|
||||||
|
echo 'Caught exception: ', $e->getMessage(), " when adding $identifier\n";
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
private function oai_dc_create_metadata($outputObj, $cur_record, $identifier, $setspec, $db) {
|
||||||
|
|
||||||
|
$sql = "SELECT dc_title, dc_creator, dc_subject, dc_description, dc_contributor, dc_publisher,
|
||||||
|
dc_date , dc_type , dc_format , dc_identifier , dc_source , dc_language,
|
||||||
|
dc_relation , dc_coverage , dc_rights
|
||||||
|
FROM oai_records
|
||||||
|
WHERE oai_set = '{$setspec}'
|
||||||
|
AND oai_identifier = '{$identifier}'";
|
||||||
|
|
||||||
|
$res = exec_pdo_query($db,$sql);
|
||||||
|
$record = $res->fetch(PDO::FETCH_ASSOC);
|
||||||
|
|
||||||
|
$meta_node = $outputObj->addChild($cur_record ,"metadata");
|
||||||
|
|
||||||
|
$schema_node = $outputObj->addChild($meta_node, 'oai_dc:dc');
|
||||||
|
$schema_node->setAttribute('xmlns:oai_dc', "http://www.openarchives.org/OAI/2.0/oai_dc/");
|
||||||
|
$schema_node->setAttribute('xmlns:dc',"http://purl.org/dc/elements/1.1/");
|
||||||
|
$schema_node->setAttribute('xmlns:xsi',"http://www.w3.org/2001/XMLSchema-instance");
|
||||||
|
$schema_node->setAttribute('xsi:schemaLocation',
|
||||||
|
'http://www.openarchives.org/OAI/2.0/oai_dc/ http://www.openarchives.org/OAI/2.0/oai_dc.xsd');
|
||||||
|
foreach ($record as $r => $v) {
|
||||||
|
if (!empty($v)) {
|
||||||
|
$outputObj->addChild($schema_node, str_replace('_', ':', $r), $v);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
@ -1,36 +0,0 @@
|
||||||
<?php
|
|
||||||
/** \file
|
|
||||||
* \brief Definition of Dublin Core handler.
|
|
||||||
*
|
|
||||||
* It is not working as it does not provide any content to the metadata node. It only included
|
|
||||||
* to demonstrate how a new metadata can be supported. For a working
|
|
||||||
* example, please see record_rif.php.
|
|
||||||
*
|
|
||||||
*/
|
|
||||||
|
|
||||||
function create_metadata($outputObj, $cur_record, $identifier, $setspec, $db) {
|
|
||||||
|
|
||||||
$sql = "SELECT dc_title, dc_creator, dc_subject, dc_description, dc_contributor, dc_publisher,
|
|
||||||
dc_date , dc_type , dc_format , dc_identifier , dc_source , dc_language,
|
|
||||||
dc_relation , dc_coverage , dc_rights
|
|
||||||
FROM oai_records
|
|
||||||
WHERE oai_set = '{$setspec}'
|
|
||||||
AND oai_identifier = '{$identifier}'";
|
|
||||||
|
|
||||||
$res = exec_pdo_query($db,$sql);
|
|
||||||
$record = $res->fetch(PDO::FETCH_ASSOC);
|
|
||||||
|
|
||||||
$meta_node = $outputObj->addChild($cur_record ,"metadata");
|
|
||||||
|
|
||||||
$schema_node = $outputObj->addChild($meta_node, 'oai_dc:dc');
|
|
||||||
$schema_node->setAttribute('xmlns:oai_dc', "http://www.openarchives.org/OAI/2.0/oai_dc/");
|
|
||||||
$schema_node->setAttribute('xmlns:dc',"http://purl.org/dc/elements/1.1/");
|
|
||||||
$schema_node->setAttribute('xmlns:xsi',"http://www.w3.org/2001/XMLSchema-instance");
|
|
||||||
$schema_node->setAttribute('xsi:schemaLocation',
|
|
||||||
'http://www.openarchives.org/OAI/2.0/oai_dc/ http://www.openarchives.org/OAI/2.0/oai_dc.xsd');
|
|
||||||
foreach ($record as $r => $v) {
|
|
||||||
if (!empty($v)) {
|
|
||||||
$outputObj->addChild($schema_node, str_replace('_', ':', $r), $v);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
@ -1,32 +0,0 @@
|
||||||
<?php
|
|
||||||
/** \file
|
|
||||||
* \brief Definition of RIF-CS handler.
|
|
||||||
*
|
|
||||||
* It is a plug-in helper function which will be called from where a metadata in rif format is being generated.
|
|
||||||
* The name of function defined here cannot be changed.
|
|
||||||
* This can also be used as an example for your own metadata strucutre:
|
|
||||||
* - create a metetadata node
|
|
||||||
* - append contents of the record to the metedata node
|
|
||||||
*
|
|
||||||
* In this example, every time when a new record is being generated, a new instance of ANDS_TPA is created.
|
|
||||||
* As XML output document and the database connection are the same, it is possible to design otherwise.
|
|
||||||
*
|
|
||||||
* \sa oaidp-config.php
|
|
||||||
*/
|
|
||||||
|
|
||||||
// This handles RIF-CS records, but can be also used as a sample
|
|
||||||
// for other formats.
|
|
||||||
// Just define this function as template to deal your metadata records.
|
|
||||||
|
|
||||||
// Create a metadata object and a registryObjects, and its only child registryObject
|
|
||||||
function create_metadata($outputObj, $cur_record, $identifier, $setspec, $db) {
|
|
||||||
|
|
||||||
$metadata_node = $outputObj->create_metadata($cur_record);
|
|
||||||
$obj_node = new ANDS_TPA($outputObj, $metadata_node, $db);
|
|
||||||
try {
|
|
||||||
$obj_node->create_obj_node($setspec, $identifier);
|
|
||||||
} catch (Exception $e) {
|
|
||||||
echo 'Caught exception: ', $e->getMessage(), " when adding $identifier\n";
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
Loading…
Reference in New Issue